mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2026-01-10 00:41:36 +01:00
231 lines
8.4 KiB
ObjectPascal
231 lines
8.4 KiB
ObjectPascal
{******************************************************************************}
|
|
{ }
|
|
{ Lan Manager Service Names API interface Unit for Object Pascal }
|
|
{ }
|
|
{ Portions created by Microsoft are Copyright (C) 1995-2001 Microsoft }
|
|
{ Corporation. All Rights Reserved. }
|
|
{ }
|
|
{ The original file is: lmsname.h, released November 2001. The original Pascal }
|
|
{ code is: LmSName.pas, released Februari 2002. The initial developer of the }
|
|
{ Pascal code is Marcel van Brakel (brakelm att chello dott nl). }
|
|
{ }
|
|
{ Portions created by Marcel van Brakel are Copyright (C) 1999-2001 }
|
|
{ Marcel van Brakel. All Rights Reserved. }
|
|
{ }
|
|
{ Obtained through: Joint Endeavour of Delphi Innovators (Project JEDI) }
|
|
{ }
|
|
{ You may retrieve the latest version of this file at the Project JEDI }
|
|
{ APILIB home page, located at http://jedi-apilib.sourceforge.net }
|
|
{ }
|
|
{ The contents of this file are used with permission, subject to the Mozilla }
|
|
{ Public License Version 1.1 (the "License"); you may not use this file except }
|
|
{ in compliance with the License. You may obtain a copy of the License at }
|
|
{ http://www.mozilla.org/MPL/MPL-1.1.html }
|
|
{ }
|
|
{ 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. }
|
|
{ }
|
|
{ Alternatively, the contents of this file may be used under the terms of the }
|
|
{ GNU Lesser General Public License (the "LGPL License"), in which case the }
|
|
{ provisions of the LGPL License are applicable instead of those above. }
|
|
{ If you wish to allow use of your version of this file only under the terms }
|
|
{ of the LGPL License and not to allow others to use your version of this file }
|
|
{ under the MPL, indicate your decision by deleting the provisions above and }
|
|
{ replace them with the notice and other provisions required by the LGPL }
|
|
{ License. If you do not delete the provisions above, a recipient may use }
|
|
{ your version of this file under either the MPL or the LGPL License. }
|
|
{ }
|
|
{ For more information about the LGPL: http://www.gnu.org/copyleft/lesser.html }
|
|
{ }
|
|
{******************************************************************************}
|
|
|
|
|
|
unit JwaLmSName;
|
|
|
|
{$WEAKPACKAGEUNIT}
|
|
|
|
{$HPPEMIT ''}
|
|
{$HPPEMIT '#include "lmsname.h"'}
|
|
{$HPPEMIT ''}
|
|
|
|
{$I jediapilib.inc}
|
|
|
|
interface
|
|
|
|
uses
|
|
JwaWinType;
|
|
|
|
//
|
|
// Standard LAN Manager service names.
|
|
//
|
|
|
|
const
|
|
SERVICE_WORKSTATION = TEXT('LanmanWorkstation');
|
|
{$EXTERNALSYM SERVICE_WORKSTATION}
|
|
SERVICE_LM20_WORKSTATION = TEXT('WORKSTATION');
|
|
{$EXTERNALSYM SERVICE_LM20_WORKSTATION}
|
|
WORKSTATION_DISPLAY_NAME = TEXT('Workstation');
|
|
{$EXTERNALSYM WORKSTATION_DISPLAY_NAME}
|
|
|
|
SERVICE_SERVER = TEXT('LanmanServer');
|
|
{$EXTERNALSYM SERVICE_SERVER}
|
|
SERVICE_LM20_SERVER = TEXT('SERVER');
|
|
{$EXTERNALSYM SERVICE_LM20_SERVER}
|
|
SERVER_DISPLAY_NAME = TEXT('Server');
|
|
{$EXTERNALSYM SERVER_DISPLAY_NAME}
|
|
|
|
SERVICE_BROWSER = TEXT('BROWSER');
|
|
{$EXTERNALSYM SERVICE_BROWSER}
|
|
SERVICE_LM20_BROWSER = SERVICE_BROWSER;
|
|
{$EXTERNALSYM SERVICE_LM20_BROWSER}
|
|
|
|
SERVICE_MESSENGER = TEXT('MESSENGER');
|
|
{$EXTERNALSYM SERVICE_MESSENGER}
|
|
SERVICE_LM20_MESSENGER = SERVICE_MESSENGER;
|
|
{$EXTERNALSYM SERVICE_LM20_MESSENGER}
|
|
|
|
SERVICE_NETRUN = TEXT('NETRUN');
|
|
{$EXTERNALSYM SERVICE_NETRUN}
|
|
SERVICE_LM20_NETRUN = SERVICE_NETRUN;
|
|
{$EXTERNALSYM SERVICE_LM20_NETRUN}
|
|
|
|
SERVICE_SPOOLER = TEXT('SPOOLER');
|
|
{$EXTERNALSYM SERVICE_SPOOLER}
|
|
SERVICE_LM20_SPOOLER = SERVICE_SPOOLER;
|
|
{$EXTERNALSYM SERVICE_LM20_SPOOLER}
|
|
|
|
SERVICE_ALERTER = TEXT('ALERTER');
|
|
{$EXTERNALSYM SERVICE_ALERTER}
|
|
SERVICE_LM20_ALERTER = SERVICE_ALERTER;
|
|
{$EXTERNALSYM SERVICE_LM20_ALERTER}
|
|
|
|
SERVICE_NETLOGON = TEXT('NETLOGON');
|
|
{$EXTERNALSYM SERVICE_NETLOGON}
|
|
SERVICE_LM20_NETLOGON = SERVICE_NETLOGON;
|
|
{$EXTERNALSYM SERVICE_LM20_NETLOGON}
|
|
|
|
SERVICE_NETPOPUP = TEXT('NETPOPUP');
|
|
{$EXTERNALSYM SERVICE_NETPOPUP}
|
|
SERVICE_LM20_NETPOPUP = SERVICE_NETPOPUP;
|
|
{$EXTERNALSYM SERVICE_LM20_NETPOPUP}
|
|
|
|
SERVICE_SQLSERVER = TEXT('SQLSERVER');
|
|
{$EXTERNALSYM SERVICE_SQLSERVER}
|
|
SERVICE_LM20_SQLSERVER = SERVICE_SQLSERVER;
|
|
{$EXTERNALSYM SERVICE_LM20_SQLSERVER}
|
|
|
|
SERVICE_REPL = TEXT('REPLICATOR');
|
|
{$EXTERNALSYM SERVICE_REPL}
|
|
SERVICE_LM20_REPL = SERVICE_REPL;
|
|
{$EXTERNALSYM SERVICE_LM20_REPL}
|
|
|
|
SERVICE_RIPL = TEXT('REMOTEBOOT');
|
|
{$EXTERNALSYM SERVICE_RIPL}
|
|
SERVICE_LM20_RIPL = SERVICE_RIPL;
|
|
{$EXTERNALSYM SERVICE_LM20_RIPL}
|
|
|
|
SERVICE_TIMESOURCE = TEXT('TIMESOURCE');
|
|
{$EXTERNALSYM SERVICE_TIMESOURCE}
|
|
SERVICE_LM20_TIMESOURCE = SERVICE_TIMESOURCE;
|
|
{$EXTERNALSYM SERVICE_LM20_TIMESOURCE}
|
|
|
|
SERVICE_AFP = TEXT('AFP');
|
|
{$EXTERNALSYM SERVICE_AFP}
|
|
SERVICE_LM20_AFP = SERVICE_AFP;
|
|
{$EXTERNALSYM SERVICE_LM20_AFP}
|
|
|
|
SERVICE_UPS = TEXT('UPS');
|
|
{$EXTERNALSYM SERVICE_UPS}
|
|
SERVICE_LM20_UPS = SERVICE_UPS;
|
|
{$EXTERNALSYM SERVICE_LM20_UPS}
|
|
|
|
SERVICE_XACTSRV = TEXT('XACTSRV');
|
|
{$EXTERNALSYM SERVICE_XACTSRV}
|
|
SERVICE_LM20_XACTSRV = SERVICE_XACTSRV;
|
|
{$EXTERNALSYM SERVICE_LM20_XACTSRV}
|
|
|
|
SERVICE_TCPIP = TEXT('TCPIP');
|
|
{$EXTERNALSYM SERVICE_TCPIP}
|
|
SERVICE_LM20_TCPIP = SERVICE_TCPIP;
|
|
{$EXTERNALSYM SERVICE_LM20_TCPIP}
|
|
|
|
SERVICE_NBT = TEXT('NBT');
|
|
{$EXTERNALSYM SERVICE_NBT}
|
|
SERVICE_LM20_NBT = SERVICE_NBT;
|
|
{$EXTERNALSYM SERVICE_LM20_NBT}
|
|
|
|
SERVICE_LMHOSTS = TEXT('LMHOSTS');
|
|
{$EXTERNALSYM SERVICE_LMHOSTS}
|
|
SERVICE_LM20_LMHOSTS = SERVICE_LMHOSTS;
|
|
{$EXTERNALSYM SERVICE_LM20_LMHOSTS}
|
|
|
|
SERVICE_TELNET = TEXT('Telnet');
|
|
{$EXTERNALSYM SERVICE_TELNET}
|
|
SERVICE_LM20_TELNET = SERVICE_TELNET;
|
|
{$EXTERNALSYM SERVICE_LM20_TELNET}
|
|
|
|
SERVICE_SCHEDULE = TEXT('Schedule');
|
|
{$EXTERNALSYM SERVICE_SCHEDULE}
|
|
SERVICE_LM20_SCHEDULE = SERVICE_SCHEDULE;
|
|
{$EXTERNALSYM SERVICE_LM20_SCHEDULE}
|
|
|
|
SERVICE_NTLMSSP = TEXT('NtLmSsp');
|
|
{$EXTERNALSYM SERVICE_NTLMSSP}
|
|
|
|
SERVICE_DHCP = TEXT('DHCP');
|
|
{$EXTERNALSYM SERVICE_DHCP}
|
|
SERVICE_LM20_DHCP = SERVICE_DHCP;
|
|
{$EXTERNALSYM SERVICE_LM20_DHCP}
|
|
|
|
SERVICE_NWSAP = TEXT('NwSapAgent');
|
|
{$EXTERNALSYM SERVICE_NWSAP}
|
|
SERVICE_LM20_NWSAP = SERVICE_NWSAP;
|
|
{$EXTERNALSYM SERVICE_LM20_NWSAP}
|
|
NWSAP_DISPLAY_NAME = TEXT('NW Sap Agent');
|
|
{$EXTERNALSYM NWSAP_DISPLAY_NAME}
|
|
|
|
SERVICE_NWCS = TEXT('NWCWorkstation');
|
|
{$EXTERNALSYM SERVICE_NWCS}
|
|
SERVICE_DNS_CACHE = TEXT('DnsCache');
|
|
{$EXTERNALSYM SERVICE_DNS_CACHE}
|
|
|
|
SERVICE_W32TIME = TEXT('w32time');
|
|
{$EXTERNALSYM SERVICE_W32TIME}
|
|
SERVCE_LM20_W32TIME = SERVICE_W32TIME;
|
|
{$EXTERNALSYM SERVCE_LM20_W32TIME}
|
|
|
|
SERVICE_KDC = TEXT('kdc');
|
|
{$EXTERNALSYM SERVICE_KDC}
|
|
SERVICE_LM20_KDC = SERVICE_KDC;
|
|
{$EXTERNALSYM SERVICE_LM20_KDC}
|
|
|
|
SERVICE_RPCLOCATOR = TEXT('RPCLOCATOR');
|
|
{$EXTERNALSYM SERVICE_RPCLOCATOR}
|
|
SERVICE_LM20_RPCLOCATOR = SERVICE_RPCLOCATOR;
|
|
{$EXTERNALSYM SERVICE_LM20_RPCLOCATOR}
|
|
|
|
SERVICE_TRKSVR = TEXT('TrkSvr');
|
|
{$EXTERNALSYM SERVICE_TRKSVR}
|
|
SERVICE_LM20_TRKSVR = SERVICE_TRKSVR;
|
|
{$EXTERNALSYM SERVICE_LM20_TRKSVR}
|
|
|
|
SERVICE_TRKWKS = TEXT('TrkWks');
|
|
{$EXTERNALSYM SERVICE_TRKWKS}
|
|
SERVICE_LM20_TRKWKS = SERVICE_TRKWKS;
|
|
{$EXTERNALSYM SERVICE_LM20_TRKWKS}
|
|
|
|
SERVICE_NTFRS = TEXT('NtFrs');
|
|
{$EXTERNALSYM SERVICE_NTFRS}
|
|
SERVICE_LM20_NTFRS = SERVICE_NTFRS;
|
|
{$EXTERNALSYM SERVICE_LM20_NTFRS}
|
|
|
|
SERVICE_ISMSERV = TEXT('IsmServ');
|
|
{$EXTERNALSYM SERVICE_ISMSERV}
|
|
SERVICE_LM20_ISMSERV = SERVICE_ISMSERV;
|
|
{$EXTERNALSYM SERVICE_LM20_ISMSERV}
|
|
|
|
implementation
|
|
|
|
end.
|