X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=miscutils%2Fcrond.c;h=f96c96ee7bf1d04309b34083d89c4ec977918f36;hb=179e88bec91cfe58096900dc5509a080ff37b083;hp=a32751d4791c6fcc0c915de7e08654e540e58f72;hpb=b89fcd44308b7551ca239c31fe26df725377f75f;p=oweals%2Fbusybox.git diff --git a/miscutils/crond.c b/miscutils/crond.c index a32751d47..f96c96ee7 100644 --- a/miscutils/crond.c +++ b/miscutils/crond.c @@ -1,1089 +1,1016 @@ +/* vi: set sw=4 ts=4: */ /* - * crond -d[#] -c -f -b - * * run as root, but NOT setuid root * * Copyright 1994 Matthew Dillon (dillon@apollo.west.oic.com) - * May be distributed under the GNU General Public License + * (version 2.3.2) + * Vladimir Oleynik (C) 2002 * - * Vladimir Oleynik (C) 2002 to be used in busybox + * Licensed under GPLv2 or later, see file LICENSE in this source tree. */ - -#define VERSION "2.3.2" - -#undef FEATURE_DEBUG_OPT - - -#include -#include -#include -#include -#include -#include -#include -#include -#include +//config:config CROND +//config: bool "crond" +//config: default y +//config: select FEATURE_SYSLOG +//config: help +//config: Crond is a background daemon that parses individual crontab +//config: files and executes commands on behalf of the users in question. +//config: This is a port of dcron from slackware. It uses files of the +//config: format /var/spool/cron/crontabs/ files, for example: +//config: $ cat /var/spool/cron/crontabs/root +//config: # Run daily cron jobs at 4:40 every day: +//config: 40 4 * * * /etc/cron/daily > /dev/null 2>&1 +//config: +//config:config FEATURE_CROND_D +//config: bool "Support option -d to redirect output to stderr" +//config: depends on CROND +//config: default y +//config: help +//config: -d N sets loglevel (0:most verbose) and directs all output to stderr. +//config: +//config:config FEATURE_CROND_CALL_SENDMAIL +//config: bool "Report command output via email (using sendmail)" +//config: default y +//config: depends on CROND +//config: help +//config: Command output will be sent to corresponding user via email. +//config: +//config:config FEATURE_CROND_DIR +//config: string "crond spool directory" +//config: default "/var/spool/cron" +//config: depends on CROND || CRONTAB +//config: help +//config: Location of crond spool. + +//applet:IF_CROND(APPLET(crond, BB_DIR_USR_SBIN, BB_SUID_DROP)) + +//kbuild:lib-$(CONFIG_CROND) += crond.o + +//usage:#define crond_trivial_usage +//usage: "-fbS -l N " IF_FEATURE_CROND_D("-d N ") "-L LOGFILE -c DIR" +//usage:#define crond_full_usage "\n\n" +//usage: " -f Foreground" +//usage: "\n -b Background (default)" +//usage: "\n -S Log to syslog (default)" +//usage: "\n -l N Set log level. Most verbose:0, default:8" +//usage: IF_FEATURE_CROND_D( +//usage: "\n -d N Set log level, log to stderr" +//usage: ) +//usage: "\n -L FILE Log to FILE" +//usage: "\n -c DIR Cron dir. Default:"CONFIG_FEATURE_CROND_DIR"/crontabs" + +#include "libbb.h" +#include "common_bufsiz.h" #include -#include -#include -#include -#include -#include -#include -#include "busybox.h" +/* glibc frees previous setenv'ed value when we do next setenv() + * of the same variable. uclibc does not do this! */ +#if (defined(__GLIBC__) && !defined(__UCLIBC__)) /* || OTHER_SAFE_LIBC... */ +# define SETENV_LEAKS 0 +#else +# define SETENV_LEAKS 1 +#endif -#define arysize(ary) (sizeof(ary)/sizeof((ary)[0])) -#ifndef CRONTABS -#define CRONTABS "/var/spool/cron/crontabs" -#endif -#ifndef TMPDIR -#define TMPDIR "/var/spool/cron" -#endif +#define CRON_DIR CONFIG_FEATURE_CROND_DIR +#define CRONTABS CONFIG_FEATURE_CROND_DIR "/crontabs" #ifndef SENDMAIL -#define SENDMAIL "/usr/sbin/sendmail" +# define SENDMAIL "sendmail" #endif #ifndef SENDMAIL_ARGS -#define SENDMAIL_ARGS "-ti", "oem" +# define SENDMAIL_ARGS "-ti" #endif #ifndef CRONUPDATE -#define CRONUPDATE "cron.update" +# define CRONUPDATE "cron.update" #endif #ifndef MAXLINES -#define MAXLINES 256 /* max lines in non-root crontabs */ +# define MAXLINES 256 /* max lines in non-root crontabs */ #endif + typedef struct CronFile { - struct CronFile *cf_Next; - struct CronLine *cf_LineBase; - char *cf_User; /* username */ - int cf_Ready; /* bool: one or more jobs ready */ - int cf_Running; /* bool: one or more jobs running */ - int cf_Deleted; /* marked for deletion, ignore */ + struct CronFile *cf_next; + struct CronLine *cf_lines; + char *cf_username; + smallint cf_wants_starting; /* bool: one or more jobs ready */ + smallint cf_has_running; /* bool: one or more jobs running */ + smallint cf_deleted; /* marked for deletion (but still has running jobs) */ } CronFile; typedef struct CronLine { - struct CronLine *cl_Next; - char *cl_Shell; /* shell command */ - pid_t cl_Pid; /* running pid, 0, or armed (-1) */ - int cl_MailFlag; /* running pid is for mail */ - int cl_MailPos; /* 'empty file' size */ - char cl_Mins[60]; /* 0-59 */ - char cl_Hrs[24]; /* 0-23 */ - char cl_Days[32]; /* 1-31 */ - char cl_Mons[12]; /* 0-11 */ - char cl_Dow[7]; /* 0-6, beginning sunday */ -} CronLine; - -#define RUN_RANOUT 1 -#define RUN_RUNNING 2 -#define RUN_FAILED 3 - -#define DaemonUid 0 - -#ifdef FEATURE_DEBUG_OPT -static short DebugOpt; -#endif - -static short LogLevel = 8; -static const char *LogFile; -static const char *CDir = CRONTABS; - -static void startlogger(void); - -static void CheckUpdates(void); -static void SynchronizeDir(void); -static int TestJobs(time_t t1, time_t t2); -static void RunJobs(void); -static int CheckJobs(void); - -static void RunJob(const char *user, CronLine *line); -#ifdef CONFIG_FEATURE_CROND_CALL_SENDMAIL -static void EndJob(const char *user, CronLine *line); -#else -#define EndJob(user, line) line->cl_Pid = 0 + struct CronLine *cl_next; + char *cl_cmd; /* shell command */ + pid_t cl_pid; /* >0:running, <0:needs to be started in this minute, 0:dormant */ +#if ENABLE_FEATURE_CROND_CALL_SENDMAIL + int cl_empty_mail_size; /* size of mail header only, 0 if no mailfile */ + char *cl_mailto; /* whom to mail results, may be NULL */ #endif - -static void DeleteFile(const char *userName); - -static CronFile *FileBase; + char *cl_shell; + /* ordered by size, not in natural order. makes code smaller: */ + char cl_Dow[7]; /* 0-6, beginning sunday */ + char cl_Mons[12]; /* 0-11 */ + char cl_Hrs[24]; /* 0-23 */ + char cl_Days[32]; /* 1-31 */ + char cl_Mins[60]; /* 0-59 */ +} CronLine; -static void -crondlog(const char *ctl, ...) -{ - va_list va; - const char *fmt; - int level = (int)(ctl[0] & 0xf); - int type = level == 20 ? - LOG_ERR : ((ctl[0] & 0100) ? LOG_WARNING : LOG_NOTICE); +#define DAEMON_UID 0 - va_start(va, ctl); - fmt = ctl+1; - if (level >= LogLevel) { +enum { + OPT_l = (1 << 0), + OPT_L = (1 << 1), + OPT_f = (1 << 2), + OPT_b = (1 << 3), + OPT_S = (1 << 4), + OPT_c = (1 << 5), + OPT_d = (1 << 6) * ENABLE_FEATURE_CROND_D, +}; -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) vfprintf(stderr, fmt, va); - else -#endif - if (LogFile == 0) vsyslog(type, fmt, va); - else { - int logfd; - - if ((logfd = open(LogFile, O_WRONLY|O_CREAT|O_APPEND, 600)) >= 0) { - vdprintf(logfd, fmt, va); - close(logfd); -#ifdef FEATURE_DEBUG_OPT - } else { - bb_perror_msg("Can't open log file"); +struct globals { + unsigned log_level; /* = 8; */ + time_t crontab_dir_mtime; + const char *log_filename; + const char *crontab_dir_name; /* = CRONTABS; */ + CronFile *cron_files; +#if SETENV_LEAKS + char *env_var_user; + char *env_var_home; + char *env_var_shell; + char *env_var_logname; #endif - } - } - } - va_end(va); - if(ctl[0] & 0200) - exit(20); -} - -int -crond_main(int ac, char **av) +} FIX_ALIASING; +#define G (*(struct globals*)bb_common_bufsiz1) +#define INIT_G() do { \ + setup_common_bufsiz(); \ + G.log_level = 8; \ + G.crontab_dir_name = CRONTABS; \ +} while (0) + +/* Log levels: + * 0 is the most verbose, default 8. + * For some reason, in fact only 5, 7 and 8 are used. + */ +static void crondlog(unsigned level, const char *msg, va_list va) { - unsigned long opt; - char *lopt, *Lopt, *copt; -#ifdef FEATURE_DEBUG_OPT - char *dopt; - bb_opt_complementaly = "f-b:b-f:S-L:L-S:d-l"; -#else - bb_opt_complementaly = "f-b:b-f:S-L:L-S"; -#endif - - opterr = 0; /* disable getopt 'errors' message.*/ - opt = bb_getopt_ulflags(ac, av, "l:L:fbSc:" -#ifdef FEATURE_DEBUG_OPT - "d:" -#endif - , &lopt, &Lopt, &copt -#ifdef FEATURE_DEBUG_OPT - , &dopt -#endif - ); - if(opt & 1) - LogLevel = atoi(lopt); - if(opt & 2) - if (*Lopt != 0) LogFile = Lopt; - if(opt & 32) { - if (*copt != 0) CDir = copt; - } -#ifdef FEATURE_DEBUG_OPT - if(opt & 64) { - DebugOpt = atoi(dopt); - LogLevel = 0; - } -#endif - - /* - * change directory - */ - - if (chdir(CDir) != 0) - bb_perror_msg_and_die("%s", CDir); - - signal(SIGHUP,SIG_IGN); /* hmm.. but, if kill -HUP original - * version - his died. ;( - */ - /* - * close stdin and stdout, stderr. - * close unused descriptors - don't need. - * optional detach from controlling terminal - */ - - if (!(opt & 4)) { -#if defined(__uClinux__) - /* reexec for vfork() do continue parent */ - vfork_daemon_rexec(1, 0, ac, av, "-f"); -#else /* uClinux */ - if(daemon(1, 0) < 0) { - bb_perror_msg_and_die("daemon"); -#endif /* uClinux */ - } - - (void)startlogger(); /* need if syslog mode selected */ - - /* - * main loop - synchronize to 1 second after the minute, minimum sleep - * of 1 second. - */ - - crondlog("\011%s " VERSION " dillon, started, log level %d\n", bb_applet_name, - LogLevel); - - SynchronizeDir(); - - { - time_t t1 = time(NULL); - time_t t2; - long dt; - short rescan = 60; - short sleep_time = 60; - - for (;;) { - sleep((sleep_time + 1) - (short)(time(NULL) % sleep_time)); - - t2 = time(NULL); - dt = t2 - t1; - - /* - * The file 'cron.update' is checked to determine new cron - * jobs. The directory is rescanned once an hour to deal - * with any screwups. - * - * check for disparity. Disparities over an hour either way - * result in resynchronization. A reverse-indexed disparity - * less then an hour causes us to effectively sleep until we - * match the original time (i.e. no re-execution of jobs that - * have just been run). A forward-indexed disparity less then - * an hour causes intermediate jobs to be run, but only once - * in the worst case. - * - * when running jobs, the inequality used is greater but not - * equal to t1, and less then or equal to t2. - */ - - if (--rescan == 0) { - rescan = 60; - SynchronizeDir(); - } - CheckUpdates(); -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) - crondlog("\005Wakeup dt=%d\n", dt); -#endif - if (dt < -60*60 || dt > 60*60) { - t1 = t2; - crondlog("\111time disparity of %d minutes detected\n", dt / 60); - } else if (dt > 0) { - TestJobs(t1, t2); - RunJobs(); - sleep(5); - if (CheckJobs() > 0) - sleep_time = 10; - else - sleep_time = 60; - t1 = t2; - } + if (level >= G.log_level) { + /* + * We are called only for info meesages. + * Warnings/errors use plain bb_[p]error_msg's, which + * need not touch syslog_level + * (they are ok with LOG_ERR default). + */ + syslog_level = LOG_INFO; + bb_verror_msg(msg, va, /* strerr: */ NULL); + syslog_level = LOG_ERR; } - } - /* not reached */ -} } -#if defined(FEATURE_DEBUG_OPT) || defined(CONFIG_FEATURE_CROND_CALL_SENDMAIL) -/* - write to temp file.. -*/ -static void -fdprintf(int fd, const char *ctl, ...) +static void log5(const char *msg, ...) { - va_list va; - - va_start(va, ctl); - vdprintf(fd, ctl, va); - va_end(va); + va_list va; + va_start(va, msg); + crondlog(4, msg, va); + va_end(va); } -#endif - -static int -ChangeUser(const char *user) +static void log7(const char *msg, ...) { - struct passwd *pas; - const char *err_msg; - - /* - * Obtain password entry and change privilages - */ - - if ((pas = getpwnam(user)) == 0) { - crondlog("\011failed to get uid for %s", user); - return(-1); - } - setenv("USER", pas->pw_name, 1); - setenv("HOME", pas->pw_dir, 1); - setenv("SHELL", DEFAULT_SHELL, 1); - - /* - * Change running state to the user in question - */ - err_msg = change_identity_e2str(pas); - if (err_msg) { - crondlog("\011%s for user %s", err_msg, user); - return(-1); - } - if (chdir(pas->pw_dir) < 0) { - crondlog("\011chdir failed: %s: %m", pas->pw_dir); - if (chdir(TMPDIR) < 0) { - crondlog("\011chdir failed: %s: %m", TMPDIR); - return(-1); - } - } - return(pas->pw_uid); + va_list va; + va_start(va, msg); + crondlog(7, msg, va); + va_end(va); } -static void -startlogger(void) +static void log8(const char *msg, ...) { - if (LogFile == 0) - openlog(bb_applet_name, LOG_CONS|LOG_PID, LOG_CRON); -#ifdef FEATURE_DEBUG_OPT - else { /* test logfile */ - int logfd; - - if ((logfd = open(LogFile, O_WRONLY|O_CREAT|O_APPEND, 600)) >= 0) - close(logfd); - else - bb_perror_msg("Failed to open log file '%s' reason", LogFile); - } -#endif + va_list va; + va_start(va, msg); + crondlog(8, msg, va); + va_end(va); } -static const char * const DowAry[] = { - "sun", - "mon", - "tue", - "wed", - "thu", - "fri", - "sat", - - "Sun", - "Mon", - "Tue", - "Wed", - "Thu", - "Fri", - "Sat", - NULL -}; +static const char DowAry[] ALIGN1 = + "sun""mon""tue""wed""thu""fri""sat" +; -static const char * const MonAry[] = { - "jan", - "feb", - "mar", - "apr", - "may", - "jun", - "jul", - "aug", - "sep", - "oct", - "nov", - "dec", - - "Jan", - "Feb", - "Mar", - "Apr", - "May", - "Jun", - "Jul", - "Aug", - "Sep", - "Oct", - "Nov", - "Dec", - NULL -}; +static const char MonAry[] ALIGN1 = + "jan""feb""mar""apr""may""jun""jul""aug""sep""oct""nov""dec" +; -static char * -ParseField(char *user, char *ary, int modvalue, int off, - const char * const *names, char *ptr) +static void ParseField(char *user, char *ary, int modvalue, int off, + const char *names, char *ptr) +/* 'names' is a pointer to a set of 3-char abbreviations */ { - char *base = ptr; - int n1 = -1; - int n2 = -1; - - if (base == NULL) - return(NULL); + char *base = ptr; + int n1 = -1; + int n2 = -1; + + // this can't happen due to config_read() + /*if (base == NULL) + return;*/ + + while (1) { + int skip = 0; + + /* Handle numeric digit or symbol or '*' */ + if (*ptr == '*') { + n1 = 0; /* everything will be filled */ + n2 = modvalue - 1; + skip = 1; + ++ptr; + } else if (isdigit(*ptr)) { + char *endp; + if (n1 < 0) { + n1 = strtol(ptr, &endp, 10) + off; + } else { + n2 = strtol(ptr, &endp, 10) + off; + } + ptr = endp; /* gcc likes temp var for &endp */ + skip = 1; + } else if (names) { + int i; + + for (i = 0; names[i]; i += 3) { + /* was using strncmp before... */ + if (strncasecmp(ptr, &names[i], 3) == 0) { + ptr += 3; + if (n1 < 0) { + n1 = i / 3; + } else { + n2 = i / 3; + } + skip = 1; + break; + } + } + } - while (*ptr != ' ' && *ptr != '\t' && *ptr != '\n') { - int skip = 0; + /* handle optional range '-' */ + if (skip == 0) { + goto err; + } + if (*ptr == '-' && n2 < 0) { + ++ptr; + continue; + } - /* - * Handle numeric digit or symbol or '*' - */ + /* + * collapse single-value ranges, handle skipmark, and fill + * in the character array appropriately. + */ + if (n2 < 0) { + n2 = n1; + } + if (*ptr == '/') { + char *endp; + skip = strtol(ptr + 1, &endp, 10); + ptr = endp; /* gcc likes temp var for &endp */ + } - if (*ptr == '*') { - n1 = 0; /* everything will be filled */ - n2 = modvalue - 1; - skip = 1; - ++ptr; - } else if (*ptr >= '0' && *ptr <= '9') { - if (n1 < 0) - n1 = strtol(ptr, &ptr, 10) + off; - else - n2 = strtol(ptr, &ptr, 10) + off; - skip = 1; - } else if (names) { - int i; - - for (i = 0; names[i]; ++i) { - if (strncmp(ptr, names[i], strlen(names[i])) == 0) { - break; + /* + * fill array, using a failsafe is the easiest way to prevent + * an endless loop + */ + { + int s0 = 1; + int failsafe = 1024; + + --n1; + do { + n1 = (n1 + 1) % modvalue; + + if (--s0 == 0) { + ary[n1 % modvalue] = 1; + s0 = skip; + } + if (--failsafe == 0) { + goto err; + } + } while (n1 != n2); } - } - if (names[i]) { - ptr += strlen(names[i]); - if (n1 < 0) - n1 = i; - else - n2 = i; - skip = 1; - } + if (*ptr != ',') { + break; + } + ++ptr; + n1 = -1; + n2 = -1; } - /* - * handle optional range '-' - */ - - if (skip == 0) { - crondlog("\111failed user %s parsing %s\n", user, base); - return(NULL); - } - if (*ptr == '-' && n2 < 0) { - ++ptr; - continue; + if (*ptr) { + err: + bb_error_msg("user %s: parse error at %s", user, base); + return; } - /* - * collapse single-value ranges, handle skipmark, and fill - * in the character array appropriately. - */ - - if (n2 < 0) - n2 = n1; - - if (*ptr == '/') - skip = strtol(ptr + 1, &ptr, 10); - - /* - * fill array, using a failsafe is the easiest way to prevent - * an endless loop - */ - - { - int s0 = 1; - int failsafe = 1024; - - --n1; - do { - n1 = (n1 + 1) % modvalue; - - if (--s0 == 0) { - ary[n1 % modvalue] = 1; - s0 = skip; - } - } while (n1 != n2 && --failsafe); - - if (failsafe == 0) { - crondlog("\111failed user %s parsing %s\n", user, base); - return(NULL); - } + /* can't use log5 (it inserts newlines), open-coding it */ + if (G.log_level <= 5 && logmode != LOGMODE_SYSLOG) { + int i; + for (i = 0; i < modvalue; ++i) + fprintf(stderr, "%d", (unsigned char)ary[i]); + bb_putchar_stderr('\n'); } - if (*ptr != ',') - break; - ++ptr; - n1 = -1; - n2 = -1; - } - - if (*ptr != ' ' && *ptr != '\t' && *ptr != '\n') { - crondlog("\111failed user %s parsing %s\n", user, base); - return(NULL); - } - - while (*ptr == ' ' || *ptr == '\t' || *ptr == '\n') - ++ptr; - -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) { - int i; - - for (i = 0; i < modvalue; ++i) - crondlog("\005%d", ary[i]); - crondlog("\005\n"); - } -#endif - - return(ptr); } -static void -FixDayDow(CronLine *line) +static void FixDayDow(CronLine *line) { - short i; - short weekUsed = 0; - short daysUsed = 0; - - for (i = 0; i < arysize(line->cl_Dow); ++i) { - if (line->cl_Dow[i] == 0) { - weekUsed = 1; - break; + unsigned i; + int weekUsed = 0; + int daysUsed = 0; + + for (i = 0; i < ARRAY_SIZE(line->cl_Dow); ++i) { + if (line->cl_Dow[i] == 0) { + weekUsed = 1; + break; + } } - } - for (i = 0; i < arysize(line->cl_Days); ++i) { - if (line->cl_Days[i] == 0) { - daysUsed = 1; - break; + for (i = 0; i < ARRAY_SIZE(line->cl_Days); ++i) { + if (line->cl_Days[i] == 0) { + daysUsed = 1; + break; + } + } + if (weekUsed != daysUsed) { + if (weekUsed) + memset(line->cl_Days, 0, sizeof(line->cl_Days)); + else /* daysUsed */ + memset(line->cl_Dow, 0, sizeof(line->cl_Dow)); } - } - if (weekUsed && !daysUsed) { - memset(line->cl_Days, 0, sizeof(line->cl_Days)); - } - if (daysUsed && !weekUsed) { - memset(line->cl_Dow, 0, sizeof(line->cl_Dow)); - } } +/* + * delete_cronfile() - delete user database + * + * Note: multiple entries for same user may exist if we were unable to + * completely delete a database due to running processes. + */ +//FIXME: we will start a new job even if the old job is running +//if crontab was reloaded: crond thinks that "new" job is different from "old" +//even if they are in fact completely the same. Example +//Crontab was: +// 0-59 * * * * job1 +// 0-59 * * * * long_running_job2 +//User edits crontab to: +// 0-59 * * * * job1_updated +// 0-59 * * * * long_running_job2 +//Bug: crond can now start another long_running_job2 even if old one +//is still running. +//OTOH most other versions of cron do not wait for job termination anyway, +//they end up with multiple copies of jobs if they don't terminate soon enough. +static void delete_cronfile(const char *userName) +{ + CronFile **pfile = &G.cron_files; + CronFile *file; + while ((file = *pfile) != NULL) { + if (strcmp(userName, file->cf_username) == 0) { + CronLine **pline = &file->cf_lines; + CronLine *line; + + file->cf_has_running = 0; + file->cf_deleted = 1; + + while ((line = *pline) != NULL) { + if (line->cl_pid > 0) { + file->cf_has_running = 1; + pline = &line->cl_next; + } else { + *pline = line->cl_next; + free(line->cl_cmd); + free(line); + } + } + if (file->cf_has_running == 0) { + *pfile = file->cf_next; + free(file->cf_username); + free(file); + continue; + } + } + pfile = &file->cf_next; + } +} -static void -SynchronizeFile(const char *fileName) +static void load_crontab(const char *fileName) { - int maxEntries = MAXLINES; - int maxLines; - char buf[1024]; + struct parser_t *parser; + struct stat sbuf; + int maxLines; + char *tokens[6]; +#if ENABLE_FEATURE_CROND_CALL_SENDMAIL + char *mailTo = NULL; +#endif + char *shell = NULL; - if (strcmp(fileName, "root") == 0) - maxEntries = 65535; - maxLines = maxEntries * 10; + delete_cronfile(fileName); - if (fileName) { - FILE *fi; + if (!getpwnam(fileName)) { + log7("ignoring file '%s' (no such user)", fileName); + return; + } - DeleteFile(fileName); + parser = config_open(fileName); + if (!parser) + return; - if ((fi = fopen(fileName, "r")) != NULL) { - struct stat sbuf; + maxLines = (strcmp(fileName, "root") == 0) ? 65535 : MAXLINES; - if (fstat(fileno(fi), &sbuf) == 0 && sbuf.st_uid == DaemonUid) { - CronFile *file = calloc(1, sizeof(CronFile)); + if (fstat(fileno(parser->fp), &sbuf) == 0 && sbuf.st_uid == DAEMON_UID) { + CronFile *file = xzalloc(sizeof(CronFile)); CronLine **pline; + int n; - file->cf_User = strdup(fileName); - pline = &file->cf_LineBase; + file->cf_username = xstrdup(fileName); + pline = &file->cf_lines; - while (fgets(buf, sizeof(buf), fi) != NULL && --maxLines) { - CronLine line; - char *ptr; + while (1) { + CronLine *line; - if (buf[0]) - buf[strlen(buf)-1] = 0; - - if (buf[0] == 0 || buf[0] == '#' || buf[0] == ' ' || buf[0] == '\t') - continue; + if (!--maxLines) { + bb_error_msg("user %s: too many lines", fileName); + break; + } - if (--maxEntries == 0) - break; + n = config_read(parser, tokens, 6, 1, "# \t", PARSE_NORMAL | PARSE_KEEP_COPY); + if (!n) + break; - memset(&line, 0, sizeof(line)); + log5("user:%s entry:%s", fileName, parser->data); -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) - crondlog("\111User %s Entry %s\n", fileName, buf); + /* check if line is setting MAILTO= */ + if (is_prefixed_with(tokens[0], "MAILTO=")) { +#if ENABLE_FEATURE_CROND_CALL_SENDMAIL + free(mailTo); + mailTo = (tokens[0][7]) ? xstrdup(&tokens[0][7]) : NULL; +#endif /* otherwise just ignore such lines */ + continue; + } + if (is_prefixed_with(tokens[0], "SHELL=")) { + free(shell); + shell = xstrdup(&tokens[0][6]); + continue; + } +//TODO: handle HOME= too? "man crontab" says: +//name = value +// +//where the spaces around the equal-sign (=) are optional, and any subsequent +//non-leading spaces in value will be part of the value assigned to name. +//The value string may be placed in quotes (single or double, but matching) +//to preserve leading or trailing blanks. +// +//Several environment variables are set up automatically by the cron(8) daemon. +//SHELL is set to /bin/sh, and LOGNAME and HOME are set from the /etc/passwd +//line of the crontab's owner. HOME and SHELL may be overridden by settings +//in the crontab; LOGNAME may not. + + /* check if a minimum of tokens is specified */ + if (n < 6) + continue; + *pline = line = xzalloc(sizeof(*line)); + /* parse date ranges */ + ParseField(file->cf_username, line->cl_Mins, 60, 0, NULL, tokens[0]); + ParseField(file->cf_username, line->cl_Hrs, 24, 0, NULL, tokens[1]); + ParseField(file->cf_username, line->cl_Days, 32, 0, NULL, tokens[2]); + ParseField(file->cf_username, line->cl_Mons, 12, -1, MonAry, tokens[3]); + ParseField(file->cf_username, line->cl_Dow, 7, 0, DowAry, tokens[4]); + /* + * fix days and dow - if one is not "*" and the other + * is "*", the other is set to 0, and vise-versa + */ + FixDayDow(line); +#if ENABLE_FEATURE_CROND_CALL_SENDMAIL + /* copy mailto (can be NULL) */ + line->cl_mailto = xstrdup(mailTo); #endif + line->cl_shell = xstrdup(shell); + /* copy command */ + line->cl_cmd = xstrdup(tokens[5]); + pline = &line->cl_next; +//bb_error_msg("M[%s]F[%s][%s][%s][%s][%s][%s]", mailTo, tokens[0], tokens[1], tokens[2], tokens[3], tokens[4], tokens[5]); + } + *pline = NULL; - /* - * parse date ranges - */ - - ptr = ParseField(file->cf_User, line.cl_Mins, 60, 0, NULL, buf); - ptr = ParseField(file->cf_User, line.cl_Hrs, 24, 0, NULL, ptr); - ptr = ParseField(file->cf_User, line.cl_Days, 32, 0, NULL, ptr); - ptr = ParseField(file->cf_User, line.cl_Mons, 12, -1, MonAry, ptr); - ptr = ParseField(file->cf_User, line.cl_Dow, 7, 0, DowAry, ptr); - - /* - * check failure - */ - - if (ptr == NULL) - continue; - - /* - * fix days and dow - if one is not * and the other - * is *, the other is set to 0, and vise-versa - */ - - FixDayDow(&line); + file->cf_next = G.cron_files; + G.cron_files = file; + } + config_close(parser); +#if ENABLE_FEATURE_CROND_CALL_SENDMAIL + free(mailTo); +#endif + free(shell); +} - *pline = calloc(1, sizeof(CronLine)); - **pline = line; +static void process_cron_update_file(void) +{ + FILE *fi; + char buf[256]; + + fi = fopen_for_read(CRONUPDATE); + if (fi != NULL) { + unlink(CRONUPDATE); + while (fgets(buf, sizeof(buf), fi) != NULL) { + /* use first word only */ + skip_non_whitespace(buf)[0] = '\0'; + load_crontab(buf); + } + fclose(fi); + } +} - /* - * copy command - */ +static void rescan_crontab_dir(void) +{ + CronFile *file; - (*pline)->cl_Shell = strdup(ptr); + /* Delete all files until we only have ones with running jobs (or none) */ + again: + for (file = G.cron_files; file; file = file->cf_next) { + if (!file->cf_deleted) { + delete_cronfile(file->cf_username); + goto again; + } + } -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) { - crondlog("\111 Command %s\n", ptr); - } -#endif + /* Remove cron update file */ + unlink(CRONUPDATE); + /* Re-chdir, in case directory was renamed & deleted */ + xchdir(G.crontab_dir_name); - pline = &((*pline)->cl_Next); + /* Scan directory and add associated users */ + { + DIR *dir = opendir("."); + struct dirent *den; + + /* xopendir exists, but "can't open '.'" is not informative */ + if (!dir) + bb_error_msg_and_die("can't open '%s'", G.crontab_dir_name); + while ((den = readdir(dir)) != NULL) { + if (strchr(den->d_name, '.') != NULL) { + continue; + } + load_crontab(den->d_name); } - *pline = NULL; + closedir(dir); + } +} - file->cf_Next = FileBase; - FileBase = file; +#if SETENV_LEAKS +/* We set environment *before* vfork (because we want to use vfork), + * so we cannot use setenv() - repeated calls to setenv() may leak memory! + * Using putenv(), and freeing memory after unsetenv() won't leak */ +static void safe_setenv(char **pvar_val, const char *var, const char *val) +{ + char *var_val = *pvar_val; - if (maxLines == 0 || maxEntries == 0) - crondlog("\111Maximum number of lines reached for user %s\n", fileName); - } - fclose(fi); + if (var_val) { + bb_unsetenv_and_free(var_val); } - } + *pvar_val = xasprintf("%s=%s", var, val); + putenv(*pvar_val); } +#endif -static void -CheckUpdates(void) +static void set_env_vars(struct passwd *pas, const char *shell) { - FILE *fi; - char buf[256]; + /* POSIX requires crond to set up at least HOME, LOGNAME, PATH, SHELL. + * We assume crond inherited suitable PATH. + */ +#if SETENV_LEAKS + safe_setenv(&G.env_var_logname, "LOGNAME", pas->pw_name); + safe_setenv(&G.env_var_user, "USER", pas->pw_name); + safe_setenv(&G.env_var_home, "HOME", pas->pw_dir); + safe_setenv(&G.env_var_shell, "SHELL", shell); +#else + xsetenv("LOGNAME", pas->pw_name); + xsetenv("USER", pas->pw_name); + xsetenv("HOME", pas->pw_dir); + xsetenv("SHELL", shell); +#endif +} - if ((fi = fopen(CRONUPDATE, "r")) != NULL) { - remove(CRONUPDATE); - while (fgets(buf, sizeof(buf), fi) != NULL) { - SynchronizeFile(strtok(buf, " \t\r\n")); +static void change_user(struct passwd *pas) +{ + /* careful: we're after vfork! */ + change_identity(pas); /* - initgroups, setgid, setuid */ + if (chdir(pas->pw_dir) < 0) { + bb_error_msg("can't change directory to '%s'", pas->pw_dir); + xchdir(CRON_DIR); } - fclose(fi); - } } -static void -SynchronizeDir(void) -{ - /* - * Attempt to delete the database. - */ +// TODO: sendmail should be _run-time_ option, not compile-time! +#if ENABLE_FEATURE_CROND_CALL_SENDMAIL - for (;;) { - CronFile *file; +static pid_t +fork_job(const char *user, int mailFd, CronLine *line, bool run_sendmail) +{ + struct passwd *pas; + const char *shell, *prog; + smallint sv_logmode; + pid_t pid; + + /* prepare things before vfork */ + pas = getpwnam(user); + if (!pas) { + bb_error_msg("can't get uid for %s", user); + goto err; + } - for (file = FileBase; file && file->cf_Deleted; file = file->cf_Next) - ; - if (file == NULL) - break; - DeleteFile(file->cf_User); - } - - /* - * Remove cron update file - * - * Re-chdir, in case directory was renamed & deleted, or otherwise - * screwed up. - * - * scan directory and add associated users - */ - - remove(CRONUPDATE); - if (chdir(CDir) < 0) { - crondlog("\311unable to find %s\n", CDir); - } - { - DIR *dir; - struct dirent *den; - - if ((dir = opendir("."))) { - while ((den = readdir(dir))) { - if (strchr(den->d_name, '.') != NULL) - continue; - if (getpwnam(den->d_name)) - SynchronizeFile(den->d_name); + shell = line->cl_shell ? line->cl_shell : DEFAULT_SHELL; + prog = run_sendmail ? SENDMAIL : shell; + + set_env_vars(pas, shell); + + sv_logmode = logmode; + pid = vfork(); + if (pid == 0) { + /* CHILD */ + /* initgroups, setgid, setuid, and chdir to home or CRON_DIR */ + change_user(pas); + log5("child running %s", prog); + if (mailFd >= 0) { + xmove_fd(mailFd, run_sendmail ? 0 : 1); + dup2(1, 2); + } + /* crond 3.0pl1-100 puts tasks in separate process groups */ + bb_setpgrp(); + if (!run_sendmail) + execlp(prog, prog, "-c", line->cl_cmd, (char *) NULL); else - crondlog("\007ignoring %s\n", den->d_name); - } - closedir(dir); - } else { - crondlog("\311Unable to open current dir!\n"); + execlp(prog, prog, SENDMAIL_ARGS, (char *) NULL); + /* + * I want this error message on stderr too, + * even if other messages go only to syslog: + */ + logmode |= LOGMODE_STDIO; + bb_error_msg_and_die("can't execute '%s' for user %s", prog, user); } - } -} + logmode = sv_logmode; + if (pid < 0) { + bb_perror_msg("vfork"); + err: + pid = 0; + } /* else: PARENT, FORK SUCCESS */ -/* - * DeleteFile() - delete user database - * - * Note: multiple entries for same user may exist if we were unable to - * completely delete a database due to running processes. - */ + /* + * Close the mail file descriptor.. we can't just leave it open in + * a structure, closing it later, because we might run out of descriptors + */ + if (mailFd >= 0) { + close(mailFd); + } + return pid; +} -static void -DeleteFile(const char *userName) +static void start_one_job(const char *user, CronLine *line) { - CronFile **pfile = &FileBase; - CronFile *file; + char mailFile[128]; + int mailFd = -1; + + line->cl_pid = 0; + line->cl_empty_mail_size = 0; - while ((file = *pfile) != NULL) { - if (strcmp(userName, file->cf_User) == 0) { - CronLine **pline = &file->cf_LineBase; - CronLine *line; + if (line->cl_mailto) { + /* Open mail file (owner is root so nobody can screw with it) */ + snprintf(mailFile, sizeof(mailFile), "%s/cron.%s.%d", CRON_DIR, user, getpid()); + mailFd = open(mailFile, O_CREAT | O_TRUNC | O_WRONLY | O_EXCL | O_APPEND, 0600); - file->cf_Running = 0; - file->cf_Deleted = 1; + if (mailFd >= 0) { + fdprintf(mailFd, "To: %s\nSubject: cron: %s\n\n", line->cl_mailto, + line->cl_cmd); + line->cl_empty_mail_size = lseek(mailFd, 0, SEEK_CUR); + } else { + bb_error_msg("can't create mail file %s for user %s, " + "discarding output", mailFile, user); + } + } - while ((line = *pline) != NULL) { - if (line->cl_Pid > 0) { - file->cf_Running = 1; - pline = &line->cl_Next; + line->cl_pid = fork_job(user, mailFd, line, /*sendmail?*/ 0); + if (mailFd >= 0) { + if (line->cl_pid <= 0) { + unlink(mailFile); } else { - *pline = line->cl_Next; - free(line->cl_Shell); - free(line); + /* rename mail-file based on pid of process */ + char *mailFile2 = xasprintf("%s/cron.%s.%d", CRON_DIR, user, (int)line->cl_pid); + rename(mailFile, mailFile2); // TODO: xrename? + free(mailFile2); } - } - if (file->cf_Running == 0) { - *pfile = file->cf_Next; - free(file->cf_User); - free(file); - } else { - pfile = &file->cf_Next; - } - } else { - pfile = &file->cf_Next; } - } } /* - * TestJobs() - * - * determine which jobs need to be run. Under normal conditions, the - * period is about a minute (one scan). Worst case it will be one - * hour (60 scans). + * process_finished_job - called when job terminates and when mail terminates */ - -static int -TestJobs(time_t t1, time_t t2) +static void process_finished_job(const char *user, CronLine *line) { - short nJobs = 0; - time_t t; - - /* - * Find jobs > t1 and <= t2 - */ - - for (t = t1 - t1 % 60; t <= t2; t += 60) { - if (t > t1) { - struct tm *tp = localtime(&t); - CronFile *file; - CronLine *line; - - for (file = FileBase; file; file = file->cf_Next) { -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) - crondlog("\005FILE %s:\n", file->cf_User); -#endif - if (file->cf_Deleted) - continue; - for (line = file->cf_LineBase; line; line = line->cl_Next) { -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) - crondlog("\005 LINE %s\n", line->cl_Shell); -#endif - if (line->cl_Mins[tp->tm_min] && - line->cl_Hrs[tp->tm_hour] && - (line->cl_Days[tp->tm_mday] || line->cl_Dow[tp->tm_wday]) && - line->cl_Mons[tp->tm_mon] - ) { -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) - crondlog("\005 JobToDo: %d %s\n", line->cl_Pid, line->cl_Shell); -#endif - if (line->cl_Pid > 0) { - crondlog("\010 process already running: %s %s\n", - file->cf_User, - line->cl_Shell - ); - } else if (line->cl_Pid == 0) { - line->cl_Pid = -1; - file->cf_Ready = 1; - ++nJobs; - } - } - } - } + pid_t pid; + int mailFd; + char mailFile[128]; + struct stat sbuf; + + pid = line->cl_pid; + line->cl_pid = 0; + if (pid <= 0) { + /* No job */ + return; + } + if (line->cl_empty_mail_size <= 0) { + /* End of job and no mail file, or end of sendmail job */ + return; } - } - return(nJobs); -} -static void -RunJobs(void) -{ - CronFile *file; - CronLine *line; - - for (file = FileBase; file; file = file->cf_Next) { - if (file->cf_Ready) { - file->cf_Ready = 0; - - for (line = file->cf_LineBase; line; line = line->cl_Next) { - if (line->cl_Pid < 0) { - - RunJob(file->cf_User, line); - - crondlog("\010USER %s pid %3d cmd %s\n", - file->cf_User, - line->cl_Pid, - line->cl_Shell - ); - if (line->cl_Pid < 0) - file->cf_Ready = 1; - else if (line->cl_Pid > 0) - file->cf_Running = 1; - } - } + /* + * End of primary job - check for mail file. + * If size has changed and the file is still valid, we send it. + */ + snprintf(mailFile, sizeof(mailFile), "%s/cron.%s.%d", CRON_DIR, user, (int)pid); + mailFd = open(mailFile, O_RDONLY); + unlink(mailFile); + if (mailFd < 0) { + return; } - } + + if (fstat(mailFd, &sbuf) < 0 + || sbuf.st_uid != DAEMON_UID + || sbuf.st_nlink != 0 + || sbuf.st_size == line->cl_empty_mail_size + || !S_ISREG(sbuf.st_mode) + ) { + close(mailFd); + return; + } + line->cl_empty_mail_size = 0; + /* if (line->cl_mailto) - always true if cl_empty_mail_size was nonzero */ + line->cl_pid = fork_job(user, mailFd, line, /*sendmail?*/ 1); } -/* - * CheckJobs() - check for job completion - * - * Check for job completion, return number of jobs still running after - * all done. - */ +#else /* !ENABLE_FEATURE_CROND_CALL_SENDMAIL */ -static int -CheckJobs(void) +static void start_one_job(const char *user, CronLine *line) { - CronFile *file; - CronLine *line; - int nStillRunning = 0; - - for (file = FileBase; file; file = file->cf_Next) { - if (file->cf_Running) { - file->cf_Running = 0; - - for (line = file->cf_LineBase; line; line = line->cl_Next) { - if (line->cl_Pid > 0) { - int status; - int r = wait4(line->cl_Pid, &status, WNOHANG, NULL); - - if (r < 0 || r == line->cl_Pid) { - EndJob(file->cf_User, line); - if (line->cl_Pid) - file->cf_Running = 1; - } else if (r == 0) { - file->cf_Running = 1; - } - } - } + const char *shell; + struct passwd *pas; + pid_t pid; + + pas = getpwnam(user); + if (!pas) { + bb_error_msg("can't get uid for %s", user); + goto err; } - nStillRunning += file->cf_Running; - } - return(nStillRunning); + + /* Prepare things before vfork */ + shell = line->cl_shell ? line->cl_shell : DEFAULT_SHELL; + set_env_vars(pas, shell); + + /* Fork as the user in question and run program */ + pid = vfork(); + if (pid == 0) { + /* CHILD */ + /* initgroups, setgid, setuid, and chdir to home or CRON_DIR */ + change_user(pas); + log5("child running %s", shell); + /* crond 3.0pl1-100 puts tasks in separate process groups */ + bb_setpgrp(); + execl(shell, shell, "-c", line->cl_cmd, (char *) NULL); + bb_error_msg_and_die("can't execute '%s' for user %s", shell, user); + } + if (pid < 0) { + bb_perror_msg("vfork"); + err: + pid = 0; + } + line->cl_pid = pid; } +#define process_finished_job(user, line) ((line)->cl_pid = 0) -#ifdef CONFIG_FEATURE_CROND_CALL_SENDMAIL -static void -ForkJob(const char *user, CronLine *line, int mailFd, - const char *prog, const char *cmd, const char *arg, const char *mailf) -{ - /* - * Fork as the user in question and run program - */ - pid_t pid = fork(); +#endif /* !ENABLE_FEATURE_CROND_CALL_SENDMAIL */ - line->cl_Pid = pid; - if (pid == 0) { - /* - * CHILD - */ +/* + * Determine which jobs need to be run. Under normal conditions, the + * period is about a minute (one scan). Worst case it will be one + * hour (60 scans). + */ +static void flag_starting_jobs(time_t t1, time_t t2) +{ + time_t t; - /* - * Change running state to the user in question - */ + /* Find jobs > t1 and <= t2 */ - if (ChangeUser(user) < 0) - exit(0); + for (t = t1 - t1 % 60; t <= t2; t += 60) { + struct tm *ptm; + CronFile *file; + CronLine *line; -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) - crondlog("\005Child Running %s\n", prog); -#endif + if (t <= t1) + continue; - if (mailFd >= 0) { - dup2(mailFd, mailf != NULL); - dup2((mailf ? mailFd : 1), 2); - close(mailFd); + ptm = localtime(&t); + for (file = G.cron_files; file; file = file->cf_next) { + log5("file %s:", file->cf_username); + if (file->cf_deleted) + continue; + for (line = file->cf_lines; line; line = line->cl_next) { + log5(" line %s", line->cl_cmd); + if (line->cl_Mins[ptm->tm_min] + && line->cl_Hrs[ptm->tm_hour] + && (line->cl_Days[ptm->tm_mday] || line->cl_Dow[ptm->tm_wday]) + && line->cl_Mons[ptm->tm_mon] + ) { + log5(" job: %d %s", + (int)line->cl_pid, line->cl_cmd); + if (line->cl_pid > 0) { + log8("user %s: process already running: %s", + file->cf_username, line->cl_cmd); + } else if (line->cl_pid == 0) { + line->cl_pid = -1; + file->cf_wants_starting = 1; + } + } + } + } } - execl(prog, prog, cmd, arg, NULL); - crondlog("\024unable to exec, user %s cmd %s %s %s\n", user, - prog, cmd, arg); - if(mailf) - fdprintf(1, "Exec failed: %s -c %s\n", prog, arg); - exit(0); - } else if (pid < 0) { - /* - * FORK FAILED - */ - crondlog("\024couldn't fork, user %s\n", user); - line->cl_Pid = 0; - if(mailf) - remove(mailf); - } else if(mailf) { - /* - * PARENT, FORK SUCCESS - * - * rename mail-file based on pid of process - */ - char mailFile2[128]; - - snprintf(mailFile2, sizeof(mailFile2), TMPDIR "/cron.%s.%d", - user, pid); - rename(mailf, mailFile2); - } - /* - * Close the mail file descriptor.. we can't just leave it open in - * a structure, closing it later, because we might run out of descriptors - */ - - if (mailFd >= 0) - close(mailFd); } -static void -RunJob(const char *user, CronLine *line) +static void start_jobs(void) { - char mailFile[128]; - int mailFd; - - line->cl_Pid = 0; - line->cl_MailFlag = 0; - - /* - * open mail file - owner root so nobody can screw with it. - */ - - snprintf(mailFile, sizeof(mailFile), TMPDIR "/cron.%s.%d", - user, getpid()); - mailFd = open(mailFile, O_CREAT|O_TRUNC|O_WRONLY|O_EXCL|O_APPEND, 0600); - - if (mailFd >= 0) { - line->cl_MailFlag = 1; - fdprintf(mailFd, "To: %s\nSubject: cron: %s\n\n", user, - line->cl_Shell); - line->cl_MailPos = lseek(mailFd, 0, 1); - } else { - crondlog("\024unable to create mail file user %s file %s, output to /dev/null\n", - user, mailFile); - } - - ForkJob(user, line, mailFd, DEFAULT_SHELL, "-c", line->cl_Shell, mailFile); + CronFile *file; + CronLine *line; + + for (file = G.cron_files; file; file = file->cf_next) { + if (!file->cf_wants_starting) + continue; + + file->cf_wants_starting = 0; + for (line = file->cf_lines; line; line = line->cl_next) { + pid_t pid; + if (line->cl_pid >= 0) + continue; + + start_one_job(file->cf_username, line); + pid = line->cl_pid; + log8("USER %s pid %3d cmd %s", + file->cf_username, (int)pid, line->cl_cmd); + if (pid < 0) { + file->cf_wants_starting = 1; + } + if (pid > 0) { + file->cf_has_running = 1; + } + } + } } /* - * EndJob - called when job terminates and when mail terminates + * Check for job completion, return number of jobs still running after + * all done. */ +static int check_completions(void) +{ + CronFile *file; + CronLine *line; + int num_still_running = 0; + + for (file = G.cron_files; file; file = file->cf_next) { + if (!file->cf_has_running) + continue; + + file->cf_has_running = 0; + for (line = file->cf_lines; line; line = line->cl_next) { + int r; + + if (line->cl_pid <= 0) + continue; + + r = waitpid(line->cl_pid, NULL, WNOHANG); + if (r < 0 || r == line->cl_pid) { + process_finished_job(file->cf_username, line); + if (line->cl_pid == 0) { + /* sendmail was not started for it */ + continue; + } + /* else: sendmail was started, job is still running, fall thru */ + } + /* else: r == 0: "process is still running" */ + file->cf_has_running = 1; + } +//FIXME: if !file->cf_has_running && file->deleted: delete it! +//otherwise deleted entries will stay forever, right? + num_still_running += file->cf_has_running; + } + return num_still_running; +} -static void -EndJob(const char *user, CronLine *line) +static void reopen_logfile_to_stderr(void) { - int mailFd; - char mailFile[128]; - struct stat sbuf; - - /* - * No job - */ - - if (line->cl_Pid <= 0) { - line->cl_Pid = 0; - return; - } - - /* - * End of job and no mail file - * End of sendmail job - */ - - snprintf(mailFile, sizeof(mailFile), TMPDIR "/cron.%s.%d", - user, line->cl_Pid); - line->cl_Pid = 0; - - if (line->cl_MailFlag != 1) - return; - - line->cl_MailFlag = 0; - - /* - * End of primary job - check for mail file. If size has increased and - * the file is still valid, we sendmail it. - */ - - mailFd = open(mailFile, O_RDONLY); - remove(mailFile); - if (mailFd < 0) { - return; - } - - if (fstat(mailFd, &sbuf) < 0 || - sbuf.st_uid != DaemonUid || - sbuf.st_nlink != 0 || - sbuf.st_size == line->cl_MailPos || - !S_ISREG(sbuf.st_mode) - ) { - close(mailFd); - return; - } - ForkJob(user, line, mailFd, SENDMAIL, SENDMAIL_ARGS, NULL); + if (G.log_filename) { + int logfd = open_or_warn(G.log_filename, O_WRONLY | O_CREAT | O_APPEND); + if (logfd >= 0) + xmove_fd(logfd, STDERR_FILENO); + } } -#else -/* crond whithout sendmail */ -static void -RunJob(const char *user, CronLine *line) +int crond_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE; +int crond_main(int argc UNUSED_PARAM, char **argv) { - /* - * Fork as the user in question and run program - */ - pid_t pid = fork(); + time_t t2; + unsigned rescan; + unsigned sleep_time; + unsigned opts; + + INIT_G(); + + /* "-b after -f is ignored", and so on for every pair a-b */ + opt_complementary = "f-b:b-f:S-L:L-S" IF_FEATURE_CROND_D(":d-l") + /* -l and -d have numeric param */ + ":l+" IF_FEATURE_CROND_D(":d+"); + opts = getopt32(argv, "l:L:fbSc:" IF_FEATURE_CROND_D("d:"), + &G.log_level, &G.log_filename, &G.crontab_dir_name + IF_FEATURE_CROND_D(,&G.log_level)); + /* both -d N and -l N set the same variable: G.log_level */ + + if (!(opts & OPT_f)) { + /* close stdin, stdout, stderr. + * close unused descriptors - don't need them. */ + bb_daemonize_or_rexec(DAEMON_CLOSE_EXTRA_FDS, argv); + } - if (pid == 0) { - /* - * CHILD - */ + if (!(opts & OPT_d) && G.log_filename == NULL) { + /* logging to syslog */ + openlog(applet_name, LOG_CONS | LOG_PID, LOG_CRON); + logmode = LOGMODE_SYSLOG; + } - /* - * Change running state to the user in question - */ + //signal(SIGHUP, SIG_IGN); /* ? original crond dies on HUP... */ - if (ChangeUser(user) < 0) - exit(0); + reopen_logfile_to_stderr(); + xchdir(G.crontab_dir_name); + log8("crond (busybox "BB_VER") started, log level %d", G.log_level); + rescan_crontab_dir(); + write_pidfile(CONFIG_PID_FILE_PATH "/crond.pid"); -#ifdef FEATURE_DEBUG_OPT - if (DebugOpt) - crondlog("\005Child Running %s\n", DEFAULT_SHELL); -#endif + /* Main loop */ + t2 = time(NULL); + rescan = 60; + sleep_time = 60; + for (;;) { + struct stat sbuf; + time_t t1; + long dt; - execl(DEFAULT_SHELL, DEFAULT_SHELL, "-c", line->cl_Shell, NULL); - crondlog("\024unable to exec, user %s cmd %s -c %s\n", user, - DEFAULT_SHELL, line->cl_Shell); - exit(0); - } else if (pid < 0) { - /* - * FORK FAILED - */ - crondlog("\024couldn't fork, user %s\n", user); - pid = 0; - } - line->cl_Pid = pid; + /* Synchronize to 1 minute, minimum 1 second */ + t1 = t2; + sleep(sleep_time - (time(NULL) % sleep_time)); + t2 = time(NULL); + dt = (long)t2 - (long)t1; + + reopen_logfile_to_stderr(); + + /* + * The file 'cron.update' is checked to determine new cron + * jobs. The directory is rescanned once an hour to deal + * with any screwups. + * + * Check for time jump. Disparities over an hour either way + * result in resynchronization. A negative disparity + * less than an hour causes us to effectively sleep until we + * match the original time (i.e. no re-execution of jobs that + * have just been run). A positive disparity less than + * an hour causes intermediate jobs to be run, but only once + * in the worst case. + * + * When running jobs, the inequality used is greater but not + * equal to t1, and less then or equal to t2. + */ + if (stat(G.crontab_dir_name, &sbuf) != 0) + sbuf.st_mtime = 0; /* force update (once) if dir was deleted */ + if (G.crontab_dir_mtime != sbuf.st_mtime) { + G.crontab_dir_mtime = sbuf.st_mtime; + rescan = 1; + } + if (--rescan == 0) { + rescan = 60; + rescan_crontab_dir(); + } + process_cron_update_file(); + log5("wakeup dt=%ld", dt); + if (dt < -60 * 60 || dt > 60 * 60) { + bb_error_msg("time disparity of %ld minutes detected", dt / 60); + /* and we do not run any jobs in this case */ + } else if (dt > 0) { + /* Usual case: time advances forward, as expected */ + flag_starting_jobs(t1, t2); + start_jobs(); + sleep_time = 60; + if (check_completions() > 0) { + /* some jobs are still running */ + sleep_time = 10; + } + } + /* else: time jumped back, do not run any jobs */ + } /* for (;;) */ + + return 0; /* not reached */ } -#endif /* CONFIG_FEATURE_CROND_CALL_SENDMAIL */