Display notifications about backups

Author: Strappazzon

src/GHOSTbackup/GHOSTbackup.Helpers/BackupHelper.vb

@@ -123,10 +123,12 @@ Public Class BackupHelper
                 Form1.LatestBackupHelpLabel.Location = New Point(300, 14)
 
                 Logger.Log("[INFO] Performed the first backup " & "(" & SavegamesList.Length & " files copied to " & BackupDirectory & ").")
+                Notification.Show("Performed first backup.")
 
             Catch ex As Exception
                 StopBackup()
                 Logger.Log("[ERROR] Backup interrupted: " & ex.Message())
+                Notification.Show("Backup interrupted because an error occurred.")
                 CustomMsgBox.Show("{\rtf1 The backup process has been {\b interrupted due to an error.} Please check the logs for more details.}", "Backup interrupted", MessageBoxButtons.OKCancel, MessageBoxIcon.Error)
             End Try
         ElseIf IsGameRunning = False Then
@@ -155,10 +157,12 @@ Public Class BackupHelper
                 Form1.LatestBackupHelpLabel.Location = New Point(300, 14)
 
                 Logger.Log("[INFO] Backup complete " & "(" & SavegamesList.Length & " files copied to " & BackupDirectory & ").")
+                Notification.Show("Backup complete.")
 
             Catch ex As Exception
                 StopBackup()
                 Logger.Log("[ERROR] Backup interrupted: " & ex.Message())
+                Notification.Show("Backup interrupted because an error occurred.")
                 CustomMsgBox.Show("{\rtf1 The backup process has been {\b interrupted due to an error.} Please check the logs for more details.}", "Backup interrupted", MessageBoxButtons.OKCancel, MessageBoxIcon.Error)
             End Try
         Else

src/GHOSTbackup/GHOSTbackup.Helpers/Settings.vb

@@ -27,6 +27,7 @@ Public Class Settings
             ConfigData("Backup")("SavegamesDirectory") = Nothing
             ConfigData("Backup")("BackupDirectory") = Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) & "\GHOSTbackup\Savegames"
             ConfigData("Backup")("BackupFrequency") = "5"
+            ConfigData("Backup")("DisplayNotification") = "False"
             ConfigData("Backup")("WhichBackupToRestore") = "0" '0=Latest, 1=Second-to-Last, 2=Let me decide
             'Uplay
             ConfigData("Uplay")("DisableCloudSyncOnRestore") = "False"
@@ -60,6 +61,7 @@ Public Class Settings
             Form1.SavegamesLocTextBox.Text = SavegamesDirectory()
             Form1.BackupLocTextBox.Text = BackupDirectory()
             Form1.BackupFreqUpDown.Value = BackupFrequency()
+            Form1.DisplayNotificationChkBox.Checked = DisplayNotification()
             Form1.WhichBackupDropdownCombo.SelectedIndex = WhichBackupToRestore()
             'Uplay
             Form1.DisableCloudSyncChkBox.Checked = DisableCloudSyncOnRestore()
@@ -87,6 +89,7 @@ Public Class Settings
         ConfigData("Backup")("SavegamesDirectory") = Form1.SavegamesLocTextBox.Text
         ConfigData("Backup")("BackupDirectory") = Form1.BackupLocTextBox.Text
         ConfigData("Backup")("BackupFrequency") = Form1.BackupFreqUpDown.Value
+        ConfigData("Backup")("DisplayNotification") = Form1.DisplayNotificationChkBox.Checked
         ConfigData("Backup")("WhichBackupToRestore") = Form1.WhichBackupDropdownCombo.SelectedIndex
         'Uplay
         ConfigData("Uplay")("DisableCloudSyncOnRestore") = Form1.DisableCloudSyncChkBox.Checked
@@ -214,6 +217,17 @@ Public Class Settings
         End If
     End Function
 
+    Private Shared Function DisplayNotification() As Boolean
+        Dim ConfigData As IniData = ConfigParser.ReadFile(SettingsFile)
+
+        Dim Value As String = ConfigData("Backup")("DisplayNotification")
+        If Value <> Nothing Then
+            Return Boolean.Parse(Value)
+        Else
+            Return False
+        End If
+    End Function
+
     Private Shared Function WhichBackupToRestore() As Integer
         Dim ConfigData As IniData = ConfigParser.ReadFile(SettingsFile)
 

src/GHOSTbackup/GHOSTbackup.UI/Banner.vb

