Imported Upstream version 1.6.9p10
[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.34 2007/12/13 14:12:49 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                 usage(1);
736             }
737
738             switch (NewArgv[0][1]) {
739                 case 'p':
740                     /* Must have an associated prompt. */
741                     if (NewArgv[1] == NULL)
742                         usage(1);
743
744                     user_prompt = NewArgv[1];
745                     def_passprompt_override = TRUE;
746
747                     NewArgc--;
748                     NewArgv++;
749                     break;
750                 case 'u':
751                     /* Must have an associated runas user. */
752                     if (NewArgv[1] == NULL)
753                         usage(1);
754
755                     user_runas = &NewArgv[1];
756
757                     NewArgc--;
758                     NewArgv++;
759                     break;
760 #ifdef HAVE_BSD_AUTH_H
761                 case 'a':
762                     /* Must have an associated authentication style. */
763                     if (NewArgv[1] == NULL)
764                         usage(1);
765
766                     login_style = NewArgv[1];
767
768                     NewArgc--;
769                     NewArgv++;
770                     break;
771 #endif
772 #ifdef HAVE_LOGIN_CAP_H
773                 case 'c':
774                     /* Must have an associated login class. */
775                     if (NewArgv[1] == NULL)
776                         usage(1);
777
778                     login_class = NewArgv[1];
779                     def_use_loginclass = TRUE;
780
781                     NewArgc--;
782                     NewArgv++;
783                     break;
784 #endif
785                 case 'b':
786                     SET(rval, MODE_BACKGROUND);
787                     break;
788                 case 'e':
789                     rval = MODE_EDIT;
790                     if (excl && excl != 'e')
791                         usage_excl(1);
792                     excl = 'e';
793                     break;
794                 case 'v':
795                     rval = MODE_VALIDATE;
796                     if (excl && excl != 'v')
797                         usage_excl(1);
798                     excl = 'v';
799                     break;
800                 case 'i':
801                     SET(rval, (MODE_LOGIN_SHELL | MODE_SHELL));
802                     def_env_reset = TRUE;
803                     if (excl && excl != 'i')
804                         usage_excl(1);
805                     excl = 'i';
806                     break;
807                 case 'k':
808                     rval = MODE_INVALIDATE;
809                     if (excl && excl != 'k')
810                         usage_excl(1);
811                     excl = 'k';
812                     break;
813                 case 'K':
814                     rval = MODE_KILL;
815                     if (excl && excl != 'K')
816                         usage_excl(1);
817                     excl = 'K';
818                     break;
819                 case 'L':
820                     rval = MODE_LISTDEFS;
821                     if (excl && excl != 'L')
822                         usage_excl(1);
823                     excl = 'L';
824                     break;
825                 case 'l':
826                     rval = MODE_LIST;
827                     if (excl && excl != 'l')
828                         usage_excl(1);
829                     excl = 'l';
830                     break;
831                 case 'V':
832                     rval = MODE_VERSION;
833                     if (excl && excl != 'V')
834                         usage_excl(1);
835                     excl = 'V';
836                     break;
837                 case 'h':
838                     rval = MODE_HELP;
839                     if (excl && excl != 'h')
840                         usage_excl(1);
841                     excl = 'h';
842                     break;
843                 case 's':
844                     SET(rval, MODE_SHELL);
845                     if (excl && excl != 's')
846                         usage_excl(1);
847                     excl = 's';
848                     break;
849                 case 'H':
850                     SET(rval, MODE_RESET_HOME);
851                     break;
852                 case 'P':
853                     SET(rval, MODE_PRESERVE_GROUPS);
854                     break;
855                 case 'S':
856                     SET(tgetpass_flags, TGP_STDIN);
857                     break;
858                 case 'E':
859                     SET(rval, MODE_PRESERVE_ENV);
860                     break;
861                 case '-':
862                     NewArgc--;
863                     NewArgv++;
864                     goto args_done;
865                 case '\0':
866                     warnx("'-' requires an argument");
867                     usage(1);
868                 default:
869                     warnx("illegal option `%s'", NewArgv[0]);
870                     usage(1);
871             }
872         } else if (NewArgv[0][0] != '/' && strchr(NewArgv[0], '=') != NULL) {
873             /* Could be an environment variable. */
874             struct list_member *ev;
875             ev = emalloc(sizeof(*ev));
876             ev->value = NewArgv[0];
877             ev->next = sudo_user.env_vars;
878             sudo_user.env_vars = ev;
879         } else {
880             /* Not an arg */
881             break;
882         }
883         NewArgc--;
884         NewArgv++;
885     }
886 args_done:
887
888     if (ISSET(rval, MODE_EDIT) &&
889         (ISSET(rval, MODE_PRESERVE_ENV) || sudo_user.env_vars != NULL)) {
890         if (ISSET(rval, MODE_PRESERVE_ENV))
891             warnx("the `-E' option is not valid in edit mode");
892         if (sudo_user.env_vars != NULL)
893             warnx("you may not specify environment variables in edit mode");
894         usage(1);
895     }
896
897     if (user_runas != NULL && !ISSET(rval, (MODE_EDIT|MODE_RUN))) {
898         if (excl != '\0')
899             warnx("the `-u' and '-%c' options may not be used together", excl);
900         usage(1);
901     }
902     if ((NewArgc == 0 && (rval & MODE_EDIT)) ||
903         (NewArgc > 0 && !(rval & (MODE_RUN | MODE_EDIT))))
904         usage(1);
905     if (NewArgc == 0 && rval == MODE_RUN)
906         SET(rval, (MODE_IMPLIED_SHELL | MODE_SHELL));
907
908     return(rval);
909 }
910
911 /*
912  * Sanity check sudoers mode/owner/type.
913  * Leaves a file pointer to the sudoers file open in ``fp''.
914  */
915 static void
916 check_sudoers()
917 {
918     struct stat statbuf;
919     int rootstat, i;
920
921     /*
922      * Fix the mode and group on sudoers file from old default.
923      * Only works if file system is readable/writable by root.
924      */
925     if ((rootstat = stat_sudoers(_PATH_SUDOERS, &statbuf)) == 0 &&
926         SUDOERS_UID == statbuf.st_uid && SUDOERS_MODE != 0400 &&
927         (statbuf.st_mode & 0007777) == 0400) {
928
929         if (chmod(_PATH_SUDOERS, SUDOERS_MODE) == 0) {
930             warnx("fixed mode on %s", _PATH_SUDOERS);
931             SET(statbuf.st_mode, SUDOERS_MODE);
932             if (statbuf.st_gid != SUDOERS_GID) {
933                 if (!chown(_PATH_SUDOERS,(uid_t) -1,SUDOERS_GID)) {
934                     warnx("set group on %s", _PATH_SUDOERS);
935                     statbuf.st_gid = SUDOERS_GID;
936                 } else
937                     warn("unable to set group on %s", _PATH_SUDOERS);
938             }
939         } else
940             warn("unable to fix mode on %s", _PATH_SUDOERS);
941     }
942
943     /*
944      * Sanity checks on sudoers file.  Must be done as sudoers
945      * file owner.  We already did a stat as root, so use that
946      * data if we can't stat as sudoers file owner.
947      */
948     set_perms(PERM_SUDOERS);
949
950     if (rootstat != 0 && stat_sudoers(_PATH_SUDOERS, &statbuf) != 0)
951         log_error(USE_ERRNO, "can't stat %s", _PATH_SUDOERS);
952     else if (!S_ISREG(statbuf.st_mode))
953         log_error(0, "%s is not a regular file", _PATH_SUDOERS);
954     else if (statbuf.st_size == 0)
955         log_error(0, "%s is zero length", _PATH_SUDOERS);
956     else if ((statbuf.st_mode & 07777) != SUDOERS_MODE)
957         log_error(0, "%s is mode 0%o, should be 0%o", _PATH_SUDOERS,
958             (unsigned int) (statbuf.st_mode & 07777),
959             (unsigned int) SUDOERS_MODE);
960     else if (statbuf.st_uid != SUDOERS_UID)
961         log_error(0, "%s is owned by uid %lu, should be %lu", _PATH_SUDOERS,
962             (unsigned long) statbuf.st_uid, (unsigned long) SUDOERS_UID);
963     else if (statbuf.st_gid != SUDOERS_GID)
964         log_error(0, "%s is owned by gid %lu, should be %lu", _PATH_SUDOERS,
965             (unsigned long) statbuf.st_gid, (unsigned long) SUDOERS_GID);
966     else {
967         /* Solaris sometimes returns EAGAIN so try 10 times */
968         for (i = 0; i < 10 ; i++) {
969             errno = 0;
970             if ((sudoers_fp = fopen(_PATH_SUDOERS, "r")) == NULL ||
971                 fgetc(sudoers_fp) == EOF) {
972                 if (sudoers_fp != NULL)
973                     fclose(sudoers_fp);
974                 sudoers_fp = NULL;
975                 if (errno != EAGAIN && errno != EWOULDBLOCK)
976                     break;
977             } else
978                 break;
979             sleep(1);
980         }
981         if (sudoers_fp == NULL)
982             log_error(USE_ERRNO, "can't open %s", _PATH_SUDOERS);
983     }
984
985     set_perms(PERM_ROOT);               /* change back to root */
986 }
987
988 /*
989  * Close all open files (except std*) and turn off core dumps.
990  */
991 static void
992 initial_setup()
993 {
994     int miss[3], devnull = -1;
995 #if defined(RLIMIT_CORE) && !defined(SUDO_DEVEL)
996     struct rlimit rl;
997
998     /*
999      * Turn off core dumps.
1000      */
1001     (void) getrlimit(RLIMIT_CORE, &corelimit);
1002     memcpy(&rl, &corelimit, sizeof(struct rlimit));
1003     rl.rlim_cur = 0;
1004     (void) setrlimit(RLIMIT_CORE, &rl);
1005 #endif /* RLIMIT_CORE && !SUDO_DEVEL */
1006
1007     /*
1008      * stdin, stdout and stderr must be open; set them to /dev/null
1009      * if they are closed and close all other fds.
1010      */
1011     miss[STDIN_FILENO] = fcntl(STDIN_FILENO, F_GETFL, 0) == -1;
1012     miss[STDOUT_FILENO] = fcntl(STDOUT_FILENO, F_GETFL, 0) == -1;
1013     miss[STDERR_FILENO] = fcntl(STDERR_FILENO, F_GETFL, 0) == -1;
1014     if (miss[STDIN_FILENO] || miss[STDOUT_FILENO] || miss[STDERR_FILENO]) {
1015         if ((devnull = open(_PATH_DEVNULL, O_RDWR, 0644)) != -1) {
1016             if (miss[STDIN_FILENO])
1017                 (void) dup2(devnull, STDIN_FILENO);
1018             if (miss[STDOUT_FILENO])
1019                 (void) dup2(devnull, STDOUT_FILENO);
1020             if (miss[STDERR_FILENO])
1021                 (void) dup2(devnull, STDERR_FILENO);
1022         }
1023     }
1024     closefrom(STDERR_FILENO + 1);
1025 }
1026
1027 #ifdef HAVE_LOGIN_CAP_H
1028 static void
1029 set_loginclass(pw)
1030     struct passwd *pw;
1031 {
1032     int errflags;
1033
1034     /*
1035      * Don't make it a fatal error if the user didn't specify the login
1036      * class themselves.  We do this because if login.conf gets
1037      * corrupted we want the admin to be able to use sudo to fix it.
1038      */
1039     if (login_class)
1040         errflags = NO_MAIL|MSG_ONLY;
1041     else
1042         errflags = NO_MAIL|MSG_ONLY|NO_EXIT;
1043
1044     if (login_class && strcmp(login_class, "-") != 0) {
1045         if (strcmp(*user_runas, "root") != 0 && user_uid != 0)
1046             errx(1, "only root can use -c %s", login_class);
1047     } else {
1048         login_class = pw->pw_class;
1049         if (!login_class || !*login_class)
1050             login_class =
1051                 (pw->pw_uid == 0) ? LOGIN_DEFROOTCLASS : LOGIN_DEFCLASS;
1052     }
1053
1054     lc = login_getclass(login_class);
1055     if (!lc || !lc->lc_class || strcmp(lc->lc_class, login_class) != 0) {
1056         log_error(errflags, "unknown login class: %s", login_class);
1057         if (!lc)
1058             lc = login_getclass(NULL);  /* needed for login_getstyle() later */
1059     }
1060 }
1061 #else
1062 static void
1063 set_loginclass(pw)
1064     struct passwd *pw;
1065 {
1066 }
1067 #endif /* HAVE_LOGIN_CAP_H */
1068
1069 #ifdef HAVE_PROJECT_H
1070 static void
1071 set_project(pw)
1072     struct passwd *pw;
1073 {
1074     int errflags = NO_MAIL|MSG_ONLY|NO_EXIT;
1075     int errval;
1076     struct project proj;
1077     struct project *resultp = '\0';
1078     char buf[1024];
1079
1080     /*
1081      * Collect the default project for the user and settaskid
1082      */
1083     setprojent();
1084     if (resultp = getdefaultproj(pw->pw_name, &proj, buf, sizeof(buf))) {
1085         errval = setproject(resultp->pj_name, pw->pw_name, TASK_NORMAL);
1086         if (errval != 0) {
1087             switch(errval) {
1088             case SETPROJ_ERR_TASK:
1089                 if (errno == EAGAIN)
1090                     log_error(errflags, "resource control limit has been reached");
1091                 else if (errno == ESRCH)
1092                     log_error(errflags, "user \"%s\" is not a member of "
1093                         "project \"%s\"", pw->pw_name, resultp->pj_name);
1094                 else if (errno == EACCES)
1095                     log_error(errflags, "the invoking task is final");
1096                 else
1097                     log_error(errflags, "could not join project \"%s\"",
1098                         resultp->pj_name);
1099                 break;
1100             case SETPROJ_ERR_POOL:
1101                 if (errno == EACCES)
1102                     log_error(errflags, "no resource pool accepting "
1103                             "default bindings exists for project \"%s\"",
1104                             resultp->pj_name);
1105                 else if (errno == ESRCH)
1106                     log_error(errflags, "specified resource pool does "
1107                             "not exist for project \"%s\"", resultp->pj_name);
1108                 else
1109                     log_error(errflags, "could not bind to default "
1110                             "resource pool for project \"%s\"", resultp->pj_name);
1111                 break;
1112             default:
1113                 if (errval <= 0) {
1114                     log_error(errflags, "setproject failed for project \"%s\"",
1115                         resultp->pj_name);
1116                 } else {
1117                     log_error(errflags, "warning, resource control assignment "
1118                         "failed for project \"%s\"", resultp->pj_name);
1119                 }
1120             }
1121         }
1122     } else {
1123         log_error(errflags, "getdefaultproj() error: %s", strerror(errno));
1124     }
1125     endprojent();
1126 }
1127 #else
1128 static void
1129 set_project(pw)
1130     struct passwd *pw;
1131 {
1132 }
1133 #endif /* HAVE_PROJECT_H */
1134
1135 /*
1136  * Look up the fully qualified domain name and set user_host and user_shost.
1137  */
1138 void
1139 set_fqdn()
1140 {
1141 #ifdef HAVE_GETADDRINFO
1142     struct addrinfo *res0, hint;
1143 #else
1144     struct hostent *hp;
1145 #endif
1146     char *p;
1147
1148 #ifdef HAVE_GETADDRINFO
1149     memset(&hint, 0, sizeof(hint));
1150     hint.ai_family = PF_UNSPEC;
1151     hint.ai_flags = AI_CANONNAME;
1152     if (getaddrinfo(user_host, NULL, &hint, &res0) != 0) {
1153 #else
1154     if (!(hp = gethostbyname(user_host))) {
1155 #endif
1156         log_error(MSG_ONLY|NO_EXIT,
1157             "unable to resolve host %s", user_host);
1158     } else {
1159         if (user_shost != user_host)
1160             efree(user_shost);
1161         efree(user_host);
1162 #ifdef HAVE_GETADDRINFO
1163         user_host = estrdup(res0->ai_canonname);
1164         freeaddrinfo(res0);
1165 #else
1166         user_host = estrdup(hp->h_name);
1167 #endif
1168     }
1169     if ((p = strchr(user_host, '.'))) {
1170         *p = '\0';
1171         user_shost = estrdup(user_host);
1172         *p = '.';
1173     } else {
1174         user_shost = user_host;
1175     }
1176 }
1177
1178 /*
1179  * Get passwd entry for the user we are going to run commands as.
1180  * By default, this is "root".  Updates runas_pw as a side effect.
1181  */
1182 int
1183 set_runaspw(user)
1184     char *user;
1185 {
1186     if (runas_pw != NULL) {
1187         if (user_runas != &def_runas_default)
1188             return(TRUE);               /* don't override -u option */
1189         efree(runas_pw);
1190     }
1191     if (*user == '#') {
1192         runas_pw = sudo_getpwuid(atoi(user + 1));
1193         if (runas_pw == NULL) {
1194             runas_pw = emalloc(sizeof(struct passwd));
1195             (void) memset((VOID *)runas_pw, 0, sizeof(struct passwd));
1196             runas_pw->pw_uid = atoi(user + 1);
1197         }
1198     } else {
1199         runas_pw = sudo_getpwnam(user);
1200         if (runas_pw == NULL)
1201             log_error(NO_MAIL|MSG_ONLY, "no passwd entry for %s!", user);
1202     }
1203     return(TRUE);
1204 }
1205
1206 /*
1207  * Get passwd entry for the user we are going to authenticate as.
1208  * By default, this is the user invoking sudo.  In the most common
1209  * case, this matches sudo_user.pw or runas_pw.
1210  */
1211 static struct passwd *
1212 get_authpw()
1213 {
1214     struct passwd *pw;
1215
1216     if (def_rootpw) {
1217         if (runas_pw->pw_uid == 0)
1218             pw = runas_pw;
1219         else if ((pw = sudo_getpwuid(0)) == NULL)
1220             log_error(0, "uid 0 does not exist in the passwd file!");
1221     } else if (def_runaspw) {
1222         if (strcmp(def_runas_default, *user_runas) == 0)
1223             pw = runas_pw;
1224         else if ((pw = sudo_getpwnam(def_runas_default)) == NULL)
1225             log_error(0, "user %s does not exist in the passwd file!",
1226                 def_runas_default);
1227     } else if (def_targetpw) {
1228         if (runas_pw->pw_name == NULL)
1229             log_error(NO_MAIL|MSG_ONLY, "no passwd entry for %lu!",
1230                 (unsigned long) runas_pw->pw_uid);
1231         pw = runas_pw;
1232     } else
1233         pw = sudo_user.pw;
1234
1235     return(pw);
1236 }
1237
1238 /*
1239  * Tell which options are mutually exclusive and exit.
1240  */
1241 static void
1242 usage_excl(exit_val)
1243     int exit_val;
1244 {
1245     warnx("Only one of the -e, -h, i, -k, -K, -l, -s, -v or -V options may be used");
1246     usage(exit_val);
1247 }
1248
1249 /*
1250  * Give usage message and exit.
1251  */
1252 static void
1253 usage(exit_val)
1254     int exit_val;
1255 {
1256     char **p, **uvec[4];
1257     int i, linelen, linemax, ulen, plen;
1258     static char *uvec1[] = {
1259         " -h |",
1260         " -K |",
1261         " -k |",
1262         " -L |",
1263         " -l |",
1264         " -V |",
1265         " -v",
1266         NULL
1267     };
1268     static char *uvec2[] = {
1269         " [-bEHPS]",
1270 #ifdef HAVE_BSD_AUTH_H
1271         " [-a auth_type]",
1272 #endif
1273 #ifdef HAVE_LOGIN_CAP_H
1274         " [-c class|-]",
1275 #endif
1276         " [-p prompt]",
1277         " [-u username|#uid]",
1278         " [VAR=value]",
1279         " {-i | -s | <command>}",
1280         NULL
1281     };
1282     static char *uvec3[] = {
1283         " -e",
1284         " [-S]",
1285 #ifdef HAVE_BSD_AUTH_H
1286         " [-a auth_type]",
1287 #endif
1288 #ifdef HAVE_LOGIN_CAP_H
1289         " [-c class|-]",
1290 #endif
1291         " [-p prompt]",
1292         " [-u username|#uid]",
1293         " file ...",
1294         NULL
1295     };
1296
1297     /*
1298      * Use usage vectors appropriate to the progname.
1299      */
1300     if (strcmp(getprogname(), "sudoedit") == 0) {
1301         uvec[0] = uvec3 + 1;
1302         uvec[1] = NULL;
1303     } else {
1304         uvec[0] = uvec1;
1305         uvec[1] = uvec2;
1306         uvec[2] = uvec3;
1307         uvec[3] = NULL;
1308     }
1309
1310     /*
1311      * Print usage and wrap lines as needed.
1312      * Assumes an 80-character wide terminal, which is kind of bogus...
1313      */
1314     ulen = (int)strlen(getprogname()) + 7;
1315     linemax = 80;
1316     for (i = 0; uvec[i] != NULL; i++) {
1317         printf("usage: %s", getprogname());
1318         linelen = linemax - ulen;
1319         for (p = uvec[i]; *p != NULL; p++) {
1320             plen = (int)strlen(*p);
1321             if (linelen >= plen || linelen == linemax - ulen) {
1322                 fputs(*p, stdout);
1323                 linelen -= plen;
1324             } else {
1325                 p--;
1326                 linelen = linemax - ulen;
1327                 printf("\n%*s", ulen, "");
1328             }
1329         }
1330         putchar('\n');
1331     }
1332     exit(exit_val);
1333 }