added legacy workload installer config and documentation

Author: retailcoder

Rubberduck.Deployment/InnoSetup/Includes/Czech.CustomMessages.iss

@@ -22,4 +22,8 @@ Czech.WillInstallForCurrentUser=Rubberduck Add-In bude k dispozici pouze pro akt
 Czech.UninstallOldVersionPrompt=Vypadá to, že existuje předchozí verze Rubberducku instalována v %s módu a měla by být odinstalována. Pokračovat?
 Czech.UninstallOldVersionFail=Nelze odinstalovat předchozí verzi Rubberducku. Zkuste jej odinstalovat pomocí ovládacího panelu - programy a funkce - a poté spustit instalátor znovu.
 Czech.WarnInstallPerUserOverEveryone=Zdá se, že je nainstalována verze Rubberducku pro všechny uživatele. Pokud budete pokračovat s per-uživatel instalací, bude mít přednost před původní instalací. Přesto pokračovat?
-Czech.ElevationRequestFailMessage=Nelze odinstalovat předchozí verzi Rubberducku. Před instalací nové verze bude nejspíše nutné ji odinstalovat přímo.
+Czech.ElevationRequestFailMessage=Nelze odinstalovat předchozí verzi Rubberducku. Před instalací nové verze bude nejspíše nutné ji odinstalovat přímo.
+Czech.UseLegacyWorkloadCaption=Initial Configuration
+Czech.UseLegacyWorkloadMessage=Planning to use Rubberduck with a large existing project?
+Czech.UseLegacyWorkloadDescription=Using 'legacy workload' default initial configuration disables autocompletion features and a number of specific inspections to help performance and reduce memory pressure. Disabled features can be re-enabled any time from the Settings menu.
+Czech.UseLegacyWorkloadButtonCaption=Use legacy workload configuration

Rubberduck.Deployment/InnoSetup/Includes/English.CustomMessages.iss

@@ -23,4 +23,8 @@ English.UninstallOldVersionPrompt=There seems to be a previous version of Rubber
 English.UninstallOldVersionFail=Unable to uninstall the previous version of Rubberduck. Try and uninstall it via the Programs control panel and run the installer again.
 English.UninstallOldVersionNotFound=The uninstaller could not be found. Do you want to proceed and install anyway? This may potentially overwrite existing installation and may result in a duplicate entry in the Add & Remove Programs. Proceed anyway?
 English.WarnInstallPerUserOverEveryone=There seems to be a version of Rubberduck installed for all users. If you proceed with the per-user install, it will take precedence over the original install. Proceed anyway?
-English.ElevationRequestFailMessage=Unable to uninstall the previous version of Rubberduck. You may need to uninstall it directly before you can install the new version.
+English.ElevationRequestFailMessage=Unable to uninstall the previous version of Rubberduck. You may need to uninstall it directly before you can install the new version.
+English.UseLegacyWorkloadCaption=Initial Configuration
+English.UseLegacyWorkloadMessage=Planning to use Rubberduck with a large existing project?
+English.UseLegacyWorkloadDescription=Using 'legacy workload' default initial configuration disables autocompletion features and a number of specific inspections to help performance and reduce memory pressure. Disabled features can be re-enabled any time from the Settings menu.
+English.UseLegacyWorkloadButtonCaption=Use legacy workload configuration

Rubberduck.Deployment/InnoSetup/Includes/French.CustomMessages.iss

@@ -22,4 +22,8 @@ French.WillInstallForCurrentUser=Le complément Rubberduck sera disponible seule
 French.UninstallOldVersionPrompt=Il semble y avoir une version antérieure de Rubberduck installée sur ce système pour %s, qui devra d'abord être désinstallée. Procéder à la désinstallation?
 French.UninstallOldVersionFail=Impossible de désinstaller la version antérieure. Essayez de désinstaller via Ajout/Suppression de Programmes dans le panneau de contrôle, puis recommencer l'installation.
 French.WarnInstallPerUserOverEveryone=Il semble y avoir une version de Rubberduck installée pour tous les utilisateurs. Procéder à une installation utilisateur simple modifiera l'enregistrement, sans affecter les autres utilisateurs. Procéder?
