static int sh_utmp_login_r(char * str)
{
struct login_ct * list = login_ct_list;
struct login_ct * old = login_ct_list;
while (list)
{
if (0 == sl_strcmp(list->name, str))
{
list->nlogin -= 1;
if (list->nlogin > 0)
{
return list->nlogin;
}
if (login_ct_list == list) /* modified Apr 4, 2004 */
{
login_ct_list = list->next;
SH_FREE(list);
}
else
{
old->next = list->next;
SH_FREE(list);
}
return 0;
}
old = list;
list = list->next;
}
return 0;
}
static struct SH_UTMP_S * sh_utmp_getutid(struct SH_UTMP_S * ut)
{
#ifdef HAVE_UTTYPE
struct SH_UTMP_S * out;
if (ut->ut_type == RUN_LVL || ut->ut_type == BOOT_TIME ||
ut->ut_type == NEW_TIME || ut->ut_type == OLD_TIME)
{
while (1) {
if ((out = sh_utmp_getutent()) == NULL) {
return NULL;
}
if (out->ut_type == ut->ut_type)
return out;
}
}
else if (ut->ut_type == INIT_PROCESS || ut->ut_type == LOGIN_PROCESS ||
ut->ut_type == USER_PROCESS || ut->ut_type == DEAD_PROCESS )
{
while (1) {
if ((out = sh_utmp_getutent()) == NULL) {
return NULL;
}
if (sl_strcmp(ut->ut_id, out->ut_id) == 0)
return out;
}
}
#endif
return NULL;
}
static void sh_prelink_fd(sh_tas_t * task)
{
SL_TICKET ticket;
char * tmp;
char hashbuf[KEYBUF_SIZE];
if (task->com_ti != (-1))
{
(void) sl_close(task->com_ti);
task->com_fd = -1;
task->com_ti = -1;
}
ticket = sl_open_read(FIL__, __LINE__, task->command,
task->privileged == 0 ? SL_NOPRIV : SL_YESPRIV);
if (SL_ISERROR(ticket))
{
char errbuf[SH_ERRBUF_SIZE];
char errbuf2[SH_ERRBUF_SIZE];
sh_error_message(errno, errbuf2, sizeof(errbuf2));
sl_strlcpy(errbuf, sl_error_string(ticket), sizeof(errbuf));
tmp = sh_util_safe_name (task->command);
sh_error_handle(SH_ERR_ERR, FIL__, __LINE__, ticket, MSG_E_READ, errbuf, errbuf2, tmp);
SH_FREE(tmp);
return;
}
if (*(task->checksum) == '\0' ||
0 == sl_strcmp(task->checksum,
sh_tiger_hash (task->command, ticket, TIGER_NOLIM, hashbuf, sizeof(hashbuf))))
{
task->com_fd = get_the_fd(ticket);
task->com_ti = ticket;
}
else
{
tmp = sh_util_safe_name (task->command);
sh_error_handle(SH_ERR_ERR, FIL__, __LINE__, ticket, MSG_E_HASH, tmp);
SH_FREE(tmp);
(void) sl_close(ticket);
}
return;
}
/* add a username to the list of logged-in users
*/
static int sh_utmp_login_a(char * str)
{
struct login_ct * list = login_ct_list;
while (list)
{
if (0 == sl_strcmp(list->name, str))
{
++(list->nlogin);
return list->nlogin;
}
list = list->next;
}
list = SH_ALLOC(sizeof(struct login_ct));
(void) sl_strlcpy(list->name, str, UT_NAMESIZE+1);
list->nlogin = 1;
list->next = login_ct_list;
login_ct_list = list;
return 1;
}
static struct SH_UTMP_S * sh_utmp_getutline(struct SH_UTMP_S * ut)
{
struct SH_UTMP_S * out;
while (1) {
if ((out = sh_utmp_getutent()) == NULL) {
return NULL;
}
#ifdef HAVE_UTTYPE
if (out->ut_type == USER_PROCESS || out->ut_type == LOGIN_PROCESS)
if (sl_strcmp(ut->ut_line, out->ut_line) == 0)
return out;
#else
if ( 0 != sl_strncmp (out->ut_name, "reboot", 6) &&
0 != sl_strncmp (out->ut_name, "shutdown", 8) &&
0 != sl_strncmp (out->ut_name, "date", 4) )
return out;
#endif
}
return NULL;
}
int sh_readconf_set_path (char * which, const char * what)
{
int len;
SL_ENTER( _("sh_readconf_set_path"));
if (which == NULL || what == NULL)
{
TPT((0, FIL__, __LINE__ , _("msg=<Input error>\n")));
SL_RETURN( -1, _("sh_readconf_set_path"));
}
if (0 == sl_strcmp(what, _("AUTO")))
{
len = sl_strlen(which);
if ( (len + sl_strlen(sh.host.name) + 2) > SH_PATHBUF)
{
TPT((0, FIL__, __LINE__ , _("msg=<Path too large: %s:%s>\n"),
which, sh.host.name));
SL_RETURN( -1, _("sh_readconf_set_path"));
}
else
{
which[len] = ':'; which[len+1] = '\0';
sl_strlcat(which, sh.host.name, SH_PATHBUF);
}
}
else /* not auto */
{
if (sl_strlen(what) > (SH_PATHBUF-1))
{
TPT((0, FIL__, __LINE__ , _("msg=<Path too large: %s>\n"), what));
SL_RETURN( -1, _("sh_readconf_set_path"));
}
else
{
sl_strlcpy(which, what, SH_PATHBUF);
}
}
SL_RETURN( 0, _("sh_readconf_set_path"));
}
/* --- Read the configuration file. ---
*/
int sh_readconf_read (void)
{
#if defined (SH_WITH_CLIENT) || defined (SH_STANDALONE)
/* This is for modules.
*/
int modnum;
#endif
int i;
SL_TICKET fd = -1;
#if defined(SH_STEALTH) && !defined(SH_STEALTH_MICRO)
SL_TICKET fdTmp = -1;
#endif
#if defined(WITH_GPG) || defined(WITH_PGP)
SL_TICKET fdGpg = -1;
#endif
char * tmp;
#define SH_LINE_IN 16384
char * line_in;
char * line;
/* This is for nested conditionals.
*/
int cond_depth = 0;
int cond_excl = 0;
int local_file = 1;
char local_flag = 'R';
#if defined(WITH_GPG) || defined(WITH_PGP)
int signed_content = S_FALSE;
int true_content = S_FALSE;
#endif
#if defined(SH_STEALTH) && !defined(SH_STEALTH_MICRO)
int hidden_count = 0;
#endif
uid_t euid;
char hashbuf[KEYBUF_SIZE];
SL_ENTER(_("sh_readconf_read"));
/* --- Open config file, exit on failure. ---
*/
#if defined(SH_WITH_CLIENT)
if (0 == sl_strcmp(file_path('C', 'R'), _("REQ_FROM_SERVER")))
{
sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_D_START);
fd = sh_forward_req_file(_("CONF"));
if (!SL_ISERROR(fd))
{
local_file = 0;
}
else if (sh.flag.checkSum != SH_CHECK_INIT)
{
aud_exit (FIL__, __LINE__, EXIT_FAILURE);
}
else
{
sh_error_handle ((-1), FIL__, __LINE__, fd, MSG_D_FAIL);
local_file = 1;
local_flag = 'I';
}
}
#endif
/* Use a local configuration file.
*/
if (local_file == 1)
{
if (0 != tf_trust_check (file_path('C', local_flag), SL_YESPRIV))
{
sl_get_euid(&euid);
dlog(1, FIL__, __LINE__,
_("The configuration file: %s is untrusted, i.e. an\nuntrusted user owns or can write to some directory in the path.\n"),
( (NULL == file_path('C', local_flag))
? _("(null)") : file_path('C', local_flag) ));
sh_error_handle ((-1), FIL__, __LINE__, EACCES, MSG_TRUST,
(long) euid,
( (NULL == file_path('C', local_flag))
? _("(null)") : file_path('C', local_flag) )
);
aud_exit (FIL__, __LINE__, EXIT_FAILURE);
}
if (SL_ISERROR(fd = sl_open_read(FIL__, __LINE__,
file_path('C',local_flag),SL_YESPRIV)))
{
sl_get_euid(&euid);
dlog(1, FIL__, __LINE__,
_("Could not open the local configuration file for reading because\nof the following error: %s (errnum = %ld)\nIf this is a permission problem, you need to change file permissions\nto make the file readable for the effective UID: %d\n"),
sl_get_errmsg(), fd, (int) euid);
sh_error_handle ((-1), FIL__, __LINE__, fd, MSG_NOACCESS,
(long) euid,
( (NULL == file_path('C', local_flag))
? _("(null)") : file_path('C', local_flag) )
);
aud_exit (FIL__, __LINE__, EXIT_FAILURE);
}
}
/* Compute the checksum of the open file.
*/
sl_strlcpy(sh.conf.hash,
sh_tiger_hash(file_path('C',local_flag), fd, TIGER_NOLIM,
hashbuf, sizeof(hashbuf)),
KEY_LEN+1);
sl_rewind (fd);
line_in = SH_ALLOC(SH_LINE_IN);
#if defined(SH_STEALTH) && !defined(SH_STEALTH_MICRO)
/* extract the data and copy to temporary file
*/
fdTmp = open_tmp();
sh_unix_getline_stealth (0, NULL, 0); /* initialize */
while ( sh_unix_getline_stealth (fd, line_in, SH_LINE_IN-2) > 0) {
hidden_count++;
if (line_in[0] == '\n')
{
sl_write(fdTmp, line_in, 1);
}
else
{
sl_write_line(fdTmp, line_in, sl_strlen(line_in));
}
#if defined(WITH_GPG) || defined(WITH_PGP)
if (0 == sl_strncmp(line_in, _("-----END PGP SIGNATURE-----"), 25))
break;
#else
if (0 == sl_strncmp(line_in, _("[EOF]"), 5))
break;
#endif
if (hidden_count > 1048576) /* arbitrary safeguard, 1024*1024 */
break;
}
sl_close(fd);
fd = fdTmp;
sl_rewind (fd);
#endif
#if defined(WITH_GPG) || defined(WITH_PGP)
/* extract the data and copy to temporary file
*/
fdGpg = sh_gpg_extract_signed(fd);
sl_close(fd);
fd = fdGpg;
/* Validate signature of open file.
*/
if (0 != sh_gpg_check_sign (fd, 0, 1))
{
SH_FREE(line_in);
aud_exit (FIL__, __LINE__, EXIT_FAILURE);
}
sl_rewind (fd);
#endif
/* --- Start reading lines. ---
*/
conf_line = 0;
while ( sh_unix_getline (fd, line_in, SH_LINE_IN-2) > 0) {
++conf_line;
line = &(line_in[0]);
/* fprintf(stderr, "<%s>\n", line); */
/* Sun May 27 18:40:05 CEST 2001
*/
#if defined(WITH_GPG) || defined(WITH_PGP)
if (signed_content == S_FALSE)
{
if (0 == sl_strcmp(line, _("-----BEGIN PGP SIGNED MESSAGE-----")))
signed_content = S_TRUE;
else
continue;
}
else if (true_content == S_FALSE)
{
if (line[0] == '\n')
true_content = S_TRUE;
else
continue;
}
else if (signed_content == S_TRUE)
{
if (0 == sl_strcmp(line, _("-----BEGIN PGP SIGNATURE-----")))
break;
else if (0 == sl_strcmp(line, _("-----BEGIN PGP SIGNED MESSAGE-----")))
{
sh_error_handle((-1), FIL__, __LINE__, 0, MSG_E_SUBGEN,
_("second signed message in file"),
_("sh_readconf_read"));
dlog(1, FIL__, __LINE__,
_("There seems to be more than one signed message in the configuration\nfile. Please make sure there is only one signed message.\n"));
sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_EXIT_ABORT1,
sh.prg_name);
SH_FREE(line_in);
aud_exit (FIL__, __LINE__,EXIT_FAILURE);
}
}
#endif
/* Skip leading white space.
*/
while (isspace((int)*line)) ++line;
/* Skip header etc.
*/
if (line[0] == '#' || line[0] == '\0' || line[0] == ';' ||
(line[0] == '/' && line[1] == '/'))
continue;
/* Clip off trailing white space.
*/
tmp = line + sl_strlen( line ); --tmp;
while( isspace((int) *tmp ) && tmp >= line ) *tmp-- = '\0';
/* --- an @host/@if/$system directive -------------- */
if (line[0] == '@' || (line[0] == '!' && line[1] == '@') ||
line[0] == '$' || (line[0] == '!' && line[1] == '$'))
{
if (sh_readconf_is_end(line))
{
if (0 == cond_depth) {
sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_EINVALD,
_("config file"),
(long) conf_line);
}
else {
if (cond_excl == cond_depth)
cond_excl = 0;
--cond_depth;
}
}
else if (sh_readconf_is_else(line))
{
if (0 == cond_depth) {
sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_EINVALD,
_("config file"),
(long) conf_line);
}
else if (cond_excl == cond_depth) {
cond_excl = 0;
}
else if (cond_excl == 0) {
cond_excl = cond_depth;
}
}
else
{
if (sh_readconf_cond_match(line, conf_line)) {
++cond_depth;
}
else {
++cond_depth;
if (cond_excl == 0)
cond_excl = cond_depth;
}
}
continue;
}
/****************************************************
*
* Only carry on if this section is intended for us
*
****************************************************/
if (cond_excl != 0) {
continue;
}
/* ------- starts a section ------------ */
else if (line[0] == '[')
{
read_mode = SH_SECTION_NONE;
if (0 == sl_strncasecmp (line, _("[EOF]"), 5)) {
goto nopel;
}
i = 0;
while (tab_ListSections[i].name != 0)
{
if (sl_strncasecmp (line, _(tab_ListSections[i].name),
sl_strlen(tab_ListSections[i].name)) == 0)
{
read_mode = tab_ListSections[i].type;
break;
}
++i;
}
#if defined (SH_WITH_CLIENT) || defined (SH_STANDALONE)
if (read_mode == SH_SECTION_NONE)
{
for (modnum = 0; modList[modnum].name != NULL; ++modnum)
{
if (0 == sl_strncasecmp (line, _(modList[modnum].conf_section),
sl_strlen(modList[modnum].conf_section)) )
read_mode = SH_SECTION_OTHER;
}
}
#endif
if (read_mode == SH_SECTION_NONE)
{
sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_EINVALHEAD,
(long) conf_line);
}
}
/* --- an %schedule directive ------------ */
else if (line[0] == '%' || (line[0] == '!' && line[1] == '%'))
{
#if defined (SH_WITH_CLIENT) || defined (SH_STANDALONE)
if (line[0] == '!' && 0 == sl_strcasecmp(&(line[2]), _("SCHEDULE_TWO")))
set_dirList(1);
else if (0 == sl_strcasecmp(&(line[1]), _("SCHEDULE_TWO")))
set_dirList(2);
#else
;
#endif
}
/* ------ no new section -------------- */
else if (read_mode != SH_SECTION_NONE)
{
if (0 != sh_readconfig_line (line))
{
sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_EINVALCONF,
(long) conf_line);
}
}
} /* while getline() */
nopel:
if (0 != cond_depth)
sh_error_handle ((-1), FIL__, __LINE__, 0, MSG_EINVALDD,
_("config file"),
(long) conf_line);
sl_close (fd);
sh_error_fixup();
read_mode = SH_SECTION_NONE; /* reset b/o sighup reload */
SH_FREE(line_in);
SL_RETURN( 0, _("sh_readconf_read"));
}
