Changeset 62 in Main for trunk/Server/install.nsi

Timestamp:

Sep 19, 2024, 5:02:26 AM (2 months ago)

Author:

Nishi

Message:

add installer.sh

File:

• trunk/Server/install.nsi (modified) (3 diffs)

trunk/Server/install.nsi

@@ -6 +6 @@
 Icon "tewi.ico"
 LicenseData ../LICENSE
+
+!include "LogicLib.nsh"
+!include "Sections.nsh"
+
 Page license
+Page components
 Page instfiles
 UninstPage uninstConfirm
@@ -18 +23 @@
         SetOutPath "$INSTDIR"
         File /oname=LICENSE.txt "../LICENSE"
-        SetOutPath "$INSTDIR\bin"
-        File "tewi.exe"
         SetOutPath "$INSTDIR\modules"
         File "../Module/*.dll"
@@ -43 +46 @@
 SectionEnd
 
+Section "Install the executable only" SEL_EXEC
+        SetOutPath "$INSTDIR\bin"
+        File "../tewi.exe"
+        WriteINIStr $INSTDIR\install.ini uninstall service false
+SectionEnd
+
+Section /o "Install the service too (NT-only)" SEL_SERVICE
+        WriteINIStr $INSTDIR\install.ini uninstall service true
+        FileOpen $9 $INSTDIR\install.bat w
+        FileWrite $9 '"$SYSDIR\sc.exe" stop "TewiHTTPd"$\r$\n'
+        FileClose $9
+        nsExec::Exec '"$INSTDIR\install.bat"'
+        Pop $0
+        DetailPrint "Waiting for 1s so service can stop..."
+        Sleep 1000
+        CreateDirectory "$INSTDIR\logs"
+        SetOutPath "$INSTDIR\bin"
+        File "../tewi.exe"
+        File /oname=tewisrv.exe "../tewi-service.exe"
+        FileOpen $9 $INSTDIR\install.bat w
+        FileWrite $9 '"$SYSDIR\sc.exe" delete "TewiHTTPd"$\r$\n'
+        FileWrite $9 '"$SYSDIR\sc.exe" create "TewiHTTPd" DisplayName= "Tewi HTTPd" binpath= "$INSTDIR\bin\tewisrv.exe" start= "auto"$\r$\n'
+        FileWrite $9 '"$SYSDIR\sc.exe" start "TewiHTTPd"$\r$\n'
+        FileClose $9
+        nsExec::Exec '"$INSTDIR\install.bat"'
+        Pop $0
+        Delete $INSTDIR\install.bat
+SectionEnd
+
+Function .onInit
+        StrCpy $1 ${SEL_EXEC}
+FunctionEnd
+
+Function .onSelChange
+        !insertmacro StartRadioButtons $1
+        !insertmacro RadioButton ${SEL_EXEC}
+        !insertmacro RadioButton ${SEL_SERVICE}
+        !insertmacro EndRadioButtons
+FunctionEnd
+
 Section "Uninstall"
+        ReadINIStr $8 $INSTDIR\install.ini uninstall service
+        ${If} $8 == "true"
+                FileOpen $9 $INSTDIR\uninstall.bat w
+                FileWrite $9 '"$SYSDIR\sc.exe" stop "TewiHTTPd"$\r$\n'
+                FileClose $9
+                nsExec::Exec '"$INSTDIR\uninstall.bat"'
+                Pop $0
+                FileOpen $9 $INSTDIR\uninstall.bat w
+                DetailPrint "Waiting for 1s so service can stop..."
+                Sleep 1000
+                FileWrite $9 '"$SYSDIR\sc.exe" delete "TewiHTTPd"$\r$\n'
+                FileClose $9
+                nsExec::Exec '"$INSTDIR\uninstall.bat"'
+                Pop $0
+                Delete $INSTDIR\uninstall.bat
+        ${EndIf}
+
         RMDir /r "$INSTDIR"
         RMDir /r "$SMPROGRAMS\Tewi HTTPd"