|
17 | 17 |
|
18 | 18 | # Current Install Mode ("AllUsers" or "CurrentUser")
|
19 | 19 | Var MultiUser.InstallMode
|
20 |
| -Var HasPerUserInstallation ; 0 (false) or 1 (true) |
21 |
| -Var HasPerMachineInstallation ; 0 (false) or 1 (true) |
22 |
| -Var PerUserInstallationFolder |
23 |
| -Var PerMachineInstallationFolder |
24 | 20 |
|
25 |
| -# Sets install mode to "per-machine" (all users). |
26 |
| -!macro MULTIUSER_INSTALLMODE_ALLUSERS UNINSTALLER_PREFIX UNINSTALLER_FUNCPREFIX |
27 |
| - # Install mode initialization - per-machine |
28 |
| - StrCpy $MultiUser.InstallMode AllUsers |
| 21 | +!ifndef INSTALL_MODE_PER_ALL_USERS |
| 22 | + !ifndef ONE_CLICK |
| 23 | + Var HasPerUserInstallation ; 0 (false) or 1 (true) |
| 24 | + Var HasPerMachineInstallation ; 0 (false) or 1 (true) |
| 25 | + !endif |
| 26 | + Var PerUserInstallationFolder |
| 27 | + |
| 28 | + # Sets install mode to "per-user". |
| 29 | + !macro MULTIUSER_INSTALLMODE_CURRENTUSER UNINSTALLER_PREFIX UNINSTALLER_FUNCPREFIX |
| 30 | + StrCpy $MultiUser.InstallMode CurrentUser |
| 31 | + |
| 32 | + SetShellVarContext current |
| 33 | + |
| 34 | + !if "${UNINSTALLER_PREFIX}" != UN |
| 35 | + # http://www.mathiaswestin.net/2012/09/how-to-make-per-user-installation-with.html |
| 36 | + StrCpy $0 "$LocalAppData\Programs" |
| 37 | + # Win7 has a per-user programfiles known folder and this can be a non-default location |
| 38 | + System::Call 'Shell32::SHGetKnownFolderPath(g "${FOLDERID_UserProgramFiles}",i ${KF_FLAG_CREATE},i0,*i.r2)i.r1' |
| 39 | + ${If} $1 == 0 |
| 40 | + System::Call '*$2(&w${NSIS_MAX_STRLEN} .r1)' |
| 41 | + StrCpy $0 $1 |
| 42 | + System::Call 'Ole32::CoTaskMemFree(ir2)' |
| 43 | + ${EndIf} |
| 44 | + StrCpy $Instdir "$0\${PRODUCT_FILENAME}" |
| 45 | + !endif |
29 | 46 |
|
30 |
| - SetShellVarContext all |
| 47 | + # Checks registry for previous installation path (both for upgrading, reinstall, or uninstall) |
| 48 | + ReadRegStr $PerUserInstallationFolder HKCU "${INSTALL_REGISTRY_KEY}" InstallLocation |
| 49 | + ${if} $PerUserInstallationFolder != "" |
| 50 | + StrCpy $INSTDIR $PerUserInstallationFolder |
| 51 | + ${endif} |
31 | 52 |
|
32 |
| - !if "${UNINSTALLER_PREFIX}" != UN |
33 |
| - ;Set default installation location for installer |
34 |
| - StrCpy $INSTDIR "$PROGRAMFILES\${PRODUCT_FILENAME}" |
35 |
| - !endif |
| 53 | + !ifdef MULTIUSER_INSTALLMODE_${UNINSTALLER_PREFIX}FUNCTION |
| 54 | + Call "${MULTIUSER_INSTALLMODE_${UNINSTALLER_PREFIX}FUNCTION}" |
| 55 | + !endif |
| 56 | + !macroend |
36 | 57 |
|
37 |
| - ; Checks registry for previous installation path (both for upgrading, reinstall, or uninstall) |
38 |
| - ReadRegStr $PerMachineInstallationFolder HKLM "${INSTALL_REGISTRY_KEY}" InstallLocation |
39 |
| - ${if} $PerMachineInstallationFolder != "" |
40 |
| - StrCpy $INSTDIR $PerMachineInstallationFolder |
41 |
| - ${endif} |
| 58 | + Function MultiUser.InstallMode.CurrentUser |
| 59 | + !insertmacro MULTIUSER_INSTALLMODE_CURRENTUSER "" "" |
| 60 | + FunctionEnd |
42 | 61 |
|
43 |
| - !ifdef MULTIUSER_INSTALLMODE_${UNINSTALLER_PREFIX}FUNCTION |
44 |
| - Call "${MULTIUSER_INSTALLMODE_${UNINSTALLER_PREFIX}FUNCTION}" |
45 |
| - !endif |
46 |
| -!macroend |
| 62 | + Function un.MultiUser.InstallMode.CurrentUser |
| 63 | + !insertmacro MULTIUSER_INSTALLMODE_CURRENTUSER UN un. |
| 64 | + FunctionEnd |
| 65 | +!endif |
47 | 66 |
|
48 |
| -# Sets install mode to "per-user". |
49 |
| -!macro MULTIUSER_INSTALLMODE_CURRENTUSER UNINSTALLER_PREFIX UNINSTALLER_FUNCPREFIX |
50 |
| - StrCpy $MultiUser.InstallMode CurrentUser |
51 |
| - |
52 |
| - SetShellVarContext current |
53 |
| - |
54 |
| - !if "${UNINSTALLER_PREFIX}" != UN |
55 |
| - # http://www.mathiaswestin.net/2012/09/how-to-make-per-user-installation-with.html |
56 |
| - StrCpy $0 "$LocalAppData\Programs" |
57 |
| - # Win7 has a per-user programfiles known folder and this can be a non-default location |
58 |
| - System::Call 'Shell32::SHGetKnownFolderPath(g "${FOLDERID_UserProgramFiles}",i ${KF_FLAG_CREATE},i0,*i.r2)i.r1' |
59 |
| - ${If} $1 == 0 |
60 |
| - System::Call '*$2(&w${NSIS_MAX_STRLEN} .r1)' |
61 |
| - StrCpy $0 $1 |
62 |
| - System::Call 'Ole32::CoTaskMemFree(ir2)' |
63 |
| - ${EndIf} |
64 |
| - StrCpy $Instdir "$0\${PRODUCT_FILENAME}" |
65 |
| - !endif |
| 67 | +!ifdef INSTALL_MODE_PER_ALL_USERS_REQUIRED |
| 68 | + Var PerMachineInstallationFolder |
66 | 69 |
|
67 |
| - # Checks registry for previous installation path (both for upgrading, reinstall, or uninstall) |
68 |
| - ReadRegStr $PerUserInstallationFolder HKCU "${INSTALL_REGISTRY_KEY}" InstallLocation |
69 |
| - ${if} $PerUserInstallationFolder != "" |
70 |
| - StrCpy $INSTDIR $PerUserInstallationFolder |
71 |
| - ${endif} |
| 70 | + # Sets install mode to "per-machine" (all users). |
| 71 | + !macro MULTIUSER_INSTALLMODE_ALLUSERS UNINSTALLER_PREFIX UNINSTALLER_FUNCPREFIX |
| 72 | + # Install mode initialization - per-machine |
| 73 | + StrCpy $MultiUser.InstallMode AllUsers |
72 | 74 |
|
73 |
| - !ifdef MULTIUSER_INSTALLMODE_${UNINSTALLER_PREFIX}FUNCTION |
74 |
| - Call "${MULTIUSER_INSTALLMODE_${UNINSTALLER_PREFIX}FUNCTION}" |
75 |
| - !endif |
76 |
| -!macroend |
| 75 | + SetShellVarContext all |
77 | 76 |
|
78 |
| -Function MultiUser.InstallMode.AllUsers |
79 |
| - !insertmacro MULTIUSER_INSTALLMODE_ALLUSERS "" "" |
80 |
| -FunctionEnd |
| 77 | + !if "${UNINSTALLER_PREFIX}" != UN |
| 78 | + ;Set default installation location for installer |
| 79 | + StrCpy $INSTDIR "$PROGRAMFILES\${PRODUCT_FILENAME}" |
| 80 | + !endif |
81 | 81 |
|
82 |
| -Function MultiUser.InstallMode.CurrentUser |
83 |
| - !insertmacro MULTIUSER_INSTALLMODE_CURRENTUSER "" "" |
84 |
| -FunctionEnd |
| 82 | + ; Checks registry for previous installation path (both for upgrading, reinstall, or uninstall) |
| 83 | + ReadRegStr $PerMachineInstallationFolder HKLM "${INSTALL_REGISTRY_KEY}" InstallLocation |
| 84 | + ${if} $PerMachineInstallationFolder != "" |
| 85 | + StrCpy $INSTDIR $PerMachineInstallationFolder |
| 86 | + ${endif} |
85 | 87 |
|
86 |
| -Function un.MultiUser.InstallMode.AllUsers |
87 |
| - !insertmacro MULTIUSER_INSTALLMODE_ALLUSERS UN un. |
88 |
| -FunctionEnd |
| 88 | + !ifdef MULTIUSER_INSTALLMODE_${UNINSTALLER_PREFIX}FUNCTION |
| 89 | + Call "${MULTIUSER_INSTALLMODE_${UNINSTALLER_PREFIX}FUNCTION}" |
| 90 | + !endif |
| 91 | + !macroend |
89 | 92 |
|
90 |
| -Function un.MultiUser.InstallMode.CurrentUser |
91 |
| - !insertmacro MULTIUSER_INSTALLMODE_CURRENTUSER UN un. |
92 |
| -FunctionEnd |
| 93 | + Function MultiUser.InstallMode.AllUsers |
| 94 | + !insertmacro MULTIUSER_INSTALLMODE_ALLUSERS "" "" |
| 95 | + FunctionEnd |
| 96 | + |
| 97 | + Function un.MultiUser.InstallMode.AllUsers |
| 98 | + !insertmacro MULTIUSER_INSTALLMODE_ALLUSERS UN un. |
| 99 | + FunctionEnd |
| 100 | +!endif |
93 | 101 |
|
94 | 102 | !macro MULTIUSER_INIT_TEXTS
|
95 | 103 | !ifndef MULTIUSER_INIT_TEXT_ADMINREQUIRED
|
|
0 commit comments