/// <summary>
/// Exports the specified component to a temporary file, loads, and then parses the exported file.
/// </summary>
/// <param name="component"></param>
public IDictionary<Tuple<string, DeclarationType>, Attributes> Parse(VBComponent component)
{
var path = _exporter.Export(component);
if (!File.Exists(path))
{
// a document component without any code wouldn't be exported (file would be empty anyway).
return new Dictionary<Tuple<string, DeclarationType>, Attributes>();
}
var code = File.ReadAllText(path);
File.Delete(path);
var type = component.Type == vbext_ComponentType.vbext_ct_StdModule
? DeclarationType.Module
: DeclarationType.Class;
var listener = new AttributeListener(Tuple.Create(component.Name, type));
var stream = new AntlrInputStream(code);
var lexer = new VBALexer(stream);
var tokens = new CommonTokenStream(lexer);
var parser = new VBAParser(tokens);
// parse tree isn't usable for declarations because
// line numbers are offset due to module header and attributes
// (these don't show up in the VBE, that's why we're parsing an exported file)
var tree = parser.startRule();
ParseTreeWalker.Default.Walk(listener, tree);
return listener.Attributes;
}
public IDictionary <Tuple <string, DeclarationType>, Attributes> Parse(IVBComponent component, CancellationToken token, out ITokenStream stream, out IParseTree tree)
{
var code = component.CodeModule.Content();
var type = component.Type == ComponentType.StandardModule
? DeclarationType.ProceduralModule
: DeclarationType.ClassModule;
var tokenStreamProvider = new SimpleVBAModuleTokenStreamProvider();
var tokens = tokenStreamProvider.Tokens(code);
var preprocessor = _preprocessorFactory();
preprocessor.PreprocessTokenStream(component.Name, tokens, token);
var listener = new AttributeListener(Tuple.Create(component.Name, type));
// parse tree isn't usable for declarations because
// line numbers are offset due to module header and attributes
// (these don't show up in the VBE, that's why we're parsing an exported file)
tree = new VBAModuleParser().Parse(component.Name, tokens, new IParseTreeListener[] { listener }, new ExceptionErrorListener(), out stream);
token.ThrowIfCancellationRequested();
return(listener.Attributes);
}
public (IParseTree tree, ITokenStream tokenStream, IDictionary <Tuple <string, DeclarationType>, Attributes> attributes) Parse(QualifiedModuleName module, CancellationToken cancellationToken)
{
var code = _projectsProvider.Component(module).CodeModule.Content();
var type = module.ComponentType == ComponentType.StandardModule
? DeclarationType.ProceduralModule
: DeclarationType.ClassModule;
var tokenStreamProvider = new SimpleVBAModuleTokenStreamProvider();
var tokens = tokenStreamProvider.Tokens(code);
var preprocessor = _preprocessorFactory();
var preprocessingErrorListener = new PreprocessorExceptionErrorListener(module.ComponentName, ParsePass.AttributesPass);
preprocessor.PreprocessTokenStream(module.ComponentName, tokens, preprocessingErrorListener, cancellationToken);
var listener = new AttributeListener(Tuple.Create(module.ComponentName, type));
// parse tree isn't usable for declarations because
// line numbers are offset due to module header and attributes
// (these don't show up in the VBE, that's why we're parsing an exported file)
var mainParseErrorListener = new MainParseExceptionErrorListener(module.ComponentName, ParsePass.AttributesPass);
var parseResults = new VBAModuleParser().Parse(module.Name, tokens, new IParseTreeListener[] { listener }, mainParseErrorListener);
cancellationToken.ThrowIfCancellationRequested();
return(parseResults.tree, parseResults.tokenStream, listener.Attributes);
}
