fixes rubberduck-vba#2210, implemented inspection setting to determin…

…e whether or not to run inspections automatically on successful parse.

RetailCoder.VBE/Rubberduck.csproj

@@ -376,6 +376,7 @@
     <Compile Include="Inspections\WriteOnlyPropertyQuickFix.cs" />
     <Compile Include="Navigation\CodeExplorer\ICodeExplorerDeclarationViewModel.cs" />
     <Compile Include="Navigation\Folders\FolderHelper.cs" />
+    <Compile Include="Refactorings\ExtractMethod\EnumerableExt.cs" />
     <Compile Include="Refactorings\ExtractMethod\ExtractedMethod.cs" />
     <Compile Include="Refactorings\ExtractMethod\ExtractMethodParameterClassification.cs" />
     <Compile Include="Refactorings\ExtractMethod\ExtractMethodSelectionValidation.cs" />

RetailCoder.VBE/Settings/CodeInspectionConfigProvider.cs

@@ -15,14 +15,14 @@ public CodeInspectionConfigProvider(IPersistanceService<CodeInspectionSettings>
 
         public CodeInspectionSettings Create()
         {
-            var prototype = new CodeInspectionSettings(GetDefaultCodeInspections(), new WhitelistedIdentifierSetting[] { });
-            return _persister.Load(prototype) ?? prototype;            
+            var prototype = new CodeInspectionSettings(GetDefaultCodeInspections(), new WhitelistedIdentifierSetting[] { }, true);
+            return _persister.Load(prototype) ?? prototype;
         }
 
         public CodeInspectionSettings CreateDefaults()
         {
             //This no longer sucks.
-            return new CodeInspectionSettings(GetDefaultCodeInspections(), new WhitelistedIdentifierSetting[] {});
+            return new CodeInspectionSettings(GetDefaultCodeInspections(), new WhitelistedIdentifierSetting[] {}, true);
         }
 
         public void Save(CodeInspectionSettings settings)

RetailCoder.VBE/Settings/CodeInspectionSettings.cs

@@ -11,6 +11,7 @@ public interface ICodeInspectionSettings
     {
         HashSet<CodeInspectionSetting> CodeInspections { get; set; }
         WhitelistedIdentifierSetting[] WhitelistedIdentifiers { get; set; }
+        bool RunInspectionsOnSuccessfulParse { get; set; }
     }
 
     [XmlType(AnonymousType = true)]
@@ -22,14 +23,17 @@ public class CodeInspectionSettings : ICodeInspectionSettings
         [XmlArrayItem("WhitelistedIdentifier", IsNullable = false)]
         public WhitelistedIdentifierSetting[] WhitelistedIdentifiers { get; set; }
 
-        public CodeInspectionSettings() : this(new HashSet<CodeInspectionSetting>(), new WhitelistedIdentifierSetting[] {})
+        public bool RunInspectionsOnSuccessfulParse { get; set; }
+
+        public CodeInspectionSettings() : this(new HashSet<CodeInspectionSetting>(), new WhitelistedIdentifierSetting[] {}, true)
         {
         }
 
-        public CodeInspectionSettings(HashSet<CodeInspectionSetting> inspections, WhitelistedIdentifierSetting[] whitelistedNames)
+        public CodeInspectionSettings(HashSet<CodeInspectionSetting> inspections, WhitelistedIdentifierSetting[] whitelistedNames, bool runInspectionsOnParse)
         {
             CodeInspections = inspections;
             WhitelistedIdentifiers = whitelistedNames;
+            RunInspectionsOnSuccessfulParse = runInspectionsOnParse;
         }
 
         public CodeInspectionSetting GetSetting(Type inspection)

RetailCoder.VBE/Settings/ConfigurationLoader.cs

@@ -8,9 +8,11 @@ public class ConfigurationChangedEventArgs : EventArgs
     {
         public bool LanguageChanged { get; private set; }
         public bool InspectionSettingsChanged { get; private set; }
+        public bool RunInspectionsOnReparse { get; private set; }
 
-        public ConfigurationChangedEventArgs(bool languageChanged, bool inspectionSettingsChanged)
+        public ConfigurationChangedEventArgs(bool runInspections, bool languageChanged, bool inspectionSettingsChanged)
         {
+            RunInspectionsOnReparse = runInspections;
             LanguageChanged = languageChanged;
             InspectionSettingsChanged = inspectionSettingsChanged;
         }
@@ -82,6 +84,7 @@ public void SaveConfiguration(Configuration toSerialize)
             var langChanged = _generalProvider.Create().Language.Code != toSerialize.UserSettings.GeneralSettings.Language.Code;
             var oldInspectionSettings = _inspectionProvider.Create().CodeInspections.Select(s => Tuple.Create(s.Name, s.Severity));
             var newInspectionSettings = toSerialize.UserSettings.CodeInspectionSettings.CodeInspections.Select(s => Tuple.Create(s.Name, s.Severity));
+            var inspectOnReparse = toSerialize.UserSettings.CodeInspectionSettings.RunInspectionsOnSuccessfulParse;
 
             _generalProvider.Save(toSerialize.UserSettings.GeneralSettings);
             _hotkeyProvider.Save(toSerialize.UserSettings.HotkeySettings);
@@ -90,7 +93,7 @@ public void SaveConfiguration(Configuration toSerialize)
             _unitTestProvider.Save(toSerialize.UserSettings.UnitTestSettings);
             _indenterProvider.Save(toSerialize.UserSettings.IndenterSettings);
 
-            OnSettingsChanged(new ConfigurationChangedEventArgs(langChanged, !oldInspectionSettings.SequenceEqual(newInspectionSettings)));
+            OnSettingsChanged(new ConfigurationChangedEventArgs(inspectOnReparse, langChanged, !oldInspectionSettings.SequenceEqual(newInspectionSettings)));
         }
 
         public event EventHandler<ConfigurationChangedEventArgs> SettingsChanged;

RetailCoder.VBE/UI/Inspections/InspectionResultsViewModel.cs

@@ -50,6 +50,9 @@ public sealed class InspectionResultsViewModel : ViewModelBase, INavigateSelecti
             _openSettingsCommand = new DelegateCommand(LogManager.GetCurrentClassLogger(), OpenSettings);
 
             _configService.SettingsChanged += _configService_SettingsChanged;
+
+            // todo: remove I/O work in constructor
+            _runInspectionsOnReparse = _configService.LoadConfiguration().UserSettings.CodeInspectionSettings.RunInspectionsOnSuccessfulParse;
 
             _setInspectionTypeGroupingCommand = new DelegateCommand(LogManager.GetCurrentClassLogger(), param =>
             {
@@ -67,11 +70,12 @@ public sealed class InspectionResultsViewModel : ViewModelBase, INavigateSelecti
         }
 
         private void _configService_SettingsChanged(object sender, ConfigurationChangedEventArgs e)
-        {
+        {            
             if (e.InspectionSettingsChanged)
             {
                 RefreshInspections();
             }
+            _runInspectionsOnReparse = e.RunInspectionsOnReparse;
         }
 
         private ObservableCollection<ICodeInspectionResult> _results = new ObservableCollection<ICodeInspectionResult>();
@@ -238,32 +242,35 @@ public bool CanQuickFix
 
         private async void ExecuteRefreshCommandAsync()
         {
-            CanRefresh = _vbe.HostApplication() != null && _state.IsDirty();
+            CanRefresh = _vbe.HostApplication() != null;
             if (!CanRefresh)
             {
                 return;
             }
             await Task.Yield();
 
             IsBusy = true;
-            
+
             _state.OnParseRequested(this);
         }
 
         private bool CanExecuteRefreshCommand(object parameter)
         {
-            return !IsBusy && _state.IsDirty();
+            return !IsBusy;
         }
 
+        private bool _runInspectionsOnReparse;
         private void _state_StateChanged(object sender, EventArgs e)
         {
             if (_state.Status != ParserState.Ready)
             {
-                IsBusy = false;
                 return;
             }
 
-            RefreshInspections();
+            if (sender == this || _runInspectionsOnReparse)
+            {
+                RefreshInspections();
+            }
         }
 
         private async void RefreshInspections()

RetailCoder.VBE/UI/RubberduckUI.fr.resx

@@ -1571,4 +1571,10 @@ Tous ceux qui nous ont donné une étoile ou un "like"
   <data name="CodeExplorer_ShowSignaturesToolTip" xml:space="preserve">
     <value>Activer/désactiver les signatures</value>
   </data>
+  <data name="CodeInspectionSettings_Misc" xml:space="preserve">
+    <value>Autres options</value>
+  </data>
+  <data name="CodeInspectionSettings_Misc_RunInspectionsOnSuccessfulParse" xml:space="preserve">
+    <value>Exécuter les inspections automatiquement</value>
+  </data>
 </root>

RetailCoder.VBE/UI/RubberduckUI.resx

@@ -1775,4 +1775,10 @@ All our stargazers, likers & followers, for the warm fuzzies
   <data name="CodeExplorer_ExpandSubnodesToolTip" xml:space="preserve">
     <value>Expand node and all child nodes</value>
   </data>
+  <data name="CodeInspectionSettings_Misc" xml:space="preserve">
+    <value>Miscellaneous</value>
+  </data>
+  <data name="CodeInspectionSettings_Misc_RunInspectionsOnSuccessfulParse" xml:space="preserve">
+    <value>Run inspections automatically on successful parse</value>
+  </data>
 </root>

RetailCoder.VBE/UI/Settings/InspectionSettings.xaml

@@ -10,7 +10,7 @@
              xmlns:controls="clr-namespace:Rubberduck.UI.Controls"
              xmlns:themes="clr-namespace:Microsoft.Windows.Themes;assembly=PresentationFramework.Aero"
              mc:Ignorable="d" 
-             d:DesignHeight="300" d:DesignWidth="300"
+             d:DesignWidth="300"
              d:DataContext="{d:DesignInstance {x:Type settings:InspectionSettingsViewModel}, IsDesignTimeCreatable=False}">
     <UserControl.Resources>
         <converters:CodeInspectionSeverityEnumToTextConverter x:Key="CodeInspectionSeverityEnumToText" />
@@ -399,6 +399,25 @@
                         </DataGrid.Columns>
                     </DataGrid>
                 </Border>
+                <Label Background="DarkGray"
+                       Foreground="White"
+                       FontWeight="SemiBold"
+                       Content="{Resx ResxName=Rubberduck.UI.RubberduckUI, Key=CodeInspectionSettings_Misc}"
+                       Margin="0,5,0,3">
+                    <Label.Style>
+                        <Style>
+                            <Style.Resources>
+                                <Style TargetType="{x:Type Border}">
+                                    <Setter Property="CornerRadius" Value="5"/>
+                                </Style>
+                            </Style.Resources>
+                        </Style>
+                    </Label.Style>
+                </Label>
+                <StackPanel>
+                    <CheckBox IsChecked="{Binding RunInspectionsOnSuccessfulParse}" 
+                              Content="{Resx ResxName=Rubberduck.UI.RubberduckUI, Key=CodeInspectionSettings_Misc_RunInspectionsOnSuccessfulParse}" />
+                </StackPanel>
             </StackPanel>
         </ScrollViewer>
     </Grid>

RetailCoder.VBE/UI/Settings/InspectionSettingsViewModel.cs

@@ -19,6 +19,8 @@ public InspectionSettingsViewModel(Configuration config)
             WhitelistedIdentifierSettings = new ObservableCollection<WhitelistedIdentifierSetting>(
                 config.UserSettings.CodeInspectionSettings.WhitelistedIdentifiers.OrderBy(o => o.Identifier).Distinct());
 
+            RunInspectionsOnSuccessfulParse = config.UserSettings.CodeInspectionSettings.RunInspectionsOnSuccessfulParse;
+
             if (InspectionSettings.GroupDescriptions != null)
             {
                 InspectionSettings.GroupDescriptions.Add(new PropertyGroupDescription("TypeLabel"));
@@ -51,6 +53,21 @@ public ListCollectionView InspectionSettings
             }
         }
 
+        private bool _runInspectionsOnSuccessfulParse;
+
+        public bool RunInspectionsOnSuccessfulParse
+        {
+            get { return _runInspectionsOnSuccessfulParse; }
+            set
+            {
+                if (_runInspectionsOnSuccessfulParse != value)
+                {
+                    _runInspectionsOnSuccessfulParse = value;
+                    OnPropertyChanged();
+                }
+            }
+        }
+
         private ObservableCollection<WhitelistedIdentifierSetting> _whitelistedNameSettings;
         public ObservableCollection<WhitelistedIdentifierSetting> WhitelistedIdentifierSettings
         {
@@ -69,6 +86,7 @@ public void UpdateConfig(Configuration config)
         {
             config.UserSettings.CodeInspectionSettings.CodeInspections = new HashSet<CodeInspectionSetting>(InspectionSettings.SourceCollection.OfType<CodeInspectionSetting>());
             config.UserSettings.CodeInspectionSettings.WhitelistedIdentifiers = WhitelistedIdentifierSettings.Distinct().ToArray();
+            config.UserSettings.CodeInspectionSettings.RunInspectionsOnSuccessfulParse = _runInspectionsOnSuccessfulParse;
         }
 
         public void SetToDefaults(Configuration config)
@@ -82,6 +100,7 @@ public void SetToDefaults(Configuration config)
             }
 
             WhitelistedIdentifierSettings = new ObservableCollection<WhitelistedIdentifierSetting>();
+            RunInspectionsOnSuccessfulParse = true;
         }
 
         private CommandBase _addWhitelistedNameCommand;

Rubberduck.Parsing/VBA/RubberduckParser.cs

@@ -63,7 +63,7 @@ private void ReparseRequested(object sender, EventArgs e)
             if (!_isTestScope)
             {
                 Cancel();
-                Task.Run(() => ParseAll(_cancellationTokens[0]));
+                Task.Run(() => ParseAll(sender, _cancellationTokens[0]));
             }
             else
             {
@@ -142,15 +142,15 @@ public void Parse(CancellationTokenSource token)
 
             if (State.Status < ParserState.Error)
             {
-                State.SetStatusAndFireStateChanged(ParserState.ResolvedDeclarations);
+                State.SetStatusAndFireStateChanged(this, ParserState.ResolvedDeclarations);
                 Task.WaitAll(ResolveReferencesAsync(token.Token));
             }
         }
 
         /// <summary>
         /// Starts parsing all components of all unprotected VBProjects associated with the VBE-Instance passed to the constructor of this parser instance.
         /// </summary>
-        private void ParseAll(CancellationTokenSource token)
+        private void ParseAll(object requestor, CancellationTokenSource token)
         {
             State.RefreshProjects(_vbe);
 
@@ -202,10 +202,10 @@ private void ParseAll(CancellationTokenSource token)
             {
                 if (componentsRemoved)  // trigger UI updates
                 {
-                    State.SetStatusAndFireStateChanged(ParserState.ResolvedDeclarations);
+                    State.SetStatusAndFireStateChanged(requestor, ParserState.ResolvedDeclarations);
                 }
 
-                State.SetStatusAndFireStateChanged(State.Status);
+                State.SetStatusAndFireStateChanged(requestor, State.Status);
                 return;
             }
 
@@ -276,7 +276,7 @@ private void ParseAll(CancellationTokenSource token)
 
             if (State.Status < ParserState.Error)
             {
-                State.SetStatusAndFireStateChanged(ParserState.ResolvedDeclarations);
+                State.SetStatusAndFireStateChanged(requestor, ParserState.ResolvedDeclarations);
                 ResolveReferencesAsync(token.Token);
             }
         }

Rubberduck.Parsing/VBA/RubberduckParserState.cs

@@ -261,12 +261,12 @@ public List<VBProject> Projects
 
         public event EventHandler<ParserStateEventArgs> StateChanged;
 
-        private void OnStateChanged(ParserState state = ParserState.Pending)
+        private void OnStateChanged(object requestor, ParserState state = ParserState.Pending)
         {
             var handler = StateChanged;
             if (handler != null)
             {
-                handler.Invoke(this, new ParserStateEventArgs(state));
+                handler.Invoke(requestor, new ParserStateEventArgs(state));
             }
         }
         public event EventHandler<ParseProgressEventArgs> ModuleStateChanged;
@@ -467,16 +467,16 @@ private set
                 if (_status != value)
                 {
                     _status = value;
-                    OnStateChanged(_status);
+                    OnStateChanged(this, _status);
                 }
             }
         }
 
