1996-05-04 11:50:46 +04:00
/*
Unix SMB / Netbios implementation .
Version 1.9 .
Samba utility functions
1998-01-22 16:27:43 +03:00
Copyright ( C ) Andrew Tridgell 1992 - 1998
2001-10-03 01:58:09 +04:00
Copyright ( C ) Jeremy Allison 2001
2001-11-12 03:53:34 +03:00
Copyright ( C ) Simo Sorce 2001
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 */
1998-07-29 07:08:05 +04:00
# ifdef WITH_SSL
2001-09-26 21:29:53 +04:00
# include <openssl/ssl.h>
1998-06-16 05:35:52 +04:00
# undef Realloc /* SSLeay defines this and samba has a function of this name */
extern SSL * ssl ;
extern int sslFd ;
1998-07-29 07:08:05 +04:00
# endif /* WITH_SSL */
1998-06-16 05:35:52 +04:00
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
1998-04-25 05:12:08 +04:00
pstring global_myname = " " ;
fstring global_myworkgroup = " " ;
1997-07-31 22:47:26 +04:00
char * * my_netbios_names ;
1996-05-04 11:50:46 +04:00
1996-10-24 04:09:08 +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 .
1996-10-24 04:09:08 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
char * tmpdir ( void )
{
char * p ;
2001-11-16 00:50:29 +03:00
if ( ( p = getenv ( " TMPDIR " ) ) )
1996-10-24 04:09:08 +04:00
return p ;
return " /tmp " ;
}
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
BOOL in_group ( gid_t group , gid_t current_gid , int ngroups , 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
}
/****************************************************************************
2001-11-16 00:50:29 +03:00
Like atoi but gets the value up to the separater character .
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-11-16 00:50:29 +03:00
1998-11-10 21:14:16 +03:00
char * Atoic ( char * p , int * n , char * c )
1996-05-04 11:50:46 +04:00
{
2001-11-16 00:50:29 +03:00
if ( ! isdigit ( ( 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 + + ;
2001-07-04 11:36:09 +04: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
1998-11-10 21:14:16 +03:00
char * get_numlist ( 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 ) ) ;
if ( tn = = NULL )
1998-11-10 21:14:16 +03:00
{
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
{
1998-09-02 00:11:54 +04: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
1998-11-26 00:17:20 +03:00
if ( sys_stat ( fname , sbuf ) ! = 0 )
1996-05-04 11:50:46 +04:00
return ( False ) ;
return ( S_ISREG ( sbuf - > st_mode ) ) ;
}
/*******************************************************************
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
{
1998-09-02 00:11:54 +04:00
SMB_STRUCT_STAT st ;
1996-05-04 11:50:46 +04:00
1998-11-26 00:17:20 +03:00
if ( sys_stat ( fname , & st ) ! = 0 )
1996-05-04 11:50:46 +04:00
return ( 0 ) ;
return ( st . st_mtime ) ;
}
/*******************************************************************
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
{
1998-09-02 00:11:54 +04:00
SMB_STRUCT_STAT st2 ;
1997-08-21 00:32:23 +04:00
BOOL ret ;
1996-05-04 11:50:46 +04:00
if ( ! st ) st = & st2 ;
1998-11-26 00:17:20 +03:00
if ( sys_stat ( dname , st ) ! = 0 )
1996-05-04 11:50:46 +04:00
return ( False ) ;
1997-08-21 00:32:23 +04:00
ret = S_ISDIR ( st - > st_mode ) ;
if ( ! ret )
errno = ENOTDIR ;
return ret ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
returns the size in bytes of the named file
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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
{
1998-09-02 00:11:54 +04:00
SMB_STRUCT_STAT buf ;
1996-05-04 11:50:46 +04:00
buf . st_size = 0 ;
1998-11-26 00:17:20 +03:00
if ( sys_stat ( file_name , & buf ) ! = 0 )
return ( SMB_OFF_T ) - 1 ;
1996-05-04 11:50:46 +04:00
return ( buf . st_size ) ;
}
/*******************************************************************
return a string representing an attribute for a file
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-11-09 23:33:37 +03:00
char * attrib_string ( uint16 mode )
1996-05-04 11:50:46 +04:00
{
1998-05-12 04:55:32 +04:00
static fstring attrstr ;
1996-05-04 11:50:46 +04:00
attrstr [ 0 ] = 0 ;
1998-05-12 04:55:32 +04: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
return ( attrstr ) ;
}
/*******************************************************************
1998-11-10 21:14:16 +03:00
show a smb message structure
1996-05-04 11:50:46 +04: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
1998-11-10 21:14:16 +03:00
if ( DEBUGLEVEL < 5 ) return ;
1997-02-02 21:12:36 +03: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 ) ) ) ;
DEBUG ( 5 , ( " smb_tid=%d \n smb_pid=%d \n smb_uid=%d \n smb_mid=%d \n smt_wct=%d \n " ,
( int ) SVAL ( buf , smb_tid ) ,
( int ) SVAL ( buf , smb_pid ) ,
( int ) SVAL ( buf , smb_uid ) ,
( int ) SVAL ( buf , smb_mid ) ,
( 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 + + )
{
DEBUG ( 5 , ( " smb_vwv[%d]=%d (0x%X) \n " , i ,
SVAL ( buf , smb_vwv + 2 * i ) , SVAL ( buf , smb_vwv + 2 * i ) ) ) ;
}
1996-05-04 11:50:46 +04:00
1998-11-10 21:14:16 +03:00
bcc = ( int ) SVAL ( buf , smb_vwv + 2 * ( CVAL ( buf , smb_wct ) ) ) ;
DEBUG ( 5 , ( " smb_bcc=%d \n " , bcc ) ) ;
if ( DEBUGLEVEL < 10 ) return ;
if ( DEBUGLEVEL < 50 )
{
bcc = MIN ( bcc , 512 ) ;
}
dump_data ( 10 , smb_buf ( buf ) , bcc ) ;
}
1996-05-04 11:50:46 +04:00
/*******************************************************************
1998-11-10 21:14:16 +03:00
set the length and marker of an smb packet
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-11-10 21:14:16 +03:00
void smb_setlen ( char * buf , int len )
1996-05-04 11:50:46 +04:00
{
1998-11-10 21:14:16 +03:00
_smb_setlen ( buf , len ) ;
1996-05-04 11:50:46 +04:00
2002-01-11 22:10:25 +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
/*******************************************************************
1998-11-10 21:14:16 +03:00
setup the word count and byte count for a smb message
1996-05-04 11:50:46 +04: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 ) ;
}
/*******************************************************************
setup only the byte count for a smb message
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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
/*******************************************************************
setup only the byte count for a smb message , using the end of the
message as a marker
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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
/*******************************************************************
reduce a file name , removing . . elements .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void dos_clean_name ( char * s )
{
char * p = NULL ;
DEBUG ( 3 , ( " dos_clean_name [%s] \n " , s ) ) ;
/* remove any double slashes */
1999-12-13 16:27:58 +03:00
all_string_sub ( s , " \\ \\ " , " \\ " , 0 ) ;
1996-05-04 11:50:46 +04:00
while ( ( p = strstr ( s , " \\ .. \\ " ) ) ! = NULL )
{
pstring s1 ;
* p = 0 ;
1997-09-26 22:55:29 +04:00
pstrcpy ( s1 , p + 3 ) ;
1996-05-04 11:50:46 +04:00
2001-07-04 11:36:09 +04:00
if ( ( p = strrchr_m ( s , ' \\ ' ) ) ! = NULL )
1996-08-24 05:41:46 +04:00
* p = 0 ;
1996-05-04 11:50:46 +04:00
else
1996-08-24 05:41:46 +04:00
* s = 0 ;
1998-05-12 04:55:32 +04:00
pstrcat ( s , s1 ) ;
1996-05-04 11:50:46 +04:00
}
trim_string ( s , NULL , " \\ .. " ) ;
1999-12-13 16:27:58 +03:00
all_string_sub ( s , " \\ . \\ " , " \\ " , 0 ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
reduce a file name , removing . . elements .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void unix_clean_name ( char * s )
{
char * p = NULL ;
DEBUG ( 3 , ( " unix_clean_name [%s] \n " , s ) ) ;
/* remove any double slashes */
1999-12-13 16:27:58 +03:00
all_string_sub ( s , " // " , " / " , 0 ) ;
1996-05-04 11:50:46 +04:00
1997-02-10 23:03:56 +03:00
/* Remove leading ./ characters */
1997-02-13 23:36:58 +03:00
if ( strncmp ( s , " ./ " , 2 ) = = 0 ) {
trim_string ( s , " ./ " , NULL ) ;
if ( * s = = 0 )
1998-05-12 04:55:32 +04:00
pstrcpy ( s , " ./ " ) ;
1997-02-13 23:36:58 +03:00
}
1997-02-10 23:03:56 +03:00
1996-05-04 11:50:46 +04:00
while ( ( p = strstr ( s , " /../ " ) ) ! = NULL )
{
pstring s1 ;
* p = 0 ;
1997-09-26 22:55:29 +04:00
pstrcpy ( s1 , p + 3 ) ;
1996-05-04 11:50:46 +04:00
2001-07-04 11:36:09 +04:00
if ( ( p = strrchr_m ( s , ' / ' ) ) ! = NULL )
1996-08-24 05:41:46 +04:00
* p = 0 ;
1996-05-04 11:50:46 +04:00
else
1996-08-24 05:41:46 +04:00
* s = 0 ;
1998-05-12 04:55:32 +04:00
pstrcat ( s , s1 ) ;
1996-05-04 11:50:46 +04:00
}
trim_string ( s , NULL , " /.. " ) ;
}
2001-11-04 21:26:53 +03:00
/*******************************************************************
convert ' \ ' to ' / '
reduce a file name , removing or reducing / . . / , / . / , // elements.
remove also any trailing . and /
return a new allocated string .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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")); */
2001-11-04 21:26:53 +03:00
/* convert '\' to '/' */
ns = strdup_w ( s ) ;
if ( ! ns ) return NULL ;
unix_format_w ( ns ) ;
/* remove all double slashes */
p = ns ;
ns = all_string_sub_wa ( p , " // " , " / " ) ;
SAFE_FREE ( p ) ;
if ( ! ns ) return NULL ;
/* remove any /./ */
p = ns ;
ns = all_string_sub_wa ( p , " /./ " , " / " ) ;
SAFE_FREE ( p ) ;
if ( ! ns ) return NULL ;
/* reduce any /../ */
t = ns ;
2001-11-12 03:53:34 +03:00
while ( ( 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 ( ' / ' ) ) ;
if ( ! p ) p = ns ;
memmove ( p , t , ( strlen_w ( t ) + 1 ) * sizeof ( smb_ucs2_t ) ) ;
t = p ;
}
}
/* remove any trailing /. */
trim_string_wa ( ns , NULL , " /. " ) ;
/* remove any leading and trailing / */
trim_string_wa ( ns , " / " , " / " ) ;
return ns ;
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
1998-11-10 21:14:16 +03:00
make a dir struct
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-11-10 21:14:16 +03:00
void make_dir_struct ( char * buf , char * mask , char * fname , SMB_OFF_T size , int mode , time_t date )
{
char * p ;
pstring mask2 ;
1998-03-03 23:19:14 +03:00
1998-11-10 21:14:16 +03:00
pstrcpy ( mask2 , mask ) ;
1996-05-04 11:50:46 +04:00
1998-11-10 21:14:16 +03:00
if ( ( mode & aDIR ) ! = 0 )
size = 0 ;
1998-03-03 23:19:14 +03:00
1998-11-10 21:14:16 +03:00
memset ( buf + 1 , ' ' , 11 ) ;
2001-07-04 11:36:09 +04:00
if ( ( p = strchr_m ( mask2 , ' . ' ) ) ! = NULL )
1996-05-04 11:50:46 +04:00
{
1998-11-10 21:14:16 +03:00
* p = 0 ;
2001-07-25 17:19:14 +04:00
push_ascii ( buf + 1 , mask2 , 8 , 0 ) ;
push_ascii ( buf + 9 , p + 1 , 3 , 0 ) ;
1998-11-10 21:14:16 +03:00
* p = ' . ' ;
1996-05-04 11:50:46 +04:00
}
else
2001-07-25 17:19:14 +04:00
push_ascii ( buf + 1 , mask2 , 11 , 0 ) ;
1996-05-04 11:50:46 +04:00
1999-12-13 16:27:58 +03:00
memset ( buf + 21 , ' \0 ' , DIR_STRUCT_SIZE - 21 ) ;
2002-01-11 22:10:25 +03:00
SCVAL ( buf , 21 , mode ) ;
1996-05-04 11:50:46 +04:00
put_dos_date ( buf , 22 , date ) ;
SSVAL ( buf , 26 , size & 0xFFFF ) ;
1998-09-03 22:40:31 +04:00
SSVAL ( buf , 28 , ( size > > 16 ) & 0xFFFF ) ;
2001-07-25 17:19:14 +04:00
push_ascii ( buf + 30 , fname , 12 , 0 ) ;
1996-05-04 11:50:46 +04:00
if ( ! case_sensitive )
strupper ( buf + 30 ) ;
2001-07-25 17:19:14 +04:00
DEBUG ( 8 , ( " put name [%s] from [%s] into dir struct \n " , buf + 30 , fname ) ) ;
1996-05-04 11:50:46 +04:00
}
/*******************************************************************
close the low 3 fd ' s and open dev / null in their place
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void close_low_fds ( void )
{
int fd ;
int i ;
2000-04-23 11:37:43 +04:00
close ( 0 ) ; close ( 1 ) ;
# ifndef __INSURE__
close ( 2 ) ;
# endif
1996-05-04 11:50:46 +04:00
/* 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 + + ) {
1998-11-17 23:50:07 +03:00
fd = sys_open ( " /dev/null " , O_RDWR , 0 ) ;
if ( fd < 0 ) fd = sys_open ( " /dev/null " , O_WRONLY , 0 ) ;
1996-05-04 11:50:46 +04:00
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 ;
}
}
}
1996-08-22 10:32:03 +04:00
/****************************************************************************
Set a fd into blocking / nonblocking mode . Uses POSIX O_NONBLOCK if available ,
else
if SYSV use O_NDELAY
if BSD use FNDELAY
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-11-10 21:14:16 +03:00
int set_blocking ( int fd , BOOL set )
1996-08-22 10:32:03 +04:00
{
int val ;
# 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
if ( ( val = fcntl ( 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 fcntl ( fd , F_SETFL , val ) ;
# 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 )
{
return ( SMB_OFF_T ) transfer_file_internal ( infd , outfd , ( size_t ) n , read , write ) ;
}
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
1998-10-03 12:29:06 +04:00
void msleep ( int t )
1996-05-04 11:50:46 +04:00
{
int tdiff = 0 ;
struct timeval tval , t1 , t2 ;
fd_set fds ;
GetTimeOfDay ( & t1 ) ;
GetTimeOfDay ( & t2 ) ;
while ( tdiff < t ) {
tval . tv_sec = ( t - tdiff ) / 1000 ;
tval . tv_usec = 1000 * ( ( t - tdiff ) % 1000 ) ;
FD_ZERO ( & fds ) ;
errno = 0 ;
2000-06-11 09:57:58 +04:00
sys_select_intr ( 0 , & fds , & tval ) ;
1996-05-04 11:50:46 +04:00
1998-11-10 21:14:16 +03:00
GetTimeOfDay ( & 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
1996-05-04 11:50:46 +04:00
void become_daemon ( void )
{
2000-05-02 06:23:41 +04:00
if ( sys_fork ( ) ) {
1998-07-29 07:08:05 +04:00
_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 */
close_low_fds ( ) ;
1996-05-04 11:50:46 +04:00
}
/****************************************************************************
put up a yes / no prompt
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL yesno ( char * p )
{
pstring ans ;
printf ( " %s " , p ) ;
if ( ! fgets ( ans , sizeof ( ans ) - 1 , stdin ) )
return ( False ) ;
if ( * ans = = ' y ' | | * ans = = ' Y ' )
return ( True ) ;
return ( False ) ;
}
/****************************************************************************
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
{
void * ret = NULL ;
1996-05-31 19:13:29 +04:00
if ( size = = 0 ) {
2001-09-17 06:19:44 +04:00
SAFE_FREE ( p ) ;
1996-05-31 19:13:29 +04:00
DEBUG ( 5 , ( " Realloc asked for 0 bytes \n " ) ) ;
return NULL ;
}
1996-05-04 11:50:46 +04:00
if ( ! p )
ret = ( void * ) malloc ( size ) ;
else
ret = ( void * ) realloc ( p , size ) ;
if ( ! ret )
1999-12-13 16:27:58 +03:00
DEBUG ( 0 , ( " Memory allocation error: failed to expand to %d bytes \n " , ( int ) size ) ) ;
1996-05-04 11:50:46 +04:00
return ( ret ) ;
}
2000-02-07 19:22:16 +03:00
/****************************************************************************
2001-11-16 00:50:29 +03:00
Free memory , checks for NULL .
2001-09-17 06:19:44 +04:00
use directly SAFE_FREE ( )
exist 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
}
/****************************************************************************
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
1996-05-04 11:50:46 +04:00
int interpret_protocol ( char * str , int def )
{
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 ) ;
DEBUG ( 0 , ( " Unrecognised protocol level %s \n " , str ) ) ;
return ( def ) ;
}
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 )
{
BOOL pure_address = True ;
int i ;
for ( i = 0 ; pure_address & & str [ i ] ; i + + )
if ( ! ( isdigit ( ( int ) str [ i ] ) | | str [ i ] = = ' . ' ) )
pure_address = False ;
/* Check that a pure number is not misinterpreted as an IP */
2001-07-04 11:36:09 +04:00
pure_address = pure_address & & ( strchr_m ( str , ' . ' ) ! = NULL ) ;
1999-12-13 16:27:58 +03:00
return pure_address ;
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
interpret an internet address or name into an IP address in 4 byte form
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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
{
struct hostent * hp ;
1996-08-14 19:02:28 +04:00
uint32 res ;
1996-05-04 11:50:46 +04:00
if ( strcmp ( str , " 0.0.0.0 " ) = = 0 ) return ( 0 ) ;
if ( strcmp ( str , " 255.255.255.255 " ) = = 0 ) return ( 0xFFFFFFFF ) ;
/* if it's in the form of an IP address then get the lib to interpret it */
1999-12-13 16:27:58 +03:00
if ( is_ipaddress ( str ) ) {
1996-05-04 11:50:46 +04:00
res = inet_addr ( str ) ;
} else {
1996-08-16 17:03:26 +04:00
/* otherwise assume it's a network name of some sort and use
2001-06-18 09:42:18 +04:00
sys_gethostbyname */
if ( ( hp = sys_gethostbyname ( str ) ) = = 0 ) {
DEBUG ( 3 , ( " sys_gethostbyname: Unknown host. %s \n " , str ) ) ;
1996-05-04 11:50:46 +04:00
return 0 ;
}
1997-10-04 00:36:06 +04:00
if ( hp - > h_addr = = NULL ) {
2001-06-18 09:42:18 +04:00
DEBUG ( 3 , ( " sys_gethostbyname: host address is invalid for host %s \n " , str ) ) ;
1997-10-04 00:36:06 +04:00
return 0 ;
}
1996-05-04 11:50:46 +04:00
putip ( ( char * ) & res , ( char * ) hp - > h_addr ) ;
}
1996-08-14 19:02:28 +04:00
if ( res = = ( uint32 ) - 1 ) return ( 0 ) ;
1996-05-04 11:50:46 +04:00
return ( res ) ;
}
/*******************************************************************
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
{
static struct in_addr ret ;
1996-08-14 19:02:28 +04:00
uint32 a = interpret_addr ( str ) ;
1996-06-06 15:43:09 +04:00
ret . s_addr = a ;
1996-05-04 11:50:46 +04:00
return ( & ret ) ;
}
/*******************************************************************
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
{
1996-08-14 19:02:28 +04:00
uint32 a ;
1996-05-04 11:50:46 +04:00
putip ( ( char * ) & a , ( char * ) & ip ) ;
return ( a = = 0 ) ;
}
2001-11-26 06:11:44 +03:00
/* Set an IP to 0.0.0.0 */
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 )
{
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-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
{
static fstring last_key = " " ;
static pstring last_value = " " ;
char * nis_map = ( char * ) lp_nis_home_map_name ( ) ;
char buffer [ NIS_MAXATTRVAL + 1 ] ;
nis_result * result ;
nis_object * object ;
entry_obj * entry ;
if ( strcmp ( user_name , last_key ) )
{
2001-04-18 09:12:46 +04:00
slprintf ( buffer , sizeof ( buffer ) - 1 , " [key=%s],%s " , user_name , nis_map ) ;
1998-04-10 00:48:48 +04:00
DEBUG ( 5 , ( " NIS+ querystring: %s \n " , buffer ) ) ;
2001-04-18 09:12:46 +04:00
if ( result = nis_list ( buffer , FOLLOW_PATH | EXPAND_NAME | HARD_LOOKUP , NULL , NULL ) )
1998-04-10 00:48:48 +04:00
{
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 ) ) ;
pstrcpy ( last_value , entry - > en_cols . en_cols_val [ 1 ] . ec_value . ec_value_val ) ;
1999-12-13 16:27:58 +03:00
pstring_sub ( last_value , " & " , user_name ) ;
1998-04-10 00:48:48 +04:00
fstrcpy ( last_key , user_name ) ;
}
}
}
nis_freeresult ( result ) ;
}
1998-07-16 04:06:29 +04:00
strip_mount_options ( & last_value ) ;
1998-04-10 00:48:48 +04:00
DEBUG ( 4 , ( " NIS+ Lookup: %s resulted in %s \n " , user_name , last_value ) ) ;
return last_value ;
}
1998-08-08 05:15:14 +04:00
# else /* 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-02-20 22:48:01 +03:00
{
static fstring last_key = " " ;
static pstring last_value = " " ;
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 ( ) ;
2001-03-27 01:52:43 +04:00
if ( ( nis_error = yp_get_default_domain ( & nis_domain ) ) ! = 0 ) {
1998-02-20 22:48:01 +03:00
DEBUG ( 3 , ( " YP Error: %s \n " , yperr_string ( nis_error ) ) ) ;
return last_value ;
}
DEBUG ( 5 , ( " NIS Domain: %s \n " , nis_domain ) ) ;
2001-03-27 01:52:43 +04:00
if ( ! strcmp ( user_name , last_key ) ) {
nis_result = last_value ;
1998-02-20 22:48:01 +03:00
nis_result_len = strlen ( last_value ) ;
nis_error = 0 ;
2001-03-27 01:52:43 +04:00
} else {
1998-02-20 22:48:01 +03:00
if ( ( nis_error = yp_match ( nis_domain , nis_map ,
user_name , strlen ( user_name ) ,
2001-03-27 01:52:43 +04:00
& 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 " ,
1998-02-20 22:48:01 +03:00
yperr_string ( nis_error ) , user_name , nis_map ) ) ;
}
}
1998-07-16 04:06:29 +04:00
1998-02-20 22:48:01 +03:00
DEBUG ( 4 , ( " YP Lookup: %s resulted in %s \n " , user_name , last_value ) ) ;
return last_value ;
}
1998-08-08 05:15:14 +04:00
# endif /* WITH_NISPLUS_HOME */
1998-02-20 22:48:01 +03:00
# endif
2000-04-15 12:07:57 +04:00
1996-06-04 10:42:03 +04:00
/*******************************************************************
are two IPs on the same subnet ?
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
BOOL same_net ( struct in_addr ip1 , struct in_addr ip2 , struct in_addr mask )
{
1996-08-14 19:02:28 +04:00
uint32 net1 , net2 , nmask ;
1996-06-04 10:42:03 +04:00
nmask = ntohl ( mask . s_addr ) ;
net1 = ntohl ( ip1 . s_addr ) ;
net2 = ntohl ( ip2 . s_addr ) ;
return ( ( net1 & nmask ) = = ( net2 & nmask ) ) ;
}
1996-05-04 11:50:46 +04:00
/****************************************************************************
check if a process exists . Does this work on all unixes ?
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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
{
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
1999-12-13 16:27:58 +03:00
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 ;
if ( winbind_uidtoname ( name , uid ) )
return name ;
pass = sys_getpwuid ( uid ) ;
if ( pass ) return ( pass - > pw_name ) ;
slprintf ( name , sizeof ( name ) - 1 , " %d " , ( 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 ;
if ( winbind_gidtoname ( name , gid ) )
return name ;
grp = getgrgid ( gid ) ;
1998-07-29 07:08:05 +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
/*******************************************************************
2000-10-13 05:59:14 +04:00
Convert a user name into a uid . If winbindd is present uses this .
1998-11-29 23:03:33 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2000-10-13 05:59:14 +04:00
uid_t nametouid ( 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 ;
2000-10-13 05:59:14 +04:00
u = ( uid_t ) strtol ( name , & p , 0 ) ;
2001-06-26 01:29:33 +04:00
if ( ( p ! = name ) & & ( * p = = ' \0 ' ) )
return u ;
1999-12-13 16:27:58 +03:00
2000-10-13 05:59:14 +04:00
if ( winbind_nametouid ( & u , name ) )
return u ;
1999-12-13 16:27:58 +03:00
pass = sys_getpwnam ( name ) ;
2001-06-26 01:29:33 +04:00
if ( pass )
return ( pass - > pw_uid ) ;
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
/*******************************************************************
2000-10-13 05:59:14 +04:00
Convert a name to a gid_t if possible . Return - 1 if not a group . If winbindd
is present does a shortcut lookup . . .
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
2000-10-13 05:59:14 +04:00
if ( winbind_nametogid ( & g , name ) )
return g ;
1999-12-13 16:27:58 +03:00
grp = 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
/*******************************************************************
1998-08-21 15:37:40 +04:00
something really nasty happened - panic !
1996-05-04 11:50:46 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-08-21 15:37:40 +04:00
void smb_panic ( char * why )
1996-05-04 11:50:46 +04:00
{
1998-08-21 15:37:40 +04:00
char * cmd = lp_panic_action ( ) ;
if ( cmd & & * cmd ) {
system ( cmd ) ;
}
1998-08-22 06:54:21 +04:00
DEBUG ( 0 , ( " PANIC: %s \n " , why ) ) ;
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
}
/*******************************************************************
a readdir wrapper which just returns the file name
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-11-26 00:17:20 +03:00
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
1998-07-29 07:08:05 +04: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 ) ;
1998-07-29 07:08:05 +04: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
1998-07-29 07:08:05 +04: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
1997-07-24 21:25:11 +04:00
BOOL is_in_path ( char * name , name_compare_entry * namelist )
1996-12-10 21:03:44 +03:00
{
1997-07-08 20:54:44 +04:00
pstring last_component ;
char * p ;
1996-12-10 21:03:44 +03:00
1997-10-02 06:36:11 +04:00
DEBUG ( 8 , ( " is_in_path: %s \n " , name ) ) ;
1996-12-10 21:03:44 +03:00
1997-07-06 17:48:10 +04:00
/* if we have no list it's obviously not in the path */
1997-07-24 21:25:11 +04:00
if ( ( namelist = = NULL ) | | ( ( namelist ! = NULL ) & & ( namelist [ 0 ] . name = = NULL ) ) )
1997-10-02 06:36:11 +04:00
{
DEBUG ( 8 , ( " is_in_path: no name list. \n " ) ) ;
1997-07-06 17:48:10 +04:00
return False ;
1997-10-02 06:36:11 +04:00
}
1996-12-10 21:03:44 +03:00
1997-07-08 20:54:44 +04:00
/* Get the last component of the unix name. */
2001-07-04 11:36:09 +04:00
p = strrchr_m ( name , ' / ' ) ;
1998-03-25 23:10:58 +03:00
strncpy ( last_component , p ? + + p : name , sizeof ( last_component ) - 1 ) ;
1997-07-08 20:54:44 +04:00
last_component [ sizeof ( last_component ) - 1 ] = ' \0 ' ;
1997-07-24 21:25:11 +04:00
for ( ; namelist - > name ! = NULL ; namelist + + )
{
if ( namelist - > is_wild )
{
2000-04-30 15:04:28 +04:00
if ( mask_match ( last_component , namelist - > name , case_sensitive ) )
1997-07-24 21:25:11 +04:00
{
1997-10-02 06:36:11 +04:00
DEBUG ( 8 , ( " is_in_path: mask match succeeded \n " ) ) ;
1997-07-24 21:25:11 +04:00
return True ;
}
}
else
{
if ( ( case_sensitive & & ( strcmp ( last_component , namelist - > name ) = = 0 ) ) | |
( ! case_sensitive & & ( StrCaseCmp ( last_component , namelist - > name ) = = 0 ) ) )
{
1997-10-02 06:36:11 +04:00
DEBUG ( 8 , ( " is_in_path: match succeeded \n " ) ) ;
1997-07-24 21:25:11 +04:00
return True ;
}
}
}
1997-10-02 06:36:11 +04:00
DEBUG ( 8 , ( " is_in_path: match not found \n " ) ) ;
1997-08-26 02:18:31 +04:00
1997-07-24 21:25:11 +04:00
return False ;
}
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 )
{
char * name_end ;
char * nameptr = namelist ;
int num_entries = 0 ;
int i ;
1997-07-06 17:48:10 +04:00
1997-07-24 21:25:11 +04:00
( * ppname_array ) = NULL ;
if ( ( nameptr = = NULL ) | | ( ( nameptr ! = NULL ) & & ( * nameptr = = ' \0 ' ) ) )
return ;
1997-07-06 17:48:10 +04:00
1997-07-24 21:25:11 +04:00
/* We need to make two passes over the string. The
first to count the number of elements , the second
to split it .
*/
1997-08-26 02:18:31 +04:00
while ( * nameptr )
1996-12-10 21:03:44 +03:00
{
1997-07-14 23:45:34 +04:00
if ( * nameptr = = ' / ' )
1997-08-26 02:18:31 +04:00
{
1997-07-14 23:45:34 +04:00
/* cope with multiple (useless) /s) */
1996-12-10 21:03:44 +03:00
nameptr + + ;
continue ;
1997-08-26 02:18:31 +04:00
}
1997-07-14 23:45:34 +04:00
/* find the next / */
2001-07-04 11:36:09 +04:00
name_end = strchr_m ( nameptr , ' / ' ) ;
1997-07-24 21:25:11 +04: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 )
1997-08-26 02:18:31 +04:00
{
1997-07-24 21:25:11 +04:00
DEBUG ( 0 , ( " set_namearray: malloc fail \n " ) ) ;
return ;
1997-08-26 02:18:31 +04:00
}
1997-07-24 21:25:11 +04:00
/* Now copy out the names */
nameptr = namelist ;
i = 0 ;
while ( * nameptr )
1997-08-26 02:18:31 +04:00
{
1997-07-24 21:25:11 +04:00
if ( * nameptr = = ' / ' )
1997-07-06 17:48:10 +04:00
{
1997-07-24 21:25:11 +04:00
/* cope with multiple (useless) /s) */
nameptr + + ;
continue ;
1997-07-06 17:48:10 +04:00
}
1997-07-24 21:25:11 +04:00
/* find the next / */
2001-07-04 11:36:09 +04:00
if ( ( name_end = strchr_m ( nameptr , ' / ' ) ) ! = NULL )
1997-07-06 17:48:10 +04:00
{
1997-07-24 21:25:11 +04:00
* name_end = 0 ;
1997-08-26 02:18:31 +04:00
}
1997-07-06 17:48:10 +04:00
1997-07-14 23:45:34 +04:00
/* oops - the last check for a / didn't find one. */
1997-08-26 02:18:31 +04:00
if ( name_end = = NULL )
1997-07-24 21:25:11 +04:00
break ;
2000-04-30 15:04:28 +04:00
( * ppname_array ) [ i ] . is_wild = ms_has_wild ( nameptr ) ;
1997-07-24 21:25:11 +04:00
if ( ( ( * ppname_array ) [ i ] . name = strdup ( nameptr ) ) = = NULL )
1997-07-06 17:48:10 +04:00
{
1997-07-24 21:25:11 +04:00
DEBUG ( 0 , ( " set_namearray: malloc fail (1) \n " ) ) ;
return ;
1997-07-06 17:48:10 +04:00
}
1996-12-10 21:03:44 +03:00
/* next segment please */
nameptr = name_end + 1 ;
1997-07-24 21:25:11 +04:00
i + + ;
1996-12-10 21:03:44 +03:00
}
1997-08-26 02:18:31 +04:00
1997-07-24 21:25:11 +04:00
( * ppname_array ) [ i ] . name = NULL ;
1996-12-10 21:03:44 +03:00
1997-07-24 21:25:11 +04:00
return ;
1997-07-08 20:54:44 +04:00
}
1997-07-24 21:25:11 +04:00
/****************************************************************************
routine to free a namearray .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void free_namearray ( name_compare_entry * name_array )
1997-07-08 20:54:44 +04:00
{
2001-09-17 06:19:44 +04:00
if ( name_array = = NULL )
1997-07-24 21:25:11 +04:00
return ;
2001-09-17 06:19:44 +04:00
SAFE_FREE ( name_array - > name ) ;
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
{
1998-09-04 04:23:28 +04:00
SMB_STRUCT_FLOCK lock ;
1996-12-10 21:03:44 +03:00
int ret ;
2000-04-13 03:01:11 +04:00
1998-09-04 04:23:28 +04: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
lock . l_type = type ;
lock . l_whence = SEEK_SET ;
1998-09-04 04:23:28 +04:00
lock . l_start = offset ;
lock . l_len = count ;
1996-12-10 21:03:44 +03:00
lock . l_pid = 0 ;
errno = 0 ;
ret = fcntl ( fd , op , & lock ) ;
if ( errno ! = 0 )
2000-05-02 07:20:47 +04:00
DEBUG ( 3 , ( " fcntl_lock: fcntl lock gave errno %d (%s) \n " , errno , strerror ( errno ) ) ) ;
1996-12-10 21:03:44 +03:00
/* a lock query */
1998-09-04 04:23:28 +04:00
if ( op = = SMB_F_GETLK )
{
if ( ( ret ! = - 1 ) & &
( lock . l_type ! = F_UNLCK ) & &
( lock . l_pid ! = 0 ) & &
2000-05-02 06:23:41 +04:00
( lock . l_pid ! = sys_getpid ( ) ) )
1996-12-10 21:03:44 +03:00
{
2000-05-02 07:20:47 +04:00
DEBUG ( 3 , ( " fcntl_lock: fd %d is locked by pid %d \n " , fd , ( int ) lock . l_pid ) ) ;
1998-09-04 04:23:28 +04:00
return ( True ) ;
1996-12-10 21:03:44 +03:00
}
1998-09-04 04:23:28 +04:00
/* it must be not locked or locked by me */
return ( False ) ;
}
1996-12-10 21:03:44 +03:00
/* a lock set or unset */
if ( ret = = - 1 )
1998-09-04 04:23:28 +04:00
{
2000-05-02 07:20:47 +04:00
DEBUG ( 3 , ( " fcntl_lock: lock failed at offset %.0f count %.0f op %d type %d (%s) \n " ,
1998-09-04 04:23:28 +04:00
( double ) offset , ( double ) count , op , type , strerror ( errno ) ) ) ;
return ( False ) ;
}
1996-12-10 21:03:44 +03:00
/* everything went OK */
2000-05-02 07:20:47 +04:00
DEBUG ( 8 , ( " fcntl_lock: Lock call successful \n " ) ) ;
1996-12-10 21:03:44 +03:00
return ( True ) ;
}
1997-07-31 22:47:26 +04:00
/*******************************************************************
is the name specified one of my netbios names
returns true is it is equal , false otherwise
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1997-09-14 20:37:18 +04:00
BOOL is_myname ( char * s )
1997-07-31 22:47:26 +04:00
{
int n ;
BOOL ret = False ;
for ( n = 0 ; my_netbios_names [ n ] ; n + + ) {
if ( strequal ( my_netbios_names [ n ] , s ) )
ret = True ;
}
DEBUG ( 8 , ( " is_myname( \" %s \" ) returns %d \n " , s , ret ) ) ;
return ( ret ) ;
}
1997-09-05 00:26:07 +04:00
2001-11-29 00:51:11 +03:00
BOOL is_myname_or_ipaddr ( char * s )
{
char * * ptr ;
/* optimize for the common case */
if ( strequal ( s , global_myname ) )
return True ;
/* maybe its an IP address? */
if ( is_ipaddress ( s ) )
{
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 */
ptr = lp_netbios_aliases ( ) ;
for ( ; * ptr ; ptr + + )
{
if ( StrCaseCmp ( s , * ptr ) = = 0 )
return True ;
}
/* no match */
return False ;
}
1997-09-05 00:26:07 +04:00
/*******************************************************************
set the horrid remote_arch string based on an enum .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void set_remote_arch ( enum remote_arch_types type )
{
2000-04-17 08:46:10 +04:00
extern fstring remote_arch ;
1997-09-05 00:26:07 +04:00
ra_type = type ;
switch ( type )
{
case RA_WFWG :
1998-05-12 04:55:32 +04:00
fstrcpy ( remote_arch , " WfWg " ) ;
1997-09-05 00:26:07 +04:00
return ;
case RA_OS2 :
1998-05-12 04:55:32 +04:00
fstrcpy ( remote_arch , " OS2 " ) ;
1997-09-05 00:26:07 +04:00
return ;
case RA_WIN95 :
1998-05-12 04:55:32 +04:00
fstrcpy ( remote_arch , " Win95 " ) ;
1997-09-05 00:26:07 +04:00
return ;
case RA_WINNT :
1998-05-12 04:55:32 +04:00
fstrcpy ( remote_arch , " WinNT " ) ;
1997-09-05 00:26:07 +04:00
return ;
1999-12-13 16:27:58 +03:00
case RA_WIN2K :
fstrcpy ( remote_arch , " Win2K " ) ;
return ;
1997-09-05 00:26:07 +04:00
case RA_SAMBA :
1998-05-12 04:55:32 +04:00
fstrcpy ( remote_arch , " Samba " ) ;
1997-09-05 00:26:07 +04:00
return ;
default :
ra_type = RA_UNKNOWN ;
1998-05-12 04:55:32 +04:00
fstrcpy ( remote_arch , " UNKNOWN " ) ;
1997-09-05 00:26:07 +04:00
break ;
}
}
/*******************************************************************
Get the remote_arch type .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1998-04-13 23:24:06 +04:00
enum remote_arch_types get_remote_arch ( void )
1997-09-05 00:26:07 +04:00
{
return ra_type ;
}
1997-09-26 22:55:29 +04:00
1997-10-04 20:51:43 +04:00
1999-12-13 16:27:58 +03:00
void out_ascii ( FILE * f , unsigned char * buf , int len )
1997-10-09 18:40:46 +04:00
{
1998-11-10 21:14:16 +03:00
int i ;
for ( i = 0 ; i < len ; i + + )
1997-10-09 18:40:46 +04:00
{
1998-11-10 21:14:16 +03:00
fprintf ( f , " %c " , isprint ( buf [ i ] ) ? buf [ i ] : ' . ' ) ;
1997-10-09 18:40:46 +04:00
}
}
1999-12-13 16:27:58 +03:00
void out_data ( FILE * f , char * buf1 , int len , int per_line )
1997-10-29 22:05:34 +03:00
{
1999-12-13 16:27:58 +03:00
unsigned char * buf = ( unsigned char * ) buf1 ;
1998-11-10 21:14:16 +03:00
int i = 0 ;
if ( len < = 0 )
1997-10-29 22:05:34 +03:00
{
1998-11-10 21:14:16 +03:00
return ;
1997-10-29 22:05:34 +03:00
}
1998-11-10 21:14:16 +03:00
fprintf ( f , " [%03X] " , i ) ;
for ( i = 0 ; i < len ; )
1997-10-09 18:40:46 +04:00
{
1998-11-10 21:14:16 +03:00
fprintf ( f , " %02X " , ( int ) buf [ i ] ) ;
i + + ;
if ( i % ( per_line / 2 ) = = 0 ) fprintf ( f , " " ) ;
if ( i % per_line = = 0 )
{
out_ascii ( f , & buf [ i - per_line ] , per_line / 2 ) ; fprintf ( f , " " ) ;
out_ascii ( f , & buf [ i - per_line / 2 ] , per_line / 2 ) ; fprintf ( f , " \n " ) ;
if ( i < len ) fprintf ( f , " [%03X] " , i ) ;
}
1997-10-09 18:40:46 +04:00
}
1998-11-10 21:14:16 +03:00
if ( ( i % per_line ) ! = 0 )
1997-10-04 20:51:43 +04:00
{
1998-11-10 21:14:16 +03:00
int n ;
1998-05-12 04:55:32 +04:00
1998-11-10 21:14:16 +03:00
n = per_line - ( i % per_line ) ;
fprintf ( f , " " ) ;
if ( n > ( per_line / 2 ) ) fprintf ( f , " " ) ;
while ( n - - )
{
fprintf ( f , " " ) ;
}
n = MIN ( per_line / 2 , i % per_line ) ;
out_ascii ( f , & buf [ i - ( i % per_line ) ] , n ) ; fprintf ( f , " " ) ;
n = ( i % per_line ) - n ;
if ( n > 0 ) out_ascii ( f , & buf [ i - n ] , n ) ;
fprintf ( f , " \n " ) ;
1997-10-04 20:51:43 +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
{
2001-07-07 11:00:15 +04:00
const unsigned char * buf = ( const unsigned char * ) buf1 ;
1999-12-13 16:27:58 +03:00
int i = 0 ;
if ( len < = 0 ) return ;
1997-10-11 19:10:57 +04:00
1999-12-13 16:27:58 +03:00
DEBUG ( level , ( " [%03X] " , i ) ) ;
for ( i = 0 ; i < len ; ) {
DEBUG ( level , ( " %02X " , ( int ) buf [ i ] ) ) ;
i + + ;
if ( i % 8 = = 0 ) DEBUG ( level , ( " " ) ) ;
if ( i % 16 = = 0 ) {
print_asc ( level , & buf [ i - 16 ] , 8 ) ; DEBUG ( level , ( " " ) ) ;
print_asc ( level , & buf [ i - 8 ] , 8 ) ; DEBUG ( level , ( " \n " ) ) ;
if ( i < len ) DEBUG ( level , ( " [%03X] " , i ) ) ;
}
}
if ( i % 16 ) {
int n ;
n = 16 - ( i % 16 ) ;
DEBUG ( level , ( " " ) ) ;
if ( n > 8 ) DEBUG ( level , ( " " ) ) ;
while ( n - - ) DEBUG ( level , ( " " ) ) ;
n = MIN ( 8 , i % 16 ) ;
print_asc ( level , & buf [ i - ( i % 16 ) ] , n ) ; DEBUG ( level , ( " " ) ) ;
n = ( i % 16 ) - n ;
if ( n > 0 ) print_asc ( level , & buf [ i - n ] , n ) ;
DEBUG ( level , ( " \n " ) ) ;
}
1997-10-11 19:10:57 +04:00
}
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
/*****************************************************************************
* Provide a checksum on a string
*
1998-11-10 21:14:16 +03:00
* Input : s - the null - terminated character string for which the checksum
1998-08-14 21:38:29 +04:00
* 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 ) ;
} /* str_checksum */
1998-08-30 08:31:55 +04:00
/*****************************************************************
zero a memory area then free it . Used to catch bugs faster
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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
/*****************************************************************
1998-10-16 10:16:10 +04:00
set our open file limit to a requested max and return the limit
1998-10-05 05:57:03 +04: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 ;
}
/*
* 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
if ( ( int ) rlp . rlim_cur > saved_current_limit )
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
/*****************************************************************
splits out the start of the key ( HKLM or HKU ) and the rest of the key
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
1999-12-13 16:27:58 +03:00
BOOL reg_split_key ( 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 ;
}
else
{
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
/*****************************************************************
possibly replace mkstemp if it is broken
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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 ) ;
2001-04-13 04:37:00 +04:00
if ( ! p ) return - 1 ;
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
2001-11-20 09:38:09 +03:00
/**
2001-10-22 06:34:41 +04:00
malloc that aborts with smb_panic on fail or zero size .
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 " ) ;
2001-10-22 06:34:41 +04:00
if ( ( p = malloc ( size ) ) = = NULL )
2001-11-20 09:38:09 +03:00
smb_panic ( " smb_xmalloc: malloc fail. \n " ) ;
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
* */
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
* */
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 ;
}
2001-12-10 02:56:07 +03:00
/*
vasprintf that aborts on malloc fail
*/
int smb_xvasprintf ( char * * ptr , const char * format , va_list ap )
{
int n ;
n = vasprintf ( ptr , format , ap ) ;
if ( n = = - 1 | | ! * ptr ) {
smb_panic ( " smb_xvasprintf: out of memory " ) ;
}
return n ;
}
1999-12-13 16:27:58 +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 ;
2000-04-22 12:29:41 +04:00
if ( size = = 0 ) return NULL ;
1999-12-13 16:27:58 +03:00
p2 = malloc ( size ) ;
if ( ! p2 ) return NULL ;
memcpy ( p2 , p , size ) ;
return p2 ;
1999-12-12 23:03:42 +03:00
}
1999-12-13 16:27:58 +03:00
/*****************************************************************
get local hostname and cache result
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
char * myhostname ( void )
1999-12-12 23:03:42 +03:00
{
1999-12-13 16:27:58 +03:00
static pstring ret ;
if ( ret [ 0 ] = = 0 ) {
get_myname ( ret ) ;
1999-12-12 23:03:42 +03:00
}
1999-12-13 16:27:58 +03:00
return ret ;
1999-12-12 23:03:42 +03:00
}
1999-12-21 12:25:59 +03:00
/*****************************************************************
a useful function for returning a path in the Samba lock directory
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
char * lock_path ( char * name )
{
static pstring fname ;
pstrcpy ( fname , lp_lockdir ( ) ) ;
trim_string ( fname , " " , " / " ) ;
if ( ! directory_exist ( fname , NULL ) ) {
mkdir ( fname , 0755 ) ;
}
pstrcat ( fname , " / " ) ;
pstrcat ( fname , name ) ;
return fname ;
}
2000-01-14 04:41:04 +03:00
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 .
* */
2001-10-03 16:18:20 +04:00
char * lib_path ( char * name )
{
static pstring fname ;
2001-11-19 06:35:27 +03:00
snprintf ( fname , sizeof ( fname ) , " %s/%s " , dyn_LIBDIR , name ) ;
2001-10-03 16:18:20 +04:00
return fname ;
}
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
/*******************************************************************
determine if a pattern contains any Microsoft wildcard characters
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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 ;
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
/*******************************************************************
a wrapper that handles case sensitivity and the special handling
of the " .. " name
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2000-05-18 00:54:56 +04:00
BOOL mask_match ( char * string , char * pattern , BOOL is_case_sensitive )
2000-04-30 15:04:28 +04:00
{
fstring p2 , s2 ;
2001-08-20 09:15:26 +04:00
2000-04-30 15:04:28 +04:00
if ( strcmp ( string , " .. " ) = = 0 ) string = " . " ;
if ( strcmp ( pattern , " . " ) = = 0 ) return False ;
2000-05-18 00:54:56 +04:00
if ( is_case_sensitive ) {
2001-08-20 09:15:26 +04:00
return ms_fnmatch ( pattern , string , Protocol ) = = 0 ;
2000-04-30 15:04:28 +04:00
}
fstrcpy ( p2 , pattern ) ;
fstrcpy ( s2 , string ) ;
strlower ( p2 ) ;
strlower ( s2 ) ;
2001-08-20 09:15:26 +04:00
return ms_fnmatch ( p2 , s2 , Protocol ) = = 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 .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
static BOOL unix_do_match ( char * regexp , char * str )
{
char * p ;
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
BOOL unix_wild_match ( char * pattern , 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 ) ;
strlower ( p2 ) ;
strlower ( 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
2002-01-05 07:23:12 +03:00
/*******************************************************************
free ( ) a data blob
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
static void free_data_blob ( DATA_BLOB * d )
{
if ( ( d ) & & ( d - > free ) ) {
SAFE_FREE ( d - > data ) ;
}
}
2001-10-11 11:42:52 +04:00
/*******************************************************************
construct a data blob , must be freed with data_blob_free ( )
2002-01-06 02:30:59 +03:00
you can pass NULL for p and get a blank data blob
2001-10-11 11:42:52 +04:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-10-30 01:14:17 +03:00
DATA_BLOB data_blob ( const void * p , size_t length )
2001-10-11 11:42:52 +04:00
{
DATA_BLOB ret ;
2002-01-06 02:30:59 +03:00
if ( ! length ) {
2001-10-11 11:42:52 +04:00
ZERO_STRUCT ( ret ) ;
return ret ;
}
2002-01-06 02:30:59 +03:00
if ( p ) {
ret . data = smb_xmemdup ( p , length ) ;
} else {
ret . data = smb_xmalloc ( length ) ;
}
2001-10-11 11:42:52 +04:00
ret . length = length ;
2002-01-05 07:23:12 +03:00
ret . free = free_data_blob ;
return ret ;
}
/*******************************************************************
construct a data blob , using supplied TALLOC_CTX
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
DATA_BLOB data_blob_talloc ( TALLOC_CTX * mem_ctx , const void * p , size_t length )
{
DATA_BLOB ret ;
if ( ! p | | ! length ) {
ZERO_STRUCT ( ret ) ;
return ret ;
}
ret . data = talloc_memdup ( mem_ctx , p , length ) ;
if ( ret . data = = NULL )
smb_panic ( " data_blob_talloc: talloc_memdup failed. \n " ) ;
ret . length = length ;
ret . free = NULL ;
2001-10-11 11:42:52 +04:00
return ret ;
}
/*******************************************************************
free a data blob
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2001-10-17 12:54:19 +04:00
void data_blob_free ( DATA_BLOB * d )
2001-10-11 11:42:52 +04:00
{
2002-01-05 07:23:12 +03:00
if ( d ) {
if ( d - > free ) {
2002-01-09 08:09:44 +03:00
( d - > free ) ( d ) ;
2002-01-05 07:23:12 +03:00
}
ZERO_STRUCTP ( d ) ;
}
2001-10-11 11:42:52 +04:00
}
2001-10-30 01:14:17 +03:00
/*******************************************************************
2002-01-05 07:23:12 +03:00
clear a DATA_BLOB ' s contents
2001-10-30 01:14:17 +03:00
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
2002-01-05 07:23:12 +03:00
void data_blob_clear ( DATA_BLOB * d )
2001-10-30 01:14:17 +03:00
{
if ( d - > data ) {
2001-11-01 06:54:52 +03:00
memset ( d - > data , 0 , d - > length ) ;
2001-10-30 01:14:17 +03:00
}
2002-01-05 07:23:12 +03:00
}
/*******************************************************************
free a data blob and clear its contents
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
void data_blob_clear_free ( DATA_BLOB * d )
{
data_blob_clear ( d ) ;
2001-10-30 01:14:17 +03:00
data_blob_free ( d ) ;
}
2001-10-11 11:42:52 +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 .
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
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 " ) ;
}
ret = fn ( a1 , a2 , a3 , a4 , a5 , a6 ) ;
system ( cmd ) ;
return ret ;
}
# endif