r12608: Remove some unused #include lines.
[abartlet/samba.git/.git] / source4 / 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 2 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, write to the Free Software
21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 */
23
24 #include "includes.h"
25
26 /*****************************************************************
27  Compare the auth portion of two sids.
28 *****************************************************************/  
29
30 static int dom_sid_compare_auth(const struct dom_sid *sid1, const struct dom_sid *sid2)
31 {
32         int i;
33
34         if (sid1 == sid2)
35                 return 0;
36         if (!sid1)
37                 return -1;
38         if (!sid2)
39                 return 1;
40
41         if (sid1->sid_rev_num != sid2->sid_rev_num)
42                 return sid1->sid_rev_num - sid2->sid_rev_num;
43
44         for (i = 0; i < 6; i++)
45                 if (sid1->id_auth[i] != sid2->id_auth[i])
46                         return sid1->id_auth[i] - sid2->id_auth[i];
47
48         return 0;
49 }
50
51 /*****************************************************************
52  Compare two sids.
53 *****************************************************************/  
54
55 static int dom_sid_compare(const struct dom_sid *sid1, const struct dom_sid *sid2)
56 {
57         int i;
58
59         if (sid1 == sid2)
60                 return 0;
61         if (!sid1)
62                 return -1;
63         if (!sid2)
64                 return 1;
65
66         /* Compare most likely different rids, first: i.e start at end */
67         if (sid1->num_auths != sid2->num_auths)
68                 return sid1->num_auths - sid2->num_auths;
69
70         for (i = sid1->num_auths-1; i >= 0; --i)
71                 if (sid1->sub_auths[i] != sid2->sub_auths[i])
72                         return sid1->sub_auths[i] - sid2->sub_auths[i];
73
74         return dom_sid_compare_auth(sid1, sid2);
75 }
76
77 /*****************************************************************
78  Compare two sids.
79 *****************************************************************/  
80
81 BOOL dom_sid_equal(const struct dom_sid *sid1, const struct dom_sid *sid2)
82 {
83         return dom_sid_compare(sid1, sid2) == 0;
84 }
85
86
87 /*
88   convert a string to a dom_sid, returning a talloc'd dom_sid
89 */
90 struct dom_sid *dom_sid_parse_talloc(TALLOC_CTX *mem_ctx, const char *sidstr)
91 {
92         struct dom_sid *ret;
93         uint_t rev, ia, num_sub_auths, i;
94         char *p;
95   
96         if (strncasecmp(sidstr, "S-", 2)) {
97                 return NULL;
98         }
99
100         sidstr += 2;
101
102         rev = strtol(sidstr, &p, 10);
103         if (*p != '-') {
104                 return NULL;
105         }
106         sidstr = p+1;
107
108         ia = strtol(sidstr, &p, 10);
109         if (p == sidstr) {
110                 return NULL;
111         }
112         sidstr = p;
113
114         num_sub_auths = 0;
115         for (i=0;sidstr[i];i++) {
116                 if (sidstr[i] == '-') num_sub_auths++;
117         }
118
119         ret = talloc(mem_ctx, struct dom_sid);
120         if (!ret) {
121                 return NULL;
122         }
123
124         ret->sub_auths = talloc_array(ret, uint32_t, num_sub_auths);
125         if (!ret->sub_auths) {
126                 return NULL;
127         }
128
129         ret->sid_rev_num = rev;
130         ret->id_auth[0] = 0;
131         ret->id_auth[1] = 0;
132         ret->id_auth[2] = ia >> 24;
133         ret->id_auth[3] = ia >> 16;
134         ret->id_auth[4] = ia >> 8;
135         ret->id_auth[5] = ia;
136         ret->num_auths = num_sub_auths;
137
138         for (i=0;i<num_sub_auths;i++) {
139                 if (sidstr[0] != '-') {
140                         return NULL;
141                 }
142                 sidstr++;
143                 ret->sub_auths[i] = strtoul(sidstr, &p, 10);
144                 if (p == sidstr) {
145                         return NULL;
146                 }
147                 sidstr = p;
148         }
149
150         return ret;
151 }
152
153 /*
154   copy a dom_sid structure
155 */
156 struct dom_sid *dom_sid_dup(TALLOC_CTX *mem_ctx, const struct dom_sid *dom_sid)
157 {
158         struct dom_sid *ret;
159         int i;
160         ret = talloc(mem_ctx, struct dom_sid);
161         if (!ret) {
162                 return NULL;
163         }
164
165         ret->sub_auths = talloc_array(ret, uint32_t, dom_sid->num_auths);
166         if (!ret->sub_auths) {
167                 return NULL;
168         }
169
170         ret->sid_rev_num = dom_sid->sid_rev_num;
171         ret->id_auth[0] = dom_sid->id_auth[0];
172         ret->id_auth[1] = dom_sid->id_auth[1];
173         ret->id_auth[2] = dom_sid->id_auth[2];
174         ret->id_auth[3] = dom_sid->id_auth[3];
175         ret->id_auth[4] = dom_sid->id_auth[4];
176         ret->id_auth[5] = dom_sid->id_auth[5];
177         ret->num_auths = dom_sid->num_auths;
178
179         for (i=0;i<dom_sid->num_auths;i++) {
180                 ret->sub_auths[i] = dom_sid->sub_auths[i];
181         }
182
183         return ret;
184 }
185
186 /*
187   add a rid to a domain dom_sid to make a full dom_sid. This function
188   returns a new sid in the suppplied memory context
189 */
190 struct dom_sid *dom_sid_add_rid(TALLOC_CTX *mem_ctx, 
191                                 const struct dom_sid *domain_sid, 
192                                 uint32_t rid)
193 {
194         struct dom_sid *sid;
195
196         sid = talloc(mem_ctx, struct dom_sid);
197         if (!sid) return NULL;
198
199         *sid = *domain_sid;
200
201         sid->sub_auths = talloc_array(sid, uint32_t, sid->num_auths+1);
202         if (!sid->sub_auths) {
203                 return NULL;
204         }
205         memcpy(sid->sub_auths, domain_sid->sub_auths, sid->num_auths*sizeof(uint32_t));
206         sid->sub_auths[sid->num_auths] = rid;
207         sid->num_auths++;
208
209         return sid;
210 }
211
212
213 /*
214   return True if the 2nd sid is in the domain given by the first sid
215 */
216 BOOL dom_sid_in_domain(const struct dom_sid *domain_sid, 
217                        const struct dom_sid *sid)
218 {
219         int i;
220
221         if (!domain_sid || !sid) {
222                 return False;
223         }
224
225         if (domain_sid->num_auths > sid->num_auths) {
226                 return False;
227         }
228
229         for (i = domain_sid->num_auths-1; i >= 0; --i) {
230                 if (domain_sid->sub_auths[i] != sid->sub_auths[i]) {
231                         return False;
232                 }
233         }
234
235         return dom_sid_compare_auth(domain_sid, sid) == 0;
236 }