1013 lines
21 KiB
Plaintext
1013 lines
21 KiB
Plaintext
%{
|
|
/*
|
|
* Copyright (c) 1996, 1998-2005, 2007-2009
|
|
* Todd C. Miller <Todd.Miller@courtesan.com>
|
|
*
|
|
* Permission to use, copy, modify, and distribute this software for any
|
|
* purpose with or without fee is hereby granted, provided that the above
|
|
* copyright notice and this permission notice appear in all copies.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
|
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
|
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
|
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
|
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
|
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
|
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
|
* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
|
|
* OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
|
|
* ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* Sponsored in part by the Defense Advanced Research Projects
|
|
* Agency (DARPA) and Air Force Research Laboratory, Air Force
|
|
* Materiel Command, USAF, under agreement number F39502-99-1-0512.
|
|
*/
|
|
|
|
#include <config.h>
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/param.h>
|
|
#include <sys/stat.h>
|
|
#include <stdio.h>
|
|
#ifdef STDC_HEADERS
|
|
# include <stdlib.h>
|
|
# include <stddef.h>
|
|
#else
|
|
# ifdef HAVE_STDLIB_H
|
|
# include <stdlib.h>
|
|
# endif
|
|
#endif /* STDC_HEADERS */
|
|
#ifdef HAVE_STRING_H
|
|
# include <string.h>
|
|
#else
|
|
# ifdef HAVE_STRINGS_H
|
|
# include <strings.h>
|
|
# endif
|
|
#endif /* HAVE_STRING_H */
|
|
#ifdef HAVE_UNISTD_H
|
|
# include <unistd.h>
|
|
#endif /* HAVE_UNISTD_H */
|
|
#if defined(HAVE_MALLOC_H) && !defined(STDC_HEADERS)
|
|
# include <malloc.h>
|
|
#endif /* HAVE_MALLOC_H && !STDC_HEADERS */
|
|
#ifdef HAVE_DIRENT_H
|
|
# include <dirent.h>
|
|
# define NAMLEN(dirent) strlen((dirent)->d_name)
|
|
#else
|
|
# define dirent direct
|
|
# define NAMLEN(dirent) (dirent)->d_namlen
|
|
# ifdef HAVE_SYS_NDIR_H
|
|
# include <sys/ndir.h>
|
|
# endif
|
|
# ifdef HAVE_SYS_DIR_H
|
|
# include <sys/dir.h>
|
|
# endif
|
|
# ifdef HAVE_NDIR_H
|
|
# include <ndir.h>
|
|
# endif
|
|
#endif
|
|
#include <ctype.h>
|
|
#include "sudoers.h"
|
|
#include "parse.h"
|
|
#include <gram.h>
|
|
|
|
extern YYSTYPE yylval;
|
|
extern int parse_error;
|
|
int sudolineno = 1;
|
|
char *sudoers;
|
|
static int sawspace = 0;
|
|
static int arg_len = 0;
|
|
static int arg_size = 0;
|
|
|
|
static int append(char *, int);
|
|
static int _fill(char *, int, int);
|
|
static int fill_cmnd(char *, int);
|
|
static int fill_args(char *, int, int);
|
|
static int _push_include(char *, int);
|
|
static int pop_include(void);
|
|
static int ipv6_valid(const char *s);
|
|
static char *parse_include(char *);
|
|
extern void yyerror(const char *);
|
|
|
|
#define fill(a, b) _fill(a, b, 0)
|
|
|
|
#define push_include(_p) (_push_include((_p), FALSE))
|
|
#define push_includedir(_p) (_push_include((_p), TRUE))
|
|
|
|
/* realloc() to size + COMMANDARGINC to make room for command args */
|
|
#define COMMANDARGINC 64
|
|
|
|
#ifdef TRACELEXER
|
|
#define LEXTRACE(msg) fputs(msg, stderr)
|
|
#else
|
|
#define LEXTRACE(msg)
|
|
#endif
|
|
%}
|
|
|
|
HEX16 [0-9A-Fa-f]{1,4}
|
|
OCTET (1?[0-9]{1,2})|(2[0-4][0-9])|(25[0-5])
|
|
IPV4ADDR {OCTET}(\.{OCTET}){3}
|
|
IPV6ADDR ({HEX16}?:){2,7}{HEX16}?|({HEX16}?:){2,6}:{IPV4ADDR}
|
|
|
|
HOSTNAME [[:alnum:]_-]+
|
|
WORD ([^#>!=:,\(\) \t\n\\]|\\[^\n])+
|
|
ID #-?[0-9]+
|
|
PATH \/(\\[\,:= \t#]|[^\,:=\\ \t\n#])+
|
|
ENVAR ([^#!=, \t\n\\\"]|\\[^\n])([^#=, \t\n\\\"]|\\[^\n])*
|
|
DEFVAR [a-z_]+
|
|
|
|
%option nounput
|
|
%option noyywrap
|
|
|
|
%s GOTDEFS
|
|
%x GOTCMND
|
|
%x STARTDEFS
|
|
%x INDEFS
|
|
%x INSTR
|
|
|
|
%%
|
|
<GOTDEFS>[[:blank:]]+ BEGIN STARTDEFS;
|
|
|
|
<STARTDEFS>{DEFVAR} {
|
|
BEGIN INDEFS;
|
|
LEXTRACE("DEFVAR ");
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
return(DEFVAR);
|
|
}
|
|
|
|
<INDEFS>{
|
|
, {
|
|
BEGIN STARTDEFS;
|
|
LEXTRACE(", ");
|
|
return(',');
|
|
} /* return ',' */
|
|
|
|
= {
|
|
LEXTRACE("= ");
|
|
return('=');
|
|
} /* return '=' */
|
|
|
|
\+= {
|
|
LEXTRACE("+= ");
|
|
return('+');
|
|
} /* return '+' */
|
|
|
|
-= {
|
|
LEXTRACE("-= ");
|
|
return('-');
|
|
} /* return '-' */
|
|
|
|
\" {
|
|
LEXTRACE("BEGINSTR ");
|
|
yylval.string = NULL;
|
|
BEGIN INSTR;
|
|
}
|
|
|
|
{ENVAR} {
|
|
LEXTRACE("WORD(2) ");
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
return(WORD);
|
|
}
|
|
}
|
|
|
|
<INSTR>{
|
|
\\[[:blank:]]*\n[[:blank:]]* {
|
|
/* Line continuation char followed by newline. */
|
|
++sudolineno;
|
|
LEXTRACE("\n");
|
|
}
|
|
|
|
\" {
|
|
LEXTRACE("ENDSTR ");
|
|
BEGIN INDEFS;
|
|
return(WORD);
|
|
}
|
|
|
|
\\ {
|
|
LEXTRACE("BACKSLASH ");
|
|
if (!append(yytext, yyleng))
|
|
yyterminate();
|
|
}
|
|
|
|
([^\"\n\\]|\\\")+ {
|
|
LEXTRACE("STRBODY ");
|
|
if (!append(yytext, yyleng))
|
|
yyterminate();
|
|
}
|
|
}
|
|
|
|
<GOTCMND>{
|
|
\\[\*\?\[\]\!] {
|
|
/* quoted fnmatch glob char, pass verbatim */
|
|
LEXTRACE("QUOTEDCHAR ");
|
|
if (!fill_args(yytext, 2, sawspace))
|
|
yyterminate();
|
|
sawspace = FALSE;
|
|
}
|
|
|
|
\\[:\\,= \t#] {
|
|
/* quoted sudoers special char, strip backslash */
|
|
LEXTRACE("QUOTEDCHAR ");
|
|
if (!fill_args(yytext + 1, 1, sawspace))
|
|
yyterminate();
|
|
sawspace = FALSE;
|
|
}
|
|
|
|
[#:\,=\n] {
|
|
BEGIN INITIAL;
|
|
yyless(0);
|
|
return(COMMAND);
|
|
} /* end of command line args */
|
|
|
|
[^\\:, \t\n]+ {
|
|
LEXTRACE("ARG ");
|
|
if (!fill_args(yytext, yyleng, sawspace))
|
|
yyterminate();
|
|
sawspace = FALSE;
|
|
} /* a command line arg */
|
|
}
|
|
|
|
<INITIAL>^#include[[:blank:]]+\/.*\n {
|
|
char *path;
|
|
|
|
if ((path = parse_include(yytext)) == NULL)
|
|
yyterminate();
|
|
|
|
LEXTRACE("INCLUDE\n");
|
|
|
|
/* Push current buffer and switch to include file */
|
|
if (!push_include(path))
|
|
yyterminate();
|
|
}
|
|
|
|
<INITIAL>^#includedir[[:blank:]]+\/.*\n {
|
|
char *path;
|
|
|
|
if ((path = parse_include(yytext)) == NULL)
|
|
yyterminate();
|
|
|
|
LEXTRACE("INCLUDEDIR\n");
|
|
|
|
/*
|
|
* Push current buffer and switch to include file.
|
|
* We simply ignore empty directories.
|
|
*/
|
|
if (!push_includedir(path) && parse_error)
|
|
yyterminate();
|
|
}
|
|
|
|
<INITIAL>^[[:blank:]]*Defaults([:@>\!]{WORD})? {
|
|
int n;
|
|
for (n = 0; isblank((unsigned char)yytext[n]); n++)
|
|
continue;
|
|
n += 8;
|
|
BEGIN GOTDEFS;
|
|
switch (yytext[n++]) {
|
|
case ':':
|
|
yyless(n);
|
|
LEXTRACE("DEFAULTS_USER ");
|
|
return(DEFAULTS_USER);
|
|
case '>':
|
|
yyless(n);
|
|
LEXTRACE("DEFAULTS_RUNAS ");
|
|
return(DEFAULTS_RUNAS);
|
|
case '@':
|
|
yyless(n);
|
|
LEXTRACE("DEFAULTS_HOST ");
|
|
return(DEFAULTS_HOST);
|
|
case '!':
|
|
yyless(n);
|
|
LEXTRACE("DEFAULTS_CMND ");
|
|
return(DEFAULTS_CMND);
|
|
default:
|
|
LEXTRACE("DEFAULTS ");
|
|
return(DEFAULTS);
|
|
}
|
|
}
|
|
|
|
<INITIAL>^[[:blank:]]*(Host|Cmnd|User|Runas)_Alias {
|
|
int n;
|
|
for (n = 0; isblank((unsigned char)yytext[n]); n++)
|
|
continue;
|
|
switch (yytext[n]) {
|
|
case 'H':
|
|
LEXTRACE("HOSTALIAS ");
|
|
return(HOSTALIAS);
|
|
case 'C':
|
|
LEXTRACE("CMNDALIAS ");
|
|
return(CMNDALIAS);
|
|
case 'U':
|
|
LEXTRACE("USERALIAS ");
|
|
return(USERALIAS);
|
|
case 'R':
|
|
LEXTRACE("RUNASALIAS ");
|
|
return(RUNASALIAS);
|
|
}
|
|
}
|
|
|
|
NOPASSWD[[:blank:]]*: {
|
|
/* cmnd does not require passwd for this user */
|
|
LEXTRACE("NOPASSWD ");
|
|
return(NOPASSWD);
|
|
}
|
|
|
|
PASSWD[[:blank:]]*: {
|
|
/* cmnd requires passwd for this user */
|
|
LEXTRACE("PASSWD ");
|
|
return(PASSWD);
|
|
}
|
|
|
|
NOEXEC[[:blank:]]*: {
|
|
LEXTRACE("NOEXEC ");
|
|
return(NOEXEC);
|
|
}
|
|
|
|
EXEC[[:blank:]]*: {
|
|
LEXTRACE("EXEC ");
|
|
return(EXEC);
|
|
}
|
|
|
|
SETENV[[:blank:]]*: {
|
|
LEXTRACE("SETENV ");
|
|
return(SETENV);
|
|
}
|
|
|
|
NOSETENV[[:blank:]]*: {
|
|
LEXTRACE("NOSETENV ");
|
|
return(NOSETENV);
|
|
}
|
|
|
|
\+{WORD} {
|
|
/* netgroup */
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("NETGROUP ");
|
|
return(NETGROUP);
|
|
}
|
|
|
|
\%:?{WORD} {
|
|
/* UN*X group */
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("USERGROUP ");
|
|
return(USERGROUP);
|
|
}
|
|
|
|
{IPV4ADDR}(\/{IPV4ADDR})? {
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("NTWKADDR ");
|
|
return(NTWKADDR);
|
|
}
|
|
|
|
{IPV4ADDR}\/([12][0-9]*|3[0-2]*) {
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("NTWKADDR ");
|
|
return(NTWKADDR);
|
|
}
|
|
|
|
{IPV6ADDR}(\/{IPV6ADDR})? {
|
|
if (!ipv6_valid(yytext)) {
|
|
LEXTRACE("ERROR ");
|
|
return(ERROR);
|
|
}
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("NTWKADDR ");
|
|
return(NTWKADDR);
|
|
}
|
|
|
|
{IPV6ADDR}\/([0-9]|[1-9][0-9]|1[01][0-9]|12[0-8]) {
|
|
if (!ipv6_valid(yytext)) {
|
|
LEXTRACE("ERROR ");
|
|
return(ERROR);
|
|
}
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("NTWKADDR ");
|
|
return(NTWKADDR);
|
|
}
|
|
|
|
[[:upper:]][[:upper:][:digit:]_]* {
|
|
if (strcmp(yytext, "ALL") == 0) {
|
|
LEXTRACE("ALL ");
|
|
return(ALL);
|
|
}
|
|
#ifdef HAVE_SELINUX
|
|
/* XXX - restrict type/role to initial state */
|
|
if (strcmp(yytext, "TYPE") == 0) {
|
|
LEXTRACE("TYPE ");
|
|
return(TYPE);
|
|
}
|
|
if (strcmp(yytext, "ROLE") == 0) {
|
|
LEXTRACE("ROLE ");
|
|
return(ROLE);
|
|
}
|
|
#endif /* HAVE_SELINUX */
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("ALIAS ");
|
|
return(ALIAS);
|
|
}
|
|
|
|
<GOTDEFS>({PATH}|sudoedit) {
|
|
/* no command args allowed for Defaults!/path */
|
|
if (!fill_cmnd(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("COMMAND ");
|
|
return(COMMAND);
|
|
}
|
|
|
|
sudoedit {
|
|
BEGIN GOTCMND;
|
|
LEXTRACE("COMMAND ");
|
|
if (!fill_cmnd(yytext, yyleng))
|
|
yyterminate();
|
|
} /* sudo -e */
|
|
|
|
{PATH} {
|
|
/* directories can't have args... */
|
|
if (yytext[yyleng - 1] == '/') {
|
|
LEXTRACE("COMMAND ");
|
|
if (!fill_cmnd(yytext, yyleng))
|
|
yyterminate();
|
|
return(COMMAND);
|
|
} else {
|
|
BEGIN GOTCMND;
|
|
LEXTRACE("COMMAND ");
|
|
if (!fill_cmnd(yytext, yyleng))
|
|
yyterminate();
|
|
}
|
|
} /* a pathname */
|
|
|
|
<INITIAL,GOTDEFS>\"[^"\n]+\" {
|
|
/* a quoted user/group name */
|
|
if (!fill(yytext + 1, yyleng - 2))
|
|
yyterminate();
|
|
switch (yytext[1]) {
|
|
case '%':
|
|
LEXTRACE("USERGROUP ");
|
|
return(USERGROUP);
|
|
case '+':
|
|
LEXTRACE("NETGROUP ");
|
|
return(NETGROUP);
|
|
default:
|
|
LEXTRACE("WORD(4) ");
|
|
return(WORD);
|
|
}
|
|
}
|
|
|
|
<INITIAL,GOTDEFS>({ID}|{WORD}) {
|
|
/* a word */
|
|
if (!fill(yytext, yyleng))
|
|
yyterminate();
|
|
LEXTRACE("WORD(5) ");
|
|
return(WORD);
|
|
}
|
|
|
|
\( {
|
|
LEXTRACE("( ");
|
|
return ('(');
|
|
}
|
|
|
|
\) {
|
|
LEXTRACE(") ");
|
|
return(')');
|
|
}
|
|
|
|
, {
|
|
LEXTRACE(", ");
|
|
return(',');
|
|
} /* return ',' */
|
|
|
|
= {
|
|
LEXTRACE("= ");
|
|
return('=');
|
|
} /* return '=' */
|
|
|
|
: {
|
|
LEXTRACE(": ");
|
|
return(':');
|
|
} /* return ':' */
|
|
|
|
<*>!+ {
|
|
if (yyleng % 2 == 1)
|
|
return('!'); /* return '!' */
|
|
}
|
|
|
|
<*>\n {
|
|
BEGIN INITIAL;
|
|
++sudolineno;
|
|
LEXTRACE("\n");
|
|
return(COMMENT);
|
|
} /* return newline */
|
|
|
|
<*>[[:blank:]]+ { /* throw away space/tabs */
|
|
sawspace = TRUE; /* but remember for fill_args */
|
|
}
|
|
|
|
<*>\\[[:blank:]]*\n {
|
|
sawspace = TRUE; /* remember for fill_args */
|
|
++sudolineno;
|
|
LEXTRACE("\n\t");
|
|
} /* throw away EOL after \ */
|
|
|
|
<INITIAL,STARTDEFS,INDEFS>#(-[^\n0-9].*|[^\n0-9-].*)?\n {
|
|
BEGIN INITIAL;
|
|
++sudolineno;
|
|
LEXTRACE("\n");
|
|
return(COMMENT);
|
|
} /* comment, not uid/gid */
|
|
|
|
<*>. {
|
|
LEXTRACE("ERROR ");
|
|
return(ERROR);
|
|
} /* parse error */
|
|
|
|
<*><<EOF>> {
|
|
if (YY_START != INITIAL) {
|
|
BEGIN INITIAL;
|
|
LEXTRACE("ERROR ");
|
|
return(ERROR);
|
|
}
|
|
if (!pop_include())
|
|
yyterminate();
|
|
}
|
|
|
|
%%
|
|
static unsigned char
|
|
hexchar(s)
|
|
const char *s;
|
|
{
|
|
int i;
|
|
int result = 0;
|
|
|
|
s += 2; /* skip \\x */
|
|
for (i = 0; i < 2; i++) {
|
|
switch (*s) {
|
|
case 'A':
|
|
case 'a':
|
|
result += 10;
|
|
break;
|
|
case 'B':
|
|
case 'b':
|
|
result += 11;
|
|
break;
|
|
case 'C':
|
|
case 'c':
|
|
result += 12;
|
|
break;
|
|
case 'D':
|
|
case 'd':
|
|
result += 13;
|
|
break;
|
|
case 'E':
|
|
case 'e':
|
|
result += 14;
|
|
break;
|
|
case 'F':
|
|
case 'f':
|
|
result += 15;
|
|
break;
|
|
default:
|
|
result += *s - '0';
|
|
break;
|
|
}
|
|
if (i == 0) {
|
|
result *= 16;
|
|
s++;
|
|
}
|
|
}
|
|
return((unsigned char)result);
|
|
}
|
|
|
|
static int
|
|
_fill(src, len, olen)
|
|
char *src;
|
|
int len, olen;
|
|
{
|
|
char *dst;
|
|
|
|
dst = olen ? realloc(yylval.string, olen + len + 1) : malloc(len + 1);
|
|
if (dst == NULL) {
|
|
yyerror("unable to allocate memory");
|
|
return(FALSE);
|
|
}
|
|
yylval.string = dst;
|
|
|
|
/* Copy the string and collapse any escaped characters. */
|
|
dst += olen;
|
|
while (len--) {
|
|
if (*src == '\\' && len) {
|
|
if (src[1] == 'x' && len >= 3 &&
|
|
isxdigit((unsigned char) src[2]) &&
|
|
isxdigit((unsigned char) src[3])) {
|
|
*dst++ = hexchar(src);
|
|
src += 4;
|
|
len -= 3;
|
|
} else {
|
|
src++;
|
|
len--;
|
|
*dst++ = *src++;
|
|
}
|
|
} else {
|
|
*dst++ = *src++;
|
|
}
|
|
}
|
|
*dst = '\0';
|
|
return(TRUE);
|
|
}
|
|
|
|
static int
|
|
append(src, len)
|
|
char *src;
|
|
int len;
|
|
{
|
|
int olen = 0;
|
|
|
|
if (yylval.string != NULL)
|
|
olen = strlen(yylval.string);
|
|
|
|
return(_fill(src, len, olen));
|
|
}
|
|
|
|
#define SPECIAL(c) \
|
|
((c) == ',' || (c) == ':' || (c) == '=' || (c) == ' ' || (c) == '\t' || (c) == '#')
|
|
|
|
static int
|
|
fill_cmnd(src, len)
|
|
char *src;
|
|
int len;
|
|
{
|
|
char *dst;
|
|
int i;
|
|
|
|
arg_len = arg_size = 0;
|
|
|
|
dst = yylval.command.cmnd = (char *) malloc(len + 1);
|
|
if (yylval.command.cmnd == NULL) {
|
|
yyerror("unable to allocate memory");
|
|
return(FALSE);
|
|
}
|
|
|
|
/* Copy the string and collapse any escaped sudo-specific characters. */
|
|
for (i = 0; i < len; i++) {
|
|
if (src[i] == '\\' && i != len - 1 && SPECIAL(src[i + 1]))
|
|
*dst++ = src[++i];
|
|
else
|
|
*dst++ = src[i];
|
|
}
|
|
*dst = '\0';
|
|
|
|
yylval.command.args = NULL;
|
|
return(TRUE);
|
|
}
|
|
|
|
static int
|
|
fill_args(s, len, addspace)
|
|
char *s;
|
|
int len;
|
|
int addspace;
|
|
{
|
|
int new_len;
|
|
char *p;
|
|
|
|
if (yylval.command.args == NULL) {
|
|
addspace = 0;
|
|
new_len = len;
|
|
} else
|
|
new_len = arg_len + len + addspace;
|
|
|
|
if (new_len >= arg_size) {
|
|
/* Allocate more space than we need for subsequent args */
|
|
while (new_len >= (arg_size += COMMANDARGINC))
|
|
;
|
|
|
|
p = yylval.command.args ?
|
|
(char *) realloc(yylval.command.args, arg_size) :
|
|
(char *) malloc(arg_size);
|
|
if (p == NULL) {
|
|
efree(yylval.command.args);
|
|
yyerror("unable to allocate memory");
|
|
return(FALSE);
|
|
} else
|
|
yylval.command.args = p;
|
|
}
|
|
|
|
/* Efficiently append the arg (with a leading space if needed). */
|
|
p = yylval.command.args + arg_len;
|
|
if (addspace)
|
|
*p++ = ' ';
|
|
if (strlcpy(p, s, arg_size - (p - yylval.command.args)) != len) {
|
|
yyerror("fill_args: buffer overflow"); /* paranoia */
|
|
return(FALSE);
|
|
}
|
|
arg_len = new_len;
|
|
return(TRUE);
|
|
}
|
|
|
|
struct path_list {
|
|
char *path;
|
|
struct path_list *next;
|
|
};
|
|
|
|
struct include_stack {
|
|
YY_BUFFER_STATE bs;
|
|
char *path;
|
|
struct path_list *more; /* more files in case of includedir */
|
|
int lineno;
|
|
int keepopen;
|
|
};
|
|
|
|
static int
|
|
pl_compare(v1, v2)
|
|
const void *v1;
|
|
const void *v2;
|
|
{
|
|
const struct path_list * const *p1 = v1;
|
|
const struct path_list * const *p2 = v2;
|
|
|
|
return(strcmp((*p1)->path, (*p2)->path));
|
|
}
|
|
|
|
static char *
|
|
switch_dir(stack, dirpath)
|
|
struct include_stack *stack;
|
|
char *dirpath;
|
|
{
|
|
DIR *dir;
|
|
int i, count = 0;
|
|
char *path = NULL;
|
|
struct dirent *dent;
|
|
struct stat sb;
|
|
struct path_list *pl, *first = NULL;
|
|
struct path_list **sorted = NULL;
|
|
|
|
if (!(dir = opendir(dirpath))) {
|
|
yyerror(dirpath);
|
|
return(NULL);
|
|
}
|
|
while ((dent = readdir(dir))) {
|
|
/* Ignore files that end in '~' or have a '.' in them. */
|
|
if (dent->d_name[0] == '\0' || dent->d_name[NAMLEN(dent) - 1] == '~'
|
|
|| strchr(dent->d_name, '.') != NULL) {
|
|
continue;
|
|
}
|
|
if (asprintf(&path, "%s/%s", dirpath, dent->d_name) == -1) {
|
|
closedir(dir);
|
|
goto bad;
|
|
}
|
|
if (stat(path, &sb) != 0 || !S_ISREG(sb.st_mode)) {
|
|
efree(path);
|
|
continue;
|
|
}
|
|
pl = malloc(sizeof(*pl));
|
|
if (pl == NULL)
|
|
goto bad;
|
|
pl->path = path;
|
|
pl->next = first;
|
|
first = pl;
|
|
count++;
|
|
}
|
|
closedir(dir);
|
|
|
|
if (count == 0)
|
|
goto done;
|
|
|
|
/* Sort the list as an array. */
|
|
sorted = malloc(sizeof(*sorted) * count);
|
|
if (sorted == NULL)
|
|
goto bad;
|
|
pl = first;
|
|
for (i = 0; i < count; i++) {
|
|
sorted[i] = pl;
|
|
pl = pl->next;
|
|
}
|
|
qsort(sorted, count, sizeof(*sorted), pl_compare);
|
|
|
|
/* Apply sorting to the list. */
|
|
first = sorted[0];
|
|
sorted[count - 1]->next = NULL;
|
|
for (i = 1; i < count; i++)
|
|
sorted[i - 1]->next = sorted[i];
|
|
efree(sorted);
|
|
|
|
/* Pull out the first element for parsing, leave the rest for later. */
|
|
if (count) {
|
|
path = first->path;
|
|
pl = first->next;
|
|
efree(first);
|
|
stack->more = pl;
|
|
} else {
|
|
path = NULL;
|
|
}
|
|
done:
|
|
efree(dirpath);
|
|
return(path);
|
|
bad:
|
|
while (first != NULL) {
|
|
pl = first;
|
|
first = pl->next;
|
|
free(pl->path);
|
|
free(pl);
|
|
}
|
|
efree(sorted);
|
|
efree(dirpath);
|
|
efree(path);
|
|
return(NULL);
|
|
}
|
|
|
|
#define MAX_SUDOERS_DEPTH 128
|
|
#define SUDOERS_STACK_INCREMENT 16
|
|
|
|
static size_t istacksize, idepth;
|
|
static struct include_stack *istack;
|
|
static int keepopen;
|
|
|
|
void
|
|
init_lexer()
|
|
{
|
|
struct path_list *pl;
|
|
|
|
while (idepth) {
|
|
idepth--;
|
|
while ((pl = istack[idepth].more) != NULL) {
|
|
istack[idepth].more = pl->next;
|
|
efree(pl->path);
|
|
efree(pl);
|
|
}
|
|
efree(istack[idepth].path);
|
|
if (idepth && !istack[idepth].keepopen)
|
|
fclose(istack[idepth].bs->yy_input_file);
|
|
yy_delete_buffer(istack[idepth].bs);
|
|
}
|
|
efree(istack);
|
|
istack = NULL;
|
|
istacksize = idepth = 0;
|
|
keepopen = FALSE;
|
|
}
|
|
|
|
static int
|
|
_push_include(path, isdir)
|
|
char *path;
|
|
int isdir;
|
|
{
|
|
FILE *fp;
|
|
|
|
/* push current state onto stack */
|
|
if (idepth >= istacksize) {
|
|
if (idepth > MAX_SUDOERS_DEPTH) {
|
|
yyerror("too many levels of includes");
|
|
return(FALSE);
|
|
}
|
|
istacksize += SUDOERS_STACK_INCREMENT;
|
|
istack = (struct include_stack *) realloc(istack,
|
|
sizeof(*istack) * istacksize);
|
|
if (istack == NULL) {
|
|
yyerror("unable to allocate memory");
|
|
return(FALSE);
|
|
}
|
|
}
|
|
if (isdir) {
|
|
if (!(path = switch_dir(&istack[idepth], path))) {
|
|
/* switch_dir() called yyerror() for us */
|
|
return(FALSE);
|
|
}
|
|
if ((fp = open_sudoers(path, FALSE, &keepopen)) == NULL) {
|
|
yyerror(path);
|
|
return(FALSE); /* XXX - just to go next one */
|
|
}
|
|
} else {
|
|
if ((fp = open_sudoers(path, TRUE, &keepopen)) == NULL) {
|
|
yyerror(path);
|
|
return(FALSE);
|
|
}
|
|
istack[idepth].more = NULL;
|
|
}
|
|
/* Push the old (current) file and open the new one. */
|
|
istack[idepth].path = sudoers; /* push old path */
|
|
istack[idepth].bs = YY_CURRENT_BUFFER;
|
|
istack[idepth].lineno = sudolineno;
|
|
istack[idepth].keepopen = keepopen;
|
|
idepth++;
|
|
sudolineno = 1;
|
|
sudoers = path;
|
|
yy_switch_to_buffer(yy_create_buffer(fp, YY_BUF_SIZE));
|
|
|
|
return(TRUE);
|
|
}
|
|
|
|
static int
|
|
pop_include()
|
|
{
|
|
struct path_list *pl;
|
|
FILE *fp;
|
|
|
|
if (idepth == 0)
|
|
return(FALSE);
|
|
|
|
if (!keepopen)
|
|
fclose(YY_CURRENT_BUFFER->yy_input_file);
|
|
yy_delete_buffer(YY_CURRENT_BUFFER);
|
|
keepopen = FALSE;
|
|
if ((pl = istack[idepth - 1].more) != NULL) {
|
|
/* Move to next file in the dir. */
|
|
istack[idepth - 1].more = pl->next;
|
|
if ((fp = open_sudoers(pl->path, FALSE, &keepopen)) == NULL) {
|
|
yyerror(pl->path);
|
|
return(FALSE); /* XXX - just to go next one */
|
|
}
|
|
efree(sudoers);
|
|
sudoers = pl->path;
|
|
sudolineno = 1;
|
|
yy_switch_to_buffer(yy_create_buffer(fp, YY_BUF_SIZE));
|
|
efree(pl);
|
|
} else {
|
|
idepth--;
|
|
yy_switch_to_buffer(istack[idepth].bs);
|
|
efree(sudoers);
|
|
sudoers = istack[idepth].path;
|
|
sudolineno = istack[idepth].lineno;
|
|
}
|
|
return(TRUE);
|
|
}
|
|
|
|
static char *
|
|
parse_include(base)
|
|
char *base;
|
|
{
|
|
char *cp, *ep, *path;
|
|
int len = 0, subst = 0;
|
|
size_t shost_len = 0;
|
|
|
|
/* Pull out path from #include line. */
|
|
cp = base + sizeof("#include");
|
|
if (*cp == 'i')
|
|
cp += 3; /* includedir */
|
|
while (isblank((unsigned char) *cp))
|
|
cp++;
|
|
ep = cp;
|
|
while (*ep != '\0' && !isspace((unsigned char) *ep)) {
|
|
if (ep[0] == '%' && ep[1] == 'h') {
|
|
shost_len = strlen(user_shost);
|
|
len += shost_len - 2;
|
|
subst = 1;
|
|
}
|
|
ep++;
|
|
}
|
|
|
|
/* Make a copy of path and return it. */
|
|
len += (int)(ep - cp);
|
|
if ((path = malloc(len + 1)) == NULL)
|
|
yyerror("unable to allocate memory");
|
|
if (subst) {
|
|
/* substitute for %h */
|
|
char *pp = path;
|
|
while (cp < ep) {
|
|
if (cp[0] == '%' && cp[1] == 'h') {
|
|
memcpy(pp, user_shost, shost_len);
|
|
pp += shost_len;
|
|
cp += 2;
|
|
continue;
|
|
}
|
|
*pp++ = *cp++;
|
|
}
|
|
*pp = '\0';
|
|
} else {
|
|
memcpy(path, cp, len);
|
|
path[len] = '\0';
|
|
}
|
|
|
|
/* Push any excess characters (e.g. comment, newline) back to the lexer */
|
|
if (*ep != '\0')
|
|
yyless((int)(ep - base));
|
|
|
|
return(path);
|
|
}
|
|
|
|
/*
|
|
* Check to make sure an IPv6 address does not contain multiple instances
|
|
* of the string "::". Assumes strlen(s) >= 1.
|
|
* Returns TRUE if address is valid else FALSE.
|
|
*/
|
|
static int
|
|
ipv6_valid(s)
|
|
const char *s;
|
|
{
|
|
int nmatch = 0;
|
|
|
|
for (; *s != '\0'; s++) {
|
|
if (s[0] == ':' && s[1] == ':') {
|
|
if (++nmatch > 1)
|
|
break;
|
|
}
|
|
if (s[0] == '/')
|
|
nmatch = 0; /* reset if we hit netmask */
|
|
}
|
|
|
|
return (nmatch <= 1);
|
|
}
|