Roxen.git
/
server
/
etc
/
RoxenUI.wxs
version
»
Context lines:
10
20
40
80
file
none
3
Roxen.git/server/etc/RoxenUI.wxs:2:
<Wix xmlns="http://schemas.microsoft.com/wix/2003/01/wi"> <Fragment Id="RoxenUI"> <CustomAction Id="DIRCA_TARGETDIR" Property="TARGETDIR" Value="[ProgramFilesFolder][Manufacturer]\[ProductName]" Execute="firstSequence" /> <CustomAction Id="ERRCA_CANCELNEWERVERSION" Error="[VSDVERSIONMSG]" /> <CustomAction Id="ERRCA_UIANDADVERTISED" Error="[VSDUIANDADVERTISED]" /> <CustomAction Id="CustomTextA_SetProperty_EDIT3" Property="SERVER_PORT" Value="22202" Execute="firstSequence" /> <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"
+
<CustomAction Id="
OldCreateConfigInterface
" 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="
CreateConfigInterface
"
Script
="
vbscript
"
+
Execute
="
deferred">
+
Dim WshShell
+
Set WshShell = Wscript.CreateObject("Wscript.Shell")
+
WshShell.Run """
[SERVERDIR]
pike\bin\pike
"
"
""[SERVERDIR]bin\create_configif.pike""
-
-batch
server_dir
"
"
[
SERVERDIR
]
""
server
_
name ""
[
SERVER_NAME
]
""
server_url ""
[
SERVER_PROTOCOL
]
://*:[SERVER_PORT]/
""
user
""
[ADM_USER]""
password
"
"
[
ADM_PASS1
]"
"
ok
y
update
n",
0,
True
+
<
/
CustomAction
>
<CustomAction Id="SetCreatePikeLocation" Property="CreatePikeLocation" Value="[SERVERDIR]" Execute="immediate" /> <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>