#define _SUDO_SUDO_C
#include "config.h"
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/param.h>
#include <sys/socket.h>
#ifdef HAVE_SETRLIMIT
# include <sys/time.h>
# include <sys/resource.h>
#endif
#include <stdio.h>
#ifdef STDC_HEADERS
# include <stdlib.h>
# include <stddef.h>
#else
# ifdef HAVE_STDLIB_H
# include <stdlib.h>
# endif
#endif
#ifdef HAVE_STRING_H
# if defined(HAVE_MEMORY_H) && !defined(STDC_HEADERS)
# include <memory.h>
# endif
# include <string.h>
#else
# ifdef HAVE_STRINGS_H
# include <strings.h>
# endif
#endif
#ifdef HAVE_UNISTD_H
# include <unistd.h>
#endif
#include <pwd.h>
#include <errno.h>
#include <fcntl.h>
#include <signal.h>
#include <grp.h>
#include <time.h>
#include <netinet/in.h>
#include <netdb.h>
#if defined(HAVE_GETPRPWNAM) && defined(HAVE_SET_AUTH_PARAMETERS)
# ifdef __hpux
# undef MAXINT
# include <hpsecurity.h>
# else
# include <sys/security.h>
# endif
# include <prot.h>
#endif
#ifdef HAVE_LOGIN_CAP_H
# include <login_cap.h>
# ifndef LOGIN_DEFROOTCLASS
# define LOGIN_DEFROOTCLASS "daemon"
# endif
#endif
#include "sudo.h"
#include "interfaces.h"
#include "version.h"
#ifndef lint
static const char rcsid[] = "$Sudo: sudo.c,v 1.318 2002/01/15 23:43:59 millert Exp $";
#endif
static int init_vars __P((int));
static int parse_args __P((void));
static void check_sudoers __P((void));
static void initial_setup __P((void));
static void set_loginclass __P((struct passwd *));
static void usage __P((int));
static void usage_excl __P((int));
static struct passwd *get_authpw __P((void));
extern void list_matches __P((void));
extern char **rebuild_env __P((int, char **));
extern char **zero_env __P((char **));
extern struct passwd *sudo_getpwnam __P((const char *));
extern struct passwd *sudo_getpwuid __P((uid_t));
int Argc;
char **Argv;
int NewArgc = 0;
char **NewArgv = NULL;
struct sudo_user sudo_user;
struct passwd *auth_pw;
FILE *sudoers_fp = NULL;
struct interface *interfaces;
int num_interfaces;
int tgetpass_flags;
extern int errorlineno;
#if defined(RLIMIT_CORE) && !defined(SUDO_DEVEL)
static struct rlimit corelimit;
#endif
#ifdef HAVE_LOGIN_CAP_H
login_cap_t *lc;
#endif
#ifdef HAVE_BSD_AUTH_H
char *login_style;
#endif
void (*set_perms) __P((int, int));
int
main(argc, argv, envp)
int argc;
char **argv;
char **envp;
{
int validated;
int fd;
int cmnd_status;
int sudo_mode;
int pwflag;
char **new_environ;
sigaction_t sa;
extern int printmatches;
extern char **environ;
#if defined(HAVE_GETPRPWNAM) && defined(HAVE_SET_AUTH_PARAMETERS)
(void) set_auth_parameters(argc, argv);
# ifdef HAVE_INITPRIVS
initprivs();
# endif
#endif
environ = zero_env(envp);
Argv = argv;
Argc = argc;
if (geteuid() != 0) {
(void) fprintf(stderr, "Sorry, %s must be setuid root.\n", Argv[0]);
exit(1);
}
sigemptyset(&sa.sa_mask);
sa.sa_flags = SA_RESTART;
sa.sa_handler = SIG_IGN;
(void) sigaction(SIGINT, &sa, NULL);
(void) sigaction(SIGQUIT, &sa, NULL);
(void) sigaction(SIGTSTP, &sa, NULL);
initial_setup();
setpwent();
sudo_mode = parse_args();
init_defaults();
load_interfaces();
pwflag = 0;
if (sudo_mode & MODE_SHELL)
user_cmnd = "shell";
else
switch (sudo_mode) {
case MODE_VERSION:
(void) printf("Sudo version %s\n", version);
if (getuid() == 0) {
putchar('\n');
dump_auth_methods();
dump_defaults();
dump_interfaces();
dump_badenv();
}
exit(0);
break;
case MODE_HELP:
usage(0);
break;
case MODE_VALIDATE:
user_cmnd = "validate";
pwflag = I_VERIFYPW_I;
break;
case MODE_KILL:
case MODE_INVALIDATE:
user_cmnd = "kill";
pwflag = -1;
break;
case MODE_LISTDEFS:
list_options();
exit(0);
break;
case MODE_LIST:
user_cmnd = "list";
pwflag = I_LISTPW_I;
printmatches = 1;
break;
}
if (user_cmnd == NULL && NewArgc == 0)
usage(1);
cmnd_status = init_vars(sudo_mode);
check_sudoers();
validated = sudoers_lookup(pwflag);
#if !defined(NO_SAVED_IDS) && defined(_SC_SAVED_IDS) && defined(_SC_VERSION)
if (!def_flag(I_STAY_SETUID) && set_perms == set_perms_posix) {
if (setuid(0)) {
perror("setuid(0)");
exit(1);
}
set_perms = set_perms_fallback;
}
#endif
if (**user_runas == '#') {
runas_pw = sudo_getpwuid(atoi(*user_runas + 1));
if (runas_pw == NULL) {
runas_pw = emalloc(sizeof(struct passwd));
(void) memset((VOID *)runas_pw, 0, sizeof(struct passwd));
runas_pw->pw_uid = atoi(*user_runas + 1);
}
} else {
runas_pw = sudo_getpwnam(*user_runas);
if (runas_pw == NULL)
log_error(NO_MAIL|MSG_ONLY, "no passwd entry for %s!", *user_runas);
}
if (sudo_mode == MODE_KILL || sudo_mode == MODE_INVALIDATE) {
remove_timestamp((sudo_mode == MODE_KILL));
exit(0);
}
if (validated & VALIDATE_ERROR)
log_error(0, "parse error in %s near line %d", _PATH_SUDOERS,
errorlineno);
if (user_uid == 0 && !def_flag(I_ROOT_SUDO)) {
(void) fputs("You are already root, you don't need to use sudo.\n",
stderr);
exit(1);
}
if (sudo_mode & MODE_PRESERVE_GROUPS)
def_flag(I_PRESERVE_GROUPS) = TRUE;
if ((sudo_mode & MODE_IMPLIED_SHELL) && !def_flag(I_SHELL_NOARGS))
usage(1);
if ((sudo_mode & MODE_RUN) && (def_flag(I_ALWAYS_SET_HOME) ||
((sudo_mode & MODE_SHELL) && def_flag(I_SET_HOME))))
sudo_mode |= MODE_RESET_HOME;
if (def_flag(I_REQUIRETTY)) {
if ((fd = open(_PATH_TTY, O_RDWR|O_NOCTTY)) == -1)
log_error(NO_MAIL, "sorry, you must have a tty to run sudo");
else
(void) close(fd);
}
auth_pw = get_authpw();
if (!(validated & FLAG_NOPASS))
check_user();
new_environ = rebuild_env(sudo_mode, envp);
if (validated & VALIDATE_OK) {
if (cmnd_status == NOT_FOUND_DOT) {
(void) fprintf(stderr, "%s: ignoring `%s' found in '.'\nUse `sudo ./%s' if this is the `%s' you wish to run.\n", Argv[0], user_cmnd, user_cmnd, user_cmnd);
exit(1);
} else if (cmnd_status == NOT_FOUND) {
(void) fprintf(stderr, "%s: %s: command not found\n", Argv[0],
user_cmnd);
exit(1);
}
log_auth(validated, 1);
if (sudo_mode == MODE_VALIDATE)
exit(0);
else if (sudo_mode == MODE_LIST) {
list_matches();
exit(0);
}
if (safe_cmnd == NULL) {
log_error(MSG_ONLY,
"internal error, safe_cmnd never got set for %s; %s",
user_cmnd,
"please report this error at http://courtesan.com/sudo/bugs/");
}
sigemptyset(&sa.sa_mask);
sa.sa_flags = SA_RESTART;
sa.sa_handler = SIG_DFL;
(void) sigaction(SIGINT, &sa, NULL);
(void) sigaction(SIGQUIT, &sa, NULL);
(void) sigaction(SIGTSTP, &sa, NULL);
if (def_ival(I_UMASK) != 0777)
(void) umask(def_mode(I_UMASK));
#if defined(RLIMIT_CORE) && !defined(SUDO_DEVEL)
(void) setrlimit(RLIMIT_CORE, &corelimit);
#endif
set_perms(PERM_RUNAS, sudo_mode);
endpwent();
endgrent();
environ = new_environ;
#ifndef PROFILING
if ((sudo_mode & MODE_BACKGROUND) && fork() > 0)
exit(0);
else
EXEC(safe_cmnd, NewArgv);
#else
exit(0);
#endif
(void) fprintf(stderr, "%s: unable to exec %s: %s\n",
Argv[0], safe_cmnd, strerror(errno));
exit(127);
} else if ((validated & FLAG_NO_USER) || (validated & FLAG_NO_HOST)) {
log_auth(validated, 1);
exit(1);
} else if (validated & VALIDATE_NOT_OK) {
if (def_flag(I_PATH_INFO)) {
log_auth(validated,
!(cmnd_status == NOT_FOUND_DOT || cmnd_status == NOT_FOUND));
if (cmnd_status == NOT_FOUND)
(void) fprintf(stderr, "%s: %s: command not found\n", Argv[0],
user_cmnd);
else if (cmnd_status == NOT_FOUND_DOT)
(void) fprintf(stderr, "%s: ignoring `%s' found in '.'\nUse `sudo ./%s' if this is the `%s' you wish to run.\n", Argv[0], user_cmnd, user_cmnd, user_cmnd);
} else {
log_auth(validated, 1);
}
exit(1);
} else {
log_auth(validated, 1);
exit(1);
}
exit(0);
}
static int
init_vars(sudo_mode)
int sudo_mode;
{
char *p, thost[MAXHOSTNAMELEN];
int nohostname, rval;
if (user_cmnd == NULL && strlen(NewArgv[0]) >= MAXPATHLEN) {
(void) fprintf(stderr, "%s: %s: Pathname too long\n", Argv[0],
NewArgv[0]);
exit(1);
}
#ifdef HAVE_TZSET
(void) tzset();
#endif
if (user_cmnd == NULL)
user_cmnd = NewArgv[0];
(void) strcpy(user_cwd, "unknown");
nohostname = gethostname(thost, sizeof(thost));
if (nohostname)
user_host = user_shost = "localhost";
else {
user_host = estrdup(thost);
if (def_flag(I_FQDN)) {
user_shost = user_host;
} else {
if ((p = strchr(user_host, '.'))) {
*p = '\0';
user_shost = estrdup(user_host);
*p = '.';
} else {
user_shost = user_host;
}
}
}
if ((p = ttyname(STDIN_FILENO)) || (p = ttyname(STDOUT_FILENO))) {
if (strncmp(p, _PATH_DEV, sizeof(_PATH_DEV) - 1) == 0)
p += sizeof(_PATH_DEV) - 1;
user_tty = estrdup(p);
} else
user_tty = "unknown";
if ((sudo_user.pw = sudo_getpwuid(getuid())) == NULL) {
struct passwd pw;
char pw_name[MAX_UID_T_LEN + 1];
pw.pw_uid = getuid();
(void) sprintf(pw_name, "%ld", (long) pw.pw_uid);
pw.pw_name = pw_name;
sudo_user.pw = &pw;
log_error(0, "uid %ld does not exist in the passwd file!",
(long) pw.pw_uid);
}
if (user_shell == NULL || *user_shell == '\0')
user_shell = sudo_user.pw->pw_shell;
if (def_flag(I_FQDN))
set_fqdn();
if (nohostname)
log_error(USE_ERRNO|MSG_ONLY, "can't get hostname");
set_perms(PERM_USER, sudo_mode);
if (!getcwd(user_cwd, sizeof(user_cwd))) {
set_perms(PERM_ROOT, sudo_mode);
if (!getcwd(user_cwd, sizeof(user_cwd))) {
(void) fprintf(stderr, "%s: Can't get working directory!\n",
Argv[0]);
(void) strcpy(user_cwd, "unknown");
}
} else
set_perms(PERM_ROOT, sudo_mode);
if ((sudo_mode & MODE_SHELL)) {
char **dst, **src = NewArgv;
NewArgv = (char **) emalloc (sizeof(char *) * (++NewArgc + 1));
if (user_shell && *user_shell) {
NewArgv[0] = user_shell;
} else {
(void) fprintf(stderr, "%s: Unable to determine shell.", Argv[0]);
exit(1);
}
for (dst = NewArgv + 1; (*dst = *src) != NULL; ++src, ++dst)
;
}
set_loginclass(sudo_user.pw);
if ((sudo_mode & MODE_RUN)) {
rval = find_path(NewArgv[0], &user_cmnd, user_path);
if (rval != FOUND) {
set_perms(PERM_USER, sudo_mode);
rval = find_path(NewArgv[0], &user_cmnd, user_path);
set_perms(PERM_ROOT, sudo_mode);
}
if (NewArgc > 1) {
char *to, **from;
size_t size;
if (!(sudo_mode & MODE_SHELL)) {
size = (size_t) (NewArgv[NewArgc-1] - NewArgv[1]) +
strlen(NewArgv[NewArgc-1]) + 1;
} else {
for (size = 0, from = NewArgv + 1; *from; from++)
size += strlen(*from) + 1;
}
to = user_args = (char *) emalloc(size);
for (from = NewArgv + 1; *from; from++) {
(void) strcpy(to, *from);
to += strlen(*from);
*to++ = ' ';
}
*--to = '\0';
}
} else
rval = FOUND;
return(rval);
}
static int
parse_args()
{
int rval = MODE_RUN;
int excl = 0;
NewArgv = Argv + 1;
NewArgc = Argc - 1;
if (NewArgc == 0) {
rval |= (MODE_IMPLIED_SHELL | MODE_SHELL);
return(rval);
}
while (NewArgc > 0 && NewArgv[0][0] == '-') {
if (NewArgv[0][1] != '\0' && NewArgv[0][2] != '\0') {
(void) fprintf(stderr, "%s: Please use single character options\n",
Argv[0]);
usage(1);
}
switch (NewArgv[0][1]) {
case 'p':
if (NewArgv[1] == NULL)
usage(1);
user_prompt = NewArgv[1];
NewArgc--;
NewArgv++;
break;
case 'u':
if (NewArgv[1] == NULL)
usage(1);
user_runas = &NewArgv[1];
NewArgc--;
NewArgv++;
break;
#ifdef HAVE_BSD_AUTH_H
case 'a':
if (NewArgv[1] == NULL)
usage(1);
login_style = NewArgv[1];
NewArgc--;
NewArgv++;
break;
#endif
#ifdef HAVE_LOGIN_CAP_H
case 'c':
if (NewArgv[1] == NULL)
usage(1);
login_class = NewArgv[1];
def_flag(I_USE_LOGINCLASS) = TRUE;
NewArgc--;
NewArgv++;
break;
#endif
case 'b':
rval |= MODE_BACKGROUND;
break;
case 'v':
rval = MODE_VALIDATE;
if (excl && excl != 'v')
usage_excl(1);
excl = 'v';
break;
case 'k':
rval = MODE_INVALIDATE;
if (excl && excl != 'k')
usage_excl(1);
excl = 'k';
break;
case 'K':
rval = MODE_KILL;
if (excl && excl != 'K')
usage_excl(1);
excl = 'K';
break;
case 'L':
rval = MODE_LISTDEFS;
if (excl && excl != 'L')
usage_excl(1);
excl = 'L';
break;
case 'l':
rval = MODE_LIST;
if (excl && excl != 'l')
usage_excl(1);
excl = 'l';
break;
case 'V':
rval = MODE_VERSION;
if (excl && excl != 'V')
usage_excl(1);
excl = 'V';
break;
case 'h':
rval = MODE_HELP;
if (excl && excl != 'h')
usage_excl(1);
excl = 'h';
break;
case 's':
rval |= MODE_SHELL;
if (excl && excl != 's')
usage_excl(1);
excl = 's';
break;
case 'H':
rval |= MODE_RESET_HOME;
break;
case 'P':
rval |= MODE_PRESERVE_GROUPS;
break;
case 'S':
tgetpass_flags |= TGP_STDIN;
break;
case '-':
NewArgc--;
NewArgv++;
if (rval == MODE_RUN)
rval |= (MODE_IMPLIED_SHELL | MODE_SHELL);
return(rval);
case '\0':
(void) fprintf(stderr, "%s: '-' requires an argument\n",
Argv[0]);
usage(1);
default:
(void) fprintf(stderr, "%s: Illegal option %s\n", Argv[0],
NewArgv[0]);
usage(1);
}
NewArgc--;
NewArgv++;
}
if (NewArgc > 0 && !(rval & MODE_RUN))
usage(1);
return(rval);
}
static void
check_sudoers()
{
struct stat statbuf;
int rootstat, i;
char c;
if ((rootstat = lstat(_PATH_SUDOERS, &statbuf)) == 0 &&
SUDOERS_UID == statbuf.st_uid && SUDOERS_MODE != 0400 &&
(statbuf.st_mode & 0007777) == 0400) {
if (chmod(_PATH_SUDOERS, SUDOERS_MODE) == 0) {
(void) fprintf(stderr, "%s: fixed mode on %s\n",
Argv[0], _PATH_SUDOERS);
statbuf.st_mode |= SUDOERS_MODE;
if (statbuf.st_gid != SUDOERS_GID) {
if (!chown(_PATH_SUDOERS,(uid_t) -1,SUDOERS_GID)) {
(void) fprintf(stderr, "%s: set group on %s\n",
Argv[0], _PATH_SUDOERS);
statbuf.st_gid = SUDOERS_GID;
} else {
(void) fprintf(stderr,"%s: Unable to set group on %s: %s\n",
Argv[0], _PATH_SUDOERS, strerror(errno));
}
}
} else {
(void) fprintf(stderr, "%s: Unable to fix mode on %s: %s\n",
Argv[0], _PATH_SUDOERS, strerror(errno));
}
}
set_perms(PERM_SUDOERS, 0);
if (rootstat != 0 && lstat(_PATH_SUDOERS, &statbuf) != 0)
log_error(USE_ERRNO, "can't stat %s", _PATH_SUDOERS);
else if (!S_ISREG(statbuf.st_mode))
log_error(0, "%s is not a regular file", _PATH_SUDOERS);
else if (statbuf.st_size == 0)
log_error(0, "%s is zero length", _PATH_SUDOERS);
else if ((statbuf.st_mode & 07777) != SUDOERS_MODE)
log_error(0, "%s is mode 0%o, should be 0%o", _PATH_SUDOERS,
(statbuf.st_mode & 07777), SUDOERS_MODE);
else if (statbuf.st_uid != SUDOERS_UID)
log_error(0, "%s is owned by uid %ld, should be %d", _PATH_SUDOERS,
(long) statbuf.st_uid, SUDOERS_UID);
else if (statbuf.st_gid != SUDOERS_GID)
log_error(0, "%s is owned by gid %ld, should be %d", _PATH_SUDOERS,
(long) statbuf.st_gid, SUDOERS_GID);
else {
for (i = 0; i < 10 ; i++) {
errno = 0;
if ((sudoers_fp = fopen(_PATH_SUDOERS, "r")) == NULL ||
fread(&c, sizeof(c), 1, sudoers_fp) != 1) {
sudoers_fp = NULL;
if (errno != EAGAIN && errno != EWOULDBLOCK)
break;
} else
break;
sleep(1);
}
if (sudoers_fp == NULL)
log_error(USE_ERRNO, "can't open %s", _PATH_SUDOERS);
}
set_perms(PERM_ROOT, 0);
}
static void
initial_setup()
{
int fd, maxfd;
#ifdef HAVE_SETRLIMIT
struct rlimit rl;
#endif
sigaction_t sa;
#if defined(RLIMIT_CORE) && !defined(SUDO_DEVEL)
(void) getrlimit(RLIMIT_CORE, &corelimit);
rl.rlim_cur = rl.rlim_max = 0;
(void) setrlimit(RLIMIT_CORE, &rl);
#endif
#ifdef HAVE_SYSCONF
maxfd = sysconf(_SC_OPEN_MAX) - 1;
#else
maxfd = getdtablesize() - 1;
#endif
#ifdef RLIMIT_NOFILE
if (getrlimit(RLIMIT_NOFILE, &rl) == 0) {
if (rl.rlim_max != RLIM_INFINITY && rl.rlim_max <= maxfd)
maxfd = rl.rlim_max - 1;
}
#endif
for (fd = maxfd; fd > STDERR_FILENO; fd--)
(void) close(fd);
sigemptyset(&sa.sa_mask);
sa.sa_flags = SA_RESTART;
sa.sa_handler = reapchild;
(void) sigaction(SIGCHLD, &sa, NULL);
#if !defined(NO_SAVED_IDS) && defined(_SC_SAVED_IDS) && defined(_SC_VERSION)
if (sysconf(_SC_SAVED_IDS) == 1 && sysconf(_SC_VERSION) >= 199009)
set_perms = set_perms_posix;
else
#endif
set_perms = set_perms_fallback;
}
#ifdef HAVE_LOGIN_CAP_H
static void
set_loginclass(pw)
struct passwd *pw;
{
int errflags;
if (login_class)
errflags = NO_MAIL|MSG_ONLY;
else
errflags = NO_MAIL|MSG_ONLY|NO_EXIT;
if (login_class && strcmp(login_class, "-") != 0) {
if (strcmp(*user_runas, "root") != 0 && user_uid != 0) {
(void) fprintf(stderr, "%s: only root can use -c %s\n",
Argv[0], login_class);
exit(1);
}
} else {
login_class = pw->pw_class;
if (!login_class || !*login_class)
login_class =
(pw->pw_uid == 0) ? LOGIN_DEFROOTCLASS : LOGIN_DEFCLASS;
}
lc = login_getclass(login_class);
if (!lc || !lc->lc_class || strcmp(lc->lc_class, login_class) != 0) {
log_error(errflags, "unknown login class: %s", login_class);
if (!lc)
lc = login_getclass(NULL);
}
}
#else
static void
set_loginclass(pw)
struct passwd *pw;
{
}
#endif
void
set_fqdn()
{
struct hostent *hp;
char *p;
if (!(hp = gethostbyname(user_host))) {
log_error(MSG_ONLY|NO_EXIT,
"unable to lookup %s via gethostbyname()", user_host);
} else {
if (user_shost != user_host)
free(user_shost);
free(user_host);
user_host = estrdup(hp->h_name);
}
if ((p = strchr(user_host, '.'))) {
*p = '\0';
user_shost = estrdup(user_host);
*p = '.';
} else {
user_shost = user_host;
}
}
static struct passwd *
get_authpw()
{
struct passwd *pw;
if (def_ival(I_ROOTPW)) {
if ((pw = sudo_getpwuid(0)) == NULL)
log_error(0, "uid 0 does not exist in the passwd file!");
} else if (def_ival(I_RUNASPW)) {
if ((pw = sudo_getpwnam(def_str(I_RUNAS_DEFAULT))) == NULL)
log_error(0, "user %s does not exist in the passwd file!",
def_str(I_RUNAS_DEFAULT));
} else if (def_ival(I_TARGETPW)) {
if (**user_runas == '#') {
if ((pw = sudo_getpwuid(atoi(*user_runas + 1))) == NULL)
log_error(0, "uid %s does not exist in the passwd file!",
user_runas);
} else {
if ((pw = sudo_getpwnam(*user_runas)) == NULL)
log_error(0, "user %s does not exist in the passwd file!",
user_runas);
}
} else
pw = sudo_user.pw;
return(pw);
}
static void
usage_excl(exit_val)
int exit_val;
{
(void) fprintf(stderr,
"Only one of the -h, -k, -K, -l, -s, -v or -V options may be used\n");
usage(exit_val);
}
static void
usage(exit_val)
int exit_val;
{
(void) fprintf(stderr, "usage: sudo -V | -h | -L | -l | -v | -k | -K | %s",
"[-H] [-P] [-S] [-b] [-p prompt]\n [-u username/#uid] ");
#ifdef HAVE_LOGIN_CAP_H
(void) fprintf(stderr, "[-c class] ");
#endif
#ifdef HAVE_BSD_AUTH_H
(void) fprintf(stderr, "[-a auth_type] ");
#endif
(void) fprintf(stderr, "-s | <command>\n");
exit(exit_val);
}