private void OnDownloadComplete(object sender, AsyncCompletedEventArgs e)
{
_sw.Stop();
Cursor.Current = Cursors.Default;
progressBar1.Value = 100;
if (e.Cancelled)
{
RegistryHelper.WriteAction($"Downloading of {_downloadSource} was Cancelled");
Information.Text = $"Downloading of {_downloadSource} was Cancelled";
_state = State.Done;
}
else if (e.Error != null)
{
RegistryHelper.WriteAction($"Error downloading {_downloadSource} Exception: {e.Error.Message}");
_retryCount++;
if (_retryCount > 3)
{
Information.Text = $"Too many errors downloading {_downloadSource}, please check your internet connection and try again!";
Action.Text = "Exit";
_state = State.Done;
}
else
{
_state = _previousState;
}
}
else
{
_webClient.DownloadProgressChanged -= OnDownloadProgressChanged;
_webClient.DownloadFileCompleted -= OnDownloadComplete;
_webClient.Dispose();
_webClient = null;
FileInfo fi = new FileInfo(_downloadedFile);
if (fi.Length == 0)
{
_retryCount++;
if (_retryCount > 3)
{
Information.Text = $"Too many errors downloading {_downloadSource}, please check your internet connection and try again!";
Action.Text = "Exit";
_state = State.Done;
}
else
{
_state = _previousState;
}
}
else
{
RegistryHelper.WriteAction($"Downloading of {_downloadSource} took {_sw.ElapsedMilliseconds.ToString("#,##0", CultureInfo.InvariantCulture)}ms");
double seconds = _sw.ElapsedMilliseconds / 1000.0;
double kiloBytes = fi.Length / 1024.0;
double speed = kiloBytes / seconds / 1000.0;
RegistryHelper.WriteAction($"Download speed {speed.ToString("#,##0.000", CultureInfo.InvariantCulture)}MiB/s");
switch (_state)
{
case State.WaitingForVstoDownload:
_state = State.InstallVsto;
break;
case State.WaitingForChem4WordDownload:
_state = State.InstallChem4Word;
break;
}
}
}
}
private void HandleNextState()
{
switch (_state)
{
case State.DownloadVsto:
// Download VSTO
RegistryHelper.WriteAction("Downloading VSTO");
Information.Text = "Downloading VSTO ...";
VstoInstalled.Indicator = Properties.Resources.Downloading;
if (DownloadFile(ChangeDomain(VstoInstaller)))
{
_previousState = _state;
_state = State.WaitingForVstoDownload;
}
else
{
VstoInstalled.Indicator = Properties.Resources.No;
Information.Text = $"Error downloading VSTO; {Information.Text}";
Action.Text = "Exit";
_state = State.Done;
}
break;
case State.WaitingForVstoDownload:
break;
case State.InstallVsto:
// Install VSTO
RegistryHelper.WriteAction("Installing VSTO");
Information.Text = "Installing VSTO ...";
try
{
VstoInstalled.Indicator = Properties.Resources.Runing;
_state = State.WaitingForInstaller;
int exitCode = RunProcess(_downloadedFile, "/passive /norestart");
RegistryHelper.WriteAction($"VSTO ExitCode: {exitCode}");
switch (exitCode)
{
case 0: // Success.
case 1641: // Success - Reboot started.
case 3010: // Success - Reboot required.
VstoInstalled.Indicator = Properties.Resources.Yes;
_retryCount = 0;
_state = State.DownloadChem4Word;
break;
default:
VstoInstalled.Indicator = Properties.Resources.No;
Information.Text = $"Error installing VSTO; ExitCode: {exitCode}";
Action.Text = "Exit";
_state = State.Done;
break;
}
}
catch (Exception ex)
{
Information.Text = ex.Message;
Debug.WriteLine(ex.Message);
Action.Text = "Exit";
Action.Enabled = true;
timer1.Enabled = false;
_state = State.Done;
}
break;
case State.DownloadChem4Word:
// Download Chem4Word
RegistryHelper.WriteAction($"Downloading {_latestVersion}");
Information.Text = "Downloading Chem4Word ...";
AddInInstalled.Indicator = Properties.Resources.Downloading;
if (DownloadFile(_latestVersion))
{
_previousState = _state;
_state = State.WaitingForChem4WordDownload;
}
else
{
AddInInstalled.Indicator = Properties.Resources.No;
Information.Text = $"Error downloading Chem4Word; {Information.Text}";
Action.Text = "Exit";
_state = State.Done;
}
break;
case State.WaitingForChem4WordDownload:
break;
case State.InstallChem4Word:
// Install Chem4Word
RegistryHelper.WriteAction("Installing Chem4Word");
Information.Text = "Installing Chem4Word ...";
try
{
AddInInstalled.Indicator = Properties.Resources.Runing;
_state = State.WaitingForInstaller;
int exitCode = RunProcess(_downloadedFile, "");
RegistryHelper.WriteAction($"Chem4Word ExitCode: {exitCode}");
if (exitCode == 0)
{
// Erase previously stored Update Checks
RegistryKey key = Registry.CurrentUser.OpenSubKey(RegistryKeyName, true);
if (key == null)
{
key = Registry.CurrentUser.CreateSubKey(RegistryKeyName);
}
if (key != null)
{
try
{
key.DeleteValue(RegistryLastCheckValueName);
key.DeleteValue(RegistryVersionsBehindValueName);
}
catch (Exception ex)
{
Debug.WriteLine(ex.Message);
}
}
progressBar1.Value = 0;
progressBar1.Maximum = 100;
progressBar1.Value = 100;
AddInInstalled.Indicator = Properties.Resources.Yes;
Information.Text = "Chem4Word successfully installed. Please start Microsoft Word, then select Chemistry Tab in ribbon";
Action.Text = "Finish";
}
else
{
AddInInstalled.Indicator = Properties.Resources.No;
Information.Text = $"Error installing Chem4Word; ExitCode: {exitCode}";
Action.Text = "Exit";
_state = State.Done;
}
}
catch (Exception ex)
{
Information.Text = ex.Message;
Debug.WriteLine(ex.Message);
Action.Text = "Exit";
}
Action.Enabled = true;
timer1.Enabled = false;
_state = State.Done;
break;
case State.WaitingForInstaller:
break;
case State.Done:
timer1.Enabled = false;
Action.Enabled = true;
break;
}
}
private void Setup_Load(object sender, EventArgs e)
{
Show();
Application.DoEvents();
bool isDesignTimeInstalled = false;
bool isRuntimeInstalled = false;
bool isWordInstalled = false;
bool isOperatinSystemWindows7Plus = false;
bool isChem4WordVersion2Installed = false;
bool isChem4WordVersion3Installed = false;
#region Detect Windows Version
OperatingSystem osVer = Environment.OSVersion;
// Check that OsVerion is greater or equal to 6.1
if (osVer.Version.Major >= 6 && osVer.Version.Minor >= 1)
{
// Running Windows 7 or Windows 2008 R2
isOperatinSystemWindows7Plus = true;
}
#endregion Detect Windows Version
WindowsInstalled.Indicator = isOperatinSystemWindows7Plus ? Properties.Resources.Windows : Properties.Resources.Halt;
Application.DoEvents();
#region Detect Word
isWordInstalled = OfficeHelper.GetWinWordVersion() >= 2010;
#endregion Detect Word
WordInstalled.Indicator = isWordInstalled ? Properties.Resources.Word : Properties.Resources.Halt;
Application.DoEvents();
#region .Net Framework
// HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\NDP
// Not sure if this can be done as this is a .Net 4.5.2 app !
#endregion .Net Framework
#region Detect Design Time VSTO
string feature = null;
try
{
feature =
Registry.GetValue(@"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\VSTO_DT\VS10\Feature", "", null)
.ToString();
}
catch
{
// Do Nothing
}
if (!string.IsNullOrEmpty(feature))
{
isDesignTimeInstalled = true;
}
#endregion Detect Design Time VSTO
#region Detect Runtime VSTO
string version = null;
try
{
version =
Registry.GetValue(@"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\VSTO Runtime Setup\v4R", "Version", null)
.ToString();
}
catch
{
// Do Nothing
}
if (string.IsNullOrEmpty(version))
{
try
{
version =
Registry.GetValue(@"HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\VSTO Runtime Setup\v4R", "Version", null)
.ToString();
}
catch
{
// Do Nothing
}
}
Version mimimumVersion = new Version("10.0.60724");
int result = -2;
if (!string.IsNullOrEmpty(version))
{
Version installedVersion = new Version(version);
result = installedVersion.CompareTo(mimimumVersion);
if (result >= 0)
{
isRuntimeInstalled = true;
}
}
// SOFTWARE\Microsoft\VSTO_DT\VS10\Feature
if (!isRuntimeInstalled)
{
version = "";
try
{
version =
Registry.GetValue(@"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\VSTO_DT\VS10\Feature", "", null)
.ToString();
}
catch
{
// Do Nothing
}
if (string.IsNullOrEmpty(version))
{
try
{
version =
Registry.GetValue(@"HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\VSTO_DT\VS10\Feature", "", null)
.ToString();
}
catch
{
// Do Nothing
}
}
if (!string.IsNullOrEmpty(version))
{
isRuntimeInstalled = true;
}
}
#endregion Detect Runtime VSTO
if (isDesignTimeInstalled || isRuntimeInstalled)
{
VstoInstalled.Indicator = Properties.Resources.Yes;
_state = State.DownloadChem4Word;
}
else
{
VstoInstalled.Indicator = Properties.Resources.Waiting;
_state = State.DownloadVsto;
}
Application.DoEvents();
#region Is Chem4Word Installed
isChem4WordVersion2Installed = FindOldVersion();
//isChem4WordVersion3Installed = FindCurrentVersion();
#endregion Is Chem4Word Installed
if (isOperatinSystemWindows7Plus && isWordInstalled)
{
if (isChem4WordVersion2Installed)
{
RegistryHelper.WriteAction("Old Version of Chem4Word detected");
AddInInstalled.Indicator = Properties.Resources.Halt;
AddInInstalled.Description = "Version 2 of Chem4Word detected";
Information.Text = "A previous version of Chem4Word has been detected, please uninstall it.";
Action.Text = "Cancel";
}
else if (isChem4WordVersion3Installed)
{
RegistryHelper.WriteAction("Version 3 of Chem4Word detected");
AddInInstalled.Indicator = Properties.Resources.Yes;
AddInInstalled.Description = "Version 3 of Chem4Word detected";
Information.Text = "Nothing to do.";
Action.Text = "Cancel";
}
else
{
AddInInstalled.Indicator = Properties.Resources.Waiting;
Application.DoEvents();
RegistryHelper.WriteAction("Downloading Chem4Word-Versions.xml");
var xml = GetVersionsXmlFile();
if (!string.IsNullOrEmpty(xml))
{
var x = XDocument.Parse(xml);
var versions = x.XPathSelectElements("//Version");
foreach (var element in versions)
{
if (string.IsNullOrEmpty(_latestVersion))
{
_latestVersion = element.Element("Url")?.Value;
RegistryHelper.WriteAction($"Latest version is {_latestVersion}");
}
break;
}
}
// Default to Specific Beta
if (string.IsNullOrEmpty(_latestVersion))
{
_latestVersion = ChangeDomain(DefaultMsiFile);
RegistryHelper.WriteAction($"Defaulting to {_latestVersion}");
}
}
}
else
{
if (!isWordInstalled)
{
WordInstalled.Indicator = Properties.Resources.No;
Information.Text = "Please install Microsoft Word 2010 or 2013 or 2016.";
}
if (!isOperatinSystemWindows7Plus)
{
WindowsInstalled.Indicator = Properties.Resources.No;
Information.Text = "This program requires Windows 7 or greater.";
}
VstoInstalled.Indicator = Properties.Resources.Halt;
AddInInstalled.Indicator = Properties.Resources.Halt;
Action.Text = "Cancel";
}
}
private string GetVersionsXmlFile()
{
string contents = null;
bool foundOurXmlFile = false;
foreach (var domain in Domains)
{
HttpClient client = new HttpClient();
string exceptionMessage;
try
{
RegistryHelper.WriteAction($"Looking for Chem4Word-Versions.xml at {domain}");
client.DefaultRequestHeaders.Add("user-agent", "Chem4Word Bootstrapper");
client.BaseAddress = new Uri(domain);
var response = client.GetAsync(VersionsFile).Result;
response.EnsureSuccessStatusCode();
Debug.Write(response.StatusCode);
string result = response.Content.ReadAsStringAsync().Result;
if (result.Contains(VersionsFileMarker))
{
foundOurXmlFile = true;
_domainUsed = domain;
contents = ChangeDomain(result);
}
else
{
RegistryHelper.WriteAction($"Chem4Word-Versions.xml at {domain} is corrupt");
}
}
catch (ArgumentNullException nex)
{
exceptionMessage = GetExceptionMessages(nex);
RegistryHelper.WriteAction($"ArgumentNullException: [{domain}] - {exceptionMessage}");
}
catch (HttpRequestException hex)
{
exceptionMessage = GetExceptionMessages(hex);
RegistryHelper.WriteAction($"HttpRequestException: [{domain}] - {exceptionMessage}");
}
catch (WebException wex)
{
exceptionMessage = GetExceptionMessages(wex);
RegistryHelper.WriteAction($"WebException: [{domain}] - {exceptionMessage}");
}
catch (Exception ex)
{
exceptionMessage = GetExceptionMessages(ex);
RegistryHelper.WriteAction($"Exception: [{domain}] - {exceptionMessage}");
}
finally
{
client.Dispose();
}
if (foundOurXmlFile)
{
break;
}
}
return(contents);
}
