Roxen.git
/
server
/
etc
/
RoxenUI.wxs
version
»
Context lines:
10
20
40
80
file
none
3
Roxen.git/server/etc/RoxenUI.wxs:8:
<CustomAction Id="CustomTextA_SetProperty_EDIT2" Property="SERVER_PROTOCOL" Value="https" Execute="firstSequence" /> <CustomAction Id="CustomTextA_SetProperty_EDIT1" Property="SERVER_NAME" Value="Administration Interface" Execute="firstSequence" /> <CustomAction Id="CustomTextA_SetProperty_EDIT4" Property="ADM_USER" Value="administrator" Execute="firstSequence" /> <CustomAction Id="VSDCA_FolderForm_AllUsers" Property="FolderForm_AllUsers" Value="ALL" /> <CustomAction Id="CreateConfigInterface" Directory="SERVERDIR" ExeCommand='"[SERVERDIR]\pike\bin\pike" bin\create_configif.pike --batch server_name "[SERVER_NAME]" server_url "[SERVER_PROTOCOL]://*:[SERVER_PORT]/" user "[ADM_USER]" password "[ADM_PASS1]" ok y update n' Execute="deferred" /> <CustomAction Id="OldCreatePikeLocation" Directory="SERVERDIR" ExeCommand='"[SERVERDIR]\pike\bin\pike" -e "write(argv[1]); Stdio.write_file(argv[2], argv[3]);" "Creating pikelocation.txt..." "pikelocation.txt" "[SERVERDIR]\pike\bin\pike"' Execute="deferred" />
-
<CustomAction Id="CreatePikeLocation"
Script
="
vbscript
"
-
Execute
="
deferred
"
>
-
Dim fso, tf, serverdir
-
Set fso
=
CreateObject(
"
Scripting.FileSystemObject
"
)
-
Set serverdir = Session.Property("SERVERDIR")
-
Set tf = fso.CreateTextFile(serverdir & "pikelocation,txt", True)
-
tf.WriteLine(serverdir & "pike\bin\pike")
-
tf.Close
-
-
<
/
CustomAction
>
+
<CustomAction Id="CreatePikeLocation"
BinaryKey
="
Installer
"
+
VBScriptCall
="
CreatePikeLocation
"
Execute
="
deferred
" />
<CustomAction Id="StartBrowser" Property="BROWSER" ExeCommand="[SERVER_PROTOCOL]://localhost:[SERVER_PORT]/" Execute="deferred" Return="asyncNoWait" /> <UI> <Property Id="ErrorDialog"><![CDATA[ErrorDialog]]></Property> <Property Id="DefaultUIFont"><![CDATA[VsdDefaultUIFont.524F4245_5254_5341_4C45_534153783400]]></Property> <Dialog Id="UserExitForm" Width="373" Height="287" Title="[ProductName]"> <Control Id="CloseButton" Type="PushButton" X="300" Y="261" Width="66" Height="18" Default="yes" Cancel="yes"> <Text>{\VSI_MS_Sans_Serif13.0_0_0}&Close</Text> <Publish Event="EndDialog" Value="Return"><![CDATA[1]]></Publish>
Roxen.git/server/etc/RoxenUI.wxs:1129:
<Custom Action="CustomTextA_SetProperty_EDIT3" After="CustomTextA_SetProperty_EDIT2" /> <Custom Action="CustomTextA_SetProperty_EDIT4" After="CustomTextA_SetProperty_EDIT3" /> <Custom Action="DIRCA_TARGETDIR" After="CustomTextA_SetProperty_EDIT4"><![CDATA[TARGETDIR=""]]></Custom> <RemoveExistingProducts After="InstallInitialize" /> <Custom Action="CreateConfigInterface" Sequence="4100">REMOVE=""</Custom> <Custom Action="CreatePikeLocation" After="CreateConfigInterface">REMOVE=""</Custom> </InstallExecuteSequence> <Binary Id="DefBannerBitmap" src="Banner.bmp" /> <Binary Id="UpFldrBtn" src="UpFldrBtn.icon" /> <Binary Id="NewFldrBtn" src="NewFldrBtn.icon" />
+
<Binary Id="Installer" src="Win32Installer.vbs" />
</Fragment> </Wix>