- WinSETUP: The VBS custom action should delete the existing

VBS script in the various uninstall modes.

    win_build/installerv2/redist/Windows/src/boinccas/
        boinccas.rc
        CACreateVBSShortcut.cpp, .h
    win_build/installerv2/redist/Windows/Win32/
        boinccas.dll
        boinccas95.dll
    win_build/installerv2/redist/Windows/x64/
        boinccas.dll
        boinccas95.dll

svn path=/trunk/boinc/; revision=12842

checkin_notes

@@ -5856,3 +5856,18 @@ Charlie 6 June 2007
     mac_build/
         boinc.xcodeproj/
             project.pbxproj
+
+Rom    6 June 2007
+    - WinSETUP: The VBS custom action should delete the existing
+        VBS script in the various uninstall modes.
+
+    win_build/installerv2/redist/Windows/src/boinccas/
+        boinccas.rc
+        CACreateVBSShortcut.cpp, .h
+    win_build/installerv2/redist/Windows/Win32/
+        boinccas.dll
+        boinccas95.dll
+    win_build/installerv2/redist/Windows/x64/
+        boinccas.dll
+        boinccas95.dll
+

clientgui/ProjectInfoPage.cpp

@@ -271,6 +271,11 @@ void CProjectInfoPage::OnPageChanged( wxWizardExEvent& event ) {
  */
 
 void CProjectInfoPage::OnPageChanging( wxWizardExEvent& event ) {
+
+    // Delete all existing entries
+    //
+    m_pProjectListCtrl->DeleteAllEntries();
+
     event.Skip();
 }
 

win_build/installerv2/redist/Windows/src/boinccas/CACreateVBSShortcut.cpp

@@ -121,6 +121,141 @@ UINT CACreateVBSShortcut::OnExecution()
 }
 
 
