source: branches/samba-3.3.x/source/rpc_parse/parse_sec.c

Last change on this file was 206, checked in by Herwig Bauernfeind, 16 years ago

Import Samba 3.3 branch at 3.0.0 level (psmedley's port)
File size: 10.7 KB
Line 
1/*
2 * Unix SMB/Netbios implementation.
3 * Version 1.9.
4 * RPC Pipe client / server routines
5 * Copyright (C) Andrew Tridgell 1992-1998,
6 * Copyright (C) Jeremy R. Allison 1995-2005.
7 * Copyright (C) Luke Kenneth Casson Leighton 1996-1998,
8 * Copyright (C) Paul Ashton 1997-1998.
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 3 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, see <http://www.gnu.org/licenses/>.
22 */
23
24#include "includes.h"
25
26#undef DBGC_CLASS
27#define DBGC_CLASS DBGC_RPC_PARSE
28
29/*******************************************************************
30 Reads or writes a SEC_ACE structure.
31********************************************************************/
32
33static bool sec_io_ace(const char *desc, SEC_ACE *psa, prs_struct *ps,
34 int depth)
35{
36 uint32 old_offset;
37 uint32 offset_ace_size;
38 uint8 type;
39
40 if (psa == NULL)
41 return False;
42
43 prs_debug(ps, depth, desc, "sec_io_ace");
44 depth++;
45
46 old_offset = prs_offset(ps);
47
48 if (MARSHALLING(ps)) {
49 type = (uint8)psa->type;
50 }
51
52 if(!prs_uint8("type ", ps, depth, &type))
53 return False;
54
55 if (UNMARSHALLING(ps)) {
56 psa->type = (enum security_ace_type)type;
57 }
58
59 if(!prs_uint8("flags", ps, depth, &psa->flags))
60 return False;
61
62 if(!prs_uint16_pre("size ", ps, depth, &psa->size, &offset_ace_size))
63 return False;
64
65 if(!prs_uint32("access_mask", ps, depth, &psa->access_mask))
66 return False;
67
68 /* check whether object access is present */
69 if (!sec_ace_object(psa->type)) {
70 if (!smb_io_dom_sid("trustee ", &psa->trustee , ps, depth))
71 return False;
72 } else {
73 if (!prs_uint32("obj_flags", ps, depth, &psa->object.object.flags))
74 return False;
75
76 if (psa->object.object.flags & SEC_ACE_OBJECT_PRESENT)
77 if (!smb_io_uuid("obj_guid", &psa->object.object.type.type, ps,depth))
78 return False;
79
80 if (psa->object.object.flags & SEC_ACE_OBJECT_INHERITED_PRESENT)
81 if (!smb_io_uuid("inh_guid", &psa->object.object.inherited_type.inherited_type, ps,depth))
82 return False;
83
84 if(!smb_io_dom_sid("trustee ", &psa->trustee , ps, depth))
85 return False;
86 }
87
88 /* Theorectically an ACE can have a size greater than the
89 sum of its components. When marshalling, pad with extra null bytes up to the
90 correct size. */
91
92 if (MARSHALLING(ps) && (psa->size > prs_offset(ps) - old_offset)) {
93 uint32 extra_len = psa->size - (prs_offset(ps) - old_offset);
94 uint32 i;
95 uint8 c = 0;
96
97 for (i = 0; i < extra_len; i++) {
98 if (!prs_uint8("ace extra space", ps, depth, &c))
99 return False;
100 }
101 }
102
103 if(!prs_uint16_post("size ", ps, depth, &psa->size, offset_ace_size, old_offset))
104 return False;
105
106 return True;
107}
108
109/*******************************************************************
110 Reads or writes a SEC_ACL structure.
111
112 First of the xx_io_xx functions that allocates its data structures
113 for you as it reads them.
114********************************************************************/
115
116static bool sec_io_acl(const char *desc, SEC_ACL **ppsa, prs_struct *ps,
117 int depth)
118{
119 unsigned int i;
120 uint32 old_offset;
121 uint32 offset_acl_size;
122 SEC_ACL *psa;
123 uint16 revision;
124
125 /*
126 * Note that the size is always a multiple of 4 bytes due to the
127 * nature of the data structure. Therefore the prs_align() calls
128 * have been removed as they through us off when doing two-layer
129 * marshalling such as in the printing code (RPC_BUFFER). --jerry
130 */
131
132 if (ppsa == NULL)
133 return False;
134
135 psa = *ppsa;
136
137 if(UNMARSHALLING(ps) && psa == NULL) {
138 /*
139 * This is a read and we must allocate the stuct to read into.
140 */
141 if((psa = PRS_ALLOC_MEM(ps, SEC_ACL, 1)) == NULL)
142 return False;
143 *ppsa = psa;
144 }
145
146 prs_debug(ps, depth, desc, "sec_io_acl");
147 depth++;
148
149 old_offset = prs_offset(ps);
150
151 if (MARSHALLING(ps)) {
152 revision = (uint16)psa->revision;
153 }
154
155 if(!prs_uint16("revision", ps, depth, &revision))
156 return False;
157
158 if (UNMARSHALLING(ps)) {
159 psa->revision = (enum security_acl_revision)revision;
160 }
161
162 if(!prs_uint16_pre("size ", ps, depth, &psa->size, &offset_acl_size))
163 return False;
164
165 if(!prs_uint32("num_aces ", ps, depth, &psa->num_aces))
166 return False;
167
168 if (UNMARSHALLING(ps)) {
169 if (psa->num_aces) {
170 if((psa->aces = PRS_ALLOC_MEM(ps, SEC_ACE, psa->num_aces)) == NULL)
171 return False;
172 } else {
173 psa->aces = NULL;
174 }
175 }
176
177 for (i = 0; i < psa->num_aces; i++) {
178 fstring tmp;
179 slprintf(tmp, sizeof(tmp)-1, "ace_list[%02d]: ", i);
180 if(!sec_io_ace(tmp, &psa->aces[i], ps, depth))
181 return False;
182 }
183
184 /* Theorectically an ACL can have a size greater than the
185 sum of its components. When marshalling, pad with extra null bytes up to the
186 correct size. */
187
188 if (MARSHALLING(ps) && (psa->size > prs_offset(ps) - old_offset)) {
189 uint32 extra_len = psa->size - (prs_offset(ps) - old_offset);
190 uint8 c = 0;
191
192 for (i = 0; i < extra_len; i++) {
193 if (!prs_uint8("acl extra space", ps, depth, &c))
194 return False;
195 }
196 }
197
198 if(!prs_uint16_post("size ", ps, depth, &psa->size, offset_acl_size, old_offset))
199 return False;
200
201 return True;
202}
203
204/*******************************************************************
205 Reads or writes a SEC_DESC structure.
206 If reading and the *ppsd = NULL, allocates the structure.
207********************************************************************/
208
209bool sec_io_desc(const char *desc, SEC_DESC **ppsd, prs_struct *ps, int depth)
210{
211 uint32 old_offset;
212 uint32 max_offset = 0; /* after we're done, move offset to end */
213 uint32 tmp_offset = 0;
214 uint32 off_sacl, off_dacl, off_owner_sid, off_grp_sid;
215 uint16 revision;
216
217 SEC_DESC *psd;
218
219 if (ppsd == NULL)
220 return False;
221
222 psd = *ppsd;
223
224 if (psd == NULL) {
225 if(UNMARSHALLING(ps)) {
226 if((psd = PRS_ALLOC_MEM(ps,SEC_DESC,1)) == NULL)
227 return False;
228 *ppsd = psd;
229 } else {
230 /* Marshalling - just ignore. */
231 return True;
232 }
233 }
234
235 prs_debug(ps, depth, desc, "sec_io_desc");
236 depth++;
237
238 /* start of security descriptor stored for back-calc offset purposes */
239 old_offset = prs_offset(ps);
240
241 if (MARSHALLING(ps)) {
242 revision = (uint16)psd->revision;
243 }
244
245 if(!prs_uint16("revision", ps, depth, &revision))
246 return False;
247
248 if (UNMARSHALLING(ps)) {
249 psd->revision = (enum security_descriptor_revision)revision;
250 }
251
252 if(!prs_uint16("type ", ps, depth, &psd->type))
253 return False;
254
255 if (MARSHALLING(ps)) {
256 uint32 offset = SEC_DESC_HEADER_SIZE;
257
258 /*
259 * Work out the offsets here, as we write it out.
260 */
261
262 if (psd->sacl != NULL) {
263 off_sacl = offset;
264 offset += psd->sacl->size;
265 } else {
266 off_sacl = 0;
267 }
268
269 if (psd->dacl != NULL) {
270 off_dacl = offset;
271 offset += psd->dacl->size;
272 } else {
273 off_dacl = 0;
274 }
275
276 if (psd->owner_sid != NULL) {
277 off_owner_sid = offset;
278 offset += ndr_size_dom_sid(psd->owner_sid, 0);
279 } else {
280 off_owner_sid = 0;
281 }
282
283 if (psd->group_sid != NULL) {
284 off_grp_sid = offset;
285 offset += ndr_size_dom_sid(psd->group_sid, 0);
286 } else {
287 off_grp_sid = 0;
288 }
289 }
290
291 if(!prs_uint32("off_owner_sid", ps, depth, &off_owner_sid))
292 return False;
293
294 if(!prs_uint32("off_grp_sid ", ps, depth, &off_grp_sid))
295 return False;
296
297 if(!prs_uint32("off_sacl ", ps, depth, &off_sacl))
298 return False;
299
300 if(!prs_uint32("off_dacl ", ps, depth, &off_dacl))
301 return False;
302
303 max_offset = MAX(max_offset, prs_offset(ps));
304
305 if (off_owner_sid != 0) {
306
307 tmp_offset = prs_offset(ps);
308 if(!prs_set_offset(ps, old_offset + off_owner_sid))
309 return False;
310
311 if (UNMARSHALLING(ps)) {
312 /* reading */
313 if((psd->owner_sid = PRS_ALLOC_MEM(ps,DOM_SID,1)) == NULL)
314 return False;
315 }
316
317 if(!smb_io_dom_sid("owner_sid ", psd->owner_sid , ps, depth))
318 return False;
319
320 max_offset = MAX(max_offset, prs_offset(ps));
321
322 if (!prs_set_offset(ps,tmp_offset))
323 return False;
324 }
325
326 if (psd->group_sid != 0) {
327
328 tmp_offset = prs_offset(ps);
329 if(!prs_set_offset(ps, old_offset + off_grp_sid))
330 return False;
331
332 if (UNMARSHALLING(ps)) {
333 /* reading */
334 if((psd->group_sid = PRS_ALLOC_MEM(ps,DOM_SID,1)) == NULL)
335 return False;
336 }
337
338 if(!smb_io_dom_sid("grp_sid", psd->group_sid, ps, depth))
339 return False;
340
341 max_offset = MAX(max_offset, prs_offset(ps));
342
343 if (!prs_set_offset(ps,tmp_offset))
344 return False;
345 }
346
347 if ((psd->type & SEC_DESC_SACL_PRESENT) && off_sacl) {
348 tmp_offset = prs_offset(ps);
349 if(!prs_set_offset(ps, old_offset + off_sacl))
350 return False;
351 if(!sec_io_acl("sacl", &psd->sacl, ps, depth))
352 return False;
353 max_offset = MAX(max_offset, prs_offset(ps));
354 if (!prs_set_offset(ps,tmp_offset))
355 return False;
356 }
357
358 if ((psd->type & SEC_DESC_DACL_PRESENT) && off_dacl != 0) {
359 tmp_offset = prs_offset(ps);
360 if(!prs_set_offset(ps, old_offset + off_dacl))
361 return False;
362 if(!sec_io_acl("dacl", &psd->dacl, ps, depth))
363 return False;
364 max_offset = MAX(max_offset, prs_offset(ps));
365 if (!prs_set_offset(ps,tmp_offset))
366 return False;
367 }
368
369 if(!prs_set_offset(ps, max_offset))
370 return False;
371
372 return True;
373}
374
375/*******************************************************************
376 Reads or writes a SEC_DESC_BUF structure.
377********************************************************************/
378
379bool sec_io_desc_buf(const char *desc, SEC_DESC_BUF **ppsdb, prs_struct *ps, int depth)
380{
381 uint32 off_len;
382 uint32 off_max_len;
383 uint32 old_offset;
384 uint32 size;
385 uint32 len;
386 SEC_DESC_BUF *psdb;
387 uint32 ptr;
388
389 if (ppsdb == NULL)
390 return False;
391
392 psdb = *ppsdb;
393
394 if (UNMARSHALLING(ps) && psdb == NULL) {
395 if((psdb = PRS_ALLOC_MEM(ps,SEC_DESC_BUF,1)) == NULL)
396 return False;
397 *ppsdb = psdb;
398 }
399
400 prs_debug(ps, depth, desc, "sec_io_desc_buf");
401 depth++;
402
403 if(!prs_align(ps))
404 return False;
405
406 if(!prs_uint32_pre("max_len", ps, depth, &psdb->sd_size, &off_max_len))
407 return False;
408
409 ptr = 1;
410 if(!prs_uint32 ("ptr ", ps, depth, &ptr))
411 return False;
412
413 len = ndr_size_security_descriptor(psdb->sd, 0);
414 if(!prs_uint32_pre("len ", ps, depth, &len, &off_len))
415 return False;
416
417 old_offset = prs_offset(ps);
418
419 /* reading, length is non-zero; writing, descriptor is non-NULL */
420 if ((UNMARSHALLING(ps) && psdb->sd_size != 0) || (MARSHALLING(ps) && psdb->sd != NULL)) {
421 if(!sec_io_desc("sec ", &psdb->sd, ps, depth))
422 return False;
423 }
424
425 if(!prs_align(ps))
426 return False;
427
428 size = prs_offset(ps) - old_offset;
429 if(!prs_uint32_post("max_len", ps, depth, &psdb->sd_size, off_max_len, size == 0 ? psdb->sd_size : size))
430 return False;
431
432 if(!prs_uint32_post("len ", ps, depth, &len, off_len, size))
433 return False;
434
435 return True;
436}
Note: See TracBrowser for help on using the repository browser.