/*
Unix SMB/CIFS implementation.
Privileges handling functions
Copyright (C) Jean François Micouleau 1998-2001
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 .
*/
#include "includes.h"
#include "dbwrap.h"
#define PRIVPREFIX "PRIV_"
typedef struct {
uint32_t count;
struct dom_sid *list;
} SID_LIST;
typedef struct {
TALLOC_CTX *mem_ctx;
uint64_t privilege;
SID_LIST sids;
} PRIV_SID_LIST;
static bool get_privileges( const struct dom_sid *sid, uint64_t *mask )
{
struct db_context *db = get_account_pol_db();
fstring tmp, keystr;
TDB_DATA data;
/* Fail if the admin has not enable privileges */
if ( !lp_enable_privileges() ) {
return False;
}
if ( db == NULL )
return False;
/* PRIV_ (NULL terminated) as the key */
fstr_sprintf(keystr, "%s%s", PRIVPREFIX, sid_to_fstring(tmp, sid));
data = dbwrap_fetch_bystring( db, talloc_tos(), keystr );
if ( !data.dptr ) {
DEBUG(3, ("get_privileges: No privileges assigned to SID "
"[%s]\n", sid_string_dbg(sid)));
return False;
}
if (data.dsize == 4*4) {
DEBUG(3, ("get_privileges: Should not have obtained old-style privileges record for SID "
"[%s]\n", sid_string_dbg(sid)));
return False;
}
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;
}
/***************************************************************************
Store the privilege mask (set) for a given SID
****************************************************************************/
static bool set_privileges( const struct dom_sid *sid, uint64_t *mask )
{
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 ( db == NULL )
return False;
if ( !sid || (sid->num_auths == 0) ) {
DEBUG(0,("set_privileges: Refusing to store empty SID!\n"));
return False;
}
/* PRIV_ (NULL terminated) as the key */
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 = (uint8 *)mask;
data.dsize = sizeof(uint64_t);
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(uint64_t *privileges, struct dom_sid *slist, int scount)
{
uint64_t mask;
int i;
bool found = False;
*privileges = 0;
for ( i=0; ivalue.dsize != sizeof(uint64_t) )
return 0;
/* check we have a PRIV_+SID entry */
if ( strncmp((char *)rec->key.dptr, PRIVPREFIX, prefixlen) != 0)
return 0;
/* check to see if we are looking for a particular privilege */
fstrcpy( sid_string, (char *)&(rec->key.dptr[strlen(PRIVPREFIX)]) );
if (priv->privilege != 0) {
uint64_t mask;
if (rec->value.dsize == 4*4) {
DEBUG(3, ("get_privileges: Should not have obtained old-style privileges record for SID "
"[%s]\n", sid_string));
return 0;
}
if (rec->value.dsize != sizeof( uint64_t ) ) {
DEBUG(3, ("get_privileges: Invalid privileges record assigned to SID "
"[%s]\n", sid_string));
return 0;
}
mask = BVAL(rec->value.dptr, 0);
/* if the SID does not have the specified privilege
then just return */
if ((mask & priv->privilege) == 0) {
return 0;
}
}
/* this is a last ditch safety check to preventing returning
and invalid SID (i've somehow run into this on development branches) */
if ( strcmp( "S-0-0", sid_string ) == 0 )
return 0;
if ( !string_to_sid(&sid, sid_string) ) {
DEBUG(0,("travsersal_fn_enum__acct: Could not convert SID [%s]\n",
sid_string));
return 0;
}
if (!NT_STATUS_IS_OK(add_sid_to_array(priv->mem_ctx, &sid,
&priv->sids.list,
&priv->sids.count)))
{
return 0;
}
return 0;
}
/*********************************************************************
Retreive list of privileged SIDs (for _lsa_enumerate_accounts()
*********************************************************************/
NTSTATUS privilege_enumerate_accounts(struct dom_sid **sids, int *num_sids)
{
struct db_context *db = get_account_pol_db();
PRIV_SID_LIST priv;
if (db == NULL) {
return NT_STATUS_ACCESS_DENIED;
}
ZERO_STRUCT(priv);
db->traverse_read(db, priv_traverse_fn, &priv);
/* give the memory away; caller will free */
*sids = priv.sids.list;
*num_sids = priv.sids.count;
return NT_STATUS_OK;
}
/*********************************************************************
Retrieve list of SIDs granted a particular privilege
*********************************************************************/
NTSTATUS privilege_enum_sids(const uint64_t *mask, TALLOC_CTX *mem_ctx,
struct dom_sid **sids, int *num_sids)
{
struct db_context *db = get_account_pol_db();
PRIV_SID_LIST priv;
if (db == NULL) {
return NT_STATUS_ACCESS_DENIED;
}
ZERO_STRUCT(priv);
priv.privilege = *mask;
priv.mem_ctx = mem_ctx;
db->traverse_read(db, priv_traverse_fn, &priv);
/* give the memory away; caller will free */
*sids = priv.sids.list;
*num_sids = priv.sids.count;
return NT_STATUS_OK;
}
/***************************************************************************
Add privilege to sid
****************************************************************************/
bool grant_privilege(const struct dom_sid *sid, const uint64_t priv_mask)
{
uint64_t old_mask, new_mask;
ZERO_STRUCT( old_mask );
ZERO_STRUCT( new_mask );
if ( get_privileges( sid, &old_mask ) )
new_mask = old_mask;
else
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(struct dom_sid *sid, const char *name)
{
uint64_t mask;
if (! se_priv_from_name(name, &mask)) {
DEBUG(3, ("grant_privilege_by_name: "
"No Such Privilege Found (%s)\n", name));
return False;
}
return grant_privilege( sid, mask );
}
/***************************************************************************
Remove privilege from sid
****************************************************************************/
bool revoke_privilege(const struct dom_sid *sid, const uint64_t 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_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 );
}
/*********************************************************************
Revoke all privileges
*********************************************************************/
bool revoke_all_privileges( struct dom_sid *sid )
{
return revoke_privilege( sid, SE_ALL_PRIVS);
}
/*********************************************************************
Add a privilege based on its name
*********************************************************************/
bool revoke_privilege_by_name(struct dom_sid *sid, const char *name)
{
uint64_t mask;
if (! se_priv_from_name(name, &mask)) {
DEBUG(3, ("revoke_privilege_by_name: "
"No Such Privilege Found (%s)\n", name));
return False;
}
return revoke_privilege(sid, mask);
}
/***************************************************************************
Retrieve the SIDs assigned to a given privilege
****************************************************************************/
NTSTATUS privilege_create_account(const struct dom_sid *sid )
{
return ( grant_privilege(sid, 0) ? NT_STATUS_OK : NT_STATUS_UNSUCCESSFUL);
}
/***************************************************************************
Delete a privileged account
****************************************************************************/
NTSTATUS privilege_delete_account(const struct dom_sid *sid)
{
struct db_context *db = get_account_pol_db();
fstring tmp, keystr;
if (!lp_enable_privileges()) {
return NT_STATUS_OK;
}
if (!db) {
return NT_STATUS_INVALID_HANDLE;
}
if (!sid || (sid->num_auths == 0)) {
return NT_STATUS_INVALID_SID;
}
/* PRIV_ (NULL terminated) as the key */
fstr_sprintf(keystr, "%s%s", PRIVPREFIX, sid_to_fstring(tmp, sid));
return dbwrap_delete_bystring(db, keystr);
}
/****************************************************************************
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)
{
ZERO_STRUCTP( priv_set );
priv_set->mem_ctx = mem_ctx;
priv_set->ext_ctx = True;
return NT_STATUS_OK;
}
/****************************************************************************
Free all memory used by a PRIVILEGE_SET
****************************************************************************/
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, struct lsa_LUIDAttribute **new_la, struct lsa_LUIDAttribute *old_la, int count)
{
int i;
if ( !old_la )
return NT_STATUS_OK;
if (count) {
*new_la = TALLOC_ARRAY(mem_ctx, struct lsa_LUIDAttribute, count);
if ( !*new_la ) {
DEBUG(0,("dup_luid_attr: failed to alloc new struct lsa_LUIDAttribute array [%d]\n", count));
return NT_STATUS_NO_MEMORY;
}
} else {
*new_la = NULL;
}
for (i=0; i