/*
* FCRON - periodic command scheduler
*
* Copyright 2000-2007 Thibault Godouet <fcron@free.fr>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* The GNU General Public License can also be found in the file
* `LICENSE' that comes with the fcron source distribution.
*/
/* $Id: convert-fcrontab.c,v 1.23 2007/04/14 18:04:21 thib Exp thib $ */
#include "convert-fcrontab.h"
char rcs_info[] = "$Id: convert-fcrontab.c,v 1.23 2007/04/14 18:04:21 thib Exp thib $";
void info(void);
void usage(void);
void convert_file(char *file_name);
char *read_str(FILE *f, char *buf, int max);
void delete_file(cf_t *file);
char *cdir = FCRONTABS; /* the dir where are stored users' fcrontabs */
/* needed by log part : */
char *prog_name = NULL;
char foreground = 1;
pid_t daemon_pid = 0;
uid_t rootuid = 0;
gid_t rootgid = 0;
char debug_opt = 0;
char dosyslog = 1;
void
info(void)
/* print some informations about this program :
* version, license */
{
fprintf(stderr,
"convert-fcrontab "VERSION_QUOTED "\n"
"Copyright " COPYRIGHT_QUOTED " Thibault Godouet <fcron@free.fr>\n"
"This program is free software distributed WITHOUT ANY WARRANTY.\n"
"See the GNU General Public License for more details.\n"
"\n"
"WARNING: this program is not supposed to be installed on the "
"system. It is only used at installation time to convert the "
"the binary fcrontabs in the old format (fcron < 1.1.0, which "
"was published in 2001) to the present one."
);
exit(EXIT_OK);
}
void
usage()
/* print a help message about command line options and exit */
{
fprintf(stderr, "\nconvert-fcrontab " VERSION_QUOTED "\n\n"
"convert-fcrontab -h\n"
"convert-fcrontab -V\n"
"convert-fcrontab user\n"
" Update the fcrontab of \"user\" to fit the new binary format.\n"
"\n"
"WARNING: this program is not supposed to be installed on the "
"system. It is only used at installation time to convert the "
"the binary fcrontabs in the old format (fcron < 1.1.0, which "
"was published in 2001) to the present one."
);
exit(EXIT_ERR);
}
char *
read_str(FILE *f, char *buf, int max)
/* return a pointer to string read from file f
* if it is non-zero length */
{
int i;
for (i = 0; i < max; i++)
if ( (buf[i] = fgetc(f)) == '\0')
break;
buf[max-1] = '\0';
if ( strlen(buf) == 0 )
return NULL;
else
return strdup2(buf);
}
void
delete_file(cf_t *file)
/* free a file if user_name is not null
* otherwise free all files */
{
cl_t *line = NULL;
cl_t *cur_line = NULL;
env_t *env = NULL;
env_t *cur_env = NULL;
/* free lines */
cur_line = file->cf_line_base;
while ( (line = cur_line) != NULL) {
cur_line = line->cl_next;
free(line->cl_shell);
free(line->cl_mailto);
free(line->cl_runas);
free(line);
}
/* free env variables */
cur_env = file->cf_env_base;
while ( (env = cur_env) != NULL ) {
cur_env = env->e_next;
free(env->e_val);
free(env);
}
/* finally free file itself */
free(file->cf_user);
free(file);
}
void
convert_file(char *file_name)
/* this functions is a mix of read_file() from version 1.0.3 and save_file(),
* so you can read more comments there */
{
cf_t *file = NULL;
cl_t *line = NULL;
env_t *env = NULL;
FILE *f = NULL;
char buf[LINE_LEN];
time_t t_save = 0;
struct stat file_stat;
explain("Converting %s's fcrontab ...", file_name);
Alloc(file, cf_t);
/* open file */
if ( (f = fopen(file_name, "r")) == NULL )
die_e("Could not read %s", file_name);
if ( fstat(fileno(f), &file_stat) != 0 )
die_e("Could not stat %s", file_name);
bzero(buf, sizeof(buf));
if (fgets(buf, sizeof(buf), f) == NULL ||
strncmp(buf, "fcrontab-017\n",
sizeof("fcrontab-017\n")) != 0) {
error("File %s is not valid: ignored.", file_name);
error("Maybe this file has been generated by a too old version "
"of fcron ( <= 0.9.4), or is already in the new binary format.");
error("In this case, you should reinstall it using fcrontab"
" (but be aware that you may lose some data as the last "
"execution time and date as if you run a fcrontab -z -n).");
exit(EXIT_ERR);
}
if ((file->cf_user = read_str(f, buf, sizeof(buf))) == NULL)
die_e("Cannot read user's name");
if ( fscanf(f, "%" ATTR_SIZE_TIMET "d", CAST_TIMET_PTR &t_save) != 1 )
error("could not get time and date of saving");
/* read env variables */
Alloc(env, env_t);
while( (env->e_val = read_str(f, buf, sizeof(buf))) != NULL ) {
env->e_next = file->cf_env_base;
file->cf_env_base = env;
Alloc(env, env_t);
}
/* free last alloc : unused */
free(env);
/* read lines */
Alloc(line, cl_t);
while ( fread(line, sizeof(cl_t), 1, f) == 1 ) {
if ((line->cl_shell = read_str(f, buf, sizeof(buf))) == NULL) {
error("Line is not valid (empty shell command) : ignored");
continue;
}
if ((line->cl_runas = read_str(f, buf, sizeof(buf))) == NULL) {
error("Line is not valid (empty runas field) : ignored");
continue;
}
if ((line->cl_mailto = read_str(f, buf, sizeof(buf))) == NULL) {
error("Line is not valid (empty mailto field) : ignored");
continue;
}
line->cl_next = file->cf_line_base;
file->cf_line_base = line;
Alloc(line, cl_t);
}
free(line);
fclose(f);
/* open a temp file in write mode and truncate it */
strcpy(buf, "tmp_");
strncat(buf, file_name, sizeof(buf) - sizeof("tmp_") - 1);
buf[sizeof(buf)-1]='\0';
/* everything's ok : we can override the src file safely */
if ( rename(buf, file_name) != 0 )
error_e("Could not rename %s to %s", buf, file_name);
save_file_safe(file, file_name, "convert-fcrontab", file_stat.st_uid,
file_stat.st_gid, t_save);
delete_file(file);
}
int
main(int argc, char *argv[])
{
int c;
extern char *optarg;
extern int optind, opterr, optopt;
char *user_to_update = NULL;
rootuid = get_user_uid_safe(ROOTNAME);
rootgid = get_group_gid_safe(ROOTGROUP);
if ( strrchr(argv[0], '/') == NULL) prog_name = argv[0];
else prog_name = strrchr(argv[0], '/') + 1;
/* constants and variables defined by command line */
while(1) {
c = getopt(argc, argv, "hV");
if (c == EOF) break;
switch (c) {
case 'V':
info(); break;
case 'h':
usage(); break;
case ':':
fprintf(stderr, "(setopt) Missing parameter");
usage();
case '?':
usage();
default:
fprintf(stderr, "(setopt) Warning: getopt returned %c", c);
}
}
if (optind >= argc || argc != 2)
usage();
user_to_update = strdup2(argv[optind]);
if (chdir(cdir) != 0)
die_e("Could not change dir to " FCRONTABS);
convert_file(user_to_update);
exit(EXIT_OK);
}
syntax highlighted by Code2HTML, v. 0.9.1