-French.ElevationRequestFailMessage=Impossible de désinstaller la version précédente de Rubberduck. Vous devrez d'abord désinstaller l'ancienne version avant de procéder à la mise à jour.
+French.ElevationRequestFailMessage=Impossible de désinstaller la version précédente de Rubberduck. Vous devrez d'abord désinstaller l'ancienne version avant de procéder à la mise à jour.
+French.UseLegacyWorkloadCaption=Configuration Initiale
+French.UseLegacyWorkloadMessage=Vous planifiez utiliser Rubberduck avec un projet existant?
+French.UseLegacyWorkloadDescription=La configuration initiale 'legacy workload' désactive auto-complétion et certaines inspections spécifiques pour réduire la pression sur la mémoire et améliorer la performance. Les fonctionnalités désactivées peuvent être réactivées manuellement à tout moment.
+French.UseLegacyWorkloadButtonCaption=Utiliser la configuration initiale 'legacy workload'

Rubberduck.Deployment/InnoSetup/Includes/German.CustomMessages.iss

@@ -22,4 +22,8 @@ German.WillInstallForCurrentUser=Das Rubberduck VBE-AddIn wird für den aktuelle
 German.UninstallOldVersionPrompt=Es scheint eine vorige Version von Rubberduck, als Anwendung für %s, installiert zu sein, die Deinstalliert werden sollte. Fortfahren?
 German.UninstallOldVersionFail=Konnte vorige Version nicht deinstallieren. Versuchen Sie, diese über die Systemsteuerung zu deinstallieren und starten Sie den Installer erneut.
 German.WarnInstallPerUserOverEveryone=Es scheint eine für alle Benutzer installierte Version von Rubberduck vorzuliegen. Eine installation nur für diesen Benutzer wird Vorrang vor der originalen Installation haben. Trotzdem fortfahren?
-German.ElevationRequestFailMessage=Konnte vorige Version von Rubberduck nicht deinstallieren. Es kann sein, dass Sie diese manuell deinstallieren müssen, bevor Sie die neue Version installieren können.
+German.ElevationRequestFailMessage=Konnte vorige Version von Rubberduck nicht deinstallieren. Es kann sein, dass Sie diese manuell deinstallieren müssen, bevor Sie die neue Version installieren können.
+German.UseLegacyWorkloadCaption=Initial Configuration
+German.UseLegacyWorkloadMessage=Planning to use Rubberduck with a large existing project?
+German.UseLegacyWorkloadDescription=Using 'legacy workload' default initial configuration disables autocompletion features and a number of specific inspections to help performance and reduce memory pressure. Disabled features can be re-enabled any time from the Settings menu.
+German.UseLegacyWorkloadButtonCaption=Use legacy workload configuration

Rubberduck.Deployment/InnoSetup/Includes/Spanish.CustomMessages.iss

@@ -22,4 +22,8 @@ Spanish.WillInstallForCurrentUser=El complemento Rubberduck estará disponible s
 Spanish.UninstallOldVersionPrompt=Parece que hay una versión anterior de Rubberduck, instalada, %s y debería ser desinstalada. ¿Proceder?
 Spanish.UninstallOldVersionFail=No se puede desinstalar la versión anterior de Rubberduck. Inténtelo y desinstálelo a través del panel de control de Programas y vuelva a ejecutar el instalador.
 Spanish.WarnInstallPerUserOverEveryone=Parece que hay una versión de Rubberduck instalada para todos los usuarios. Si continúa con la instalación por usuario, tendrá prioridad sobre la instalación original. ¿Procede de todas maneras?
-Spanish.ElevationRequestFailMessage=No se puede desinstalar la versión anterior de Rubberduck. Es posible que deba desinstalarlo directamente antes de poder instalar la nueva versión.
+Spanish.ElevationRequestFailMessage=No se puede desinstalar la versión anterior de Rubberduck. Es posible que deba desinstalarlo directamente antes de poder instalar la nueva versión.
+Spanish.UseLegacyWorkloadCaption=Initial Configuration
+Spanish.UseLegacyWorkloadMessage=Planning to use Rubberduck with a large existing project?
+Spanish.UseLegacyWorkloadDescription=Using 'legacy workload' default initial configuration disables autocompletion features and a number of specific inspections to help performance and reduce memory pressure. Disabled features can be re-enabled any time from the Settings menu.
+Spanish.UseLegacyWorkloadButtonCaption=Use legacy workload configuration

Rubberduck.Deployment/InnoSetup/Rubberduck.Installer.Build.iss

@@ -104,6 +104,9 @@ Source: "{#GraphicsDir}Ducky.ico"; DestDir: "{group}"; Attribs: hidden system; F
 Source: "{#IncludesDir}Rubberduck.RegisterAddIn.bat"; DestDir: "{app}"; Flags: ignoreversion replacesameversion;
 Source: "{#IncludesDir}Rubberduck.RegisterAddIn.reg"; DestDir: "{app}"; Flags: ignoreversion replacesameversion;
 
