git.gag.com Git - debian/amanda/blob - server-src/amtrmlog.c

   1 /*
   2  * Amanda, The Advanced Maryland Automatic Network Disk Archiver
   3  * Copyright (c) 1991-1998 University of Maryland at College Park
   4  * Copyright (c) 2007-2012 Zmanda, Inc.  All Rights Reserved.
   5  * All Rights Reserved.
   6  *
   7  * Permission to use, copy, modify, distribute, and sell this software and its
   8  * documentation for any purpose is hereby granted without fee, provided that
   9  * the above copyright notice appear in all copies and that both that
  10  * copyright notice and this permission notice appear in supporting
  11  * documentation, and that the name of U.M. not be used in advertising or
  12  * publicity pertaining to distribution of the software without specific,
  13  * written prior permission.  U.M. makes no representations about the
  14  * suitability of this software for any purpose.  It is provided "as is"
  15  * without express or implied warranty.
  16  *
  17  * U.M. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL U.M.
  19  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  20  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
  21  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
  22  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  23  *
  24  * Authors: the Amanda Development Team.  Its members are listed in a
  25  * file named AUTHORS, in the root directory of this distribution.
  26  */
  27 /*
  28  * $Id: amtrmlog.c,v 1.17 2006/07/25 18:27:57 martinea Exp $
  29  *
  30  * trims number of index files to only those still in system.  Well
  31  * actually, it keeps a few extra, plus goes back to the last level 0
  32  * dump.
  33  */
  34
  35 #include "amanda.h"
  36 #include "arglist.h"
  37 #include "conffile.h"
  38 #include "diskfile.h"
  39 #include "tapefile.h"
  40 #include "find.h"
  41
  42 int amtrmidx_debug = 0;
  43
  44 int main(int argc, char **argv);
  45
  46 int
  47 main(
  48     int         argc,
  49     char **     argv)
  50 {
  51     disklist_t diskl;
  52     int no_keep;                        /* files per system to keep */
  53     char **output_find_log;
  54     DIR *dir;
  55     struct dirent *adir;
  56     char **name;
  57     int useful;
  58     char *olddir;
  59     char *oldfile = NULL, *newfile = NULL;
  60     time_t today, date_keep;
  61     char *logname = NULL;
  62     struct stat stat_log;
  63     struct stat stat_old;
  64     char *conf_diskfile;
  65     char *conf_tapelist;
  66     char *conf_logdir;
  67     int dumpcycle;
  68     config_overrides_t *cfg_ovr = NULL;
  69
  70     if (argc > 1 && argv && argv[1] && g_str_equal(argv[1], "--version")) {
  71         printf("amtrmlog-%s\n", VERSION);
  72         return (0);
  73     }
  74
  75     /*
  76      * Configure program for internationalization:
  77      *   1) Only set the message locale for now.
  78      *   2) Set textdomain for all amanda related programs to "amanda"
  79      *      We don't want to be forced to support dozens of message catalogs.
  80      */
  81     setlocale(LC_MESSAGES, "C");
  82     textdomain("amanda");
  83
  84     safe_fd(-1, 0);
  85     safe_cd();
  86
  87     set_pname("amtrmlog");
  88
  89     /* Don't die when child closes pipe */
  90     signal(SIGPIPE, SIG_IGN);
  91
  92     cfg_ovr = extract_commandline_config_overrides(&argc, &argv);
  93
  94     if (argc > 1 && strcmp(argv[1], "-t") == 0) {
  95         amtrmidx_debug = 1;
  96         argc--;
  97         argv++;
  98     }
  99
 100     if (argc < 2) {
 101         g_fprintf(stderr, _("Usage: %s [-t] <config> [-o configoption]*\n"), argv[0]);
 102         return 1;
 103     }
 104
 105     dbopen(DBG_SUBDIR_SERVER);
 106     dbprintf(_("%s: version %s\n"), argv[0], VERSION);
 107
 108     set_config_overrides(cfg_ovr);
 109     config_init(CONFIG_INIT_EXPLICIT_NAME, argv[1]);
 110
 111     conf_diskfile = config_dir_relative(getconf_str(CNF_DISKFILE));
 112     read_diskfile(conf_diskfile, &diskl);
 113     amfree(conf_diskfile);
 114
 115     if (config_errors(NULL) >= CFGERR_WARNINGS) {
 116         config_print_errors();
 117         if (config_errors(NULL) >= CFGERR_ERRORS) {
 118             g_critical(_("errors processing config file"));
 119         }
 120     }
 121
 122     check_running_as(RUNNING_AS_DUMPUSER);
 123
 124     dbrename(get_config_name(), DBG_SUBDIR_SERVER);
 125
 126     conf_tapelist = config_dir_relative(getconf_str(CNF_TAPELIST));
 127     if (read_tapelist(conf_tapelist)) {
 128         error(_("could not load tapelist \"%s\""), conf_tapelist);
 129         /*NOTREACHED*/
 130     }
 131     amfree(conf_tapelist);
 132
 133     today = time((time_t *)NULL);
 134     dumpcycle = getconf_int(CNF_DUMPCYCLE);
 135     if(dumpcycle > 5000)
 136         dumpcycle = 5000;
 137     date_keep = today - (dumpcycle * 86400);
 138
 139     output_find_log = find_log();
 140
 141     /* determine how many log to keep */
 142     no_keep = getconf_int(CNF_TAPECYCLE) * 2;
 143     dbprintf(plural(_("Keeping %d log file\n"),
 144                     _("Keeping %d log files\n"), no_keep),
 145              no_keep);
 146
 147     conf_logdir = config_dir_relative(getconf_str(CNF_LOGDIR));
 148     olddir = vstralloc(conf_logdir, "/oldlog", NULL);
 149     if (mkpdir(olddir, 0700, (uid_t)-1, (gid_t)-1) != 0) {
 150         error(_("could not create parents of %s: %s"), olddir, strerror(errno));
 151         /*NOTREACHED*/
 152     }
 153     if (mkdir(olddir, 0700) != 0 && errno != EEXIST) {
 154         error(_("could not create %s: %s"), olddir, strerror(errno));
 155         /*NOTREACHED*/
 156     }
 157
 158     if (stat(olddir,&stat_old) == -1) {
 159         error(_("can't stat oldlog directory \"%s\": %s"), olddir, strerror(errno));
 160         /*NOTREACHED*/
 161     }
 162
 163     if (!S_ISDIR(stat_old.st_mode)) {
 164         error(_("Oldlog directory \"%s\" is not a directory"), olddir);
 165         /*NOTREACHED*/
 166     }
 167
 168     if ((dir = opendir(conf_logdir)) == NULL) {
 169         error(_("could not open log directory \"%s\": %s"), conf_logdir,strerror(errno));
 170         /*NOTREACHED*/
 171     }
 172     while ((adir=readdir(dir)) != NULL) {
 173         if(strncmp(adir->d_name,"log.",4)==0) {
 174             useful=0;
 175             for (name=output_find_log;*name !=NULL; name++) {
 176                 if((strlen(adir->d_name) >= 13 &&
 177                     strlen(*name) >= 13 &&
 178                     adir->d_name[12] == '.' && (*name)[12] == '.' &&
 179                     strncmp(adir->d_name,*name,12)==0) ||
 180                    strncmp(adir->d_name,*name,18)==0) {
 181                     useful=1;
 182                     break;
 183                 }
 184             }
 185             logname=newvstralloc(logname,
 186                                  conf_logdir, "/" ,adir->d_name, NULL);
 187             if(stat(logname,&stat_log)==0) {
 188                 if((time_t)stat_log.st_mtime > date_keep) {
 189                     useful = 1;
 190                 }
 191             }
 192             if(useful == 0) {
 193                 oldfile = newvstralloc(oldfile,
 194                                        conf_logdir, "/", adir->d_name, NULL);
 195                 newfile = newvstralloc(newfile,
 196                                        olddir, "/", adir->d_name, NULL);
 197                 if (rename(oldfile,newfile) != 0) {
 198                     error(_("could not rename \"%s\" to \"%s\": %s"),
 199                           oldfile, newfile, strerror(errno));
 200                     /*NOTREACHED*/
 201                 }
 202             }
 203         }
 204     }
 205     closedir(dir);
 206     for (name = output_find_log; *name != NULL; name++) {
 207         amfree(*name);
 208     }
 209     amfree(output_find_log);
 210     amfree(logname);
 211     amfree(oldfile);
 212     amfree(newfile);
 213     amfree(olddir);
 214     amfree(conf_logdir);
 215     clear_tapelist();
 216     free_disklist(&diskl);
 217
 218     dbclose();
 219
 220     return 0;
 221 }