static bool read_init_file(TALLOC_CTX *mem_ctx,
const char *servicename,
struct rcinit_file_information **service_info)
{
struct rcinit_file_information *info = NULL;
char *filepath = NULL;
char str[1024];
XFILE *f = NULL;
char *p = NULL;
info = talloc_zero(mem_ctx, struct rcinit_file_information);
if (info == NULL) {
return false;
}
/* attempt the file open */
filepath = talloc_asprintf(mem_ctx,
"%s/%s/%s",
get_dyn_MODULESDIR(),
SVCCTL_SCRIPT_DIR,
servicename);
if (filepath == NULL) {
return false;
}
f = x_fopen( filepath, O_RDONLY, 0 );
if (f == NULL) {
DEBUG(0,("read_init_file: failed to open [%s]\n", filepath));
return false;
}
while ((x_fgets(str, sizeof(str) - 1, f)) != NULL) {
/* ignore everything that is not a full line
comment starting with a '#' */
if (str[0] != '#') {
continue;
}
/* Look for a line like '^#.*Description:' */
p = strstr(str, "Description:");
if (p != NULL) {
char *desc;
p += strlen( "Description:" ) + 1;
if (p == NULL) {
break;
}
desc = svcctl_cleanup_string(mem_ctx, p);
if (desc != NULL) {
info->description = talloc_strdup(info, desc);
}
}
}
x_fclose(f);
if (info->description == NULL) {
info->description = talloc_strdup(info,
"External Unix Service");
if (info->description == NULL) {
return false;
}
}
*service_info = info;
return true;
}
/* ************************************************************************** **
* Write an debug message on the debugfile.
* This is called by dbghdr() and format_debug_text().
* ************************************************************************** **
*/
int Debug1( const char *format_str, ... )
{
va_list ap;
int old_errno = errno;
debug_count++;
if( stdout_logging )
{
va_start( ap, format_str );
if(dbf)
(void)x_vfprintf( dbf, format_str, ap );
va_end( ap );
errno = old_errno;
return( 0 );
}
#ifdef WITH_SYSLOG
if( !lp_syslog_only() )
#endif
{
if( !dbf )
{
mode_t oldumask = umask( 022 );
dbf = x_fopen( debugf, O_WRONLY|O_APPEND|O_CREAT, 0644 );
(void)umask( oldumask );
if( dbf )
{
x_setbuf( dbf, NULL );
}
else
{
errno = old_errno;
return(0);
}
}
}
#ifdef WITH_SYSLOG
if( syslog_level < lp_syslog() )
{
/* map debug levels to syslog() priorities
* note that not all DEBUG(0, ...) calls are
* necessarily errors
*/
static int priority_map[] = {
LOG_ERR, /* 0 */
LOG_WARNING, /* 1 */
LOG_NOTICE, /* 2 */
LOG_INFO, /* 3 */
};
int priority;
pstring msgbuf;
if( syslog_level >= ( sizeof(priority_map) / sizeof(priority_map[0]) )
|| syslog_level < 0)
priority = LOG_DEBUG;
else
priority = priority_map[syslog_level];
va_start( ap, format_str );
vslprintf( msgbuf, sizeof(msgbuf)-1, format_str, ap );
va_end( ap );
msgbuf[255] = '\0';
syslog( priority, "%s", msgbuf );
}
#endif
check_log_size();
#ifdef WITH_SYSLOG
if( !lp_syslog_only() )
#endif
{
va_start( ap, format_str );
if(dbf)
(void)x_vfprintf( dbf, format_str, ap );
va_end( ap );
if(dbf)
(void)x_fflush( dbf );
}
errno = old_errno;
return( 0 );
} /* Debug1 */
#ifdef WITH_SYSLOG
if( !lp_syslog_only() )
#endif
{
if( !dbf ) {
mode_t oldumask = umask( 022 );
dbf = x_fopen( debugf, O_WRONLY|O_APPEND|O_CREAT, 0644 );
(void)umask( oldumask );
if( dbf ) {
x_setbuf( dbf, NULL );
} else {
errno = old_errno;
goto done;
}
}
}
bool map_username(TALLOC_CTX *ctx, const char *user_in, char **p_user_out)
{
XFILE *f;
char *mapfile = lp_username_map(talloc_tos());
char *s;
char buf[512];
bool mapped_user = False;
char *cmd = lp_username_map_script(talloc_tos());
*p_user_out = NULL;
if (!user_in)
return false;
/* Initially make a copy of the incoming name. */
*p_user_out = talloc_strdup(ctx, user_in);
if (!*p_user_out) {
return false;
}
if (strequal(user_in,get_last_to()))
return false;
if (strequal(user_in,get_last_from())) {
DEBUG(3,("Mapped user %s to %s\n",user_in,get_last_to()));
TALLOC_FREE(*p_user_out);
*p_user_out = talloc_strdup(ctx, get_last_to());
return true;
}
if (fetch_map_from_gencache(ctx, user_in, p_user_out)) {
return true;
}
/* first try the username map script */
if ( *cmd ) {
char **qlines;
char *command = NULL;
int numlines, ret, fd;
command = talloc_asprintf(ctx,
"%s \"%s\"",
cmd,
user_in);
if (!command) {
return false;
}
DEBUG(10,("Running [%s]\n", command));
ret = smbrun(command, &fd);
DEBUGADD(10,("returned [%d]\n", ret));
TALLOC_FREE(command);
if ( ret != 0 ) {
if (fd != -1)
close(fd);
return False;
}
numlines = 0;
qlines = fd_lines_load(fd, &numlines, 0, ctx);
DEBUGADD(10,("Lines returned = [%d]\n", numlines));
close(fd);
/* should be either no lines or a single line with the mapped username */
if (numlines && qlines) {
DEBUG(3,("Mapped user %s to %s\n", user_in, qlines[0] ));
set_last_from_to(user_in, qlines[0]);
store_map_in_gencache(ctx, user_in, qlines[0]);
TALLOC_FREE(*p_user_out);
*p_user_out = talloc_strdup(ctx, qlines[0]);
if (!*p_user_out) {
return false;
}
}
TALLOC_FREE(qlines);
return numlines != 0;
}
/* ok. let's try the mapfile */
if (!*mapfile)
return False;
f = x_fopen(mapfile,O_RDONLY, 0);
if (!f) {
DEBUG(0,("can't open username map %s. Error %s\n",mapfile, strerror(errno) ));
return False;
}
DEBUG(4,("Scanning username map %s\n",mapfile));
while((s=fgets_slash(buf,sizeof(buf),f))!=NULL) {
char *unixname = s;
char *dosname = strchr_m(unixname,'=');
char **dosuserlist;
bool return_if_mapped = False;
if (!dosname)
continue;
*dosname++ = 0;
unixname = skip_space(unixname);
if ('!' == *unixname) {
return_if_mapped = True;
unixname = skip_space(unixname+1);
}
if (!*unixname || strchr_m("#;",*unixname))
continue;
{
int l = strlen(unixname);
while (l && isspace((int)unixname[l-1])) {
unixname[l-1] = 0;
l--;
}
}
/* skip lines like 'user = '******'*') ||
user_in_list(ctx, user_in, (const char * const *)dosuserlist)) {
DEBUG(3,("Mapped user %s to %s\n",user_in,unixname));
mapped_user = True;
set_last_from_to(user_in, unixname);
store_map_in_gencache(ctx, user_in, unixname);
TALLOC_FREE(*p_user_out);
*p_user_out = talloc_strdup(ctx, unixname);
if (!*p_user_out) {
TALLOC_FREE(dosuserlist);
x_fclose(f);
return false;
}
if ( return_if_mapped ) {
TALLOC_FREE(dosuserlist);
x_fclose(f);
return True;
}
}
TALLOC_FREE(dosuserlist);
}
x_fclose(f);
/*
* If we didn't successfully map a user in the loop above,
* setup the last_from and last_to as an optimization so
* that we don't scan the file again for the same user.
*/
if (!mapped_user) {
DEBUG(8, ("The user '%s' has no mapping. "
"Skip it next time.\n", user_in));
set_last_from_to(user_in, user_in);
store_map_in_gencache(ctx, user_in, user_in);
}
return mapped_user;
}