[installer] Add migration to the NSIS installer
This commit is contained in:
Vladimir Stoilov
@@ -118,7 +118,7 @@
|
||||
"windows": {
|
||||
"nsis": {
|
||||
"installMode": "perMachine",
|
||||
"installerHooks": "templates/nsis_install_hooks.nsh",
|
||||
"installerHooks": "templates/nsis/install_hooks.nsh",
|
||||
"installerIcon": "../../../assets/data/icons/pm_light.ico"
|
||||
},
|
||||
"wix": {
|
||||
|
||||
@@ -0,0 +1,27 @@
|
||||
SimpleSC - NSIS Service Control Plugin - License Agreement
|
||||
|
||||
This plugin is subject to the Mozilla Public License Version 1.1 (the "License");
|
||||
You may not use this plugin except in compliance with the License. You may
|
||||
obtain a copy of the License at http://www.mozilla.org/MPL.
|
||||
|
||||
Alternatively, you may redistribute this library, use and/or modify it
|
||||
under the terms of the GNU Lesser General Public License as published
|
||||
by the Free Software Foundation; either version 2.1 of the License,
|
||||
or (at your option) any later version. You may obtain a copy
|
||||
of the LGPL at www.gnu.org/copyleft.
|
||||
|
||||
Software distributed under the License is distributed on an "AS IS" basis,
|
||||
WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
|
||||
for the specific language governing rights and limitations under the License.
|
||||
|
||||
Copyright
|
||||
|
||||
Portions of this software are Copyright (C) 2001 - Peter Windridge, 2003 by
|
||||
Bernhard Mayer, Fixed and formatted by Brett Dever http://editor.nfscheats.com/
|
||||
|
||||
The original code is ServiceControl.pas, released April 16, 2007.
|
||||
|
||||
The initial developer of the original code is Rainer Budde (http://www.speed-soft.de).
|
||||
|
||||
SimpleSC - NSIS Service Control Plugin is written, published and maintaned by
|
||||
Rainer Budde (rainer@speed-soft.de).
|
||||
@@ -0,0 +1,335 @@
|
||||
NSIS Simple Service Plugin
|
||||
|
||||
This plugin contains basic service functions like start, stop the
|
||||
service or checking the service status. It also contains advanced
|
||||
service functions for example setting the service description, changed
|
||||
the logon account, granting or removing the service logon privilege.
|
||||
|
||||
|
||||
|
||||
|
||||
== Short Reference ==
|
||||
|
||||
|
||||
SimpleSC::InstallService [name_of_service] [display_name] [service_type] [start_type] [binary_path] [dependencies] [account] [password]
|
||||
SimpleSC::RemoveService [name_of_service]
|
||||
|
||||
SimpleSC::StartService [name_of_service] [arguments] [timeout]
|
||||
SimpleSC::StopService [name_of_service] [wait_for_file_release] [timeout]
|
||||
SimpleSC::PauseService [name_of_service] [timeout]
|
||||
SimpleSC::ContinueService [name_of_service] [timeout]
|
||||
SimpleSC::RestartService [name_of_service] [arguments] [timeout]
|
||||
SimpleSC::ExistsService [name_of_service]
|
||||
|
||||
SimpleSC::GetServiceDisplayName [name_of_service]
|
||||
SimpleSC::GetServiceName [display_name]
|
||||
SimpleSC::GetServiceStatus [name_of_service]
|
||||
SimpleSC::GetServiceDescription [name_of_service]
|
||||
SimpleSC::GetServiceStartType [name_of_service]
|
||||
SimpleSC::GetServiceBinaryPath [name_of_service]
|
||||
SimpleSC::GetServiceLogon [name_of_service]
|
||||
SimpleSC::GetServiceFailure [name_of_service]
|
||||
SimpleSC::GetServiceFailureFlag [name_of_service]
|
||||
SimpleSC::GetServiceDelayedAutoStartInfo [name_of_service]
|
||||
|
||||
SimpleSC::SetServiceDescription [name_of_service] [service_description]
|
||||
SimpleSC::SetServiceStartType [name_of_service] [start_type]
|
||||
SimpleSC::SetServiceBinaryPath [name_of_service] [binary_path]
|
||||
SimpleSC::SetServiceLogon [name_of_service] [account] [password]
|
||||
SimpleSC::SetServiceFailure [name_of_service] [reset_period] [reboot_message] [command] [action_type_1] [action_delay_1] [action_type_2] [action_delay_2] [action_type_3] [action_delay_3]
|
||||
SimpleSC::SetServiceFailureFlag [name_of_service] [failure_actions_on_non_crash_failures]
|
||||
SimpleSC::SetServiceDelayedAutoStartInfo [name_of_service] [delayed_autostart]
|
||||
|
||||
SimpleSC::GrantServiceLogonPrivilege [account]
|
||||
SimpleSC::RemoveServiceLogonPrivilege [account]
|
||||
|
||||
SimpleSC::ServiceIsPaused [name_of_service]
|
||||
SimpleSC::ServiceIsRunning [name_of_service]
|
||||
SimpleSC::ServiceIsStopped [name_of_service]
|
||||
|
||||
SimpleSC::GetErrorMessage [error_code]
|
||||
|
||||
|
||||
Parameters:
|
||||
|
||||
name_of_service - The name of the service used for Start/Stop commands and all further commands
|
||||
|
||||
display_name - The name as shown in the service control manager applet in system control
|
||||
|
||||
service_type - One of the following codes
|
||||
1 - SERVICE_KERNEL_DRIVER - Driver service.
|
||||
2 - SERVICE_FILE_SYSTEM_DRIVER - File system driver service.
|
||||
16 - SERVICE_WIN32_OWN_PROCESS - Service that runs in its own process. (Should be used in most cases)
|
||||
32 - SERVICE_WIN32_SHARE_PROCESS - Service that shares a process with one or more other services.
|
||||
256 - SERVICE_INTERACTIVE_PROCESS - The service can interact with the desktop.
|
||||
Note: If you specify either SERVICE_WIN32_OWN_PROCESS or SERVICE_WIN32_SHARE_PROCESS,
|
||||
and the service is running in the context of the LocalSystem account,
|
||||
you can also specify this value.
|
||||
Example: SERVICE_WIN32_OWN_PROCESS or SERVICE_INTERACTIVE_PROCESS - (16 or 256) = 272
|
||||
Note: Services cannot directly interact with a user as of Windows Vista.
|
||||
Therefore, this technique should not be used in new code.
|
||||
See for more information: http://msdn2.microsoft.com/en-us/library/ms683502(VS.85).aspx
|
||||
|
||||
start_type - one of the following codes
|
||||
0 - SERVICE_BOOT_START - Driver boot stage start
|
||||
1 - SERVICE_SYSTEM_START - Driver scm stage start
|
||||
2 - SERVICE_AUTO_START - Service auto start (Should be used in most cases)
|
||||
3 - SERVICE_DEMAND_START - Driver/service manual start
|
||||
4 - SERVICE_DISABLED - Driver/service disabled
|
||||
|
||||
service_status - one of the following codes
|
||||
1 - SERVICE_STOPPED
|
||||
2 - SERVICE_START_PENDING
|
||||
3 - SERVICE_STOP_PENDING
|
||||
4 - SERVICE_RUNNING
|
||||
5 - SERVICE_CONTINUE_PENDING
|
||||
6 - SERVICE_PAUSE_PENDING
|
||||
7 - SERVICE_PAUSED
|
||||
|
||||
binary_path - The path to the binary including all necessary parameters
|
||||
|
||||
dependencies - Needed services, controls which services have to be started before this one; use the forward slash "/" to add more more than one service
|
||||
|
||||
account - The username/account which should be used
|
||||
|
||||
password - Password of the aforementioned account to be able to logon as a service
|
||||
Note: If you do not specify account/password, the local system account will be used to run the service
|
||||
|
||||
arguments - Arguments passed to the service main function.
|
||||
Note: Driver services do not receive these arguments.
|
||||
|
||||
reset_period - The time after which to reset the failure count to zero if there are no failures, in seconds. Specify 0 (INFINITE) to indicate that this value should never be reset
|
||||
|
||||
reboot_message - The message to be broadcast to server users before rebooting
|
||||
|
||||
command - The command line of the process to execute in response to the SC_ACTION_RUN_COMMAND service controller action. This process runs under the same account as the service
|
||||
|
||||
timeout - Timeout in seconds of the function
|
||||
|
||||
action_type_x - one of the following codes for the action to be performed
|
||||
0 - SC_ACTION_NONE - No action
|
||||
1 - SC_ACTION_RESTART - Restart the service
|
||||
2 - SC_ACTION_REBOOT - Reboot the computer (Note: The service user must have the SE_SHUTDOWN_NAME privilege)
|
||||
3 - SC_ACTION_RUN_COMMAND - Run a command
|
||||
|
||||
action_delay_x - The time to wait before performing the specified action, in milliseconds
|
||||
|
||||
failure_actions_on_non_crash_failures - This setting determines when failure actions are to be executed
|
||||
0 - The failure actions executed only if the service terminates without reporting a status of SERVICE_STOPPED
|
||||
1 - The failure actions executed if the status of a service is SERVICE_STOPPED but the exit code of the service is not 0
|
||||
|
||||
delayed_autostart - The delayed auto-start setting of an auto-start service
|
||||
0 - The service will be started during system boot.
|
||||
1 - The service will be started after other auto-start services are started plus a short delay
|
||||
|
||||
error_code - Error code of a function
|
||||
|
||||
service_description - The description as shown in the service control manager applet in system control
|
||||
|
||||
wait_for_file_release - Wait for file release after the service is stopped. This is useful if the binary file will be overwritten after stopping the service.
|
||||
0 - NO_WAIT - No wait for file release
|
||||
1 - WAIT - Wait for file release
|
||||
Note: If SERVICE_WIN32_OWN_PROCESS is used this option should be set to WAIT.
|
||||
If SERVICE_WIN32_SHARE_PROCESS is used this option should only be set to WAIT if the last service
|
||||
in the process is stopped.
|
||||
|
||||
|
||||
|
||||
|
||||
== The Sample Script ==
|
||||
|
||||
|
||||
; Install a service - ServiceType own process - StartType automatic - NoDependencies - Logon as System Account
|
||||
SimpleSC::InstallService "MyService" "My Service Display Name" "16" "2" "C:\MyPath\MyService.exe" "" "" ""
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Install a service - ServiceType interact with desktop - StartType automatic - Dependencies on "Windows Time Service" (w32time) and "WWW Publishing Service" (w3svc) - Logon as System Account
|
||||
SimpleSC::InstallService "MyService" "My Service Display Name" "272" "2" "C:\MyPath\MyService.exe" "w32time/w3svc" "" ""
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Remove a service
|
||||
SimpleSC::RemoveService "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Start a service
|
||||
SimpleSC::StartService "MyService" "" 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Start a service with two arguments "/param1=true" "/param2=1"
|
||||
SimpleSC::StartService "MyService" "/param1=true /param2=1" 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Start a service with two arguments "-p param1" "-param2"
|
||||
SimpleSC::StartService "MyService" '"-p param1" -param2' 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Stop a service and waits for file release
|
||||
SimpleSC::StopService "MyService" 1 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Stops two services and waits for file release after the last service is stopped
|
||||
SimpleSC::StopService "MyService1" 0 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
SimpleSC::StopService "MyService2" 1 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Pause a service
|
||||
SimpleSC::PauseService "MyService" 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Continue a service
|
||||
SimpleSC::ContinueService "MyService" 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Restart a service
|
||||
SimpleSC::RestartService "MyService" "" 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Restart a service with two arguments "/param1=true" "/param2=1"
|
||||
SimpleSC::RestartService "MyService" "/param1=true /param2=1" 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Start a service with two arguments "-p param1" "-param2"
|
||||
SimpleSC::RestartService "MyService" '"-p param1" -param2' 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Check if the service exists
|
||||
SimpleSC::ExistsService "MyService"
|
||||
Pop $0 ; returns an errorcode if the service doesn´t exists (<>0)/service exists (0)
|
||||
|
||||
; Get the displayname of a service
|
||||
SimpleSC::GetServiceDisplayName "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the displayname of the service
|
||||
|
||||
; Get the servicename of a service by the displayname
|
||||
SimpleSC::GetServiceName "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the servicename of the service
|
||||
|
||||
; Get the current status of a service
|
||||
SimpleSC::GetServiceStatus "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; return the status of the service (See "service_status" in the parameters)
|
||||
|
||||
; Get the description of a service
|
||||
SimpleSC::GetServiceDescription "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the description of the service
|
||||
|
||||
; Get the start type of the service
|
||||
SimpleSC::GetServiceStartType "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the start type of the service (see "start_type" in the parameters)
|
||||
|
||||
; Get the binary path of a service
|
||||
SimpleSC::GetServiceBinaryPath "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the binary path of the service
|
||||
|
||||
; Get the logon user of the service
|
||||
SimpleSC::GetServiceLogon "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the logon username of the service
|
||||
|
||||
; Get the failure configuration of a service
|
||||
SimpleSC::GetServiceFailure "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the reset period
|
||||
Pop $2 ; returns the reboot message
|
||||
Pop $3 ; returns the command
|
||||
Pop $4 ; returns the first action (See "action_type_x" in the parameters)
|
||||
Pop $5 ; returns the first action delay
|
||||
Pop $6 ; returns the second action (See "action_type_x" in the parameters)
|
||||
Pop $7 ; returns the second action delay
|
||||
Pop $8 ; returns the third action (See "action_type_x" in the parameters)
|
||||
Pop $9 ; returns the third action delay
|
||||
|
||||
; Get the failure flag configuration of a service
|
||||
SimpleSC::GetServiceFailureFlag "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the service flag
|
||||
|
||||
; Get the delayed auto-start configuration of a service
|
||||
SimpleSC::GetServiceDelayedAutoStartInfo "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns the delayed auto-start configuration
|
||||
|
||||
; Set the description of a service
|
||||
SimpleSC::SetServiceDescription "MyService" "Sample Description"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Set the starttype to automatic of a service
|
||||
SimpleSC::SetServiceStartType "MyService" "2"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Sets the service binary path
|
||||
SimpleSC::SetServiceBinaryPath "MyService" "C:\MySoftware\MyService.exe"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Sets the service logon to a user and grant the user the "SeServiceLogonPrivilege"
|
||||
SimpleSC::SetServiceLogon "MyService" "MyServiceUser" "MyServiceUserPassword"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
IntCmp $0 0 +1 Done Done ; If successful grant the service logon privilege to "MyServiceUser"
|
||||
; Note: Every serviceuser must have the ServiceLogonPrivilege to start the service
|
||||
SimpleSC::GrantServiceLogonPrivilege "MyServiceUser"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Done:
|
||||
|
||||
; Sets the service failure configuration - First action: Restart the service after one minute - Second action: Reboot the computer after five minutes
|
||||
SimpleSC::SetServiceFailure "MyService" "0" "" "" "1" "60000" "2" "300000" "0" "0"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Sets the failure flag configuration of a service
|
||||
SimpleSC::SetServiceFailureFlag "MyService" "1"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Sets the delayed auto-start configuration of a service
|
||||
SimpleSC::SetServiceDelayedAutoStartInfo "MyService" "1"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Remove the "SeServiceLogonPrivilege" from a user
|
||||
SimpleSC::RemoveServiceLogonPrivilege "MyServiceUser"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
|
||||
; Check if the service is paused
|
||||
SimpleSC::ServiceIsPaused "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns 1 (service is paused) - returns 0 (service is not paused)
|
||||
|
||||
; Check if the service is running
|
||||
SimpleSC::ServiceIsRunning "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns 1 (service is running) - returns 0 (service is not running)
|
||||
|
||||
; Check if the service is stopped
|
||||
SimpleSC::ServiceIsStopped "MyService"
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
Pop $1 ; returns 1 (service is stopped) - returns 0 (service is not stopped)
|
||||
|
||||
; Show the error message if a function fails
|
||||
SimpleSC::StopService "MyService" 1 30
|
||||
Pop $0 ; returns an errorcode (<>0) otherwise success (0)
|
||||
IntCmp $0 0 Done +1 +1
|
||||
Push $0
|
||||
SimpleSC::GetErrorMessage
|
||||
Pop $0
|
||||
MessageBox MB_OK|MB_ICONSTOP "Stopping fails - Reason: $0"
|
||||
Done:
|
||||
|
||||
|
||||
|
||||
|
||||
== Important Notes ==
|
||||
- The function "SetServiceLogon" only works if the servicetype is
|
||||
"SERVICE_WIN32_OWN_PROCESS".
|
||||
- The functions "GetServiceDescription", "SetServiceDescription", "GetServiceFailure" and
|
||||
"SetServiceFailure" are only available on systems higher than Windows NT.
|
||||
- The function "GetServiceFailureFlag", "SetServiceFailureFlag", "GetServiceDelayedAutoStartInfo" and
|
||||
"SetServiceDelayedAutoStartInfo" are only available on systems higher than Windows 2003.
|
||||
- If you change the logon of an service to a new user you have to grant him
|
||||
the Service Logon Privilege. Otherwise the service cannot be started by
|
||||
the user you have assigned.
|
||||
- The functions StartService, StopService, PauseService and ContinueService uses
|
||||
a timeout of 30 seconds. This means the function must be executed within 30 seconds,
|
||||
otherwise the functions will return an error.
|
||||
Binary file not shown.
@@ -0,0 +1,259 @@
|
||||
{
|
||||
License Agreement
|
||||
|
||||
This content is subject to the Mozilla Public License Version 1.1 (the "License");
|
||||
You may not use this plugin except in compliance with the License. You may
|
||||
obtain a copy of the License at http://www.mozilla.org/MPL.
|
||||
|
||||
Alternatively, you may redistribute this library, use and/or modify it
|
||||
under the terms of the GNU Lesser General Public License as published
|
||||
by the Free Software Foundation; either version 2.1 of the License,
|
||||
or (at your option) any later version. You may obtain a copy
|
||||
of the LGPL at www.gnu.org/copyleft.
|
||||
|
||||
Software distributed under the License is distributed on an "AS IS" basis,
|
||||
WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
|
||||
for the specific language governing rights and limitations under the License.
|
||||
|
||||
The original code is LSASecurityControl.pas, released April 16, 2007.
|
||||
|
||||
The initial developer of the original code is Rainer Döpke
|
||||
(Formerly: Rainer Budde) (https://www.speed-soft.de).
|
||||
|
||||
SimpleSC - NSIS Service Control Plugin is written, published and maintained by
|
||||
Rainer Döpke (rainer@speed-soft.de).
|
||||
}
|
||||
unit LSASecurityControl;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Winapi.Windows;
|
||||
|
||||
function GrantPrivilege(AccountName: String; PrivilegeName: String): Integer;
|
||||
function RemovePrivilege(AccountName: String; PrivilegeName: String): Integer;
|
||||
function EnablePrivilege(PrivilegeName: String): Integer;
|
||||
function DisablePrivilege(PrivilegeName: String): Integer;
|
||||
|
||||
implementation
|
||||
|
||||
type
|
||||
LSA_HANDLE = Pointer;
|
||||
TLSAHandle = LSA_HANDLE;
|
||||
|
||||
LSA_UNICODE_STRING = record
|
||||
Length: Word;
|
||||
MaximumLength: Word;
|
||||
Buffer: PWideChar;
|
||||
end;
|
||||
TLSAUnicodeString = LSA_UNICODE_STRING;
|
||||
PLSAUnicodeString = ^TLSAUnicodeString;
|
||||
|
||||
LSA_OBJECT_ATTRIBUTES = record
|
||||
Length: ULONG;
|
||||
RootDirectory: THandle;
|
||||
ObjectName: PLSAUnicodeString;
|
||||
Attributes: ULONG;
|
||||
SecurityDescriptor: Pointer;
|
||||
SecurityQualityOfService: Pointer;
|
||||
end;
|
||||
TLsaObjectAttributes = LSA_OBJECT_ATTRIBUTES;
|
||||
PLsaObjectAttributes = ^TLsaObjectAttributes;
|
||||
|
||||
function LsaOpenPolicy(SystemName: PLSAUnicodeString; var ObjectAttributes: TLsaObjectAttributes; DesiredAccess: ACCESS_MASK; var PolicyHandle: LSA_HANDLE): DWORD; stdcall; external 'advapi32.dll';
|
||||
function LsaAddAccountRights(PolicyHandle: LSA_HANDLE; AccountSid: PSID; UserRights: PLSAUnicodeString; CountOfRights: ULONG): DWORD; stdcall; external 'advapi32.dll';
|
||||
function LsaRemoveAccountRights(PolicyHandle: LSA_HANDLE; AccountSid: PSID; AllRights: Boolean; UserRights: PLSAUnicodeString; CountOfRights: ULONG): DWORD; stdcall; external 'advapi32.dll';
|
||||
function LsaClose(ObjectHandle: LSA_HANDLE): DWORD; stdcall; external 'advapi32.dll';
|
||||
|
||||
|
||||
function GetAccountSid(const AccountName: String; var Sid: PSID): Integer;
|
||||
var
|
||||
DomainSize: LongWord;
|
||||
SidSize: LongWord;
|
||||
Domain: String;
|
||||
Use: SID_NAME_USE;
|
||||
begin
|
||||
Result := 0;
|
||||
|
||||
SidSize := 0;
|
||||
DomainSize := 0;
|
||||
|
||||
if not LookupAccountName(nil, PChar(AccountName), nil, SidSize, nil, DomainSize, Use) and (GetLastError = ERROR_INSUFFICIENT_BUFFER) then
|
||||
begin
|
||||
SetLength(Domain, DomainSize);
|
||||
Sid := AllocMem(SidSize);
|
||||
|
||||
if not LookupAccountName(nil, PChar(AccountName), Sid, SidSize, PChar(Domain), DomainSize, Use) then
|
||||
begin
|
||||
Result := GetLastError;
|
||||
FreeMem(Sid);
|
||||
Sid := nil;
|
||||
end;
|
||||
end
|
||||
else
|
||||
Result := GetLastError;
|
||||
end;
|
||||
|
||||
function GrantPrivilege(AccountName: String; PrivilegeName: String): Integer;
|
||||
const
|
||||
UNICODE_NULL = WCHAR(0);
|
||||
POLICY_CREATE_ACCOUNT = $00000010;
|
||||
POLICY_LOOKUP_NAMES = $00000800;
|
||||
var
|
||||
SID: PSID;
|
||||
PolicyHandle: TLSAHandle;
|
||||
LSAPrivilegeName: TLSAUnicodeString;
|
||||
LSAObjectAttributes: TLsaObjectAttributes;
|
||||
pwszPrivilegeName: PWideChar;
|
||||
PrivilegeNameLength: Cardinal;
|
||||
Status: DWORD;
|
||||
begin
|
||||
Result := 0;
|
||||
|
||||
GetMem(pwszPrivilegeName, Length(PrivilegeName) * SizeOf(WideChar) + 1);
|
||||
StringToWideChar(PrivilegeName, pwszPrivilegeName, Length(PrivilegeName) * SizeOf(WideChar) + 1);
|
||||
ZeroMemory(@LSAObjectAttributes, SizeOf(TLsaObjectAttributes));
|
||||
PrivilegeNameLength := Length(pwszPrivilegeName);
|
||||
|
||||
if PrivilegeNameLength > 0 then
|
||||
begin
|
||||
Result := GetAccountSid(AccountName, SID);
|
||||
|
||||
if Result = 0 then
|
||||
begin
|
||||
LSAPrivilegeName.Length := PrivilegeNameLength * SizeOf(WideChar);
|
||||
LSAPrivilegeName.MaximumLength := LSAPrivilegeName.Length + SizeOf(UNICODE_NULL);
|
||||
LSAPrivilegeName.Buffer := pwszPrivilegeName;
|
||||
|
||||
Status := LsaOpenPolicy(nil, LSAObjectAttributes, POLICY_LOOKUP_NAMES or POLICY_CREATE_ACCOUNT, PolicyHandle);
|
||||
try
|
||||
if Status = 0 then
|
||||
Result := LsaAddAccountRights(PolicyHandle, Sid, @LSAPrivilegeName, 1)
|
||||
else
|
||||
Result := Status;
|
||||
finally
|
||||
LsaClose(PolicyHandle);
|
||||
end;
|
||||
end;
|
||||
|
||||
end;
|
||||
|
||||
FreeMem(pwszPrivilegeName);
|
||||
end;
|
||||
|
||||
function RemovePrivilege(AccountName: String; PrivilegeName: String): Integer;
|
||||
const
|
||||
UNICODE_NULL = WCHAR(0);
|
||||
POLICY_CREATE_ACCOUNT = $00000010;
|
||||
POLICY_LOOKUP_NAMES = $00000800;
|
||||
var
|
||||
SID: PSID;
|
||||
PolicyHandle: TLSAHandle;
|
||||
LSAPrivilegeName: TLSAUnicodeString;
|
||||
LSAObjectAttributes: TLsaObjectAttributes;
|
||||
pwszPrivilegeName: PWideChar;
|
||||
PrivilegeNameLength: Cardinal;
|
||||
Status: DWORD;
|
||||
begin
|
||||
Result := 0;
|
||||
|
||||
GetMem(pwszPrivilegeName, Length(PrivilegeName) * SizeOf(WideChar) + 1);
|
||||
StringToWideChar(PrivilegeName, pwszPrivilegeName, Length(PrivilegeName) * SizeOf(WideChar) + 1);
|
||||
ZeroMemory(@LSAObjectAttributes, SizeOf(TLsaObjectAttributes));
|
||||
PrivilegeNameLength := Length(pwszPrivilegeName);
|
||||
|
||||
if PrivilegeNameLength > 0 then
|
||||
begin
|
||||
Result := GetAccountSid(AccountName, SID);
|
||||
|
||||
if Result = 0 then
|
||||
begin
|
||||
LSAPrivilegeName.Length := PrivilegeNameLength * SizeOf(WideChar);
|
||||
LSAPrivilegeName.MaximumLength := LSAPrivilegeName.Length + SizeOf(UNICODE_NULL);
|
||||
LSAPrivilegeName.Buffer := pwszPrivilegeName;
|
||||
|
||||
Status := LsaOpenPolicy(nil, LSAObjectAttributes, POLICY_LOOKUP_NAMES or POLICY_CREATE_ACCOUNT, PolicyHandle);
|
||||
|
||||
try
|
||||
if Status = 0 then
|
||||
Result := LsaRemoveAccountRights(PolicyHandle, Sid, False, @LSAPrivilegeName, 1)
|
||||
else
|
||||
Result := Status;
|
||||
finally
|
||||
LsaClose(PolicyHandle);
|
||||
end;
|
||||
end;
|
||||
|
||||
end;
|
||||
|
||||
FreeMem(pwszPrivilegeName);
|
||||
end;
|
||||
|
||||
function EnablePrivilege(PrivilegeName: String): Integer;
|
||||
var
|
||||
TokenHandle: THandle;
|
||||
TokenPrivileges: TOKEN_PRIVILEGES;
|
||||
PreviousState: TOKEN_PRIVILEGES;
|
||||
ReturnLength: Cardinal;
|
||||
begin
|
||||
Result := 0;
|
||||
|
||||
if OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY, TokenHandle) then
|
||||
begin
|
||||
try
|
||||
|
||||
if LookupPrivilegeValue(nil, PWideChar(PrivilegeName), TokenPrivileges.Privileges[0].Luid) then
|
||||
begin
|
||||
TokenPrivileges.PrivilegeCount := 1;
|
||||
TokenPrivileges.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;
|
||||
|
||||
if not AdjustTokenPrivileges(TokenHandle, False, TokenPrivileges, SizeOf(TokenPrivileges), PreviousState, ReturnLength) then
|
||||
Result := System.GetLastError;
|
||||
end
|
||||
else
|
||||
Result := System.GetLastError;
|
||||
|
||||
finally
|
||||
CloseHandle(TokenHandle);
|
||||
end;
|
||||
end
|
||||
else
|
||||
Result := System.GetLastError;
|
||||
|
||||
end;
|
||||
|
||||
function DisablePrivilege(PrivilegeName: String): Integer;
|
||||
var
|
||||
TokenHandle: THandle;
|
||||
TokenPrivileges: TOKEN_PRIVILEGES;
|
||||
PreviousState: TOKEN_PRIVILEGES;
|
||||
ReturnLength: Cardinal;
|
||||
begin
|
||||
|
||||
Result := 0;
|
||||
|
||||
if OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY, TokenHandle) then
|
||||
begin
|
||||
try
|
||||
|
||||
if LookupPrivilegeValue(nil, PWideChar(PrivilegeName), TokenPrivileges.Privileges[0].Luid) then
|
||||
begin
|
||||
TokenPrivileges.PrivilegeCount := 1;
|
||||
TokenPrivileges.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;
|
||||
|
||||
if not AdjustTokenPrivileges(TokenHandle, False, TokenPrivileges, SizeOf(TokenPrivileges), PreviousState, ReturnLength) then
|
||||
Result := System.GetLastError;
|
||||
end
|
||||
else
|
||||
Result := System.GetLastError;
|
||||
|
||||
finally
|
||||
CloseHandle(TokenHandle);
|
||||
end;
|
||||
end
|
||||
else
|
||||
Result := System.GetLastError;
|
||||
|
||||
end;
|
||||
|
||||
end.
|
||||
@@ -0,0 +1,36 @@
|
||||
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<ProjectGuid>{0AF40426-B62C-4F43-8B49-19A70AEA0832}</ProjectGuid>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Projects Include="SimpleSC.dproj">
|
||||
<Dependencies/>
|
||||
</Projects>
|
||||
</ItemGroup>
|
||||
<ProjectExtensions>
|
||||
<Borland.Personality>Default.Personality.12</Borland.Personality>
|
||||
<Borland.ProjectType/>
|
||||
<BorlandProject>
|
||||
<Default.Personality/>
|
||||
</BorlandProject>
|
||||
</ProjectExtensions>
|
||||
<Target Name="SimpleSC">
|
||||
<MSBuild Projects="SimpleSC.dproj"/>
|
||||
</Target>
|
||||
<Target Name="SimpleSC:Clean">
|
||||
<MSBuild Projects="SimpleSC.dproj" Targets="Clean"/>
|
||||
</Target>
|
||||
<Target Name="SimpleSC:Make">
|
||||
<MSBuild Projects="SimpleSC.dproj" Targets="Make"/>
|
||||
</Target>
|
||||
<Target Name="Build">
|
||||
<CallTarget Targets="SimpleSC"/>
|
||||
</Target>
|
||||
<Target Name="Clean">
|
||||
<CallTarget Targets="SimpleSC:Clean"/>
|
||||
</Target>
|
||||
<Target Name="Make">
|
||||
<CallTarget Targets="SimpleSC:Make"/>
|
||||
</Target>
|
||||
<Import Project="$(BDS)\Bin\CodeGear.Group.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Group.Targets')"/>
|
||||
</Project>
|
||||
@@ -0,0 +1,209 @@
|
||||
{
|
||||
Original Code from
|
||||
(C) 2001 - Peter Windridge
|
||||
|
||||
Code in separate unit and some changes
|
||||
2003 by Bernhard Mayer
|
||||
|
||||
Fixed and formatted by Brett Dever
|
||||
http://editor.nfscheats.com/
|
||||
|
||||
simply include this unit in your plugin project and export
|
||||
functions as needed
|
||||
}
|
||||
|
||||
unit nsis;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Winapi.Windows, Winapi.CommCtrl, System.SysUtils;
|
||||
|
||||
type
|
||||
VarConstants = (
|
||||
INST_0, // $0
|
||||
INST_1, // $1
|
||||
INST_2, // $2
|
||||
INST_3, // $3
|
||||
INST_4, // $4
|
||||
INST_5, // $5
|
||||
INST_6, // $6
|
||||
INST_7, // $7
|
||||
INST_8, // $8
|
||||
INST_9, // $9
|
||||
INST_R0, // $R0
|
||||
INST_R1, // $R1
|
||||
INST_R2, // $R2
|
||||
INST_R3, // $R3
|
||||
INST_R4, // $R4
|
||||
INST_R5, // $R5
|
||||
INST_R6, // $R6
|
||||
INST_R7, // $R7
|
||||
INST_R8, // $R8
|
||||
INST_R9, // $R9
|
||||
INST_CMDLINE, // $CMDLINE
|
||||
INST_INSTDIR, // $INSTDIR
|
||||
INST_OUTDIR, // $OUTDIR
|
||||
INST_EXEDIR, // $EXEDIR
|
||||
INST_LANG, // $LANGUAGE
|
||||
__INST_LAST
|
||||
);
|
||||
TVariableList = INST_0..__INST_LAST;
|
||||
|
||||
type
|
||||
PluginCallbackMessages = (
|
||||
NSPIM_UNLOAD, // This is the last message a plugin gets, do final cleanup
|
||||
NSPIM_GUIUNLOAD // Called after .onGUIEnd
|
||||
);
|
||||
TNSPIM = NSPIM_UNLOAD..NSPIM_GUIUNLOAD;
|
||||
|
||||
//TPluginCallback = function (const NSPIM: Integer): Pointer; cdecl;
|
||||
|
||||
TExecuteCodeSegment = function (const funct_id: Integer; const parent: HWND): Integer; stdcall;
|
||||
Tvalidate_filename = procedure (const filename: PChar); stdcall;
|
||||
TRegisterPluginCallback = function (const DllInstance: HMODULE; const CallbackFunction: Pointer): Integer; stdcall;
|
||||
|
||||
pexec_flags_t = ^exec_flags_t;
|
||||
exec_flags_t = record
|
||||
autoclose: Integer;
|
||||
all_user_var: Integer;
|
||||
exec_error: Integer;
|
||||
abort: Integer;
|
||||
exec_reboot: Integer;
|
||||
reboot_called: Integer;
|
||||
XXX_cur_insttype: Integer;
|
||||
plugin_api_version: Integer;
|
||||
silent: Integer;
|
||||
instdir_error: Integer;
|
||||
rtl: Integer;
|
||||
errlvl: Integer;
|
||||
alter_reg_view: Integer;
|
||||
status_update: Integer;
|
||||
end;
|
||||
|
||||
pextrap_t = ^extrap_t;
|
||||
extrap_t = record
|
||||
exec_flags: Pointer; // exec_flags_t;
|
||||
exec_code_segment: TExecuteCodeSegment; // TFarProc;
|
||||
validate_filename: Pointer; // Tvalidate_filename;
|
||||
RegisterPluginCallback: Pointer; //TRegisterPluginCallback;
|
||||
end;
|
||||
|
||||
pstack_t = ^stack_t;
|
||||
stack_t = record
|
||||
next: pstack_t;
|
||||
text: PChar;
|
||||
end;
|
||||
|
||||
var
|
||||
g_stringsize: integer;
|
||||
g_stacktop: ^pstack_t;
|
||||
g_variables: PChar;
|
||||
g_hwndParent: HWND;
|
||||
g_hwndList: HWND;
|
||||
g_hwndLogList: HWND;
|
||||
g_extraparameters: pextrap_t;
|
||||
|
||||
procedure Init(const hwndParent: HWND; const string_size: integer; const variables: PChar; const stacktop: pointer; const extraparameters: pointer = nil);
|
||||
|
||||
function LogMessage(Msg : String): BOOL;
|
||||
function Call(NSIS_func : String) : Integer;
|
||||
function PopString(): string;
|
||||
procedure PushString(const str: string='');
|
||||
function GetUserVariable(const varnum: TVariableList): string;
|
||||
procedure SetUserVariable(const varnum: TVariableList; const value: string);
|
||||
procedure NSISDialog(const text, caption: string; const buttons: integer);
|
||||
|
||||
implementation
|
||||
|
||||
procedure Init(const hwndParent: HWND; const string_size: integer; const variables: PChar; const stacktop: pointer; const extraparameters: pointer = nil);
|
||||
begin
|
||||
g_stringsize := string_size;
|
||||
g_hwndParent := hwndParent;
|
||||
g_stacktop := stacktop;
|
||||
g_variables := variables;
|
||||
g_hwndList := FindWindowEx(FindWindowEx(g_hwndParent, 0, '#32770', nil), 0,'SysListView32', nil);
|
||||
g_extraparameters := extraparameters;
|
||||
end;
|
||||
|
||||
|
||||
function Call(NSIS_func : String) : Integer;
|
||||
var
|
||||
codeoffset: Integer; //The ID of nsis function
|
||||
begin
|
||||
Result := 0;
|
||||
codeoffset := StrToIntDef(NSIS_func, 0);
|
||||
if (codeoffset <> 0) and (g_extraparameters <> nil) then
|
||||
begin
|
||||
codeoffset := codeoffset - 1;
|
||||
Result := g_extraparameters.exec_code_segment(codeoffset, g_hwndParent);
|
||||
end;
|
||||
end;
|
||||
|
||||
function LogMessage(Msg : String): BOOL;
|
||||
var
|
||||
ItemCount : Integer;
|
||||
item: TLVItem;
|
||||
begin
|
||||
Result := FAlse;
|
||||
if g_hwndList = 0 then exit;
|
||||
FillChar( item, sizeof(item), 0 );
|
||||
ItemCount := SendMessage(g_hwndList, LVM_GETITEMCOUNT, 0, 0);
|
||||
item.iItem := ItemCount;
|
||||
item.mask := LVIF_TEXT;
|
||||
item.pszText := PChar(Msg);
|
||||
ListView_InsertItem(g_hwndList, item);
|
||||
ListView_EnsureVisible(g_hwndList, ItemCount, TRUE);
|
||||
end;
|
||||
|
||||
function PopString(): string;
|
||||
var
|
||||
th: pstack_t;
|
||||
begin
|
||||
if integer(g_stacktop^) <> 0 then begin
|
||||
th := g_stacktop^;
|
||||
Result := PChar(@th.text);
|
||||
g_stacktop^ := th.next;
|
||||
GlobalFree(HGLOBAL(th));
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure PushString(const str: string='');
|
||||
var
|
||||
th: pstack_t;
|
||||
begin
|
||||
if integer(g_stacktop) <> 0 then begin
|
||||
th := pstack_t(GlobalAlloc(GPTR, SizeOf(stack_t) + g_stringsize));
|
||||
lstrcpyn(@th.text, PChar(str), g_stringsize);
|
||||
th.next := g_stacktop^;
|
||||
g_stacktop^ := th;
|
||||
end;
|
||||
end;
|
||||
|
||||
function GetUserVariable(const varnum: TVariableList): string;
|
||||
begin
|
||||
if (integer(varnum) >= 0) and (integer(varnum) < integer(__INST_LAST)) then
|
||||
Result := g_variables + integer(varnum) * g_stringsize
|
||||
else
|
||||
Result := '';
|
||||
end;
|
||||
|
||||
procedure SetUserVariable(const varnum: TVariableList; const value: string);
|
||||
begin
|
||||
if (value <> '') and (integer(varnum) >= 0) and (integer(varnum) < integer(__INST_LAST)) then
|
||||
lstrcpy(g_variables + integer(varnum) * g_stringsize, PChar(value))
|
||||
end;
|
||||
|
||||
procedure NSISDialog(const text, caption: string; const buttons: integer);
|
||||
var
|
||||
hwndOwner: HWND;
|
||||
begin
|
||||
hwndOwner := g_hwndParent;
|
||||
if not IsWindow(g_hwndParent) then hwndOwner := 0; // g_hwndParent is not valid in NSPIM_[GUI]UNLOAD
|
||||
MessageBox(hwndOwner, PChar(text), PChar(caption), buttons);
|
||||
end;
|
||||
|
||||
begin
|
||||
|
||||
end.
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,609 @@
|
||||
library SimpleSC;
|
||||
|
||||
uses
|
||||
Winapi.Windows,
|
||||
System.SysUtils,
|
||||
NSIS in 'NSIS.pas',
|
||||
ServiceControl in 'ServiceControl.pas',
|
||||
LSASecurityControl in 'LSASecurityControl.pas';
|
||||
|
||||
function BoolToStr(Value: Boolean): String;
|
||||
begin
|
||||
if Value then
|
||||
Result := '1'
|
||||
else
|
||||
Result := '0';
|
||||
end;
|
||||
|
||||
function StrToBool(Value: String): Boolean;
|
||||
begin
|
||||
Result := Value = '1';
|
||||
end;
|
||||
|
||||
procedure InstallService(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
DisplayName: String;
|
||||
ServiceType: Cardinal;
|
||||
StartType: Cardinal;
|
||||
BinaryPath: String;
|
||||
Dependencies: String;
|
||||
Username: String;
|
||||
Password: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
DisplayName := PopString;
|
||||
ServiceType := StrToInt(PopString);
|
||||
StartType := StrToInt(PopString);
|
||||
BinaryPath := PopString;
|
||||
Dependencies := PopString;
|
||||
Username := PopString;
|
||||
Password := PopString;
|
||||
|
||||
ServiceResult := IntToStr(ServiceControl.InstallService(ServiceName, DisplayName, ServiceType, StartType, BinaryPath, Dependencies, Username, Password));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure RemoveService(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
|
||||
ServiceResult := IntToStr(ServiceControl.RemoveService(ServiceName));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure StartService(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
ServiceArguments: String;
|
||||
Timeout: Integer;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceArguments := PopString;
|
||||
Timeout := StrToInt(PopString);
|
||||
|
||||
ServiceResult := IntToStr(ServiceControl.StartService(ServiceName, ServiceArguments, Timeout));
|
||||
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure StopService(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
WaitForFileRelease: Boolean;
|
||||
Timeout: Integer;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
|
||||
WaitForFileRelease := StrToBool(PopString);
|
||||
Timeout := StrToInt(PopString);
|
||||
|
||||
ServiceResult := IntToStr(ServiceControl.StopService(ServiceName, WaitForFileRelease, Timeout));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure PauseService(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
Timeout: Integer;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
Timeout := StrToInt(PopString);
|
||||
ServiceResult := IntToStr(ServiceControl.PauseService(ServiceName, Timeout));
|
||||
PushString(ServiceResult)
|
||||
end;
|
||||
|
||||
procedure ContinueService(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
Timeout: Integer;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
Timeout := StrToInt(PopString);
|
||||
ServiceResult := IntToStr(ServiceControl.ContinueService(ServiceName, Timeout));
|
||||
PushString(ServiceResult)
|
||||
end;
|
||||
|
||||
procedure GetServiceName(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
Var
|
||||
DisplayName: String;
|
||||
ServiceResult: String;
|
||||
ServiceName: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
DisplayName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceName(DisplayName, ServiceName));
|
||||
PushString(ServiceName);
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceDisplayName(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
Var
|
||||
ServiceName: String;
|
||||
DisplayName: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceDisplayName(ServiceName, DisplayName));
|
||||
PushString(DisplayName);
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceStatus(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
Status: DWORD;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceStatus(ServiceName, Status));
|
||||
PushString(IntToStr(Status));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceBinaryPath(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
BinaryPath: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceBinaryPath(ServiceName, BinaryPath));
|
||||
PushString(BinaryPath);
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceDescription(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
Description: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceDescription(ServiceName, Description));
|
||||
PushString(Description);
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceStartType(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
StartType: DWORD;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceStartType(ServiceName, StartType));
|
||||
PushString(IntToStr(StartType));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceLogon(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
Username: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceLogon(ServiceName, Username));
|
||||
PushString(Username);
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceFailure(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
ResetPeriod: DWORD;
|
||||
RebootMessage: String;
|
||||
Command: String;
|
||||
Action1: Integer;
|
||||
ActionDelay1: DWORD;
|
||||
Action2: Integer;
|
||||
ActionDelay2: DWORD;
|
||||
Action3: Integer;
|
||||
ActionDelay3: DWORD;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceFailure(ServiceName, ResetPeriod, RebootMessage, Command, Action1, ActionDelay1, Action2, ActionDelay2, Action3, ActionDelay3));
|
||||
PushString(IntToStr(ActionDelay3));
|
||||
PushString(IntToStr(Action3));
|
||||
PushString(IntToStr(ActionDelay2));
|
||||
PushString(IntToStr(Action2));
|
||||
PushString(IntToStr(ActionDelay1));
|
||||
PushString(IntToStr(Action1));
|
||||
PushString(Command);
|
||||
PushString(RebootMessage);
|
||||
PushString(IntToStr(ResetPeriod));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceFailureFlag(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
FailureActionsOnNonCrashFailures: Boolean;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceFailureFlag(ServiceName, FailureActionsOnNonCrashFailures));
|
||||
PushString(BoolToStr(FailureActionsOnNonCrashFailures));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GetServiceDelayedAutoStartInfo(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
DelayedAutostart: Boolean;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.GetServiceDelayedAutoStartInfo(ServiceName, DelayedAutostart));
|
||||
PushString(BoolToStr(DelayedAutostart));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure SetServiceDescription(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
Description: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
Description := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.SetServiceDescription(ServiceName, Description));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure SetServiceStartType(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
ServiceStartType: DWORD;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceStartType := StrToInt(PopString);
|
||||
ServiceResult := IntToStr(ServiceControl.SetServiceStartType(ServiceName, ServiceStartType));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure SetServiceLogon(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
Username: String;
|
||||
Password: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
Username := PopString;
|
||||
Password := PopString;
|
||||
|
||||
ServiceResult := IntToStr(ServiceControl.SetServiceLogon(ServiceName, Username, Password));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure SetServiceBinaryPath(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
BinaryPath: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
BinaryPath := PopString;
|
||||
|
||||
ServiceResult := IntToStr(ServiceControl.SetServiceBinaryPath(ServiceName, BinaryPath));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure SetServiceFailure(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
ResetPeriod: DWORD;
|
||||
RebootMessage: String;
|
||||
Command: String;
|
||||
Action1: Integer;
|
||||
ActionDelay1: DWORD;
|
||||
Action2: Integer;
|
||||
ActionDelay2: DWORD;
|
||||
Action3: Integer;
|
||||
ActionDelay3: DWORD;
|
||||
ServiceResult: Integer;
|
||||
PrivilegeResult: Integer;
|
||||
const
|
||||
SE_SHUTDOWN_PRIVILEGE = 'SeShutdownPrivilege';
|
||||
SC_ACTION_REBOOT = 2;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ResetPeriod := StrToInt(PopString);
|
||||
RebootMessage := PopString;
|
||||
Command := PopString;
|
||||
Action1 := StrToInt(PopString);
|
||||
ActionDelay1 := StrToInt(PopString);
|
||||
Action2 := StrToInt(PopString);
|
||||
ActionDelay2 := StrToInt(PopString);
|
||||
Action3 := StrToInt(PopString);
|
||||
ActionDelay3 := StrToInt(PopString);
|
||||
|
||||
if (Action1 = SC_ACTION_REBOOT) or (Action2 = SC_ACTION_REBOOT) or (Action3 = SC_ACTION_REBOOT) then
|
||||
begin
|
||||
PrivilegeResult := LSASecurityControl.EnablePrivilege(SE_SHUTDOWN_PRIVILEGE);
|
||||
|
||||
if not PrivilegeResult = 0 then
|
||||
begin
|
||||
PushString(IntToStr(PrivilegeResult));
|
||||
Exit;
|
||||
end;
|
||||
end;
|
||||
|
||||
ServiceResult := ServiceControl.SetServiceFailure(ServiceName, ResetPeriod, RebootMessage, Command, Action1, ActionDelay1,
|
||||
Action2, ActionDelay2, Action3, ActionDelay3);
|
||||
|
||||
|
||||
if (Action1 = SC_ACTION_REBOOT) or (Action2 = SC_ACTION_REBOOT) or (Action3 = SC_ACTION_REBOOT) then
|
||||
begin
|
||||
PrivilegeResult := LSASecurityControl.DisablePrivilege(SE_SHUTDOWN_PRIVILEGE);
|
||||
|
||||
if not PrivilegeResult = 0 then
|
||||
begin
|
||||
PushString(IntToStr(PrivilegeResult));
|
||||
Exit;
|
||||
end;
|
||||
end;
|
||||
|
||||
PushString(IntToStr(ServiceResult));
|
||||
|
||||
end;
|
||||
|
||||
procedure SetServiceFailureFlag(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
FailureActionsOnNonCrashFailures: Boolean;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
FailureActionsOnNonCrashFailures := StrToBool(PopString);
|
||||
ServiceResult := IntToStr(ServiceControl.SetServiceFailureFlag(ServiceName, FailureActionsOnNonCrashFailures));
|
||||
PushString(ServiceResult)
|
||||
end;
|
||||
|
||||
procedure SetServiceDelayedAutoStartInfo(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
DelayedAutostart: Boolean;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
DelayedAutostart := StrToBool(PopString);
|
||||
ServiceResult := IntToStr(ServiceControl.SetServiceDelayedAutoStartInfo(ServiceName, DelayedAutostart));
|
||||
PushString(ServiceResult)
|
||||
end;
|
||||
|
||||
procedure ServiceIsRunning(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
IsRunning: Boolean;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.ServiceIsRunning(ServiceName, IsRunning));
|
||||
PushString(BoolToStr(IsRunning));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure ServiceIsStopped(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
IsStopped: Boolean;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.ServiceIsStopped(ServiceName, IsStopped));
|
||||
PushString(BoolToStr(IsStopped));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure ServiceIsPaused(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
IsPaused: Boolean;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceResult := IntToStr(ServiceControl.ServiceIsPaused(ServiceName, IsPaused));
|
||||
PushString(BoolToStr(IsPaused));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure RestartService(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
ServiceArguments: String;
|
||||
Timeout: Integer;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
ServiceArguments := PopString;
|
||||
Timeout := StrToInt(PopString);
|
||||
ServiceResult := IntToStr(ServiceControl.RestartService(ServiceName, ServiceArguments, Timeout));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure ExistsService(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ServiceName: String;
|
||||
ServiceResult: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ServiceName := PopString;
|
||||
|
||||
ServiceResult := IntToStr(ServiceControl.ExistsService(ServiceName));
|
||||
PushString(ServiceResult);
|
||||
end;
|
||||
|
||||
procedure GrantServiceLogonPrivilege(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
AccountName: String;
|
||||
LSAResult: String;
|
||||
const
|
||||
SE_SERVICE_LOGON_RIGHT = 'SeServiceLogonRight';
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
AccountName := PopString;
|
||||
|
||||
LSAResult := IntToStr(LSASecurityControl.GrantPrivilege(AccountName, SE_SERVICE_LOGON_RIGHT));
|
||||
PushString(LSAResult);
|
||||
end;
|
||||
|
||||
procedure RemoveServiceLogonPrivilege(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
AccountName: String;
|
||||
LSAResult: String;
|
||||
const
|
||||
SE_SERVICE_LOGON_RIGHT = 'SeServiceLogonRight';
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
AccountName := PopString;
|
||||
|
||||
LSAResult := IntToStr(LSASecurityControl.RemovePrivilege(AccountName, SE_SERVICE_LOGON_RIGHT));
|
||||
PushString(LSAResult);
|
||||
end;
|
||||
|
||||
procedure GetErrorMessage(const hwndParent: HWND; const string_size: integer;
|
||||
const variables: PChar; const stacktop: pointer); cdecl;
|
||||
var
|
||||
ErrorCode: Integer;
|
||||
ErrorMessage: String;
|
||||
begin
|
||||
Init(hwndParent, string_size, variables, stacktop);
|
||||
|
||||
ErrorCode := StrToInt(PopString);
|
||||
|
||||
ErrorMessage := ServiceControl.GetErrorMessage(ErrorCode);
|
||||
PushString(ErrorMessage);
|
||||
end;
|
||||
|
||||
exports InstallService;
|
||||
exports ExistsService;
|
||||
exports RemoveService;
|
||||
exports StartService;
|
||||
exports StopService;
|
||||
exports PauseService;
|
||||
exports ContinueService;
|
||||
exports GetServiceName;
|
||||
exports GetServiceDisplayName;
|
||||
exports GetServiceStatus;
|
||||
exports GetServiceBinaryPath;
|
||||
exports GetServiceDescription;
|
||||
exports GetServiceStartType;
|
||||
exports GetServiceLogon;
|
||||
exports GetServiceFailure;
|
||||
exports GetServiceFailureFlag;
|
||||
exports GetServiceDelayedAutoStartInfo;
|
||||
exports SetServiceDescription;
|
||||
exports SetServiceStartType;
|
||||
exports SetServiceLogon;
|
||||
exports SetServiceBinaryPath;
|
||||
exports SetServiceFailure;
|
||||
exports SetServiceFailureFlag;
|
||||
exports SetServiceDelayedAutoStartInfo;
|
||||
exports ServiceIsRunning;
|
||||
exports ServiceIsStopped;
|
||||
exports ServiceIsPaused;
|
||||
exports RestartService;
|
||||
exports GrantServiceLogonPrivilege;
|
||||
exports RemoveServiceLogonPrivilege;
|
||||
exports GetErrorMessage;
|
||||
|
||||
end.
|
||||
@@ -0,0 +1,910 @@
|
||||
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<ProjectGuid>{9A1C1FE1-FB44-40C4-9E22-99CAE6325532}</ProjectGuid>
|
||||
<ProjectVersion>18.8</ProjectVersion>
|
||||
<FrameworkType>None</FrameworkType>
|
||||
<MainSource>SimpleSC.dpr</MainSource>
|
||||
<Base>True</Base>
|
||||
<Config Condition="'$(Config)'==''">Release</Config>
|
||||
<Platform Condition="'$(Platform)'==''">Win32</Platform>
|
||||
<TargetedPlatforms>1</TargetedPlatforms>
|
||||
<AppType>Library</AppType>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
|
||||
<Base>true</Base>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''">
|
||||
<Base_Win32>true</Base_Win32>
|
||||
<CfgParent>Base</CfgParent>
|
||||
<Base>true</Base>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''">
|
||||
<Base_Win64>true</Base_Win64>
|
||||
<CfgParent>Base</CfgParent>
|
||||
<Base>true</Base>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_2)'!=''">
|
||||
<Cfg_2>true</Cfg_2>
|
||||
<CfgParent>Base</CfgParent>
|
||||
<Base>true</Base>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win32)'!=''">
|
||||
<Cfg_2_Win32>true</Cfg_2_Win32>
|
||||
<CfgParent>Cfg_2</CfgParent>
|
||||
<Cfg_2>true</Cfg_2>
|
||||
<Base>true</Base>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Base)'!=''">
|
||||
<DCC_UsePackage>bindcompfmx;fmx;rtl;dbrtl;IndySystem;DbxClientDriver;bindcomp;inetdb;DBXInterBaseDriver;DataSnapCommon;DataSnapClient;DataSnapServer;DataSnapProviderClient;xmlrtl;DbxCommonDriver;IndyProtocols;DBXMySQLDriver;dbxcds;bindengine;soaprtl;DBXOracleDriver;dsnap;DBXInformixDriver;IndyCore;fmxase;DBXFirebirdDriver;inet;fmxobj;inetdbxpress;DBXSybaseASADriver;fmxdae;dbexpress;DataSnapIndy10ServerTransport;IPIndyImpl;$(DCC_UsePackage)</DCC_UsePackage>
|
||||
<DCC_Namespace>System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace)</DCC_Namespace>
|
||||
<GenDll>true</GenDll>
|
||||
<DCC_DcuOutput>.\$(Platform)\$(Config)</DCC_DcuOutput>
|
||||
<DCC_ExeOutput>.\$(Platform)\$(Config)</DCC_ExeOutput>
|
||||
<DCC_E>false</DCC_E>
|
||||
<DCC_N>false</DCC_N>
|
||||
<DCC_S>false</DCC_S>
|
||||
<DCC_F>false</DCC_F>
|
||||
<DCC_K>false</DCC_K>
|
||||
<SanitizedProjectName>SimpleSC</SanitizedProjectName>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Base_Win32)'!=''">
|
||||
<Manifest_File>None</Manifest_File>
|
||||
<DCC_ExeOutput>C:\Developing\NSIS Simple Service Control - Unicode\</DCC_ExeOutput>
|
||||
<DCC_DcuOutput>C:\Developing\NSIS Simple Service Control - Unicode\</DCC_DcuOutput>
|
||||
<DCC_Namespace>Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
|
||||
<DCC_UsePackage>frx16;TeeDB;Rave100VCL;vclib;Tee;inetdbbde;DBXOdbcDriver;svnui;ibxpress;DBXSybaseASEDriver;vclimg;frxDB16;intrawebdb_120_160;fmi;fs16;TeeUI;vclactnband;FMXTee;vcldb;vcldsnap;bindcompvcl;vclie;vcltouch;Intraweb_120_160;DBXDb2Driver;websnap;vclribbon;frxe16;fsDB16;vcl;DataSnapConnectors;CloudService;DBXMSSQLDriver;FmxTeeUI;dsnapcon;vclx;webdsnap;svn;bdertl;CodeSiteExpressPkg;adortl;vcldbx;VclSmp;$(DCC_UsePackage)</DCC_UsePackage>
|
||||
<VerInfo_Locale>1033</VerInfo_Locale>
|
||||
<VerInfo_Keys>CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName);ProductName=$(MSBuildProjectName)</VerInfo_Keys>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Base_Win64)'!=''">
|
||||
<DCC_UsePackage>DBXOdbcDriver;DBXSybaseASEDriver;vclimg;vclactnband;vcldb;vcldsnap;bindcompvcl;vclie;vcltouch;DBXDb2Driver;websnap;vcl;DBXMSSQLDriver;dsnapcon;vclx;webdsnap;VclSmp;$(DCC_UsePackage)</DCC_UsePackage>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Cfg_2)'!=''">
|
||||
<Manifest_File>None</Manifest_File>
|
||||
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
|
||||
<DCC_ImportedDataReferences>false</DCC_ImportedDataReferences>
|
||||
<VerInfo_Locale>1031</VerInfo_Locale>
|
||||
<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
|
||||
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
|
||||
<DCC_DebugInformation>0</DCC_DebugInformation>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Cfg_2_Win32)'!=''">
|
||||
<DCC_ExeOutput>C:\Developing\NSIS Simple Service Control - Unicode\</DCC_ExeOutput>
|
||||
<DCC_DcuOutput>C:\Developing\NSIS Simple Service Control - Unicode\</DCC_DcuOutput>
|
||||
<VerInfo_Locale>1033</VerInfo_Locale>
|
||||
<Manifest_File>(Ohne)</Manifest_File>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<DelphiCompile Include="$(MainSource)">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="NSIS.pas"/>
|
||||
<DCCReference Include="ServiceControl.pas"/>
|
||||
<DCCReference Include="LSASecurityControl.pas"/>
|
||||
<BuildConfiguration Include="Release">
|
||||
<Key>Cfg_2</Key>
|
||||
<CfgParent>Base</CfgParent>
|
||||
</BuildConfiguration>
|
||||
<BuildConfiguration Include="Base">
|
||||
<Key>Base</Key>
|
||||
</BuildConfiguration>
|
||||
</ItemGroup>
|
||||
<ProjectExtensions>
|
||||
<Borland.Personality>Delphi.Personality.12</Borland.Personality>
|
||||
<Borland.ProjectType/>
|
||||
<BorlandProject>
|
||||
<Delphi.Personality>
|
||||
<VersionInfo>
|
||||
<VersionInfo Name="IncludeVerInfo">False</VersionInfo>
|
||||
<VersionInfo Name="AutoIncBuild">False</VersionInfo>
|
||||
<VersionInfo Name="MajorVer">1</VersionInfo>
|
||||
<VersionInfo Name="MinorVer">0</VersionInfo>
|
||||
<VersionInfo Name="Release">0</VersionInfo>
|
||||
<VersionInfo Name="Build">0</VersionInfo>
|
||||
<VersionInfo Name="Debug">False</VersionInfo>
|
||||
<VersionInfo Name="PreRelease">False</VersionInfo>
|
||||
<VersionInfo Name="Special">False</VersionInfo>
|
||||
<VersionInfo Name="Private">False</VersionInfo>
|
||||
<VersionInfo Name="DLL">False</VersionInfo>
|
||||
<VersionInfo Name="Locale">1031</VersionInfo>
|
||||
<VersionInfo Name="CodePage">1252</VersionInfo>
|
||||
</VersionInfo>
|
||||
<VersionInfoKeys>
|
||||
<VersionInfoKeys Name="CompanyName"/>
|
||||
<VersionInfoKeys Name="FileDescription"/>
|
||||
<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
|
||||
<VersionInfoKeys Name="InternalName"/>
|
||||
<VersionInfoKeys Name="LegalCopyright"/>
|
||||
<VersionInfoKeys Name="LegalTrademarks"/>
|
||||
<VersionInfoKeys Name="OriginalFilename"/>
|
||||
<VersionInfoKeys Name="ProductName"/>
|
||||
<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
|
||||
<VersionInfoKeys Name="Comments"/>
|
||||
</VersionInfoKeys>
|
||||
<Source>
|
||||
<Source Name="MainSource">SimpleSC.dpr</Source>
|
||||
</Source>
|
||||
<Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDSBIN)\dcloffice2k260.bpl">Microsoft Office 2000 Beispiele für gekapselte Komponenten für Automatisierungsserver</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDSBIN)\dclofficexp260.bpl">Microsoft Office XP Beispiele für gekapselte Komponenten für Automation Server</Excluded_Packages>
|
||||
</Excluded_Packages>
|
||||
</Delphi.Personality>
|
||||
<Deployment Version="3">
|
||||
<DeployFile LocalName="$(BDS)\Redist\osx32\libcgunwind.1.0.dylib" Class="DependencyModule">
|
||||
<Platform Name="OSX32">
|
||||
<Overwrite>true</Overwrite>
|
||||
</Platform>
|
||||
</DeployFile>
|
||||
<DeployFile LocalName="$(BDS)\Redist\iossimulator\libcgunwind.1.0.dylib" Class="DependencyModule">
|
||||
<Platform Name="iOSSimulator">
|
||||
<Overwrite>true</Overwrite>
|
||||
</Platform>
|
||||
</DeployFile>
|
||||
<DeployFile LocalName="$(BDS)\Redist\iossimulator\libpcre.dylib" Class="DependencyModule">
|
||||
<Platform Name="iOSSimulator">
|
||||
<Overwrite>true</Overwrite>
|
||||
</Platform>
|
||||
</DeployFile>
|
||||
<DeployClass Name="AdditionalDebugSymbols">
|
||||
<Platform Name="OSX32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Win32">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidClassesDexFile">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>classes</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>classes</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidFileProvider">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\xml</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\xml</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidGDBServer">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidLibnativeArmeabiFile">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>library\lib\armeabi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>library\lib\armeabi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidLibnativeArmeabiv7aFile">
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidLibnativeMipsFile">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>library\lib\mips</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>library\lib\mips</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidServiceOutput">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>library\lib\arm64-v8a</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidServiceOutput_Android32">
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidSplashImageDef">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidSplashStyles">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\values</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\values</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="AndroidSplashStylesV21">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\values-v21</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\values-v21</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_Colors">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\values</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\values</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_DefaultAppIcon">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_LauncherIcon144">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_LauncherIcon36">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-ldpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-ldpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_LauncherIcon48">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-mdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-mdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_LauncherIcon72">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-hdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-hdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_LauncherIcon96">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-xhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-xhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_NotificationIcon24">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-mdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-mdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_NotificationIcon36">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-hdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-hdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_NotificationIcon48">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-xhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-xhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_NotificationIcon72">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-xxhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_NotificationIcon96">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-xxxhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-xxxhdpi</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_SplashImage426">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-small</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-small</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_SplashImage470">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-normal</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-normal</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_SplashImage640">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-large</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-large</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_SplashImage960">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\drawable-xlarge</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\drawable-xlarge</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="Android_Strings">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>res\values</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>res\values</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="DebugSymbols">
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="OSX32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Win32">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="DependencyFramework">
|
||||
<Platform Name="OSX32">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.framework</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="OSX64">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.framework</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="Win32">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="DependencyModule">
|
||||
<Platform Name="OSX32">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.dylib</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="OSX64">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.dylib</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="Win32">
|
||||
<Operation>0</Operation>
|
||||
<Extensions>.dll;.bpl</Extensions>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Required="true" Name="DependencyPackage">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.dylib</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.dylib</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.dylib</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="OSX32">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.dylib</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="OSX64">
|
||||
<Operation>1</Operation>
|
||||
<Extensions>.dylib</Extensions>
|
||||
</Platform>
|
||||
<Platform Name="Win32">
|
||||
<Operation>0</Operation>
|
||||
<Extensions>.bpl</Extensions>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="File">
|
||||
<Platform Name="Android">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
<Platform Name="OSX32">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
<Platform Name="OSX64">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Win32">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch1024x768">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch1536x2048">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch1668">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch1668x2388">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch2048x1536">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch2048x2732">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch2224">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch2388x1668">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch2732x2048">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPad_Launch768x1024">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch1125">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch1136x640">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch1242">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch1242x2688">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch1334">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch1792">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch2208">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch2436">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch2688x1242">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch320">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch640">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch640x1136">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch750">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="iPhone_Launch828">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="ProjectAndroidManifest">
|
||||
<Platform Name="Android">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="ProjectiOSDeviceDebug">
|
||||
<Platform Name="iOSDevice32">
|
||||
<RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<RemoteDir>..\$(PROJECTNAME).app.dSYM\Contents\Resources\DWARF</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="ProjectiOSDeviceResourceRules"/>
|
||||
<DeployClass Name="ProjectiOSEntitlements"/>
|
||||
<DeployClass Name="ProjectiOSInfoPList"/>
|
||||
<DeployClass Name="ProjectiOSResource">
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="ProjectOSXDebug"/>
|
||||
<DeployClass Name="ProjectOSXEntitlements"/>
|
||||
<DeployClass Name="ProjectOSXInfoPList"/>
|
||||
<DeployClass Name="ProjectOSXResource">
|
||||
<Platform Name="OSX32">
|
||||
<RemoteDir>Contents\Resources</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="OSX64">
|
||||
<RemoteDir>Contents\Resources</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Required="true" Name="ProjectOutput">
|
||||
<Platform Name="Android">
|
||||
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>library\lib\arm64-v8a</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSDevice64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="iOSSimulator">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Linux64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="OSX32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="OSX64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Win32">
|
||||
<Operation>0</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="ProjectOutput_Android32">
|
||||
<Platform Name="Android64">
|
||||
<RemoteDir>library\lib\armeabi-v7a</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="ProjectUWPManifest">
|
||||
<Platform Name="Win32">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Win64">
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="UWP_DelphiLogo150">
|
||||
<Platform Name="Win32">
|
||||
<RemoteDir>Assets</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Win64">
|
||||
<RemoteDir>Assets</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<DeployClass Name="UWP_DelphiLogo44">
|
||||
<Platform Name="Win32">
|
||||
<RemoteDir>Assets</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
<Platform Name="Win64">
|
||||
<RemoteDir>Assets</RemoteDir>
|
||||
<Operation>1</Operation>
|
||||
</Platform>
|
||||
</DeployClass>
|
||||
<ProjectRoot Platform="iOSDevice64" Name="$(PROJECTNAME).app"/>
|
||||
<ProjectRoot Platform="Win64" Name="$(PROJECTNAME)"/>
|
||||
<ProjectRoot Platform="iOSDevice32" Name="$(PROJECTNAME).app"/>
|
||||
<ProjectRoot Platform="Linux64" Name="$(PROJECTNAME)"/>
|
||||
<ProjectRoot Platform="Win32" Name="$(PROJECTNAME)"/>
|
||||
<ProjectRoot Platform="OSX32" Name="$(PROJECTNAME)"/>
|
||||
<ProjectRoot Platform="Android" Name="$(PROJECTNAME)"/>
|
||||
<ProjectRoot Platform="OSX64" Name="$(PROJECTNAME)"/>
|
||||
<ProjectRoot Platform="iOSSimulator" Name="$(PROJECTNAME).app"/>
|
||||
<ProjectRoot Platform="Android64" Name="$(PROJECTNAME)"/>
|
||||
</Deployment>
|
||||
<Platforms>
|
||||
<Platform value="Win32">True</Platform>
|
||||
<Platform value="Win64">False</Platform>
|
||||
</Platforms>
|
||||
<ModelSupport>False</ModelSupport>
|
||||
</BorlandProject>
|
||||
<ProjectFileVersion>12</ProjectFileVersion>
|
||||
</ProjectExtensions>
|
||||
<Import Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')" Project="$(BDS)\Bin\CodeGear.Delphi.Targets"/>
|
||||
<Import Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')" Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj"/>
|
||||
<Import Project="$(MSBuildProjectName).deployproj" Condition="Exists('$(MSBuildProjectName).deployproj')"/>
|
||||
</Project>
|
||||
Binary file not shown.
126
desktop/tauri/src-tauri/templates/nsis/install_hooks.nsh
Normal file
126
desktop/tauri/src-tauri/templates/nsis/install_hooks.nsh
Normal file
@@ -0,0 +1,126 @@
|
||||
!include LogicLib.nsh
|
||||
|
||||
!addplugindir "..\..\..\..\templates\NSIS_Simple_Service_Plugin_Unicode_1.30"
|
||||
|
||||
var oldInstallationDir
|
||||
var dataDir
|
||||
|
||||
!macro NSIS_HOOK_PREINSTALL
|
||||
|
||||
; Abort if old service is running
|
||||
SimpleSC::ServiceIsStopped "PortmasterCore"
|
||||
Pop $0
|
||||
Pop $1
|
||||
${If} $0 == 0
|
||||
${If} $1 == 0
|
||||
MessageBox MB_OK "Portmaster service is running. Stop it and run the installer again."
|
||||
Abort
|
||||
${EndIf}
|
||||
${EndIf}
|
||||
|
||||
File "..\..\..\..\binary\index.json"
|
||||
File "..\..\..\..\binary\portmaster-core.exe"
|
||||
File "..\..\..\..\binary\portmaster-kext.sys"
|
||||
File "..\..\..\..\binary\portmaster-core.dll"
|
||||
File "..\..\..\..\binary\WebView2Loader.dll"
|
||||
File "..\..\..\..\binary\portmaster.zip"
|
||||
File "..\..\..\..\binary\assets.zip"
|
||||
|
||||
SetOutPath "$COMMONPROGRAMDATA\Portmaster\intel"
|
||||
|
||||
File "..\..\..\..\intel\index.json"
|
||||
File "..\..\..\..\intel\base.dsdl"
|
||||
File "..\..\..\..\intel\geoipv4.mmdb"
|
||||
File "..\..\..\..\intel\geoipv6.mmdb"
|
||||
File "..\..\..\..\intel\index.dsd"
|
||||
File "..\..\..\..\intel\intermediate.dsdl"
|
||||
File "..\..\..\..\intel\urgent.dsdl"
|
||||
|
||||
; restire previous state
|
||||
SetOutPath "$INSTDIR"
|
||||
|
||||
!macroend
|
||||
|
||||
;--------------------------------------------------
|
||||
; Post-install hook:
|
||||
; - Remove old service
|
||||
; - Installs the service
|
||||
!macro NSIS_HOOK_POSTINSTALL
|
||||
DetailPrint "Installing service"
|
||||
; Remove old service
|
||||
SimpleSC::RemoveService "PortmasterCore"
|
||||
Pop $0
|
||||
${If} $0 != 0
|
||||
DetailPrint "Failed to remove PortmasterCore service. Error: $0"
|
||||
${EndIf}
|
||||
|
||||
; Install the service:
|
||||
; Parameters:
|
||||
; 1. Service Name: "PortmasterCore"
|
||||
; 2. Display Name: "Portmaster Core"
|
||||
; 3. Service Type: "16" for SERVICE_WIN32_OWN_PROCESS
|
||||
; 4. Start Type: "2" for SERVICE_AUTO_START
|
||||
; 5. Binary Path: Executable with arguments.
|
||||
; 6 & 7. Dependencies and account info (empty uses defaults).
|
||||
SimpleSC::InstallService "PortmasterCore" "Portmaster Core" "16" "2" "$INSTDIR\portmaster-core.exe --log-dir=%PROGRAMDATA%\Portmaster\logs" "" "" ""
|
||||
Pop $0 ; returns error code (0 on success)
|
||||
${If} $0 != 0
|
||||
SimpleSC::GetErrorMessage $installErr
|
||||
Pop $0
|
||||
MessageBox MB_OK "Service creation failed. Error: $errorMsg"
|
||||
Abort
|
||||
${EndIf}
|
||||
|
||||
StrCpy $oldInstallationDir "$COMMONPROGRAMDATA\Safing\Portmaster"
|
||||
StrCpy $dataDir "$COMMONPROGRAMDATA\Portmaster"
|
||||
|
||||
; Check if the folder exists
|
||||
IfFileExists "$oldInstallationDir\*.*" 0 Finish
|
||||
|
||||
; Stop if the migration flag(file) already exists.
|
||||
IfFileExists "$oldInstallationDir\migrated.txt" Finish 0
|
||||
|
||||
; Copy files
|
||||
DetailPrint "Migrating config from old installation: $oldInstallationDir"
|
||||
|
||||
CreateDirectory "$dataDir"
|
||||
CreateDirectory "$dataDir\databases"
|
||||
CopyFiles "$oldInstallationDir\config.json" "$dataDir"
|
||||
CopyFiles "$oldInstallationDir\databases\*.*" "$dataDir\databases"
|
||||
|
||||
; Create empty file to indicate that the data has already been migrated.
|
||||
FileOpen $0 "$oldInstallationDir\migrated.txt" w
|
||||
FileClose $0
|
||||
|
||||
; Delete v1 shortcuts
|
||||
RMDir /r "$SMPROGRAMS\Portmaster"
|
||||
Delete "$SMSTARTUP\Portmaster Notifier.lnk"
|
||||
|
||||
Finish:
|
||||
|
||||
!macroend
|
||||
|
||||
;--------------------------------------------------
|
||||
; Pre-uninstall hook:
|
||||
; - Stops and removes the service.
|
||||
!macro NSIS_HOOK_PREUNINSTALL
|
||||
|
||||
DetailPrint "Stopping service"
|
||||
SimpleSC::StopService "PortmasterCore" "1" "30"
|
||||
Pop $0
|
||||
${If} $0 != 0
|
||||
DetailPrint "Failed to stop PortmasterCore service. Error: $0"
|
||||
${Else}
|
||||
DetailPrint "Service PortmasterCore stopped successfully."
|
||||
${EndIf}
|
||||
|
||||
DetailPrint "Removing service"
|
||||
SimpleSC::RemoveService "PortmasterCore"
|
||||
Pop $0
|
||||
${If} $0 != 0
|
||||
DetailPrint "Failed to remove PortmasterCore service. Error: $0"
|
||||
${Else}
|
||||
DetailPrint "Service PortmasterCore removed successfully."
|
||||
${EndIf}
|
||||
!macroend
|
||||
|
||||
@@ -1,37 +0,0 @@
|
||||
!macro NSIS_HOOK_PREINSTALL
|
||||
; Current working directory is <project-dir>\desktop\tauri\src-tauri\target\release\nsis\x64
|
||||
|
||||
SetOutPath "$INSTDIR"
|
||||
|
||||
File "..\..\..\..\binary\index.json"
|
||||
File "..\..\..\..\binary\portmaster-core.exe"
|
||||
File "..\..\..\..\binary\portmaster-kext.sys"
|
||||
File "..\..\..\..\binary\portmaster-core.dll"
|
||||
File "..\..\..\..\binary\WebView2Loader.dll"
|
||||
File "..\..\..\..\binary\portmaster.zip"
|
||||
File "..\..\..\..\binary\assets.zip"
|
||||
|
||||
SetOutPath "$COMMONPROGRAMDATA\Portmaster\intel"
|
||||
|
||||
File "..\..\..\..\intel\index.json"
|
||||
File "..\..\..\..\intel\base.dsdl"
|
||||
File "..\..\..\..\intel\geoipv4.mmdb"
|
||||
File "..\..\..\..\intel\geoipv6.mmdb"
|
||||
File "..\..\..\..\intel\index.dsd"
|
||||
File "..\..\..\..\intel\intermediate.dsdl"
|
||||
File "..\..\..\..\intel\urgent.dsdl"
|
||||
|
||||
; restire previous state
|
||||
SetOutPath "$INSTDIR"
|
||||
|
||||
!macroend
|
||||
|
||||
!macro NSIS_HOOK_POSTINSTALL
|
||||
ExecWait 'sc.exe create PortmasterCore binPath= "$INSTDIR\portmaster-core.exe --log-dir=%PROGRAMDATA%\Portmaster\logs"'
|
||||
!macroend
|
||||
|
||||
!macro NSIS_HOOK_PREUNINSTALL
|
||||
ExecWait 'sc.exe stop PortmasterCore'
|
||||
ExecWait 'sc.exe delete PortmasterCore'
|
||||
!macroend
|
||||
|
||||
@@ -20,11 +20,13 @@ if (-not (Test-Path -Path $binaryDir)) {
|
||||
}
|
||||
|
||||
Write-Output "Copying binary files"
|
||||
Copy-Item -Force -Path "dist/download/windows_amd64/portmaster-core.exe" -Destination "$binaryDir/portmaster-core.exe"
|
||||
Copy-Item -Force -Path "dist/download/windows_amd64/portmaster-kext.sys" -Destination "$binaryDir/portmaster-kext.sys"
|
||||
Copy-Item -Force -Path "dist/download/windows_amd64/portmaster-kext.dll" -Destination "$binaryDir/portmaster-kext.dll"
|
||||
Copy-Item -Force -Path "dist/download/windows_amd64/portmaster-core.dll" -Destination "$binaryDir/portmaster-kext.dll"
|
||||
Copy-Item -Force -Path "dist/binary/windows_amd64/portmaster-core.exe" -Destination "$binaryDir/portmaster-core.exe"
|
||||
Copy-Item -Force -Path "dist/binary/windows_amd64/WebView2Loader.dll" -Destination "$binaryDir/WebView2Loader.dll"
|
||||
Copy-Item -Force -Path "dist/binary/all/portmaster.zip" -Destination "$binaryDir/portmaster.zip"
|
||||
Copy-Item -Force -Path "dist/binary/all/assets.zip" -Destination "$binaryDir/assets.zip"
|
||||
Copy-Item -Force -Path "dist/binary/index.json" -Destination "$binaryDir/index.json"
|
||||
|
||||
# Make sure target folder exists.
|
||||
if (-not (Test-Path -Path $targetDir)) {
|
||||
@@ -52,8 +54,7 @@ if (-not (Get-Command cargo -ErrorAction SilentlyContinue)) {
|
||||
}
|
||||
|
||||
Write-Output "Downloading tauri-cli"
|
||||
|
||||
Invoke-WebRequest -Uri https://github.com/tauri-apps/tauri/releases/download/tauri-cli-v2.1.0/cargo-tauri-x86_64-pc-windows-msvc.zip -OutFile tauri-cli.zip
|
||||
Invoke-WebRequest -Uri https://github.com/tauri-apps/tauri/releases/download/tauri-cli-v2.2.7/cargo-tauri-x86_64-pc-windows-msvc.zip -OutFile tauri-cli.zip
|
||||
Expand-Archive -Force tauri-cli.zip
|
||||
./tauri-cli/cargo-tauri.exe bundle
|
||||
|
||||
|
||||
Reference in New Issue
Block a user