dinlo
134 lines
3.7 KiB
NSIS
134 lines
3.7 KiB
NSIS
!include FileFunc.nsh
|
||
!include UAC.nsh
|
||
|
||
!define FOLDERID_UserProgramFiles {5CD7AEE2-2219-4A67-B85D-6C9CE15660CB}
|
||
!define KF_FLAG_CREATE 0x00008000
|
||
|
||
# allow user to define own custom
|
||
!define /ifndef INSTALL_REGISTRY_KEY "Software\${APP_GUID}"
|
||
!define /ifndef UNINSTALL_REGISTRY_KEY "Software\Microsoft\Windows\CurrentVersion\Uninstall\${UNINSTALL_APP_KEY}"
|
||
|
||
# current Install Mode ("all" or "CurrentUser")
|
||
Var installMode
|
||
|
||
!ifndef INSTALL_MODE_PER_ALL_USERS
|
||
!ifndef ONE_CLICK
|
||
Var hasPerUserInstallation
|
||
Var hasPerMachineInstallation
|
||
!endif
|
||
Var PerUserInstallationFolder
|
||
|
||
!macro setInstallModePerUser
|
||
StrCpy $installMode CurrentUser
|
||
SetShellVarContext current
|
||
|
||
# сhecks registry for previous installation path
|
||
ReadRegStr $perUserInstallationFolder HKCU "${INSTALL_REGISTRY_KEY}" InstallLocation
|
||
${if} $perUserInstallationFolder != ""
|
||
StrCpy $INSTDIR $perUserInstallationFolder
|
||
${else}
|
||
StrCpy $0 "$LocalAppData\Programs"
|
||
System::Store S
|
||
# Win7 has a per-user programfiles known folder and this can be a non-default location
|
||
System::Call 'SHELL32::SHGetKnownFolderPath(g "${FOLDERID_UserProgramFiles}", i ${KF_FLAG_CREATE}, p 0, *p .r2)i.r1'
|
||
${If} $1 == 0
|
||
System::Call '*$2(&w${NSIS_MAX_STRLEN} .s)'
|
||
StrCpy $0 $1
|
||
System::Call 'OLE32::CoTaskMemFree(p r2)'
|
||
${endif}
|
||
System::Store L
|
||
StrCpy $INSTDIR "$0\${APP_FILENAME}"
|
||
${endif}
|
||
|
||
# allow /D switch to override installation path https://github.com/electron-userland/electron-builder/issues/1551
|
||
!insertmacro GetDParameter $R0
|
||
${If} $R0 != ""
|
||
StrCpy $INSTDIR $R0
|
||
${endif}
|
||
|
||
!macroend
|
||
!endif
|
||
|
||
!ifdef INSTALL_MODE_PER_ALL_USERS_REQUIRED
|
||
Var perMachineInstallationFolder
|
||
|
||
!macro setInstallModePerAllUsers
|
||
StrCpy $installMode all
|
||
SetShellVarContext all
|
||
|
||
!ifdef BUILD_UNINSTALLER
|
||
${IfNot} ${UAC_IsAdmin}
|
||
ShowWindow $HWNDPARENT ${SW_HIDE}
|
||
!insertmacro UAC_RunElevated
|
||
Quit
|
||
${endif}
|
||
!endif
|
||
|
||
# сheck registry for previous installation path
|
||
ReadRegStr $perMachineInstallationFolder HKLM "${INSTALL_REGISTRY_KEY}" InstallLocation
|
||
${if} $perMachineInstallationFolder != ""
|
||
StrCpy $INSTDIR $perMachineInstallationFolder
|
||
${else}
|
||
StrCpy $0 "$PROGRAMFILES"
|
||
!ifdef APP_64
|
||
${if} ${RunningX64}
|
||
StrCpy $0 "$PROGRAMFILES64"
|
||
${endif}
|
||
!endif
|
||
|
||
!ifdef MENU_FILENAME
|
||
StrCpy $0 "$0\${MENU_FILENAME}"
|
||
!endif
|
||
|
||
StrCpy $INSTDIR "$0\${APP_FILENAME}"
|
||
${endif}
|
||
|
||
# allow /D switch to override installation path https://github.com/electron-userland/electron-builder/issues/1551
|
||
!insertmacro GetDParameter $R0
|
||
${If} $R0 != ""
|
||
StrCpy $INSTDIR $R0
|
||
${endif}
|
||
|
||
!macroend
|
||
!endif
|
||
|
||
# Custom function to handle /D parameter with spaces
|
||
# The /D parameter is special in NSIS - it must be the last parameter and cannot have quotes
|
||
# Use StdUtils.GetParameter to get the full command line, then parse /D= manually
|
||
!macro GetDParameter outVar
|
||
Push $R8
|
||
Push $R9
|
||
Push $R7
|
||
Push $R6
|
||
Push $R5
|
||
|
||
# Get the complete command line using StdUtils (including /D parameter)
|
||
${StdUtils.GetAllParameters} $R8 "0"
|
||
|
||
# Initialize result
|
||
StrCpy $R9 ""
|
||
|
||
# Search for /D= or /d= using a simple loop
|
||
StrLen $R7 $R8
|
||
IntOp $R7 $R7 - 2 # Don't check last 2 characters
|
||
StrCpy $R6 0
|
||
|
||
${Do}
|
||
StrCpy $R5 $R8 3 $R6 # Get 3 characters starting at position $R6
|
||
${If} $R5 == "/D="
|
||
${OrIf} $R5 == "/d="
|
||
# Found /D= or /d=, extract everything after it
|
||
IntOp $R6 $R6 + 3
|
||
StrCpy $R9 $R8 "" $R6
|
||
${Break}
|
||
${EndIf}
|
||
IntOp $R6 $R6 + 1
|
||
${LoopUntil} $R6 > $R7
|
||
|
||
StrCpy ${outVar} $R9
|
||
Pop $R5
|
||
Pop $R6
|
||
Pop $R7
|
||
Pop $R9
|
||
Pop $R8
|
||
!macroend |