Passbolt/fcron-3.2.0/convert-fcrontab.c

290 lines
7.7 KiB
C

/*
* FCRON - periodic command scheduler
*
* Copyright 2000-2014 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.
*/
#include "convert-fcrontab.h"
#include "mem.h"
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;
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;
/* free lines */
cur_line = file->cf_line_base;
while ((line = cur_line) != NULL) {
cur_line = line->cl_next;
Free_safe(line->cl_shell);
Free_safe(line->cl_mailto);
Free_safe(line->cl_runas);
Free_safe(line);
}
/* free env variables */
env_list_destroy(file->cf_env_list);
/* finally free file itself */
Free_safe(file->cf_user);
Free_safe(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;
char *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 */
while ((env = read_str(f, buf, sizeof(buf))) != NULL) {
env_list_putenv(file->cf_env_list, env, 1);
Free_safe(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_safe(line);
xfclose(&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, "chV");
if (c == EOF)
break;
switch (c) {
case 'V':
info();
break;
case 'h':
usage();
break;
case 'c':
Set(fcronconf, optarg);
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();
/* parse fcron.conf */
read_conf();
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);
}