/[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.4 by janosch, Tue Nov 22 14:22:15 2005 UTC revision 1.8 by joko, Tue Nov 22 16:39:50 2005 UTC
# Line 6  Line 6 
6  ;  ;
7    
8  !include "MUI.nsh"  !include "MUI.nsh"
9  !include "parameter.nsi"  !include "variables-declaration.nsi"
10    !include "string_functions.nsi"
11  !include "file_functions.nsi"  !include "file_functions.nsi"
12    !include "ras_functions.nsi"
13    
14    
15  ; --------------------------------  ; --------------------------------
# Line 63  Page custom SetupPage3 Line 65  Page custom SetupPage3
65    
66  Function .onInit  Function .onInit
67    
68    
69    System::Call 'kernel32::CreateMutexA(i 0, i 0, t "myMutex") i .r1 ?e'    System::Call 'kernel32::CreateMutexA(i 0, i 0, t "myMutex") i .r1 ?e'
70    Pop $R0    Pop $R0
71    StrCmp $R0 0 +3    StrCmp $R0 0 +3
# Line 127  Section Line 130  Section
130      !insertmacro MUI_INSTALLOPTIONS_READ $R3 "vpndial_settings_net.ini" "Field 4" "State"      !insertmacro MUI_INSTALLOPTIONS_READ $R3 "vpndial_settings_net.ini" "Field 4" "State"
131      !insertmacro MUI_INSTALLOPTIONS_READ $R4 "vpndial_settings_net.ini" "Field 7" "State"      !insertmacro MUI_INSTALLOPTIONS_READ $R4 "vpndial_settings_net.ini" "Field 7" "State"
132    
133        StrCpy $destination_net "$R1.$R2.$R3.$R4"
134        
135      ;Get Destination_mask      ;Get Destination_mask
136      !insertmacro MUI_INSTALLOPTIONS_READ $R5 "vpndial_settings_net.ini" "Field 12" "State"      !insertmacro MUI_INSTALLOPTIONS_READ $R5 "vpndial_settings_net.ini" "Field 12" "State"
137      !insertmacro MUI_INSTALLOPTIONS_READ $R6 "vpndial_settings_net.ini" "Field 13" "State"        !insertmacro MUI_INSTALLOPTIONS_READ $R6 "vpndial_settings_net.ini" "Field 13" "State"  
138      !insertmacro MUI_INSTALLOPTIONS_READ $R7 "vpndial_settings_net.ini" "Field 14" "State"      !insertmacro MUI_INSTALLOPTIONS_READ $R7 "vpndial_settings_net.ini" "Field 14" "State"
139      !insertmacro MUI_INSTALLOPTIONS_READ $R8 "vpndial_settings_net.ini" "Field 15" "State"      !insertmacro MUI_INSTALLOPTIONS_READ $R8 "vpndial_settings_net.ini" "Field 15" "State"
140    
141        StrCpy  $destination_mask "$R12.$R13.$R14.$R15"
142    
143      ;--------------------------------------------------------------------------------------------------------------      ;--------------------------------------------------------------------------------------------------------------
144    
145      ;Get Parameter from vpndial_settings_cert.ini      ;Get Parameter from vpndial_settings_cert.ini
# Line 184  Section "VpnDial" IDX_VpnDial Line 191  Section "VpnDial" IDX_VpnDial
191    
192  SectionEnd  SectionEnd
193    
194    
195    
196    
197    ; ---------------------------------------------------------------------------
198    
199    ;               pbk-Datei anpassen
200    
201    ; ---------------------------------------------------------------------------
202    
203    
204    
205    ; Verbindungsname
206  Section  Section
207    DetailPrint "Installiere VPN-Verbindung..."    DetailPrint "Installiere VPN-Verbindung..."
208    Push "[##connectionname##]"            #-- text to be replaced  within the " "    Push "[##connectionname##]"            #-- text to be replaced  within the " "
# Line 194  Section Line 213  Section
213    Call AdvReplaceInFile         #-- Call the Function    Call AdvReplaceInFile         #-- Call the Function
214  SectionEnd  SectionEnd
215    
216    ; Gegenstelle
217  Section  Section
218    Push "PhoneNumber=##destinationhost##"            #-- text to be replaced  within the " "    Push "PhoneNumber=##destinationhost##"            #-- text to be replaced  within the " "
219    Push "PhoneNumber=$destination_host"             #-- replace with anything within the " "    Push "PhoneNumber=$destination_host"             #-- replace with anything within the " "
# Line 203  Section Line 223  Section
223    Call AdvReplaceInFile         #-- Call the Function    Call AdvReplaceInFile         #-- Call the Function
224  SectionEnd  SectionEnd
225    
226    
227    ; GUID
228    Section
229    
230      Call CreateRasGUID
231    
232      Pop $0                        ; contains GUID
233    
234      Push "Guid=##guid##"            #-- text to be replaced  within the " "
235      Push "Guid=$0"             #-- replace with anything within the " "
236      Push all                      #-- replace all occurrences
237      Push all                      #-- replace all occurrences
238      Push "$INSTDIR\pbk\connection.pbk"      #-- file to replace in
239      Call AdvReplaceInFile         #-- Call the Function
240    SectionEnd
241    
242    
243    ; Verbindungsdatei mit globaler Datei zusammenführen
244  Section  Section
245    SetShellVarContext all    SetShellVarContext all
246      Push $INSTDIR\pbk\rasphone.pbk      Push $INSTDIR\pbk\rasphone.pbk
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.8
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed