← Back to branch summary

~ubuntu-branches/debian/lenny/fpc/lenny

« back to all changes in this revision

Viewing changes to fpcsrc/packages/base/winunits/jwaadserr.pas

  • Committer: Bazaar Package Importer
  • Author(s): Mazen Neifer, Torsten Werner, Mazen Neifer
  • Date: 2008-05-17 17:12:11 UTC
  • mfrom: (3.1.9 intrepid)
  • Revision ID: james.westby@ubuntu.com-20080517171211-9qi33xhd9evfa0kg
Tags: 2.2.0-dfsg1-9
http://bugs.debian.org/477743
[ Torsten Werner ]
* Add Mazen Neifer to Uploaders field.

[ Mazen Neifer ]
* Moved FPC sources into a version dependent directory from /usr/share/fpcsrc
  to /usr/share/fpcsrc/${FPCVERSION}. This allow installing more than on FPC
  release.
* Fixed far call issue in compiler preventing building huge binearies.
  (closes: #477743)
* Updated building dependencies, recomennded and suggested packages.
* Moved fppkg to fp-utils as it is just a helper tool and is not required by
  compiler.

Show diffs side-by-side

added added

removed removed

Lines of Context:
fpcsrc/packages/base/winunits/jwaadserr.pas
 
1
{******************************************************************************}
 
2
{                                                                              }
 
3
{ Active Directory Error Codes API interface Unit for Object Pascal            }
 
4
{                                                                              }
 
5
{ Portions created by Microsoft are Copyright (C) 1995-2001 Microsoft          }
 
6
{ Corporation. All Rights Reserved.                                            }
 
7
{                                                                              }
 
8
{ The original file is: adserr.h, released June 2000. The original Pascal      }
 
9
{ code is: AdsErr.pas, released December 2000. The initial developer of the    }
 
10
{ Pascal code is Marcel van Brakel (brakelm att chello dott nl).               }
 
11
{                                                                              }
 
12
{ Portions created by Marcel van Brakel are Copyright (C) 1999-2001            }
 
13
{ Marcel van Brakel. All Rights Reserved.                                      }
 
14
{                                                                              }
 
15
{ Obtained through: Joint Endeavour of Delphi Innovators (Project JEDI)        }
 
16
{                                                                              }
 
17
{ You may retrieve the latest version of this file at the Project JEDI         }
 
18
{ APILIB home page, located at http://jedi-apilib.sourceforge.net              }
 
19
{                                                                              }
 
20
{ The contents of this file are used with permission, subject to the Mozilla   }
 
21
{ Public License Version 1.1 (the "License"); you may not use this file except }
 
22
{ in compliance with the License. You may obtain a copy of the License at      }
 
23
{ http://www.mozilla.org/MPL/MPL-1.1.html                                      }
 
24
{                                                                              }
 
25
{ Software distributed under the License is distributed on an "AS IS" basis,   }
 
26
{ WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for }
 
27
{ the specific language governing rights and limitations under the License.    }
 
28
{                                                                              }
 
29
{ Alternatively, the contents of this file may be used under the terms of the  }
 
30
{ GNU Lesser General Public License (the  "LGPL License"), in which case the   }
 
31
{ provisions of the LGPL License are applicable instead of those above.        }
 
32
{ If you wish to allow use of your version of this file only under the terms   }
 
33
{ of the LGPL License and not to allow others to use your version of this file }
 
34
{ under the MPL, indicate your decision by deleting  the provisions above and  }
 
35
{ replace  them with the notice and other provisions required by the LGPL      }
 
36
{ License.  If you do not delete the provisions above, a recipient may use     }
 
37
{ your version of this file under either the MPL or the LGPL License.          }
 
38
{                                                                              }
 
39
{ For more information about the LGPL: http://www.gnu.org/copyleft/lesser.html }
 
40
{                                                                              }
 
41
{******************************************************************************}
 
42
 
 
43
// $Id: JwaAdsErr.pas,v 1.5 2004/12/08 08:18:35 marquardt Exp $
 
44
 
 
45
unit JwaAdsErr;
 
46
 
 
47
{$WEAKPACKAGEUNIT}
 
48
 
 
49
{$HPPEMIT ''}
 
50
{$HPPEMIT '#include "adserr.h"'}
 
51
{$HPPEMIT ''}
 
52
 
 
53
{$I jediapilib.inc}
 
54
 
 
55
interface
 
56
 
 
57
//
 
58
//  Values are 32 bit values layed out as follows:
 
59
//
 
60
//   3 3 2 2 2 2 2 2 2 2 2 2 1 1 1 1 1 1 1 1 1 1
 
61
//   1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0
 
62
//  +---+-+-+-----------------------+-------------------------------+
 
63
//  |Sev|C|R|     Facility          |               Code            |
 
64
//  +---+-+-+-----------------------+-------------------------------+
 
65
//
 
66
//  where
 
67
//
 
68
//      Sev - is the severity code
 
69
//
 
70
//          00 - Success
 
71
//          01 - Informational
 
72
//          10 - Warning
 
73
//          11 - Error
 
74
//
 
75
//      C - is the Customer code flag
 
76
//
 
77
//      R - is a reserved bit
 
78
//
 
79
//      Facility - is the facility code
 
80
//
 
81
//      Code - is the facility's status code
 
82
//
 
83
//
 
84
// Define the facility codes
 
85
//
 
86
 
 
87
const
 
88
  FACILITY_WINDOWS  = 8;
 
89
  {$EXTERNALSYM FACILITY_WINDOWS}
 
90
  FACILITY_STORAGE  = 3;
 
91
  {$EXTERNALSYM FACILITY_STORAGE}
 
92
  FACILITY_RPC      = 1;
 
93
  {$EXTERNALSYM FACILITY_RPC}
 
94
  FACILITY_SSPI     = 9;
 
95
  {$EXTERNALSYM FACILITY_SSPI}
 
96
  FACILITY_WIN32    = 7;
 
97
  {$EXTERNALSYM FACILITY_WIN32}
 
98
  FACILITY_CONTROL  = 10;
 
99
  {$EXTERNALSYM FACILITY_CONTROL}
 
100
  FACILITY_NULL     = 0;
 
101
  {$EXTERNALSYM FACILITY_NULL}
 
102
  FACILITY_ITF      = 4;
 
103
  {$EXTERNALSYM FACILITY_ITF}
 
104
  FACILITY_DISPATCH = 2;
 
105
  {$EXTERNALSYM FACILITY_DISPATCH}
 
106
 
 
107
//
 
108
// Define the severity codes
 
109
//
 
110
 
 
111
//
 
112
// MessageId: E_ADS_BAD_PATHNAME
 
113
//
 
114
// MessageText:
 
115
//
 
116
//  An invalid directory pathname was passed
 
117
//
 
118
  E_ADS_BAD_PATHNAME = HRESULT($80005000);
 
119
  {$EXTERNALSYM E_ADS_BAD_PATHNAME}
 
120
 
 
121
//
 
122
// MessageId: E_ADS_INVALID_DOMAIN_OBJECT
 
123
//
 
124
// MessageText:
 
125
//
 
126
//  An unknown directory domain object was requested
 
127
//
 
128
  E_ADS_INVALID_DOMAIN_OBJECT = HRESULT($80005001);
 
129
  {$EXTERNALSYM E_ADS_INVALID_DOMAIN_OBJECT}
 
130
 
 
131
//
 
132
// MessageId: E_ADS_INVALID_USER_OBJECT
 
133
//
 
134
// MessageText:
 
135
//
 
136
//  An unknown directory user object was requested
 
137
//
 
138
  E_ADS_INVALID_USER_OBJECT = HRESULT($80005002);
 
139
  {$EXTERNALSYM E_ADS_INVALID_USER_OBJECT}
 
140
 
 
141
//
 
142
// MessageId: E_ADS_INVALID_COMPUTER_OBJECT
 
143
//
 
144
// MessageText:
 
145
//
 
146
//  An unknown directory computer object was requested
 
147
//
 
148
  E_ADS_INVALID_COMPUTER_OBJECT = HRESULT($80005003);
 
149
  {$EXTERNALSYM E_ADS_INVALID_COMPUTER_OBJECT}
 
150
 
 
151
//
 
152
// MessageId: E_ADS_UNKNOWN_OBJECT
 
153
//
 
154
// MessageText:
 
155
//
 
156
//  An unknown directory object was requested
 
157
//
 
158
  E_ADS_UNKNOWN_OBJECT = HRESULT($80005004);
 
159
  {$EXTERNALSYM E_ADS_UNKNOWN_OBJECT}
 
160
 
 
161
//
 
162
// MessageId: E_ADS_PROPERTY_NOT_SET
 
163
//
 
164
// MessageText:
 
165
//
 
166
//  The specified directory property was not set
 
167
//
 
168
  E_ADS_PROPERTY_NOT_SET = HRESULT($80005005);
 
169
  {$EXTERNALSYM E_ADS_PROPERTY_NOT_SET}
 
170
 
 
171
//
 
172
// MessageId: E_ADS_PROPERTY_NOT_SUPPORTED
 
173
//
 
174
// MessageText:
 
175
//
 
176
//  The specified directory property is not supported
 
177
//
 
178
  E_ADS_PROPERTY_NOT_SUPPORTED = HRESULT($80005006);
 
179
  {$EXTERNALSYM E_ADS_PROPERTY_NOT_SUPPORTED}
 
180
 
 
181
//
 
182
// MessageId: E_ADS_PROPERTY_INVALID
 
183
//
 
184
// MessageText:
 
185
//
 
186
//  The specified directory property is invalid
 
187
//
 
188
  E_ADS_PROPERTY_INVALID = HRESULT($80005007);
 
189
  {$EXTERNALSYM E_ADS_PROPERTY_INVALID}
 
190
 
 
191
//
 
192
// MessageId: E_ADS_BAD_PARAMETER
 
193
//
 
194
// MessageText:
 
195
//
 
196
//  One or more input parameters are invalid
 
197
//
 
198
  E_ADS_BAD_PARAMETER = HRESULT($80005008);
 
199
  {$EXTERNALSYM E_ADS_BAD_PARAMETER}
 
200
 
 
201
//
 
202
// MessageId: E_ADS_OBJECT_UNBOUND
 
203
//
 
204
// MessageText:
 
205
//
 
206
//  The specified directory object is not bound to a remote resource
 
207
//
 
208
  E_ADS_OBJECT_UNBOUND = HRESULT($80005009);
 
209
  {$EXTERNALSYM E_ADS_OBJECT_UNBOUND}
 
210
 
 
211
//
 
212
// MessageId: E_ADS_PROPERTY_NOT_MODIFIED
 
213
//
 
214
// MessageText:
 
215
//
 
216
//  The specified directory object has not been modified
 
217
//
 
218
  E_ADS_PROPERTY_NOT_MODIFIED = HRESULT($8000500A);
 
219
  {$EXTERNALSYM E_ADS_PROPERTY_NOT_MODIFIED}
 
220
 
 
221
//
 
222
// MessageId: E_ADS_PROPERTY_MODIFIED
 
223
//
 
224
// MessageText:
 
225
//
 
226
//  The specified directory object has been modified
 
227
//
 
228
  E_ADS_PROPERTY_MODIFIED = HRESULT($8000500B);
 
229
  {$EXTERNALSYM E_ADS_PROPERTY_MODIFIED}
 
230
 
 
231
//
 
232
// MessageId: E_ADS_CANT_CONVERT_DATATYPE
 
233
//
 
234
// MessageText:
 
235
//
 
236
//  The directory datatype cannot be converted to/from a native DS datatype
 
237
//
 
238
  E_ADS_CANT_CONVERT_DATATYPE = HRESULT($8000500C);
 
239
  {$EXTERNALSYM E_ADS_CANT_CONVERT_DATATYPE}
 
240
 
 
241
//
 
242
// MessageId: E_ADS_PROPERTY_NOT_FOUND
 
243
//
 
244
// MessageText:
 
245
//
 
246
//  The directory property cannot be found in the cache.
 
247
//
 
248
  E_ADS_PROPERTY_NOT_FOUND = HRESULT($8000500D);
 
249
  {$EXTERNALSYM E_ADS_PROPERTY_NOT_FOUND}
 
250
 
 
251
//
 
252
// MessageId: E_ADS_OBJECT_EXISTS
 
253
//
 
254
// MessageText:
 
255
//
 
256
//  The directory object exists.
 
257
//
 
258
  E_ADS_OBJECT_EXISTS = HRESULT($8000500E);
 
259
  {$EXTERNALSYM E_ADS_OBJECT_EXISTS}
 
260
 
 
261
//
 
262
// MessageId: E_ADS_SCHEMA_VIOLATION
 
263
//
 
264
// MessageText:
 
265
//
 
266
//  The attempted action violates the DS schema rules.
 
267
//
 
268
  E_ADS_SCHEMA_VIOLATION = HRESULT($8000500F);
 
269
  {$EXTERNALSYM E_ADS_SCHEMA_VIOLATION}
 
270
 
 
271
//
 
272
// MessageId: E_ADS_COLUMN_NOT_SET
 
273
//
 
274
// MessageText:
 
275
//
 
276
//  The specified column in the directory was not set.
 
277
//
 
278
  E_ADS_COLUMN_NOT_SET = HRESULT($80005010);
 
279
  {$EXTERNALSYM E_ADS_COLUMN_NOT_SET}
 
280
 
 
281
//
 
282
// MessageId: S_ADS_ERRORSOCCURRED
 
283
//
 
284
// MessageText:
 
285
//
 
286
//  One or more errors occurred
 
287
//
 
288
  S_ADS_ERRORSOCCURRED = HRESULT($00005011);
 
289
  {$EXTERNALSYM S_ADS_ERRORSOCCURRED}
 
290
 
 
291
//
 
292
// MessageId: S_ADS_NOMORE_ROWS
 
293
//
 
294
// MessageText:
 
295
//
 
296
//  No more rows to be obatained by the search result.
 
297
//
 
298
  S_ADS_NOMORE_ROWS = HRESULT($00005012);
 
299
  {$EXTERNALSYM S_ADS_NOMORE_ROWS}
 
300
 
 
301
//
 
302
// MessageId: S_ADS_NOMORE_COLUMNS
 
303
//
 
304
// MessageText:
 
305
//
 
306
//  No more columns to be obatained for the current row.
 
307
//
 
308
  S_ADS_NOMORE_COLUMNS = HRESULT($00005013);
 
309
  {$EXTERNALSYM S_ADS_NOMORE_COLUMNS}
 
310
 
 
311
//
 
312
// MessageId: E_ADS_INVALID_FILTER
 
313
//
 
314
// MessageText:
 
315
//
 
316
//  The search filter specified is invalid
 
317
//
 
318
  E_ADS_INVALID_FILTER = HRESULT($80005014);
 
319
  {$EXTERNALSYM E_ADS_INVALID_FILTER}
 
320
 
 
321
implementation
 
322
 
 
323
end.