1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
|
unit ScheduleAPI;
// Copyright (C) 2003, 2004 MySQL AB
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
//
// File contains the translation of Microsoft's scheduler API (LMConst.h etc.). Orignal header follows below:
//
// Copyright (c) 1990-1999 Microsoft Corporation
//
//
// LMCONS.H (was NETCONS.H in LM 2.x)
//
// Abstract:
//
// This file contains constants used throughout the LAN Manager
// API header files. It should be included in any source file
// that is going to include other LAN Manager API header files or
// call a LAN Manager API.
//
// NOTE: Lengths of strings are given as the maximum lengths of the
// string in characters (not bytes). This does not include space for the
// terminating 0-characters. When allocating space for such an item,
// use the form:
//
// TCHAR username[UNLEN+1];
//
// Definitions of the form LN20_* define those values in effect for
// LanMan 2.0.
interface
{$Include Compilers.inc}
uses
{$ifndef COMPILER_9_UP}
WinError,
{$endif COMPILER_9_UP}
Windows;
const
JOB_RUN_PERIODICALLY = $01; { in-/output flag }
JOB_EXEC_ERROR = $02; { output flag }
JOB_RUNS_TODAY = $04; { output flag }
JOB_ADD_CURRENT_DATE = $08; { input flag }
JOB_NONINTERACTIVE = $10; { in-/output flag }
//
// String Lengths for various LanMan names
//
CNLEN = 15; // Computer name length
LM20_CNLEN = 15; // LM 2.0 Computer name length
DNLEN = CNLEN; // Maximum domain name length
LM20_DNLEN = LM20_CNLEN; // LM 2.0 Maximum domain name length
UNCLEN = CNLEN + 2; // UNC computer name length
LM20_UNCLEN = LM20_CNLEN + 2; // LM 2.0 UNC computer name length
NNLEN = 80; // Net name length (share name)
LM20_NNLEN = 12; // LM 2.0 Net name length
RMLEN = UNCLEN + 1 + NNLEN; // Max remote name length
LM20_RMLEN = LM20_UNCLEN + 1 + LM20_NNLEN; // LM 2.0 Max remote name length
SNLEN = 80; // Service name length
LM20_SNLEN = 15; // LM 2.0 Service name length
STXTLEN = 256; // Service text length
LM20_STXTLEN = 63; // LM 2.0 Service text length
PATHLEN = 256; // Max. path (not including drive name)
LM20_PATHLEN = 256; // LM 2.0 Max. path
DEVLEN = 80; // Device name length
LM20_DEVLEN = 8; // LM 2.0 Device name length
EVLEN = 16; // Event name length
//
// User, Group and Password lengths
//
UNLEN = 256; // Maximum user name length
LM20_UNLEN = 20; // LM 2.0 Maximum user name length
GNLEN = UNLEN; // Group name
LM20_GNLEN = LM20_UNLEN; // LM 2.0 Group name
PWLEN = 256; // Maximum password length
LM20_PWLEN = 14; // LM 2.0 Maximum password length
SHPWLEN = 8; // Share password length (bytes)
CLTYPE_LEN = 12; // Length of client type string
MAXCOMMENTSZ = 256; // Multipurpose comment length
LM20_MAXCOMMENTSZ = 48; // LM 2.0 Multipurpose comment length
QNLEN = NNLEN; // Queue name maximum length
LM20_QNLEN = LM20_NNLEN; // LM 2.0 Queue name maximum length
//
// The ALERTSZ and MAXDEVENTRIES defines have not yet been NT'ized.
// Whoever ports these components should change these values appropriately.
//
ALERTSZ = 128; // size of alert string in server
MAXDEVENTRIES = SizeOf(Integer) * 8; // Max number of device entries
NETBIOS_NAME_LEN = 16; // NetBIOS net name (bytes)
//
// Value to be used with APIs which have a "preferred maximum length"
// parameter. This value indicates that the API should just allocate
// "as much as it takes."
//
MAX_PREFERRED_LENGTH = DWORD(-1);
//
// Constants used with encryption
//
CRYPT_KEY_LEN = 7;
CRYPT_TXT_LEN = 8;
ENCRYPTED_PWLEN = 16;
SESSION_PWLEN = 24;
SESSION_CRYPT_KLEN = 21;
//
// Value to be used with SetInfo calls to allow setting of all
// settable parameters (parmnum zero option)
//
PARMNUM_ALL = 0;
PARM_ERROR_UNKNOWN = DWORD(-1);
PARM_ERROR_NONE = 0;
PARMNUM_BASE_INFOLEVEL = 1000;
type
//
// Only the UNICODE version of the LM APIs are available on NT.
LMSTR = LPWSTR;
LMCSTR = LPCWSTR;
const
//
// Message File Names
//
MESSAGE_FILENAME = 'NETMSG';
OS2MSG_FILENAME = 'BASE';
HELP_MSG_FILENAME = 'NETH';
// **INTERNAL_ONLY**
// The backup message file named here is a duplicate of net.msg. It
// is not shipped with the product, but is used at buildtime to
// msgbind certain messages to netapi.dll and some of the services.
// This allows for OEMs to modify the message text in net.msg and
// have those changes show up. Only in case there is an error in
// retrieving the messages from net.msg do we then get the bound
// messages out of bak.msg (really out of the message segment).
BACKUP_MSG_FILENAME = 'BAK.MSG';
// **END_INTERNAL**
type
//
// Keywords used in Function Prototypes
//
NET_API_STATUS = DWORD;
API_RET_TYPE = NET_API_STATUS; // Old value: do not use
const
//
// The platform ID indicates the levels to use for platform-specific
// information.
//
PLATFORM_ID_DOS = 300;
PLATFORM_ID_OS2 = 400;
PLATFORM_ID_NT = 500;
PLATFORM_ID_OSF = 600;
PLATFORM_ID_VMS = 700;
//
// There message numbers assigned to different LANMAN components
// are as defined below.
//
// lmerr.h: 2100 - 2999 NERR_BASE
// alertmsg.h: 3000 - 3049 ALERT_BASE
// lmsvc.h: 3050 - 3099 SERVICE_BASE
// lmerrlog.h: 3100 - 3299 ERRLOG_BASE
// msgtext.h: 3300 - 3499 MTXT_BASE
// apperr.h: 3500 - 3999 APPERR_BASE
// apperrfs.h: 4000 - 4299 APPERRFS_BASE
// apperr2.h: 4300 - 5299 APPERR2_BASE
// ncberr.h: 5300 - 5499 NRCERR_BASE
// alertmsg.h: 5500 - 5599 ALERT2_BASE
// lmsvc.h: 5600 - 5699 SERVICE2_BASE
// lmerrlog.h 5700 - 5899 ERRLOG2_BASE
//
MIN_LANMAN_MESSAGE_ID = 2100; // NERR_BASE
MAX_LANMAN_MESSAGE_ID = 5899;
NERR_Success = 0;
type
DWORD = Longword;
TAT_INFO = record
JobTime : DWord; { ms from midnight }
DaysOfMonth : DWord; { Bit # equeals day of month ( bit 0 = day 1 ) }
DaysOfWeek : Byte; { Bit # equeals day of week ( bit 0 = monday ) }
Flags : Byte; { Job state flags - see above }
Command : pWideChar; { command line - UniCode only }
end;
pAT_INFO = ^TAT_INFO;
TAT_ENUM = record
JobId : DWord; { Job identification number }
JobTime : DWord; { ms from midnight }
DaysOfMonth : DWord; { Bit # equeals day of month ( bit 0 = day 1 ) }
DaysOfWeek : byte; { Bit # equeals day of week ( bit 0 = monday ) }
Flags : Byte; { Job state flags - see above }
Command : pWideChar; { command line - UniCode only }
end;
pAT_ENUM = ^TAT_ENUM;
function NetScheduleJobAdd(Servername:pWideChar;
Buffer:pAT_Info;
Var JobId:DWord): integer; stdcall;
function NetScheduleJobDel(Servername:pWideChar;
MinJobId:DWord;
MaxJobId:DWord): integer; stdcall;
procedure NetScheduleJobGetInfo(Servername:pWideChar;
JobId : DWord;
Var Buffer : pAT_INFO); stdcall;
function NetScheduleJobEnum(Servername:pWideChar;
Var Buffer : pAT_ENUM;
PreferredMaximumLength : DWord;
Var EntriesRead : DWord;
Var TotalEntries : DWord;
Var ResumeHandle : DWord): integer; stdcall;
function NetApiBufferFree(Buffer: Pointer): integer; stdcall;
implementation
{ ** Schedule - Win NT only (UniCode)
***************************************** }
CONST
Schedule = 'NetApi32.DLL';
function NetScheduleJobAdd; external schedule name 'NetScheduleJobAdd';
function NetScheduleJobDel; external schedule name 'NetScheduleJobDel';
procedure NetScheduleJobGetInfo; external schedule name 'NetScheduleJobGetInfo';
function NetScheduleJobEnum; external schedule name 'NetScheduleJobEnum';
function NetApiBufferFree; external schedule name 'NetApiBufferFree';
end.
|
