blob: 48f7f43618ce87bd665bc222751b35b2b31675fa [file] [log] [blame]
#include <sys/stat.h>
#include <ctype.h>
#include <errno.h>
#include <limits.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include "file_mode.h"
extern char *progname;
mode_t parse_file_mode(char *arg, mode_t mode, mode_t sumask)
{
char *clause;
if (isdigit(*arg) && *arg < '8') {
unsigned long num;
num = strtoul(arg, NULL, 8);
if ((num == ULONG_MAX && errno == ERANGE) || num > 07777) {
fprintf(stderr, "%s: invalid mode `%s'\n", progname,
arg);
exit(255);
}
return (mode_t) num;
}
while ((clause = strsep(&arg, ",")) != NULL) {
mode_t who = 0;
int action;
char *p = clause;
/*
* Parse the who list. Optional.
*/
while (1) {
switch (*p++) {
case 'u':
who |= S_IRWXU | S_ISUID;
continue;
case 'g':
who |= S_IRWXG | S_ISGID;
continue;
case 'o':
who |= S_IRWXO | S_ISVTX;
continue;
case 'a':
who =
S_IRWXU | S_IRWXG | S_IRWXO | S_ISUID |
S_ISGID | S_ISVTX;
continue;
}
/* undo the increment above */
p--;
break;
}
if (who == 0)
who = (~sumask) | S_ISVTX;
/*
* Parse an action list. Must be at least one action.
*/
while (*p) {
mode_t perm = 0;
/*
* Parse the action
*/
action = *p;
if (action == '+' || action == '-' || action == '=')
p++;
/*
* Parse perm
*/
while (*p) {
switch (*p++) {
case 'r':
perm |= S_IRUSR | S_IRGRP | S_IROTH;
continue;
case 'w':
perm |= S_IWUSR | S_IWGRP | S_IWOTH;
continue;
case 'x':
perm |= S_IXUSR | S_IXGRP | S_IXOTH;
continue;
case 'X':
perm |= S_ISVTX;
continue;
case 's':
perm |= S_ISUID | S_ISGID;
continue;
case 'u':
perm = mode & S_IRWXU;
perm |= perm >> 3 | perm >> 6;
if (mode & S_ISUID)
perm |= S_ISGID;
continue;
case 'g':
perm = mode & S_IRWXG;
perm |= perm << 3 | perm >> 3;
if (mode & S_ISGID)
perm |= S_ISUID;
continue;
case 'o':
perm = mode & S_IRWXO;
perm |= perm << 6 | perm << 3;
continue;
}
/* undo the increment above */
p--;
break;
}
perm &= who;
switch (action) {
case '+':
mode |= perm;
continue;
case '-':
mode &= ~perm;
continue;
case '=':
mode &= ~who;
mode |= perm;
continue;
}
if (!action)
break;
fprintf(stderr, "%s: invalid mode `%s'\n", progname,
clause);
exit(255);
}
}
return mode;
}