+/////////////////////////////////////////////////////////////////////
+// 
+// Function:    
+//
+// Description: 
+//
+/////////////////////////////////////////////////////////////////////
+UINT CACreateVBSShortcut::OnUninstall()
+{
+    tstring     strAllUsers;
+    tstring     strVBSScript;
+    tstring     strEnableLaunchAtLogon;
+	TCHAR		szBuffer[MAX_PATH];
+    UINT        uiReturnValue = -1;
+
+
+    uiReturnValue = GetProperty( _T("ALLUSERS"), strAllUsers );
+    if ( uiReturnValue ) return uiReturnValue;
+
+    uiReturnValue = GetProperty( _T("ENABLELAUNCHATLOGON"), strEnableLaunchAtLogon );
+    if ( uiReturnValue ) return uiReturnValue;
+
+    // Fix for Win9x systems
+    if (_T("1") != strEnableLaunchAtLogon) {
+        return ERROR_SUCCESS;
+    }
+
+    // Find the correct startup directory.
+    if (_T("1") == strAllUsers) {
+        SHGetFolderPath(NULL, CSIDL_COMMON_STARTUP|CSIDL_FLAG_CREATE, NULL, SHGFP_TYPE_CURRENT, szBuffer);
+    } else {
+        SHGetFolderPath(NULL, CSIDL_STARTUP|CSIDL_FLAG_CREATE, NULL, SHGFP_TYPE_CURRENT, szBuffer);
+    }
+
+    // Open the file for writing
+    strVBSScript =  szBuffer;
+    strVBSScript += _T("\\BOINC Manager.vbs");
+
+    // Uninstall operation
+    DeleteFile(strVBSScript.c_str());
+
+    return ERROR_SUCCESS;
+}
+
+
+/////////////////////////////////////////////////////////////////////
+// 
+// Function:    
+//
+// Description: 
+//
+/////////////////////////////////////////////////////////////////////
+UINT CACreateVBSShortcut::OnRollbackUninstall()
+{
+    tstring     strAllUsers;
+    tstring     strVBSScript;
+    tstring     strEnableLaunchAtLogon;
+	TCHAR		szBuffer[MAX_PATH];
+    UINT        uiReturnValue = -1;
+
+
+    uiReturnValue = GetProperty( _T("ALLUSERS"), strAllUsers );
+    if ( uiReturnValue ) return uiReturnValue;
+
+    uiReturnValue = GetProperty( _T("ENABLELAUNCHATLOGON"), strEnableLaunchAtLogon );
+    if ( uiReturnValue ) return uiReturnValue;
+
+    // Fix for Win9x systems
+    if (_T("1") != strEnableLaunchAtLogon) {
+        return ERROR_SUCCESS;
+    }
+
+    // Find the correct startup directory.
+    if (_T("1") == strAllUsers) {
+        SHGetFolderPath(NULL, CSIDL_COMMON_STARTUP|CSIDL_FLAG_CREATE, NULL, SHGFP_TYPE_CURRENT, szBuffer);
+    } else {
+        SHGetFolderPath(NULL, CSIDL_STARTUP|CSIDL_FLAG_CREATE, NULL, SHGFP_TYPE_CURRENT, szBuffer);
+    }
+
+    // Open the file for writing
+    strVBSScript =  szBuffer;
+    strVBSScript += _T("\\BOINC Manager.vbs");
+
+    // Uninstall operation
+    DeleteFile(strVBSScript.c_str());
+
+    return ERROR_SUCCESS;
+}
+
+
+/////////////////////////////////////////////////////////////////////
+// 
+// Function:    
+//
+// Description: 
+//
+/////////////////////////////////////////////////////////////////////
+UINT CACreateVBSShortcut::OnCommitUninstall()
+{
+    tstring     strAllUsers;
+    tstring     strVBSScript;
+    tstring     strEnableLaunchAtLogon;
+	TCHAR		szBuffer[MAX_PATH];
+    UINT        uiReturnValue = -1;
+
+
+    uiReturnValue = GetProperty( _T("ALLUSERS"), strAllUsers );
+    if ( uiReturnValue ) return uiReturnValue;
+
+    uiReturnValue = GetProperty( _T("ENABLELAUNCHATLOGON"), strEnableLaunchAtLogon );
+    if ( uiReturnValue ) return uiReturnValue;
+
+    // Fix for Win9x systems
+    if (_T("1") != strEnableLaunchAtLogon) {
+        return ERROR_SUCCESS;
+    }
+
+    // Find the correct startup directory.
+    if (_T("1") == strAllUsers) {
+        SHGetFolderPath(NULL, CSIDL_COMMON_STARTUP|CSIDL_FLAG_CREATE, NULL, SHGFP_TYPE_CURRENT, szBuffer);
+    } else {
+        SHGetFolderPath(NULL, CSIDL_STARTUP|CSIDL_FLAG_CREATE, NULL, SHGFP_TYPE_CURRENT, szBuffer);
+    }
+
+    // Open the file for writing
+    strVBSScript =  szBuffer;
+    strVBSScript += _T("\\BOINC Manager.vbs");
+
+    // Uninstall operation
+    DeleteFile(strVBSScript.c_str());
+
+    return ERROR_SUCCESS;
+}
+
+
 /////////////////////////////////////////////////////////////////////
 // 
 // Function:    CreateVBSShortcut

win_build/installerv2/redist/Windows/src/boinccas/CACreateVBSShortcut.h

@@ -29,7 +29,9 @@ public:
     CACreateVBSShortcut(MSIHANDLE hMSIHandle);
     ~CACreateVBSShortcut();
     virtual UINT OnExecution();
-
+    virtual UINT OnUninstall();
+    virtual UINT OnRollbackUninstall();
+    virtual UINT OnCommitUninstall();
 };
 
 

win_build/installerv2/redist/Windows/src/boinccas/boinccas.rc

@@ -53,8 +53,8 @@ END
 //
 
 VS_VERSION_INFO VERSIONINFO
- FILEVERSION 1,0,0,29
- PRODUCTVERSION 1,0,0,29
+ FILEVERSION 1,0,0,30
+ PRODUCTVERSION 1,0,0,30
  FILEFLAGSMASK 0x17L
 #ifdef _DEBUG
  FILEFLAGS 0x1L
@@ -70,12 +70,12 @@ BEGIN
         BLOCK "040904b0"
         BEGIN
             VALUE "FileDescription", "BOINC Dynamic Link Library"
-            VALUE "FileVersion", "1.0.0.29"
+            VALUE "FileVersion", "1.0.0.30"
             VALUE "InternalName", "BOINC"
             VALUE "LegalCopyright", "Copyright (C) 2005-2007"
             VALUE "OriginalFilename", "BOINC.dll"
             VALUE "ProductName", " BOINC Dynamic Link Library"
-            VALUE "ProductVersion", "1.0.0.29"
+            VALUE "ProductVersion", "1.0.0.30"
         END
     END
     BLOCK "VarFileInfo"