# define OLD_NTDOMAIN 1
/*
* Unix SMB / Netbios implementation .
* Version 1.9 .
* RPC Pipe client / server routines
* Copyright ( C ) Andrew Tridgell 1992 - 1997 ,
* Copyright ( C ) Luke Kenneth Casson Leighton 1996 - 1997 ,
*
* 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 2 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 , write to the Free Software
* Foundation , Inc . , 675 Mass Ave , Cambridge , MA 0213 9 , USA .
*/
# include "includes.h"
extern int DEBUGLEVEL ;
# ifndef MAX_OPEN_POLS
# define MAX_OPEN_POLS 2048
# endif
struct reg_info
{
/* for use by \PIPE\winreg */
fstring name ; /* name of registry key */
} ;
struct samr_info
{
/* for use by the \PIPE\samr policy */
DOM_SID sid ;
uint32 status ; /* some sort of flag. best to record it. comes from opnum 0x39 */
} ;
static struct policy
{
struct policy * next , * prev ;
int pnum ;
BOOL open ;
POLICY_HND pol_hnd ;
union {
struct samr_info samr ;
struct reg_info reg ;
} dev ;
} * Policy ;
static struct bitmap * bmap ;
static uint32 pol_hnd_low = 0 ;
static uint32 pol_hnd_high = 0 ;
/*******************************************************************
Creates a POLICY_HND structure .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void create_policy_handle ( POLICY_HND * hnd , uint32 * hnd_low , uint32 * hnd_high )
{
if ( hnd = = NULL ) return ;
( * hnd_low ) + + ;
if ( * hnd_low = = 0 ) ( * hnd_high ) + + ;
ZERO_STRUCTP ( hnd ) ;
SIVAL ( & hnd - > data1 , 0 , 0 ) ; /* first bit must be null */
SIVAL ( & hnd - > data2 , 0 , * hnd_low ) ; /* second bit is incrementing */
SSVAL ( & hnd - > data3 , 0 , * hnd_high ) ; /* second bit is incrementing */
SSVAL ( & hnd - > data4 , 0 , ( * hnd_high > > 16 ) ) ; /* second bit is incrementing */
SIVAL ( hnd - > data5 , 0 , time ( NULL ) ) ; /* something random */
SIVAL ( hnd - > data5 , 4 , sys_getpid ( ) ) ; /* something more random */
}
/****************************************************************************
initialise policy handle states . . .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void init_lsa_policy_hnd ( void )
{
bmap = bitmap_allocate ( MAX_OPEN_POLS ) ;
if ( ! bmap ) {
exit_server ( " out of memory in init_lsa_policy_hnd \n " ) ;
}
}
/****************************************************************************
find first available policy slot . creates a policy handle for you .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL open_lsa_policy_hnd ( POLICY_HND * hnd )
{
int i ;
struct policy * p ;
i = bitmap_find ( bmap , 1 ) ;
if ( i = = - 1 ) {
DEBUG ( 0 , ( " ERROR: out of Policy Handles! \n " ) ) ;
return False ;
}
p = ( struct policy * ) malloc ( sizeof ( * p ) ) ;
if ( ! p ) {
DEBUG ( 0 , ( " ERROR: out of memory! \n " ) ) ;
return False ;
}
ZERO_STRUCTP ( p ) ;
p - > open = True ;
p - > pnum = i ;
create_policy_handle ( hnd , & pol_hnd_low , & pol_hnd_high ) ;
p - > pol_hnd = * hnd ;
bitmap_set ( bmap , i ) ;
DLIST_ADD ( Policy , p ) ;
DEBUG ( 4 , ( " Opened policy hnd[%x] " , i ) ) ;
dump_data ( 4 , ( char * ) hnd , sizeof ( hnd ) ) ;
return True ;
}
/****************************************************************************
find policy by handle
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
static struct policy * find_lsa_policy ( POLICY_HND * hnd )
{
struct policy * p ;
for ( p = Policy ; p ; p = p - > next ) {
if ( memcmp ( & p - > pol_hnd , hnd , sizeof ( * hnd ) ) = = 0 ) {
DEBUG ( 4 , ( " Found policy hnd[%x] " , p - > pnum ) ) ;
dump_data ( 4 , ( char * ) hnd , sizeof ( hnd ) ) ;
return p ;
}
}
DEBUG ( 4 , ( " Policy not found: " ) ) ;
dump_data ( 4 , ( char * ) hnd , sizeof ( hnd ) ) ;
return NULL ;
}
/****************************************************************************
find policy index by handle
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
int find_lsa_policy_by_hnd ( POLICY_HND * hnd )
{
struct policy * p = find_lsa_policy ( hnd ) ;
return p ? p - > pnum : - 1 ;
}
/****************************************************************************
set samr pol status . absolutely no idea what this is .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL set_lsa_policy_samr_pol_status ( POLICY_HND * hnd , uint32 pol_status )
{
struct policy * p = find_lsa_policy ( hnd ) ;
if ( p & & p - > open ) {
DEBUG ( 3 , ( " Setting policy status=%x pnum=%x \n " ,
pol_status , p - > pnum ) ) ;
p - > dev . samr . status = pol_status ;
return True ;
}
DEBUG ( 3 , ( " Error setting policy status=%x \n " ,
pol_status ) ) ;
return False ;
}
/****************************************************************************
set samr sid
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL set_lsa_policy_samr_sid ( POLICY_HND * hnd , DOM_SID * sid )
{
fstring sidstr ;
struct policy * p = find_lsa_policy ( hnd ) ;
if ( p & & p - > open ) {
DEBUG ( 3 , ( " Setting policy sid=%s pnum=%x \n " ,
sid_to_string ( sidstr , sid ) , p - > pnum ) ) ;
memcpy ( & p - > dev . samr . sid , sid , sizeof ( * sid ) ) ;
return True ;
}
DEBUG ( 3 , ( " Error setting policy sid=%s \n " ,
sid_to_string ( sidstr , sid ) ) ) ;
return False ;
}
/****************************************************************************
get samr sid
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL get_lsa_policy_samr_sid ( POLICY_HND * hnd , DOM_SID * sid )
{
struct policy * p = find_lsa_policy ( hnd ) ;
if ( p ! = NULL & & p - > open ) {
fstring sidstr ;
memcpy ( sid , & p - > dev . samr . sid , sizeof ( * sid ) ) ;
DEBUG ( 3 , ( " Getting policy sid=%s pnum=%x \n " ,
sid_to_string ( sidstr , sid ) , p - > pnum ) ) ;
return True ;
}
DEBUG ( 3 , ( " Error getting policy \n " ) ) ;
return False ;
}
/****************************************************************************
get samr rid
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
uint32 get_lsa_policy_samr_rid ( POLICY_HND * hnd )
{
struct policy * p = find_lsa_policy ( hnd ) ;
if ( p & & p - > open ) {
uint32 rid = p - > dev . samr . sid . sub_auths [ p - > dev . samr . sid . num_auths - 1 ] ;
DEBUG ( 3 , ( " Getting policy device rid=%x pnum=%x \n " ,
rid , p - > pnum ) ) ;
return rid ;
}
DEBUG ( 3 , ( " Error getting policy \n " ) ) ;
return 0xffffffff ;
}
/****************************************************************************
set reg name
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL set_lsa_policy_reg_name ( POLICY_HND * hnd , fstring name )
{
struct policy * p = find_lsa_policy ( hnd ) ;
if ( p & & p - > open ) {
DEBUG ( 3 , ( " Setting policy pnum=%x name=%s \n " ,
p - > pnum , name ) ) ;
fstrcpy ( p - > dev . reg . name , name ) ;
return True ;
}
DEBUG ( 3 , ( " Error setting policy name=%s \n " , name ) ) ;
return False ;
}
/****************************************************************************
close an lsa policy
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL close_lsa_policy_hnd ( POLICY_HND * hnd )
{
struct policy * p = find_lsa_policy ( hnd ) ;
if ( ! p ) {
DEBUG ( 3 , ( " Error closing policy \n " ) ) ;
return False ;
}
DEBUG ( 3 , ( " Closed policy name pnum=%x \n " , p - > pnum ) ) ;
DLIST_REMOVE ( Policy , p ) ;
bitmap_clear ( bmap , p - > pnum ) ;
ZERO_STRUCTP ( p ) ;
free ( p ) ;
return True ;
}
# undef OLD_NTDOMAIN