-        public void SetStatusAndFireStateChanged(ParserState status)
+        public void SetStatusAndFireStateChanged(object requestor, ParserState status)
         {
             if (Status == status)
             {
-                OnStateChanged(status);
+                OnStateChanged(requestor, status);
             }
             else
             {
@@ -665,8 +665,8 @@ private void ClearStateCache(string projectId, bool notifyStateChanged = false)
 
             if (notifyStateChanged)
             {
-                OnStateChanged(ParserState.ResolvedDeclarations);   // trigger test explorer and code explorer updates
-                OnStateChanged(ParserState.Ready);   // trigger find all references &c. updates
+                OnStateChanged(this, ParserState.ResolvedDeclarations);   // trigger test explorer and code explorer updates
+                OnStateChanged(this, ParserState.Ready);   // trigger find all references &c. updates
             }
         }
 
@@ -707,8 +707,8 @@ public bool ClearStateCache(QualifiedModuleName component, bool notifyStateChang
 
             if (notifyStateChanged)
             {
-                OnStateChanged(ParserState.ResolvedDeclarations);   // trigger test explorer and code explorer updates
-                OnStateChanged(ParserState.Ready);   // trigger find all references &c. updates
+                OnStateChanged(this, ParserState.ResolvedDeclarations);   // trigger test explorer and code explorer updates
+                OnStateChanged(this, ParserState.Ready);   // trigger find all references &c. updates
             }
 
             return success;
@@ -729,8 +729,8 @@ private bool RemoveRenamedComponent(string projectId, string oldComponentName)
 
             if (success)
             {
-                OnStateChanged(ParserState.ResolvedDeclarations);   // trigger test explorer and code explorer updates
-                OnStateChanged(ParserState.Ready);   // trigger find all references &c. updates
+                OnStateChanged(this, ParserState.ResolvedDeclarations);   // trigger test explorer and code explorer updates
+                OnStateChanged(this, ParserState.Ready);   // trigger find all references &c. updates
             }
 
             return success;