Fixed silent mode. Now installer checks exist installation in the silent mode. And added options in ini file for silent mode: servicesccount, servicepassword, serviceid, islibc.

VictorSpirin · VictorSpirin · commit 5e56561cdf6a · 2019-04-23T16:32:25.000+03:00
diff --git a/nsis/postgresql.nsi b/nsis/postgresql.nsi
@@ -1,4 +1,3 @@
-
 ; PostgeSQL install Script
 ; Written by Postgres Professional, Postgrespro.ru
 ; used plugins: AccessControl, UserMgr,
@@ -245,14 +244,20 @@ Section $(componentClient) secClient
 
   ;MessageBox MB_OK|MB_ICONINFORMATION "pg_old_dir: $PG_OLD_DIR"
   ;Call ChecExistInstall ;get port number for  psql
+  IfSilent 0 +2
+  Call ChecExistInstall
+
   var /GLOBAL isStopped
   StrCpy $isStopped 0
   
 
+  ;MessageBox MB_OK|MB_ICONINFORMATION "pg_old_dir: $PG_OLD_DIR"
+  
   ${if} $PG_OLD_DIR != "" ; exist PG install
-    MessageBox MB_YESNO|MB_ICONQUESTION  "$(MESS_STOP_SERVER)" IDYES doitStop IDNO noyetStop
+    MessageBox MB_YESNO|MB_ICONQUESTION  "$(MESS_STOP_SERVER)" /SD IDYES IDYES doitStop IDNO noyetStop
     noyetStop:
-    Return
+    ;Return
+    Abort
     doitStop:
     DetailPrint "Stop the server ..."
     ${if} $OLD_DATA_DIR != ""
@@ -357,25 +362,41 @@ SectionEnd
 Section $(componentServer) sec1
 
 
+;MessageBox MB_OK|MB_ICONINFORMATION "componentServer"
+IfSilent 0 +2
+Call CheckDataDir
+
+;MessageBox MB_OK|MB_ICONINFORMATION "OLD_DATA_DIR=$OLD_DATA_DIR"
+
+  FileOpen $LogFile $INSTDIR\install.log w ;Opens a Empty File an fills it
+  
   ${if} $PG_OLD_DIR != "" ; exist PG install
    ${if} $isStopped == 0
-    MessageBox MB_YESNO|MB_ICONQUESTION  "$(MESS_STOP_SERVER)" IDYES doitStop IDNO noyetStop
+    MessageBox MB_YESNO|MB_ICONQUESTION  "$(MESS_STOP_SERVER)" /SD IDYES IDYES doitStop IDNO noyetStop
     noyetStop:
-    Return
+    ;Return
+             FileClose $LogFile
+             Abort
     doitStop:
-    DetailPrint "Stop the server ..."
     ${if} $OLD_DATA_DIR != ""
+                 DetailPrint "Stop the server ..."
+                 FileWrite $LogFile "Stop the server ...$\r$\n"
+                 FileWrite $LogFile '"$PG_OLD_DIR\bin\pg_ctl.exe" stop -D "$OLD_DATA_DIR" -m fast -w$\r$\n'
       nsExec::Exec '"$PG_OLD_DIR\bin\pg_ctl.exe" stop -D "$OLD_DATA_DIR" -m fast -w'
       pop $0
+      FileWrite $LogFile "pg_ctl.exe stop return $0 $\r$\n"
       DetailPrint "pg_ctl.exe stop return $0"
     ${endif}
    ${endif}
    
     ;unregister
+    FileWrite $LogFile "Unregister the service ...$\r$\n"
     DetailPrint "Unregister the service ..."
     ${if} $OldServiceID_text != ""
+          FileWrite $LogFile '"$PG_OLD_DIR\bin\pg_ctl.exe" unregister -N "$OldServiceID_text"$\r$\n'
      nsExec::Exec '"$PG_OLD_DIR\bin\pg_ctl.exe" unregister -N "$OldServiceID_text"'
       pop $0
+      FileWrite $LogFile "pg_ctl.exe unregister return $0 $\r$\n"
       DetailPrint "pg_ctl.exe unregister return $0"
     ${endif}
   ${endif}
@@ -395,7 +416,7 @@ Section $(componentServer) sec1
 
   ;File "License.txt"
 
-  FileOpen $LogFile $INSTDIR\install.log w ;Opens a Empty File an fills it
+  ;FileOpen $LogFile $INSTDIR\install.log w ;Opens a Empty File an fills it
 
 
   CreateDirectory "$INSTDIR\scripts"
@@ -411,7 +432,7 @@ Section $(componentServer) sec1
   WriteUninstaller "$INSTDIR\Uninstall.exe"
 
   ; write uninstall strings
-  FileWrite $LogFile "Write to register\r$\n"
+  FileWrite $LogFile "Write to register$\r$\n"
 
   Call writeUnistallReg
 
