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
  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
 161         if (!dom_sid) {
 162                 return NULL;
 163         }
 164
 165         ret = talloc(mem_ctx, struct dom_sid);
 166         if (!ret) {
 167                 return NULL;
 168         }
 169
 170         ret->sub_auths = talloc_array(ret, uint32_t, dom_sid->num_auths);
 171         if (!ret->sub_auths) {
 172                 return NULL;
 173         }
 174
 175         ret->sid_rev_num = dom_sid->sid_rev_num;
 176         ret->id_auth[0] = dom_sid->id_auth[0];
 177         ret->id_auth[1] = dom_sid->id_auth[1];
 178         ret->id_auth[2] = dom_sid->id_auth[2];
 179         ret->id_auth[3] = dom_sid->id_auth[3];
 180         ret->id_auth[4] = dom_sid->id_auth[4];
 181         ret->id_auth[5] = dom_sid->id_auth[5];
 182         ret->num_auths = dom_sid->num_auths;
 183
 184         for (i=0;i<dom_sid->num_auths;i++) {
 185                 ret->sub_auths[i] = dom_sid->sub_auths[i];
 186         }
 187
 188         return ret;
 189 }
 190
 191 /*
 192   add a rid to a domain dom_sid to make a full dom_sid. This function
 193   returns a new sid in the suppplied memory context
 194 */
 195 struct dom_sid *dom_sid_add_rid(TALLOC_CTX *mem_ctx,
 196                                 const struct dom_sid *domain_sid,
 197                                 uint32_t rid)
 198 {
 199         struct dom_sid *sid;
 200
 201         sid = talloc(mem_ctx, struct dom_sid);
 202         if (!sid) return NULL;
 203
 204         *sid = *domain_sid;
 205
 206         sid->sub_auths = talloc_array(sid, uint32_t, sid->num_auths+1);
 207         if (!sid->sub_auths) {
 208                 return NULL;
 209         }
 210         memcpy(sid->sub_auths, domain_sid->sub_auths, sid->num_auths*sizeof(uint32_t));
 211         sid->sub_auths[sid->num_auths] = rid;
 212         sid->num_auths++;
 213
 214         return sid;
 215 }
 216
 217 /*
 218   Split up a SID into its domain and RID part
 219 */
 220 NTSTATUS dom_sid_split_rid(TALLOC_CTX *mem_ctx, const struct dom_sid *sid,
 221                            struct dom_sid **domain, uint32_t *rid)
 222 {
 223         if (sid->num_auths == 0) {
 224                 return NT_STATUS_INVALID_PARAMETER;
 225         }
 226
 227         if (domain) {
 228                 if (!(*domain = dom_sid_dup(mem_ctx, sid))) {
 229                         return NT_STATUS_NO_MEMORY;
 230                 }
 231
 232                 (*domain)->num_auths -= 1;
 233         }
 234
 235         if (rid) {
 236                 *rid = sid->sub_auths[sid->num_auths - 1];
 237         }
 238
 239         return NT_STATUS_OK;
 240 }
 241
 242 /*
 243   return True if the 2nd sid is in the domain given by the first sid
 244 */
 245 BOOL dom_sid_in_domain(const struct dom_sid *domain_sid,
 246                        const struct dom_sid *sid)
 247 {
 248         int i;
 249
 250         if (!domain_sid || !sid) {
 251                 return False;
 252         }
 253
 254         if (domain_sid->num_auths > sid->num_auths) {
 255                 return False;
 256         }
 257
 258         for (i = domain_sid->num_auths-1; i >= 0; --i) {
 259                 if (domain_sid->sub_auths[i] != sid->sub_auths[i]) {
 260                         return False;
 261                 }
 262         }
 263
 264         return dom_sid_compare_auth(domain_sid, sid) == 0;
 265 }
 266
 267 /*
 268   convert a dom_sid to a string
 269 */
 270 char *dom_sid_string(TALLOC_CTX *mem_ctx, const struct dom_sid *sid)
 271 {
 272         int i, ofs, maxlen;
 273         uint32_t ia;
 274         char *ret;
 275
 276         if (!sid) {
 277                 return talloc_strdup(mem_ctx, "(NULL SID)");
 278         }
 279
 280         maxlen = sid->num_auths * 11 + 25;
 281         ret = talloc_size(mem_ctx, maxlen);
 282         if (!ret) return talloc_strdup(mem_ctx, "(SID ERR)");
 283
 284         ia = (sid->id_auth[5]) +
 285                 (sid->id_auth[4] << 8 ) +
 286                 (sid->id_auth[3] << 16) +
 287                 (sid->id_auth[2] << 24);
 288
 289         ofs = snprintf(ret, maxlen, "S-%u-%lu",
 290                        (unsigned int)sid->sid_rev_num, (unsigned long)ia);
 291
 292         for (i = 0; i < sid->num_auths; i++) {
 293                 ofs += snprintf(ret + ofs, maxlen - ofs, "-%lu", (unsigned long)sid->sub_auths[i]);
 294         }
 295
 296         return ret;
 297 }