d98d8c85ff5bc566540ec3e236592ea40ab7eddd
[debian/sudo] / sudo.c
1 /*
2  * Copyright (c) 1993-1996,1998-2007 Todd C. Miller <Todd.Miller@courtesan.com>
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  *
8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15  *
16  * Sponsored in part by the Defense Advanced Research Projects
17  * Agency (DARPA) and Air Force Research Laboratory, Air Force
18  * Materiel Command, USAF, under agreement number F39502-99-1-0512.
19  *
20  * For a brief history of sudo, please see the HISTORY file included
21  * with this distribution.
22  */
23
24 #define _SUDO_MAIN
25
26 #ifdef __TANDEM
27 # include <floss.h>
28 #endif
29
30 #include <config.h>
31
32 #include <sys/types.h>
33 #include <sys/stat.h>
34 #include <sys/param.h>
35 #include <sys/socket.h>
36 #ifdef HAVE_SETRLIMIT
37 # include <sys/time.h>
38 # include <sys/resource.h>
39 #endif
40 #include <stdio.h>
41 #ifdef STDC_HEADERS
42 # include <stdlib.h>
43 # include <stddef.h>
44 #else
45 # ifdef HAVE_STDLIB_H
46 #  include <stdlib.h>
47 # endif
48 #endif /* STDC_HEADERS */
49 #ifdef HAVE_STRING_H
50 # if defined(HAVE_MEMORY_H) && !defined(STDC_HEADERS)
51 #  include <memory.h>
52 # endif
53 # include <string.h>
54 #else
55 # ifdef HAVE_STRINGS_H
56 #  include <strings.h>
57 # endif
58 #endif /* HAVE_STRING_H */
59 #ifdef HAVE_UNISTD_H
60 # include <unistd.h>
61 #endif /* HAVE_UNISTD_H */
62 #ifdef HAVE_ERR_H
63 # include <err.h>
64 #else
65 # include "emul/err.h"
66 #endif /* HAVE_ERR_H */
67 #include <pwd.h>
68 #include <errno.h>
69 #include <fcntl.h>
70 #include <signal.h>
71 #include <grp.h>
72 #if TIME_WITH_SYS_TIME
73 # include <time.h>
74 #endif
75 #ifdef HAVE_SETLOCALE
76 # include <locale.h>
77 #endif
78 #include <netinet/in.h>
79 #include <netdb.h>
80 #if defined(HAVE_GETPRPWNAM) && defined(HAVE_SET_AUTH_PARAMETERS)
81 # ifdef __hpux
82 #  undef MAXINT
83 #  include <hpsecurity.h>
84 # else
85 #  include <sys/security.h>
86 # endif /* __hpux */
87 # include <prot.h>
88 #endif /* HAVE_GETPRPWNAM && HAVE_SET_AUTH_PARAMETERS */
89 #ifdef HAVE_LOGIN_CAP_H
90 # include <login_cap.h>
91 # ifndef LOGIN_DEFROOTCLASS
92 #  define LOGIN_DEFROOTCLASS    "daemon"
93 # endif
94 #endif
95 #ifdef HAVE_PROJECT_H
96 # include <project.h>
97 # include <sys/task.h>
98 #endif
99
100 #include "sudo.h"
101 #include "interfaces.h"
102 #include "version.h"
103
104 #ifndef lint
105 __unused __unused static const char rcsid[] = "$Sudo: sudo.c,v 1.369.2.33 2007/12/02 17:13:52 millert Exp $";
106 #endif /* lint */
107
108 /*
109  * Prototypes
110  */
111 static int init_vars                    __P((int, char **));
112 static int parse_args                   __P((int, char **));
113 static void check_sudoers               __P((void));
114 static void initial_setup               __P((void));
115 static void set_loginclass              __P((struct passwd *));
116 static void set_project                 __P((struct passwd *));
117 static void usage                       __P((int))
118                                             __attribute__((__noreturn__));
119 static void usage_excl                  __P((int))
120                                             __attribute__((__noreturn__));
121 static void usage_excl                  __P((int));
122 static struct passwd *get_authpw        __P((void));
123 extern int sudo_edit                    __P((int, char **, char **));
124 extern void list_matches                __P((void));
125 extern char **rebuild_env               __P((char **, int, int));
126 extern void validate_env_vars           __P((struct list_member *));
127 extern char **insert_env_vars           __P((char **, struct list_member *));
128 extern struct passwd *sudo_getpwnam     __P((const char *));
129 extern struct passwd *sudo_getpwuid     __P((uid_t));
130 extern struct passwd *sudo_pwdup        __P((const struct passwd *));
131
132 /*
133  * Globals
134  */
135 int Argc, NewArgc;
136 char **Argv, **NewArgv;
137 char *prev_user;
138 struct sudo_user sudo_user;
139 struct passwd *auth_pw;
140 FILE *sudoers_fp;
141 struct interface *interfaces;
142 int num_interfaces;
143 int tgetpass_flags;
144 uid_t timestamp_uid;
145 extern int errorlineno;
146 #if defined(RLIMIT_CORE) && !defined(SUDO_DEVEL)
147 static struct rlimit corelimit;
148 #endif /* RLIMIT_CORE && !SUDO_DEVEL */
149 #ifdef HAVE_LOGIN_CAP_H
150 login_cap_t *lc;
151 #endif /* HAVE_LOGIN_CAP_H */
152 #ifdef HAVE_BSD_AUTH_H
153 char *login_style;
154 #endif /* HAVE_BSD_AUTH_H */
155 sigaction_t saved_sa_int, saved_sa_quit, saved_sa_tstp, saved_sa_chld;
156
157
158 int
159 main(argc, argv, envp)
160     int argc;
161     char **argv;
162     char **envp;
163 {
164     int validated;
165     int fd;
166     int cmnd_status;
167     int sudo_mode;
168     int pwflag;
169     sigaction_t sa;
170     extern int printmatches;
171     extern char **environ;
172
173 #ifdef HAVE_SETLOCALE
174     setlocale(LC_ALL, "");
175 #endif
176
177     Argv = argv;
178     if ((Argc = argc) < 1)
179         usage(1);
180
181     /* Must be done as the first thing... */
182 #if defined(HAVE_GETPRPWNAM) && defined(HAVE_SET_AUTH_PARAMETERS)
183     (void) set_auth_parameters(Argc, Argv);
184 # ifdef HAVE_INITPRIVS
185     initprivs();
186 # endif
187 #endif /* HAVE_GETPRPWNAM && HAVE_SET_AUTH_PARAMETERS */
188
189     if (geteuid() != 0)
190         errx(1, "must be setuid root");
191
192     /*
193      * Signal setup:
194      *  Ignore keyboard-generated signals so the user cannot interrupt
195      *  us at some point and avoid the logging.
196      *  Install handler to wait for children when they exit.
197      */
198     sigemptyset(&sa.sa_mask);
199     sa.sa_flags = SA_RESTART;
200     sa.sa_handler = SIG_IGN;
201     (void) sigaction(SIGINT, &sa, &saved_sa_int);
202     (void) sigaction(SIGQUIT, &sa, &saved_sa_quit);
203     (void) sigaction(SIGTSTP, &sa, &saved_sa_tstp);
204     sa.sa_handler = reapchild;
205     (void) sigaction(SIGCHLD, &sa, &saved_sa_chld);
206
207     /*
208      * Turn off core dumps and close open files.
209      */
210     initial_setup();
211     setpwent();
212
213     /* Parse our arguments. */
214     sudo_mode = parse_args(Argc, Argv);
215
216     /* Setup defaults data structures. */
217     init_defaults();
218
219     /* Load the list of local ip addresses and netmasks.  */
220     load_interfaces();
221
222     pwflag = 0;
223     if (ISSET(sudo_mode, MODE_SHELL))
224         user_cmnd = "shell";
225     else if (ISSET(sudo_mode, MODE_EDIT))
226         user_cmnd = "sudoedit";
227     else
228         switch (sudo_mode) {
229             case MODE_VERSION:
230                 (void) printf("Sudo version %s\n", version);
231                 if (getuid() == 0) {
232                     putchar('\n');
233                     (void) printf("Sudoers path: %s\n", _PATH_SUDOERS);
234                     dump_auth_methods();
235                     dump_defaults();
236                     dump_interfaces();
237                 }
238                 exit(0);
239                 break;
240             case MODE_HELP:
241                 usage(0);
242                 break;
243             case MODE_VALIDATE:
244                 user_cmnd = "validate";
245                 pwflag = I_VERIFYPW;
246                 break;
247             case MODE_KILL:
248             case MODE_INVALIDATE:
249                 user_cmnd = "kill";
250                 pwflag = -1;
251                 break;
252             case MODE_LISTDEFS:
253                 list_options();
254                 exit(0);
255                 break;
256             case MODE_LIST:
257                 user_cmnd = "list";
258                 pwflag = I_LISTPW;
259                 printmatches = 1;
260                 break;
261         }
262
263     /* Must have a command to run... */
264     if (user_cmnd == NULL && NewArgc == 0)
265         usage(1);
266
267     cmnd_status = init_vars(sudo_mode, environ);
268
269 #ifdef HAVE_LDAP
270     validated = sudo_ldap_check(pwflag);
271
272     /* Skip reading /etc/sudoers if LDAP told us to */
273     if (def_ignore_local_sudoers); /* skips */
274     else if (ISSET(validated, VALIDATE_OK) && !printmatches); /* skips */
275     else if (ISSET(validated, VALIDATE_OK) && printmatches)
276     {
277         check_sudoers();        /* check mode/owner on _PATH_SUDOERS */
278
279         /* User is found in LDAP and we want a list of all sudo commands the
280          * user can do, so consult sudoers but throw away result.
281          */
282         sudoers_lookup(pwflag);
283     }
284     else
285 #endif
286     {
287         check_sudoers();        /* check mode/owner on _PATH_SUDOERS */
288
289         /* Validate the user but don't search for pseudo-commands. */
290         validated = sudoers_lookup(pwflag);
291     }
292     if (safe_cmnd == NULL)
293         safe_cmnd = estrdup(user_cmnd);
294
295     /*
296      * Look up the timestamp dir owner if one is specified.
297      */
298     if (def_timestampowner) {
299         struct passwd *pw;
300
301         if (*def_timestampowner == '#')
302             pw = getpwuid(atoi(def_timestampowner + 1));
303         else
304             pw = getpwnam(def_timestampowner);
305         if (!pw)
306             log_error(0, "timestamp owner (%s): No such user",
307                 def_timestampowner);
308         timestamp_uid = pw->pw_uid;
309     }
310
311     /* This goes after the sudoers parse since we honor sudoers options. */
312     if (sudo_mode == MODE_KILL || sudo_mode == MODE_INVALIDATE) {
313         remove_timestamp((sudo_mode == MODE_KILL));
314         exit(0);
315     }
316
317     if (ISSET(validated, VALIDATE_ERROR))
318         log_error(0, "parse error in %s near line %d", _PATH_SUDOERS,
319             errorlineno);
320
321     /* Is root even allowed to run sudo? */
322     if (user_uid == 0 && !def_root_sudo) {
323         (void) fprintf(stderr,
324             "Sorry, %s has been configured to not allow root to run it.\n",
325             getprogname());
326         exit(1);
327     }
328
329     /* If given the -P option, set the "preserve_groups" flag. */
330     if (ISSET(sudo_mode, MODE_PRESERVE_GROUPS))
331         def_preserve_groups = TRUE;
332
333     /* If no command line args and "set_home" is not set, error out. */
334     if (ISSET(sudo_mode, MODE_IMPLIED_SHELL) && !def_shell_noargs)
335         usage(1);
336
337     /* Bail if a tty is required and we don't have one.  */
338     if (def_requiretty) {
339         if ((fd = open(_PATH_TTY, O_RDWR|O_NOCTTY)) == -1)
340             log_error(NO_MAIL, "sorry, you must have a tty to run sudo");
341         else
342             (void) close(fd);
343     }
344
345     /* User may have overriden environment resetting via the -E flag. */
346     if (ISSET(sudo_mode, MODE_PRESERVE_ENV) && ISSET(validated, FLAG_SETENV))
347         def_env_reset = FALSE;
348
349     /* Build a new environment that avoids any nasty bits. */
350     environ = rebuild_env(environ, sudo_mode, ISSET(validated, FLAG_NOEXEC));
351
352     /* Fill in passwd struct based on user we are authenticating as.  */
353     auth_pw = get_authpw();
354
355     /* Require a password if sudoers says so.  */
356     if (!ISSET(validated, FLAG_NOPASS))
357         check_user(validated);
358
359     /* If run as root with SUDO_USER set, set sudo_user.pw to that user. */
360     if (user_uid == 0 && prev_user != NULL && strcmp(prev_user, "root") != 0) {
361             struct passwd *pw;
362
363             if ((pw = sudo_getpwnam(prev_user)) != NULL) {
364                     efree(sudo_user.pw);
365                     sudo_user.pw = pw;
366             }
367     }
368
369     if (ISSET(validated, VALIDATE_OK)) {
370         /* Finally tell the user if the command did not exist. */
371         if (cmnd_status == NOT_FOUND_DOT) {
372             warnx("ignoring `%s' found in '.'\nUse `sudo ./%s' if this is the `%s' you wish to run.", user_cmnd, user_cmnd, user_cmnd);
373             exit(1);
374         } else if (cmnd_status == NOT_FOUND) {
375             warnx("%s: command not found", user_cmnd);
376             exit(1);
377         }
378
379         /* If user specified env vars make sure sudoers allows it. */
380         if (ISSET(sudo_mode, MODE_RUN) && !ISSET(validated, FLAG_SETENV)) {
381             if (ISSET(sudo_mode, MODE_PRESERVE_ENV))
382                 log_error(NO_MAIL,
383                     "sorry, you are not allowed to preserve the environment");
384             else
385                 validate_env_vars(sudo_user.env_vars);
386         }
387
388         log_auth(validated, 1);
389         if (sudo_mode == MODE_VALIDATE)
390             exit(0);
391         else if (sudo_mode == MODE_LIST) {
392             list_matches();
393 #ifdef HAVE_LDAP
394             sudo_ldap_list_matches();
395 #endif
396             exit(0);
397         }
398
399         /* Override user's umask if configured to do so. */
400         if (def_umask != 0777)
401             (void) umask(def_umask);
402
403         /* Restore coredumpsize resource limit. */
404 #if defined(RLIMIT_CORE) && !defined(SUDO_DEVEL)
405         (void) setrlimit(RLIMIT_CORE, &corelimit);
406 #endif /* RLIMIT_CORE && !SUDO_DEVEL */
407
408         /* Become specified user or root if executing a command. */
409         if (ISSET(sudo_mode, MODE_RUN))
410             set_perms(PERM_FULL_RUNAS);
411
412         /* Close the password and group files */
413         endpwent();
414         endgrent();
415
416         if (ISSET(sudo_mode, MODE_LOGIN_SHELL)) {
417             char *p;
418
419             /* Convert /bin/sh -> -sh so shell knows it is a login shell */
420             if ((p = strrchr(NewArgv[0], '/')) == NULL)
421                 p = NewArgv[0];
422             *p = '-';
423             NewArgv[0] = p;
424
425             /* Change to target user's homedir. */
426             if (chdir(runas_pw->pw_dir) == -1)
427                 warn("unable to change directory to %s", runas_pw->pw_dir);
428         }
429
430         if (ISSET(sudo_mode, MODE_EDIT))
431             exit(sudo_edit(NewArgc, NewArgv, envp));
432
433         /* Insert user-specified environment variables. */
434         environ = insert_env_vars(environ, sudo_user.env_vars);
435
436         /* Restore signal handlers before we exec. */
437         (void) sigaction(SIGINT, &saved_sa_int, NULL);
438         (void) sigaction(SIGQUIT, &saved_sa_quit, NULL);
439         (void) sigaction(SIGTSTP, &saved_sa_tstp, NULL);
440         (void) sigaction(SIGCHLD, &saved_sa_chld, NULL);
441
442 #ifndef PROFILING
443         if (ISSET(sudo_mode, MODE_BACKGROUND) && fork() > 0)
444             exit(0);
445         else
446             execve(safe_cmnd, NewArgv, environ);
447 #else
448         exit(0);
449 #endif /* PROFILING */
450         /*
451          * If we got here then the exec() failed...
452          */
453         if (errno == ENOEXEC) {
454             NewArgv--;                  /* at least one extra slot... */
455             NewArgv[0] = "sh";
456             NewArgv[1] = safe_cmnd;
457             execve(_PATH_BSHELL, NewArgv, environ);
458         }
459         warn("unable to execute %s", safe_cmnd);
460         exit(127);
461     } else if (ISSET(validated, FLAG_NO_USER) || (validated & FLAG_NO_HOST)) {
462         log_auth(validated, 1);
463         exit(1);
464     } else if (ISSET(validated, VALIDATE_NOT_OK)) {
465         if (def_path_info) {
466             /*
467              * We'd like to not leak path info at all here, but that can
468              * *really* confuse the users.  To really close the leak we'd
469              * have to say "not allowed to run foo" even when the problem
470              * is just "no foo in path" since the user can trivially set
471              * their path to just contain a single dir.
472              */
473             log_auth(validated,
474                 !(cmnd_status == NOT_FOUND_DOT || cmnd_status == NOT_FOUND));
475             if (cmnd_status == NOT_FOUND)
476                 warnx("%s: command not found", user_cmnd);
477             else if (cmnd_status == NOT_FOUND_DOT)
478                 warnx("ignoring `%s' found in '.'\nUse `sudo ./%s' if this is the `%s' you wish to run.", user_cmnd, user_cmnd, user_cmnd);
479         } else {
480             /* Just tell the user they are not allowed to run foo. */
481             log_auth(validated, 1);
482         }
483         exit(1);
484     } else {
485         /* should never get here */
486         log_auth(validated, 1);
487         exit(1);
488     }
489     exit(0);    /* not reached */
490 }
491
492 /*
493  * Initialize timezone, set umask, fill in ``sudo_user'' struct and
494  * load the ``interfaces'' array.
495  */
496 static int
497 init_vars(sudo_mode, envp)
498     int sudo_mode;
499     char **envp;
500 {
501     char *p, **ep, thost[MAXHOSTNAMELEN];
502     int nohostname, rval;
503
504     /* Sanity check command from user. */
505     if (user_cmnd == NULL && strlen(NewArgv[0]) >= PATH_MAX)
506         errx(1, "%s: File name too long", NewArgv[0]);
507
508 #ifdef HAVE_TZSET
509     (void) tzset();             /* set the timezone if applicable */
510 #endif /* HAVE_TZSET */
511
512     /* Default value for cmnd and cwd, overridden later. */
513     if (user_cmnd == NULL)
514         user_cmnd = NewArgv[0];
515     (void) strlcpy(user_cwd, "unknown", sizeof(user_cwd));
516
517     /*
518      * We avoid gethostbyname() if possible since we don't want
519      * sudo to block if DNS or NIS is hosed.
520      * "host" is the (possibly fully-qualified) hostname and
521      * "shost" is the unqualified form of the hostname.
522      */
523     nohostname = gethostname(thost, sizeof(thost));
524     if (nohostname)
525         user_host = user_shost = "localhost";
526     else {
527         user_host = estrdup(thost);
528         if (def_fqdn) {
529             /* Defer call to set_fqdn() until log_error() is safe. */
530             user_shost = user_host;
531         } else {
532             if ((p = strchr(user_host, '.'))) {
533                 *p = '\0';
534                 user_shost = estrdup(user_host);
535                 *p = '.';
536             } else {
537                 user_shost = user_host;
538             }
539         }
540     }
541
542     if ((p = ttyname(STDIN_FILENO)) || (p = ttyname(STDOUT_FILENO))) {
543         user_tty = user_ttypath = estrdup(p);
544         if (strncmp(user_tty, _PATH_DEV, sizeof(_PATH_DEV) - 1) == 0)
545             user_tty += sizeof(_PATH_DEV) - 1;
546     } else
547         user_tty = "unknown";
548
549     for (ep = envp; *ep; ep++) {
550         switch (**ep) {
551             case 'P':
552                 if (strncmp("PATH=", *ep, 5) == 0)
553                     user_path = *ep + 5;
554                 break;
555             case 'S':
556                 if (strncmp("SHELL=", *ep, 6) == 0)
557                     user_shell = *ep + 6;
558                 else if (!user_prompt && strncmp("SUDO_PROMPT=", *ep, 12) == 0)
559                     user_prompt = *ep + 12;
560                 else if (strncmp("SUDO_USER=", *ep, 10) == 0)
561                     prev_user = *ep + 10;
562                 break;
563
564             }
565     }
566
567     /*
568      * Get a local copy of the user's struct passwd with the shadow password
569      * if necessary.  It is assumed that euid is 0 at this point so we
570      * can read the shadow passwd file if necessary.
571      */
572     if ((sudo_user.pw = sudo_getpwuid(getuid())) == NULL) {
573         /* Need to make a fake struct passwd for logging to work. */
574         struct passwd pw;
575         char pw_name[MAX_UID_T_LEN + 1];
576
577         pw.pw_uid = getuid();
578         (void) snprintf(pw_name, sizeof(pw_name), "%lu",
579             (unsigned long) pw.pw_uid);
580         pw.pw_name = pw_name;
581         sudo_user.pw = &pw;
582
583         /*
584          * If we are in -k/-K mode, just spew to stderr.  It is not unusual for
585          * users to place "sudo -k" in a .logout file which can cause sudo to
586          * be run during reboot after the YP/NIS/NIS+/LDAP/etc daemon has died.
587          */
588         if (sudo_mode & (MODE_INVALIDATE|MODE_KILL))
589             errx(1, "uid %s does not exist in the passwd file!", pw_name);
590         log_error(0, "uid %s does not exist in the passwd file!", pw_name);
591     }
592     if (user_shell == NULL || *user_shell == '\0')
593         user_shell = sudo_user.pw->pw_shell;
594
595     /* It is now safe to use log_error() and set_perms() */
596
597 #ifdef HAVE_GETGROUPS
598     if ((user_ngroups = getgroups(0, NULL)) > 0) {
599         user_groups = emalloc2(user_ngroups, sizeof(GETGROUPS_T));
600         if (getgroups(user_ngroups, user_groups) < 0)
601             log_error(USE_ERRNO|MSG_ONLY, "can't get group vector");
602     } else
603         user_ngroups = 0;
604 #endif
605
606     if (def_fqdn)
607         set_fqdn();                     /* may call log_error() */
608
609     if (nohostname)
610         log_error(USE_ERRNO|MSG_ONLY, "can't get hostname");
611
612     set_runaspw(*user_runas);           /* may call log_error() */
613     if (*user_runas[0] == '#' && runas_pw->pw_name && runas_pw->pw_name[0])
614         *user_runas = estrdup(runas_pw->pw_name);
615
616     /*
617      * Get current working directory.  Try as user, fall back to root.
618      */
619     set_perms(PERM_USER);
620     if (!getcwd(user_cwd, sizeof(user_cwd))) {
621         set_perms(PERM_ROOT);
622         if (!getcwd(user_cwd, sizeof(user_cwd))) {
623             warnx("cannot get working directory");
624             (void) strlcpy(user_cwd, "unknown", sizeof(user_cwd));
625         }
626     } else
627         set_perms(PERM_ROOT);
628
629     /*
630      * If we were given the '-e', '-i' or '-s' options we need to redo
631      * NewArgv and NewArgc.
632      */
633     if ((sudo_mode & (MODE_SHELL | MODE_EDIT))) {
634         char **dst, **src = NewArgv;
635
636         /* Allocate an extra slot for execve() failure (ENOEXEC). */
637         NewArgv = (char **) emalloc2((++NewArgc + 2), sizeof(char *));
638         NewArgv++;
639         if (ISSET(sudo_mode, MODE_EDIT))
640             NewArgv[0] = "sudoedit";
641         else if (ISSET(sudo_mode, MODE_LOGIN_SHELL))
642             NewArgv[0] = runas_pw->pw_shell;
643         else if (user_shell && *user_shell)
644             NewArgv[0] = user_shell;
645         else
646             errx(1, "unable to determine shell");
647
648         /* copy the args from NewArgv */
649         for (dst = NewArgv + 1; (*dst = *src) != NULL; ++src, ++dst)
650             continue;
651     }
652
653     /* Set login class if applicable. */
654     set_loginclass(sudo_user.pw);
655
656     /* Set project if applicable. */
657     set_project(runas_pw);
658
659     /* Resolve the path and return. */
660     rval = FOUND;
661     user_stat = emalloc(sizeof(struct stat));
662     if (sudo_mode & (MODE_RUN | MODE_EDIT)) {
663         if (ISSET(sudo_mode, MODE_RUN)) {
664             /* XXX - default_runas may be modified during parsing of sudoers */
665             set_perms(PERM_RUNAS);
666             rval = find_path(NewArgv[0], &user_cmnd, user_stat, user_path);
667             set_perms(PERM_ROOT);
668             if (rval != FOUND) {
669                 /* Failed as root, try as invoking user. */
670                 set_perms(PERM_USER);
671                 rval = find_path(NewArgv[0], &user_cmnd, user_stat, user_path);
672                 set_perms(PERM_ROOT);
673             }
674         }
675
676         /* set user_args */
677         if (NewArgc > 1) {
678             char *to, **from;
679             size_t size, n;
680
681             /* If we didn't realloc NewArgv it is contiguous so just count. */
682             if (!(sudo_mode & (MODE_SHELL | MODE_EDIT))) {
683                 size = (size_t) (NewArgv[NewArgc-1] - NewArgv[1]) +
684                         strlen(NewArgv[NewArgc-1]) + 1;
685             } else {
686                 for (size = 0, from = NewArgv + 1; *from; from++)
687                     size += strlen(*from) + 1;
688             }
689
690             /* Alloc and build up user_args. */
691             user_args = (char *) emalloc(size);
692             for (to = user_args, from = NewArgv + 1; *from; from++) {
693                 n = strlcpy(to, *from, size - (to - user_args));
694                 if (n >= size - (to - user_args))
695                     errx(1, "internal error, init_vars() overflow");
696                 to += n;
697                 *to++ = ' ';
698             }
699             *--to = '\0';
700         }
701     }
702     if ((user_base = strrchr(user_cmnd, '/')) != NULL)
703         user_base++;
704     else
705         user_base = user_cmnd;
706
707     return(rval);
708 }
709
710 /*
711  * Command line argument parsing, can't use getopt(3).
712  */
713 static int
714 parse_args(argc, argv)
715     int argc;
716     char **argv;
717 {
718     int rval = MODE_RUN;                /* what mode is sudo to be run in? */
719     int excl = 0;                       /* exclusive arg, no others allowed */
720
721     NewArgv = argv + 1;
722     NewArgc = argc - 1;
723
724     /* First, check to see if we were invoked as "sudoedit". */
725     if (strcmp(getprogname(), "sudoedit") == 0) {
726         rval = MODE_EDIT;
727         excl = 'e';
728     } else
729         rval = MODE_RUN;
730
731     while (NewArgc > 0) {
732         if (NewArgv[0][0] == '-') {
733             if (NewArgv[0][1] != '\0' && NewArgv[0][2] != '\0')
734                 warnx("please use single character options");
735
736             switch (NewArgv[0][1]) {
737                 case 'p':
738                     /* Must have an associated prompt. */
739                     if (NewArgv[1] == NULL)
740                         usage(1);
741
742                     user_prompt = NewArgv[1];
743                     def_passprompt_override = TRUE;
744
745                     NewArgc--;
746                     NewArgv++;
747                     break;
748                 case 'u':
749                     /* Must have an associated runas user. */
750                     if (NewArgv[1] == NULL)
751                         usage(1);
752
753                     user_runas = &NewArgv[1];
754
755                     NewArgc--;
756                     NewArgv++;
757                     break;
758 #ifdef HAVE_BSD_AUTH_H
759                 case 'a':
760                     /* Must have an associated authentication style. */
761                     if (NewArgv[1] == NULL)
762                         usage(1);
763
764                     login_style = NewArgv[1];
765
766                     NewArgc--;
767                     NewArgv++;
768                     break;
769 #endif
770 #ifdef HAVE_LOGIN_CAP_H
771                 case 'c':
772                     /* Must have an associated login class. */
773                     if (NewArgv[1] == NULL)
774                         usage(1);
775
776                     login_class = NewArgv[1];
777                     def_use_loginclass = TRUE;
778
779                     NewArgc--;
780                     NewArgv++;
781                     break;
782 #endif
783                 case 'b':
784                     SET(rval, MODE_BACKGROUND);
785                     break;
786                 case 'e':
787                     rval = MODE_EDIT;
788                     if (excl && excl != 'e')
789                         usage_excl(1);
790                     excl = 'e';
791                     break;
792                 case 'v':
793                     rval = MODE_VALIDATE;
794                     if (excl && excl != 'v')
795                         usage_excl(1);
796                     excl = 'v';
797                     break;
798                 case 'i':
799                     SET(rval, (MODE_LOGIN_SHELL | MODE_SHELL));
800                     def_env_reset = TRUE;
801                     if (excl && excl != 'i')
802                         usage_excl(1);
803                     excl = 'i';
804                     break;
805                 case 'k':
806                     rval = MODE_INVALIDATE;
807                     if (excl && excl != 'k')
808                         usage_excl(1);
809                     excl = 'k';
810                     break;
811                 case 'K':
812                     rval = MODE_KILL;
813                     if (excl && excl != 'K')
814                         usage_excl(1);
815                     excl = 'K';
816                     break;
817                 case 'L':
818                     rval = MODE_LISTDEFS;
819                     if (excl && excl != 'L')
820                         usage_excl(1);
821                     excl = 'L';
822                     break;
823                 case 'l':
824                     rval = MODE_LIST;
825                     if (excl && excl != 'l')
826                         usage_excl(1);
827                     excl = 'l';
828                     break;
829                 case 'V':
830                     rval = MODE_VERSION;
831                     if (excl && excl != 'V')
832                         usage_excl(1);
833                     excl = 'V';
834                     break;
835                 case 'h':
836                     rval = MODE_HELP;
837                     if (excl && excl != 'h')
838                         usage_excl(1);
839                     excl = 'h';
840                     break;
841                 case 's':
842                     SET(rval, MODE_SHELL);
843                     if (excl && excl != 's')
844                         usage_excl(1);
845                     excl = 's';
846                     break;
847                 case 'H':
848                     SET(rval, MODE_RESET_HOME);
849                     break;
850                 case 'P':
851                     SET(rval, MODE_PRESERVE_GROUPS);
852                     break;
853                 case 'S':
854                     SET(tgetpass_flags, TGP_STDIN);
855                     break;
856                 case 'E':
857                     SET(rval, MODE_PRESERVE_ENV);
858                     break;
859                 case '-':
860                     NewArgc--;
861                     NewArgv++;
862                     goto args_done;
863                 case '\0':
864                     warnx("'-' requires an argument");
865                     usage(1);
866                 default:
867                     warnx("illegal option `%s'", NewArgv[0]);
868                     usage(1);
869             }
870         } else if (NewArgv[0][0] != '/' && strchr(NewArgv[0], '=') != NULL) {
871             /* Could be an environment variable. */
872             struct list_member *ev;
873             ev = emalloc(sizeof(*ev));
874             ev->value = NewArgv[0];
875             ev->next = sudo_user.env_vars;
876             sudo_user.env_vars = ev;
877         } else {
878             /* Not an arg */
879             break;
880         }
881         NewArgc--;
882         NewArgv++;
883     }
884 args_done:
885
886     if (ISSET(rval, MODE_EDIT) &&
887         (ISSET(rval, MODE_PRESERVE_ENV) || sudo_user.env_vars != NULL)) {
888         if (ISSET(rval, MODE_PRESERVE_ENV))
889             warnx("the `-E' option is not valid in edit mode");
890         if (sudo_user.env_vars != NULL)
891             warnx("you may not specify environment variables in edit mode");
892         usage(1);
893     }
894
895     if (user_runas != NULL && !ISSET(rval, (MODE_EDIT|MODE_RUN))) {
896         if (excl != '\0')
897             warnx("the `-u' and '-%c' options may not be used together", excl);
898         usage(1);
899     }
900     if ((NewArgc == 0 && (rval & MODE_EDIT)) ||
901         (NewArgc > 0 && !(rval & (MODE_RUN | MODE_EDIT))))
902         usage(1);
903     if (NewArgc == 0 && rval == MODE_RUN)
904         SET(rval, (MODE_IMPLIED_SHELL | MODE_SHELL));
905
906     return(rval);
907 }
908
909 /*
910  * Sanity check sudoers mode/owner/type.
911  * Leaves a file pointer to the sudoers file open in ``fp''.
912  */
913 static void
914 check_sudoers()
915 {
916     struct stat statbuf;
917     int rootstat, i;
918
919     /*
920      * Fix the mode and group on sudoers file from old default.
921      * Only works if file system is readable/writable by root.
922      */
923     if ((rootstat = stat_sudoers(_PATH_SUDOERS, &statbuf)) == 0 &&
924         SUDOERS_UID == statbuf.st_uid && SUDOERS_MODE != 0400 &&
925         (statbuf.st_mode & 0007777) == 0400) {
926
927         if (chmod(_PATH_SUDOERS, SUDOERS_MODE) == 0) {
928             warnx("fixed mode on %s", _PATH_SUDOERS);
929             SET(statbuf.st_mode, SUDOERS_MODE);
930             if (statbuf.st_gid != SUDOERS_GID) {
931                 if (!chown(_PATH_SUDOERS,(uid_t) -1,SUDOERS_GID)) {
932                     warnx("set group on %s", _PATH_SUDOERS);
933                     statbuf.st_gid = SUDOERS_GID;
934                 } else
935                     warn("unable to set group on %s", _PATH_SUDOERS);
936             }
937         } else
938             warn("unable to fix mode on %s", _PATH_SUDOERS);
939     }
940
941     /*
942      * Sanity checks on sudoers file.  Must be done as sudoers
943      * file owner.  We already did a stat as root, so use that
944      * data if we can't stat as sudoers file owner.
945      */
946     set_perms(PERM_SUDOERS);
947
948     if (rootstat != 0 && stat_sudoers(_PATH_SUDOERS, &statbuf) != 0)
949         log_error(USE_ERRNO, "can't stat %s", _PATH_SUDOERS);
950     else if (!S_ISREG(statbuf.st_mode))
951         log_error(0, "%s is not a regular file", _PATH_SUDOERS);
952     else if (statbuf.st_size == 0)
953         log_error(0, "%s is zero length", _PATH_SUDOERS);
954     else if ((statbuf.st_mode & 07777) != SUDOERS_MODE)
955         log_error(0, "%s is mode 0%o, should be 0%o", _PATH_SUDOERS,
956             (unsigned int) (statbuf.st_mode & 07777),
957             (unsigned int) SUDOERS_MODE);
958     else if (statbuf.st_uid != SUDOERS_UID)
959         log_error(0, "%s is owned by uid %lu, should be %lu", _PATH_SUDOERS,
960             (unsigned long) statbuf.st_uid, (unsigned long) SUDOERS_UID);
961     else if (statbuf.st_gid != SUDOERS_GID)
962         log_error(0, "%s is owned by gid %lu, should be %lu", _PATH_SUDOERS,
963             (unsigned long) statbuf.st_gid, (unsigned long) SUDOERS_GID);
964     else {
965         /* Solaris sometimes returns EAGAIN so try 10 times */
966         for (i = 0; i < 10 ; i++) {
967             errno = 0;
968             if ((sudoers_fp = fopen(_PATH_SUDOERS, "r")) == NULL ||
969                 fgetc(sudoers_fp) == EOF) {
970                 if (sudoers_fp != NULL)
971                     fclose(sudoers_fp);
972                 sudoers_fp = NULL;
973                 if (errno != EAGAIN && errno != EWOULDBLOCK)
974                     break;
975             } else
976                 break;
977             sleep(1);
978         }
979         if (sudoers_fp == NULL)
980             log_error(USE_ERRNO, "can't open %s", _PATH_SUDOERS);
981     }
982
983     set_perms(PERM_ROOT);               /* change back to root */
984 }
985
986 /*
987  * Close all open files (except std*) and turn off core dumps.
988  */
989 static void
990 initial_setup()
991 {
992     int miss[3], devnull = -1;
993 #if defined(RLIMIT_CORE) && !defined(SUDO_DEVEL)
994     struct rlimit rl;
995
996     /*
997      * Turn off core dumps.
998      */
999     (void) getrlimit(RLIMIT_CORE, &corelimit);
1000     memcpy(&rl, &corelimit, sizeof(struct rlimit));
1001     rl.rlim_cur = 0;
1002     (void) setrlimit(RLIMIT_CORE, &rl);
1003 #endif /* RLIMIT_CORE && !SUDO_DEVEL */
1004
1005     /*
1006      * stdin, stdout and stderr must be open; set them to /dev/null
1007      * if they are closed and close all other fds.
1008      */
1009     miss[STDIN_FILENO] = fcntl(STDIN_FILENO, F_GETFL, 0) == -1;
1010     miss[STDOUT_FILENO] = fcntl(STDOUT_FILENO, F_GETFL, 0) == -1;
1011     miss[STDERR_FILENO] = fcntl(STDERR_FILENO, F_GETFL, 0) == -1;
1012     if (miss[STDIN_FILENO] || miss[STDOUT_FILENO] || miss[STDERR_FILENO]) {
1013         if ((devnull = open(_PATH_DEVNULL, O_RDWR, 0644)) != -1) {
1014             if (miss[STDIN_FILENO])
1015                 (void) dup2(devnull, STDIN_FILENO);
1016             if (miss[STDOUT_FILENO])
1017                 (void) dup2(devnull, STDOUT_FILENO);
1018             if (miss[STDERR_FILENO])
1019                 (void) dup2(devnull, STDERR_FILENO);
1020         }
1021     }
1022     closefrom(STDERR_FILENO + 1);
1023 }
1024
1025 #ifdef HAVE_LOGIN_CAP_H
1026 static void
1027 set_loginclass(pw)
1028     struct passwd *pw;
1029 {
1030     int errflags;
1031
1032     /*
1033      * Don't make it a fatal error if the user didn't specify the login
1034      * class themselves.  We do this because if login.conf gets
1035      * corrupted we want the admin to be able to use sudo to fix it.
1036      */
1037     if (login_class)
1038         errflags = NO_MAIL|MSG_ONLY;
1039     else
1040         errflags = NO_MAIL|MSG_ONLY|NO_EXIT;
1041
1042     if (login_class && strcmp(login_class, "-") != 0) {
1043         if (strcmp(*user_runas, "root") != 0 && user_uid != 0)
1044             errx(1, "only root can use -c %s", login_class);
1045     } else {
1046         login_class = pw->pw_class;
1047         if (!login_class || !*login_class)
1048             login_class =
1049                 (pw->pw_uid == 0) ? LOGIN_DEFROOTCLASS : LOGIN_DEFCLASS;
1050     }
1051
1052     lc = login_getclass(login_class);
1053     if (!lc || !lc->lc_class || strcmp(lc->lc_class, login_class) != 0) {
1054         log_error(errflags, "unknown login class: %s", login_class);
1055         if (!lc)
1056             lc = login_getclass(NULL);  /* needed for login_getstyle() later */
1057     }
1058 }
1059 #else
1060 static void
1061 set_loginclass(pw)
1062     struct passwd *pw;
1063 {
1064 }
1065 #endif /* HAVE_LOGIN_CAP_H */
1066
1067 #ifdef HAVE_PROJECT_H
1068 static void
1069 set_project(pw)
1070     struct passwd *pw;
1071 {
1072     int errflags = NO_MAIL|MSG_ONLY|NO_EXIT;
1073     int errval;
1074     struct project proj;
1075     struct project *resultp = '\0';
1076     char buf[1024];
1077
1078     /*
1079      * Collect the default project for the user and settaskid
1080      */
1081     setprojent();
1082     if (resultp = getdefaultproj(pw->pw_name, &proj, buf, sizeof(buf))) {
1083         errval = setproject(resultp->pj_name, pw->pw_name, TASK_NORMAL);
1084         if (errval != 0) {
1085             switch(errval) {
1086             case SETPROJ_ERR_TASK:
1087                 if (errno == EAGAIN)
1088                     log_error(errflags, "resource control limit has been reached");
1089                 else if (errno == ESRCH)
1090                     log_error(errflags, "user \"%s\" is not a member of "
1091                         "project \"%s\"", pw->pw_name, resultp->pj_name);
1092                 else if (errno == EACCES)
1093                     log_error(errflags, "the invoking task is final");
1094                 else
1095                     log_error(errflags, "could not join project \"%s\"",
1096                         resultp->pj_name);
1097                 break;
1098             case SETPROJ_ERR_POOL:
1099                 if (errno == EACCES)
1100                     log_error(errflags, "no resource pool accepting "
1101                             "default bindings exists for project \"%s\"",
1102                             resultp->pj_name);
1103                 else if (errno == ESRCH)
1104                     log_error(errflags, "specified resource pool does "
1105                             "not exist for project \"%s\"", resultp->pj_name);
1106                 else
1107                     log_error(errflags, "could not bind to default "
1108                             "resource pool for project \"%s\"", resultp->pj_name);
1109                 break;
1110             default:
1111                 if (errval <= 0) {
1112                     log_error(errflags, "setproject failed for project \"%s\"",
1113                         resultp->pj_name);
1114                 } else {
1115                     log_error(errflags, "warning, resource control assignment "
1116                         "failed for project \"%s\"", resultp->pj_name);
1117                 }
1118             }
1119         }
1120     } else {
1121         log_error(errflags, "getdefaultproj() error: %s", strerror(errno));
1122     }
1123     endprojent();
1124 }
1125 #else
1126 static void
1127 set_project(pw)
1128     struct passwd *pw;
1129 {
1130 }
1131 #endif /* HAVE_PROJECT_H */
1132
1133 /*
1134  * Look up the fully qualified domain name and set user_host and user_shost.
1135  */
1136 void
1137 set_fqdn()
1138 {
1139 #ifdef HAVE_GETADDRINFO
1140     struct addrinfo *res0, hint;
1141 #else
1142     struct hostent *hp;
1143 #endif
1144     char *p;
1145
1146 #ifdef HAVE_GETADDRINFO
1147     memset(&hint, 0, sizeof(hint));
1148     hint.ai_family = PF_UNSPEC;
1149     hint.ai_flags = AI_CANONNAME;
1150     if (getaddrinfo(user_host, NULL, &hint, &res0) != 0) {
1151 #else
1152     if (!(hp = gethostbyname(user_host))) {
1153 #endif
1154         log_error(MSG_ONLY|NO_EXIT,
1155             "unable to resolve host %s", user_host);
1156     } else {
1157         if (user_shost != user_host)
1158             efree(user_shost);
1159         efree(user_host);
1160 #ifdef HAVE_GETADDRINFO
1161         user_host = estrdup(res0->ai_canonname);
1162         freeaddrinfo(res0);
1163 #else
1164         user_host = estrdup(hp->h_name);
1165 #endif
1166     }
1167     if ((p = strchr(user_host, '.'))) {
1168         *p = '\0';
1169         user_shost = estrdup(user_host);
1170         *p = '.';
1171     } else {
1172         user_shost = user_host;
1173     }
1174 }
1175
1176 /*
1177  * Get passwd entry for the user we are going to run commands as.
1178  * By default, this is "root".  Updates runas_pw as a side effect.
1179  */
1180 int
1181 set_runaspw(user)
1182     char *user;
1183 {
1184     if (runas_pw != NULL) {
1185         if (user_runas != &def_runas_default)
1186             return(TRUE);               /* don't override -u option */
1187         efree(runas_pw);
1188     }
1189     if (*user == '#') {
1190         runas_pw = sudo_getpwuid(atoi(user + 1));
1191         if (runas_pw == NULL) {
1192             runas_pw = emalloc(sizeof(struct passwd));
1193             (void) memset((VOID *)runas_pw, 0, sizeof(struct passwd));
1194             runas_pw->pw_uid = atoi(user + 1);
1195         }
1196     } else {
1197         runas_pw = sudo_getpwnam(user);
1198         if (runas_pw == NULL)
1199             log_error(NO_MAIL|MSG_ONLY, "no passwd entry for %s!", user);
1200     }
1201     return(TRUE);
1202 }
1203
1204 /*
1205  * Get passwd entry for the user we are going to authenticate as.
1206  * By default, this is the user invoking sudo.  In the most common
1207  * case, this matches sudo_user.pw or runas_pw.
1208  */
1209 static struct passwd *
1210 get_authpw()
1211 {
1212     struct passwd *pw;
1213
1214     if (def_rootpw) {
1215         if (runas_pw->pw_uid == 0)
1216             pw = runas_pw;
1217         else if ((pw = sudo_getpwuid(0)) == NULL)
1218             log_error(0, "uid 0 does not exist in the passwd file!");
1219     } else if (def_runaspw) {
1220         if (strcmp(def_runas_default, *user_runas) == 0)
1221             pw = runas_pw;
1222         else if ((pw = sudo_getpwnam(def_runas_default)) == NULL)
1223             log_error(0, "user %s does not exist in the passwd file!",
1224                 def_runas_default);
1225     } else if (def_targetpw) {
1226         if (runas_pw->pw_name == NULL)
1227             log_error(NO_MAIL|MSG_ONLY, "no passwd entry for %lu!",
1228                 (unsigned long) runas_pw->pw_uid);
1229         pw = runas_pw;
1230     } else
1231         pw = sudo_user.pw;
1232
1233     return(pw);
1234 }
1235
1236 /*
1237  * Tell which options are mutually exclusive and exit.
1238  */
1239 static void
1240 usage_excl(exit_val)
1241     int exit_val;
1242 {
1243     warnx("Only one of the -e, -h, i, -k, -K, -l, -s, -v or -V options may be used");
1244     usage(exit_val);
1245 }
1246
1247 /*
1248  * Give usage message and exit.
1249  */
1250 static void
1251 usage(exit_val)
1252     int exit_val;
1253 {
1254     char **p, **uvec[4];
1255     int i, linelen, linemax, ulen, plen;
1256     static char *uvec1[] = {
1257         " -h |",
1258         " -K |",
1259         " -k |",
1260         " -L |",
1261         " -l |",
1262         " -V |",
1263         " -v",
1264         NULL
1265     };
1266     static char *uvec2[] = {
1267         " [-bEHPS]",
1268 #ifdef HAVE_BSD_AUTH_H
1269         " [-a auth_type]",
1270 #endif
1271 #ifdef HAVE_LOGIN_CAP_H
1272         " [-c class|-]",
1273 #endif
1274         " [-p prompt]",
1275         " [-u username|#uid]",
1276         " [VAR=value]",
1277         " {-i | -s | <command>}",
1278         NULL
1279     };
1280     static char *uvec3[] = {
1281         " -e",
1282         " [-S]",
1283 #ifdef HAVE_BSD_AUTH_H
1284         " [-a auth_type]",
1285 #endif
1286 #ifdef HAVE_LOGIN_CAP_H
1287         " [-c class|-]",
1288 #endif
1289         " [-p prompt]",
1290         " [-u username|#uid]",
1291         " file ...",
1292         NULL
1293     };
1294
1295     /*
1296      * Use usage vectors appropriate to the progname.
1297      */
1298     if (strcmp(getprogname(), "sudoedit") == 0) {
1299         uvec[0] = uvec3 + 1;
1300         uvec[1] = NULL;
1301     } else {
1302         uvec[0] = uvec1;
1303         uvec[1] = uvec2;
1304         uvec[2] = uvec3;
1305         uvec[3] = NULL;
1306     }
1307
1308     /*
1309      * Print usage and wrap lines as needed.
1310      * Assumes an 80-character wide terminal, which is kind of bogus...
1311      */
1312     ulen = (int)strlen(getprogname()) + 7;
1313     linemax = 80;
1314     for (i = 0; uvec[i] != NULL; i++) {
1315         printf("usage: %s", getprogname());
1316         linelen = linemax - ulen;
1317         for (p = uvec[i]; *p != NULL; p++) {
1318             plen = (int)strlen(*p);
1319             if (linelen >= plen || linelen == linemax - ulen) {
1320                 fputs(*p, stdout);
1321                 linelen -= plen;
1322             } else {
1323                 p--;
1324                 linelen = linemax - ulen;
1325                 printf("\n%*s", ulen, "");
1326             }
1327         }
1328         putchar('\n');
1329     }
1330     exit(exit_val);
1331 }