Imported Upstream version 1.8.1p2
[debian/sudo] / plugins / sudoers / testsudoers.c
1 /*
2  * Copyright (c) 1996, 1998-2005, 2007-2011
3  *      Todd C. Miller <Todd.Miller@courtesan.com>
4  *
5  * Permission to use, copy, modify, and distribute this software for any
6  * purpose with or without fee is hereby granted, provided that the above
7  * copyright notice and this permission notice appear in all copies.
8  *
9  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
17  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
18  *
19  * Sponsored in part by the Defense Advanced Research Projects
20  * Agency (DARPA) and Air Force Research Laboratory, Air Force
21  * Materiel Command, USAF, under agreement number F39502-99-1-0512.
22  */
23
24 #define _SUDO_MAIN
25
26 #include <config.h>
27
28 #include <sys/param.h>
29 #include <sys/types.h>
30 #include <sys/stat.h>
31 #include <sys/socket.h>
32 #include <stdio.h>
33 #ifdef STDC_HEADERS
34 # include <stdlib.h>
35 # include <stddef.h>
36 #else
37 # ifdef HAVE_STDLIB_H
38 #  include <stdlib.h>
39 # endif
40 #endif /* STDC_HEADERS */
41 #ifdef HAVE_STRING_H
42 # include <string.h>
43 #endif /* HAVE_STRING_H */
44 #ifdef HAVE_STRINGS_H
45 # include <strings.h>
46 #endif /* HAVE_STRINGS_H */
47 #ifdef HAVE_UNISTD_H
48 # include <unistd.h>
49 #endif /* HAVE_UNISTD_H */
50 #ifdef HAVE_FNMATCH
51 # include <fnmatch.h>
52 #endif /* HAVE_FNMATCH */
53 #ifdef HAVE_NETGROUP_H
54 # include <netgroup.h>
55 #endif /* HAVE_NETGROUP_H */
56 #include <ctype.h>
57 #include <errno.h>
58 #include <netinet/in.h>
59 #include <arpa/inet.h>
60 #include <netdb.h>
61
62 #include "tsgetgrpw.h"
63 #include "sudoers.h"
64 #include "interfaces.h"
65 #include "parse.h"
66 #include <gram.h>
67
68 #ifndef HAVE_FNMATCH
69 # include "compat/fnmatch.h"
70 #endif /* HAVE_FNMATCH */
71
72 /*
73  * Function Prototypes
74  */
75 int  print_alias(void *, void *);
76 void dump_sudoers(void);
77 void print_defaults(void);
78 void print_privilege(struct privilege *);
79 void print_userspecs(void);
80 void usage(void) __attribute__((__noreturn__));
81 void set_runasgr(char *);
82 void set_runaspw(char *);
83 void cleanup(int);
84 static int testsudoers_printf(int msg_type, const char *fmt, ...);
85 static int testsudoers_print(const char *msg);
86
87 extern void setgrfile(const char *);
88 extern void setgrent(void);
89 extern void endgrent(void);
90 extern struct group *getgrent(void);
91 extern struct group *getgrnam(const char *);
92 extern struct group *getgrgid(gid_t);
93 extern void setpwfile(const char *);
94 extern void setpwent(void);
95 extern void endpwent(void);
96 extern struct passwd *getpwent(void);
97 extern struct passwd *getpwnam(const char *);
98 extern struct passwd *getpwuid(uid_t);
99
100 extern int (*trace_print)(const char *msg);
101
102 /*
103  * Globals
104  */
105 struct interface *interfaces;
106 struct sudo_user sudo_user;
107 struct passwd *list_pw;
108 extern int parse_error;
109 sudo_printf_t sudo_printf = testsudoers_printf;
110
111 /* For getopt(3) */
112 extern char *optarg;
113 extern int optind;
114
115 #if defined(SUDO_DEVEL) && defined(__OpenBSD__)
116 extern char *malloc_options;
117 #endif
118 #ifdef YYDEBUG
119 extern int yydebug;
120 #endif
121
122 int
123 main(int argc, char *argv[])
124 {
125     struct cmndspec *cs;
126     struct privilege *priv;
127     struct userspec *us;
128     char *p, *grfile, *pwfile, *runas_group, *runas_user;
129     char hbuf[MAXHOSTNAMELEN + 1];
130     int match, host_match, runas_match, cmnd_match;
131     int ch, dflag;
132
133 #if defined(SUDO_DEVEL) && defined(__OpenBSD__)
134     malloc_options = "AFGJPR";
135 #endif
136 #ifdef YYDEBUG
137     yydebug = 1;
138 #endif
139
140 #if !defined(HAVE_GETPROGNAME) && !defined(HAVE___PROGNAME)
141     setprogname(argc > 0 ? argv[0] : "testsudoers");
142 #endif
143
144     dflag = 0;
145     grfile = pwfile = runas_group = runas_user = NULL;
146     while ((ch = getopt(argc, argv, "dg:G:h:p:tu:")) != -1) {
147         switch (ch) {
148             case 'd':
149                 dflag = 1;
150                 break;
151             case 'h':
152                 user_host = optarg;
153                 break;
154             case 'G':
155                 grfile = optarg;
156                 break;
157             case 'g':
158                 runas_group = optarg;
159                 break;
160             case 'p':
161                 pwfile = optarg;
162                 break;
163             case 't':
164                 trace_print = testsudoers_print;
165                 break;
166             case 'u':
167                 runas_user = optarg;
168                 break;
169             default:
170                 usage();
171                 break;
172         }
173     }
174     argc -= optind;
175     argv += optind;
176
177     /* Set group/passwd file and init the cache. */
178     if (grfile)
179         setgrfile(grfile);
180     if (pwfile)
181         setpwfile(pwfile);
182     sudo_setpwent();
183     sudo_setgrent();
184
185     if (argc < 2) {
186         if (!dflag)
187             usage();
188         user_name = "root";
189         user_cmnd = user_base = "true";
190     } else {
191         user_name = *argv;
192         user_cmnd = *++argv;
193         if ((p = strrchr(user_cmnd, '/')) != NULL)
194             user_base = p + 1;
195         else
196             user_base = user_cmnd;
197         argc -= 2;
198     }
199     if ((sudo_user.pw = sudo_getpwnam(user_name)) == NULL)
200         errorx(1, "no passwd entry for %s!", user_name);
201
202     if (user_host == NULL) {
203         if (gethostname(hbuf, sizeof(hbuf)) != 0)
204             error(1, "gethostname");
205         hbuf[sizeof(hbuf) - 1] = '\0';
206         user_host = hbuf;
207     }
208     if ((p = strchr(user_host, '.'))) {
209         *p = '\0';
210         user_shost = estrdup(user_host);
211         *p = '.';
212     } else {
213         user_shost = user_host;
214     }
215
216     /* Fill in user_args from argv. */
217     if (argc > 0) {
218         char *to, **from;
219         size_t size, n;
220
221         for (size = 0, from = argv + 1; *from; from++)
222             size += strlen(*from) + 1;
223
224         user_args = (char *) emalloc(size);
225         for (to = user_args, from = argv + 1; *from; from++) {
226             n = strlcpy(to, *from, size - (to - user_args));
227             if (n >= size - (to - user_args))
228                     errorx(1, "internal error, init_vars() overflow");
229             to += n;
230             *to++ = ' ';
231         }
232         *--to = '\0';
233     }
234
235     /* Initialize default values. */
236     init_defaults();
237
238     /* Load ip addr/mask for each interface. */
239     if (get_net_ifs(&p) > 0)
240         set_interfaces(p);
241
242     /* Allocate space for data structures in the parser. */
243     init_parser("sudoers", 0);
244
245     if (yyparse() != 0 || parse_error) {
246         parse_error = TRUE;
247         (void) fputs("Does not parse", stdout);
248     } else {
249         (void) fputs("Parses OK", stdout);
250     }
251
252     if (!update_defaults(SETDEF_ALL))
253         (void) fputs(" (problem with defaults entries)", stdout);
254     puts(".");
255
256     if (def_group_plugin && group_plugin_load(def_group_plugin) != TRUE)
257         def_group_plugin = NULL;
258
259     /*
260      * Set runas passwd/group entries based on command line or sudoers.
261      * Note that if runas_group was specified without runas_user we
262      * defer setting runas_pw so the match routines know to ignore it.
263      */
264     if (runas_group != NULL) {
265         set_runasgr(runas_group);
266         if (runas_user != NULL)
267             set_runaspw(runas_user);
268     } else
269         set_runaspw(runas_user ? runas_user : def_runas_default);
270
271     if (dflag) {
272         (void) putchar('\n');
273         dump_sudoers();
274         if (argc < 2)
275             exit(parse_error ? 1 : 0);
276     }
277
278     /* This loop must match the one in sudo_file_lookup() */
279     printf("\nEntries for user %s:\n", user_name);
280     match = UNSPEC;
281     tq_foreach_rev(&userspecs, us) {
282         if (userlist_matches(sudo_user.pw, &us->users) != ALLOW)
283             continue;
284         tq_foreach_rev(&us->privileges, priv) {
285             putchar('\n');
286             print_privilege(priv); /* XXX */
287             putchar('\n');
288             host_match = hostlist_matches(&priv->hostlist);
289             if (host_match == ALLOW) {
290                 puts("\thost  matched");
291                 tq_foreach_rev(&priv->cmndlist, cs) {
292                     runas_match = runaslist_matches(&cs->runasuserlist,
293                         &cs->runasgrouplist);
294                     if (runas_match == ALLOW) {
295                         puts("\trunas matched");
296                         cmnd_match = cmnd_matches(cs->cmnd);
297                         if (cmnd_match != UNSPEC)
298                             match = cmnd_match;
299                         printf("\tcmnd  %s\n", match == ALLOW ? "allowed" :
300                             match == DENY ? "denied" : "unmatched");
301                     }
302                 }
303             } else
304                 puts("\thost  unmatched");
305         }
306     }
307     printf("\nCommand %s\n", match == ALLOW ? "allowed" :
308         match == DENY ? "denied" : "unmatched");
309
310     /*
311      * Exit codes:
312      *  0 - parsed OK and command matched.
313      *  1 - parse error
314      *  2 - command not matched
315      *  3 - command denied
316      */
317     if (parse_error)
318         exit(1);
319     exit(match == ALLOW ? 0 : match + 3);
320 }
321
322 void
323 set_runaspw(char *user)
324 {
325     if (*user == '#') {
326         if ((runas_pw = sudo_getpwuid(atoi(user + 1))) == NULL)
327             runas_pw = sudo_fakepwnam(user, runas_gr ? runas_gr->gr_gid : 0);
328     } else {
329         if ((runas_pw = sudo_getpwnam(user)) == NULL)
330             errorx(1, "unknown user: %s", user);
331     }
332 }
333
334 void
335 set_runasgr(char *group)
336 {
337     if (*group == '#') {
338         if ((runas_gr = sudo_getgrgid(atoi(group + 1))) == NULL)
339             runas_gr = sudo_fakegrnam(group);
340     } else {
341         if ((runas_gr = sudo_getgrnam(group)) == NULL)
342             errorx(1, "unknown group: %s", group);
343     }
344 }
345
346 void
347 sudo_setspent(void)
348 {
349     return;
350 }
351
352 void
353 sudo_endspent(void)
354 {
355     return;
356 }
357
358 void
359 set_fqdn(void)
360 {
361     return;
362 }
363
364 FILE *
365 open_sudoers(const char *path, int isdir, int *keepopen)
366 {
367     return fopen(path, "r");
368 }
369
370 void
371 init_envtables(void)
372 {
373     return;
374 }
375
376 int
377 set_perms(int perm)
378 {
379     return 1;
380 }
381
382 void
383 restore_perms(void)
384 {
385 }
386
387 void
388 cleanup(int gotsignal)
389 {
390     if (!gotsignal) {
391         sudo_endpwent();
392         sudo_endgrent();
393     }
394 }
395
396 void
397 print_member(struct member *m)
398 {
399     struct sudo_command *c;
400
401     if (m->negated)
402         putchar('!');
403     if (m->name == NULL)
404         fputs("ALL", stdout);
405     else if (m->type != COMMAND)
406         fputs(m->name, stdout);
407     else {
408         c = (struct sudo_command *) m->name;
409         printf("%s%s%s", c->cmnd, c->args ? " " : "",
410             c->args ? c->args : "");
411     }
412 }
413
414 void
415 print_defaults(void)
416 {
417     struct defaults *d;
418     struct member *m;
419
420     tq_foreach_fwd(&defaults, d) {
421         (void) fputs("Defaults", stdout);
422         switch (d->type) {
423             case DEFAULTS_HOST:
424                 putchar('@');
425                 break;
426             case DEFAULTS_USER:
427                 putchar(':');
428                 break;
429             case DEFAULTS_RUNAS:
430                 putchar('>');
431                 break;
432             case DEFAULTS_CMND:
433                 putchar('!');
434                 break;
435         }
436         tq_foreach_fwd(&d->binding, m) {
437             if (m != tq_first(&d->binding))
438                 putchar(',');
439             print_member(m);
440         }
441         printf("\t%s%s", d->op == FALSE ? "!" : "", d->var);
442         if (d->val != NULL) {
443             printf("%c%s", d->op == TRUE ? '=' : d->op, d->val);
444         }
445         putchar('\n');
446     }
447 }
448
449 int
450 print_alias(void *v1, void *v2)
451 {
452     struct alias *a = (struct alias *)v1;
453     struct member *m;
454     struct sudo_command *c;
455
456     switch (a->type) {
457         case HOSTALIAS:
458             (void) printf("Host_Alias\t%s = ", a->name);
459             break;
460         case CMNDALIAS:
461             (void) printf("Cmnd_Alias\t%s = ", a->name);
462             break;
463         case USERALIAS:
464             (void) printf("User_Alias\t%s = ", a->name);
465             break;
466         case RUNASALIAS:
467             (void) printf("Runas_Alias\t%s = ", a->name);
468             break;
469     }
470     tq_foreach_fwd(&a->members, m) {
471         if (m != tq_first(&a->members))
472             fputs(", ", stdout);
473         if (m->type == COMMAND) {
474             c = (struct sudo_command *) m->name;
475             printf("%s%s%s", c->cmnd, c->args ? " " : "",
476                 c->args ? c->args : "");
477         } else if (m->type == ALL) {
478             fputs("ALL", stdout);
479         } else {
480             fputs(m->name, stdout);
481         }
482     }
483     putchar('\n');
484     return 0;
485 }
486
487 void
488 print_privilege(struct privilege *priv)
489 {
490     struct cmndspec *cs;
491     struct member *m;
492     struct privilege *p;
493     struct cmndtag tags;
494
495     for (p = priv; p != NULL; p = p->next) {
496         if (p != priv)
497             fputs(" : ", stdout);
498         tq_foreach_fwd(&p->hostlist, m) {
499             if (m != tq_first(&p->hostlist))
500                 fputs(", ", stdout);
501             print_member(m);
502         }
503         fputs(" = ", stdout);
504         tags.nopasswd = tags.noexec = UNSPEC;
505         tq_foreach_fwd(&p->cmndlist, cs) {
506             if (cs != tq_first(&p->cmndlist))
507                 fputs(", ", stdout);
508             if (!tq_empty(&cs->runasuserlist) || !tq_empty(&cs->runasgrouplist)) {
509                 fputs("(", stdout);
510                 if (!tq_empty(&cs->runasuserlist)) {
511                     tq_foreach_fwd(&cs->runasuserlist, m) {
512                         if (m != tq_first(&cs->runasuserlist))
513                             fputs(", ", stdout);
514                         print_member(m);
515                     }  
516                 } else if (tq_empty(&cs->runasgrouplist)) {
517                     fputs(def_runas_default, stdout);
518                 } else {
519                     fputs(sudo_user.pw->pw_name, stdout);
520                 }
521                 if (!tq_empty(&cs->runasgrouplist)) {
522                     fputs(" : ", stdout);
523                     tq_foreach_fwd(&cs->runasgrouplist, m) {
524                         if (m != tq_first(&cs->runasgrouplist))
525                             fputs(", ", stdout);
526                         print_member(m);
527                     }
528                 }
529                 fputs(") ", stdout);
530             }
531 #ifdef HAVE_SELINUX
532             if (cs->role)
533                 printf("ROLE=%s ", cs->role);
534             if (cs->type)
535                 printf("TYPE=%s ", cs->type);
536 #endif /* HAVE_SELINUX */
537             if (cs->tags.nopasswd != UNSPEC && cs->tags.nopasswd != tags.nopasswd)
538                 printf("%sPASSWD: ", cs->tags.nopasswd ? "NO" : "");
539             if (cs->tags.noexec != UNSPEC && cs->tags.noexec != tags.noexec)
540                 printf("%sEXEC: ", cs->tags.noexec ? "NO" : "");
541             print_member(cs->cmnd);
542             memcpy(&tags, &cs->tags, sizeof(tags));
543         }
544     }
545 }
546
547 void
548 print_userspecs(void)
549 {
550     struct member *m;
551     struct userspec *us;
552
553     tq_foreach_fwd(&userspecs, us) {
554         tq_foreach_fwd(&us->users, m) {
555             if (m != tq_first(&us->users))
556                 fputs(", ", stdout);
557             print_member(m);
558         }
559         putchar('\t');
560         print_privilege(us->privileges.first); /* XXX */
561         putchar('\n');
562     }
563 }
564
565 static int
566 testsudoers_printf(int msg_type, const char *fmt, ...)
567 {
568     va_list ap;
569     FILE *fp;
570             
571     switch (msg_type) {
572     case SUDO_CONV_INFO_MSG:
573         fp = stdout;
574         break;
575     case SUDO_CONV_ERROR_MSG:
576         fp = stderr;
577         break;
578     default:
579         errno = EINVAL;
580         return -1;
581     }
582    
583     va_start(ap, fmt);
584     vfprintf(fp, fmt, ap);
585     va_end(ap);
586    
587     return 0;
588 }
589
590 void
591 dump_sudoers(void)
592 {
593     print_defaults();
594
595     putchar('\n');
596     alias_apply(print_alias, NULL);
597
598     putchar('\n');
599     print_userspecs();
600 }
601
602 static int testsudoers_print(const char *msg)
603 {
604     return fputs(msg, stderr);
605 }
606
607 void
608 usage(void)
609 {
610     (void) fprintf(stderr, "usage: %s [-dt] [-G grfile] [-g group] [-h host] [-p pwfile] [-u user] <user> <command> [args]\n", getprogname());
611     exit(1);
612 }