+; 'LegacyWorkload' initial configuration (disables autocompletion and inspections that could spawn too many results in legacy code)
+Source: "\WorkloadConfigs\Legacy\rubberduck.config"; DestDir: "{userappdata}\{#AppName}"; Check: UseLegacyWorkloadConfig;
+
 [Registry]
 ; DO NOT attempt to register VBE Add-In with this section. It doesn't work
 ; Use [Code] section (RegisterAddIn procedure) to register the entries instead.
@@ -189,6 +192,13 @@ var
   ///</remakrs>
   RegisterAddInOptionPage: TInputOptionWizardPage;
 
+  ///<remarks>
+  ///Custom page to indicate whether the installer should copy the 'legacy workload'
+  ///initial configuration file to disable certain features and inspections.
+  ///<see cref="RegisterAddIn" />
+  ///</remakrs>
+  WorkloadOptionPage: TInputOptionWizardPage;
+
   ///<remarks>
   ///Set by the <see cref="RegisterAddInOptionPage" />; should be
   ///read-only normally. When set to true, it is used to check if
@@ -215,6 +225,11 @@ var
   ///</remarks>
   PerUserOnly : Boolean;
 
+  ///<remarks>
+  ///Indicates that the installer should copy the 'legacy workload' initial configuration file.
+  ///</remarks>
+  UseLegacyWorkloadConfig : Boolean;
+
 // External functions section
 
 ///<remarks>
@@ -547,10 +562,9 @@ begin
 end;
 
 ///<remarks>
-///Called after successfully installing, including via the elevated installer
-///to register the VBE addin.
+///Called after successfully installing, including via the elevated installer to register the VBE addin.
 ///</remarks>
-procedure RegisterAddin();
+procedure RegisterAddIn();
 begin
     if IsWin64() then
     begin
@@ -566,7 +580,7 @@ begin
 end;
 
 ///<remarks>
-///Delete registry keys created by <see cref="RegisterAddin" />
+///Delete registry keys created by <see cref="RegisterAddIn" />
 ///</remarks>
 procedure UnregisterAddin();
 begin
@@ -837,10 +851,9 @@ end;
 ///The second event of installer allow us to customize the wizard by
 ///assessing whether we were launched in elevated context from an
 ///non-elevated installer; <see cref="HasElevateSwitch" />. We then
-///set up the <see cref="InstallForWhoOptionPage" /> and
-///<see cref="RegisterAddInOptionPage" /> pages. In both cases, their
-///behavior differs depending on whether we are elevated, and need to be
-///configured accordingly.
+///set up the custom installer pages. In the case of <see cref="InstallForWhoOptionPage" /> and
+///<see cref="RegisterAddInOptionPage" />, their behavior differs depending on whether we are elevated, 
+///and need to be configured accordingly.
 ///</remarks>
 procedure InitializeWizard();
 begin
@@ -888,6 +901,20 @@ begin
 
   RegisterAddInOptionPage.Add(ExpandConstant('{cm:RegisterAddInButtonCaption}'));
   RegisterAddInOptionPage.Values[0] := true;
+
+  WorkloadOptionPage :=
+    CreateInputOptionPage(
+        wpInstalling,
+        ExpandConstant('{cm:UseLegacyWorkloadCaption}'),
+        ExpandConstant('{cm:UseLegacyWorkloadMessage}'),
+        ExpandConstant('{cm:UseLegacyWorkloadDescription}'),
+        false, false);
+
+  WorkloadOptionPage.Add(ExpandConstant('{cm:UseLegacyWorkloadButtonCaption}'))    
+  WorkloadOptionPage.Values[0] := false;
+
+
+
 end;
 
 ///<remarks>
@@ -983,6 +1010,7 @@ begin
     Log(Format('AppSuffix: %s', [GetAppSuffix()]));
     Log(Format('ShouldCreateUninstaller: %d', [ShouldCreateUninstaller()]));
     Log(Format('ShouldInstallAllUsers variable: %d', [ShouldInstallAllUsers]));
+    Log(Format('UseLegacyWorkloadConfig variable: %d', [UseLegacyWorkloadConfig]));
 
     if not IsElevated() and ShouldInstallAllUsers then
     begin
@@ -1066,7 +1094,16 @@ begin
     begin
       Log('Addin registration was declined because the user unchecked the checkbox');
     end;
+  end
+    else if CurPageID = WorkloadOptionPage.ID then
+  begin
+    Log('Legacy workload initial config was requested and will be copied to the destination folder.');
+  end
+    else
+  begin
+    Log('Skipping legacy workload config because the option was left unchecked.');
   end;
+  ;
 
   // Re-enable the button disabled at start of procedure
   Wizardform.NextButton.Enabled := True;