1996-05-04 11:50:46 +04:00
/*
2002-01-30 09:08:46 +03:00
Unix SMB / CIFS implementation .
1996-05-04 11:50:46 +04:00
Samba utility functions
1998-01-22 16:27:43 +03:00
Copyright ( C ) Andrew Tridgell 1992 - 1998
2002-11-13 02:20:50 +03:00
Copyright ( C ) Jeremy Allison 2001 - 2002
2001-11-12 03:53:34 +03:00
Copyright ( C ) Simo Sorce 2001
2003-08-01 19:21:20 +04:00
Copyright ( C ) Jim McDonough < jmcd @ us . ibm . com > 2003
1996-05-04 11:50:46 +04:00
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"
1998-07-29 07:08:05 +04:00
# if (defined(HAVE_NETGROUP) && defined (WITH_AUTOMOUNT))
1998-08-08 05:15:14 +04:00
# ifdef WITH_NISPLUS_HOME
1999-12-13 16:27:58 +03:00
# ifdef BROKEN_NISPLUS_INCLUDE_FILES
/*
* The following lines are needed due to buggy include files
* in Solaris 2.6 which define GROUP in both / usr / include / sys / acl . h and
* also in / usr / include / rpcsvc / nis . h . The definitions conflict . JRA .
* Also GROUP_OBJ is defined as 0x4 in / usr / include / sys / acl . h and as
* an enum in / usr / include / rpcsvc / nis . h .
*/
# if defined(GROUP)
# undef GROUP
1997-10-20 16:10:58 +04:00
# endif
1999-12-13 16:27:58 +03:00
# if defined(GROUP_OBJ)
# undef GROUP_OBJ
1998-04-10 00:48:48 +04:00
# endif
1997-10-20 16:10:58 +04:00
1999-12-13 16:27:58 +03:00
# endif /* BROKEN_NISPLUS_INCLUDE_FILES */
# include <rpcsvc/nis.h>
# else /* !WITH_NISPLUS_HOME */
# include "rpcsvc/ypclnt.h"
# endif /* WITH_NISPLUS_HOME */
# endif /* HAVE_NETGROUP && WITH_AUTOMOUNT */
1996-05-04 11:50:46 +04:00
int Protocol = PROTOCOL_COREPLUS ;
/* a default finfo structure to ensure all fields are sensible */
2000-04-30 08:45:16 +04:00
file_info def_finfo = { - 1 , 0 , 0 , 0 , 0 , 0 , 0 , " " , " " } ;
1996-05-04 11:50:46 +04:00
1996-08-19 15:17:29 +04:00
/* this is used by the chaining code */
int chain_size = 0 ;
1996-05-04 11:50:46 +04:00
int trans_num = 0 ;
/*
case handling on filenames
*/
int case_default = CASE_LOWER ;
/* the following control case operations - they are put here so the
client can link easily */
BOOL case_sensitive ;
BOOL case_preserve ;
BOOL use_mangled_map = False ;
BOOL short_case_preserve ;
BOOL case_mangle ;
1997-09-05 00:26:07 +04:00
static enum remote_arch_types ra_type = RA_UNKNOWN ;
1999-12-13 16:27:58 +03:00
pstring user_socket_options = DEFAULT_SOCKET_OPTIONS ;
1997-10-19 19:33:25 +04:00
2002-11-13 02:20:50 +03:00
/***********************************************************************
Definitions for all names .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
static char * smb_myname ;
static char * smb_myworkgroup ;
static char * smb_scope ;
static int smb_num_netbios_names ;
static char * * smb_my_netbios_names ;
/***********************************************************************
Allocate and set myname . Ensure upper case .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL set_global_myname ( const char * myname )
{
SAFE_FREE ( smb_myname ) ;
smb_myname = strdup ( myname ) ;
if ( ! smb_myname )
return False ;
2003-07-03 23:11:31 +04:00
strupper_m ( smb_myname ) ;
2002-11-13 02:20:50 +03:00
return True ;
}
const char * global_myname ( void )
{
return smb_myname ;
}
/***********************************************************************
Allocate and set myworkgroup . Ensure upper case .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL set_global_myworkgroup ( const char * myworkgroup )
{
SAFE_FREE ( smb_myworkgroup ) ;
smb_myworkgroup = strdup ( myworkgroup ) ;
if ( ! smb_myworkgroup )
return False ;
2003-07-03 23:11:31 +04:00
strupper_m ( smb_myworkgroup ) ;
2002-11-13 02:20:50 +03:00
return True ;
}
const char * lp_workgroup ( void )
{
return smb_myworkgroup ;
}
/***********************************************************************
Allocate and set scope . Ensure upper case .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL set_global_scope ( const char * scope )
{
SAFE_FREE ( smb_scope ) ;
smb_scope = strdup ( scope ) ;
if ( ! smb_scope )
return False ;
2003-07-03 23:11:31 +04:00
strupper_m ( smb_scope ) ;
2002-11-13 02:20:50 +03:00
return True ;
}
2002-12-06 22:59:04 +03:00
/*********************************************************************
Ensure scope is never null string .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
const char * global_scope ( void )
{
2002-12-06 22:59:04 +03:00
if ( ! smb_scope )
set_global_scope ( " " ) ;
2002-11-13 02:20:50 +03:00
return smb_scope ;
}
static void free_netbios_names_array ( void )
{
int i ;
for ( i = 0 ; i < smb_num_netbios_names ; i + + )
SAFE_FREE ( smb_my_netbios_names [ i ] ) ;
SAFE_FREE ( smb_my_netbios_names ) ;
smb_num_netbios_names = 0 ;
}
static BOOL allocate_my_netbios_names_array ( size_t number )
{
free_netbios_names_array ( ) ;
smb_num_netbios_names = number + 1 ;
smb_my_netbios_names = ( char * * ) malloc ( sizeof ( char * ) * smb_num_netbios_names ) ;
if ( ! smb_my_netbios_names )
return False ;
memset ( smb_my_netbios_names , ' \0 ' , sizeof ( char * ) * smb_num_netbios_names ) ;
return True ;
}
static BOOL set_my_netbios_names ( const char * name , int i )
{
SAFE_FREE ( smb_my_netbios_names [ i ] ) ;
smb_my_netbios_names [ i ] = strdup ( name ) ;
if ( ! smb_my_netbios_names [ i ] )
return False ;
2003-07-03 23:11:31 +04:00
strupper_m ( smb_my_netbios_names [ i ] ) ;
2002-11-13 02:20:50 +03:00
return True ;
}
const char * my_netbios_names ( int i )
{
return smb_my_netbios_names [ i ] ;
}
BOOL set_netbios_aliases ( const char * * str_array )
{
size_t namecount ;
/* Work out the max number of netbios aliases that we have */
for ( namecount = 0 ; str_array & & ( str_array [ namecount ] ! = NULL ) ; namecount + + )
;
if ( global_myname ( ) & & * global_myname ( ) )
namecount + + ;
/* Allocate space for the netbios aliases */
if ( ! allocate_my_netbios_names_array ( namecount ) )
return False ;
/* Use the global_myname string first */
namecount = 0 ;
if ( global_myname ( ) & & * global_myname ( ) ) {
set_my_netbios_names ( global_myname ( ) , namecount ) ;
namecount + + ;
}
if ( str_array ) {
size_t i ;
for ( i = 0 ; str_array [ i ] ! = NULL ; i + + ) {
size_t n ;
BOOL duplicate = False ;
/* Look for duplicates */
for ( n = 0 ; n < namecount ; n + + ) {
if ( strequal ( str_array [ i ] , my_netbios_names ( n ) ) ) {
duplicate = True ;
break ;
}
}
if ( ! duplicate ) {
if ( ! set_my_netbios_names ( str_array [ i ] , namecount ) )
return False ;
namecount + + ;
}
}
}
return True ;
}
1996-05-04 11:50:46 +04:00
1996-10-24 04:09:08 +04:00
/****************************************************************************
2002-11-13 02:20:50 +03:00
Common name initialization code .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL init_names ( void )
{
extern fstring local_machine ;
char * p ;
int n ;
if ( global_myname ( ) = = NULL | | * global_myname ( ) = = ' \0 ' ) {
2003-02-24 06:09:08 +03:00
if ( ! set_global_myname ( myhostname ( ) ) ) {
2002-11-13 02:20:50 +03:00
DEBUG ( 0 , ( " init_structs: malloc fail. \n " ) ) ;
return False ;
}
}
if ( ! set_netbios_aliases ( lp_netbios_aliases ( ) ) ) {
DEBUG ( 0 , ( " init_structs: malloc fail. \n " ) ) ;
return False ;
}
fstrcpy ( local_machine , global_myname ( ) ) ;
trim_string ( local_machine , " " , " " ) ;
p = strchr ( local_machine , ' ' ) ;
if ( p )
* p = 0 ;
2003-07-03 23:11:31 +04:00
strlower_m ( local_machine ) ;
2002-11-13 02:20:50 +03:00
DEBUG ( 5 , ( " Netbios name list:- \n " ) ) ;
for ( n = 0 ; my_netbios_names ( n ) ; n + + )
DEBUGADD ( 5 , ( " my_netbios_names[%d]= \" %s \" \n " , n , my_netbios_names ( n ) ) ) ;
return ( True ) ;
}
/**************************************************************************n
2002-07-15 14:35:28 +04:00
Find a suitable temporary directory . The result should be copied immediately
2001-11-16 00:50:29 +03:00
as it may be overwritten by a subsequent call .
2002-07-15 14:35:28 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
const char * tmpdir ( void )
1996-10-24 04:09:08 +04:00
{
2002-11-13 02:20:50 +03:00
char * p ;
2001-11-16 00:50:29 +03:00
if ( ( p = getenv ( " TMPDIR " ) ) )
2002-11-13 02:20:50 +03:00
return p ;
return " /tmp " ;
1996-10-24 04:09:08 +04:00
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
2001-11-16 00:50:29 +03:00
Determine whether we are in the specified group .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-09-30 00:24:17 +04:00
2002-08-17 21:00:51 +04:00
BOOL in_group ( gid_t group , gid_t current_gid , int ngroups , const gid_t * groups )
1996-05-04 11:50:46 +04:00
{
1998-07-29 09:05:36 +04:00
int i ;
1996-05-04 11:50:46 +04:00
2001-11-16 00:50:29 +03:00
if ( group = = current_gid )
return ( True ) ;
1996-05-04 11:50:46 +04:00
1998-07-29 09:05:36 +04:00
for ( i = 0 ; i < ngroups ; i + + )
if ( group = = groups [ i ] )
return ( True ) ;
1996-05-04 11:50:46 +04:00
1998-07-29 09:05:36 +04:00
return ( False ) ;
1996-05-04 11:50:46 +04:00
}
/****************************************************************************
2002-01-21 09:12:22 +03:00
Like atoi but gets the value up to the separator character .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
2003-02-24 06:09:08 +03:00
static const char * Atoic ( const char * p , int * n , const char * c )
1996-05-04 11:50:46 +04:00
{
2003-02-24 06:09:08 +03:00
if ( ! isdigit ( ( const int ) * p ) ) {
1998-11-10 21:14:16 +03:00
DEBUG ( 5 , ( " Atoic: malformed number \n " ) ) ;
return NULL ;
}
1996-05-04 11:50:46 +04:00
1999-12-13 16:27:58 +03:00
( * n ) = atoi ( p ) ;
- group database API. oops and oh dear, the threat has been carried out:
the pre-alpha "domain group" etc parameters have disappeared.
- interactive debug detection
- re-added mem_man (andrew's memory management, detects memory corruption)
- american spellings of "initialise" replaced with english spelling of
"initialise".
- started on "lookup_name()" and "lookup_sid()" functions. proper ones.
- moved lots of functions around. created some modules of commonly used
code. e.g the password file locking code, which is used in groupfile.c
and aliasfile.c and smbpass.c
- moved RID_TYPE_MASK up another bit. this is really unfortunate, but
there is no other "fast" way to identify users from groups from aliases.
i do not believe that this code saves us anything (the multipliers)
and puts us at a disadvantage (reduces the useable rid space).
the designers of NT aren't silly: if they can get away with a user-
interface-speed LsaLookupNames / LsaLookupSids, then so can we. i
spoke with isaac at the cifs conference, the only time for example that
they do a security context check is on file create. certainly not on
individual file reads / writes, which would drastically hit their
performance and ours, too.
- renamed myworkgroup to global_sam_name, amongst other things, when used
in the rpc code. there is also a global_member_name, as we are always
responsible for a SAM database, the scope of which is limited by the role
of the machine (e.g if a member of a workgroup, your SAM is for _local_
logins only, and its name is the name of your server. you even still
have a SID. see LsaQueryInfoPolicy, levels 3 and 5).
- updated functionality of groupname.c to be able to cope with names
like DOMAIN\group and SERVER\alias. used this code to be able to
do aliases as well as groups. this code may actually be better
off being used in username mapping, too.
- created a connect to serverlist function in clientgen.c and used it
in password.c
- initialisation in server.c depends on the role of the server. well,
it does now.
- rpctorture. smbtorture. EXERCISE EXTREME CAUTION.
(This used to be commit 0d21e1e6090b933f396c764af535ca3388a562db)
1998-11-17 19:19:04 +03:00
1999-12-13 16:27:58 +03:00
while ( ( * p ) & & isdigit ( ( int ) * p ) )
1998-11-10 21:14:16 +03:00
p + + ;
2002-11-13 02:20:50 +03:00
if ( strchr_m ( c , * p ) = = NULL ) {
1998-11-10 21:14:16 +03:00
DEBUG ( 5 , ( " Atoic: no separator characters (%s) not found \n " , c ) ) ;
return NULL ;
}
return p ;
1996-05-04 11:50:46 +04:00
}
1998-11-10 21:14:16 +03:00
/*************************************************************************
2001-11-16 00:50:29 +03:00
Reads a list of numbers .
1998-11-10 21:14:16 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
2003-02-24 06:09:08 +03:00
const char * get_numlist ( const char * p , uint32 * * num , int * count )
1996-05-04 11:50:46 +04:00
{
1998-11-10 21:14:16 +03:00
int val ;
if ( num = = NULL | | count = = NULL )
return NULL ;
( * count ) = 0 ;
( * num ) = NULL ;
2001-11-16 00:50:29 +03:00
while ( ( p = Atoic ( p , & val , " :, " ) ) ! = NULL & & ( * p ) ! = ' : ' ) {
2001-08-12 21:30:01 +04:00
uint32 * tn ;
tn = Realloc ( ( * num ) , ( ( * count ) + 1 ) * sizeof ( uint32 ) ) ;
2002-11-13 02:20:50 +03:00
if ( tn = = NULL ) {
2001-09-17 06:19:44 +04:00
SAFE_FREE ( * num ) ;
1998-11-10 21:14:16 +03:00
return NULL ;
2001-11-16 00:50:29 +03:00
} else
( * num ) = tn ;
1999-12-13 16:27:58 +03:00
( * num ) [ ( * count ) ] = val ;
( * count ) + + ;
1998-11-10 21:14:16 +03:00
p + + ;
}
1996-05-04 11:50:46 +04:00
1998-11-10 21:14:16 +03:00
return p ;
}
1996-05-04 11:50:46 +04:00
/*******************************************************************
2001-11-16 00:50:29 +03:00
Check if a file exists - call vfs_file_exist for samba files .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
2002-01-15 04:37:12 +03:00
BOOL file_exist ( const char * fname , SMB_STRUCT_STAT * sbuf )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
SMB_STRUCT_STAT st ;
2001-11-16 00:50:29 +03:00
if ( ! sbuf )
sbuf = & st ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( sys_stat ( fname , sbuf ) ! = 0 )
return ( False ) ;
1996-05-04 11:50:46 +04:00
2002-07-15 14:35:28 +04:00
return ( ( S_ISREG ( sbuf - > st_mode ) ) | | ( S_ISFIFO ( sbuf - > st_mode ) ) ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2001-11-16 00:50:29 +03:00
Check a files mod time .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
2002-01-15 04:37:12 +03:00
time_t file_modtime ( const char * fname )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
SMB_STRUCT_STAT st ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( sys_stat ( fname , & st ) ! = 0 )
return ( 0 ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
return ( st . st_mtime ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2001-11-16 00:50:29 +03:00
Check if a directory exists .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
1998-09-02 00:11:54 +04:00
BOOL directory_exist ( char * dname , SMB_STRUCT_STAT * st )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
SMB_STRUCT_STAT st2 ;
BOOL ret ;
1997-08-21 00:32:23 +04:00
2002-11-13 02:20:50 +03:00
if ( ! st )
st = & st2 ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( sys_stat ( dname , st ) ! = 0 )
return ( False ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
ret = S_ISDIR ( st - > st_mode ) ;
if ( ! ret )
errno = ENOTDIR ;
return ret ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2002-11-13 02:20:50 +03:00
Returns the size in bytes of the named file .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1999-12-13 16:27:58 +03:00
SMB_OFF_T get_file_size ( char * file_name )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
SMB_STRUCT_STAT buf ;
buf . st_size = 0 ;
if ( sys_stat ( file_name , & buf ) ! = 0 )
return ( SMB_OFF_T ) - 1 ;
return ( buf . st_size ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2002-11-13 02:20:50 +03:00
Return a string representing an attribute for a file .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1998-11-09 23:33:37 +03:00
char * attrib_string ( uint16 mode )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
static fstring attrstr ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
attrstr [ 0 ] = 0 ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( mode & aVOLID ) fstrcat ( attrstr , " V " ) ;
if ( mode & aDIR ) fstrcat ( attrstr , " D " ) ;
if ( mode & aARCH ) fstrcat ( attrstr , " A " ) ;
if ( mode & aHIDDEN ) fstrcat ( attrstr , " H " ) ;
if ( mode & aSYSTEM ) fstrcat ( attrstr , " S " ) ;
if ( mode & aRONLY ) fstrcat ( attrstr , " R " ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
return ( attrstr ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2002-11-13 02:20:50 +03:00
Show a smb message structure .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1998-11-10 21:14:16 +03:00
void show_msg ( char * buf )
1996-05-04 11:50:46 +04:00
{
1998-11-10 21:14:16 +03:00
int i ;
int bcc = 0 ;
1998-03-03 23:19:14 +03:00
2002-11-13 02:20:50 +03:00
if ( ! DEBUGLVL ( 5 ) )
return ;
2002-09-25 19:19:00 +04:00
1998-11-10 21:14:16 +03:00
DEBUG ( 5 , ( " size=%d \n smb_com=0x%x \n smb_rcls=%d \n smb_reh=%d \n smb_err=%d \n smb_flg=%d \n smb_flg2=%d \n " ,
smb_len ( buf ) ,
( int ) CVAL ( buf , smb_com ) ,
( int ) CVAL ( buf , smb_rcls ) ,
( int ) CVAL ( buf , smb_reh ) ,
( int ) SVAL ( buf , smb_err ) ,
( int ) CVAL ( buf , smb_flg ) ,
( int ) SVAL ( buf , smb_flg2 ) ) ) ;
2002-09-25 19:19:00 +04:00
DEBUGADD ( 5 , ( " smb_tid=%d \n smb_pid=%d \n smb_uid=%d \n smb_mid=%d \n " ,
1998-11-10 21:14:16 +03:00
( int ) SVAL ( buf , smb_tid ) ,
( int ) SVAL ( buf , smb_pid ) ,
( int ) SVAL ( buf , smb_uid ) ,
2002-09-25 19:19:00 +04:00
( int ) SVAL ( buf , smb_mid ) ) ) ;
DEBUGADD ( 5 , ( " smt_wct=%d \n " , ( int ) CVAL ( buf , smb_wct ) ) ) ;
1996-05-04 11:50:46 +04:00
1998-11-10 21:14:16 +03:00
for ( i = 0 ; i < ( int ) CVAL ( buf , smb_wct ) ; i + + )
2002-09-25 19:19:00 +04:00
DEBUGADD ( 5 , ( " smb_vwv[%2d]=%5d (0x%X) \n " , i ,
1998-11-10 21:14:16 +03:00
SVAL ( buf , smb_vwv + 2 * i ) , SVAL ( buf , smb_vwv + 2 * i ) ) ) ;
2002-09-25 19:19:00 +04:00
1998-11-10 21:14:16 +03:00
bcc = ( int ) SVAL ( buf , smb_vwv + 2 * ( CVAL ( buf , smb_wct ) ) ) ;
2002-09-25 19:19:00 +04:00
DEBUGADD ( 5 , ( " smb_bcc=%d \n " , bcc ) ) ;
1998-11-10 21:14:16 +03:00
2002-11-13 02:20:50 +03:00
if ( DEBUGLEVEL < 10 )
return ;
1998-11-10 21:14:16 +03:00
2002-11-13 02:20:50 +03:00
if ( DEBUGLEVEL < 50 )
bcc = MIN ( bcc , 512 ) ;
1998-11-10 21:14:16 +03:00
2002-09-25 19:19:00 +04:00
dump_data ( 10 , smb_buf ( buf ) , bcc ) ;
1998-11-10 21:14:16 +03:00
}
1996-05-04 11:50:46 +04:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Set the length and marker of an smb packet .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1998-11-10 21:14:16 +03:00
void smb_setlen ( char * buf , int len )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
_smb_setlen ( buf , len ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
SCVAL ( buf , 4 , 0xFF ) ;
SCVAL ( buf , 5 , ' S ' ) ;
SCVAL ( buf , 6 , ' M ' ) ;
SCVAL ( buf , 7 , ' B ' ) ;
1998-11-10 21:14:16 +03:00
}
1996-05-04 11:50:46 +04:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Setup the word count and byte count for a smb message .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1998-11-10 21:14:16 +03:00
int set_message ( char * buf , int num_words , int num_bytes , BOOL zero )
1996-05-04 11:50:46 +04:00
{
2001-02-20 15:45:50 +03:00
if ( zero )
memset ( buf + smb_size , ' \0 ' , num_words * 2 + num_bytes ) ;
2002-01-11 22:10:25 +03:00
SCVAL ( buf , smb_wct , num_words ) ;
2001-02-20 15:45:50 +03:00
SSVAL ( buf , smb_vwv + num_words * SIZEOFWORD , num_bytes ) ;
smb_setlen ( buf , smb_size + num_words * 2 + num_bytes - 4 ) ;
return ( smb_size + num_words * 2 + num_bytes ) ;
}
/*******************************************************************
2002-11-13 02:20:50 +03:00
Setup only the byte count for a smb message .
2001-02-20 15:45:50 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2001-09-17 08:23:48 +04:00
int set_message_bcc ( char * buf , int num_bytes )
2001-02-20 15:45:50 +03:00
{
int num_words = CVAL ( buf , smb_wct ) ;
SSVAL ( buf , smb_vwv + num_words * SIZEOFWORD , num_bytes ) ;
smb_setlen ( buf , smb_size + num_words * 2 + num_bytes - 4 ) ;
2001-09-17 08:23:48 +04:00
return ( smb_size + num_words * 2 + num_bytes ) ;
1996-05-04 11:50:46 +04:00
}
2001-03-10 14:38:27 +03:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Setup only the byte count for a smb message , using the end of the
message as a marker .
2001-03-10 14:38:27 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2001-09-17 08:23:48 +04:00
int set_message_end ( void * outbuf , void * end_ptr )
2001-03-10 14:38:27 +03:00
{
2001-09-17 08:23:48 +04:00
return set_message_bcc ( ( char * ) outbuf , PTR_DIFF ( end_ptr , smb_buf ( ( char * ) outbuf ) ) ) ;
2001-03-10 14:38:27 +03:00
}
1996-05-04 11:50:46 +04:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Reduce a file name , removing . . elements .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1996-05-04 11:50:46 +04:00
void dos_clean_name ( char * s )
{
2002-11-13 02:20:50 +03:00
char * p = NULL ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
DEBUG ( 3 , ( " dos_clean_name [%s] \n " , s ) ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
/* remove any double slashes */
all_string_sub ( s , " \\ \\ " , " \\ " , 0 ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
while ( ( p = strstr ( s , " \\ .. \\ " ) ) ! = NULL ) {
pstring s1 ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
* p = 0 ;
pstrcpy ( s1 , p + 3 ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( ( p = strrchr_m ( s , ' \\ ' ) ) ! = NULL )
* p = 0 ;
else
* s = 0 ;
pstrcat ( s , s1 ) ;
}
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
trim_string ( s , NULL , " \\ .. " ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
all_string_sub ( s , " \\ . \\ " , " \\ " , 0 ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2002-11-13 02:20:50 +03:00
Reduce a file name , removing . . elements .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1996-05-04 11:50:46 +04:00
void unix_clean_name ( char * s )
{
2002-11-13 02:20:50 +03:00
char * p = NULL ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
DEBUG ( 3 , ( " unix_clean_name [%s] \n " , s ) ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
/* remove any double slashes */
all_string_sub ( s , " // " , " / " , 0 ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
/* Remove leading ./ characters */
if ( strncmp ( s , " ./ " , 2 ) = = 0 ) {
trim_string ( s , " ./ " , NULL ) ;
if ( * s = = 0 )
pstrcpy ( s , " ./ " ) ;
}
1997-02-10 23:03:56 +03:00
2002-11-13 02:20:50 +03:00
while ( ( p = strstr ( s , " /../ " ) ) ! = NULL ) {
pstring s1 ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
* p = 0 ;
pstrcpy ( s1 , p + 3 ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( ( p = strrchr_m ( s , ' / ' ) ) ! = NULL )
* p = 0 ;
else
* s = 0 ;
pstrcat ( s , s1 ) ;
}
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
trim_string ( s , NULL , " /.. " ) ;
1996-05-04 11:50:46 +04:00
}
2001-11-04 21:26:53 +03:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Convert ' \ ' to ' / ' .
Reduce a file name , removing or reducing / . . / , / . / , // elements.
Remove also any trailing . and /
Return a new allocated string .
2001-11-04 21:26:53 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2001-11-04 21:26:53 +03:00
smb_ucs2_t * unix_clean_path ( const smb_ucs2_t * s )
{
smb_ucs2_t * ns ;
smb_ucs2_t * p , * r , * t ;
2001-11-12 03:53:34 +03:00
DEBUG ( 3 , ( " unix_clean_path \n " ) ) ; /* [%unicode]\n")); */
2002-11-13 02:20:50 +03:00
if ( ! s )
return NULL ;
2001-11-04 21:26:53 +03:00
/* convert '\' to '/' */
ns = strdup_w ( s ) ;
2002-11-13 02:20:50 +03:00
if ( ! ns )
return NULL ;
2001-11-04 21:26:53 +03:00
unix_format_w ( ns ) ;
/* remove all double slashes */
p = ns ;
ns = all_string_sub_wa ( p , " // " , " / " ) ;
SAFE_FREE ( p ) ;
2002-11-13 02:20:50 +03:00
if ( ! ns )
return NULL ;
2001-11-04 21:26:53 +03:00
/* remove any /./ */
p = ns ;
ns = all_string_sub_wa ( p , " /./ " , " / " ) ;
SAFE_FREE ( p ) ;
2002-11-13 02:20:50 +03:00
if ( ! ns )
return NULL ;
2001-11-04 21:26:53 +03:00
/* reduce any /../ */
t = ns ;
2002-01-25 03:35:14 +03:00
while ( * t & & ( r = strstr_wa ( t , " /.. " ) ) ) {
2001-11-04 21:26:53 +03:00
t = & ( r [ 3 ] ) ;
if ( * t = = UCS2_CHAR ( ' / ' ) | | * t = = 0 ) {
* r = 0 ;
p = strrchr_w ( ns , UCS2_CHAR ( ' / ' ) ) ;
2002-11-13 02:20:50 +03:00
if ( ! p )
p = ns ;
if ( * t = = 0 )
* p = 0 ;
else
memmove ( p , t , ( strlen_w ( t ) + 1 ) * sizeof ( smb_ucs2_t ) ) ;
2001-11-04 21:26:53 +03:00
t = p ;
}
}
2002-01-27 19:37:12 +03:00
/* remove any leading ./ trailing /. */
trim_string_wa ( ns , " ./ " , " /. " ) ;
2001-11-04 21:26:53 +03:00
/* remove any leading and trailing / */
trim_string_wa ( ns , " / " , " / " ) ;
return ns ;
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
2002-11-13 02:20:50 +03:00
Make a dir struct .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2003-01-03 11:28:12 +03:00
void make_dir_struct ( char * buf , const char * mask , const char * fname , SMB_OFF_T size , int mode , time_t date )
1998-11-10 21:14:16 +03:00
{
2002-11-13 02:20:50 +03:00
char * p ;
pstring mask2 ;
1998-03-03 23:19:14 +03:00
2002-11-13 02:20:50 +03:00
pstrcpy ( mask2 , mask ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( ( mode & aDIR ) ! = 0 )
size = 0 ;
1998-03-03 23:19:14 +03:00
2002-11-13 02:20:50 +03:00
memset ( buf + 1 , ' ' , 11 ) ;
if ( ( p = strchr_m ( mask2 , ' . ' ) ) ! = NULL ) {
* p = 0 ;
push_ascii ( buf + 1 , mask2 , 8 , 0 ) ;
push_ascii ( buf + 9 , p + 1 , 3 , 0 ) ;
* p = ' . ' ;
} else
push_ascii ( buf + 1 , mask2 , 11 , 0 ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
memset ( buf + 21 , ' \0 ' , DIR_STRUCT_SIZE - 21 ) ;
SCVAL ( buf , 21 , mode ) ;
put_dos_date ( buf , 22 , date ) ;
SSVAL ( buf , 26 , size & 0xFFFF ) ;
SSVAL ( buf , 28 , ( size > > 16 ) & 0xFFFF ) ;
push_ascii ( buf + 30 , fname , 12 , case_sensitive ? 0 : STR_UPPER ) ;
DEBUG ( 8 , ( " put name [%s] from [%s] into dir struct \n " , buf + 30 , fname ) ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2002-11-13 02:20:50 +03:00
Close the low 3 fd ' s and open dev / null in their place .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2002-08-17 21:00:51 +04:00
void close_low_fds ( BOOL stderr_too )
1996-05-04 11:50:46 +04:00
{
2002-12-12 02:54:40 +03:00
# ifndef VALGRIND
2002-11-13 02:20:50 +03:00
int fd ;
int i ;
close ( 0 ) ;
close ( 1 ) ;
if ( stderr_too )
close ( 2 ) ;
/* try and use up these file descriptors, so silly
library routines writing to stdout etc won ' t cause havoc */
for ( i = 0 ; i < 3 ; i + + ) {
if ( i = = 2 & & ! stderr_too )
continue ;
fd = sys_open ( " /dev/null " , O_RDWR , 0 ) ;
if ( fd < 0 )
fd = sys_open ( " /dev/null " , O_WRONLY , 0 ) ;
if ( fd < 0 ) {
DEBUG ( 0 , ( " Can't open /dev/null \n " ) ) ;
return ;
}
if ( fd ! = i ) {
DEBUG ( 0 , ( " Didn't get file descriptor %d \n " , i ) ) ;
return ;
}
}
2002-12-12 02:54:40 +03:00
# endif
1996-05-04 11:50:46 +04:00
}
1996-08-22 10:32:03 +04:00
/****************************************************************************
2002-11-13 02:20:50 +03:00
Set a fd into blocking / nonblocking mode . Uses POSIX O_NONBLOCK if available ,
else
if SYSV use O_NDELAY
if BSD use FNDELAY
1996-08-22 10:32:03 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1998-11-10 21:14:16 +03:00
int set_blocking ( int fd , BOOL set )
1996-08-22 10:32:03 +04:00
{
2002-11-13 02:20:50 +03:00
int val ;
1996-08-22 10:32:03 +04:00
# ifdef O_NONBLOCK
# define FLAG_TO_SET O_NONBLOCK
# else
# ifdef SYSV
# define FLAG_TO_SET O_NDELAY
# else /* BSD */
# define FLAG_TO_SET FNDELAY
# endif
# endif
2002-11-13 02:20:50 +03:00
if ( ( val = sys_fcntl_long ( fd , F_GETFL , 0 ) ) = = - 1 )
return - 1 ;
if ( set ) /* Turn blocking on - ie. clear nonblock flag */
val & = ~ FLAG_TO_SET ;
else
val | = FLAG_TO_SET ;
return sys_fcntl_long ( fd , F_SETFL , val ) ;
1996-08-22 10:32:03 +04:00
# undef FLAG_TO_SET
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
2001-09-04 23:10:30 +04:00
Transfer some data between two fd ' s .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-01-04 00:48:17 +03:00
# ifndef TRANSFER_BUF_SIZE
# define TRANSFER_BUF_SIZE 65536
# endif
2001-09-04 23:10:30 +04:00
ssize_t transfer_file_internal ( int infd , int outfd , size_t n , ssize_t ( * read_fn ) ( int , void * , size_t ) ,
ssize_t ( * write_fn ) ( int , const void * , size_t ) )
{
2002-01-04 00:48:17 +03:00
char * buf ;
2001-09-04 23:10:30 +04:00
size_t total = 0 ;
ssize_t read_ret ;
2002-01-03 22:57:12 +03:00
ssize_t write_ret ;
size_t num_to_read_thistime ;
size_t num_written = 0 ;
2001-09-04 23:10:30 +04:00
2002-01-04 00:48:17 +03:00
if ( ( buf = malloc ( TRANSFER_BUF_SIZE ) ) = = NULL )
return - 1 ;
2001-09-04 23:10:30 +04:00
while ( total < n ) {
2002-01-04 00:48:17 +03:00
num_to_read_thistime = MIN ( ( n - total ) , TRANSFER_BUF_SIZE ) ;
2001-09-04 23:10:30 +04:00
2002-01-03 22:57:12 +03:00
read_ret = ( * read_fn ) ( infd , buf , num_to_read_thistime ) ;
2001-09-04 23:10:30 +04:00
if ( read_ret = = - 1 ) {
DEBUG ( 0 , ( " transfer_file_internal: read failure. Error = %s \n " , strerror ( errno ) ) ) ;
2002-01-04 00:48:17 +03:00
SAFE_FREE ( buf ) ;
2001-09-04 23:10:30 +04:00
return - 1 ;
}
if ( read_ret = = 0 )
break ;
2002-01-03 22:57:12 +03:00
num_written = 0 ;
2001-09-04 23:10:30 +04:00
2002-01-03 22:57:12 +03:00
while ( num_written < read_ret ) {
2002-01-04 00:37:45 +03:00
write_ret = ( * write_fn ) ( outfd , buf + num_written , read_ret - num_written ) ;
2001-09-04 23:10:30 +04:00
if ( write_ret = = - 1 ) {
DEBUG ( 0 , ( " transfer_file_internal: write failure. Error = %s \n " , strerror ( errno ) ) ) ;
2002-01-04 00:48:17 +03:00
SAFE_FREE ( buf ) ;
2001-09-04 23:10:30 +04:00
return - 1 ;
}
if ( write_ret = = 0 )
return ( ssize_t ) total ;
2002-01-03 22:57:12 +03:00
num_written + = ( size_t ) write_ret ;
2001-09-04 23:10:30 +04:00
}
1996-05-04 11:50:46 +04:00
2001-09-04 23:10:30 +04:00
total + = ( size_t ) read_ret ;
}
1996-05-04 11:50:46 +04:00
2002-01-04 00:48:17 +03:00
SAFE_FREE ( buf ) ;
2001-09-04 23:10:30 +04:00
return ( ssize_t ) total ;
1996-05-04 11:50:46 +04:00
}
2001-09-04 23:10:30 +04:00
SMB_OFF_T transfer_file ( int infd , int outfd , SMB_OFF_T n )
{
2002-07-15 14:35:28 +04:00
return ( SMB_OFF_T ) transfer_file_internal ( infd , outfd , ( size_t ) n , sys_read , sys_write ) ;
2001-09-04 23:10:30 +04:00
}
1996-05-04 11:50:46 +04:00
/*******************************************************************
2001-11-16 00:50:29 +03:00
Sleep for a specified number of milliseconds .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
2002-03-27 03:39:26 +03:00
void msleep ( unsigned int t )
1996-05-04 11:50:46 +04:00
{
2002-03-27 03:39:26 +03:00
unsigned int tdiff = 0 ;
struct timeval tval , t1 , t2 ;
fd_set fds ;
1996-05-04 11:50:46 +04:00
2002-03-27 03:39:26 +03:00
GetTimeOfDay ( & t1 ) ;
GetTimeOfDay ( & t2 ) ;
1996-05-04 11:50:46 +04:00
2002-03-27 03:39:26 +03:00
while ( tdiff < t ) {
tval . tv_sec = ( t - tdiff ) / 1000 ;
tval . tv_usec = 1000 * ( ( t - tdiff ) % 1000 ) ;
/* Never wait for more than 1 sec. */
if ( tval . tv_sec > 1 ) {
tval . tv_sec = 1 ;
tval . tv_usec = 0 ;
}
1996-05-04 11:50:46 +04:00
2002-03-27 03:39:26 +03:00
FD_ZERO ( & fds ) ;
errno = 0 ;
sys_select_intr ( 0 , & fds , NULL , NULL , & tval ) ;
GetTimeOfDay ( & t2 ) ;
if ( t2 . tv_sec < t1 . tv_sec ) {
/* Someone adjusted time... */
t1 = t2 ;
}
tdiff = TvalDiff ( & t1 , & t2 ) ;
}
1996-05-04 11:50:46 +04:00
}
/****************************************************************************
2001-11-16 00:50:29 +03:00
Become a daemon , discarding the controlling terminal .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
2003-01-03 20:39:30 +03:00
void become_daemon ( BOOL Fork )
1996-05-04 11:50:46 +04:00
{
2003-01-03 20:39:30 +03:00
if ( Fork ) {
if ( sys_fork ( ) ) {
_exit ( 0 ) ;
}
}
1996-05-04 11:50:46 +04:00
/* detach from the terminal */
1998-07-29 07:08:05 +04:00
# ifdef HAVE_SETSID
setsid ( ) ;
# elif defined(TIOCNOTTY)
{
1998-11-17 23:50:07 +03:00
int i = sys_open ( " /dev/tty " , O_RDWR , 0 ) ;
1998-07-29 07:08:05 +04:00
if ( i ! = - 1 ) {
ioctl ( i , ( int ) TIOCNOTTY , ( char * ) 0 ) ;
close ( i ) ;
}
}
# endif /* HAVE_SETSID */
/* Close fd's 0,1,2. Needed if started by rsh */
2002-08-17 21:00:51 +04:00
close_low_fds ( False ) ; /* Don't close stderr, let the debug system
attach it to the logfile */
1996-05-04 11:50:46 +04:00
}
/****************************************************************************
2002-11-13 02:20:50 +03:00
Put up a yes / no prompt .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1996-05-04 11:50:46 +04:00
BOOL yesno ( char * p )
{
2002-11-13 02:20:50 +03:00
pstring ans ;
printf ( " %s " , p ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( ! fgets ( ans , sizeof ( ans ) - 1 , stdin ) )
return ( False ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( * ans = = ' y ' | | * ans = = ' Y ' )
return ( True ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
return ( False ) ;
1996-05-04 11:50:46 +04:00
}
/****************************************************************************
2001-11-16 00:50:29 +03:00
Expand a pointer to be a particular size .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
1998-09-11 05:24:30 +04:00
void * Realloc ( void * p , size_t size )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
void * ret = NULL ;
1996-05-31 19:13:29 +04:00
2002-11-13 02:20:50 +03:00
if ( size = = 0 ) {
SAFE_FREE ( p ) ;
DEBUG ( 5 , ( " Realloc asked for 0 bytes \n " ) ) ;
return NULL ;
}
1996-05-31 19:13:29 +04:00
2002-11-13 02:20:50 +03:00
if ( ! p )
ret = ( void * ) malloc ( size ) ;
else
ret = ( void * ) realloc ( p , size ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( ! ret )
DEBUG ( 0 , ( " Memory allocation error: failed to expand to %d bytes \n " , ( int ) size ) ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
return ( ret ) ;
1996-05-04 11:50:46 +04:00
}
2003-05-12 05:20:17 +04:00
void * Realloc_zero ( void * ptr , size_t size )
{
void * tptr = NULL ;
tptr = Realloc ( ptr , size ) ;
if ( tptr = = NULL )
return NULL ;
memset ( ( char * ) tptr , ' \0 ' , size ) ;
return tptr ;
}
2000-02-07 19:22:16 +03:00
/****************************************************************************
2001-11-16 00:50:29 +03:00
Free memory , checks for NULL .
2002-11-13 02:20:50 +03:00
Use directly SAFE_FREE ( )
Exists only because we need to pass a function pointer somewhere - - SSS
2000-02-07 19:22:16 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
2000-02-07 19:22:16 +03:00
void safe_free ( void * p )
{
2001-09-17 06:19:44 +04:00
SAFE_FREE ( p ) ;
2000-02-07 19:22:16 +03:00
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
2001-11-16 00:50:29 +03:00
Get my own name and IP .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
1999-12-13 16:27:58 +03:00
BOOL get_myname ( char * my_name )
1996-05-04 11:50:46 +04:00
{
1999-12-13 16:27:58 +03:00
pstring hostname ;
1996-05-04 11:50:46 +04:00
1999-12-13 16:27:58 +03:00
* hostname = 0 ;
1996-05-04 11:50:46 +04:00
1999-12-13 16:27:58 +03:00
/* get my host name */
if ( gethostname ( hostname , sizeof ( hostname ) ) = = - 1 ) {
DEBUG ( 0 , ( " gethostname failed \n " ) ) ;
return False ;
}
1996-05-04 11:50:46 +04:00
1999-12-13 16:27:58 +03:00
/* Ensure null termination. */
hostname [ sizeof ( hostname ) - 1 ] = ' \0 ' ;
1996-05-04 11:50:46 +04:00
1999-12-13 16:27:58 +03:00
if ( my_name ) {
/* split off any parts after an initial . */
2001-07-04 11:36:09 +04:00
char * p = strchr_m ( hostname , ' . ' ) ;
2001-11-16 00:50:29 +03:00
if ( p )
* p = 0 ;
1999-12-13 16:27:58 +03:00
fstrcpy ( my_name , hostname ) ;
}
return ( True ) ;
1996-05-04 11:50:46 +04:00
}
2002-12-03 22:36:53 +03:00
/****************************************************************************
Get my own name , including domain .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL get_myfullname ( char * my_name )
{
pstring hostname ;
* hostname = 0 ;
/* get my host name */
if ( gethostname ( hostname , sizeof ( hostname ) ) = = - 1 ) {
DEBUG ( 0 , ( " gethostname failed \n " ) ) ;
return False ;
}
/* Ensure null termination. */
hostname [ sizeof ( hostname ) - 1 ] = ' \0 ' ;
if ( my_name )
fstrcpy ( my_name , hostname ) ;
return True ;
}
/****************************************************************************
Get my own domain name .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2003-02-24 06:09:08 +03:00
BOOL get_mydomname ( fstring my_domname )
2002-12-03 22:36:53 +03:00
{
pstring hostname ;
char * p ;
2003-04-22 11:28:41 +04:00
struct hostent * hp ;
2002-12-03 22:36:53 +03:00
* hostname = 0 ;
/* get my host name */
if ( gethostname ( hostname , sizeof ( hostname ) ) = = - 1 ) {
DEBUG ( 0 , ( " gethostname failed \n " ) ) ;
return False ;
}
/* Ensure null termination. */
hostname [ sizeof ( hostname ) - 1 ] = ' \0 ' ;
2003-04-22 11:28:41 +04:00
2002-12-03 22:36:53 +03:00
p = strchr_m ( hostname , ' . ' ) ;
2003-04-22 11:28:41 +04:00
if ( p ) {
p + + ;
if ( my_domname )
fstrcpy ( my_domname , p ) ;
}
2002-12-03 22:36:53 +03:00
2003-04-22 11:28:41 +04:00
if ( ! ( hp = sys_gethostbyname ( hostname ) ) ) {
return False ;
}
2002-12-03 22:36:53 +03:00
2003-04-22 11:28:41 +04:00
p = strchr_m ( hp - > h_name , ' . ' ) ;
2002-12-03 22:36:53 +03:00
2003-04-22 11:28:41 +04:00
if ( p ) {
p + + ;
if ( my_domname )
fstrcpy ( my_domname , p ) ;
return True ;
}
return False ;
2002-12-03 22:36:53 +03:00
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
2001-11-16 00:50:29 +03:00
Interpret a protocol description string , with a default .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
2003-04-21 17:05:51 +04:00
int interpret_protocol ( const char * str , int def )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
if ( strequal ( str , " NT1 " ) )
return ( PROTOCOL_NT1 ) ;
if ( strequal ( str , " LANMAN2 " ) )
return ( PROTOCOL_LANMAN2 ) ;
if ( strequal ( str , " LANMAN1 " ) )
return ( PROTOCOL_LANMAN1 ) ;
if ( strequal ( str , " CORE " ) )
return ( PROTOCOL_CORE ) ;
if ( strequal ( str , " COREPLUS " ) )
return ( PROTOCOL_COREPLUS ) ;
if ( strequal ( str , " CORE+ " ) )
return ( PROTOCOL_COREPLUS ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
DEBUG ( 0 , ( " Unrecognised protocol level %s \n " , str ) ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
return ( def ) ;
1996-05-04 11:50:46 +04:00
}
1999-12-13 16:27:58 +03:00
/****************************************************************************
Return true if a string could be a pure IP address .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL is_ipaddress ( const char * str )
{
2002-11-13 02:20:50 +03:00
BOOL pure_address = True ;
int i ;
1999-12-13 16:27:58 +03:00
2002-11-13 02:20:50 +03:00
for ( i = 0 ; pure_address & & str [ i ] ; i + + )
if ( ! ( isdigit ( ( int ) str [ i ] ) | | str [ i ] = = ' . ' ) )
pure_address = False ;
1999-12-13 16:27:58 +03:00
2002-11-13 02:20:50 +03:00
/* Check that a pure number is not misinterpreted as an IP */
pure_address = pure_address & & ( strchr_m ( str , ' . ' ) ! = NULL ) ;
1999-12-13 16:27:58 +03:00
2002-11-13 02:20:50 +03:00
return pure_address ;
1999-12-13 16:27:58 +03:00
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
2002-11-13 02:20:50 +03:00
Interpret an internet address or name into an IP address in 4 byte form .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1999-12-13 16:27:58 +03:00
2001-07-04 11:15:53 +04:00
uint32 interpret_addr ( const char * str )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
struct hostent * hp ;
uint32 res ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( strcmp ( str , " 0.0.0.0 " ) = = 0 )
return ( 0 ) ;
if ( strcmp ( str , " 255.255.255.255 " ) = = 0 )
return ( 0xFFFFFFFF ) ;
1996-05-04 11:50:46 +04:00
/* if it's in the form of an IP address then get the lib to interpret it */
2002-11-13 02:20:50 +03:00
if ( is_ipaddress ( str ) ) {
res = inet_addr ( str ) ;
} else {
/* otherwise assume it's a network name of some sort and use
sys_gethostbyname */
if ( ( hp = sys_gethostbyname ( str ) ) = = 0 ) {
DEBUG ( 3 , ( " sys_gethostbyname: Unknown host. %s \n " , str ) ) ;
return 0 ;
}
if ( hp - > h_addr = = NULL ) {
DEBUG ( 3 , ( " sys_gethostbyname: host address is invalid for host %s \n " , str ) ) ;
return 0 ;
}
putip ( ( char * ) & res , ( char * ) hp - > h_addr ) ;
}
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( res = = ( uint32 ) - 1 )
return ( 0 ) ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
return ( res ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2002-11-13 02:20:50 +03:00
A convenient addition to interpret_addr ( ) .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-07-04 11:15:53 +04:00
struct in_addr * interpret_addr2 ( const char * str )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
static struct in_addr ret ;
uint32 a = interpret_addr ( str ) ;
ret . s_addr = a ;
return ( & ret ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2002-11-13 02:20:50 +03:00
Check if an IP is the 0.0 .0 .0 .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-26 06:11:44 +03:00
BOOL is_zero_ip ( struct in_addr ip )
1996-05-04 11:50:46 +04:00
{
2002-11-13 02:20:50 +03:00
uint32 a ;
putip ( ( char * ) & a , ( char * ) & ip ) ;
return ( a = = 0 ) ;
1996-05-04 11:50:46 +04:00
}
2002-07-15 14:35:28 +04:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Set an IP to 0.0 .0 .0 .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-26 06:11:44 +03:00
void zero_ip ( struct in_addr * ip )
{
static BOOL init ;
static struct in_addr ipzero ;
if ( ! init ) {
ipzero = * interpret_addr2 ( " 0.0.0.0 " ) ;
init = True ;
}
* ip = ipzero ;
}
1996-10-05 14:41:13 +04:00
1998-07-29 07:08:05 +04:00
# if (defined(HAVE_NETGROUP) && defined(WITH_AUTOMOUNT))
1998-07-16 04:06:29 +04:00
/******************************************************************
Remove any mount options such as - rsize = 2048 , wsize = 2048 etc .
Based on a fix from < Thomas . Hepper @ icem . de > .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
static void strip_mount_options ( pstring * str )
{
2002-11-13 02:20:50 +03:00
if ( * * str = = ' - ' ) {
char * p = * str ;
while ( * p & & ! isspace ( * p ) )
p + + ;
while ( * p & & isspace ( * p ) )
p + + ;
if ( * p ) {
pstring tmp_str ;
pstrcpy ( tmp_str , p ) ;
pstrcpy ( * str , tmp_str ) ;
}
}
1998-07-16 04:06:29 +04:00
}
1998-02-20 22:48:01 +03:00
/*******************************************************************
Patch from jkf @ soton . ac . uk
Split Luke ' s automount_server into YP lookup and string splitter
so can easily implement automount_path ( ) .
As we may end up doing both , cache the last YP result .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-08-08 05:15:14 +04:00
# ifdef WITH_NISPLUS_HOME
This commit is number 4 of 4.
In particular this commit focuses on:
Actually adding the 'const' to the passdb interface, and the flow-on changes.
Also kill off the 'disp_info' stuff, as its no longer used.
While these changes have been mildly tested, and are pretty small, any
assistance in this is appreciated.
----
These changes introduces a large dose of 'const' to the Samba tree.
There are a number of good reasons to do this:
- I want to allow the SAM_ACCOUNT structure to move from wasteful
pstrings and fstrings to allocated strings. We can't do that if
people are modifying these outputs, as they may well make
assumptions about getting pstrings and fstrings
- I want --with-pam_smbpass to compile with a slightly sane
volume of warnings, currently its pretty bad, even in 2.2
where is compiles at all.
- Tridge assures me that he no longer opposes 'const religion'
based on the ability to #define const the problem away.
- Changed Get_Pwnam(x,y) into two variants (so that the const
parameter can work correctly): - Get_Pwnam(const x) and
Get_Pwnam_Modify(x).
- Reworked smbd/chgpasswd.c to work with these mods, passing
around a 'struct passwd' rather than the modified username
---
This finishes this line of commits off, your tree should now compile again :-)
Andrew Bartlett
(This used to be commit c95f5aeb9327347674589ae313b75bee3bf8e317)
2001-10-29 10:35:11 +03:00
char * automount_lookup ( const char * user_name )
1998-04-10 00:48:48 +04:00
{
2002-11-13 02:20:50 +03:00
static fstring last_key = " " ;
static pstring last_value = " " ;
1998-04-10 00:48:48 +04:00
2002-11-13 02:20:50 +03:00
char * nis_map = ( char * ) lp_nis_home_map_name ( ) ;
1998-04-10 00:48:48 +04:00
2002-11-13 02:20:50 +03:00
char buffer [ NIS_MAXATTRVAL + 1 ] ;
nis_result * result ;
nis_object * object ;
entry_obj * entry ;
1998-04-10 00:48:48 +04:00
2002-11-13 02:20:50 +03:00
if ( strcmp ( user_name , last_key ) ) {
slprintf ( buffer , sizeof ( buffer ) - 1 , " [key=%s],%s " , user_name , nis_map ) ;
DEBUG ( 5 , ( " NIS+ querystring: %s \n " , buffer ) ) ;
1998-04-10 00:48:48 +04:00
2002-11-13 02:20:50 +03:00
if ( result = nis_list ( buffer , FOLLOW_PATH | EXPAND_NAME | HARD_LOOKUP , NULL , NULL ) ) {
if ( result - > status ! = NIS_SUCCESS ) {
DEBUG ( 3 , ( " NIS+ query failed: %s \n " , nis_sperrno ( result - > status ) ) ) ;
fstrcpy ( last_key , " " ) ; pstrcpy ( last_value , " " ) ;
} else {
object = result - > objects . objects_val ;
if ( object - > zo_data . zo_type = = ENTRY_OBJ ) {
entry = & object - > zo_data . objdata_u . en_data ;
DEBUG ( 5 , ( " NIS+ entry type: %s \n " , entry - > en_type ) ) ;
DEBUG ( 3 , ( " NIS+ result: %s \n " , entry - > en_cols . en_cols_val [ 1 ] . ec_value . ec_value_val ) ) ;
1998-04-10 00:48:48 +04:00
2002-11-13 02:20:50 +03:00
pstrcpy ( last_value , entry - > en_cols . en_cols_val [ 1 ] . ec_value . ec_value_val ) ;
pstring_sub ( last_value , " & " , user_name ) ;
fstrcpy ( last_key , user_name ) ;
}
}
}
nis_freeresult ( result ) ;
}
1998-07-16 04:06:29 +04:00
2002-11-13 02:20:50 +03:00
strip_mount_options ( & last_value ) ;
1998-07-16 04:06:29 +04:00
2002-11-13 02:20:50 +03:00
DEBUG ( 4 , ( " NIS+ Lookup: %s resulted in %s \n " , user_name , last_value ) ) ;
return last_value ;
1998-04-10 00:48:48 +04:00
}
1998-08-08 05:15:14 +04:00
# else /* WITH_NISPLUS_HOME */
2002-11-13 02:20:50 +03:00
This commit is number 4 of 4.
In particular this commit focuses on:
Actually adding the 'const' to the passdb interface, and the flow-on changes.
Also kill off the 'disp_info' stuff, as its no longer used.
While these changes have been mildly tested, and are pretty small, any
assistance in this is appreciated.
----
These changes introduces a large dose of 'const' to the Samba tree.
There are a number of good reasons to do this:
- I want to allow the SAM_ACCOUNT structure to move from wasteful
pstrings and fstrings to allocated strings. We can't do that if
people are modifying these outputs, as they may well make
assumptions about getting pstrings and fstrings
- I want --with-pam_smbpass to compile with a slightly sane
volume of warnings, currently its pretty bad, even in 2.2
where is compiles at all.
- Tridge assures me that he no longer opposes 'const religion'
based on the ability to #define const the problem away.
- Changed Get_Pwnam(x,y) into two variants (so that the const
parameter can work correctly): - Get_Pwnam(const x) and
Get_Pwnam_Modify(x).
- Reworked smbd/chgpasswd.c to work with these mods, passing
around a 'struct passwd' rather than the modified username
---
This finishes this line of commits off, your tree should now compile again :-)
Andrew Bartlett
(This used to be commit c95f5aeb9327347674589ae313b75bee3bf8e317)
2001-10-29 10:35:11 +03:00
char * automount_lookup ( const char * user_name )
1998-02-20 22:48:01 +03:00
{
2002-11-13 02:20:50 +03:00
static fstring last_key = " " ;
static pstring last_value = " " ;
1998-02-20 22:48:01 +03:00
2002-11-13 02:20:50 +03:00
int nis_error ; /* returned by yp all functions */
char * nis_result ; /* yp_match inits this */
int nis_result_len ; /* and set this */
char * nis_domain ; /* yp_get_default_domain inits this */
char * nis_map = ( char * ) lp_nis_home_map_name ( ) ;
if ( ( nis_error = yp_get_default_domain ( & nis_domain ) ) ! = 0 ) {
DEBUG ( 3 , ( " YP Error: %s \n " , yperr_string ( nis_error ) ) ) ;
return last_value ;
}
DEBUG ( 5 , ( " NIS Domain: %s \n " , nis_domain ) ) ;
if ( ! strcmp ( user_name , last_key ) ) {
nis_result = last_value ;
nis_result_len = strlen ( last_value ) ;
nis_error = 0 ;
} else {
if ( ( nis_error = yp_match ( nis_domain , nis_map , user_name , strlen ( user_name ) ,
& nis_result , & nis_result_len ) ) = = 0 ) {
if ( ! nis_error & & nis_result_len > = sizeof ( pstring ) ) {
nis_result_len = sizeof ( pstring ) - 1 ;
}
fstrcpy ( last_key , user_name ) ;
strncpy ( last_value , nis_result , nis_result_len ) ;
last_value [ nis_result_len ] = ' \0 ' ;
strip_mount_options ( & last_value ) ;
} else if ( nis_error = = YPERR_KEY ) {
/* If Key lookup fails user home server is not in nis_map
use default information for server , and home directory */
last_value [ 0 ] = 0 ;
DEBUG ( 3 , ( " YP Key not found: while looking up \" %s \" in map \" %s \" \n " ,
user_name , nis_map ) ) ;
DEBUG ( 3 , ( " using defaults for server and home directory \n " ) ) ;
} else {
DEBUG ( 3 , ( " YP Error: \" %s \" while looking up \" %s \" in map \" %s \" \n " ,
yperr_string ( nis_error ) , user_name , nis_map ) ) ;
}
}
1998-07-16 04:06:29 +04:00
2002-11-13 02:20:50 +03:00
DEBUG ( 4 , ( " YP Lookup: %s resulted in %s \n " , user_name , last_value ) ) ;
return last_value ;
1998-02-20 22:48:01 +03:00
}
1998-08-08 05:15:14 +04:00
# endif /* WITH_NISPLUS_HOME */
1998-02-20 22:48:01 +03:00
# endif
1996-06-04 10:42:03 +04:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Are two IPs on the same subnet ?
1996-06-04 10:42:03 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1996-06-04 10:42:03 +04:00
BOOL same_net ( struct in_addr ip1 , struct in_addr ip2 , struct in_addr mask )
{
2002-11-13 02:20:50 +03:00
uint32 net1 , net2 , nmask ;
1996-06-04 10:42:03 +04:00
2002-11-13 02:20:50 +03:00
nmask = ntohl ( mask . s_addr ) ;
net1 = ntohl ( ip1 . s_addr ) ;
net2 = ntohl ( ip2 . s_addr ) ;
1996-06-04 10:42:03 +04:00
2002-11-13 02:20:50 +03:00
return ( ( net1 & nmask ) = = ( net2 & nmask ) ) ;
1996-06-04 10:42:03 +04:00
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
2002-11-13 02:20:50 +03:00
Check if a process exists . Does this work on all unixes ?
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-09-30 00:24:17 +04:00
1999-12-13 16:27:58 +03:00
BOOL process_exists ( pid_t pid )
1996-05-04 11:50:46 +04:00
{
2002-03-20 09:57:03 +03:00
/* Doing kill with a non-positive pid causes messages to be
* sent to places we don ' t want . */
SMB_ASSERT ( pid > 0 ) ;
1997-11-29 16:29:13 +03:00
return ( kill ( pid , 0 ) = = 0 | | errno ! = ESRCH ) ;
1996-05-04 11:50:46 +04:00
}
1999-12-13 16:27:58 +03:00
/*******************************************************************
2000-10-13 05:59:14 +04:00
Convert a uid into a user name .
1999-12-13 16:27:58 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2000-10-13 05:59:14 +04:00
2002-07-15 14:35:28 +04:00
const char * uidtoname ( uid_t uid )
1998-12-03 20:41:14 +03:00
{
2000-10-13 05:59:14 +04:00
static fstring name ;
struct passwd * pass ;
2002-07-15 14:35:28 +04:00
pass = getpwuid_alloc ( uid ) ;
if ( pass ) {
fstrcpy ( name , pass - > pw_name ) ;
passwd_free ( & pass ) ;
} else {
slprintf ( name , sizeof ( name ) - 1 , " %ld " , ( long int ) uid ) ;
}
return name ;
1999-12-13 16:27:58 +03:00
}
1998-12-03 20:41:14 +03:00
1999-02-03 03:49:24 +03:00
1996-05-04 11:50:46 +04:00
/*******************************************************************
2000-10-13 05:59:14 +04:00
Convert a gid into a group name .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-09-30 00:24:17 +04:00
char * gidtoname ( gid_t gid )
1996-05-04 11:50:46 +04:00
{
2000-10-13 05:59:14 +04:00
static fstring name ;
struct group * grp ;
grp = getgrgid ( gid ) ;
2002-07-15 14:35:28 +04:00
if ( grp )
return ( grp - > gr_name ) ;
1998-09-30 00:24:17 +04:00
slprintf ( name , sizeof ( name ) - 1 , " %d " , ( int ) gid ) ;
1998-07-29 07:08:05 +04:00
return ( name ) ;
1996-05-04 11:50:46 +04:00
}
1998-11-29 23:03:33 +03:00
/*******************************************************************
2002-07-15 14:35:28 +04:00
Convert a user name into a uid .
1998-11-29 23:03:33 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2000-10-13 05:59:14 +04:00
2003-07-10 18:12:37 +04:00
uid_t nametouid ( const char * name )
1998-11-29 23:03:33 +03:00
{
1999-12-13 16:27:58 +03:00
struct passwd * pass ;
char * p ;
uid_t u ;
2002-01-23 15:59:24 +03:00
pass = getpwnam_alloc ( name ) ;
if ( pass ) {
2002-07-15 14:35:28 +04:00
u = pass - > pw_uid ;
2002-01-23 15:59:24 +03:00
passwd_free ( & pass ) ;
2002-07-15 14:35:28 +04:00
return u ;
2002-01-23 15:59:24 +03:00
}
2002-07-15 14:35:28 +04:00
u = ( uid_t ) strtol ( name , & p , 0 ) ;
if ( ( p ! = name ) & & ( * p = = ' \0 ' ) )
return u ;
1999-12-13 16:27:58 +03:00
return ( uid_t ) - 1 ;
1998-11-29 23:03:33 +03:00
}
1998-10-04 13:42:51 +04:00
/*******************************************************************
2002-07-15 14:35:28 +04:00
Convert a name to a gid_t if possible . Return - 1 if not a group .
1998-10-04 13:42:51 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2000-10-13 05:59:14 +04:00
This commit is number 4 of 4.
In particular this commit focuses on:
Actually adding the 'const' to the passdb interface, and the flow-on changes.
Also kill off the 'disp_info' stuff, as its no longer used.
While these changes have been mildly tested, and are pretty small, any
assistance in this is appreciated.
----
These changes introduces a large dose of 'const' to the Samba tree.
There are a number of good reasons to do this:
- I want to allow the SAM_ACCOUNT structure to move from wasteful
pstrings and fstrings to allocated strings. We can't do that if
people are modifying these outputs, as they may well make
assumptions about getting pstrings and fstrings
- I want --with-pam_smbpass to compile with a slightly sane
volume of warnings, currently its pretty bad, even in 2.2
where is compiles at all.
- Tridge assures me that he no longer opposes 'const religion'
based on the ability to #define const the problem away.
- Changed Get_Pwnam(x,y) into two variants (so that the const
parameter can work correctly): - Get_Pwnam(const x) and
Get_Pwnam_Modify(x).
- Reworked smbd/chgpasswd.c to work with these mods, passing
around a 'struct passwd' rather than the modified username
---
This finishes this line of commits off, your tree should now compile again :-)
Andrew Bartlett
(This used to be commit c95f5aeb9327347674589ae313b75bee3bf8e317)
2001-10-29 10:35:11 +03:00
gid_t nametogid ( const char * name )
1998-10-04 13:42:51 +04:00
{
1999-12-13 16:27:58 +03:00
struct group * grp ;
char * p ;
gid_t g ;
2000-10-13 05:59:14 +04:00
g = ( gid_t ) strtol ( name , & p , 0 ) ;
2001-06-26 01:29:33 +04:00
if ( ( p ! = name ) & & ( * p = = ' \0 ' ) )
return g ;
1999-12-13 16:27:58 +03:00
2002-07-15 14:35:28 +04:00
grp = sys_getgrnam ( name ) ;
2001-06-26 01:29:33 +04:00
if ( grp )
return ( grp - > gr_gid ) ;
1999-12-13 16:27:58 +03:00
return ( gid_t ) - 1 ;
1998-10-04 13:42:51 +04:00
}
1996-05-04 11:50:46 +04:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Something really nasty happened - panic !
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2003-01-03 11:28:12 +03:00
void smb_panic ( const char * why )
1996-05-04 11:50:46 +04:00
{
2003-03-18 04:48:11 +03:00
char * cmd ;
2002-09-25 19:19:00 +04:00
int result ;
2003-04-16 18:51:02 +04:00
# ifdef HAVE_BACKTRACE_SYMBOLS
2003-04-15 01:49:49 +04:00
void * backtrace_stack [ BACKTRACE_STACK_SIZE ] ;
size_t backtrace_size ;
char * * backtrace_strings ;
2003-04-16 18:51:02 +04:00
# endif
2002-09-25 19:19:00 +04:00
2003-03-18 04:48:11 +03:00
# ifdef DEVELOPER
{
extern char * global_clobber_region_function ;
extern unsigned int global_clobber_region_line ;
2003-04-21 17:05:51 +04:00
2003-03-18 04:48:11 +03:00
if ( global_clobber_region_function ) {
DEBUG ( 0 , ( " smb_panic: clobber_region() last called from [%s(%u)] \n " ,
2003-04-21 17:05:51 +04:00
global_clobber_region_function ,
global_clobber_region_line ) ) ;
2003-03-18 04:48:11 +03:00
}
}
# endif
2003-04-21 17:05:51 +04:00
2003-03-18 04:48:11 +03:00
cmd = lp_panic_action ( ) ;
1998-08-21 15:37:40 +04:00
if ( cmd & & * cmd ) {
2002-09-25 19:19:00 +04:00
DEBUG ( 0 , ( " smb_panic(): calling panic action [%s] \n " , cmd ) ) ;
result = system ( cmd ) ;
if ( result = = - 1 )
DEBUG ( 0 , ( " smb_panic(): fork failed in panic action: %s \n " ,
2003-04-21 17:05:51 +04:00
strerror ( errno ) ) ) ;
2002-09-25 19:19:00 +04:00
else
DEBUG ( 0 , ( " smb_panic(): action returned status %d \n " ,
2003-04-21 17:05:51 +04:00
WEXITSTATUS ( result ) ) ) ;
1998-08-21 15:37:40 +04:00
}
1998-08-22 06:54:21 +04:00
DEBUG ( 0 , ( " PANIC: %s \n " , why ) ) ;
2003-04-15 01:49:49 +04:00
# ifdef HAVE_BACKTRACE_SYMBOLS
/* get the backtrace (stack frames) */
backtrace_size = backtrace ( backtrace_stack , BACKTRACE_STACK_SIZE ) ;
backtrace_strings = backtrace_symbols ( backtrace_stack , backtrace_size ) ;
DEBUG ( 0 , ( " BACKTRACE: %d stack frames: \n " , backtrace_size ) ) ;
if ( backtrace_strings ) {
2003-05-27 11:26:04 +04:00
int i ;
2003-04-15 01:49:49 +04:00
for ( i = 0 ; i < backtrace_size ; i + + )
DEBUGADD ( 0 , ( " #%u %s \n " , i , backtrace_strings [ i ] ) ) ;
SAFE_FREE ( backtrace_strings ) ;
}
# endif
1998-11-10 21:14:16 +03:00
dbgflush ( ) ;
1998-10-28 09:05:34 +03:00
abort ( ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
2003-04-21 17:05:51 +04:00
A readdir wrapper which just returns the file name .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2003-03-18 01:56:13 +03:00
const char * readdirname ( DIR * p )
1996-05-04 11:50:46 +04:00
{
1999-12-13 16:27:58 +03:00
SMB_STRUCT_DIRENT * ptr ;
1998-07-29 07:08:05 +04:00
char * dname ;
1996-05-04 11:50:46 +04:00
2002-11-13 02:20:50 +03:00
if ( ! p )
return ( NULL ) ;
1996-05-04 11:50:46 +04:00
1999-12-13 16:27:58 +03:00
ptr = ( SMB_STRUCT_DIRENT * ) sys_readdir ( p ) ;
2002-11-13 02:20:50 +03:00
if ( ! ptr )
return ( NULL ) ;
1996-05-04 11:50:46 +04:00
1998-07-29 07:08:05 +04:00
dname = ptr - > d_name ;
1996-05-04 11:50:46 +04:00
# ifdef NEXT2
2002-11-13 02:20:50 +03:00
if ( telldir ( p ) < 0 )
return ( NULL ) ;
1996-05-04 11:50:46 +04:00
# endif
1998-07-29 07:08:05 +04:00
# ifdef HAVE_BROKEN_READDIR
/* using /usr/ucb/cc is BAD */
dname = dname - 2 ;
1996-05-04 11:50:46 +04:00
# endif
1998-07-29 07:08:05 +04:00
{
static pstring buf ;
2001-05-07 09:19:52 +04:00
int len = NAMLEN ( ptr ) ;
memcpy ( buf , dname , len ) ;
buf [ len ] = 0 ;
1998-07-29 07:08:05 +04:00
dname = buf ;
}
1997-07-04 00:45:06 +04:00
1998-07-29 07:08:05 +04:00
return ( dname ) ;
1996-05-04 11:50:46 +04:00
}
1997-09-30 06:38:19 +04:00
/*******************************************************************
Utility function used to decide if the last component
of a path matches a ( possibly wildcarded ) entry in a namelist .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1996-05-04 11:50:46 +04:00
2003-01-03 11:28:12 +03:00
BOOL is_in_path ( const char * name , name_compare_entry * namelist )
1996-12-10 21:03:44 +03:00
{
2002-11-13 02:20:50 +03:00
pstring last_component ;
char * p ;
DEBUG ( 8 , ( " is_in_path: %s \n " , name ) ) ;
/* if we have no list it's obviously not in the path */
if ( ( namelist = = NULL ) | | ( ( namelist ! = NULL ) & & ( namelist [ 0 ] . name = = NULL ) ) ) {
DEBUG ( 8 , ( " is_in_path: no name list. \n " ) ) ;
return False ;
}
/* Get the last component of the unix name. */
p = strrchr_m ( name , ' / ' ) ;
strncpy ( last_component , p ? + + p : name , sizeof ( last_component ) - 1 ) ;
last_component [ sizeof ( last_component ) - 1 ] = ' \0 ' ;
for ( ; namelist - > name ! = NULL ; namelist + + ) {
if ( namelist - > is_wild ) {
if ( mask_match ( last_component , namelist - > name , case_sensitive ) ) {
DEBUG ( 8 , ( " is_in_path: mask match succeeded \n " ) ) ;
return True ;
}
} else {
if ( ( case_sensitive & & ( strcmp ( last_component , namelist - > name ) = = 0 ) ) | |
( ! case_sensitive & & ( StrCaseCmp ( last_component , namelist - > name ) = = 0 ) ) ) {
DEBUG ( 8 , ( " is_in_path: match succeeded \n " ) ) ;
return True ;
}
}
}
DEBUG ( 8 , ( " is_in_path: match not found \n " ) ) ;
1997-08-26 02:18:31 +04:00
2002-11-13 02:20:50 +03:00
return False ;
1997-07-24 21:25:11 +04:00
}
1997-07-06 17:48:10 +04:00
1997-09-30 06:38:19 +04:00
/*******************************************************************
Strip a ' / ' separated list into an array of
name_compare_enties structures suitable for
passing to is_in_path ( ) . We do this for
speed so we can pre - parse all the names in the list
and don ' t do it for each call to is_in_path ( ) .
namelist is modified here and is assumed to be
a copy owned by the caller .
We also check if the entry contains a wildcard to
remove a potentially expensive call to mask_match
if possible .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1997-07-24 21:25:11 +04:00
void set_namearray ( name_compare_entry * * ppname_array , char * namelist )
{
2002-11-13 02:20:50 +03:00
char * name_end ;
char * nameptr = namelist ;
int num_entries = 0 ;
int i ;
1997-07-24 21:25:11 +04:00
2002-11-13 02:20:50 +03:00
( * ppname_array ) = NULL ;
1997-07-24 21:25:11 +04:00
2002-11-13 02:20:50 +03:00
if ( ( nameptr = = NULL ) | | ( ( nameptr ! = NULL ) & & ( * nameptr = = ' \0 ' ) ) )
return ;
1997-07-24 21:25:11 +04:00
2002-11-13 02:20:50 +03:00
/* We need to make two passes over the string. The
first to count the number of elements , the second
to split it .
*/
1997-07-24 21:25:11 +04:00
2002-11-13 02:20:50 +03:00
while ( * nameptr ) {
if ( * nameptr = = ' / ' ) {
/* cope with multiple (useless) /s) */
nameptr + + ;
continue ;
}
/* find the next / */
name_end = strchr_m ( nameptr , ' / ' ) ;
1997-07-24 21:25:11 +04:00
2002-11-13 02:20:50 +03:00
/* oops - the last check for a / didn't find one. */
if ( name_end = = NULL )
break ;
/* next segment please */
nameptr = name_end + 1 ;
num_entries + + ;
}
if ( num_entries = = 0 )
return ;
if ( ( ( * ppname_array ) = ( name_compare_entry * ) malloc (
( num_entries + 1 ) * sizeof ( name_compare_entry ) ) ) = = NULL ) {
DEBUG ( 0 , ( " set_namearray: malloc fail \n " ) ) ;
return ;
}
/* Now copy out the names */
nameptr = namelist ;
i = 0 ;
while ( * nameptr ) {
if ( * nameptr = = ' / ' ) {
/* cope with multiple (useless) /s) */
nameptr + + ;
continue ;
}
/* find the next / */
if ( ( name_end = strchr_m ( nameptr , ' / ' ) ) ! = NULL )
* name_end = 0 ;
/* oops - the last check for a / didn't find one. */
if ( name_end = = NULL )
break ;
( * ppname_array ) [ i ] . is_wild = ms_has_wild ( nameptr ) ;
if ( ( ( * ppname_array ) [ i ] . name = strdup ( nameptr ) ) = = NULL ) {
DEBUG ( 0 , ( " set_namearray: malloc fail (1) \n " ) ) ;
return ;
}
/* next segment please */
nameptr = name_end + 1 ;
i + + ;
}
1997-08-26 02:18:31 +04:00
2002-11-13 02:20:50 +03:00
( * ppname_array ) [ i ] . name = NULL ;
1996-12-10 21:03:44 +03:00
2002-11-13 02:20:50 +03:00
return ;
1997-07-08 20:54:44 +04:00
}
1997-07-24 21:25:11 +04:00
/****************************************************************************
2002-11-13 02:20:50 +03:00
Routine to free a namearray .
1997-07-24 21:25:11 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void free_namearray ( name_compare_entry * name_array )
1997-07-08 20:54:44 +04:00
{
2003-01-24 22:19:25 +03:00
int i ;
2002-11-13 02:20:50 +03:00
if ( name_array = = NULL )
return ;
1997-07-24 21:25:11 +04:00
2003-01-24 22:19:25 +03:00
for ( i = 0 ; name_array [ i ] . name ! = NULL ; i + + )
SAFE_FREE ( name_array [ i ] . name ) ;
2002-11-13 02:20:50 +03:00
SAFE_FREE ( name_array ) ;
1997-07-08 20:54:44 +04:00
}
1999-12-13 16:27:58 +03:00
/****************************************************************************
2000-05-02 07:20:47 +04:00
Simple routine to do POSIX file locking . Cruft in NFS and 64 - > 32 bit mapping
is dealt with in posix . c
1996-12-10 21:03:44 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1999-12-13 16:27:58 +03:00
1998-09-04 04:23:28 +04:00
BOOL fcntl_lock ( int fd , int op , SMB_OFF_T offset , SMB_OFF_T count , int type )
1996-12-10 21:03:44 +03:00
{
2002-11-13 02:20:50 +03:00
SMB_STRUCT_FLOCK lock ;
int ret ;
2000-04-13 03:01:11 +04:00
2002-11-13 02:20:50 +03:00
DEBUG ( 8 , ( " fcntl_lock %d %d %.0f %.0f %d \n " , fd , op , ( double ) offset , ( double ) count , type ) ) ;
1996-12-10 21:03:44 +03:00
2002-11-13 02:20:50 +03:00
lock . l_type = type ;
lock . l_whence = SEEK_SET ;
lock . l_start = offset ;
lock . l_len = count ;
lock . l_pid = 0 ;
1996-12-10 21:03:44 +03:00
2002-11-13 02:20:50 +03:00
ret = sys_fcntl_ptr ( fd , op , & lock ) ;
1996-12-10 21:03:44 +03:00
2002-11-13 02:20:50 +03:00
if ( ret = = - 1 & & errno ! = 0 )
DEBUG ( 3 , ( " fcntl_lock: fcntl lock gave errno %d (%s) \n " , errno , strerror ( errno ) ) ) ;
1996-12-10 21:03:44 +03:00
2002-11-13 02:20:50 +03:00
/* a lock query */
if ( op = = SMB_F_GETLK ) {
if ( ( ret ! = - 1 ) & &
( lock . l_type ! = F_UNLCK ) & &
( lock . l_pid ! = 0 ) & &
( lock . l_pid ! = sys_getpid ( ) ) ) {
DEBUG ( 3 , ( " fcntl_lock: fd %d is locked by pid %d \n " , fd , ( int ) lock . l_pid ) ) ;
return ( True ) ;
}
1996-12-10 21:03:44 +03:00
2002-11-13 02:20:50 +03:00
/* it must be not locked or locked by me */
return ( False ) ;
}
1998-09-04 04:23:28 +04:00
2002-11-13 02:20:50 +03:00
/* a lock set or unset */
if ( ret = = - 1 ) {
DEBUG ( 3 , ( " fcntl_lock: lock failed at offset %.0f count %.0f op %d type %d (%s) \n " ,
( double ) offset , ( double ) count , op , type , strerror ( errno ) ) ) ;
return ( False ) ;
}
1998-09-04 04:23:28 +04:00
2002-11-13 02:20:50 +03:00
/* everything went OK */
DEBUG ( 8 , ( " fcntl_lock: Lock call successful \n " ) ) ;
1996-12-10 21:03:44 +03:00
2002-11-13 02:20:50 +03:00
return ( True ) ;
1996-12-10 21:03:44 +03:00
}
1997-07-31 22:47:26 +04:00
/*******************************************************************
2002-07-15 14:35:28 +04:00
Is the name specified one of my netbios names .
Returns true if it is equal , false otherwise .
1997-07-31 22:47:26 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-07-15 14:35:28 +04:00
2002-11-13 02:20:50 +03:00
BOOL is_myname ( const char * s )
1997-07-31 22:47:26 +04:00
{
2002-07-15 14:35:28 +04:00
int n ;
BOOL ret = False ;
1997-07-31 22:47:26 +04:00
2002-11-13 02:20:50 +03:00
for ( n = 0 ; my_netbios_names ( n ) ; n + + ) {
if ( strequal ( my_netbios_names ( n ) , s ) ) {
2002-07-15 14:35:28 +04:00
ret = True ;
2002-11-13 02:20:50 +03:00
break ;
}
2002-07-15 14:35:28 +04:00
}
DEBUG ( 8 , ( " is_myname( \" %s \" ) returns %d \n " , s , ret ) ) ;
return ( ret ) ;
}
/********************************************************************
Return only the first IP address of our configured interfaces
as a string
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
const char * get_my_primary_ip ( void )
{
static fstring ip_string ;
int n ;
struct iface_struct nics [ MAX_INTERFACES ] ;
if ( ( n = get_interfaces ( nics , MAX_INTERFACES ) ) < = 0 )
return NULL ;
fstrcpy ( ip_string , inet_ntoa ( nics [ 0 ] . ip ) ) ;
return ip_string ;
1997-07-31 22:47:26 +04:00
}
1997-09-05 00:26:07 +04:00
2002-11-13 02:20:50 +03:00
BOOL is_myname_or_ipaddr ( const char * s )
2001-11-29 00:51:11 +03:00
{
/* optimize for the common case */
2002-11-13 02:20:50 +03:00
if ( strequal ( s , global_myname ( ) ) )
2001-11-29 00:51:11 +03:00
return True ;
/* maybe its an IP address? */
2002-07-15 14:35:28 +04:00
if ( is_ipaddress ( s ) ) {
2001-11-29 00:51:11 +03:00
struct iface_struct nics [ MAX_INTERFACES ] ;
int i , n ;
uint32 ip ;
ip = interpret_addr ( s ) ;
if ( ( ip = = 0 ) | | ( ip = = 0xffffffff ) )
return False ;
n = get_interfaces ( nics , MAX_INTERFACES ) ;
for ( i = 0 ; i < n ; i + + ) {
if ( ip = = nics [ i ] . ip . s_addr )
return True ;
}
}
/* check for an alias */
2002-11-13 02:20:50 +03:00
if ( is_myname ( s ) )
return True ;
2001-11-29 00:51:11 +03:00
/* no match */
return False ;
}
2003-02-24 06:09:08 +03:00
/*******************************************************************
Is the name specified our workgroup / domain .
Returns true if it is equal , false otherwise .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL is_myworkgroup ( const char * s )
{
BOOL ret = False ;
if ( strequal ( s , lp_workgroup ( ) ) ) {
ret = True ;
}
DEBUG ( 8 , ( " is_myworkgroup( \" %s \" ) returns %d \n " , s , ret ) ) ;
return ( ret ) ;
}
2003-03-15 02:06:06 +03:00
/*******************************************************************
we distinguish between 2 K and XP by the " Native Lan Manager " string
WinXP = > " Windows 2002 5.1 "
Win2k = > " Windows 2000 5.0 "
NT4 = > " Windows NT 4.0 "
Win9x = > " Windows 4.0 "
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void ra_lanman_string ( const char * native_lanman )
{
if ( 0 = = strcmp ( native_lanman , " Windows 2002 5.1 " ) )
set_remote_arch ( RA_WINXP ) ;
else if ( 0 = = strcmp ( native_lanman , " Windows .NET 5.2 " ) )
set_remote_arch ( RA_WIN2K3 ) ;
}
1997-09-05 00:26:07 +04:00
/*******************************************************************
2002-07-15 14:35:28 +04:00
Set the horrid remote_arch string based on an enum .
1997-09-05 00:26:07 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-07-15 14:35:28 +04:00
1997-09-05 00:26:07 +04:00
void set_remote_arch ( enum remote_arch_types type )
{
2002-07-15 14:35:28 +04:00
extern fstring remote_arch ;
ra_type = type ;
switch ( type ) {
case RA_WFWG :
fstrcpy ( remote_arch , " WfWg " ) ;
return ;
case RA_OS2 :
fstrcpy ( remote_arch , " OS2 " ) ;
return ;
case RA_WIN95 :
fstrcpy ( remote_arch , " Win95 " ) ;
return ;
case RA_WINNT :
fstrcpy ( remote_arch , " WinNT " ) ;
return ;
case RA_WIN2K :
fstrcpy ( remote_arch , " Win2K " ) ;
return ;
2003-02-28 00:22:36 +03:00
case RA_WINXP :
fstrcpy ( remote_arch , " WinXP " ) ;
return ;
2003-03-12 18:41:39 +03:00
case RA_WIN2K3 :
fstrcpy ( remote_arch , " Win2K3 " ) ;
return ;
2002-07-15 14:35:28 +04:00
case RA_SAMBA :
fstrcpy ( remote_arch , " Samba " ) ;
return ;
default :
ra_type = RA_UNKNOWN ;
fstrcpy ( remote_arch , " UNKNOWN " ) ;
break ;
}
1997-09-05 00:26:07 +04:00
}
/*******************************************************************
Get the remote_arch type .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-07-15 14:35:28 +04:00
1998-04-13 23:24:06 +04:00
enum remote_arch_types get_remote_arch ( void )
1997-09-05 00:26:07 +04:00
{
2002-07-15 14:35:28 +04:00
return ra_type ;
1997-09-05 00:26:07 +04:00
}
1997-09-26 22:55:29 +04:00
2001-07-07 11:00:15 +04:00
void print_asc ( int level , const unsigned char * buf , int len )
1997-10-11 19:10:57 +04:00
{
int i ;
for ( i = 0 ; i < len ; i + + )
1999-12-13 16:27:58 +03:00
DEBUG ( level , ( " %c " , isprint ( buf [ i ] ) ? buf [ i ] : ' . ' ) ) ;
1997-10-11 19:10:57 +04:00
}
2001-07-07 11:00:15 +04:00
void dump_data ( int level , const char * buf1 , int len )
1997-10-11 19:10:57 +04:00
{
2002-09-25 19:19:00 +04:00
const unsigned char * buf = ( const unsigned char * ) buf1 ;
int i = 0 ;
if ( len < = 0 ) return ;
if ( ! DEBUGLVL ( level ) ) return ;
DEBUGADD ( level , ( " [%03X] " , i ) ) ;
for ( i = 0 ; i < len ; ) {
DEBUGADD ( level , ( " %02X " , ( int ) buf [ i ] ) ) ;
i + + ;
if ( i % 8 = = 0 ) DEBUGADD ( level , ( " " ) ) ;
if ( i % 16 = = 0 ) {
print_asc ( level , & buf [ i - 16 ] , 8 ) ; DEBUGADD ( level , ( " " ) ) ;
print_asc ( level , & buf [ i - 8 ] , 8 ) ; DEBUGADD ( level , ( " \n " ) ) ;
if ( i < len ) DEBUGADD ( level , ( " [%03X] " , i ) ) ;
}
}
if ( i % 16 ) {
int n ;
n = 16 - ( i % 16 ) ;
DEBUGADD ( level , ( " " ) ) ;
if ( n > 8 ) DEBUGADD ( level , ( " " ) ) ;
while ( n - - ) DEBUGADD ( level , ( " " ) ) ;
n = MIN ( 8 , i % 16 ) ;
print_asc ( level , & buf [ i - ( i % 16 ) ] , n ) ; DEBUGADD ( level , ( " " ) ) ;
n = ( i % 16 ) - n ;
if ( n > 0 ) print_asc ( level , & buf [ i - n ] , n ) ;
DEBUGADD ( level , ( " \n " ) ) ;
}
1997-10-11 19:10:57 +04:00
}
1997-10-12 15:46:42 +04:00
Jeremy requested that I get my NTLMSSP patch into CVS. He didn't request
the schannel code, but I've included that anyway. :-)
This patch revives the client-side NTLMSSP support for RPC named pipes
in Samba, and cleans up the client and server schannel code. The use of the
new code is enabled by the 'sign', 'seal' and 'schannel' commands in
rpcclient.
The aim was to prove that our separate NTLMSSP client library actually
implements NTLMSSP signing and sealing as per Microsoft's NTLMv1 implementation,
in the hope that knowing this will assist us in correctly implementing
NTLMSSP signing for SMB packets. (Still not yet functional)
This patch replaces the NTLMSSP implementation in rpc_client/cli_pipe.c with
calls to libsmb/ntlmssp.c. In the process, we have gained the ability to
use the more secure NT password, and the ability to sign-only, instead of
having to seal the pipe connection. (Previously we were limited to sealing,
and could only use the LM-password derived key).
Our new client-side NTLMSSP code also needed alteration to cope with our
comparatively simple server-side implementation. A future step is to replace
it with calls to the same NTLMSSP library.
Also included in this patch is the schannel 'sign only' patch I submitted to
the team earlier. While not enabled (and not functional, at this stage) the
work in this patch makes the code paths *much* easier to follow. I have also
included similar hooks in rpccleint to allow the use of schannel on *any* pipe.
rpcclient now defaults to not using schannel (or any other extra per-pipe
authenticiation) for any connection. The 'schannel' command enables schannel
for all pipes until disabled.
This code is also much more secure than the previous code, as changes to our
cli_pipe routines ensure that the authentication footer cannot be removed
by an attacker, and more error states are correctly handled.
(The same needs to be done to our server)
Andrew Bartlett
(This used to be commit 5472ddc9eaf4e79c5b2e1c8ee8c7f190dc285f19)
2003-07-14 12:46:32 +04:00
void dump_data_pw ( const char * msg , const uchar * data , size_t len )
{
# ifdef DEBUG_PASSWORD
DEBUG ( 11 , ( " %s " , msg ) ) ;
if ( data ! = NULL & & len > 0 )
{
dump_data ( 11 , data , len ) ;
}
# endif
}
1997-10-12 15:46:42 +04:00
char * tab_depth ( int depth )
{
static pstring spaces ;
memset ( spaces , ' ' , depth * 4 ) ;
spaces [ depth * 4 ] = 0 ;
return spaces ;
}
1997-10-20 20:25:19 +04:00
1998-08-14 21:38:29 +04:00
/*****************************************************************************
2002-11-13 02:20:50 +03:00
Provide a checksum on a string
Input : s - the null - terminated character string for which the checksum
will be calculated .
Output : The checksum value calculated for s .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-10-03 17:12:08 +04:00
int str_checksum ( const char * s )
1998-08-14 21:38:29 +04:00
{
int res = 0 ;
int c ;
int i = 0 ;
while ( * s ) {
c = * s ;
res ^ = ( c < < ( i % 15 ) ) ^ ( c > > ( 15 - ( i % 15 ) ) ) ;
s + + ;
i + + ;
}
return ( res ) ;
2002-11-13 02:20:50 +03:00
}
1998-08-30 08:31:55 +04:00
/*****************************************************************
2002-11-13 02:20:50 +03:00
Zero a memory area then free it . Used to catch bugs faster .
1998-08-30 08:31:55 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1998-09-11 05:24:30 +04:00
void zero_free ( void * p , size_t size )
1998-08-30 08:31:55 +04:00
{
memset ( p , 0 , size ) ;
2001-09-17 06:19:44 +04:00
SAFE_FREE ( p ) ;
1998-08-30 08:31:55 +04:00
}
1998-10-04 19:54:04 +04:00
1998-10-05 05:57:03 +04:00
/*****************************************************************
2002-11-13 02:20:50 +03:00
Set our open file limit to a requested max and return the limit .
1998-10-05 05:57:03 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
1998-10-16 10:16:10 +04:00
int set_maxfiles ( int requested_max )
1998-10-05 05:57:03 +04:00
{
# if (defined(HAVE_GETRLIMIT) && defined(RLIMIT_NOFILE))
struct rlimit rlp ;
1999-12-13 16:27:58 +03:00
int saved_current_limit ;
if ( getrlimit ( RLIMIT_NOFILE , & rlp ) ) {
DEBUG ( 0 , ( " set_maxfiles: getrlimit (1) for RLIMIT_NOFILE failed with error %s \n " ,
strerror ( errno ) ) ) ;
/* just guess... */
return requested_max ;
}
/*
2002-11-13 02:20:50 +03:00
* Set the fd limit to be real_max_open_files + MAX_OPEN_FUDGEFACTOR to
1998-10-19 21:32:10 +04:00
* account for the extra fd we need
* as well as the log files and standard
1999-12-13 16:27:58 +03:00
* handles etc . Save the limit we want to set in case
* we are running on an OS that doesn ' t support this limit ( AIX )
* which always returns RLIM_INFINITY for rlp . rlim_max .
*/
2001-04-13 23:33:26 +04:00
/* Try raising the hard (max) limit to the requested amount. */
# if defined(RLIM_INFINITY)
if ( rlp . rlim_max ! = RLIM_INFINITY ) {
int orig_max = rlp . rlim_max ;
if ( rlp . rlim_max < requested_max )
rlp . rlim_max = requested_max ;
/* This failing is not an error - many systems (Linux) don't
support our default request of 10 , 000 open files . JRA . */
if ( setrlimit ( RLIMIT_NOFILE , & rlp ) ) {
DEBUG ( 3 , ( " set_maxfiles: setrlimit for RLIMIT_NOFILE for %d max files failed with error %s \n " ,
( int ) rlp . rlim_max , strerror ( errno ) ) ) ;
/* Set failed - restore original value from get. */
rlp . rlim_max = orig_max ;
}
}
# endif
/* Now try setting the soft (current) limit. */
1999-12-13 16:27:58 +03:00
saved_current_limit = rlp . rlim_cur = MIN ( requested_max , rlp . rlim_max ) ;
if ( setrlimit ( RLIMIT_NOFILE , & rlp ) ) {
DEBUG ( 0 , ( " set_maxfiles: setrlimit for RLIMIT_NOFILE for %d files failed with error %s \n " ,
( int ) rlp . rlim_cur , strerror ( errno ) ) ) ;
/* just guess... */
return saved_current_limit ;
}
if ( getrlimit ( RLIMIT_NOFILE , & rlp ) ) {
DEBUG ( 0 , ( " set_maxfiles: getrlimit (2) for RLIMIT_NOFILE failed with error %s \n " ,
strerror ( errno ) ) ) ;
/* just guess... */
return saved_current_limit ;
}
# if defined(RLIM_INFINITY)
if ( rlp . rlim_cur = = RLIM_INFINITY )
return saved_current_limit ;
# endif
2002-11-13 02:20:50 +03:00
if ( ( int ) rlp . rlim_cur > saved_current_limit )
1999-12-13 16:27:58 +03:00
return saved_current_limit ;
1998-10-05 05:57:03 +04:00
return rlp . rlim_cur ;
1999-12-13 16:27:58 +03:00
# else /* !defined(HAVE_GETRLIMIT) || !defined(RLIMIT_NOFILE) */
1998-10-16 10:16:10 +04:00
/*
* No way to know - just guess . . .
*/
return requested_max ;
1998-10-05 05:57:03 +04:00
# endif
}
1998-11-11 17:23:55 +03:00
/*****************************************************************
2002-11-13 02:20:50 +03:00
Splits out the start of the key ( HKLM or HKU ) and the rest of the key .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL reg_split_key ( const char * full_keyname , uint32 * reg_type , char * key_name )
1998-11-11 17:23:55 +03:00
{
pstring tmp ;
1999-12-13 16:27:58 +03:00
if ( ! next_token ( & full_keyname , tmp , " \\ " , sizeof ( tmp ) ) )
1998-11-11 17:23:55 +03:00
return False ;
( * reg_type ) = 0 ;
DEBUG ( 10 , ( " reg_split_key: hive %s \n " , tmp ) ) ;
1999-12-13 16:27:58 +03:00
if ( strequal ( tmp , " HKLM " ) | | strequal ( tmp , " HKEY_LOCAL_MACHINE " ) )
1998-11-11 17:23:55 +03:00
( * reg_type ) = HKEY_LOCAL_MACHINE ;
else if ( strequal ( tmp , " HKU " ) | | strequal ( tmp , " HKEY_USERS " ) )
( * reg_type ) = HKEY_USERS ;
2002-11-13 02:20:50 +03:00
else {
1998-11-11 17:23:55 +03:00
DEBUG ( 10 , ( " reg_split_key: unrecognised hive key %s \n " , tmp ) ) ;
return False ;
}
2001-06-21 13:10:42 +04:00
if ( next_token ( & full_keyname , tmp , " \n \r " , sizeof ( tmp ) ) )
1998-11-11 17:23:55 +03:00
fstrcpy ( key_name , tmp ) ;
else
key_name [ 0 ] = 0 ;
DEBUG ( 10 , ( " reg_split_key: name %s \n " , key_name ) ) ;
return True ;
}
1998-11-12 10:06:48 +03:00
2001-04-12 03:19:08 +04:00
/*****************************************************************
2002-11-13 02:20:50 +03:00
Possibly replace mkstemp if it is broken .
2001-04-12 03:19:08 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2001-04-12 03:19:08 +04:00
int smb_mkstemp ( char * template )
{
# if HAVE_SECURE_MKSTEMP
return mkstemp ( template ) ;
# else
/* have a reasonable go at emulating it. Hope that
2001-04-18 09:12:46 +04:00
the system mktemp ( ) isn ' t completly hopeless */
char * p = mktemp ( template ) ;
2002-11-13 02:20:50 +03:00
if ( ! p )
return - 1 ;
2001-04-13 04:37:00 +04:00
return open ( p , O_CREAT | O_EXCL | O_RDWR , 0600 ) ;
2001-04-12 03:19:08 +04:00
# endif
}
1999-12-12 23:03:42 +03:00
2002-07-15 14:35:28 +04:00
/*****************************************************************
2001-10-22 06:34:41 +04:00
malloc that aborts with smb_panic on fail or zero size .
2002-07-15 14:35:28 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-20 09:38:09 +03:00
void * smb_xmalloc ( size_t size )
2001-10-22 06:34:41 +04:00
{
void * p ;
if ( size = = 0 )
2001-11-20 09:38:09 +03:00
smb_panic ( " smb_xmalloc: called with zero size. \n " ) ;
2003-03-22 16:47:42 +03:00
if ( ( p = malloc ( size ) ) = = NULL ) {
DEBUG ( 0 , ( " smb_xmalloc() failed to allocate %lu bytes \n " , ( unsigned long ) size ) ) ;
2001-11-20 09:38:09 +03:00
smb_panic ( " smb_xmalloc: malloc fail. \n " ) ;
2003-03-22 16:47:42 +03:00
}
2001-10-22 06:34:41 +04:00
return p ;
}
2001-11-20 09:38:09 +03:00
/**
2001-10-22 06:34:41 +04:00
Memdup with smb_panic on fail .
2001-11-20 09:38:09 +03:00
* */
2002-11-13 02:20:50 +03:00
2001-11-20 09:38:09 +03:00
void * smb_xmemdup ( const void * p , size_t size )
2001-10-22 06:34:41 +04:00
{
void * p2 ;
2001-11-20 09:38:09 +03:00
p2 = smb_xmalloc ( size ) ;
2001-10-22 06:34:41 +04:00
memcpy ( p2 , p , size ) ;
return p2 ;
}
2001-11-20 09:38:09 +03:00
/**
2001-10-22 06:38:45 +04:00
strdup that aborts on malloc fail .
2001-11-20 09:38:09 +03:00
* */
2002-11-13 02:20:50 +03:00
2001-11-20 09:38:09 +03:00
char * smb_xstrdup ( const char * s )
2001-10-22 06:38:45 +04:00
{
char * s1 = strdup ( s ) ;
if ( ! s1 )
2001-11-20 09:38:09 +03:00
smb_panic ( " smb_xstrdup: malloc fail \n " ) ;
2001-10-22 06:38:45 +04:00
return s1 ;
}
2002-09-25 19:19:00 +04:00
/**
strndup that aborts on malloc fail .
* */
2002-11-13 02:20:50 +03:00
2002-09-25 19:19:00 +04:00
char * smb_xstrndup ( const char * s , size_t n )
{
char * s1 = strndup ( s , n ) ;
if ( ! s1 )
smb_panic ( " smb_xstrndup: malloc fail \n " ) ;
return s1 ;
}
2001-12-10 02:56:07 +03:00
/*
vasprintf that aborts on malloc fail
*/
2002-11-13 02:20:50 +03:00
2003-01-03 06:24:23 +03:00
int smb_xvasprintf ( char * * ptr , const char * format , va_list ap )
2001-12-10 02:56:07 +03:00
{
int n ;
2002-07-15 14:35:28 +04:00
va_list ap2 ;
VA_COPY ( ap2 , ap ) ;
n = vasprintf ( ptr , format , ap2 ) ;
2002-11-13 02:20:50 +03:00
if ( n = = - 1 | | ! * ptr )
2001-12-10 02:56:07 +03:00
smb_panic ( " smb_xvasprintf: out of memory " ) ;
return n ;
}
1999-12-13 16:27:58 +03:00
/*****************************************************************
2002-11-13 02:20:50 +03:00
Like strdup but for memory .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-10-30 01:14:17 +03:00
void * memdup ( const void * p , size_t size )
1999-12-12 23:03:42 +03:00
{
1999-12-13 16:27:58 +03:00
void * p2 ;
2002-11-13 02:20:50 +03:00
if ( size = = 0 )
return NULL ;
1999-12-13 16:27:58 +03:00
p2 = malloc ( size ) ;
2002-11-13 02:20:50 +03:00
if ( ! p2 )
return NULL ;
1999-12-13 16:27:58 +03:00
memcpy ( p2 , p , size ) ;
return p2 ;
1999-12-12 23:03:42 +03:00
}
1999-12-13 16:27:58 +03:00
/*****************************************************************
2002-11-13 02:20:50 +03:00
Get local hostname and cache result .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1999-12-13 16:27:58 +03:00
char * myhostname ( void )
1999-12-12 23:03:42 +03:00
{
1999-12-13 16:27:58 +03:00
static pstring ret ;
2002-11-13 02:20:50 +03:00
if ( ret [ 0 ] = = 0 )
1999-12-13 16:27:58 +03:00
get_myname ( ret ) ;
return ret ;
1999-12-12 23:03:42 +03:00
}
1999-12-21 12:25:59 +03:00
/*****************************************************************
2002-11-13 02:20:50 +03:00
A useful function for returning a path in the Samba lock directory .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-07-15 14:35:28 +04:00
char * lock_path ( const char * name )
1999-12-21 12:25:59 +03:00
{
static pstring fname ;
pstrcpy ( fname , lp_lockdir ( ) ) ;
trim_string ( fname , " " , " / " ) ;
2002-11-13 02:20:50 +03:00
if ( ! directory_exist ( fname , NULL ) )
1999-12-21 12:25:59 +03:00
mkdir ( fname , 0755 ) ;
pstrcat ( fname , " / " ) ;
pstrcat ( fname , name ) ;
return fname ;
}
2000-01-14 04:41:04 +03:00
2002-07-15 14:35:28 +04:00
/*****************************************************************
2002-11-13 02:20:50 +03:00
A useful function for returning a path in the Samba pid directory .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-07-15 14:35:28 +04:00
char * pid_path ( const char * name )
{
static pstring fname ;
pstrcpy ( fname , lp_piddir ( ) ) ;
trim_string ( fname , " " , " / " ) ;
2002-11-13 02:20:50 +03:00
if ( ! directory_exist ( fname , NULL ) )
2002-07-15 14:35:28 +04:00
mkdir ( fname , 0755 ) ;
pstrcat ( fname , " / " ) ;
pstrcat ( fname , name ) ;
return fname ;
}
2001-11-19 06:35:27 +03:00
/**
* @ brief Returns an absolute path to a file in the Samba lib directory .
*
* @ param name File to find , relative to LIBDIR .
*
* @ retval Pointer to a static # pstring containing the full path .
* */
2002-11-13 02:20:50 +03:00
2002-07-15 14:35:28 +04:00
char * lib_path ( const char * name )
2001-10-03 16:18:20 +04:00
{
static pstring fname ;
2003-07-23 16:33:59 +04:00
fstr_sprintf ( fname , " %s/%s " , dyn_LIBDIR , name ) ;
2001-10-03 16:18:20 +04:00
return fname ;
}
2003-02-14 03:48:28 +03:00
/**
* @ brief Returns the platform specific shared library extension .
*
* @ retval Pointer to a static # fstring containing the extension .
* */
const char * shlib_ext ( void )
{
return dyn_SHLIBEXT ;
}
2000-01-14 04:41:04 +03:00
/*******************************************************************
Given a filename - get its directory name
NB : Returned in static storage . Caveats :
o Not safe in thread environment .
o Caller must not free .
o If caller wishes to preserve , they should copy .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
char * parent_dirname ( const char * path )
{
static pstring dirpath ;
char * p ;
if ( ! path )
return ( NULL ) ;
pstrcpy ( dirpath , path ) ;
2001-07-04 11:36:09 +04:00
p = strrchr_m ( dirpath , ' / ' ) ; /* Find final '/', if any */
2000-01-14 04:41:04 +03:00
if ( ! p ) {
pstrcpy ( dirpath , " . " ) ; /* No final "/", so dir is "." */
} else {
if ( p = = dirpath )
+ + p ; /* For root "/", leave "/" in place */
* p = ' \0 ' ;
}
return dirpath ;
}
2000-04-24 15:30:24 +04:00
2000-04-30 15:04:28 +04:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
Determine if a pattern contains any Microsoft wildcard characters .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2000-04-30 15:04:28 +04:00
BOOL ms_has_wild ( char * s )
{
char c ;
while ( ( c = * s + + ) ) {
switch ( c ) {
case ' * ' :
case ' ? ' :
case ' < ' :
case ' > ' :
case ' " ' :
return True ;
}
}
return False ;
}
2001-11-04 21:26:53 +03:00
BOOL ms_has_wild_w ( const smb_ucs2_t * s )
{
smb_ucs2_t c ;
2002-01-27 19:37:12 +03:00
if ( ! s ) return False ;
2001-11-04 21:26:53 +03:00
while ( ( c = * s + + ) ) {
switch ( c ) {
case UCS2_CHAR ( ' * ' ) :
case UCS2_CHAR ( ' ? ' ) :
case UCS2_CHAR ( ' < ' ) :
case UCS2_CHAR ( ' > ' ) :
case UCS2_CHAR ( ' " ' ) :
return True ;
}
}
return False ;
}
2000-04-30 15:04:28 +04:00
/*******************************************************************
2002-11-13 02:20:50 +03:00
A wrapper that handles case sensitivity and the special handling
of the " .. " name .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2003-01-03 11:28:12 +03:00
BOOL mask_match ( const char * string , char * pattern , BOOL is_case_sensitive )
2000-04-30 15:04:28 +04:00
{
2002-11-13 02:20:50 +03:00
if ( strcmp ( string , " .. " ) = = 0 )
string = " . " ;
if ( strcmp ( pattern , " . " ) = = 0 )
return False ;
2000-04-30 15:04:28 +04:00
2003-08-12 08:25:26 +04:00
return ms_fnmatch ( pattern , string , Protocol , is_case_sensitive ) = = 0 ;
2000-04-30 15:04:28 +04:00
}
2001-10-03 01:58:09 +04:00
/*********************************************************
Recursive routine that is called by unix_wild_match .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2003-06-17 13:40:35 +04:00
static BOOL unix_do_match ( const char * regexp , const char * str )
2001-10-03 01:58:09 +04:00
{
2003-06-17 13:40:35 +04:00
const char * p ;
2001-10-03 01:58:09 +04:00
for ( p = regexp ; * p & & * str ; ) {
switch ( * p ) {
case ' ? ' :
str + + ;
p + + ;
break ;
case ' * ' :
/*
* Look for a character matching
* the one after the ' * ' .
*/
p + + ;
if ( ! * p )
return True ; /* Automatic match */
while ( * str ) {
while ( * str & & ( * p ! = * str ) )
str + + ;
/*
* Patch from weidel @ multichart . de . In the case of the regexp
* ' * XX * ' we want to ensure there are at least 2 ' X ' characters
* in the string after the ' * ' for a match to be made .
*/
{
int matchcount = 0 ;
/*
* Eat all the characters that match , but count how many there were .
*/
while ( * str & & ( * p = = * str ) ) {
str + + ;
matchcount + + ;
}
/*
* Now check that if the regexp had n identical characters that
* matchcount had at least that many matches .
*/
while ( * ( p + 1 ) & & ( * ( p + 1 ) = = * p ) ) {
p + + ;
matchcount - - ;
}
if ( matchcount < = 0 )
return False ;
}
str - - ; /* We've eaten the match char after the '*' */
if ( unix_do_match ( p , str ) )
return True ;
if ( ! * str )
return False ;
else
str + + ;
}
return False ;
default :
if ( * str ! = * p )
return False ;
str + + ;
p + + ;
break ;
}
}
if ( ! * p & & ! * str )
return True ;
if ( ! * p & & str [ 0 ] = = ' . ' & & str [ 1 ] = = 0 )
return ( True ) ;
if ( ! * str & & * p = = ' ? ' ) {
while ( * p = = ' ? ' )
p + + ;
return ( ! * p ) ;
}
if ( ! * str & & ( * p = = ' * ' & & p [ 1 ] = = ' \0 ' ) )
return True ;
return False ;
}
2001-07-24 02:06:05 +04:00
/*******************************************************************
2001-10-03 01:58:09 +04:00
Simple case insensitive interface to a UNIX wildcard matcher .
2001-07-24 02:06:05 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-10-03 01:58:09 +04:00
2003-02-24 06:09:08 +03:00
BOOL unix_wild_match ( const char * pattern , const char * string )
2001-07-24 02:06:05 +04:00
{
pstring p2 , s2 ;
2001-10-03 01:58:09 +04:00
char * p ;
2000-04-30 15:04:28 +04:00
2001-07-24 02:06:05 +04:00
pstrcpy ( p2 , pattern ) ;
pstrcpy ( s2 , string ) ;
2003-07-03 23:11:31 +04:00
strlower_m ( p2 ) ;
strlower_m ( s2 ) ;
2001-10-03 01:58:09 +04:00
/* Remove any *? and ** from the pattern as they are meaningless */
for ( p = p2 ; * p ; p + + )
while ( * p = = ' * ' & & ( p [ 1 ] = = ' ? ' | | p [ 1 ] = = ' * ' ) )
pstrcpy ( & p [ 1 ] , & p [ 2 ] ) ;
if ( strequal ( p2 , " * " ) )
return True ;
return unix_do_match ( p2 , s2 ) = = 0 ;
2001-07-24 02:06:05 +04:00
}
2000-04-30 15:04:28 +04:00
2003-06-25 21:41:05 +04:00
2001-12-03 03:21:51 +03:00
# ifdef __INSURE__
2000-04-30 15:04:28 +04:00
/*******************************************************************
This routine is a trick to immediately catch errors when debugging
with insure . A xterm with a gdb is popped up when insure catches
a error . It is Linux specific .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-11-13 02:20:50 +03:00
2000-04-24 15:30:24 +04:00
int _Insure_trap_error ( int a1 , int a2 , int a3 , int a4 , int a5 , int a6 )
{
static int ( * fn ) ( ) ;
int ret ;
char pidstr [ 10 ] ;
2001-12-03 03:21:51 +03:00
/* you can get /usr/bin/backtrace from
http : //samba.org/ftp/unpacked/junkcode/backtrace */
pstring cmd = " /usr/bin/backtrace %d " ;
2000-04-24 15:30:24 +04:00
2001-04-09 00:22:39 +04:00
slprintf ( pidstr , sizeof ( pidstr ) - 1 , " %d " , sys_getpid ( ) ) ;
2000-04-24 15:30:24 +04:00
pstring_sub ( cmd , " %d " , pidstr ) ;
if ( ! fn ) {
static void * h ;
h = dlopen ( " /usr/local/parasoft/insure++lite/lib.linux2/libinsure.so " , RTLD_LAZY ) ;
fn = dlsym ( h , " _Insure_trap_error " ) ;
2002-04-04 08:54:44 +04:00
if ( ! h | | h = = _Insure_trap_error ) {
h = dlopen ( " /usr/local/parasoft/lib.linux2/libinsure.so " , RTLD_LAZY ) ;
fn = dlsym ( h , " _Insure_trap_error " ) ;
}
2000-04-24 15:30:24 +04:00
}
ret = fn ( a1 , a2 , a3 , a4 , a5 , a6 ) ;
system ( cmd ) ;
return ret ;
}
# endif