#define _SUDO_MAIN
#include <config.h>
#include <sys/param.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/socket.h>
#include <stdio.h>
#ifdef STDC_HEADERS
# include <stdlib.h>
# include <stddef.h>
#else
# ifdef HAVE_STDLIB_H
# include <stdlib.h>
# endif
#endif
#ifdef HAVE_STRING_H
# include <string.h>
#endif
#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
#ifdef HAVE_UNISTD_H
# include <unistd.h>
#endif
#ifdef HAVE_FNMATCH
# include <fnmatch.h>
#endif
#ifdef HAVE_NETGROUP_H
# include <netgroup.h>
#endif
#include <ctype.h>
#include <pwd.h>
#include <grp.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <netdb.h>
#include "tsgetgrpw.h"
#include "sudo.h"
#include "interfaces.h"
#include "parse.h"
#include <gram.h>
#ifndef HAVE_FNMATCH
# include "emul/fnmatch.h"
#endif
int Argc, NewArgc;
char **Argv, **NewArgv;
int num_interfaces;
struct interface *interfaces;
struct sudo_user sudo_user;
struct passwd *list_pw;
extern int parse_error;
extern char *optarg;
extern int optind;
#if defined(SUDO_DEVEL) && defined(__OpenBSD__)
extern char *malloc_options;
#endif
#ifdef YYDEBUG
extern int yydebug;
#endif
int print_alias __P((void *, void *));
void dump_sudoers __P((void));
void print_defaults __P((void));
void print_privilege __P((struct privilege *));
void print_userspecs __P((void));
void usage __P((void)) __attribute__((__noreturn__));
void set_runasgr __P((char *));
void set_runaspw __P((char *));
int
main(argc, argv)
int argc;
char **argv;
{
struct cmndspec *cs;
struct privilege *priv;
struct userspec *us;
char *p, *grfile, *pwfile, *runas_group, *runas_user;
char hbuf[MAXHOSTNAMELEN + 1];
int match, host_match, runas_match, cmnd_match;
int ch, dflag;
#if defined(SUDO_DEVEL) && defined(__OpenBSD__)
malloc_options = "AFGJPR";
#endif
#ifdef YYDEBUG
yydebug = 1;
#endif
Argv = argv;
Argc = argc;
dflag = 0;
grfile = pwfile = runas_group = runas_user = NULL;
while ((ch = getopt(argc, argv, "dg:P:h:p:u:")) != -1) {
switch (ch) {
case 'd':
dflag = 1;
break;
case 'h':
user_host = optarg;
break;
case 'g':
runas_group = optarg;
break;
case 'P':
grfile = optarg;
break;
case 'p':
pwfile = optarg;
break;
case 'u':
runas_user = optarg;
break;
default:
usage();
break;
}
}
argc -= optind;
argv += optind;
NewArgc = argc;
NewArgv = argv;
if (grfile)
setgrfile(grfile);
if (pwfile)
setpwfile(pwfile);
sudo_setpwent();
sudo_setgrent();
if (argc < 2) {
if (!dflag)
usage();
if ((sudo_user.pw = sudo_getpwnam("root")) == NULL)
errorx(1, "no passwd entry for root!");
user_cmnd = user_base = "true";
} else {
if ((sudo_user.pw = sudo_getpwnam(*argv)) == NULL)
errorx(1, "no passwd entry for %s!", *argv);
user_cmnd = *++argv;
if ((p = strrchr(user_cmnd, '/')) != NULL)
user_base = p + 1;
else
user_base = user_cmnd;
NewArgc -= 2;
}
if (user_host == NULL) {
if (gethostname(hbuf, sizeof(hbuf)) != 0)
error(1, "gethostname");
hbuf[sizeof(hbuf) - 1] = '\0';
user_host = hbuf;
}
if ((p = strchr(user_host, '.'))) {
*p = '\0';
user_shost = estrdup(user_host);
*p = '.';
} else {
user_shost = user_host;
}
if (NewArgc > 0) {
char *to, **from;
size_t size, n;
for (size = 0, from = NewArgv + 1; *from; from++)
size += strlen(*from) + 1;
user_args = (char *) emalloc(size);
for (to = user_args, from = NewArgv + 1; *from; from++) {
n = strlcpy(to, *from, size - (to - user_args));
if (n >= size - (to - user_args))
errorx(1, "internal error, init_vars() overflow");
to += n;
*to++ = ' ';
}
*--to = '\0';
}
init_defaults();
load_interfaces();
init_parser("sudoers", 0);
if (yyparse() != 0 || parse_error) {
parse_error = TRUE;
(void) fputs("Does not parse", stdout);
} else {
(void) fputs("Parses OK", stdout);
}
if (!update_defaults(SETDEF_ALL))
(void) fputs(" (problem with defaults entries)", stdout);
puts(".");
if (runas_group != NULL) {
set_runasgr(runas_group);
if (runas_user != NULL)
set_runaspw(runas_user);
} else
set_runaspw(runas_user ? runas_user : def_runas_default);
if (dflag) {
(void) putchar('\n');
dump_sudoers();
if (argc < 2)
exit(parse_error ? 1 : 0);
}
printf("\nEntries for user %s:\n", user_name);
match = UNSPEC;
tq_foreach_rev(&userspecs, us) {
if (userlist_matches(sudo_user.pw, &us->users) != ALLOW)
continue;
tq_foreach_rev(&us->privileges, priv) {
putchar('\n');
print_privilege(priv);
putchar('\n');
host_match = hostlist_matches(&priv->hostlist);
if (host_match == ALLOW) {
puts("\thost matched");
tq_foreach_rev(&priv->cmndlist, cs) {
runas_match = runaslist_matches(&cs->runasuserlist,
&cs->runasgrouplist);
if (runas_match == ALLOW) {
puts("\trunas matched");
cmnd_match = cmnd_matches(cs->cmnd);
if (cmnd_match != UNSPEC)
match = cmnd_match;
printf("\tcmnd %s\n", match == ALLOW ? "allowed" :
match == DENY ? "denied" : "unmatched");
}
}
} else
puts("\thost unmatched");
}
}
printf("\nCommand %s\n", match == ALLOW ? "allowed" :
match == DENY ? "denied" : "unmatched");
if (parse_error)
exit(1);
exit(match == ALLOW ? 0 : match + 3);
}
void
set_runaspw(user)
char *user;
{
if (*user == '#') {
if ((runas_pw = sudo_getpwuid(atoi(user + 1))) == NULL)
runas_pw = sudo_fakepwnam(user, runas_gr ? runas_gr->gr_gid : 0);
} else {
if ((runas_pw = sudo_getpwnam(user)) == NULL)
errorx(1, "unknown user: %s", user);
}
}
void
set_runasgr(group)
char *group;
{
if (*group == '#') {
if ((runas_gr = sudo_getgrgid(atoi(group + 1))) == NULL)
runas_gr = sudo_fakegrnam(group);
} else {
if ((runas_gr = sudo_getgrnam(group)) == NULL)
errorx(1, "unknown group: %s", group);
}
}
void
sudo_setspent()
{
return;
}
void
sudo_endspent()
{
return;
}
char *
sudo_getepw(pw)
const struct passwd *pw;
{
return pw->pw_passwd;
}
void
set_fqdn()
{
return;
}
FILE *
open_sudoers(path, isdir, keepopen)
const char *path;
int isdir;
int *keepopen;
{
return fopen(path, "r");
}
void
init_envtables()
{
return;
}
int
set_perms(perm)
int perm;
{
return 1;
}
void
cleanup(gotsignal)
int gotsignal;
{
if (!gotsignal) {
sudo_endpwent();
sudo_endgrent();
}
}
void
print_member(m)
struct member *m;
{
struct sudo_command *c;
if (m->negated)
putchar('!');
if (m->name == NULL)
fputs("ALL", stdout);
else if (m->type != COMMAND)
fputs(m->name, stdout);
else {
c = (struct sudo_command *) m->name;
printf("%s%s%s", c->cmnd, c->args ? " " : "",
c->args ? c->args : "");
}
}
void
print_defaults()
{
struct defaults *d;
struct member *m;
tq_foreach_fwd(&defaults, d) {
(void) fputs("Defaults", stdout);
switch (d->type) {
case DEFAULTS_HOST:
putchar('@');
break;
case DEFAULTS_USER:
putchar(':');
break;
case DEFAULTS_RUNAS:
putchar('>');
break;
case DEFAULTS_CMND:
putchar('!');
break;
}
tq_foreach_fwd(&d->binding, m) {
if (m != tq_first(&d->binding))
putchar(',');
print_member(m);
}
printf("\t%s%s", d->op == FALSE ? "!" : "", d->var);
if (d->val != NULL) {
printf("%c%s", d->op == TRUE ? '=' : d->op, d->val);
}
putchar('\n');
}
}
int
print_alias(v1, v2)
void *v1, *v2;
{
struct alias *a = (struct alias *)v1;
struct member *m;
struct sudo_command *c;
switch (a->type) {
case HOSTALIAS:
(void) printf("Host_Alias\t%s = ", a->name);
break;
case CMNDALIAS:
(void) printf("Cmnd_Alias\t%s = ", a->name);
break;
case USERALIAS:
(void) printf("User_Alias\t%s = ", a->name);
break;
case RUNASALIAS:
(void) printf("Runas_Alias\t%s = ", a->name);
break;
}
tq_foreach_fwd(&a->members, m) {
if (m != tq_first(&a->members))
fputs(", ", stdout);
if (m->type == COMMAND) {
c = (struct sudo_command *) m->name;
printf("%s%s%s", c->cmnd, c->args ? " " : "",
c->args ? c->args : "");
} else if (m->type == ALL) {
fputs("ALL", stdout);
} else {
fputs(m->name, stdout);
}
}
putchar('\n');
return 0;
}
void
print_privilege(priv)
struct privilege *priv;
{
struct cmndspec *cs;
struct member *m;
struct privilege *p;
struct cmndtag tags;
for (p = priv; p != NULL; p = p->next) {
if (p != priv)
fputs(" : ", stdout);
tq_foreach_fwd(&p->hostlist, m) {
if (m != tq_first(&p->hostlist))
fputs(", ", stdout);
print_member(m);
}
fputs(" = ", stdout);
tags.nopasswd = tags.noexec = UNSPEC;
tq_foreach_fwd(&p->cmndlist, cs) {
if (cs != tq_first(&p->cmndlist))
fputs(", ", stdout);
if (!tq_empty(&cs->runasuserlist) || !tq_empty(&cs->runasgrouplist)) {
fputs("(", stdout);
if (!tq_empty(&cs->runasuserlist)) {
tq_foreach_fwd(&cs->runasuserlist, m) {
if (m != tq_first(&cs->runasuserlist))
fputs(", ", stdout);
print_member(m);
}
} else if (tq_empty(&cs->runasgrouplist)) {
fputs(def_runas_default, stdout);
} else {
fputs(sudo_user.pw->pw_name, stdout);
}
if (!tq_empty(&cs->runasgrouplist)) {
fputs(" : ", stdout);
tq_foreach_fwd(&cs->runasgrouplist, m) {
if (m != tq_first(&cs->runasgrouplist))
fputs(", ", stdout);
print_member(m);
}
}
fputs(") ", stdout);
}
#ifdef HAVE_SELINUX
if (cs->role)
printf("ROLE=%s ", cs->role);
if (cs->type)
printf("TYPE=%s ", cs->type);
#endif
if (cs->tags.nopasswd != UNSPEC && cs->tags.nopasswd != tags.nopasswd)
printf("%sPASSWD: ", cs->tags.nopasswd ? "NO" : "");
if (cs->tags.noexec != UNSPEC && cs->tags.noexec != tags.noexec)
printf("%sEXEC: ", cs->tags.noexec ? "NO" : "");
print_member(cs->cmnd);
memcpy(&tags, &cs->tags, sizeof(tags));
}
}
}
void
print_userspecs()
{
struct member *m;
struct userspec *us;
tq_foreach_fwd(&userspecs, us) {
tq_foreach_fwd(&us->users, m) {
if (m != tq_first(&us->users))
fputs(", ", stdout);
print_member(m);
}
putchar('\t');
print_privilege(us->privileges.first);
putchar('\n');
}
}
void
dump_sudoers()
{
print_defaults();
putchar('\n');
alias_apply(print_alias, NULL);
putchar('\n');
print_userspecs();
}
void
usage()
{
(void) fprintf(stderr, "usage: %s [-d] [-g group] [-h host] [-P grfile] [-p pwfile] [-u user] <user> <command> [args]\n", getprogname());
exit(1);
}