/[cvs]/joko/ToolBox/Windows/VpnDial-installer/vpn.nsi
ViewVC logotype

Diff of /joko/ToolBox/Windows/VpnDial-installer/vpn.nsi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by joko, Mon Nov 21 21:45:29 2005 UTC revision 1.6 by janosch, Tue Nov 22 15:50:55 2005 UTC
# Line 1  Line 1 
1  ; VpnDial.nsi  ; VpnDial.nsi
2  ; $Id$  ; $Id$
3  ;  ;
4  ; This script can install VpnDial,  ; This script can install VpnDial,
5  ; has uninstall support and (optionally) installs start menu shortcuts.  ; has uninstall support and (optionally) installs start menu shortcuts.
6  ;  ;
7    
8  !include "MUI.nsh"  !include "MUI.nsh"
9  !include "parameter.nsi"  !include "variables-decleration.nsi"
10  !include "file_functions.nsi"  !include "file_functions.nsi"
11    
12    
13  ; --------------------------------  ; --------------------------------
14  ;   The name of the installer  ;   The name of the installer
15  ; --------------------------------  ; --------------------------------
16  Name "VpnDial"  Name "VpnDial"
17    
18  ; The file to write  ; The file to write
19  OutFile "VpnDial-Setup.exe"  OutFile "VpnDial-Setup.exe"
20    
21  ; The default installation directory  ; The default installation directory
22  InstallDir $PROGRAMFILES\NetFragOrg\VpnDial  InstallDir $PROGRAMFILES\NetFragOrg\VpnDial
23    
24  ; Registry key to check for directory (so if you install again, it will  ; Registry key to check for directory (so if you install again, it will
25  ; overwrite the old one automatically)  ; overwrite the old one automatically)
26  InstallDirRegKey HKLM "Software\NSIS_VpnDial" "Install_Dir"  InstallDirRegKey HKLM "Software\NSIS_VpnDial" "Install_Dir"
27    
28  ; more options: language of the installer & installer style  SetOverwrite on
29  ;LoadLanguageFile "${NSISDIR}\Contrib\Language files\German.nlf"  
30  ;XPStyle on  
31    ; --------------------------------
32  SetOverwrite on  ; (MUI) Interface Settings
33    ; --------------------------------
34    !define MUI_ABORTWARNING
35  ; --------------------------------  !define MUI_COMPONENTSPAGE_NODESC
36  ; (MUI) Interface Settings  !define MUI_ICON "key.ico"
37  ; --------------------------------  !define MUI_UNICON "key.ico"
38  !define MUI_ABORTWARNING  
39  !define MUI_COMPONENTSPAGE_NODESC  
40  !define MUI_ICON "key.ico"  ; --------------------------------
41  !define MUI_UNICON "key.ico"  ;   Pages
42    ; --------------------------------
43    
44  ; --------------------------------  UninstPage uninstConfirm
45  ;   Pages  UninstPage instfiles
46  ; --------------------------------  
47  ;Page components  !insertmacro MUI_PAGE_WELCOME
48  ;Page directory  Page custom SetupPage1
49  ;Page instfiles  Page custom SetupPage2
50    Page custom SetupPage3
51  UninstPage uninstConfirm  !insertmacro MUI_PAGE_COMPONENTS
52  UninstPage instfiles  !insertmacro MUI_PAGE_DIRECTORY
53    !insertmacro MUI_PAGE_INSTFILES
54  ;!insertmacro MUI_PAGE_LICENSE "${NSISDIR}\Docs\Modern UI\License.txt"  
55  !insertmacro MUI_PAGE_WELCOME  !insertmacro MUI_UNPAGE_CONFIRM
56  Page custom Setup  !insertmacro MUI_UNPAGE_INSTFILES
57  !insertmacro MUI_PAGE_COMPONENTS  !insertmacro MUI_LANGUAGE "German"
58  !insertmacro MUI_PAGE_DIRECTORY  
59  !insertmacro MUI_PAGE_INSTFILES  
60    ; --------------------------------
61  !insertmacro MUI_UNPAGE_CONFIRM  ; .onInit
62  !insertmacro MUI_UNPAGE_INSTFILES  ; --------------------------------
63  !insertmacro MUI_LANGUAGE "German"  
64    Function .onInit
65    
66  ; --------------------------------    System::Call 'kernel32::CreateMutexA(i 0, i 0, t "myMutex") i .r1 ?e'
67  ; .onInit    Pop $R0
68  ; --------------------------------    StrCmp $R0 0 +3
69        MessageBox MB_OK|MB_ICONEXCLAMATION "Die Installation läuft bereits."
70  Function .onInit      Abort
71    
72    System::Call 'kernel32::CreateMutexA(i 0, i 0, t "myMutex") i .r1 ?e'    !insertmacro MUI_INSTALLOPTIONS_EXTRACT "vpndial_settings.ini"
73    Pop $R0    !insertmacro MUI_INSTALLOPTIONS_EXTRACT "vpndial_settings_net.ini"  
74    StrCmp $R0 0 +3    !insertmacro MUI_INSTALLOPTIONS_EXTRACT "vpndial_settings_cert.ini"
75      MessageBox MB_OK|MB_ICONEXCLAMATION "Die Installation läuft bereits."  FunctionEnd
76      Abort  
77    Function SetupPage1
78    !insertmacro MUI_INSTALLOPTIONS_EXTRACT "vpndial_settings.ini"    ; custom page
79      ; see: http://nsis.sourceforge.net/Docs/Modern%20UI/Readme.html#customPages
80  FunctionEnd    ; and: http://nsis.sourceforge.net/Docs/InstallOptions/Readme.html
81      !insertmacro MUI_HEADER_TEXT "VpnDial Einstellungen" "Bitte füllen Sie folgende Angaben aus"
82  Function Setup    !insertmacro MUI_INSTALLOPTIONS_DISPLAY "vpndial_settings.ini"  
83    ; custom page  FunctionEnd
84    ; see: http://nsis.sourceforge.net/Docs/Modern%20UI/Readme.html#customPages  
85    ; and: http://nsis.sourceforge.net/Docs/InstallOptions/Readme.html  Function SetupPage2
86    !insertmacro MUI_HEADER_TEXT "VpnDial Einstellungen" "Bitte füllen Sie folgende Angaben aus"    !insertmacro MUI_HEADER_TEXT "VpnDial Einstellungen" "Bitte füllen Sie folgende Angaben aus"
87    !insertmacro MUI_INSTALLOPTIONS_DISPLAY "vpndial_settings.ini"    !insertmacro MUI_INSTALLOPTIONS_DISPLAY "vpndial_settings_net.ini"
88  FunctionEnd  FunctionEnd
89    
90  ; --------------------------------  Function SetupPage3
91  ;   The stuff to install    !insertmacro MUI_HEADER_TEXT "VpnDial Einstellungen" "Bitte füllen Sie folgende Angaben aus"
92  ; --------------------------------    !insertmacro MUI_INSTALLOPTIONS_DISPLAY "vpndial_settings_cert.ini"
93    FunctionEnd
94  Section  
95    SetShellVarContext all  
96    Push $APPDATA\Microsoft\Network\Connections\Pbk\rasphone.pbk  ; --------------------------------
97    Push "[$connectionname]"  ;   The stuff to install
98     Call FileSearch  ; --------------------------------
99    Pop $0 #Number of times found throughout  
100    Pop $1 #Found at all? yes/no  Section
101    Pop $2 #Number of lines found in      
102    StrCmp $1 yes 0 +3      ;Get Parameter from vpndial_settings.ini
103    MessageBox MB_OK "Die Verbindung $\"$connectionname$\" existiert bereits. Der Eintrag kann leider nicht doppelt angelegt werden."      
104    Abort      ;Get Connectionname  
105  SectionEnd      !insertmacro MUI_INSTALLOPTIONS_READ $connectionname "vpndial_settings.ini" "Field 2" "State"
106        ;MessageBox MB_OK $R1
107  Section "VpnDial" IDX_VpnDial      ;StrCpy $connectionname $R1
108    
109    SetOverwrite on      ;Get Destination_host
110            !insertmacro MUI_INSTALLOPTIONS_READ $destination_host "vpndial_settings.ini" "Field 3" "State"
111    SetDetailsPrint both      ;MessageBox MB_OK $R2
112    DetailPrint "Installiere VpnDial..."      ;StrCpy $destination_host $R2
113    
114    ;SectionIn RO      ;Get Username
115          !insertmacro MUI_INSTALLOPTIONS_READ $username "vpndial_settings.ini" "Field 4" "State"
116    ; Set output path to the installation directory.  
117    SetOutPath $INSTDIR      ;Get Password
118        !insertmacro MUI_INSTALLOPTIONS_READ $userpass "vpndial_settings.ini" "Field 8" "State"
119    ;CreateDirectory $INSTDIR\certs\  
120        ;-------------------------------------------------------------------------------------------------------------
121    ; Put file there  
122    File /r "vpndial\*.*"      ;Get Parameter from vpndial_settings_net.ini
123            
124    ; Write the installation path into the registry      ;Get Destination_net
125    WriteRegStr HKLM Software\NSIS_VpnDial "Install_Dir" "$INSTDIR"      !insertmacro MUI_INSTALLOPTIONS_READ $R1 "vpndial_settings_net.ini" "Field 2" "State"
126          !insertmacro MUI_INSTALLOPTIONS_READ $R2 "vpndial_settings_net.ini" "Field 3" "State"  
127    ; Write the uninstall keys for Windows      !insertmacro MUI_INSTALLOPTIONS_READ $R3 "vpndial_settings_net.ini" "Field 4" "State"
128    WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial" "DisplayName" "VpnDial"      !insertmacro MUI_INSTALLOPTIONS_READ $R4 "vpndial_settings_net.ini" "Field 7" "State"
129    WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial" "UninstallString" '"$INSTDIR\uninstall.exe"'  
130    WriteRegDWORD HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial" "NoModify" 1      StrCpy $destination_net "$R1.$R2.$R3.$R4"
131    WriteRegDWORD HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial" "NoRepair" 1      
132    WriteUninstaller "uninstall.exe"      ;Get Destination_mask
133        !insertmacro MUI_INSTALLOPTIONS_READ $R5 "vpndial_settings_net.ini" "Field 12" "State"
134  SectionEnd      !insertmacro MUI_INSTALLOPTIONS_READ $R6 "vpndial_settings_net.ini" "Field 13" "State"  
135        !insertmacro MUI_INSTALLOPTIONS_READ $R7 "vpndial_settings_net.ini" "Field 14" "State"
136  Section      !insertmacro MUI_INSTALLOPTIONS_READ $R8 "vpndial_settings_net.ini" "Field 15" "State"
137    DetailPrint "Installiere VPN-Verbindung..."  
138    Push "[##connectionname##]"            #-- text to be replaced  within the " "      StrCpy  $destination_mask "$R12.$R13.$R14.$R15"
139    Push "[$connectionname]"             #-- replace with anything within the " "  
140    Push all                      #-- replace all occurrences      ;--------------------------------------------------------------------------------------------------------------
141    Push all                      #-- replace all occurrences  
142    Push "$INSTDIR\pbk\connection.pbk"      #-- file to replace in      ;Get Parameter from vpndial_settings_cert.ini
143    Call AdvReplaceInFile         #-- Call the Function  
144  SectionEnd      !insertmacro MUI_INSTALLOPTIONS_READ $cacert "vpndial_settings_cert.ini" "Field 2" "State"
145        !insertmacro MUI_INSTALLOPTIONS_READ $usercert "vpndial_settings_cert.ini" "Field 3" "State"
146  Section  
147    Push "PhoneNumber=##destinationhost##"            #-- text to be replaced  within the " "  SectionEnd
148    Push "PhoneNumber=$destination_host"             #-- replace with anything within the " "  
149    Push all                      #-- replace all occurrences  Section
150    Push all                      #-- replace all occurrences    SetShellVarContext all
151    Push "$INSTDIR\pbk\connection.pbk"      #-- file to replace in    Push $APPDATA\Microsoft\Network\Connections\Pbk\rasphone.pbk
152    Call AdvReplaceInFile         #-- Call the Function    Push "[$connectionname]"
153  SectionEnd     Call FileSearch
154      Pop $0 #Number of times found throughout
155  Section    Pop $1 #Found at all? yes/no
156    SetShellVarContext all    Pop $2 #Number of lines found in
157      Push $INSTDIR\pbk\rasphone.pbk    StrCmp $1 yes 0 +3
158      Push $APPDATA\Microsoft\Network\Connections\Pbk\rasphone.pbk    MessageBox MB_OK "Die Verbindung $\"$connectionname$\" existiert bereits. Der Eintrag kann leider nicht doppelt angelegt werden."
159      Push $INSTDIR\pbk\connection.pbk    Abort
160      Call JoinFiles          SectionEnd
161      CopyFiles $APPDATA\Microsoft\Network\Connections\Pbk\rasphone.pbk $INSTDIR\pbk\rasphone_orig.pbk  
162      CopyFiles $INSTDIR\pbk\rasphone.pbk $APPDATA\Microsoft\Network\Connections\Pbk\rasphone.pbk  Section "VpnDial" IDX_VpnDial
163    SetShellVarContext current  
164  SectionEnd    SetOverwrite on
165        
166  Section    SetDetailsPrint both
167  nsExec::Exec "$INSTDIR\bin\VpnDial.exe --setup $connectionname --user $username --pass $userpass"    DetailPrint "Installiere VpnDial..."
168  SectionEnd  
169      ;SectionIn RO
170  Section    
171  nsExec::Exec "$INSTDIR\bin\certmgr.exe -add -c $INSTDIR\certs\$cacert -s -r localMachine root"    ; Set output path to the installation directory.
172  SectionEnd    SetOutPath $INSTDIR
173    
174  Section    ;CreateDirectory $INSTDIR\certs\
175  nsExec::Exec "$INSTDIR\bin\winhttpcertcfg.exe  -g -i $INSTDIR\certs\$usercert -c LOCAL_MACHINE\My -a $currentuser"  
176  SectionEnd    ; Put file there
177      File /r "vpndial\*.*"
178  ; Optional section (can be disabled by the user)      
179  Section "Startmenü-Einträge" IDX_STARTMENU    ; Write the installation path into the registry
180      WriteRegStr HKLM Software\NSIS_VpnDial "Install_Dir" "$INSTDIR"
181    SetDetailsPrint both    
182    DetailPrint "Installiere Startmenü-Einträge und Desktop-Verknüpfungen..."    ; Write the uninstall keys for Windows
183      WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial" "DisplayName" "VpnDial"
184    CreateDirectory "$SMPROGRAMS\VpnDial"    WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial" "UninstallString" '"$INSTDIR\uninstall.exe"'
185    CreateShortCut "$SMPROGRAMS\VpnDial\Uninstall.lnk" "$INSTDIR\uninstall.exe" "" "$INSTDIR\uninstall.exe" 0    WriteRegDWORD HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial" "NoModify" 1
186    CreateShortCut "$SMPROGRAMS\VpnDial\VpnMonitor.lnk" "$INSTDIR\bin\VpnDial.exe" "--gui --up --monitor $connectionname --net $destination_net" "$INSTDIR\bin\VpnDial.exe" 0    WriteRegDWORD HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial" "NoRepair" 1
187    CreateShortCut "$SMPROGRAMS\VpnDial\VpnDial.lnk" "$INSTDIR\bin\VpnDial.exe" "--dial $connectionname --net $destination_net" "$INSTDIR\bin\VpnDial.exe" 0    WriteUninstaller "uninstall.exe"
188    ;CreateShortCut "$SMPROGRAMS\VpnDial\VpnSetup.lnk" "$INSTDIR\bin\VpnDial.exe" "--setup $connectionname --user $username --pass $userpass" "$INSTDIR\bin\VpnDial.exe" 0  
189    CreateShortCut "$SMPROGRAMS\VpnDial\Zertifikate.lnk" "$INSTDIR\certs\" "" "$INSTDIR\certs\" 0  SectionEnd
190    CreateShortCut "$SMPROGRAMS\VpnDial\ZertifikatsVerwaltung.lnk" "$INSTDIR\links\IPSec.msc" "" "$INSTDIR\links\IPSec.msc" 0  
191    ;CreateShortCut "$SMPROGRAMS\VpnDial\README.lnk" "$INSTDIR\doc\README.txt" "" "$INSTDIR\doc\README.txt" 0  Section
192    ;CreateShortCut "$SMPROGRAMS\VpnDial\README-HTML.lnk" "$INSTDIR\doc\README.htm" "" "$INSTDIR\doc\README.htm" 0    DetailPrint "Installiere VPN-Verbindung..."
193      Push "[##connectionname##]"            #-- text to be replaced  within the " "
194    CopyFiles "$INSTDIR\links\Netzwerkverbindung*" "$SMPROGRAMS\VpnDial\"    Push "[$connectionname]"             #-- replace with anything within the " "
195      Push all                      #-- replace all occurrences
196  SectionEnd    Push all                      #-- replace all occurrences
197      Push "$INSTDIR\pbk\connection.pbk"      #-- file to replace in
198      Call AdvReplaceInFile         #-- Call the Function
199  ; --------------------------------  SectionEnd
200  ;   Uninstaller  
201  ; --------------------------------  Section
202      Push "PhoneNumber=##destinationhost##"            #-- text to be replaced  within the " "
203  Section "Uninstall" IDX_UNINSTALL    Push "PhoneNumber=$destination_host"             #-- replace with anything within the " "
204      Push all                      #-- replace all occurrences
205    ; ------------------    Push all                      #-- replace all occurrences
206    ;   uninstall VpnDial    Push "$INSTDIR\pbk\connection.pbk"      #-- file to replace in
207    ; ------------------    Call AdvReplaceInFile         #-- Call the Function
208    SectionEnd
209    ; Remove registry keys  
210    DeleteRegKey HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial"  Section
211    DeleteRegKey HKLM SOFTWARE\NSIS_VpnDial    SetShellVarContext all
212        Push $INSTDIR\pbk\rasphone.pbk
213    ;Remove files and uninstaller      Push $APPDATA\Microsoft\Network\Connections\Pbk\rasphone.pbk
214    ;Delete $INSTDIR\makensisw.exe      Push $INSTDIR\pbk\connection.pbk
215    ;Delete $INSTDIR\uninstall.exe      Call JoinFiles        
216    ;Delete "$INSTDIR\*.*"      CopyFiles $APPDATA\Microsoft\Network\Connections\Pbk\rasphone.pbk $INSTDIR\pbk\rasphone_orig.pbk
217            CopyFiles $INSTDIR\pbk\rasphone.pbk $APPDATA\Microsoft\Network\Connections\Pbk\rasphone.pbk
218    ; Remove shortcuts, if any    SetShellVarContext current
219    Delete "$SMPROGRAMS\VpnDial\*.*"  SectionEnd
220    
221    ; Remove directories used  Section
222    RMDir /r "$SMPROGRAMS\VpnDial"  nsExec::Exec "$INSTDIR\bin\VpnDial.exe --setup $connectionname --user $username --pass $userpass"
223    RMDir /r "$INSTDIR"  SectionEnd
224    
225  SectionEnd  Section
226    ;nsExec::Exec "$INSTDIR\bin\certmgr.exe -add -c $INSTDIR\certs\$cacert -s -r localMachine root"
227    ;nsExec::Exec "$INSTDIR\bin\certmgr.exe -add -c $cacert -s -r localMachine root"
228    SectionEnd
229    
230    Section
231    ;nsExec::Exec "$INSTDIR\bin\winhttpcertcfg.exe  -g -i $INSTDIR\certs\$usercert -c LOCAL_MACHINE\My -a $currentuser"
232    nsExec::Exec "$INSTDIR\bin\winhttpcertcfg.exe  -g -i $usercert -c LOCAL_MACHINE\My -a $currentuser"
233    SectionEnd
234    
235    ; Optional section (can be disabled by the user)
236    Section "Startmenü-Einträge" IDX_STARTMENU
237    
238      SetDetailsPrint both
239      DetailPrint "Installiere Startmenü-Einträge und Desktop-Verknüpfungen..."
240    
241      CreateDirectory "$SMPROGRAMS\VpnDial"
242      CreateShortCut "$SMPROGRAMS\VpnDial\Uninstall.lnk" "$INSTDIR\uninstall.exe" "" "$INSTDIR\uninstall.exe" 0
243      CreateShortCut "$SMPROGRAMS\VpnDial\VpnMonitor.lnk" "$INSTDIR\bin\VpnDial.exe" "--gui --up --monitor $connectionname --net $destination_net" "$INSTDIR\bin\VpnDial.exe" 0
244      CreateShortCut "$SMPROGRAMS\VpnDial\VpnDial.lnk" "$INSTDIR\bin\VpnDial.exe" "--dial $connectionname --net $destination_net" "$INSTDIR\bin\VpnDial.exe" 0
245      ;CreateShortCut "$SMPROGRAMS\VpnDial\VpnSetup.lnk" "$INSTDIR\bin\VpnDial.exe" "--setup $connectionname --user $username --pass $userpass" "$INSTDIR\bin\VpnDial.exe" 0
246      CreateShortCut "$SMPROGRAMS\VpnDial\Zertifikate.lnk" "$INSTDIR\certs\" "" "$INSTDIR\certs\" 0
247      CreateShortCut "$SMPROGRAMS\VpnDial\ZertifikatsVerwaltung.lnk" "$INSTDIR\links\IPSec.msc" "" "$INSTDIR\links\IPSec.msc" 0
248      ;CreateShortCut "$SMPROGRAMS\VpnDial\README.lnk" "$INSTDIR\doc\README.txt" "" "$INSTDIR\doc\README.txt" 0
249      ;CreateShortCut "$SMPROGRAMS\VpnDial\README-HTML.lnk" "$INSTDIR\doc\README.htm" "" "$INSTDIR\doc\README.htm" 0
250    
251      CopyFiles "$INSTDIR\links\Netzwerkverbindung*" "$SMPROGRAMS\VpnDial\"
252    
253    SectionEnd
254    
255    
256    ; --------------------------------
257    ;   Uninstaller
258    ; --------------------------------
259    
260    Section "Uninstall" IDX_UNINSTALL
261    
262      ; ------------------
263      ;   uninstall VpnDial
264      ; ------------------
265    
266      ; Remove registry keys
267      DeleteRegKey HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\VpnDial"
268      DeleteRegKey HKLM SOFTWARE\NSIS_VpnDial
269    
270      ;Remove files and uninstaller
271      ;Delete $INSTDIR\makensisw.exe
272      ;Delete $INSTDIR\uninstall.exe
273      ;Delete "$INSTDIR\*.*"
274        
275      ; Remove shortcuts, if any
276      Delete "$SMPROGRAMS\VpnDial\*.*"
277    
278      ; Remove directories used
279      RMDir /r "$SMPROGRAMS\VpnDial"
280      RMDir /r "$INSTDIR"
281    
282    SectionEnd
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.6
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed