From b49f8894e1ea587f30106ebda80e7baf7aa41f3c Mon Sep 17 00:00:00 2001 From: pca Date: Tue, 8 Mar 2011 19:07:22 +0000 Subject: Add check for hard drive and free space to Windows-Installer git-svn-id: https://svn.berlios.de/svnroot/repos/yacy/trunk@7568 6c8d7289-2bf4-0310-a012-ef5d649a1542 --- build.nsi | 78 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++-- 1 file changed, 76 insertions(+), 2 deletions(-) (limited to 'build.nsi') diff --git a/build.nsi b/build.nsi index ef4975732..ae392f378 100755 --- a/build.nsi +++ b/build.nsi @@ -18,6 +18,7 @@ COMMAND LINE OPTIONS (case sensitive): !include MUI2.nsh !include x64.nsh +!include FileFunc.nsh ; ---------------------------------------- ; GENERAL @@ -36,6 +37,9 @@ OutFile "RELEASE\WINDOWS\yacy_v@REPL_VERSION@_@REPL_DATE@_@REPL_REVISION_NR@.exe InstallDir "$PROFILE\YaCy" InstallDirRegKey HKCU "Software\Microsoft\Windows\CurrentVersion\Uninstall\YaCy" "UninstallString" +;recommend free space in GB for YaCy +!define RecommendSpace "30" + ;requested execution level on Vista / 7 RequestExecutionLevel admin @@ -48,7 +52,7 @@ SetCompressor /SOLID LZMA !define JRE_VERSION6 "1.6" ;!define JRE_32 "http://javadl.sun.com/webapps/download/AutoDL?BundleId=37718" ;jre-6u18-windows-i586.exe -;!define JRE_64 "http://javadl.sun.com/webapps/download/AutoDL?BundleId=37401" ;jre-6u18-windows-x64.exe +;!define JRE_64 "http://javadl.sun.com/webapps/download/AutoDL?BundleId=37401" ;jre-6u18-windows-x64.exe !define JRE_32 "http://yacy.berlios.de/download.php?what=jre&version=32&yacyrevnr=@REPL_REVISION_NR@" !define JRE_64 "http://yacy.berlios.de/download.php?what=jre&version=64&yacyrevnr=@REPL_REVISION_NR@" @@ -79,6 +83,7 @@ BrandingText "yacy.net" !insertmacro MUI_PAGE_COMPONENTS ComponentText "YaCy v@REPL_VERSION@ (Build @REPL_DATE@)" +!define MUI_PAGE_CUSTOMFUNCTION_LEAVE CheckDriveSpace !insertmacro MUI_PAGE_DIRECTORY !insertmacro MUI_PAGE_INSTFILES @@ -105,16 +110,22 @@ LangString stillRunning ${LANG_ENGLISH} "YaCy is still active. Please stop YaCy LangString keepData 0 "Do you want to keep the data?" LangString noAdminForJava 0 "You need Administrator privileges to install Java. Java will now be downloaded to the shared documents folder. YaCy won't run without Java." LangString finishPage 0 "Show how to configure the Windows Firewall for YaCy." +LangString yacyNoHd 0 "YaCy should be installed on a hard disk. Continue with selected folder?" +LangString yacyNeedSpace 0 "We recommend ${RecommendSpace} GB free space for YaCy. There are only $TempDriveFree GB left. Continue anyway?" LangString stillRunning ${LANG_FRENCH} "YaCy is still active. Please stop YaCy first." LangString keepData 0 "Do you want to keep the data?" LangString noAdminForJava 0 "You need Administrator privileges to install Java. Java will now be downloaded to the shared documents folder. YaCy won't run without Java." LangString finishPage 0 "Show how to configure the Windows Firewall for YaCy." +LangString yacyNoHd 0 "YaCy should be installed on a hard disk. Continue with selected folder?" +LangString yacyNeedSpace 0 "We recommend ${RecommendSpace} GB free space for YaCy. There are only $TempDriveFree GB left. Continue anyway?" LangString stillRunning ${LANG_GERMAN} "YaCy ist noch aktiv. Bitte beenden Sie YaCy." LangString keepData 0 "Moechten Sie die Daten behalten?" LangString noAdminForJava 0 "Sie benoetigen Administrator-Rechte um Java zu installieren. Java wird nun in 'Gemeinsame Dokumente' gespeichert. YaCy benoetigt Java zur Ausfuehrung." LangString finishPage 0 "Zeige die Windows Firewall Konfiguration fuer YaCy." +LangString yacyNoHd 0 "YaCy sollte auf einer Festplatte installiert werden. Soll der gewaehlte Ordner trotzdem verwendet werden?" +LangString yacyNeedSpace 0 "Wir empfehlen ${RecommendSpace} GB fuer YaCy. Es sind noch $TempDriveFree GB frei. Trotzdem fortfahren?" ; ---------------------------------------- ; INSTALLABLE MODULES @@ -249,4 +260,67 @@ Function DetectJRE StrCmp $2 ${JRE_VERSION6} doneDetectJRE Call GetJRE doneDetectJRE: -FunctionEnd +FunctionEnd + +Function CheckDriveSpace + var /global RootFolder + var /global TempDriveFree + var /global RootFolderType + +; If "\\Folder" it's a Network-Folder + StrCpy $RootFolder $InstDir 2 + StrCmp $RootFolder "\\" NetworkFolder Driveletter + + Networkfolder: +; prepare String for DriveSpace + ${GetRoot} $RootFolder $InstDir + goto NoHDD + +; Now check drive-letters + Driveletter: + StrCpy $RootFolder $InstDir 3 + +; prepare for {GetDrives-Loop} + StrCpy $RootFolderType "invalid" + ${GetDrives} "ALL" "CheckDriveType" + +; jump if error + StrCmp $RootFolderType "invalid" CheckSpace + +; jump if HDD + StrCmp $RootFolderType "HDD" CheckSpace + + NoHDD: +; Stay on folder-selection if user wants to give another folder, else check free space + MessageBox MB_ICONEXCLAMATION|MB_YESNO "$(yacyNoHd)" IDYES NextPage + Abort + + CheckSpace: + + ClearErrors + ${DriveSpace} $RootFolder "/D=F /S=G" $TempDriveFree +; If DriveSpace fails for any reason -> jump ahead + IfErrors NextPage + + ${If} $TempDriveFree < ${RecommendSpace} + MessageBox MB_ICONEXCLAMATION|MB_YESNO "$(yacyNeedSpace)" IDYES NextPage + Abort + ${EndIf} + +; IntCmp $TempDriveFree ${RecommendSpace} EnoughSpace LowSpace EnoughSpace + +; LowSpace: +; MessageBox MB_ICONEXCLAMATION|MB_YESNO "$(yacyNeedSpace)" IDYES NextPage +; Abort + +; EnoughSpace: + NextPage: +FunctionEnd + +Function CheckDriveType +; based on http://nsis.sourceforge.net/GetDrives + StrCmp $9 $RootFolder 0 +3 + StrCpy $RootFolderType $8 + StrCpy $0 StopGetDrives + Push $0 +FunctionEnd -- cgit v1.2.3