Index: config.c
===================================================================
--- config.c (nonexistent)
+++ config.c (revision 5)
@@ -0,0 +1,2109 @@
+#include "queue.h"
+#include <limits.h>
+#include <ctype.h>
+#include <dirent.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <glob.h>
+#include <grp.h>
+#include <popt.h>
+#include <pwd.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/stat.h>
+#include <time.h>
+#include <unistd.h>
+#include <assert.h>
+#include <wchar.h>
+#include <wctype.h>
+#include <fnmatch.h>
+#include <sys/mman.h>
+#include <libgen.h>
+
+#if !defined(PATH_MAX) && defined(__FreeBSD__)
+#include <sys/param.h>
+#endif
+
+#include "log.h"
+#include "logrotate.h"
+
+struct logInfoHead logs;
+
+#if !defined(GLOB_ABORTED) && defined(GLOB_ABEND)
+#define GLOB_ABORTED GLOB_ABEND
+#endif
+
+#define REALLOC_STEP 10
+#define GLOB_STR_REALLOC_STEP 0x100
+
+#if defined(SunOS) && !defined(isblank)
+#define isblank(c) ( ( (c) == ' ' || (c) == '\t' ) ? 1 : 0 )
+#endif
+
+#ifdef __hpux
+#include "asprintf.c"
+#endif
+
+#if !defined(HAVE_SECURE_GETENV)
+#define secure_getenv getenv
+#endif
+
+#if !defined(HAVE_ASPRINTF) && !defined(_FORTIFY_SOURCE)
+#include <stdarg.h>
+
+int asprintf(char **string_ptr, const char *format, ...)
+{
+ va_list arg;
+ char *str;
+ int size;
+ int rv;
+
+ va_start(arg, format);
+ size = vsnprintf(NULL, 0, format, arg);
+ size++;
+ va_end(arg);
+ va_start(arg, format);
+ str = malloc(size);
+ if (str == NULL) {
+ va_end(arg);
+ /*
+ * Strictly speaking, GNU asprintf doesn't do this,
+ * but the caller isn't checking the return value.
+ */
+ message_OOM();
+ exit(1);
+ }
+ rv = vsnprintf(str, size, format, arg);
+ va_end(arg);
+
+ *string_ptr = str;
+ return (rv);
+}
+
+#endif
+
+#if !defined(HAVE_STRNDUP)
+char *strndup(const char *s, size_t n)
+{
+ size_t nAvail;
+ char *p;
+
+ /* min() */
+ nAvail = strlen(s) + 1;
+ if ( (n + 1) < nAvail)
+ nAvail = n + 1;
+
+ p = malloc(nAvail);
+ if (!p)
+ return NULL;
+ memcpy(p, s, nAvail);
+ p[nAvail - 1] = 0;
+ return p;
+}
+#endif
+
+/* list of compression commands and the corresponding file extensions */
+struct compress_cmd_item {
+ const char *cmd;
+ const char *ext;
+};
+static const struct compress_cmd_item compress_cmd_list[] = {
+ {"gzip", ".gz"},
+ {"bzip2", ".bz2"},
+ {"xz", ".xz"},
+ {"zstd", ".zst"},
+ {"compress", ".Z"},
+ {"zip", "zip"},
+};
+static const unsigned compress_cmd_list_size = sizeof(compress_cmd_list)
+ / sizeof(compress_cmd_list[0]);
+
+enum {
+ STATE_DEFAULT = 2,
+ STATE_SKIP_LINE = 4,
+ STATE_DEFINITION_END = 8,
+ STATE_SKIP_CONFIG = 16,
+ STATE_LOAD_SCRIPT = 32,
+ STATE_ERROR = 64,
+};
+
+static const char *defTabooExts[] = {
+ ",v",
+ ".bak",
+ ".cfsaved",
+ ".disabled",
+ ".dpkg-bak",
+ ".dpkg-del",
+ ".dpkg-dist",
+ ".dpkg-new",
+ ".dpkg-old",
+ ".dpkg-tmp",
+ ".rhn-cfg-tmp-*",
+ ".rpmnew",
+ ".rpmorig",
+ ".rpmsave",
+ ".swp",
+ ".ucf-dist",
+ ".ucf-new",
+ ".ucf-old",
+ ".new",
+ ".old",
+ ".orig",
+ ".bak",
+ "~"
+};
+static const unsigned defTabooCount = sizeof(defTabooExts) / sizeof(char *);
+
+/* I shouldn't use globals here :-( */
+static char **tabooPatterns = NULL;
+static unsigned tabooCount = 0;
+static int glob_errno = 0;
+
+static int readConfigFile(const char *configFile, struct logInfo *defConfig);
+static int globerr(const char *pathname, int theerr);
+
+static char *isolateLine(char **strt, char **buf, size_t length) {
+ char *endtag, *start, *tmp;
+ const char *max = *buf + length;
+ char *key;
+
+ start = *strt;
+ endtag = start;
+ while (endtag < max && *endtag != '\n') {
+ endtag++;}
+ if (max < endtag)
+ return NULL;
+ tmp = endtag - 1;
+ while (isspace((unsigned char)*endtag))
+ endtag--;
+ key = strndup(start, (size_t)(endtag - start + 1));
+ if (key == NULL) {
+ message_OOM();
+ return NULL;
+ }
+ *strt = tmp;
+ return key;
+}
+
+static char *isolateValue(const char *fileName, int lineNum, const char *key,
+ char **startPtr, char **buf, size_t length)
+{
+ char *chptr = *startPtr;
+ const char *max = *startPtr + length;
+
+ while (chptr < max && isblank((unsigned char)*chptr))
+ chptr++;
+ if (chptr < max && *chptr == '=') {
+ chptr++;
+ while ( chptr < max && isblank((unsigned char)*chptr))
+ chptr++;
+ }
+
+ if (chptr < max && *chptr == '\n') {
+ message(MESS_ERROR, "%s:%d argument expected after %s\n",
+ fileName, lineNum, key);
+ return NULL;
+ }
+
+ *startPtr = chptr;
+ return isolateLine(startPtr, buf, length);
+}
+
+static char *isolateWord(char **strt, char **buf, size_t length) {
+ char *endtag, *start;
+ const char *max = *buf + length;
+ char *key;
+ start = *strt;
+ while (start < max && isblank((unsigned char)*start))
+ start++;
+ endtag = start;
+ while (endtag < max && isalpha((unsigned char)*endtag)) {
+ endtag++;}
+ if (max < endtag)
+ return NULL;
+ key = strndup(start, (size_t)(endtag - start));
+ if (key == NULL) {
+ message_OOM();
+ return NULL;
+ }
+ *strt = endtag;
+ return key;
+}
+
+static char *readPath(const char *configFile, int lineNum, const char *key,
+ char **startPtr, char **buf, size_t length)
+{
+ char *path = isolateValue(configFile, lineNum, key, startPtr, buf, length);
+ if (path != NULL) {
+ wchar_t pwc;
+ size_t len;
+ const char *chptr = path;
+
+ while (*chptr && (len = mbrtowc(&pwc, chptr, strlen(chptr), NULL)) != 0) {
+ if (len == (size_t)(-1) || len == (size_t)(-2) || !iswprint((wint_t)pwc) || iswblank((wint_t)pwc)) {
+ message(MESS_ERROR, "%s:%d bad %s path %s\n",
+ configFile, lineNum, key, path);
+ free(path);
+ return NULL;
+ }
+ chptr += len;
+ }
+ }
+ return path;
+}
+
+/* set *pUid to UID of the given user, return non-zero on failure */
+static int resolveUid(const char *userName, uid_t *pUid)
+{
+ const struct passwd *pw;
+ char *endptr;
+ unsigned long int parsed_uid;
+
+#ifdef __CYGWIN__
+ if (strcmp(userName, "root") == 0) {
+ *pUid = 0;
+ return 0;
+ }
+#endif
+
+ pw = getpwnam(userName);
+ if (pw) {
+ *pUid = pw->pw_uid;
+ return 0;
+ }
+
+ parsed_uid = strtoul(userName, &endptr, 10);
+ if (userName[0] != '\0' &&
+ *endptr == '\0' &&
+ parsed_uid < INT_MAX && /* parsed_uid != ULONG_MAX && */
+ getpwuid((uid_t)parsed_uid) != NULL) {
+
+ *pUid = (uid_t)parsed_uid;
+ return 0;
+ }
+
+ return -1;
+}
+
+/* set *pGid to GID of the given group, return non-zero on failure */
+static int resolveGid(const char *groupName, gid_t *pGid)
+{
+ const struct group *gr;
+ char *endptr;
+ unsigned long int parsed_gid;
+
+#ifdef __CYGWIN__
+ if (strcmp(groupName, "root") == 0) {
+ *pGid = 0;
+ return 0;
+ }
+#endif
+
+ gr = getgrnam(groupName);
+ if (gr) {
+ *pGid = gr->gr_gid;
+ return 0;
+ }
+
+ parsed_gid = strtoul(groupName, &endptr, 10);
+ if (groupName[0] != '\0' &&
+ *endptr == '\0' &&
+ parsed_gid < INT_MAX && /* parsed_gid != ULONG_MAX && */
+ getgrgid((gid_t)parsed_gid) != NULL) {
+
+ *pGid = (gid_t)parsed_gid;
+ return 0;
+ }
+
+ return -1;
+}
+
+static int readModeUidGid(const char *configFile, int lineNum, char *key,
+ const char *directive, mode_t *mode, uid_t *pUid,
+ gid_t *pGid)
+{
+ char u[200], g[200];
+ mode_t m = 0;
+ char tmp;
+ int rc;
+
+ if (!strcmp("su", directive))
+ /* do not read <mode> for the 'su' directive */
+ rc = 0;
+ else {
+ unsigned short int parsed_mode;
+ rc = sscanf(key, "%ho %199s %199s%c", &parsed_mode, u, g, &tmp);
+ m = parsed_mode;
+ }
+
+ /* We support 'key <owner> <group> notation now */
+ if (rc == 0) {
+ rc = sscanf(key, "%199s %199s%c", u, g, &tmp);
+ /* Simulate that we have read mode and keep the default value. */
+ if (rc > 0) {
+ m = *mode;
+ rc += 1;
+ }
+ }
+
+ if (rc == 4) {
+ message(MESS_ERROR, "%s:%d extra arguments for "
+ "%s\n", configFile, lineNum, directive);
+ return -1;
+ }
+
+ if (rc > 0) {
+ *mode = m;
+ }
+
+ if (rc > 1) {
+ if (resolveUid(u, pUid) != 0) {
+ message(MESS_ERROR, "%s:%d unknown user '%s'\n",
+ configFile, lineNum, u);
+ return -1;
+ }
+ }
+ if (rc > 2) {
+ if (resolveGid(g, pGid) != 0) {
+ message(MESS_ERROR, "%s:%d unknown group '%s'\n",
+ configFile, lineNum, g);
+ return -1;
+ }
+ }
+
+ return 0;
+}
+
+static char *readAddress(const char *configFile, int lineNum, const char *key,
+ char **startPtr, char **buf, size_t length)
+{
+ char *start = *startPtr;
+ char *address = isolateValue(configFile, lineNum, key, startPtr, buf, length);
+
+ if (address != NULL) {
+ /* validate the address */
+ const char *chptr = address;
+ while (isprint((unsigned char) *chptr) && *chptr != ' ') {
+ chptr++;
+ }
+
+ if (*chptr) {
+ message(MESS_ERROR, "%s:%d bad %s address %s\n",
+ configFile, lineNum, key, start);
+ free(address);
+ return NULL;
+ }
+ }
+
+ return address;
+}
+
+static int do_mkdir(const char *path, mode_t mode, uid_t uid, gid_t gid) {
+ if (mkdir(path, mode) == 0) {
+ /* newly created directory, set the owner and permissions */
+ if (chown(path, uid, gid) != 0) {
+ message(MESS_ERROR, "error setting owner of %s to uid %u and gid %u: %s\n",
+ path, (unsigned) uid, (unsigned) gid, strerror(errno));
+ return -1;
+ }
+
+ if (chmod(path, mode) != 0) {
+ message(MESS_ERROR, "error setting permissions of %s to 0%o: %s\n",
+ path, mode, strerror(errno));
+ return -1;
+ }
+
+ return 0;
+ }
+
+ if (errno == EEXIST) {
+ /* path already exists, check whether it is a directory or not */
+ struct stat sb;
+ if ((stat(path, &sb) == 0) && S_ISDIR(sb.st_mode))
+ return 0;
+
+ message(MESS_ERROR, "path %s already exists, but it is not a directory\n", path);
+ errno = ENOTDIR;
+ return -1;
+ }
+
+ message(MESS_ERROR, "error creating %s: %s\n", path, strerror(errno));
+ return -1;
+}
+
+static int mkpath(const char *path, mode_t mode, uid_t uid, gid_t gid) {
+ char *pp;
+ char *sp;
+ int rv;
+ char *copypath = strdup(path);
+
+ if (!copypath) {
+ message_OOM();
+ return 1;
+ }
+
+ rv = 0;
+ pp = copypath;
+ while (rv == 0 && (sp = strchr(pp, '/')) != NULL) {
+ if (sp != pp) {
+ *sp = '\0';
+ rv = do_mkdir(copypath, mode, uid, gid);
+ *sp = '/';
+ }
+ pp = sp + 1;
+ }
+ if (rv == 0) {
+ rv = do_mkdir(path, mode, uid, gid);
+ }
+ free(copypath);
+ return rv;
+}
+
+static int checkFile(const char *fname)
+{
+ unsigned i;
+
+ /* Check if fname is '.' or '..'; if so, return false */
+ if (fname[0] == '.' && (!fname[1] || (fname[1] == '.' && !fname[2])))
+ return 0;
+
+ /* Check if fname is ending in a taboo-extension; if so, return false */
+ for (i = 0; i < tabooCount; i++) {
+ const char *pattern = tabooPatterns[i];
+ if (!fnmatch(pattern, fname, FNM_PERIOD))
+ {
+ message(MESS_DEBUG, "Ignoring %s, because of %s pattern match\n",
+ fname, pattern);
+ return 0;
+ }
+ }
+ /* All checks have been passed; return true */
+ return 1;
+}
+
+/* Used by qsort to sort filelist */
+static int compar(const void *p, const void *q)
+{
+ return strcoll(*((char * const*) p), *((char * const*) q));
+}
+
+/* Free memory blocks pointed to by pointers in a 2d array and the array itself */
+static void free_2d_array(char **array, unsigned lines_count)
+{
+ unsigned i;
+ for (i = 0; i < lines_count; ++i)
+ free(array[i]);
+ free(array);
+}
+
+#define MEMBER_COPY(dest, src) \
+ do { \
+ if ((src) && rv == 0) { \
+ (dest) = strdup(src); \
+ if ((dest) == NULL) { \
+ message_OOM(); \
+ rv = 1; \
+ } \
+ } else { \
+ (dest) = NULL; \
+ } \
+ } while (0)
+static int copyLogInfo(struct logInfo *to, const struct logInfo *from)
+{
+ int rv = 0;
+
+ memset(to, 0, sizeof(*to));
+ MEMBER_COPY(to->oldDir, from->oldDir);
+ to->criterium = from->criterium;
+ to->weekday = from->weekday;
+ to->threshold = from->threshold;
+ to->minsize = from->minsize;
+ to->maxsize = from->maxsize;
+ to->rotateCount = from->rotateCount;
+ to->rotateMinAge = from->rotateMinAge;
+ to->rotateAge = from->rotateAge;
+ to->logStart = from->logStart;
+ MEMBER_COPY(to->pre, from->pre);
+ MEMBER_COPY(to->post, from->post);
+ MEMBER_COPY(to->first, from->first);
+ MEMBER_COPY(to->last, from->last);
+ MEMBER_COPY(to->preremove, from->preremove);
+ MEMBER_COPY(to->logAddress , from->logAddress);
+ MEMBER_COPY(to->extension, from->extension);
+ MEMBER_COPY(to->compress_prog, from->compress_prog);
+ MEMBER_COPY(to->uncompress_prog, from->uncompress_prog);
+ MEMBER_COPY(to->compress_ext, from->compress_ext);
+ to->flags = from->flags;
+ to->shred_cycles = from->shred_cycles;
+ to->createMode = from->createMode;
+ to->createUid = from->createUid;
+ to->createGid = from->createGid;
+ to->suUid = from->suUid;
+ to->suGid = from->suGid;
+ to->olddirMode = from->olddirMode;
+ to->olddirUid = from->olddirUid;
+ to->olddirGid = from->olddirGid;
+
+ if (from->compress_options_count) {
+ poptDupArgv(from->compress_options_count, from->compress_options_list,
+ &to->compress_options_count, &to->compress_options_list);
+ if (to->compress_options_list == NULL) {
+ message_OOM();
+ rv = 1;
+ }
+ }
+
+ MEMBER_COPY(to->dateformat, from->dateformat);
+
+ to->list = from->list;
+
+ return rv;
+}
+#undef MEMBER_COPY
+
+static void freeLogInfo(struct logInfo *log)
+{
+ free(log->pattern);
+ free_2d_array(log->files, log->numFiles);
+ free(log->oldDir);
+ free(log->pre);
+ free(log->post);
+ free(log->first);
+ free(log->last);
+ free(log->preremove);
+ free(log->logAddress);
+ free(log->extension);
+ free(log->compress_prog);
+ free(log->uncompress_prog);
+ free(log->compress_ext);
+ free(log->compress_options_list);
+ free(log->dateformat);
+}
+
+static struct logInfo *newLogInfo(const struct logInfo *template)
+{
+ struct logInfo *new;
+
+ new = malloc(sizeof(*new));
+ if (new == NULL) {
+ message_OOM();
+ return NULL;
+ }
+
+ if (copyLogInfo(new, template)) {
+ freeLogInfo(new);
+ free(new);
+ return NULL;
+ }
+
+ TAILQ_INSERT_TAIL(&logs, new, list);
+ numLogs++;
+
+ return new;
+}
+
+static void removeLogInfo(struct logInfo *log)
+{
+ if (log == NULL)
+ return;
+
+ freeLogInfo(log);
+ TAILQ_REMOVE(&logs, log, list);
+ free(log);
+ numLogs--;
+}
+
+static void freeTailLogs(int num)
+{
+ message(MESS_DEBUG, "removing last %d log configs\n", num);
+
+ while (num--)
+ removeLogInfo(TAILQ_LAST(&logs, logInfoHead));
+
+}
+
+static const char *crit_to_string(enum criterium crit)
+{
+ switch (crit) {
+ case ROT_HOURLY: return "hourly";
+ case ROT_DAYS: return "daily";
+ case ROT_WEEKLY: return "weekly";
+ case ROT_MONTHLY: return "monthly";
+ case ROT_YEARLY: return "yearly";
+ case ROT_SIZE: return "size";
+ default: return "XXX";
+ }
+}
+
+static void set_criterium(enum criterium *pDst, enum criterium src, int *pSet)
+{
+ if (*pSet && (*pDst != src)) {
+ /* we are overriding a previously set criterium */
+ message(MESS_VERBOSE, "warning: '%s' overrides previously specified '%s'\n",
+ crit_to_string(src), crit_to_string(*pDst));
+ }
+ *pDst = src;
+ *pSet = 1;
+}
+
+static int readConfigPath(const char *path, struct logInfo *defConfig)
+{
+ struct stat sb;
+ int result = 0;
+ struct logInfo defConfigBackup;
+
+ if (stat(path, &sb)) {
+ message(MESS_ERROR, "cannot stat %s: %s\n", path, strerror(errno));
+ return 1;
+ }
+
+ if (S_ISDIR(sb.st_mode)) {
+ char **namelist = NULL;
+ struct dirent *dp;
+ int here;
+ unsigned files_count = 0, i;
+ DIR *dirp;
+
+ if ((here = open(".", O_RDONLY)) == -1) {
+ message(MESS_ERROR, "cannot open current directory: %s\n",
+ strerror(errno));
+ return 1;
+ }
+
+ if ((dirp = opendir(path)) == NULL) {
+ message(MESS_ERROR, "cannot open directory %s: %s\n", path,
+ strerror(errno));
+ close(here);
+ return 1;
+ }
+ while ((dp = readdir(dirp)) != NULL) {
+ if (checkFile(dp->d_name)) {
+ /* Realloc memory for namelist array if necessary */
+ if (files_count % REALLOC_STEP == 0) {
+ char **p = (char **) realloc(namelist,
+ (files_count +
+ REALLOC_STEP) * sizeof(char *));
+ if (p) {
+ namelist = p;
+ memset(namelist + files_count, '\0',
+ REALLOC_STEP * sizeof(char *));
+ } else {
+ free_2d_array(namelist, files_count);
+ closedir(dirp);
+ close(here);
+ message_OOM();
+ return 1;
+ }
+ }
+ /* Alloc memory for file name */
+ namelist[files_count] = strdup(dp->d_name);
+ if (namelist[files_count] != NULL) {
+ files_count++;
+ } else {
+ free_2d_array(namelist, files_count);
+ closedir(dirp);
+ close(here);
+ message_OOM();
+ return 1;
+ }
+ }
+ }
+ closedir(dirp);
+
+ if (files_count > 0) {
+ qsort(namelist, files_count, sizeof(char *), compar);
+ } else {
+ close(here);
+ return 0;
+ }
+
+ if (chdir(path)) {
+ message(MESS_ERROR, "error in chdir(\"%s\"): %s\n", path,
+ strerror(errno));
+ close(here);
+ free_2d_array(namelist, files_count);
+ return 1;
+ }
+
+ for (i = 0; i < files_count; ++i) {
+ assert(namelist[i] != NULL);
+ if (copyLogInfo(&defConfigBackup, defConfig)) {
+ freeLogInfo(&defConfigBackup);
+ close(here);
+ free_2d_array(namelist, files_count);
+ return 1;
+ }
+ if (readConfigFile(namelist[i], defConfig)) {
+ message(MESS_ERROR, "found error in file %s, skipping\n", namelist[i]);
+ freeLogInfo(defConfig);
+ if (copyLogInfo(defConfig, &defConfigBackup)){} /* do not check, we are already in a error path */
+ freeLogInfo(&defConfigBackup);
+ result = 1;
+ continue;
+ }
+ freeLogInfo(&defConfigBackup);
+ }
+
+ if (fchdir(here) < 0) {
+ message(MESS_ERROR, "could not change directory to '.': %s\n", strerror(errno));
+ }
+ close(here);
+ free_2d_array(namelist, files_count);
+ } else {
+ if (copyLogInfo(&defConfigBackup, defConfig)) {
+ freeLogInfo(&defConfigBackup);
+ return 1;
+ }
+
+ if (readConfigFile(path, defConfig)) {
+ freeLogInfo(defConfig);
+ if (copyLogInfo(defConfig, &defConfigBackup)){} /* do not check, we are already in a error path */
+ result = 1;
+ }
+ freeLogInfo(&defConfigBackup);
+ }
+
+ return result;
+}
+
+int readAllConfigPaths(const char **paths)
+{
+ int result = 0;
+ unsigned i;
+ const char **file;
+ struct logInfo defConfig = {
+ .pattern = NULL,
+ .files = NULL,
+ .numFiles = 0,
+ .oldDir = NULL,
+ .criterium = ROT_SIZE,
+ .threshold = 1024 * 1024,
+ .minsize = 0,
+ .maxsize = 0,
+ .rotateCount = 0,
+ .rotateMinAge = 0,
+ .rotateAge = 0,
+ .logStart = -1,
+ .pre = NULL,
+ .post = NULL,
+ .first = NULL,
+ .last = NULL,
+ .preremove = NULL,
+ .logAddress = NULL,
+ .extension = NULL,
+ .addextension = NULL,
+ .compress_prog = NULL,
+ .uncompress_prog = NULL,
+ .compress_ext = NULL,
+ .dateformat = NULL,
+ .flags = LOG_FLAG_IFEMPTY,
+ .shred_cycles = 0,
+ .createMode = NO_MODE,
+ .createUid = NO_UID,
+ .createGid = NO_GID,
+ .olddirMode = NO_MODE,
+ .olddirUid = NO_UID,
+ .olddirGid = NO_GID,
+ .suUid = NO_UID,
+ .suGid = NO_GID,
+ .compress_options_list = NULL,
+ .compress_options_count = 0
+ };
+
+ tabooPatterns = malloc(sizeof(*tabooPatterns) * defTabooCount);
+ if (tabooPatterns == NULL) {
+ message_OOM();
+ return 1;
+ }
+
+
+ for (i = 0; i < defTabooCount; i++) {
+ int bytes;
+ char *pattern = NULL;
+
+ /* generate a pattern by concatenating star (wildcard) to the
+ * suffix literal
+ */
+ bytes = asprintf(&pattern, "*%s", defTabooExts[i]);
+ if (bytes != -1) {
+ tabooPatterns[i] = pattern;
+ tabooCount++;
+ } else {
+ free_2d_array(tabooPatterns, tabooCount);
+ message_OOM();
+ return 1;
+ }
+ }
+
+ for (file = paths; *file; file++) {
+ if (readConfigPath(*file, &defConfig))
+ result = 1;
+ }
+ free_2d_array(tabooPatterns, tabooCount);
+ freeLogInfo(&defConfig);
+ return result;
+}
+
+static char* parseGlobString(const char *configFile, int lineNum,
+ const char *buf, size_t length, char **ppos)
+{
+ /* output buffer */
+ char *globString = NULL;
+ size_t globStringPos = 0;
+ size_t globStringAlloc = 0;
+ enum {
+ PGS_INIT, /* picking blanks, looking for '#' */
+ PGS_DATA, /* picking data, looking for end of line */
+ PGS_COMMENT /* skipping comment, looking for end of line */
+ } state = PGS_INIT;
+
+ /* move the cursor at caller's side while going through the input */
+ for (; ((size_t)(*ppos - buf) < length) && **ppos; (*ppos)++) {
+ /* state transition (see above) */
+ switch (state) {
+ case PGS_INIT:
+ if ('#' == **ppos)
+ state = PGS_COMMENT;
+ else if (!isspace((unsigned char) **ppos))
+ state = PGS_DATA;
+ break;
+
+ default:
+ if ('\n' == **ppos)
+ state = PGS_INIT;
+ }
+
+ if (PGS_COMMENT == state)
+ /* skip comment */
+ continue;
+
+ switch (**ppos) {
+ case '}':
+ message(MESS_ERROR, "%s:%d unexpected } (missing previous '{')\n", configFile, lineNum);
+ free(globString);
+ return NULL;
+
+ case '{':
+ /* NUL-terminate globString */
+ assert(globStringPos < globStringAlloc);
+ globString[globStringPos] = '\0';
+ return globString;
+
+ default:
+ break;
+ }
+
+ /* grow the output buffer if needed */
+ if (globStringPos + 2 > globStringAlloc) {
+ char *ptr;
+ globStringAlloc += GLOB_STR_REALLOC_STEP;
+ ptr = realloc(globString, globStringAlloc);
+ if (!ptr) {
+ message_OOM();
+ free(globString);
+ return NULL;
+ }
+ globString = ptr;
+ }
+
+ /* copy a single character */
+ globString[globStringPos++] = **ppos;
+ }
+
+ /* premature end of input */
+ message(MESS_ERROR, "%s:%d missing '{' after log files definition\n", configFile, lineNum);
+ free(globString);
+ return NULL;
+}
+
+static int globerr(const char *pathname, int theerr)
+{
+ (void) pathname;
+
+ /* prevent glob() from being aborted in certain cases */
+ switch (theerr) {
+ case ENOTDIR:
+ /* non-directory where directory was expected by the glob */
+ return 0;
+
+ case ENOENT:
+ /* most likely symlink with non-existent target */
+ return 0;
+
+ default:
+ break;
+ }
+
+ glob_errno = theerr;
+
+ /* We want the glob operation to abort on error, so return 1 */
+ return 1;
+}
+
+#define freeLogItem(what) \
+ do { \
+ free(newlog->what); \
+ newlog->what = NULL; \
+ } while (0)
+#define RAISE_ERROR() \
+ if (newlog != defConfig) { \
+ state = STATE_ERROR; \
+ goto next_state; \
+ } else { \
+ goto error; \
+ }
+#define MAX_NESTING 16U
+
+static int readConfigFile(const char *configFile, struct logInfo *defConfig)
+{
+ int fd;
+ char *buf, *key = NULL;
+ size_t length;
+ int lineNum = 1;
+ char *scriptStart = NULL;
+ char **scriptDest = NULL;
+ struct logInfo *newlog = defConfig;
+ char *start, *chptr;
+ struct stat sb;
+ int state = STATE_DEFAULT;
+ int logerror = 0;
+ /* to check if incompatible criteria are specified */
+ int criterium_set = 0;
+ static unsigned recursion_depth = 0U;
+ char *globerr_msg = NULL;
+ int in_config = 0;
+ struct flock fd_lock = {
+ .l_start = 0,
+ .l_len = 0,
+ .l_whence = SEEK_SET,
+ .l_type = F_RDLCK
+ };
+
+ fd = open(configFile, O_RDONLY);
+ if (fd < 0) {
+ message(MESS_ERROR, "failed to open config file %s: %s\n",
+ configFile, strerror(errno));
+ return 1;
+ }
+ /* We don't want anybody to change the file while we parse it,
+ * let's try to lock it for reading. */
+ if (fcntl(fd, F_SETLK, &fd_lock) == -1) {
+ message(MESS_ERROR, "Could not lock file %s for reading\n",
+ configFile);
+ }
+ if (fstat(fd, &sb)) {
+ message(MESS_ERROR, "fstat of %s failed: %s\n", configFile,
+ strerror(errno));
+ close(fd);
+ return 1;
+ }
+ if (!S_ISREG(sb.st_mode)) {
+ message(MESS_DEBUG,
+ "Ignoring %s because it's not a regular file.\n",
+ configFile);
+ close(fd);
+ return 0;
+ }
+
+ if (!getpwuid(getuid())) {
+ message(MESS_ERROR, "Cannot find logrotate UID (%d) in passwd file: %s\n",
+ getuid(), strerror(errno));
+ close(fd);
+ return 1;
+ }
+
+ if (getuid() == ROOT_UID) {
+ if ((sb.st_mode & 07533) != 0400) {
+ message(MESS_DEBUG,
+ "Potentially dangerous mode on %s: 0%o\n",
+ configFile, (unsigned) (sb.st_mode & 07777));
+ }
+
+ if (sb.st_mode & 0022) {
+ message(MESS_ERROR,
+ "Ignoring %s because it is writable by group or others.\n",
+ configFile);
+ close(fd);
+ return 0;
+ }
+
+ if (sb.st_uid != ROOT_UID) {
+ message(MESS_ERROR,
+ "Ignoring %s because the file owner is wrong (should be root or user with uid 0).\n",
+ configFile);
+ close(fd);
+ return 0;
+ }
+ }
+
+ length = (size_t)sb.st_size;
+
+ if (length > 0xffffff) {
+ message(MESS_ERROR, "file %s too large, probably not a config file.\n",
+ configFile);
+ close(fd);
+ return 1;
+ }
+
+ /* We can't mmap empty file... */
+ if (length == 0) {
+ message(MESS_DEBUG,
+ "Ignoring %s because it's empty.\n",
+ configFile);
+ close(fd);
+ return 0;
+ }
+
+#ifdef MAP_POPULATE
+ buf = mmap(NULL, length, PROT_READ,
+ MAP_PRIVATE | MAP_POPULATE, fd, (off_t) 0);
+#else /* MAP_POPULATE */
+ buf = mmap(NULL, length, PROT_READ,
+ MAP_PRIVATE, fd, (off_t) 0);
+#endif /* MAP_POPULATE */
+
+ if (buf == MAP_FAILED) {
+ message(MESS_ERROR, "Error mapping config file %s: %s\n",
+ configFile, strerror(errno));
+ close(fd);
+ return 1;
+ }
+
+#ifdef HAVE_MADVISE
+#ifdef MADV_DONTFORK
+ madvise(buf, length + 2,
+ MADV_SEQUENTIAL | MADV_WILLNEED | MADV_DONTFORK);
+#else /* MADV_DONTFORK */
+ madvise(buf, length + 2,
+ MADV_SEQUENTIAL | MADV_WILLNEED);
+#endif /* MADV_DONTFORK */
+#endif /* HAVE_MADVISE */
+
+ message(MESS_DEBUG, "reading config file %s\n", configFile);
+
+ for (start = buf; (size_t)(start - buf) < length; start++) {
+ switch (state) {
+ case STATE_DEFAULT:
+ if (isblank((unsigned char)*start))
+ continue;
+ /* Skip comment */
+ if (*start == '#') {
+ state = STATE_SKIP_LINE;
+ continue;
+ }
+
+ if (isalpha((unsigned char)*start)) {
+ free(key);
+ key = isolateWord(&start, &buf, length);
+ if (key == NULL)
+ continue;
+ if (!strcmp(key, "compress")) {
+ newlog->flags |= LOG_FLAG_COMPRESS;
+ } else if (!strcmp(key, "nocompress")) {
+ newlog->flags &= ~LOG_FLAG_COMPRESS;
+ } else if (!strcmp(key, "delaycompress")) {
+ newlog->flags |= LOG_FLAG_DELAYCOMPRESS;
+ } else if (!strcmp(key, "nodelaycompress")) {
+ newlog->flags &= ~LOG_FLAG_DELAYCOMPRESS;
+ } else if (!strcmp(key, "shred")) {
+ newlog->flags |= LOG_FLAG_SHRED;
+ } else if (!strcmp(key, "noshred")) {
+ newlog->flags &= ~LOG_FLAG_SHRED;
+ } else if (!strcmp(key, "sharedscripts")) {
+ newlog->flags |= LOG_FLAG_SHAREDSCRIPTS;
+ } else if (!strcmp(key, "nosharedscripts")) {
+ newlog->flags &= ~LOG_FLAG_SHAREDSCRIPTS;
+ } else if (!strcmp(key, "copytruncate")) {
+ newlog->flags |= LOG_FLAG_COPYTRUNCATE;
+ } else if (!strcmp(key, "nocopytruncate")) {
+ newlog->flags &= ~LOG_FLAG_COPYTRUNCATE;
+ } else if (!strcmp(key, "renamecopy")) {
+ newlog->flags |= LOG_FLAG_TMPFILENAME;
+ } else if (!strcmp(key, "norenamecopy")) {
+ newlog->flags &= ~LOG_FLAG_TMPFILENAME;
+ } else if (!strcmp(key, "copy")) {
+ newlog->flags |= LOG_FLAG_COPY;
+ } else if (!strcmp(key, "nocopy")) {
+ newlog->flags &= ~LOG_FLAG_COPY;
+ } else if (!strcmp(key, "ifempty")) {
+ newlog->flags |= LOG_FLAG_IFEMPTY;
+ } else if (!strcmp(key, "notifempty")) {
+ newlog->flags &= ~LOG_FLAG_IFEMPTY;
+ } else if (!strcmp(key, "dateext")) {
+ newlog->flags |= LOG_FLAG_DATEEXT;
+ } else if (!strcmp(key, "nodateext")) {
+ newlog->flags &= ~LOG_FLAG_DATEEXT;
+ } else if (!strcmp(key, "dateyesterday")) {
+ newlog->flags |= LOG_FLAG_DATEYESTERDAY;
+ } else if (!strcmp(key, "datehourago")) {
+ newlog->flags |= LOG_FLAG_DATEHOURAGO;
+ } else if (!strcmp(key, "dateformat")) {
+ freeLogItem(dateformat);
+ newlog->dateformat = isolateLine(&start, &buf, length);
+ if (newlog->dateformat == NULL)
+ continue;
+ } else if (!strcmp(key, "noolddir")) {
+ newlog->oldDir = NULL;
+ } else if (!strcmp(key, "mailfirst")) {
+ newlog->flags |= LOG_FLAG_MAILFIRST;
+ } else if (!strcmp(key, "maillast")) {
+ newlog->flags &= ~LOG_FLAG_MAILFIRST;
+ } else if (!strcmp(key, "su")) {
+ int rv;
+ mode_t tmp_mode = NO_MODE;
+ free(key);
+ key = isolateLine(&start, &buf, length);
+ if (key == NULL)
+ continue;
+
+ rv = readModeUidGid(configFile, lineNum, key, "su",
+ &tmp_mode, &newlog->suUid,
+ &newlog->suGid);
+ if (rv == -1) {
+ RAISE_ERROR();
+ }
+ else if (tmp_mode != NO_MODE) {
+ message(MESS_ERROR, "%s:%d extra arguments for "
+ "su\n", configFile, lineNum);
+ RAISE_ERROR();
+ }
+ else if (newlog->suUid == NO_UID) {
+ message(MESS_ERROR, "%s:%d no user for "
+ "su\n", configFile, lineNum);
+ RAISE_ERROR();
+ }
+ else if (newlog->suGid == NO_GID) {
+ message(MESS_ERROR, "%s:%d no group for "
+ "su\n", configFile, lineNum);
+ RAISE_ERROR();
+ }
+
+ newlog->flags |= LOG_FLAG_SU;
+ } else if (!strcmp(key, "create")) {
+ int rv;
+
+ free(key);
+ key = isolateLine(&start, &buf, length);
+ if (key == NULL)
+ continue;
+
+ rv = readModeUidGid(configFile, lineNum, key, "create",
+ &newlog->createMode, &newlog->createUid,
+ &newlog->createGid);
+ if (rv == -1) {
+ RAISE_ERROR();
+ }
+
+ newlog->flags |= LOG_FLAG_CREATE;
+ } else if (!strcmp(key, "createolddir")) {
+ int rv;
+
+ free(key);
+ key = isolateLine(&start, &buf, length);
+ if (key == NULL)
+ continue;
+
+ rv = readModeUidGid(configFile, lineNum, key, "createolddir",
+ &newlog->olddirMode, &newlog->olddirUid,
+ &newlog->olddirGid);
+ if (rv == -1) {
+ RAISE_ERROR();
+ }
+
+ newlog->flags |= LOG_FLAG_OLDDIRCREATE;
+ } else if (!strcmp(key, "nocreateolddir")) {
+ newlog->flags &= ~LOG_FLAG_OLDDIRCREATE;
+ } else if (!strcmp(key, "nocreate")) {
+ newlog->flags &= ~LOG_FLAG_CREATE;
+ } else if (!strcmp(key, "size") || !strcmp(key, "minsize") ||
+ !strcmp(key, "maxsize")) {
+ char *opt = key;
+
+ key = isolateValue(configFile, lineNum, opt, &start, &buf, length);
+ if (key && key[0]) {
+ off_t size;
+ unsigned long multiplier;
+ const size_t l = strlen(key) - 1;
+ if (key[l] == 'k' || key[l] == 'K') {
+ key[l] = '\0';
+ multiplier = 1024;
+ } else if (key[l] == 'M') {
+ key[l] = '\0';
+ multiplier = 1024 * 1024;
+ } else if (key[l] == 'G') {
+ key[l] = '\0';
+ multiplier = 1024 * 1024 * 1024;
+ } else if (!isdigit((unsigned char)key[l])) {
+ free(opt);
+ message(MESS_ERROR, "%s:%d unknown unit '%c'\n",
+ configFile, lineNum, key[l]);
+ RAISE_ERROR();
+ } else {
+ multiplier = 1;
+ }
+
+ size = (off_t) (multiplier * strtoull(key, &chptr, 0));
+ if (*chptr || size < 0) {
+ message(MESS_ERROR, "%s:%d bad size '%s'\n",
+ configFile, lineNum, key);
+ free(opt);
+ RAISE_ERROR();
+ }
+ if (!strncmp(opt, "size", 4)) {
+ set_criterium(&newlog->criterium, ROT_SIZE, &criterium_set);
+ newlog->threshold = size;
+ } else if (!strncmp(opt, "maxsize", 7)) {
+ newlog->maxsize = size;
+ } else {
+ newlog->minsize = size;
+ }
+ free(opt);
+ }
+ else {
+ free(opt);
+ continue;
+ }
+ } else if (!strcmp(key, "shredcycles")) {
+ free(key);
+ key = isolateValue(configFile, lineNum, "shred cycles",
+ &start, &buf, length);
+ if (key == NULL)
+ continue;
+ newlog->shred_cycles = (int)strtoul(key, &chptr, 0);
+ if (*chptr || newlog->shred_cycles < 0) {
+ message(MESS_ERROR, "%s:%d bad shred cycles '%s'\n",
+ configFile, lineNum, key);
+ goto error;
+ }
+ } else if (!strcmp(key, "hourly")) {
+ set_criterium(&newlog->criterium, ROT_HOURLY, &criterium_set);
+ } else if (!strcmp(key, "daily")) {
+ set_criterium(&newlog->criterium, ROT_DAYS, &criterium_set);
+ newlog->threshold = 1;
+ } else if (!strcmp(key, "monthly")) {
+ set_criterium(&newlog->criterium, ROT_MONTHLY, &criterium_set);
+ } else if (!strcmp(key, "weekly")) {
+ unsigned weekday;
+ char tmp;
+ set_criterium(&newlog->criterium, ROT_WEEKLY, &criterium_set);
+ free(key);
+ key = isolateLine(&start, &buf, length);
+ if (key == NULL || key[0] == '\0') {
+ /* default to Sunday if no argument was given */
+ newlog->weekday = 0;
+ continue;
+ }
+
+ if (1 == sscanf(key, "%u%c", &weekday, &tmp) && weekday <= 7) {
+ /* use the selected weekday, 7 means "once per week" */
+ newlog->weekday = weekday;
+ continue;
+ }
+ message(MESS_ERROR, "%s:%d bad weekly directive '%s'\n",
+ configFile, lineNum, key);
+ goto error;
+ } else if (!strcmp(key, "yearly")) {
+ set_criterium(&newlog->criterium, ROT_YEARLY, &criterium_set);
+ } else if (!strcmp(key, "rotate")) {
+ free(key);
+ key = isolateValue(configFile, lineNum, "rotate count", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+ newlog->rotateCount = (int)strtol(key, &chptr, 0);
+ if (*chptr || newlog->rotateCount < -1) {
+ message(MESS_ERROR,
+ "%s:%d bad rotation count '%s'\n",
+ configFile, lineNum, key);
+ RAISE_ERROR();
+ }
+ } else if (!strcmp(key, "start")) {
+ free(key);
+ key = isolateValue(configFile, lineNum, "start count", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+ newlog->logStart = (int)strtoul(key, &chptr, 0);
+ if (*chptr || newlog->logStart < 0) {
+ message(MESS_ERROR, "%s:%d bad start count '%s'\n",
+ configFile, lineNum, key);
+ RAISE_ERROR();
+ }
+ } else if (!strcmp(key, "minage")) {
+ free(key);
+ key = isolateValue(configFile, lineNum, "minage count", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+ newlog->rotateMinAge = (int)strtoul(key, &chptr, 0);
+ if (*chptr || newlog->rotateMinAge < 0) {
+ message(MESS_ERROR, "%s:%d bad minimum age '%s'\n",
+ configFile, lineNum, start);
+ RAISE_ERROR();
+ }
+ } else if (!strcmp(key, "maxage")) {
+ free(key);
+ key = isolateValue(configFile, lineNum, "maxage count", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+ newlog->rotateAge = (int)strtoul(key, &chptr, 0);
+ if (*chptr || newlog->rotateAge < 0) {
+ message(MESS_ERROR, "%s:%d bad maximum age '%s'\n",
+ configFile, lineNum, start);
+ RAISE_ERROR();
+ }
+ } else if (!strcmp(key, "errors")) {
+ message(MESS_DEBUG,
+ "%s: %d: the errors directive is deprecated and no longer used.\n",
+ configFile, lineNum);
+ } else if (!strcmp(key, "mail")) {
+ freeLogItem(logAddress);
+ if (!(newlog->logAddress = readAddress(configFile, lineNum,
+ "mail", &start, &buf, length))) {
+ RAISE_ERROR();
+ }
+ else continue;
+ } else if (!strcmp(key, "nomail")) {
+ freeLogItem(logAddress);
+ } else if (!strcmp(key, "missingok")) {
+ newlog->flags |= LOG_FLAG_MISSINGOK;
+ } else if (!strcmp(key, "nomissingok")) {
+ newlog->flags &= ~LOG_FLAG_MISSINGOK;
+ } else if (!strcmp(key, "prerotate")) {
+ freeLogItem (pre);
+ scriptStart = start;
+ scriptDest = &newlog->pre;
+ state = STATE_LOAD_SCRIPT;
+ } else if (!strcmp(key, "firstaction")) {
+ freeLogItem (first);
+ scriptStart = start;
+ scriptDest = &newlog->first;
+ state = STATE_LOAD_SCRIPT;
+ } else if (!strcmp(key, "postrotate")) {
+ freeLogItem (post);
+ scriptStart = start;
+ scriptDest = &newlog->post;
+ state = STATE_LOAD_SCRIPT;
+ } else if (!strcmp(key, "lastaction")) {
+ freeLogItem (last);
+ scriptStart = start;
+ scriptDest = &newlog->last;
+ state = STATE_LOAD_SCRIPT;
+ } else if (!strcmp(key, "preremove")) {
+ freeLogItem (preremove);
+ scriptStart = start;
+ scriptDest = &newlog->preremove;
+ state = STATE_LOAD_SCRIPT;
+ } else if (!strcmp(key, "tabooext")) {
+ char *endtag;
+
+ if (newlog != defConfig) {
+ message(MESS_ERROR,
+ "%s:%d tabooext may not appear inside "
+ "of log file definition\n", configFile,
+ lineNum);
+ state = STATE_ERROR;
+ continue;
+ }
+ free(key);
+ key = isolateValue(configFile, lineNum, "tabooext", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+ endtag = key;
+ if (*endtag == '+') {
+ endtag++;
+ while (isspace((unsigned char)*endtag) && *endtag)
+ endtag++;
+ } else {
+ free_2d_array(tabooPatterns, tabooCount);
+ tabooCount = 0;
+ /* realloc of NULL is safe by definition */
+ tabooPatterns = NULL;
+ }
+
+ while (*endtag) {
+ int bytes;
+ char *pattern = NULL;
+
+ chptr = endtag;
+ while (!isspace((unsigned char)*chptr) && *chptr != ',' && *chptr)
+ chptr++;
+
+ /* accept only non-empty patterns to avoid exclusion of everything */
+ if (endtag < chptr) {
+ char **tmp = realloc(tabooPatterns, sizeof(*tabooPatterns) *
+ (tabooCount + 1));
+ if (tmp == NULL) {
+ message_OOM();
+ RAISE_ERROR();
+ }
+ tabooPatterns = tmp;
+ bytes = asprintf(&pattern, "*%.*s", (int)(chptr - endtag), endtag);
+
+ /* should test for malloc() failure */
+ assert(bytes != -1);
+ tabooPatterns[tabooCount] = pattern;
+ tabooCount++;
+ }
+
+ endtag = chptr;
+ if (*endtag == ',')
+ endtag++;
+ while (*endtag && isspace((unsigned char)*endtag))
+ endtag++;
+ }
+ } else if (!strcmp(key, "taboopat")) {
+ char *endtag;
+
+ if (newlog != defConfig) {
+ message(MESS_ERROR,
+ "%s:%d taboopat may not appear inside "
+ "of log file definition\n", configFile,
+ lineNum);
+ state = STATE_ERROR;
+ continue;
+ }
+ free(key);
+ key = isolateValue(configFile, lineNum, "taboopat", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+
+ endtag = key;
+ if (*endtag == '+') {
+ endtag++;
+ while (isspace((unsigned char)*endtag) && *endtag)
+ endtag++;
+ } else {
+ free_2d_array(tabooPatterns, tabooCount);
+ tabooCount = 0;
+ /* realloc of NULL is safe by definition */
+ tabooPatterns = NULL;
+ }
+
+ while (*endtag) {
+ int bytes;
+ char *pattern = NULL;
+ char **tmp;
+
+ chptr = endtag;
+ while (!isspace((unsigned char)*chptr) && *chptr != ',' && *chptr)
+ chptr++;
+
+ tmp = realloc(tabooPatterns, sizeof(*tabooPatterns) *
+ (tabooCount + 1));
+ if (tmp == NULL) {
+ message_OOM();
+ RAISE_ERROR();
+ }
+ tabooPatterns = tmp;
+ bytes = asprintf(&pattern, "%.*s", (int)(chptr - endtag), endtag);
+
+ /* should test for malloc() failure */
+ assert(bytes != -1);
+ tabooPatterns[tabooCount] = pattern;
+ tabooCount++;
+
+ endtag = chptr;
+ if (*endtag == ',')
+ endtag++;
+ while (*endtag && isspace((unsigned char)*endtag))
+ endtag++;
+ }
+ } else if (!strcmp(key, "include")) {
+ int rv;
+
+ free(key);
+ key = isolateValue(configFile, lineNum, "include", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+
+ if (key[0] == '~' && key[1] == '/') {
+ /* replace '~' with content of $HOME cause low-level functions
+ * like stat() do not support the glob ~
+ */
+ const char *env_home = secure_getenv("HOME");
+ char *new_key = NULL;
+
+ if (!env_home) {
+ const struct passwd *pwd = getpwuid(getuid());
+ message(MESS_DEBUG,
+ "%s:%d cannot get HOME directory from environment "
+ "to replace ~/ in include directive\n",
+ configFile, lineNum);
+ if (!pwd) {
+ message(MESS_ERROR, "%s:%d cannot get passwd entry for "
+ "running user %u: %s\n",
+ configFile, lineNum, getuid(), strerror(errno));
+ RAISE_ERROR();
+ }
+ env_home = pwd->pw_dir;
+ }
+
+ if (asprintf(&new_key, "%s/%s", env_home, key + 2) == -1) {
+ message_OOM();
+ RAISE_ERROR();
+ }
+ message(MESS_DEBUG, "%s:%d replaced %s with '%s' for include directive\n",
+ configFile, lineNum, key, env_home);
+ free(key);
+ key = new_key;
+ }
+
+ message(MESS_DEBUG, "including %s\n", key);
+ if (recursion_depth >= MAX_NESTING) {
+ message(MESS_ERROR, "%s:%d include nesting too deep\n",
+ configFile, lineNum);
+ logerror = 1;
+ continue;
+ }
+
+ ++recursion_depth;
+ rv = readConfigPath(key, newlog);
+ --recursion_depth;
+
+ if (rv) {
+ logerror = 1;
+ continue;
+ }
+ } else if (!strcmp(key, "olddir")) {
+ freeLogItem (oldDir);
+
+ if (!(newlog->oldDir = readPath(configFile, lineNum,
+ "olddir", &start, &buf, length))) {
+ RAISE_ERROR();
+ }
+ message(MESS_DEBUG, "olddir is now %s\n", newlog->oldDir);
+ } else if (!strcmp(key, "extension")) {
+ free(key);
+ key = isolateValue(configFile, lineNum, "extension name", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+ freeLogItem (extension);
+ newlog->extension = key;
+ key = NULL;
+ message(MESS_DEBUG, "extension is now %s\n", newlog->extension);
+
+ } else if (!strcmp(key, "addextension")) {
+ free(key);
+ key = isolateValue(configFile, lineNum, "addextension name", &start,
+ &buf, length);
+ if (key == NULL)
+ continue;
+ freeLogItem (addextension);
+ newlog->addextension = key;
+ key = NULL;
+ message(MESS_DEBUG, "addextension is now %s\n",
+ newlog->addextension);
+
+ } else if (!strcmp(key, "compresscmd")) {
+ char *compresscmd_full;
+ const char *compresscmd_base;
+ unsigned i;
+
+ freeLogItem (compress_prog);
+
+ if (!
+ (newlog->compress_prog =
+ readPath(configFile, lineNum, "compress", &start, &buf, length))) {
+ RAISE_ERROR();
+ }
+
+ message(MESS_DEBUG, "compress_prog is now %s\n",
+ newlog->compress_prog);
+
+ compresscmd_full = strdup(newlog->compress_prog);
+ if (compresscmd_full == NULL) {
+ message_OOM();
+ RAISE_ERROR();
+ }
+
+ compresscmd_base = basename(compresscmd_full);
+
+ /* we check whether we changed the compress_cmd. In case we use the appropriate extension
+ as listed in compress_cmd_list */
+ for(i = 0; i < compress_cmd_list_size; i++) {
+ if (!strcmp(compress_cmd_list[i].cmd, compresscmd_base)) {
+ freeLogItem (compress_ext);
+ newlog->compress_ext = strdup(compress_cmd_list[i].ext);
+ if (newlog->compress_ext == NULL) {
+ message_OOM();
+ free(compresscmd_full);
+ RAISE_ERROR();
+ }
+ message(MESS_DEBUG, "compress_ext was changed to %s\n", newlog->compress_ext);
+ break;
+ }
+ }
+ free(compresscmd_full);
+ } else if (!strcmp(key, "uncompresscmd")) {
+ freeLogItem (uncompress_prog);
+
+ if (!
+ (newlog->uncompress_prog =
+ readPath(configFile, lineNum, "uncompress",
+ &start, &buf, length))) {
+ RAISE_ERROR();
+ }
+
+ message(MESS_DEBUG, "uncompress_prog is now %s\n",
+ newlog->uncompress_prog);
+
+ } else if (!strcmp(key, "compressoptions")) {
+ char *options;
+
+ if (newlog->compress_options_list) {
+ free(newlog->compress_options_list);
+ newlog->compress_options_list = NULL;
+ newlog->compress_options_count = 0;
+ }
+
+ if (!(options = isolateLine(&start, &buf, length))) {
+ RAISE_ERROR();
+ }
+
+ if (poptParseArgvString(options,
+ &newlog->compress_options_count,
+ &newlog->compress_options_list)) {
+ message(MESS_ERROR,
+ "%s:%d invalid compression options\n",
+ configFile, lineNum);
+ free(options);
+ RAISE_ERROR();
+ }
+
+ message(MESS_DEBUG, "compress_options is now %s\n",
+ options);
+ free(options);
+ } else if (!strcmp(key, "compressext")) {
+ freeLogItem (compress_ext);
+
+ if (!
+ (newlog->compress_ext =
+ readPath(configFile, lineNum, "compress-ext",
+ &start, &buf, length))) {
+ RAISE_ERROR();
+ }
+
+ message(MESS_DEBUG, "compress_ext is now %s\n",
+ newlog->compress_ext);
+ } else {
+ message(MESS_ERROR, "%s:%d unknown option '%s' "
+ "-- ignoring line\n", configFile, lineNum, key);
+ if (*start != '\n')
+ state = STATE_SKIP_LINE;
+ }
+ } else if (*start == '/' || *start == '"' || *start == '\''
+#ifdef GLOB_TILDE
+ || *start == '~'
+#endif
+ ) {
+ char *glob_string;
+ size_t glob_count;
+ int argc, argNum;
+ const char **argv;
+ in_config = 0;
+ if (newlog != defConfig) {
+ message(MESS_ERROR, "%s:%d unexpected log filename\n",
+ configFile, lineNum);
+ state = STATE_ERROR;
+ continue;
+ }
+
+ /* If no compression options were found in config file, set
+ default values */
+ if (!newlog->compress_prog)
+ newlog->compress_prog = strdup(COMPRESS_COMMAND);
+ if (!newlog->uncompress_prog)
+ newlog->uncompress_prog = strdup(UNCOMPRESS_COMMAND);
+ if (!newlog->compress_ext)
+ newlog->compress_ext = strdup(COMPRESS_EXT);
+
+ if (!newlog->compress_prog || !newlog->uncompress_prog || !newlog->compress_ext) {
+ message_OOM();
+ goto error;
+ }
+
+ /* Allocate a new logInfo structure and insert it into the logs
+ queue, copying the actual values from defConfig */
+ if ((newlog = newLogInfo(defConfig)) == NULL)
+ goto error;
+
+ glob_string = parseGlobString(configFile, lineNum, buf, length, &start);
+ if (glob_string)
+ in_config = 1;
+ else
+ /* error already printed */
+ goto error;
+
+ if (poptParseArgvString(glob_string, &argc, &argv)) {
+ message(MESS_ERROR, "%s:%d error parsing filename\n",
+ configFile, lineNum);
+ free(glob_string);
+ goto error;
+ } else if (argc < 1) {
+ message(MESS_ERROR,
+ "%s:%d { expected after log file name(s)\n",
+ configFile, lineNum);
+ free(glob_string);
+ goto error;
+ }
+
+ newlog->files = NULL;
+ newlog->numFiles = 0;
+ for (argNum = 0; argNum < argc; argNum++) {
+ char **tmp;
+ int rc;
+ glob_t globResult;
+
+ if (globerr_msg) {
+ free(globerr_msg);
+ globerr_msg = NULL;
+ }
+
+ rc = glob(argv[argNum], GLOB_NOCHECK
+#ifdef GLOB_TILDE
+ | GLOB_TILDE
+#endif
+ , globerr, &globResult);
+ if (rc == GLOB_ABORTED) {
+ if (newlog->flags & LOG_FLAG_MISSINGOK) {
+ continue;
+ }
+
+ /* We don't yet know whether this stanza has "missingok"
+ * set, so store the error message for later. */
+ rc = asprintf(&globerr_msg, "%s:%d glob failed for %s: %s\n",
+ configFile, lineNum, argv[argNum], strerror(glob_errno));
+ if (rc == -1)
+ globerr_msg = NULL;
+
+ globResult.gl_pathc = 0;
+ }
+
+ tmp = realloc(newlog->files,
+ sizeof(*newlog->files) * (newlog->numFiles +
+ globResult.
+ gl_pathc));
+ if (tmp == NULL) {
+ message_OOM();
+ logerror = 1;
+ goto duperror;
+ }
+
+ newlog->files = tmp;
+
+ for (glob_count = 0; glob_count < globResult.gl_pathc; glob_count++) {
+ struct logInfo *log;
+
+ /* if we glob directories we can get false matches */
+ if (!lstat(globResult.gl_pathv[glob_count], &sb) &&
+ S_ISDIR(sb.st_mode)) {
+ continue;
+ }
+
+ for (log = logs.tqh_first; log != NULL;
+ log = log->list.tqe_next) {
+ unsigned k;
+ for (k = 0; k < log->numFiles; k++) {
+ if (!strcmp(log->files[k],
+ globResult.gl_pathv[glob_count])) {
+ message(MESS_ERROR,
+ "%s:%d duplicate log entry for %s\n",
+ configFile, lineNum,
+ globResult.gl_pathv[glob_count]);
+ logerror = 1;
+ goto duperror;
+ }
+ }
+ }
+
+ newlog->files[newlog->numFiles] =
+ strdup(globResult.gl_pathv[glob_count]);
+ if (newlog->files[newlog->numFiles] == NULL) {
+ message_OOM();
+ logerror = 1;
+ goto duperror;
+ }
+ newlog->numFiles++;
+ }
+duperror:
+ globfree(&globResult);
+ }
+
+ newlog->pattern = glob_string;
+
+ free(argv);
+
+ } else if (*start == '}') {
+ if (newlog == defConfig) {
+ message(MESS_ERROR, "%s:%d unexpected }\n", configFile,
+ lineNum);
+ goto error;
+ }
+ if (!in_config) {
+ message(MESS_ERROR, "%s:%d unexpected } (missing previous '{')\n", configFile,
+ lineNum);
+ goto error;
+ }
+ in_config = 0;
+ if (globerr_msg) {
+ if (!(newlog->flags & LOG_FLAG_MISSINGOK))
+ message(MESS_ERROR, "%s", globerr_msg);
+ free(globerr_msg);
+ globerr_msg = NULL;
+ if (!(newlog->flags & LOG_FLAG_MISSINGOK))
+ goto error;
+ }
+
+ if (newlog->oldDir) {
+ unsigned j;
+ for (j = 0; j < newlog->numFiles; j++) {
+ char *ld;
+ char *dirpath;
+ const char *dirName;
+ struct stat sb2;
+
+ dirpath = strdup(newlog->files[j]);
+ if (dirpath == NULL) {
+ message_OOM();
+ goto error;
+ }
+
+ dirName = dirname(dirpath);
+ if (stat(dirName, &sb2)) {
+ if (!(newlog->flags & LOG_FLAG_MISSINGOK)) {
+ message(MESS_ERROR,
+ "%s:%d error verifying log file "
+ "path %s: %s\n", configFile, lineNum,
+ dirName, strerror(errno));
+ free(dirpath);
+ goto error;
+ }
+ else {
+ message(MESS_DEBUG,
+ "%s:%d verifying log file "
+ "path failed %s: %s, log is probably missing, "
+ "but missingok is set, so this is not an error.\n",
+ configFile, lineNum,
+ dirName, strerror(errno));
+ free(dirpath);
+ continue;
+ }
+ }
+ ld = malloc(strlen(dirName) + strlen(newlog->oldDir) + 2);
+ if (ld == NULL) {
+ message_OOM();
+ free(dirpath);
+ goto error;
+ }
+ sprintf(ld, "%s/%s", dirName, newlog->oldDir);
+ free(dirpath);
+
+ if (newlog->oldDir[0] != '/') {
+ dirName = ld;
+ }
+ else {
+ dirName = newlog->oldDir;
+ }
+
+ if (stat(dirName, &sb)) {
+ if (errno == ENOENT && (newlog->flags & LOG_FLAG_OLDDIRCREATE)) {
+ int ret;
+ if (newlog->flags & LOG_FLAG_SU) {
+ if (switch_user(newlog->suUid, newlog->suGid) != 0) {
+ free(ld);
+ goto error;
+ }
+ }
+ ret = mkpath(dirName, newlog->olddirMode,
+ newlog->olddirUid, newlog->olddirGid);
+ if (newlog->flags & LOG_FLAG_SU) {
+ if (switch_user_back() != 0) {
+ free(ld);
+ goto error;
+ }
+ }
+ if (ret) {
+ free(ld);
+ goto error;
+ }
+ }
+ else {
+ message(MESS_ERROR, "%s:%d error verifying olddir "
+ "path %s: %s\n", configFile, lineNum,
+ dirName, strerror(errno));
+ free(ld);
+ goto error;
+ }
+ }
+
+ free(ld);
+
+ if (sb.st_dev != sb2.st_dev
+ && !(newlog->flags & (LOG_FLAG_COPYTRUNCATE | LOG_FLAG_COPY | LOG_FLAG_TMPFILENAME))) {
+ message(MESS_ERROR,
+ "%s:%d olddir %s and log file %s "
+ "are on different devices\n", configFile,
+ lineNum, newlog->oldDir, newlog->files[j]);
+ goto error;
+ }
+ }
+ }
+
+ criterium_set = 0;
+ newlog = defConfig;
+ state = STATE_DEFINITION_END;
+ } else if (*start != '\n') {
+ message(MESS_ERROR, "%s:%d lines must begin with a keyword "
+ "or a filename (possibly in double quotes)\n",
+ configFile, lineNum);
+ state = STATE_SKIP_LINE;
+ }
+ break;
+ case STATE_SKIP_LINE:
+ case STATE_SKIP_LINE | STATE_SKIP_CONFIG:
+ if (*start == '\n')
+ state = (state & STATE_SKIP_CONFIG) ? STATE_SKIP_CONFIG : STATE_DEFAULT;
+ break;
+ case STATE_SKIP_LINE | STATE_LOAD_SCRIPT:
+ if (*start == '\n')
+ state = STATE_LOAD_SCRIPT;
+ break;
+ case STATE_SKIP_LINE | STATE_LOAD_SCRIPT | STATE_SKIP_CONFIG:
+ if (*start == '\n')
+ state = STATE_LOAD_SCRIPT | STATE_SKIP_CONFIG;
+ break;
+ case STATE_DEFINITION_END:
+ case STATE_DEFINITION_END | STATE_SKIP_CONFIG:
+ if (isblank((unsigned char)*start))
+ continue;
+ if (*start != '\n') {
+ message(MESS_ERROR, "%s:%d, unexpected text after }\n",
+ configFile, lineNum);
+ state = STATE_SKIP_LINE | ((state & STATE_SKIP_CONFIG) ? STATE_SKIP_CONFIG : 0);
+ }
+ else
+ state = (state & STATE_SKIP_CONFIG) ? STATE_SKIP_CONFIG : STATE_DEFAULT;
+ break;
+ case STATE_ERROR:
+ assert(newlog != defConfig);
+
+ message(MESS_ERROR, "found error in %s, skipping\n",
+ newlog->pattern ? newlog->pattern : "log config");
+
+ logerror = 1;
+ state = STATE_SKIP_CONFIG;
+ break;
+ case STATE_LOAD_SCRIPT:
+ case STATE_LOAD_SCRIPT | STATE_SKIP_CONFIG:
+ free(key);
+ key = isolateWord(&start, &buf, length);
+ if (key == NULL)
+ continue;
+
+ if (strcmp(key, "endscript") == 0) {
+ if (state & STATE_SKIP_CONFIG) {
+ state = STATE_SKIP_CONFIG;
+ }
+ else {
+ const char *endtag = start - 9;
+ while (*endtag != '\n')
+ endtag--;
+ endtag++;
+ *scriptDest = strndup(scriptStart, (size_t)(endtag - scriptStart));
+ if (*scriptDest == NULL) {
+ message_OOM();
+ goto error;
+ }
+
+ scriptDest = NULL;
+ scriptStart = NULL;
+ }
+ state = (state & STATE_SKIP_CONFIG) ? STATE_SKIP_CONFIG : STATE_DEFAULT;
+ }
+ else {
+ state = (*start == '\n' ? 0 : STATE_SKIP_LINE) |
+ STATE_LOAD_SCRIPT |
+ ((state & STATE_SKIP_CONFIG) ? STATE_SKIP_CONFIG : 0);
+ }
+ break;
+ case STATE_SKIP_CONFIG:
+ if (*start == '}') {
+ state = STATE_DEFAULT;
+ freeTailLogs(1);
+ newlog = defConfig;
+ }
+ else {
+ free(key);
+ key = isolateWord(&start, &buf, length);
+ if (key == NULL)
+ continue;
+ if (
+ (strcmp(key, "postrotate") == 0) ||
+ (strcmp(key, "prerotate") == 0) ||
+ (strcmp(key, "firstaction") == 0) ||
+ (strcmp(key, "lastaction") == 0) ||
+ (strcmp(key, "preremove") == 0)
+ ) {
+ state = STATE_LOAD_SCRIPT | STATE_SKIP_CONFIG;
+ }
+ else {
+ /* isolateWord moves the "start" pointer.
+ * If we have a line like
+ * rotate 5
+ * after isolateWord "start" points to "5" and it
+ * is OK to skip the line, but if we have a line
+ * like the following
+ * nocompress
+ * after isolateWord "start" points to "\n". In
+ * this case if we skip a line, we skip the next
+ * line, not the current "nocompress" one,
+ * because in the for cycle the "start"
+ * pointer is increased by one and, after this,
+ * "start" points to the beginning of the next line.
+ */
+ if (*start != '\n') {
+ state = STATE_SKIP_LINE | STATE_SKIP_CONFIG;
+ }
+ }
+ }
+ break;
+ default:
+ message(MESS_FATAL,
+ "%s: %d: readConfigFile() unknown state\n",
+ configFile, lineNum);
+ }
+ if (*start == '\n') {
+ lineNum++;
+ }
+
+next_state: ;
+ }
+
+ if (scriptStart) {
+ message(MESS_ERROR,
+ "%s:prerotate, postrotate or preremove without endscript\n",
+ configFile);
+ goto error;
+ }
+
+ free(key);
+
+ munmap(buf, length);
+ close(fd);
+ return logerror;
+error:
+ /* free is a NULL-safe operation */
+ free(key);
+ munmap(buf, length);
+ close(fd);
+ return 1;
+}
+
+/* vim: set et sw=4 ts=4: */
Radix cross Linux
The main Radix cross Linux repository contains the build scripts of packages, which have the most complete and common functionality for desktop machines
452 Commits
2 Branches
1 Tag