s3-vfstest: Return an error code if cmd failed
[nivanova/samba-autobuild/.git] / source3 / lib / privileges.c
index 839ce91a5766935e70b5558000b9f17e9962bde9..19ee688042098785d04ec5c672218039630d61eb 100644 (file)
    Copyright (C) Simo Sorce                    2002-2003
    Copyright (C) Gerald (Jerry) Carter          2005
    Copyright (C) Michael Adam                  2007
-   
+
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.
-   
+
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
-   
+
    You should have received a copy of the GNU General Public License
    along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
 
+
 #include "includes.h"
+#include "lib/privileges.h"
+#include "dbwrap/dbwrap.h"
+#include "libcli/security/privileges_private.h"
+#include "../libcli/security/security.h"
+#include "passdb.h"
 
 #define PRIVPREFIX              "PRIV_"
 
 typedef struct {
-       size_t count;
-       DOM_SID *list;
+       uint32_t count;
+       struct dom_sid *list;
 } SID_LIST;
 
 typedef struct {
        TALLOC_CTX *mem_ctx;
-       SE_PRIV privilege;
+       uint64_t privilege;
        SID_LIST sids;
 } PRIV_SID_LIST;
 
+/*
+  interpret an old style SE_PRIV structure
+ */
+static uint64_t map_old_SE_PRIV(unsigned char *dptr)
+{
+       uint32_t *old_masks = (uint32_t *)dptr;
+       /*
+        * the old privileges code only ever used up to 0x800, except
+        * for a special case of 'SE_ALL_PRIVS' which was 0xFFFFFFFF
+        */
+       if (old_masks[0] == 0xFFFFFFFF) {
+               /* they set all privileges */
+               return SE_ALL_PRIVS;
+       }
 
-static bool get_privileges( const DOM_SID *sid, SE_PRIV *mask )
+       /* the old code used the machine byte order, but we don't know
+        * the byte order of the machine that wrote it. However we can
+        * tell what byte order it was by taking advantage of the fact
+        * that it only ever use up to 0x800
+        */
+       if (dptr[0] || dptr[1]) {
+               /* it was little endian */
+               return IVAL(dptr, 0);
+       }
+
+       /* it was either zero or big-endian */
+       return RIVAL(dptr, 0);
+}
+
+
+static bool get_privileges( const struct dom_sid *sid, uint64_t *mask )
 {
-       TDB_CONTEXT *tdb = get_account_pol_tdb();
-       fstring keystr;
+       struct db_context *db = get_account_pol_db();
+       fstring tmp, keystr;
        TDB_DATA data;
+       NTSTATUS status;
 
        /* Fail if the admin has not enable privileges */
-       
+
        if ( !lp_enable_privileges() ) {
                return False;
        }
-       
-       if ( !tdb )
+
+       if ( db == NULL )
                return False;
 
        /* PRIV_<SID> (NULL terminated) as the key */
-       
-       fstr_sprintf( keystr, "%s%s", PRIVPREFIX, sid_string_static(sid) );
-
-       data = tdb_fetch_bystring( tdb, keystr );
-       
-       if ( !data.dptr ) {
-               DEBUG(3,("get_privileges: No privileges assigned to SID [%s]\n",
-                       sid_string_static(sid)));
+
+       fstr_sprintf(keystr, "%s%s", PRIVPREFIX, sid_to_fstring(tmp, sid));
+
+       status = dbwrap_fetch_bystring(db, talloc_tos(), keystr, &data);
+
+       if (!NT_STATUS_IS_OK(status)) {
+               DEBUG(4, ("get_privileges: No privileges assigned to SID "
+                         "[%s]\n", sid_string_dbg(sid)));
                return False;
        }
-       
-       SMB_ASSERT( data.dsize == sizeof( SE_PRIV ) );
-       
-       se_priv_copy( mask, (SE_PRIV*)data.dptr );
-       SAFE_FREE(data.dptr);
+
+       if (data.dsize == 4*4) {
+               /* it's an old style SE_PRIV structure. */
+               *mask = map_old_SE_PRIV(data.dptr);
+       } else {
+               if (data.dsize != sizeof( uint64_t ) ) {
+                       DEBUG(3, ("get_privileges: Invalid privileges record assigned to SID "
+                                 "[%s]\n", sid_string_dbg(sid)));
+                       return False;
+               }
+
+               *mask = BVAL(data.dptr, 0);
+       }
+
+       TALLOC_FREE(data.dptr);
 
        return True;
 }
@@ -76,16 +121,17 @@ static bool get_privileges( const DOM_SID *sid, SE_PRIV *mask )
  Store the privilege mask (set) for a given SID
 ****************************************************************************/
 
-static bool set_privileges( const DOM_SID *sid, SE_PRIV *mask )
+static bool set_privileges( const struct dom_sid *sid, uint64_t mask )
 {
-       TDB_CONTEXT *tdb = get_account_pol_tdb();
-       fstring keystr;
+       struct db_context *db = get_account_pol_db();
+       uint8_t privbuf[8];
+       fstring tmp, keystr;
        TDB_DATA data;
-       
+
        if ( !lp_enable_privileges() )
                return False;
 
-       if ( !tdb )
+       if ( db == NULL )
                return False;
 
        if ( !sid || (sid->num_auths == 0) ) {
@@ -94,83 +140,113 @@ static bool set_privileges( const DOM_SID *sid, SE_PRIV *mask )
        }
 
        /* PRIV_<SID> (NULL terminated) as the key */
-       
-       fstr_sprintf( keystr, "%s%s", PRIVPREFIX, sid_string_static(sid) );
-       
-       /* no packing.  static size structure, just write it out */
-       
-       data.dptr  = (uint8 *)mask;
-       data.dsize = sizeof(SE_PRIV);
-
-       return ( tdb_store_bystring(tdb, keystr, data, TDB_REPLACE) != -1 );
+
+       fstr_sprintf(keystr, "%s%s", PRIVPREFIX, sid_to_fstring(tmp, sid));
+
+       /* This writes the 64 bit bitmask out in little endian format */
+       SBVAL(privbuf,0,mask);
+
+       data.dptr  = privbuf;
+       data.dsize = sizeof(privbuf);
+
+       return NT_STATUS_IS_OK(dbwrap_store_bystring(db, keystr, data,
+                                                    TDB_REPLACE));
 }
 
 /*********************************************************************
  get a list of all privileges for all sids in the list
 *********************************************************************/
 
-bool get_privileges_for_sids(SE_PRIV *privileges, DOM_SID *slist, int scount)
+bool get_privileges_for_sids(uint64_t *privileges, struct dom_sid *slist, int scount)
 {
-       SE_PRIV mask;
+       uint64_t mask;
        int i;
        bool found = False;
 
-       se_priv_copy( privileges, &se_priv_none );
-       
+       *privileges = 0;
+
        for ( i=0; i<scount; i++ ) {
                /* don't add unless we actually have a privilege assigned */
 
                if ( !get_privileges( &slist[i], &mask ) )
                        continue;
 
-               DEBUG(5,("get_privileges_for_sids: sid = %s\nPrivilege set:\n", 
-                       sid_string_static(&slist[i])));
-               dump_se_priv( DBGC_ALL, 5, &mask );
-                       
-               se_priv_add( privileges, &mask );
+               DEBUG(5,("get_privileges_for_sids: sid = %s\nPrivilege "
+                        "set: 0x%llx\n", sid_string_dbg(&slist[i]),
+                        (unsigned long long)mask));
+
+               *privileges |= mask;
                found = True;
        }
 
        return found;
 }
 
+NTSTATUS get_privileges_for_sid_as_set(TALLOC_CTX *mem_ctx, PRIVILEGE_SET **privileges, struct dom_sid *sid)
+{
+       uint64_t mask;
+       if (!get_privileges(sid, &mask)) {
+               return NT_STATUS_OBJECT_NAME_NOT_FOUND;
+       }
+
+       *privileges = talloc_zero(mem_ctx, PRIVILEGE_SET);
+       if (!*privileges) {
+               return NT_STATUS_NO_MEMORY;
+       }
+
+       if (!se_priv_to_privilege_set(*privileges, mask)) {
+               return NT_STATUS_NO_MEMORY;
+       }
+       return NT_STATUS_OK;
+}
 
 /*********************************************************************
- travseral functions for privilege_enumerate_accounts
+ traversal functions for privilege_enumerate_accounts
 *********************************************************************/
 
-static int priv_traverse_fn(TDB_CONTEXT *t, TDB_DATA key, TDB_DATA data, void *state)
+static int priv_traverse_fn(struct db_record *rec, void *state)
 {
        PRIV_SID_LIST *priv = (PRIV_SID_LIST *)state;
        int  prefixlen = strlen(PRIVPREFIX);
-       DOM_SID sid;
+       struct dom_sid sid;
        fstring sid_string;
-       
-       /* easy check first */
-       
-       if ( data.dsize != sizeof(SE_PRIV) )
-               return 0;
+       TDB_DATA key;
+
+       key = dbwrap_record_get_key(rec);
 
        /* check we have a PRIV_+SID entry */
 
-       if ( strncmp((const char *)key.dptr, PRIVPREFIX, prefixlen) != 0)
+       if (strncmp((char *)key.dptr, PRIVPREFIX, prefixlen) != 0)
                return 0;
-               
+
        /* check to see if we are looking for a particular privilege */
 
-       if ( !se_priv_equal(&priv->privilege, &se_priv_none) ) {
-               SE_PRIV mask;
-               
-               se_priv_copy( &mask, (SE_PRIV*)data.dptr );
-               
-               /* if the SID does not have the specified privilege 
+       fstrcpy( sid_string, (char *)&(key.dptr[strlen(PRIVPREFIX)]) );
+
+       if (priv->privilege != 0) {
+               uint64_t mask;
+               TDB_DATA value;
+
+               value = dbwrap_record_get_value(rec);
+
+               if (value.dsize == 4*4) {
+                       mask = map_old_SE_PRIV(value.dptr);
+               } else {
+                       if (value.dsize != sizeof( uint64_t ) ) {
+                               DEBUG(3, ("get_privileges: Invalid privileges record assigned to SID "
+                                         "[%s]\n", sid_string));
+                               return 0;
+                       }
+                       mask = BVAL(value.dptr, 0);
+               }
+
+               /* if the SID does not have the specified privilege
                   then just return */
-                  
-               if ( !is_privilege_assigned( &mask, &priv->privilege) )
+
+               if ((mask & priv->privilege) == 0) {
                        return 0;
+               }
        }
-               
-       fstrcpy( sid_string, (const char *)&key.dptr[strlen(PRIVPREFIX)] );
 
        /* this is a last ditch safety check to preventing returning
           and invalid SID (i've somehow run into this on development branches) */
@@ -184,11 +260,13 @@ static int priv_traverse_fn(TDB_CONTEXT *t, TDB_DATA key, TDB_DATA data, void *s
                return 0;
        }
 
-       if (!add_sid_to_array( priv->mem_ctx, &sid, &priv->sids.list,
-                              &priv->sids.count )) {
+       if (!NT_STATUS_IS_OK(add_sid_to_array(priv->mem_ctx, &sid,
+                                             &priv->sids.list,
+                                             &priv->sids.count)))
+       {
                return 0;
        }
-       
+
        return 0;
 }
 
@@ -196,23 +274,25 @@ static int priv_traverse_fn(TDB_CONTEXT *t, TDB_DATA key, TDB_DATA data, void *s
  Retreive list of privileged SIDs (for _lsa_enumerate_accounts()
 *********************************************************************/
 
-NTSTATUS privilege_enumerate_accounts(DOM_SID **sids, int *num_sids)
+NTSTATUS privilege_enumerate_accounts(struct dom_sid **sids, int *num_sids)
 {
-       TDB_CONTEXT *tdb = get_account_pol_tdb();
+       struct db_context *db = get_account_pol_db();
        PRIV_SID_LIST priv;
-       
-       if (!tdb) {
+       NTSTATUS status;
+
+       if (db == NULL) {
                return NT_STATUS_ACCESS_DENIED;
        }
 
        ZERO_STRUCT(priv);
 
-       se_priv_copy( &priv.privilege, &se_priv_none );
-
-       tdb_traverse( tdb, priv_traverse_fn, &priv);
+       status = dbwrap_traverse_read(db, priv_traverse_fn, &priv, NULL);
+       if (!NT_STATUS_IS_OK(status)) {
+               return status;
+       }
 
        /* give the memory away; caller will free */
-       
+
        *sids      = priv.sids.list;
        *num_sids  = priv.sids.count;
 
@@ -223,22 +303,26 @@ NTSTATUS privilege_enumerate_accounts(DOM_SID **sids, int *num_sids)
  Retrieve list of SIDs granted a particular privilege
 *********************************************************************/
 
-NTSTATUS privilege_enum_sids(const SE_PRIV *mask, TALLOC_CTX *mem_ctx,
-                            DOM_SID **sids, int *num_sids)
+NTSTATUS privilege_enum_sids(enum sec_privilege privilege, TALLOC_CTX *mem_ctx,
+                            struct dom_sid **sids, int *num_sids)
 {
-       TDB_CONTEXT *tdb = get_account_pol_tdb();
+       struct db_context *db = get_account_pol_db();
        PRIV_SID_LIST priv;
+       NTSTATUS status;
 
-       if (!tdb) {
+       if (db == NULL) {
                return NT_STATUS_ACCESS_DENIED;
        }
 
        ZERO_STRUCT(priv);
 
-       se_priv_copy(&priv.privilege, mask);
+       priv.privilege = sec_privilege_mask(privilege);
        priv.mem_ctx = mem_ctx;
 
-       tdb_traverse( tdb, priv_traverse_fn, &priv);
+       status = dbwrap_traverse_read(db, priv_traverse_fn, &priv, NULL);
+       if (!NT_STATUS_IS_OK(status)) {
+               return status;
+       }
 
        /* give the memory away; caller will free */
 
@@ -252,38 +336,36 @@ NTSTATUS privilege_enum_sids(const SE_PRIV *mask, TALLOC_CTX *mem_ctx,
  Add privilege to sid
 ****************************************************************************/
 
-bool grant_privilege(const DOM_SID *sid, const SE_PRIV *priv_mask)
+static bool grant_privilege_bitmap(const struct dom_sid *sid, const uint64_t priv_mask)
 {
-       SE_PRIV old_mask, new_mask;
-       
+       uint64_t old_mask, new_mask;
+
        ZERO_STRUCT( old_mask );
        ZERO_STRUCT( new_mask );
 
        if ( get_privileges( sid, &old_mask ) )
-               se_priv_copy( &new_mask, &old_mask );
+               new_mask = old_mask;
        else
-               se_priv_copy( &new_mask, &se_priv_none );
-
-       se_priv_add( &new_mask, priv_mask );
-
-       DEBUG(10,("grant_privilege: %s\n", sid_string_static(sid)));
-       
-       DEBUGADD( 10, ("original privilege mask:\n"));
-       dump_se_priv( DBGC_ALL, 10, &old_mask );
-       
-       DEBUGADD( 10, ("new privilege mask:\n"));
-       dump_se_priv( DBGC_ALL, 10, &new_mask );
-       
-       return set_privileges( sid, &new_mask );
+               new_mask = 0;
+
+       new_mask |= priv_mask;
+
+       DEBUG(10,("grant_privilege: %s\n", sid_string_dbg(sid)));
+
+       DEBUGADD( 10, ("original privilege mask: 0x%llx\n", (unsigned long long)new_mask));
+
+       DEBUGADD( 10, ("new privilege mask:      0x%llx\n", (unsigned long long)new_mask));
+
+       return set_privileges( sid, new_mask );
 }
 
 /*********************************************************************
  Add a privilege based on its name
 *********************************************************************/
 
-bool grant_privilege_by_name(DOM_SID *sid, const char *name)
+bool grant_privilege_by_name(const struct dom_sid *sid, const char *name)
 {
-       SE_PRIV mask;
+       uint64_t mask;
 
        if (! se_priv_from_name(name, &mask)) {
                DEBUG(3, ("grant_privilege_by_name: "
@@ -291,51 +373,75 @@ bool grant_privilege_by_name(DOM_SID *sid, const char *name)
                return False;
        }
 
-       return grant_privilege( sid, &mask );
+       return grant_privilege_bitmap( sid, mask );
+}
+
+/***************************************************************************
+ Grant a privilege set (list of LUID values) from a sid
+****************************************************************************/
+
+bool grant_privilege_set(const struct dom_sid *sid, struct lsa_PrivilegeSet *set)
+{
+       uint64_t privilege_mask;
+       if (!privilege_set_to_se_priv(&privilege_mask, set)) {
+               return false;
+       }
+       return grant_privilege_bitmap(sid, privilege_mask);
 }
 
 /***************************************************************************
  Remove privilege from sid
 ****************************************************************************/
 
-bool revoke_privilege(const DOM_SID *sid, const SE_PRIV *priv_mask)
+static bool revoke_privilege_bitmap(const struct dom_sid *sid, const uint64_t priv_mask)
 {
-       SE_PRIV mask;
-       
+       uint64_t mask;
+
        /* if the user has no privileges, then we can't revoke any */
-       
+
        if ( !get_privileges( sid, &mask ) )
                return True;
-       
-       DEBUG(10,("revoke_privilege: %s\n", sid_string_static(sid)));
-       
-       DEBUGADD( 10, ("original privilege mask:\n"));
-       dump_se_priv( DBGC_ALL, 10, &mask );
-
-       se_priv_remove( &mask, priv_mask );
-       
-       DEBUGADD( 10, ("new privilege mask:\n"));
-       dump_se_priv( DBGC_ALL, 10, &mask );
-       
-       return set_privileges( sid, &mask );
+
+       DEBUG(10,("revoke_privilege: %s\n", sid_string_dbg(sid)));
+
+       DEBUGADD( 10, ("original privilege mask: 0x%llx\n", (unsigned long long)mask));
+
+       mask &= ~priv_mask;
+
+       DEBUGADD( 10, ("new privilege mask:      0x%llx\n", (unsigned long long)mask));
+
+       return set_privileges( sid, mask );
+}
+
+/***************************************************************************
+ Remove a privilege set (list of LUID values) from a sid
+****************************************************************************/
+
+bool revoke_privilege_set(const struct dom_sid *sid, struct lsa_PrivilegeSet *set)
+{
+       uint64_t privilege_mask;
+       if (!privilege_set_to_se_priv(&privilege_mask, set)) {
+               return false;
+       }
+       return revoke_privilege_bitmap(sid, privilege_mask);
 }
 
 /*********************************************************************
  Revoke all privileges
 *********************************************************************/
 
-bool revoke_all_privileges( DOM_SID *sid )
+bool revoke_all_privileges( const struct dom_sid *sid )
 {
-       return revoke_privilege( sid, &se_priv_all );
+       return revoke_privilege_bitmap( sid, SE_ALL_PRIVS);
 }
 
 /*********************************************************************
  Add a privilege based on its name
 *********************************************************************/
 
-bool revoke_privilege_by_name(DOM_SID *sid, const char *name)
+bool revoke_privilege_by_name(const struct dom_sid *sid, const char *name)
 {
-       SE_PRIV mask;
+       uint64_t mask;
 
        if (! se_priv_from_name(name, &mask)) {
                DEBUG(3, ("revoke_privilege_by_name: "
@@ -343,7 +449,7 @@ bool revoke_privilege_by_name(DOM_SID *sid, const char *name)
                return False;
        }
 
-       return revoke_privilege(sid, &mask);
+       return revoke_privilege_bitmap(sid, mask);
 
 }
 
@@ -351,111 +457,57 @@ bool revoke_privilege_by_name(DOM_SID *sid, const char *name)
  Retrieve the SIDs assigned to a given privilege
 ****************************************************************************/
 
-NTSTATUS privilege_create_account(const DOM_SID *sid )
-{
-       return ( grant_privilege(sid, &se_priv_none) ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL);
-}
-
-/****************************************************************************
- initialise a privilege list and set the talloc context 
- ****************************************************************************/
-NTSTATUS privilege_set_init(PRIVILEGE_SET *priv_set)
-{
-       TALLOC_CTX *mem_ctx;
-       
-       ZERO_STRUCTP( priv_set );
-
-       mem_ctx = talloc_init("privilege set");
-       if ( !mem_ctx ) {
-               DEBUG(0,("privilege_set_init: failed to initialize talloc ctx!\n"));
-               return NT_STATUS_NO_MEMORY;
-       }
-
-       priv_set->mem_ctx = mem_ctx;
-
-       return NT_STATUS_OK;
-}
-
-/****************************************************************************
-  initialise a privilege list and with someone else's talloc context 
-****************************************************************************/
-
-NTSTATUS privilege_set_init_by_ctx(TALLOC_CTX *mem_ctx, PRIVILEGE_SET *priv_set)
+NTSTATUS privilege_create_account(const struct dom_sid *sid )
 {
-       ZERO_STRUCTP( priv_set );
-       
-       priv_set->mem_ctx = mem_ctx;
-       priv_set->ext_ctx = True;
-
-       return NT_STATUS_OK;
+       return ( grant_privilege_bitmap(sid, 0) ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL);
 }
 
-/****************************************************************************
- Free all memory used by a PRIVILEGE_SET
+/***************************************************************************
+ Delete a privileged account
 ****************************************************************************/
 
-void privilege_set_free(PRIVILEGE_SET *priv_set)
-{
-       if ( !priv_set )
-               return;
-
-       if ( !( priv_set->ext_ctx ) )
-               talloc_destroy( priv_set->mem_ctx );
-
-       ZERO_STRUCTP( priv_set );
-}
-
-/****************************************************************************
- duplicate alloc luid_attr
- ****************************************************************************/
-
-NTSTATUS dup_luid_attr(TALLOC_CTX *mem_ctx, LUID_ATTR **new_la, LUID_ATTR *old_la, int count)
+NTSTATUS privilege_delete_account(const struct dom_sid *sid)
 {
-       int i;
+       struct db_context *db = get_account_pol_db();
+       fstring tmp, keystr;
 
-       if ( !old_la )
+       if (!lp_enable_privileges()) {
                return NT_STATUS_OK;
+       }
 
-       if (count) {
-               *new_la = TALLOC_ARRAY(mem_ctx, LUID_ATTR, count);
-               if ( !*new_la ) {
-                       DEBUG(0,("dup_luid_attr: failed to alloc new LUID_ATTR array [%d]\n", count));
-                       return NT_STATUS_NO_MEMORY;
-               }
-       } else {
-               *new_la = NULL;
+       if (!db) {
+               return NT_STATUS_INVALID_HANDLE;
        }
 
-       for (i=0; i<count; i++) {
-               (*new_la)[i].luid.high = old_la[i].luid.high;
-               (*new_la)[i].luid.low = old_la[i].luid.low;
-               (*new_la)[i].attr = old_la[i].attr;
+       if (!sid || (sid->num_auths == 0)) {
+               return NT_STATUS_INVALID_SID;
        }
-       
-       return NT_STATUS_OK;
+
+       /* PRIV_<SID> (NULL terminated) as the key */
+
+       fstr_sprintf(keystr, "%s%s", PRIVPREFIX, sid_to_fstring(tmp, sid));
+
+       return dbwrap_delete_bystring(db, keystr);
 }
 
 /*******************************************************************
 *******************************************************************/
 
-bool is_privileged_sid( const DOM_SID *sid )
+bool is_privileged_sid( const struct dom_sid *sid )
 {
-       SE_PRIV mask;
-       
+       uint64_t mask;
+
        return get_privileges( sid, &mask );
 }
 
 /*******************************************************************
 *******************************************************************/
 
-bool grant_all_privileges( const DOM_SID *sid )
+bool grant_all_privileges( const struct dom_sid *sid )
 {
-       SE_PRIV mask;
+       uint64_t mask;
 
-       if (!se_priv_put_all_privileges(&mask)) {
-               return False;
-       }
-       
-       return grant_privilege( sid, &mask );
+       se_priv_put_all_privileges(&mask);
+
+       return grant_privilege_bitmap( sid, mask );
 }