r25027: Fix more warnings.
[jelmer/samba4-debian.git] / source / libcli / security / dom_sid.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Samba utility functions
4
5    Copyright (C) Stefan (metze) Metzmacher      2002-2004
6    Copyright (C) Andrew Tridgell                1992-2004
7    Copyright (C) Jeremy Allison                 1999
8       
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 */
22
23 #include "includes.h"
24 #include "librpc/gen_ndr/security.h"
25 #include "libcli/security/security.h"
26
27 /*****************************************************************
28  Compare the auth portion of two sids.
29 *****************************************************************/  
30
31 static int dom_sid_compare_auth(const struct dom_sid *sid1, const struct dom_sid *sid2)
32 {
33         int i;
34
35         if (sid1 == sid2)
36                 return 0;
37         if (!sid1)
38                 return -1;
39         if (!sid2)
40                 return 1;
41
42         if (sid1->sid_rev_num != sid2->sid_rev_num)
43                 return sid1->sid_rev_num - sid2->sid_rev_num;
44
45         for (i = 0; i < 6; i++)
46                 if (sid1->id_auth[i] != sid2->id_auth[i])
47                         return sid1->id_auth[i] - sid2->id_auth[i];
48
49         return 0;
50 }
51
52 /*****************************************************************
53  Compare two sids.
54 *****************************************************************/  
55
56 static int dom_sid_compare(const struct dom_sid *sid1, const struct dom_sid *sid2)
57 {
58         int i;
59
60         if (sid1 == sid2)
61                 return 0;
62         if (!sid1)
63                 return -1;
64         if (!sid2)
65                 return 1;
66
67         /* Compare most likely different rids, first: i.e start at end */
68         if (sid1->num_auths != sid2->num_auths)
69                 return sid1->num_auths - sid2->num_auths;
70
71         for (i = sid1->num_auths-1; i >= 0; --i)
72                 if (sid1->sub_auths[i] != sid2->sub_auths[i])
73                         return sid1->sub_auths[i] - sid2->sub_auths[i];
74
75         return dom_sid_compare_auth(sid1, sid2);
76 }
77
78 /*****************************************************************
79  Compare two sids.
80 *****************************************************************/  
81
82 bool dom_sid_equal(const struct dom_sid *sid1, const struct dom_sid *sid2)
83 {
84         return dom_sid_compare(sid1, sid2) == 0;
85 }
86
87
88 /*
89   convert a string to a dom_sid, returning a talloc'd dom_sid
90 */
91 struct dom_sid *dom_sid_parse_talloc(TALLOC_CTX *mem_ctx, const char *sidstr)
92 {
93         struct dom_sid *ret;
94         uint_t rev, ia, num_sub_auths, i;
95         char *p;
96   
97         if (strncasecmp(sidstr, "S-", 2)) {
98                 return NULL;
99         }
100
101         sidstr += 2;
102
103         rev = strtol(sidstr, &p, 10);
104         if (*p != '-') {
105                 return NULL;
106         }
107         sidstr = p+1;
108
109         ia = strtol(sidstr, &p, 10);
110         if (p == sidstr) {
111                 return NULL;
112         }
113         sidstr = p;
114
115         num_sub_auths = 0;
116         for (i=0;sidstr[i];i++) {
117                 if (sidstr[i] == '-') num_sub_auths++;
118         }
119
120         ret = talloc(mem_ctx, struct dom_sid);
121         if (!ret) {
122                 return NULL;
123         }
124
125         ret->sub_auths = talloc_array(ret, uint32_t, num_sub_auths);
126         if (!ret->sub_auths) {
127                 return NULL;
128         }
129
130         ret->sid_rev_num = rev;
131         ret->id_auth[0] = 0;
132         ret->id_auth[1] = 0;
133         ret->id_auth[2] = ia >> 24;
134         ret->id_auth[3] = ia >> 16;
135         ret->id_auth[4] = ia >> 8;
136         ret->id_auth[5] = ia;
137         ret->num_auths = num_sub_auths;
138
139         for (i=0;i<num_sub_auths;i++) {
140                 if (sidstr[0] != '-') {
141                         return NULL;
142                 }
143                 sidstr++;
144                 ret->sub_auths[i] = strtoul(sidstr, &p, 10);
145                 if (p == sidstr) {
146                         return NULL;
147                 }
148                 sidstr = p;
149         }
150
151         return ret;
152 }
153
154 /*
155   copy a dom_sid structure
156 */
157 struct dom_sid *dom_sid_dup(TALLOC_CTX *mem_ctx, const struct dom_sid *dom_sid)
158 {
159         struct dom_sid *ret;
160         int i;
161         
162         if (!dom_sid) {
163                 return NULL;
164         }
165
166         ret = talloc(mem_ctx, struct dom_sid);
167         if (!ret) {
168                 return NULL;
169         }
170
171         ret->sub_auths = talloc_array(ret, uint32_t, dom_sid->num_auths);
172         if (!ret->sub_auths) {
173                 return NULL;
174         }
175
176         ret->sid_rev_num = dom_sid->sid_rev_num;
177         ret->id_auth[0] = dom_sid->id_auth[0];
178         ret->id_auth[1] = dom_sid->id_auth[1];
179         ret->id_auth[2] = dom_sid->id_auth[2];
180         ret->id_auth[3] = dom_sid->id_auth[3];
181         ret->id_auth[4] = dom_sid->id_auth[4];
182         ret->id_auth[5] = dom_sid->id_auth[5];
183         ret->num_auths = dom_sid->num_auths;
184
185         for (i=0;i<dom_sid->num_auths;i++) {
186                 ret->sub_auths[i] = dom_sid->sub_auths[i];
187         }
188
189         return ret;
190 }
191
192 /*
193   add a rid to a domain dom_sid to make a full dom_sid. This function
194   returns a new sid in the suppplied memory context
195 */
196 struct dom_sid *dom_sid_add_rid(TALLOC_CTX *mem_ctx, 
197                                 const struct dom_sid *domain_sid, 
198                                 uint32_t rid)
199 {
200         struct dom_sid *sid;
201
202         sid = talloc(mem_ctx, struct dom_sid);
203         if (!sid) return NULL;
204
205         *sid = *domain_sid;
206
207         sid->sub_auths = talloc_array(sid, uint32_t, sid->num_auths+1);
208         if (!sid->sub_auths) {
209                 return NULL;
210         }
211         memcpy(sid->sub_auths, domain_sid->sub_auths, sid->num_auths*sizeof(uint32_t));
212         sid->sub_auths[sid->num_auths] = rid;
213         sid->num_auths++;
214
215         return sid;
216 }
217
218 /*
219   Split up a SID into its domain and RID part
220 */
221 NTSTATUS dom_sid_split_rid(TALLOC_CTX *mem_ctx, const struct dom_sid *sid,
222                            struct dom_sid **domain, uint32_t *rid)
223 {
224         if (sid->num_auths == 0) {
225                 return NT_STATUS_INVALID_PARAMETER;
226         }
227
228         if (domain) {
229                 if (!(*domain = dom_sid_dup(mem_ctx, sid))) {
230                         return NT_STATUS_NO_MEMORY;
231                 }
232
233                 (*domain)->num_auths -= 1;
234         }
235
236         if (rid) {
237                 *rid = sid->sub_auths[sid->num_auths - 1];
238         }
239
240         return NT_STATUS_OK;
241 }
242
243 /*
244   return True if the 2nd sid is in the domain given by the first sid
245 */
246 BOOL dom_sid_in_domain(const struct dom_sid *domain_sid, 
247                        const struct dom_sid *sid)
248 {
249         int i;
250
251         if (!domain_sid || !sid) {
252                 return False;
253         }
254
255         if (domain_sid->num_auths > sid->num_auths) {
256                 return False;
257         }
258
259         for (i = domain_sid->num_auths-1; i >= 0; --i) {
260                 if (domain_sid->sub_auths[i] != sid->sub_auths[i]) {
261                         return False;
262                 }
263         }
264
265         return dom_sid_compare_auth(domain_sid, sid) == 0;
266 }
267
268 /*
269   convert a dom_sid to a string
270 */
271 char *dom_sid_string(TALLOC_CTX *mem_ctx, const struct dom_sid *sid)
272 {
273         int i, ofs, maxlen;
274         uint32_t ia;
275         char *ret;
276         
277         if (!sid) {
278                 return talloc_strdup(mem_ctx, "(NULL SID)");
279         }
280
281         maxlen = sid->num_auths * 11 + 25;
282         ret = talloc_array(mem_ctx, char, maxlen);
283         if (!ret) return talloc_strdup(mem_ctx, "(SID ERR)");
284
285         ia = (sid->id_auth[5]) +
286                 (sid->id_auth[4] << 8 ) +
287                 (sid->id_auth[3] << 16) +
288                 (sid->id_auth[2] << 24);
289
290         ofs = snprintf(ret, maxlen, "S-%u-%lu", 
291                        (unsigned int)sid->sid_rev_num, (unsigned long)ia);
292
293         for (i = 0; i < sid->num_auths; i++) {
294                 ofs += snprintf(ret + ofs, maxlen - ofs, "-%lu", (unsigned long)sid->sub_auths[i]);
295         }
296         
297         return ret;
298 }