2 * Amanda, The Advanced Maryland Automatic Network Disk Archiver
3 * Copyright (c) 1991-1998 University of Maryland at College Park
6 * Permission to use, copy, modify, distribute, and sell this software and its
7 * documentation for any purpose is hereby granted without fee, provided that
8 * the above copyright notice appear in all copies and that both that
9 * copyright notice and this permission notice appear in supporting
10 * documentation, and that the name of U.M. not be used in advertising or
11 * publicity pertaining to distribution of the software without specific,
12 * written prior permission. U.M. makes no representations about the
13 * suitability of this software for any purpose. It is provided "as is"
14 * without express or implied warranty.
16 * U.M. DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL U.M.
18 * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
19 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
20 * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
21 * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
23 * Authors: the Amanda Development Team. Its members are listed in a
24 * file named AUTHORS, in the root directory of this distribution.
27 * $Id: amtrmlog.c,v 1.10 2006/01/14 04:37:19 paddy_s Exp $
29 * trims number of index files to only those still in system. Well
30 * actually, it keeps a few extra, plus goes back to the last level 0
36 #ifdef HAVE_NETINET_IN_SYSTM_H
37 #include <netinet/in_systm.h>
45 int main P((int, char **));
52 int no_keep; /* files per system to keep */
53 char **output_find_log;
59 char *oldfile = NULL, *newfile = NULL;
60 time_t today, date_keep;
68 int amtrmidx_debug = 0;
73 set_pname("amtrmlog");
75 /* Don't die when child closes pipe */
76 signal(SIGPIPE, SIG_IGN);
78 if (argc > 1 && strcmp(argv[1], "-t") == 0) {
85 fprintf(stderr, "Usage: %s [-t] <config>\n", argv[0]);
90 dbprintf(("%s: version %s\n", argv[0], version()));
92 config_name = argv[1];
94 config_dir = vstralloc(CONFIG_DIR, "/", config_name, "/", NULL);
95 conffile = stralloc2(config_dir, CONFFILE_NAME);
96 if (read_conffile(conffile))
97 error("errors processing amanda config file \"%s\"", conffile);
100 conf_diskfile = getconf_str(CNF_DISKFILE);
101 if (*conf_diskfile == '/') {
102 conf_diskfile = stralloc(conf_diskfile);
104 conf_diskfile = stralloc2(config_dir, conf_diskfile);
106 if (read_diskfile(conf_diskfile, &diskl) < 0)
107 error("could not load disklist \"%s\"", conf_diskfile);
108 amfree(conf_diskfile);
110 conf_tapelist = getconf_str(CNF_TAPELIST);
111 if (*conf_tapelist == '/') {
112 conf_tapelist = stralloc(conf_tapelist);
114 conf_tapelist = stralloc2(config_dir, conf_tapelist);
116 if (read_tapelist(conf_tapelist))
117 error("could not load tapelist \"%s\"", conf_tapelist);
118 amfree(conf_tapelist);
120 today = time((time_t *)NULL);
121 date_keep = today - (getconf_int(CNF_DUMPCYCLE)*86400);
123 output_find_log = find_log();
125 /* determine how many log to keep */
126 no_keep = getconf_int(CNF_TAPECYCLE) * 2;
127 dbprintf(("Keeping %d log file%s\n", no_keep, (no_keep == 1) ? "" : "s"));
129 conf_logdir = getconf_str(CNF_LOGDIR);
130 if (*conf_logdir == '/') {
131 conf_logdir = stralloc(conf_logdir);
133 conf_logdir = stralloc2(config_dir, conf_logdir);
135 olddir = vstralloc(conf_logdir, "/oldlog", NULL);
136 if (mkpdir(olddir, 02700, (uid_t)-1, (gid_t)-1) != 0)
137 error("could not create parents of %s: %s", olddir, strerror(errno));
138 if (mkdir(olddir, 02700) != 0 && errno != EEXIST)
139 error("could not create %s: %s", olddir, strerror(errno));
141 if (stat(olddir,&stat_old) == -1) {
142 error("can't stat oldlog directory \"%s\": %s", olddir, strerror(errno));
145 if (!S_ISDIR(stat_old.st_mode)) {
146 error("Oldlog directory \"%s\" is not a directory", olddir);
149 if ((dir = opendir(conf_logdir)) == NULL)
150 error("could not open log directory \"%s\": %s", conf_logdir,strerror(errno));
151 while ((adir=readdir(dir)) != NULL) {
152 if(strncmp(adir->d_name,"log.",4)==0) {
154 for (name=output_find_log;*name !=NULL; name++) {
155 if(strncmp(adir->d_name,*name,12)==0) {
159 logname=newvstralloc(logname,
160 conf_logdir, "/" ,adir->d_name, NULL);
161 if(stat(logname,&stat_log)==0) {
162 if(stat_log.st_mtime > date_keep) {
167 oldfile = newvstralloc(oldfile,
168 conf_logdir, "/", adir->d_name, NULL);
169 newfile = newvstralloc(newfile,
170 olddir, "/", adir->d_name, NULL);
171 if (rename(oldfile,newfile) != 0)
172 error("could not rename \"%s\" to \"%s\": %s",
173 oldfile, newfile, strerror(errno));
178 for (name = output_find_log; *name != NULL; name++) {
181 amfree(output_find_log);