@@ -18,12 +18,13 @@
         Form1.LogoBigPictureBox.Location = New Point(12, 115)
         Form1.PlayGameBtn.Location = New Point(12, 180)
         'Move checkboxes
-        Form1.ConfirmExitChkBox.Location = New Point(14, 255)
-        Form1.ConfirmStopBackupChkBox.Location = New Point(14, 280)
-        Form1.DisableCloudSyncChkBox.Location = New Point(14, 305)
-        Form1.EnableCloudSyncChkBox.Location = New Point(14, 330)
-        Form1.CheckUpdatesChkBox.Location = New Point(14, 355)
-        Form1.RememberFormPositionChkBox.Location = New Point(14, 380)
+        Form1.ConfirmExitChkBox.Location = New Point(14, 250)
+        Form1.ConfirmStopBackupChkBox.Location = New Point(14, 275)
+        Form1.DisplayNotificationChkBox.Location = New Point(14, 300)
+        Form1.DisableCloudSyncChkBox.Location = New Point(14, 325)
+        Form1.EnableCloudSyncChkBox.Location = New Point(14, 350)
+        Form1.CheckUpdatesChkBox.Location = New Point(14, 375)
+        Form1.RememberFormPositionChkBox.Location = New Point(14, 400)
         'Center alert icon and message
         Form1.AlertDescriptionLabel.Location = New Point(Form1.AlertContainer.Width / 2 - Form1.AlertDescriptionLabel.Width / 2, Form1.AlertContainer.Height / 2 - Form1.AlertDescriptionLabel.Height / 2)
         Form1.AlertIcon.Location = New Point(Form1.AlertContainer.Width / 2 - Form1.AlertDescriptionLabel.Width / 2 - 28, Form1.AlertContainer.Height / 2 - Form1.AlertIcon.Height / 2)

src/GHOSTbackup/GHOSTbackup.UI/Form1.Designer.vb

@@ -631,6 +631,9 @@
   <metadata name="EnableCloudSyncChkBox.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>
+  <metadata name="DisplayNotificationChkBox.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
+    <value>True</value>
+  </metadata>
   <metadata name="$this.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
     <value>True</value>
   </metadata>

src/GHOSTbackup/GHOSTbackup.UI/Form1.resx

@@ -191,12 +191,13 @@ Public Class Form1
         LogoBigPictureBox.Location = New Point(12, 85)
         PlayGameBtn.Location = New Point(12, 150)
         'Move checkboxes
-        ConfirmExitChkBox.Location = New Point(14, 230)
-        ConfirmStopBackupChkBox.Location = New Point(14, 255)
-        DisableCloudSyncChkBox.Location = New Point(14, 280)
-        EnableCloudSyncChkBox.Location = New Point(14, 305)
-        CheckUpdatesChkBox.Location = New Point(14, 330)
-        RememberFormPositionChkBox.Location = New Point(14, 355)
+        ConfirmExitChkBox.Location = New Point(14, 225)
+        ConfirmStopBackupChkBox.Location = New Point(14, 250)
+        DisplayNotificationChkBox.Location = New Point(14, 275)
+        DisableCloudSyncChkBox.Location = New Point(14, 300)
+        EnableCloudSyncChkBox.Location = New Point(14, 325)
+        CheckUpdatesChkBox.Location = New Point(14, 350)
+        RememberFormPositionChkBox.Location = New Point(14, 375)
     End Sub
 
     Private Sub PlayGameBtn_Click(sender As Object, e As EventArgs) Handles PlayGameBtn.Click
@@ -219,6 +220,14 @@ Public Class Form1
         End If
     End Sub
 
+    Private Sub DisplayNotificationChkBox_CheckedChanged(sender As Object, e As EventArgs) Handles DisplayNotificationChkBox.CheckedChanged
+        If DisplayNotificationChkBox.Checked = True Then
+            DisplayNotificationChkBox.ForeColor = Color.White
+        Else
+            DisplayNotificationChkBox.ForeColor = Color.FromArgb(255, 85, 170, 255)
+        End If
+    End Sub
+
     Private Sub DisableCloudSyncChkBox_CheckedChanged(sender As Object, e As EventArgs) Handles DisableCloudSyncChkBox.CheckedChanged
         If DisableCloudSyncChkBox.Checked = True Then
             DisableCloudSyncChkBox.ForeColor = Color.White