@@ -526,10 +547,10 @@ Section $(componentServer) sec1
   pop $0
   
   !insertmacro MUI_STARTMENU_WRITE_END
-  ; Create data dir begin
-  FileWrite $LogFile "Create data dir begin$\r$\n"
 
   ${if} $isDataDirExist == 0
+    ; Create data dir begin
+    FileWrite $LogFile "Create data dir begin$\r$\n"
     CreateDirectory "$DATA_DIR"
     ;AccessControl::GrantOnFile "$DATA_DIR" "(BU)" "FullAccess" ;GenericWrite
     ;Pop $0 ;"ok" or "error" + error details
@@ -616,8 +637,8 @@ Section $(componentServer) sec1
     ${EndIf}
   ${endif}
   ; Create data dir end
-  FileWrite $LogFile "Create postgresql.conf $\r$\n"
   ${if} $isDataDirExist == 0
+    FileWrite $LogFile "Create postgresql.conf $\r$\n"
     ${if} $checkNoLocal_state == ${BST_CHECKED}
       !insertmacro _ReplaceInFile "$DATA_DIR\postgresql.conf" "#listen_addresses = 'localhost'" "listen_addresses = '*'"
 	  ; Add line to pg_hba.conf
@@ -1362,25 +1383,21 @@ Function nsDialogServerExist
   nsDialogs::Show
 FunctionEnd
 
-Function ChecExistDataDir
-  ${Unless} ${SectionIsSelected} ${sec1}
-    Abort
-  ${EndUnless}
+;check existing datadir function
+Function CheckDataDir
   ${If} ${FileExists} "$DATA_DIR\*.*"
     StrCpy $isDataDirExist 1
   ${ElseIf} ${FileExists} "$DATA_DIR"
     StrCpy $isDataDirExist -1
   ${Else}
     StrCpy $isDataDirExist 0
-    Abort
   ${EndIf}
-
+  
   ${If} ${FileExists} "$DATA_DIR\postgresql.conf"
     ClearErrors
     ${ConfigRead} "$DATA_DIR\postgresql.conf" "port" $R0
     ${if} ${Errors}
       StrCpy $isDataDirExist 0
-      Abort
     ${EndIf}
     ${StrRep} '$0' '$R0' '=' ''
     ${StrRep} '$1' '$0' ' ' ''
@@ -1392,9 +1409,50 @@ Function ChecExistDataDir
     StrCpy $TextPort_text $0
   ${Else}
     StrCpy $isDataDirExist 0
-    Abort
   ${EndIf}
 
+  
+FunctionEnd
+
+;check existing datadir dialog
+Function ChecExistDataDir
+  ${Unless} ${SectionIsSelected} ${sec1}
+    Abort
+  ${EndUnless}
+
+  Call CheckDataDir
+  ${if} $isDataDirExist = 0
+      Abort
+  ${endif}
+  ;${If} ${FileExists} "$DATA_DIR\*.*"
+  ;  StrCpy $isDataDirExist 1
+  ;${ElseIf} ${FileExists} "$DATA_DIR"
+  ;  StrCpy $isDataDirExist -1
+  ;${Else}
+  ;  StrCpy $isDataDirExist 0
+  ;  Abort
+  ;${EndIf}
+
+  ;${If} ${FileExists} "$DATA_DIR\postgresql.conf"
+  ;  ClearErrors
+  ;  ${ConfigRead} "$DATA_DIR\postgresql.conf" "port" $R0
+  ;  ${if} ${Errors}
+  ;    StrCpy $isDataDirExist 0
+  ;    Abort
+  ;  ${EndIf}
+  ;  ${StrRep} '$0' '$R0' '=' ''
+  ;  ${StrRep} '$1' '$0' ' ' ''
+
+   ; StrCpy $0 $1 5
+
+   ; ${StrRep} '$1' '$0' '$\t' ''
+   ;${StrRep} '$0' '$1' '#' ''
+   ; StrCpy $TextPort_text $0
+  ;${Else}
+  ;  StrCpy $isDataDirExist 0
+  ;  Abort
+  ;${EndIf}
+
   ${if} $PG_OLD_DIR != "" ;exist PG install
     Abort
   ${endif}
@@ -2274,6 +2332,22 @@ ${EndIf}
     StrCpy $isDataChecksums "$1"
   ${endif}
 
+  ReadINIStr $1 $0 options servicesccount
+  ${if} "$1" != ""
+    StrCpy $ServiceAccount_text "$1"
+  ${endif}
+  ReadINIStr $1 $0 options servicepassword
+  ${if} "$1" != ""
+    StrCpy $servicePassword_text "$1"
+  ${endif}
+  ReadINIStr $1 $0 options serviceid
+  ${if} "$1" != ""
+    StrCpy $ServiceID_text "$1"
+  ${endif}
+  ReadINIStr $1 $0 options islibc
+  ${if} "$1" != ""
+    StrCpy $Collation_text "libc"
+  ${endif}
 
   
 FunctionEnd
