source3/lib/privileges.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Privileges handling functions
   4    Copyright (C) Jean François Micouleau       1998-2001
   5    Copyright (C) Simo Sorce                     2002-2003
   6    Copyright (C) Gerald (Jerry) Carter          2005
   7    Copyright (C) Michael Adam                   2007
   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
  24 #include "includes.h"
  25
  26 #define PRIVPREFIX              "PRIV_"
  27
  28 typedef struct {
  29         size_t count;
  30         DOM_SID *list;
  31 } SID_LIST;
  32
  33 typedef struct {
  34         TALLOC_CTX *mem_ctx;
  35         SE_PRIV privilege;
  36         SID_LIST sids;
  37 } PRIV_SID_LIST;
  38
  39
  40 static bool get_privileges( const DOM_SID *sid, SE_PRIV *mask )
  41 {
  42         struct db_context *db = get_account_pol_db();
  43         fstring tmp, keystr;
  44         TDB_DATA data;
  45
  46         /* Fail if the admin has not enable privileges */
  47
  48         if ( !lp_enable_privileges() ) {
  49                 return False;
  50         }
  51
  52         if ( db == NULL )
  53                 return False;
  54
  55         /* PRIV_<SID> (NULL terminated) as the key */
  56
  57         fstr_sprintf(keystr, "%s%s", PRIVPREFIX, sid_to_fstring(tmp, sid));
  58
  59         data = dbwrap_fetch_bystring( db, talloc_tos(), keystr );
  60
  61         if ( !data.dptr ) {
  62                 DEBUG(3, ("get_privileges: No privileges assigned to SID "
  63                           "[%s]\n", sid_string_dbg(sid)));
  64                 return False;
  65         }
  66
  67         SMB_ASSERT( data.dsize == sizeof( SE_PRIV ) );
  68
  69         se_priv_copy( mask, (SE_PRIV*)data.dptr );
  70         TALLOC_FREE(data.dptr);
  71
  72         return True;
  73 }
  74
  75 /***************************************************************************
  76  Store the privilege mask (set) for a given SID
  77 ****************************************************************************/
  78
  79 static bool set_privileges( const DOM_SID *sid, SE_PRIV *mask )
  80 {
  81         struct db_context *db = get_account_pol_db();
  82         fstring tmp, keystr;
  83         TDB_DATA data;
  84
  85         if ( !lp_enable_privileges() )
  86                 return False;
  87
  88         if ( db == NULL )
  89                 return False;
  90
  91         if ( !sid || (sid->num_auths == 0) ) {
  92                 DEBUG(0,("set_privileges: Refusing to store empty SID!\n"));
  93                 return False;
  94         }
  95
  96         /* PRIV_<SID> (NULL terminated) as the key */
  97
  98         fstr_sprintf(keystr, "%s%s", PRIVPREFIX, sid_to_fstring(tmp, sid));
  99
 100         /* no packing.  static size structure, just write it out */
 101
 102         data.dptr  = (uint8 *)mask;
 103         data.dsize = sizeof(SE_PRIV);
 104
 105         return NT_STATUS_IS_OK(dbwrap_store_bystring(db, keystr, data,
 106                                                      TDB_REPLACE));
 107 }
 108
 109 /*********************************************************************
 110  get a list of all privileges for all sids in the list
 111 *********************************************************************/
 112
 113 bool get_privileges_for_sids(SE_PRIV *privileges, DOM_SID *slist, int scount)
 114 {
 115         SE_PRIV mask;
 116         int i;
 117         bool found = False;
 118
 119         se_priv_copy( privileges, &se_priv_none );
 120
 121         for ( i=0; i<scount; i++ ) {
 122                 /* don't add unless we actually have a privilege assigned */
 123
 124                 if ( !get_privileges( &slist[i], &mask ) )
 125                         continue;
 126
 127                 DEBUG(5,("get_privileges_for_sids: sid = %s\nPrivilege "
 128                          "set:\n", sid_string_dbg(&slist[i])));
 129                 dump_se_priv( DBGC_ALL, 5, &mask );
 130
 131                 se_priv_add( privileges, &mask );
 132                 found = True;
 133         }
 134
 135         return found;
 136 }
 137
 138
 139 /*********************************************************************
 140  traversal functions for privilege_enumerate_accounts
 141 *********************************************************************/
 142
 143 static int priv_traverse_fn(struct db_record *rec, void *state)
 144 {
 145         PRIV_SID_LIST *priv = (PRIV_SID_LIST *)state;
 146         int  prefixlen = strlen(PRIVPREFIX);
 147         DOM_SID sid;
 148         fstring sid_string;
 149
 150         /* easy check first */
 151
 152         if (rec->value.dsize != sizeof(SE_PRIV) )
 153                 return 0;
 154
 155         /* check we have a PRIV_+SID entry */
 156
 157         if ( strncmp((char *)rec->key.dptr, PRIVPREFIX, prefixlen) != 0)
 158                 return 0;
 159
 160         /* check to see if we are looking for a particular privilege */
 161
 162         if ( !se_priv_equal(&priv->privilege, &se_priv_none) ) {
 163                 SE_PRIV mask;
 164
 165                 se_priv_copy( &mask, (SE_PRIV*)rec->value.dptr );
 166
 167                 /* if the SID does not have the specified privilege
 168                    then just return */
 169
 170                 if ( !is_privilege_assigned( &mask, &priv->privilege) )
 171                         return 0;
 172         }
 173
 174         fstrcpy( sid_string, (char *)&(rec->key.dptr[strlen(PRIVPREFIX)]) );
 175
 176         /* this is a last ditch safety check to preventing returning
 177            and invalid SID (i've somehow run into this on development branches) */
 178
 179         if ( strcmp( "S-0-0", sid_string ) == 0 )
 180                 return 0;
 181
 182         if ( !string_to_sid(&sid, sid_string) ) {
 183                 DEBUG(0,("travsersal_fn_enum__acct: Could not convert SID [%s]\n",
 184                         sid_string));
 185                 return 0;
 186         }
 187
 188         if (!NT_STATUS_IS_OK(add_sid_to_array(priv->mem_ctx, &sid,
 189                                               &priv->sids.list,
 190                                               &priv->sids.count)))
 191         {
 192                 return 0;
 193         }
 194
 195         return 0;
 196 }
 197
 198 /*********************************************************************
 199  Retreive list of privileged SIDs (for _lsa_enumerate_accounts()
 200 *********************************************************************/
 201
 202 NTSTATUS privilege_enumerate_accounts(DOM_SID **sids, int *num_sids)
 203 {
 204         struct db_context *db = get_account_pol_db();
 205         PRIV_SID_LIST priv;
 206
 207         if (db == NULL) {
 208                 return NT_STATUS_ACCESS_DENIED;
 209         }
 210
 211         ZERO_STRUCT(priv);
 212
 213         se_priv_copy( &priv.privilege, &se_priv_none );
 214
 215         db->traverse_read(db, priv_traverse_fn, &priv);
 216
 217         /* give the memory away; caller will free */
 218
 219         *sids      = priv.sids.list;
 220         *num_sids  = priv.sids.count;
 221
 222         return NT_STATUS_OK;
 223 }
 224
 225 /*********************************************************************
 226  Retrieve list of SIDs granted a particular privilege
 227 *********************************************************************/
 228
 229 NTSTATUS privilege_enum_sids(const SE_PRIV *mask, TALLOC_CTX *mem_ctx,
 230                              DOM_SID **sids, int *num_sids)
 231 {
 232         struct db_context *db = get_account_pol_db();
 233         PRIV_SID_LIST priv;
 234
 235         if (db == NULL) {
 236                 return NT_STATUS_ACCESS_DENIED;
 237         }
 238
 239         ZERO_STRUCT(priv);
 240
 241         se_priv_copy(&priv.privilege, mask);
 242         priv.mem_ctx = mem_ctx;
 243
 244         db->traverse_read(db, priv_traverse_fn, &priv);
 245
 246         /* give the memory away; caller will free */
 247
 248         *sids      = priv.sids.list;
 249         *num_sids  = priv.sids.count;
 250
 251         return NT_STATUS_OK;
 252 }
 253
 254 /***************************************************************************
 255  Add privilege to sid
 256 ****************************************************************************/
 257
 258 bool grant_privilege(const DOM_SID *sid, const SE_PRIV *priv_mask)
 259 {
 260         SE_PRIV old_mask, new_mask;
 261
 262         ZERO_STRUCT( old_mask );
 263         ZERO_STRUCT( new_mask );
 264
 265         if ( get_privileges( sid, &old_mask ) )
 266                 se_priv_copy( &new_mask, &old_mask );
 267         else
 268                 se_priv_copy( &new_mask, &se_priv_none );
 269
 270         se_priv_add( &new_mask, priv_mask );
 271
 272         DEBUG(10,("grant_privilege: %s\n", sid_string_dbg(sid)));
 273
 274         DEBUGADD( 10, ("original privilege mask:\n"));
 275         dump_se_priv( DBGC_ALL, 10, &old_mask );
 276
 277         DEBUGADD( 10, ("new privilege mask:\n"));
 278         dump_se_priv( DBGC_ALL, 10, &new_mask );
 279
 280         return set_privileges( sid, &new_mask );
 281 }
 282
 283 /*********************************************************************
 284  Add a privilege based on its name
 285 *********************************************************************/
 286
 287 bool grant_privilege_by_name(DOM_SID *sid, const char *name)
 288 {
 289         SE_PRIV mask;
 290
 291         if (! se_priv_from_name(name, &mask)) {
 292                 DEBUG(3, ("grant_privilege_by_name: "
 293                           "No Such Privilege Found (%s)\n", name));
 294                 return False;
 295         }
 296
 297         return grant_privilege( sid, &mask );
 298 }
 299
 300 /***************************************************************************
 301  Remove privilege from sid
 302 ****************************************************************************/
 303
 304 bool revoke_privilege(const DOM_SID *sid, const SE_PRIV *priv_mask)
 305 {
 306         SE_PRIV mask;
 307
 308         /* if the user has no privileges, then we can't revoke any */
 309
 310         if ( !get_privileges( sid, &mask ) )
 311                 return True;
 312
 313         DEBUG(10,("revoke_privilege: %s\n", sid_string_dbg(sid)));
 314
 315         DEBUGADD( 10, ("original privilege mask:\n"));
 316         dump_se_priv( DBGC_ALL, 10, &mask );
 317
 318         se_priv_remove( &mask, priv_mask );
 319
 320         DEBUGADD( 10, ("new privilege mask:\n"));
 321         dump_se_priv( DBGC_ALL, 10, &mask );
 322
 323         return set_privileges( sid, &mask );
 324 }
 325
 326 /*********************************************************************
 327  Revoke all privileges
 328 *********************************************************************/
 329
 330 bool revoke_all_privileges( DOM_SID *sid )
 331 {
 332         return revoke_privilege( sid, &se_priv_all );
 333 }
 334
 335 /*********************************************************************
 336  Add a privilege based on its name
 337 *********************************************************************/
 338
 339 bool revoke_privilege_by_name(DOM_SID *sid, const char *name)
 340 {
 341         SE_PRIV mask;
 342
 343         if (! se_priv_from_name(name, &mask)) {
 344                 DEBUG(3, ("revoke_privilege_by_name: "
 345                           "No Such Privilege Found (%s)\n", name));
 346                 return False;
 347         }
 348
 349         return revoke_privilege(sid, &mask);
 350
 351 }
 352
 353 /***************************************************************************
 354  Retrieve the SIDs assigned to a given privilege
 355 ****************************************************************************/
 356
 357 NTSTATUS privilege_create_account(const DOM_SID *sid )
 358 {
 359         return ( grant_privilege(sid, &se_priv_none) ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL);
 360 }
 361
 362 /***************************************************************************
 363  Delete a privileged account
 364 ****************************************************************************/
 365
 366 NTSTATUS privilege_delete_account(const struct dom_sid *sid)
 367 {
 368         struct db_context *db = get_account_pol_db();
 369         fstring tmp, keystr;
 370
 371         if (!lp_enable_privileges()) {
 372                 return NT_STATUS_OK;
 373         }
 374
 375         if (!db) {
 376                 return NT_STATUS_INVALID_HANDLE;
 377         }
 378
 379         if (!sid || (sid->num_auths == 0)) {
 380                 return NT_STATUS_INVALID_SID;
 381         }
 382
 383         /* PRIV_<SID> (NULL terminated) as the key */
 384
 385         fstr_sprintf(keystr, "%s%s", PRIVPREFIX, sid_to_fstring(tmp, sid));
 386
 387         return dbwrap_delete_bystring(db, keystr);
 388 }
 389
 390 /****************************************************************************
 391  initialise a privilege list and set the talloc context
 392  ****************************************************************************/
 393
 394 NTSTATUS privilege_set_init(PRIVILEGE_SET *priv_set)
 395 {
 396         TALLOC_CTX *mem_ctx;
 397
 398         ZERO_STRUCTP( priv_set );
 399
 400         mem_ctx = talloc_init("privilege set");
 401         if ( !mem_ctx ) {
 402                 DEBUG(0,("privilege_set_init: failed to initialize talloc ctx!\n"));
 403                 return NT_STATUS_NO_MEMORY;
 404         }
 405
 406         priv_set->mem_ctx = mem_ctx;
 407
 408         return NT_STATUS_OK;
 409 }
 410
 411 /****************************************************************************
 412   initialise a privilege list and with someone else's talloc context
 413 ****************************************************************************/
 414
 415 NTSTATUS privilege_set_init_by_ctx(TALLOC_CTX *mem_ctx, PRIVILEGE_SET *priv_set)
 416 {
 417         ZERO_STRUCTP( priv_set );
 418
 419         priv_set->mem_ctx = mem_ctx;
 420         priv_set->ext_ctx = True;
 421
 422         return NT_STATUS_OK;
 423 }
 424
 425 /****************************************************************************
 426  Free all memory used by a PRIVILEGE_SET
 427 ****************************************************************************/
 428
 429 void privilege_set_free(PRIVILEGE_SET *priv_set)
 430 {
 431         if ( !priv_set )
 432                 return;
 433
 434         if ( !( priv_set->ext_ctx ) )
 435                 talloc_destroy( priv_set->mem_ctx );
 436
 437         ZERO_STRUCTP( priv_set );
 438 }
 439
 440 /****************************************************************************
 441  duplicate alloc luid_attr
 442  ****************************************************************************/
 443
 444 NTSTATUS dup_luid_attr(TALLOC_CTX *mem_ctx, LUID_ATTR **new_la, LUID_ATTR *old_la, int count)
 445 {
 446         int i;
 447
 448         if ( !old_la )
 449                 return NT_STATUS_OK;
 450
 451         if (count) {
 452                 *new_la = TALLOC_ARRAY(mem_ctx, LUID_ATTR, count);
 453                 if ( !*new_la ) {
 454                         DEBUG(0,("dup_luid_attr: failed to alloc new LUID_ATTR array [%d]\n", count));
 455                         return NT_STATUS_NO_MEMORY;
 456                 }
 457         } else {
 458                 *new_la = NULL;
 459         }
 460
 461         for (i=0; i<count; i++) {
 462                 (*new_la)[i].luid.high = old_la[i].luid.high;
 463                 (*new_la)[i].luid.low = old_la[i].luid.low;
 464                 (*new_la)[i].attr = old_la[i].attr;
 465         }
 466
 467         return NT_STATUS_OK;
 468 }
 469
 470 /*******************************************************************
 471 *******************************************************************/
 472
 473 bool is_privileged_sid( const DOM_SID *sid )
 474 {
 475         SE_PRIV mask;
 476
 477         return get_privileges( sid, &mask );
 478 }
 479
 480 /*******************************************************************
 481 *******************************************************************/
 482
 483 bool grant_all_privileges( const DOM_SID *sid )
 484 {
 485         SE_PRIV mask;
 486
 487         if (!se_priv_put_all_privileges(&mask)) {
 488                 return False;
 489         }
 490
 491         return grant_privilege( sid, &mask );
 492 }