public TypeAnnotationPass(DeclarationFinder declarationFinder, VBAExpressionParser expressionParser)
{
_declarationFinder = declarationFinder;
var typeBindingContext = new TypeBindingContext(_declarationFinder);
var procedurePointerBindingContext = new ProcedurePointerBindingContext(_declarationFinder);
_bindingService = new BindingService(
_declarationFinder,
new DefaultBindingContext(_declarationFinder, typeBindingContext, procedurePointerBindingContext),
typeBindingContext,
procedurePointerBindingContext);
_boundExpressionVisitor = new BoundExpressionVisitor(new AnnotationService(_declarationFinder));
_expressionParser = expressionParser;
}
public IdentifierReferenceResolver(QualifiedModuleName qualifiedModuleName, DeclarationFinder finder)
{
_declarationFinder = finder;
_qualifiedModuleName = qualifiedModuleName;
_withBlockExpressions = new Stack <IBoundExpression>();
_moduleDeclaration = finder.MatchName(_qualifiedModuleName.ComponentName)
.SingleOrDefault(item =>
(item.DeclarationType == DeclarationType.ClassModule ||
item.DeclarationType == DeclarationType.ProceduralModule) &&
item.QualifiedName.QualifiedModuleName.Equals(_qualifiedModuleName));
SetCurrentScope();
var typeBindingContext = new TypeBindingContext(_declarationFinder);
var procedurePointerBindingContext = new ProcedurePointerBindingContext(_declarationFinder);
_bindingService = new BindingService(
_declarationFinder,
new DefaultBindingContext(_declarationFinder, typeBindingContext, procedurePointerBindingContext),
typeBindingContext,
procedurePointerBindingContext);
_boundExpressionVisitor = new BoundExpressionVisitor(finder);
}
public void Release(DeclarationFinder declarationFinder)
{
}
private void ResolveReferences(DeclarationFinder finder, VBComponent component, IParseTree tree)
{
var state = _state.GetModuleState(component);
if (_state.Status == ParserState.ResolverError || (state != ParserState.Parsed))
{
return;
}
Debug.WriteLine("Resolving '{0}'... (thread {1})", component.Name, Thread.CurrentThread.ManagedThreadId);
var qualifiedName = new QualifiedModuleName(component);
var resolver = new IdentifierReferenceResolver(qualifiedName, finder);
var listener = new IdentifierReferenceListener(resolver);
if (!string.IsNullOrWhiteSpace(tree.GetText().Trim()))
{
var walker = new ParseTreeWalker();
try
{
walker.Walk(listener, tree);
state = ParserState.Ready;
}
catch (Exception exception)
{
Debug.Print("Exception thrown resolving '{0}' (thread {2}): {1}", component.Name, exception, Thread.CurrentThread.ManagedThreadId);
state = ParserState.ResolverError;
}
}
_state.SetModuleState(component, state);
Debug.Print("'{0}' is {1}. Resolver took {2}ms to complete (thread {3})", component.Name, _state.GetModuleState(component), /*_resolverTimer[component].ElapsedMilliseconds*/0, Thread.CurrentThread.ManagedThreadId);
}
private void ResolveInternal(CancellationToken token)
{
var components = _state.Projects
.Where(project => project.Protection == vbext_ProjectProtection.vbext_pp_none)
.SelectMany(p => p.VBComponents.Cast<VBComponent>()).ToList();
if (!_state.HasAllParseTrees(components))
{
return;
}
foreach (var kvp in _state.ParseTrees)
{
var qualifiedName = kvp.Key;
if (true /*_state.IsModified(qualifiedName)*/)
{
Debug.WriteLine("Module '{0}' {1}", qualifiedName.ComponentName, _state.IsModified(qualifiedName) ? "was modified" : "was NOT modified");
// modified module; walk parse tree and re-acquire all declarations
if (token.IsCancellationRequested) return;
ResolveDeclarations(qualifiedName.Component, kvp.Value);
}
else
{
Debug.WriteLine(string.Format("Module '{0}' was not modified since last parse. Clearing identifier references...", kvp.Key.ComponentName));
// clear identifier references for non-modified modules
var declarations = _state.AllUserDeclarations.Where(item => item.QualifiedName.QualifiedModuleName.Equals(qualifiedName));
foreach (var declaration in declarations)
{
declaration.ClearReferences();
}
}
}
// walk all parse trees (modified or not) for identifier references
var finder = new DeclarationFinder(_state.AllDeclarations, _state.AllComments, _state.AllAnnotations);
foreach (var kvp in _state.ParseTrees)
{
if (token.IsCancellationRequested) return;
ResolveReferences(finder, kvp.Key.Component, kvp.Value);
}
}
public ProjectReferencePass(DeclarationFinder declarationFinder)
{
_declarationFinder = declarationFinder;
}
public DebugDeclarations(RubberduckParserState state)
{
_finder = new DeclarationFinder(state.AllDeclarations, new CommentNode[] { }, new IAnnotation[] { });
}
