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 * Author: James da Silva, Systems Design and Analysis Group
24 * Computer Science Department
25 * University of Maryland at College Park
28 * $Id: amadmin.c,v 1.124 2006/07/26 15:17:37 martinea Exp $
30 * controlling process for the Amanda backup system
43 #include "timestamp.h"
47 int main(int argc, char **argv);
49 void force(int argc, char **argv);
50 void force_one(disk_t *dp);
51 void unforce(int argc, char **argv);
52 void unforce_one(disk_t *dp);
53 void force_bump(int argc, char **argv);
54 void force_bump_one(disk_t *dp);
55 void force_no_bump(int argc, char **argv);
56 void force_no_bump_one(disk_t *dp);
57 void unforce_bump(int argc, char **argv);
58 void unforce_bump_one(disk_t *dp);
59 void reuse(int argc, char **argv);
60 void noreuse(int argc, char **argv);
61 void info(int argc, char **argv);
62 void info_one(disk_t *dp);
63 void due(int argc, char **argv);
64 void due_one(disk_t *dp);
65 void find(int argc, char **argv);
66 void holding(int argc, char **argv);
67 void delete(int argc, char **argv);
68 void delete_one(disk_t *dp);
69 void balance(int argc, char **argv);
70 void tape(int argc, char **argv);
71 void bumpsize(int argc, char **argv);
72 void diskloop(int argc, char **argv, char *cmdname, void (*func)(disk_t *dp));
73 char *seqdatestr(int seq);
74 static int next_level0(disk_t *dp, info_t *info);
75 int bump_thresh(int level);
76 void export_db(int argc, char **argv);
77 void import_db(int argc, char **argv);
78 void disklist(int argc, char **argv);
79 void disklist_one(disk_t *dp);
80 void show_version(int argc, char **argv);
81 static void show_config(int argc, char **argv);
83 static char *conf_tapelist = NULL;
84 static char *displayunit;
85 static long int unitdivisor;
89 void (*fn)(int, char **);
92 { "version", show_version,
93 T_("\t\t\t\t\t# Show version info.") },
94 { "config", show_config,
95 T_("\t\t\t\t\t# Show configuration.") },
97 T_(" [<hostname> [<disks>]* ]+\t\t# Force level 0 at next run.") },
99 T_(" [<hostname> [<disks>]* ]+\t# Clear force command.") },
100 { "force-bump", force_bump,
101 T_(" [<hostname> [<disks>]* ]+\t# Force bump at next run.") },
102 { "force-no-bump", force_no_bump,
103 T_(" [<hostname> [<disks>]* ]+\t# Force no-bump at next run.") },
104 { "unforce-bump", unforce_bump,
105 T_(" [<hostname> [<disks>]* ]+\t# Clear bump command.") },
106 { "disklist", disklist,
107 T_(" [<hostname> [<disks>]* ]*\t# Debug disklist entries.") },
109 T_(" <tapelabel> ...\t\t # re-use this tape.") },
110 { "no-reuse", noreuse,
111 T_(" <tapelabel> ...\t # never re-use this tape.") },
113 T_(" [<hostname> [<disks>]* ]*\t # Show which tapes these dumps are on.") },
114 { "holding", holding,
115 T_(" {list [ -l ] |delete} [ <hostname> [ <disk> [ <datestamp> [ .. ] ] ] ]+\t # Show or delete holding disk contents.") },
117 T_(" [<hostname> [<disks>]* ]+ # Delete from database.") },
119 T_(" [<hostname> [<disks>]* ]*\t # Show current info records.") },
121 T_(" [<hostname> [<disks>]* ]*\t # Show due date.") },
122 { "balance", balance,
123 T_(" [-days <num>]\t\t # Show nightly dump size balance.") },
125 T_(" [-days <num>]\t\t # Show which tape is due next.") },
126 { "bumpsize", bumpsize,
127 T_("\t\t\t # Show current bump thresholds.") },
128 { "export", export_db,
129 T_(" [<hostname> [<disks>]* ]* # Export curinfo database to stdout.") },
130 { "import", import_db,
131 T_("\t\t\t\t # Import curinfo database from stdin.") },
133 #define NCMDS (int)(sizeof(cmdtab) / sizeof(cmdtab[0]))
143 config_overwrites_t *cfg_ovr = NULL;
146 * Configure program for internationalization:
147 * 1) Only set the message locale for now.
148 * 2) Set textdomain for all amanda related programs to "amanda"
149 * We don't want to be forced to support dozens of message catalogs.
151 setlocale(LC_MESSAGES, "C");
152 textdomain("amanda");
157 set_pname("amadmin");
159 /* Don't die when child closes pipe */
160 signal(SIGPIPE, SIG_IGN);
162 dbopen(DBG_SUBDIR_SERVER);
164 erroutput_type = ERR_INTERACTIVE;
166 cfg_ovr = extract_commandline_config_overwrites(&argc, &argv);
168 if(argc < 3) usage();
170 if(strcmp(argv[2],"version") == 0) {
171 show_version(argc, argv);
175 config_init(CONFIG_INIT_EXPLICIT_NAME | CONFIG_INIT_FATAL, argv[1]);
176 apply_config_overwrites(cfg_ovr);
178 dbrename(config_name, DBG_SUBDIR_SERVER);
180 check_running_as(RUNNING_AS_DUMPUSER);
182 conf_diskfile = config_dir_relative(getconf_str(CNF_DISKFILE));
183 if (read_diskfile(conf_diskfile, &diskq) < 0) {
184 error(_("could not load disklist \"%s\""), conf_diskfile);
187 amfree(conf_diskfile);
189 conf_tapelist = config_dir_relative(getconf_str(CNF_TAPELIST));
190 if(read_tapelist(conf_tapelist)) {
191 error(_("could not load tapelist \"%s\""), conf_tapelist);
194 /* conf_tapelist is not freed yet -- it may be used to write the
197 conf_infofile = config_dir_relative(getconf_str(CNF_INFOFILE));
198 if(open_infofile(conf_infofile)) {
199 error(_("could not open info db \"%s\""), conf_infofile);
202 amfree(conf_infofile);
204 displayunit = getconf_str(CNF_DISPLAYUNIT);
205 unitdivisor = getconf_unit_divisor();
207 for (i = 0; i < NCMDS; i++)
208 if (strcmp(argv[2], cmdtab[i].name) == 0) {
209 (*cmdtab[i].fn)(argc, argv);
213 g_fprintf(stderr, _("%s: unknown command \"%s\"\n"), argv[0], argv[2]);
219 amfree(conf_tapelist);
223 free_disklist(&diskq);
234 g_fprintf(stderr, _("\nUsage: %s%s <conf> <command> {<args>} [-o configoption]* ...\n"),
235 get_pname(), versionsuffix());
236 g_fprintf(stderr, _(" Valid <command>s are:\n"));
237 for (i = 0; i < NCMDS; i++)
238 g_fprintf(stderr, "\t%s%s\n", cmdtab[i].name, _(cmdtab[i].usage));
243 /* ----------------------------------------------- */
245 #define SECS_PER_DAY (24*60*60)
253 static char *dow[7] = {
262 time_t t = today + seq*SECS_PER_DAY;
268 g_snprintf(str, SIZEOF(str),
269 "%2d/%02d %3s", tm->tm_mon+1, tm->tm_mday, _(dow[tm->tm_wday]));
271 strcpy(str, _("BAD DATE"));
277 #define days_diff(a, b) (int)(((b) - (a) + SECS_PER_DAY) / SECS_PER_DAY)
279 /* when is next level 0 due? 0 = tonight, 1 = tommorrow, etc*/
285 if(dp->strategy == DS_NOFULL)
286 return 1; /* fake it */
287 if(info->inf[0].date < (time_t)0)
288 return 0; /* new disk */
290 return dp->dumpcycle - days_diff(info->inf[0].date, today);
293 /* ----------------------------------------------- */
300 void (*func)(disk_t *dp))
307 g_fprintf(stderr,_("%s: expecting \"%s [<hostname> [<disks>]* ]+\"\n"),
308 get_pname(), cmdname);
312 errstr = match_disklist(&diskq, argc-3, argv+3);
314 g_printf("%s", errstr);
318 for(dp = diskq.head; dp != NULL; dp = dp->next) {
325 g_fprintf(stderr,_("%s: no disk matched\n"),get_pname());
329 /* ----------------------------------------------- */
336 char *hostname = dp->host->hostname;
337 char *diskname = dp->name;
340 get_info(hostname, diskname, &info);
341 SET(info.command, FORCE_FULL);
342 if (ISSET(info.command, FORCE_BUMP)) {
343 CLR(info.command, FORCE_BUMP);
344 g_printf(_("%s: WARNING: %s:%s FORCE_BUMP command was cleared.\n"),
345 get_pname(), hostname, diskname);
347 if(put_info(hostname, diskname, &info) == 0) {
348 g_printf(_("%s: %s:%s is set to a forced level 0 at next run.\n"),
349 get_pname(), hostname, diskname);
351 g_fprintf(stderr, _("%s: %s:%s could not be forced.\n"),
352 get_pname(), hostname, diskname);
362 diskloop(argc, argv, "force", force_one);
366 /* ----------------------------------------------- */
373 char *hostname = dp->host->hostname;
374 char *diskname = dp->name;
377 get_info(hostname, diskname, &info);
378 if (ISSET(info.command, FORCE_FULL)) {
379 CLR(info.command, FORCE_FULL);
380 if(put_info(hostname, diskname, &info) == 0){
381 g_printf(_("%s: force command for %s:%s cleared.\n"),
382 get_pname(), hostname, diskname);
385 _("%s: force command for %s:%s could not be cleared.\n"),
386 get_pname(), hostname, diskname);
390 g_printf(_("%s: no force command outstanding for %s:%s, unchanged.\n"),
391 get_pname(), hostname, diskname);
400 diskloop(argc, argv, "unforce", unforce_one);
404 /* ----------------------------------------------- */
411 char *hostname = dp->host->hostname;
412 char *diskname = dp->name;
415 get_info(hostname, diskname, &info);
416 SET(info.command, FORCE_BUMP);
417 if (ISSET(info.command, FORCE_NO_BUMP)) {
418 CLR(info.command, FORCE_NO_BUMP);
419 g_printf(_("%s: WARNING: %s:%s FORCE_NO_BUMP command was cleared.\n"),
420 get_pname(), hostname, diskname);
422 if (ISSET(info.command, FORCE_FULL)) {
423 CLR(info.command, FORCE_FULL);
424 g_printf(_("%s: WARNING: %s:%s FORCE_FULL command was cleared.\n"),
425 get_pname(), hostname, diskname);
427 if(put_info(hostname, diskname, &info) == 0) {
428 g_printf(_("%s: %s:%s is set to bump at next run.\n"),
429 get_pname(), hostname, diskname);
431 g_fprintf(stderr, _("%s: %s:%s could not be forced to bump.\n"),
432 get_pname(), hostname, diskname);
442 diskloop(argc, argv, "force-bump", force_bump_one);
446 /* ----------------------------------------------- */
453 char *hostname = dp->host->hostname;
454 char *diskname = dp->name;
457 get_info(hostname, diskname, &info);
458 SET(info.command, FORCE_NO_BUMP);
459 if (ISSET(info.command, FORCE_BUMP)) {
460 CLR(info.command, FORCE_BUMP);
461 g_printf(_("%s: WARNING: %s:%s FORCE_BUMP command was cleared.\n"),
462 get_pname(), hostname, diskname);
464 if(put_info(hostname, diskname, &info) == 0) {
465 g_printf(_("%s: %s:%s is set to not bump at next run.\n"),
466 get_pname(), hostname, diskname);
468 g_fprintf(stderr, _("%s: %s:%s could not be force to not bump.\n"),
469 get_pname(), hostname, diskname);
479 diskloop(argc, argv, "force-no-bump", force_no_bump_one);
483 /* ----------------------------------------------- */
490 char *hostname = dp->host->hostname;
491 char *diskname = dp->name;
494 get_info(hostname, diskname, &info);
495 if (ISSET(info.command, FORCE_BUMP|FORCE_NO_BUMP)) {
496 CLR(info.command, FORCE_BUMP|FORCE_NO_BUMP);
497 if(put_info(hostname, diskname, &info) == 0) {
498 g_printf(_("%s: bump command for %s:%s cleared.\n"),
499 get_pname(), hostname, diskname);
501 g_fprintf(stderr, _("%s: %s:%s bump command could not be cleared.\n"),
502 get_pname(), hostname, diskname);
506 g_printf(_("%s: no bump command outstanding for %s:%s, unchanged.\n"),
507 get_pname(), hostname, diskname);
517 diskloop(argc, argv, "unforce-bump", unforce_bump_one);
521 /* ----------------------------------------------- */
532 g_fprintf(stderr,_("%s: expecting \"reuse <tapelabel> ...\"\n"),
537 for(count=3; count< argc; count++) {
538 tp = lookup_tapelabel(argv[count]);
540 g_fprintf(stderr, _("reuse: tape label %s not found in tapelist.\n"),
544 if( tp->reuse == 0 ) {
546 g_printf(_("%s: marking tape %s as reusable.\n"),
547 get_pname(), argv[count]);
549 g_fprintf(stderr, _("%s: tape %s already reusable.\n"),
550 get_pname(), argv[count]);
554 if(write_tapelist(conf_tapelist)) {
555 error(_("could not write tapelist \"%s\""), conf_tapelist);
569 g_fprintf(stderr,_("%s: expecting \"no-reuse <tapelabel> ...\"\n"),
574 for(count=3; count< argc; count++) {
575 tp = lookup_tapelabel(argv[count]);
577 g_fprintf(stderr, _("no-reuse: tape label %s not found in tapelist.\n"),
581 if( tp->reuse == 1 ) {
583 g_printf(_("%s: marking tape %s as not reusable.\n"),
584 get_pname(), argv[count]);
586 g_fprintf(stderr, _("%s: tape %s already not reusable.\n"),
587 get_pname(), argv[count]);
591 if(write_tapelist(conf_tapelist)) {
592 error(_("could not write tapelist \"%s\""), conf_tapelist);
598 /* ----------------------------------------------- */
606 char *hostname = dp->host->hostname;
607 char *diskname = dp->name;
610 if(get_info(hostname, diskname, &info)) {
611 g_printf(_("%s: %s:%s NOT currently in database.\n"),
612 get_pname(), hostname, diskname);
617 if(del_info(hostname, diskname)) {
618 error(_("couldn't delete %s:%s from database: %s"),
619 hostname, diskname, strerror(errno));
622 g_printf(_("%s: %s:%s deleted from curinfo database.\n"),
623 get_pname(), hostname, diskname);
633 diskloop(argc, argv, "delete", delete_one);
637 _("%s: NOTE: you'll have to remove these from the disklist yourself.\n"),
641 /* ----------------------------------------------- */
652 get_info(dp->host->hostname, dp->name, &info);
654 g_printf(_("\nCurrent info for %s %s:\n"), dp->host->hostname, dp->name);
655 if (ISSET(info.command, FORCE_FULL))
656 g_printf(_(" (Forcing to level 0 dump at next run)\n"));
657 if (ISSET(info.command, FORCE_BUMP))
658 g_printf(_(" (Forcing bump at next run)\n"));
659 if (ISSET(info.command, FORCE_NO_BUMP))
660 g_printf(_(" (Forcing no-bump at next run)\n"));
661 g_printf(_(" Stats: dump rates (kps), Full: %5.1lf, %5.1lf, %5.1lf\n"),
662 info.full.rate[0], info.full.rate[1], info.full.rate[2]);
663 g_printf(_(" Incremental: %5.1lf, %5.1lf, %5.1lf\n"),
664 info.incr.rate[0], info.incr.rate[1], info.incr.rate[2]);
665 g_printf(_(" compressed size, Full: %5.1lf%%,%5.1lf%%,%5.1lf%%\n"),
666 info.full.comp[0]*100, info.full.comp[1]*100, info.full.comp[2]*100);
667 g_printf(_(" Incremental: %5.1lf%%,%5.1lf%%,%5.1lf%%\n"),
668 info.incr.comp[0]*100, info.incr.comp[1]*100, info.incr.comp[2]*100);
670 g_printf(_(" Dumps: lev datestmp tape file origK compK secs\n"));
671 for(lev = 0, sp = &info.inf[0]; lev < 9; lev++, sp++) {
672 if(sp->date < (time_t)0 && sp->label[0] == '\0') continue;
673 tm = localtime(&sp->date);
675 g_printf(_(" %d %04d%02d%02d %-15s %lld %lld %lld %jd\n"),
676 lev, tm->tm_year+1900, tm->tm_mon+1, tm->tm_mday,
678 (long long)sp->filenum,
680 (long long)sp->csize,
683 g_printf(_(" %d BAD-DATE %-15s %lld %lld %lld %jd\n"),
686 (long long)sp->filenum,
688 (long long)sp->csize,
703 diskloop(argc, argv, "info", info_one);
705 for(dp = diskq.head; dp != NULL; dp = dp->next)
709 /* ----------------------------------------------- */
720 if(get_info(hp->hostname, dp->name, &info)) {
721 g_printf(_("new disk %s:%s ignored.\n"), hp->hostname, dp->name);
724 days = next_level0(dp, &info);
726 g_printf(_("Overdue %2d day%s %s:%s\n"),
727 -days, (-days == 1) ? ": " : "s:",
728 hp->hostname, dp->name);
731 g_printf(_("Due today: %s:%s\n"), hp->hostname, dp->name);
734 g_printf(_("Due in %2d day%s %s:%s\n"), days,
735 (days == 1) ? ": " : "s:",
736 hp->hostname, dp->name);
750 diskloop(argc, argv, "due", due_one);
752 for(dp = diskq.head; dp != NULL; dp = dp->next)
756 /* ----------------------------------------------- */
767 if(argc > 4 && strcmp(argv[3],"--days") == 0) {
768 nb_days = atoi(argv[4]);
770 g_printf(_("days must be an integer bigger than 0\n"));
777 runtapes = getconf_int(CNF_RUNTAPES);
778 tp = lookup_last_reusable_tape(0);
780 for ( j=0 ; j < nb_days ; j++ ) {
781 for ( i=0 ; i < runtapes ; i++ ) {
783 g_printf(_("The next Amanda run should go onto "));
787 g_printf(_("tape %s or a new tape.\n"), tp->label);
789 if (runtapes - i == 1)
790 g_printf(_("1 new tape.\n"));
792 g_printf(_("%d new tapes.\n"), runtapes - i);
796 tp = lookup_last_reusable_tape(i + 1);
799 lasttp = lookup_tapepos(lookup_nb_tape());
801 if(lasttp && i > 0 && strcmp(lasttp->datestamp,"0") == 0) {
803 while(lasttp && i > 0 && strcmp(lasttp->datestamp,"0") == 0) {
805 lasttp = lasttp->prev;
808 lasttp = lookup_tapepos(lookup_nb_tape());
811 g_printf(_("The next new tape already labelled is: %s.\n"),
815 g_printf(_("The next %d new tapes already labelled are: %s"), c,
817 lasttp = lasttp->prev;
819 while(lasttp && c > 0 && strcmp(lasttp->datestamp,"0") == 0) {
820 g_printf(", %s", lasttp->label);
821 lasttp = lasttp->prev;
829 /* ----------------------------------------------- */
837 struct balance_stats {
839 off_t origsize, outsize;
841 int conf_runspercycle, conf_dumpcycle;
842 int seq, runs_per_cycle, overdue, max_overdue;
843 int later, total, balance, distinct;
844 double fseq, disk_dumpcycle;
846 off_t total_balanced, balanced;
850 conf_dumpcycle = getconf_int(CNF_DUMPCYCLE);
851 conf_runspercycle = getconf_int(CNF_RUNSPERCYCLE);
852 later = conf_dumpcycle;
856 if(argc > 4 && strcmp(argv[3],"--days") == 0) {
857 later = atoi(argv[4]);
858 if(later < 0) later = conf_dumpcycle;
860 if(later > 10000) later = 10000;
862 if(conf_runspercycle == 0) {
863 runs_per_cycle = conf_dumpcycle;
864 } else if(conf_runspercycle == -1 ) {
865 runs_per_cycle = guess_runs_from_tapelist();
867 runs_per_cycle = conf_runspercycle;
869 if (runs_per_cycle <= 0) {
875 distinct = later + 3;
877 sp = (struct balance_stats *)
878 alloc(SIZEOF(struct balance_stats) * (distinct+1));
880 for(seq=0; seq <= distinct; seq++) {
882 sp[seq].origsize = sp[seq].outsize = (off_t)0;
885 for(dp = diskq.head; dp != NULL; dp = dp->next) {
886 if(get_info(dp->host->hostname, dp->name, &info)) {
887 g_printf(_("new disk %s:%s ignored.\n"), dp->host->hostname, dp->name);
890 if (dp->strategy == DS_NOFULL) {
893 sp[distinct].disks++;
894 sp[distinct].origsize += info.inf[0].size/(off_t)unitdivisor;
895 sp[distinct].outsize += info.inf[0].csize/(off_t)unitdivisor;
898 if(dp->dumpcycle == 0) {
899 sp[balance].origsize += (info.inf[0].size/(off_t)unitdivisor) * (off_t)runs_per_cycle;
900 sp[balance].outsize += (info.inf[0].csize/(off_t)unitdivisor) * (off_t)runs_per_cycle;
903 sp[balance].origsize += (info.inf[0].size/(off_t)unitdivisor) *
904 (off_t)(conf_dumpcycle / dp->dumpcycle);
905 sp[balance].outsize += (info.inf[0].csize/(off_t)unitdivisor) *
906 (off_t)(conf_dumpcycle / dp->dumpcycle);
909 disk_dumpcycle = (double)dp->dumpcycle;
910 if(dp->dumpcycle <= 0)
911 disk_dumpcycle = ((double)conf_dumpcycle) / ((double)runs_per_cycle);
913 seq = next_level0(dp, &info);
918 if (-seq > max_overdue)
928 sp[seq].origsize += info.inf[0].size/(off_t)unitdivisor;
929 sp[seq].outsize += info.inf[0].csize/(off_t)unitdivisor;
933 sp[total].origsize += info.inf[0].size/(off_t)unitdivisor;
934 sp[total].outsize += info.inf[0].csize/(off_t)unitdivisor;
937 /* See, if there's another run in this dumpcycle */
938 fseq += disk_dumpcycle;
940 } while (seq < later);
943 if(sp[total].outsize == (off_t)0 && sp[later].outsize == (off_t)0) {
944 g_printf(_("\nNo data to report on yet.\n"));
949 balanced = sp[balance].outsize / (off_t)runs_per_cycle;
950 if(conf_dumpcycle == later) {
951 total_balanced = sp[total].outsize / (off_t)runs_per_cycle;
954 total_balanced = (((sp[total].outsize/(off_t)1024) * (off_t)conf_dumpcycle)
955 / (off_t)(runs_per_cycle * later)) * (off_t)1024;
959 g_printf(_("\n due-date #fs orig %cB out %cB balance\n"),
960 displayunit[0], displayunit[0]);
961 g_printf("----------------------------------------------\n");
962 for(seq = 0; seq < later; seq++) {
963 if(sp[seq].disks == 0 &&
964 ((seq > 0 && sp[seq-1].disks == 0) ||
965 ((seq < later-1) && sp[seq+1].disks == 0))) {
973 g_printf(_("%-9.9s %3d %10lld %10lld "),
974 seqdatestr(seq), sp[seq].disks,
975 (long long)sp[seq].origsize,
976 (long long)sp[seq].outsize);
977 if(!sp[seq].outsize) g_printf(" --- \n");
978 else g_printf(_("%+8.1lf%%\n"),
979 (((double)sp[seq].outsize - (double)balanced) * 100.0 /
984 if(sp[later].disks != 0) {
985 g_printf(_("later %3d %10lld %10lld "),
987 (long long)sp[later].origsize,
988 (long long)sp[later].outsize);
989 if(!sp[later].outsize) g_printf(" --- \n");
990 else g_printf(_("%+8.1lf%%\n"),
991 (((double)sp[later].outsize - (double)balanced) * 100.0 /
994 g_printf("----------------------------------------------\n");
995 g_printf(_("TOTAL %3d %10lld %10lld %9lld\n"),
997 (long long)sp[total].origsize,
998 (long long)sp[total].outsize,
999 (long long)total_balanced);
1000 if (sp[balance].origsize != sp[total].origsize ||
1001 sp[balance].outsize != sp[total].outsize ||
1002 balanced != total_balanced) {
1003 g_printf(_("BALANCED %10lld %10lld %9lld\n"),
1004 (long long)sp[balance].origsize,
1005 (long long)sp[balance].outsize,
1006 (long long)balanced);
1008 if (sp[distinct].disks != sp[total].disks) {
1009 g_printf(_("DISTINCT %3d %10lld %10lld\n"),
1011 (long long)sp[distinct].origsize,
1012 (long long)sp[distinct].outsize);
1014 g_printf(plural(_(" (estimated %d run per dumpcycle)\n"),
1015 _(" (estimated %d runs per dumpcycle)\n"),
1019 g_printf(plural(_(" (%d filesystem overdue."),
1020 _(" (%d filesystems overdue."), overdue),
1022 g_printf(plural(_(" The most being overdue %d day.)\n"),
1023 _(" The most being overdue %d days.)\n"), max_overdue),
1030 /* ----------------------------------------------- */
1038 char *sort_order = NULL;
1039 find_result_t *output_find;
1044 _("%s: expecting \"find [--sort <hkdlpbf>] [hostname [<disk>]]*\"\n"),
1050 sort_order = newstralloc(sort_order, DEFAULT_SORT_ORDER);
1051 if(argc > 4 && strcmp(argv[3],"--sort") == 0) {
1052 size_t i, valid_sort=1;
1054 for(i = strlen(argv[4]); i > 0; i--) {
1055 switch (argv[4][i - 1]) {
1071 default: valid_sort=0;
1075 sort_order = newstralloc(sort_order, argv[4]);
1077 g_printf(_("Invalid sort order: %s\n"), argv[4]);
1078 g_printf(_("Use default sort order: %s\n"), sort_order);
1084 errstr = match_disklist(&diskq, argc-(start_argc-1), argv+(start_argc-1));
1086 g_printf("%s", errstr);
1090 output_find = find_dump(&diskq);
1091 if(argc-(start_argc-1) > 0) {
1092 free_find_result(&output_find);
1093 errstr = match_disklist(&diskq, argc-(start_argc-1),
1094 argv+(start_argc-1));
1096 g_printf("%s", errstr);
1099 output_find = find_dump(NULL);
1102 sort_find_result(sort_order, &output_find);
1103 print_find_result(output_find);
1104 free_find_result(&output_find);
1110 /* ------------------------ */
1118 GSList * file_list = NULL;
1122 flags = CMDLINE_PARSE_DATESTAMP;
1123 if (allow_empty) flags |= CMDLINE_EMPTY_TO_WILDCARD;
1124 dumplist = cmdline_parse_dumpspecs(argc, argv, flags);
1126 file_list = cmdline_match_holding(dumplist);
1127 dumpspec_list_free(dumplist);
1132 /* Given a file header, find the history element in curinfo most likely
1133 * corresponding to that dump (this is not an exact science).
1135 * @param info: the info_t element for this DLE
1136 * @param file: the header of the file
1137 * @returns: index of the matching history element, or -1 if not found
1140 holding_file_find_history(
1144 int matching_hist_idx = -1;
1148 /* Begin by trying to find the history element matching this dump.
1149 * The datestamp on the dump is for the entire run of amdump, while the
1150 * 'date' in the history element of 'info' is the time the dump itself
1151 * began. A matching history element, then, is the earliest element
1152 * with a 'date' equal to or later than the date of the dumpfile.
1154 * We compare using formatted datestamps; even using seconds since epoch,
1155 * we would still face timezone issues, and have to do a reverse (timezone
1156 * to gmt) translation.
1159 /* get to the end of the history list and search backward */
1160 for (nhist = 0; info->history[nhist].level > -1; nhist++) /* empty loop */;
1161 for (i = nhist-1; i > -1; i--) {
1162 char *info_datestamp = get_timestamp_from_time(info->history[i].date);
1163 int order = strcmp(file->datestamp, info_datestamp);
1164 amfree(info_datestamp);
1167 /* only a match if the levels are equal */
1168 if (info->history[i].level == file->dumplevel) {
1169 matching_hist_idx = i;
1175 return matching_hist_idx;
1178 /* A holding file is 'outdated' if a subsequent dump of the same DLE was made
1179 * at the same level or a lower leve; for example, a level 2 dump is outdated if
1180 * there is a subsequent level 2, or a subsequent level 0.
1182 * @param file: the header of the file
1183 * @returns: true if the file is outdated
1186 holding_file_is_outdated(
1190 int matching_hist_idx;
1192 if (get_info(file->name, file->disk, &info) == -1) {
1193 return 0; /* assume it's not outdated */
1196 /* if the last level is less than the level of this dump, then
1198 if (info.last_level < file->dumplevel)
1201 /* otherwise, we need to see if this dump is the last at its level */
1202 matching_hist_idx = holding_file_find_history(&info, file);
1203 if (matching_hist_idx == -1) {
1204 return 0; /* assume it's not outdated */
1207 /* compare the date of the history element with the most recent date
1208 * for this level. If they match, then this is the last dump at this
1209 * level, and we checked above for more recent lower-level dumps, so
1210 * the dump is not outdated. */
1211 if (info.history[matching_hist_idx].date ==
1212 info.inf[info.history[matching_hist_idx].level].date) {
1220 remove_holding_file_from_catalog(
1223 static int warnings_printed; /* only print once per invocation */
1226 int matching_hist_idx = -1;
1227 history_t matching_hist; /* will be a copy */
1230 if (!holding_file_get_dumpfile(filename, &file)) {
1231 g_printf(_("Could not read holding file %s\n"), filename);
1235 if (get_info(file.name, file.disk, &info) == -1) {
1236 g_printf(_("WARNING: No curinfo record for %s:%s\n"), file.name, file.disk);
1237 return 1; /* not an error */
1240 matching_hist_idx = holding_file_find_history(&info, &file);
1242 if (matching_hist_idx == -1) {
1243 g_printf(_("WARNING: No dump matching %s found in curinfo.\n"), filename);
1244 return 1; /* not an error */
1248 matching_hist = info.history[matching_hist_idx];
1250 /* Remove the history element itself before doing the stats */
1251 for (i = matching_hist_idx; i <= NB_HISTORY; i++) {
1252 info.history[i] = info.history[i+1];
1254 info.history[NB_HISTORY].level = -1;
1256 /* Remove stats for that history element, if necessary. Doing so
1257 * will result in an inconsistent set of backups, so we warn the
1258 * user and adjust last_level to make the next dump get us a
1259 * consistent picture. */
1260 if (matching_hist.date == info.inf[matching_hist.level].date) {
1261 /* search for an earlier dump at this level */
1262 for (i = matching_hist_idx; info.history[i].level > -1; i++) {
1263 if (info.history[i].level == matching_hist.level)
1267 if (info.history[i].level < 0) {
1268 /* not found => zero it out */
1269 info.inf[matching_hist.level].date = (time_t)-1; /* flag as not set */
1270 info.inf[matching_hist.level].label[0] = '\0';
1272 /* found => reconstruct stats as best we can */
1273 info.inf[matching_hist.level].size = info.history[i].size;
1274 info.inf[matching_hist.level].csize = info.history[i].csize;
1275 info.inf[matching_hist.level].secs = info.history[i].secs;
1276 info.inf[matching_hist.level].date = info.history[i].date;
1277 info.inf[matching_hist.level].filenum = 0; /* we don't know */
1278 info.inf[matching_hist.level].label[0] = '\0'; /* we don't know */
1281 /* set last_level to the level we just deleted, and set command
1282 * appropriately to make sure planner does a new dump at this level
1284 info.last_level = matching_hist.level;
1285 if (info.last_level == 0) {
1286 g_printf(_("WARNING: Deleting the most recent full dump; forcing a full dump at next run.\n"));
1287 SET(info.command, FORCE_FULL);
1289 g_printf(_("WARNING: Deleting the most recent level %d dump; forcing a level %d dump or \nWARNING: lower at next run.\n"),
1290 info.last_level, info.last_level);
1291 SET(info.command, FORCE_NO_BUMP);
1294 /* Search for and display any subsequent runs that depended on this one */
1295 warnings_printed = 0;
1296 for (i = matching_hist_idx-1; i >= 0; i--) {
1298 if (info.history[i].level <= matching_hist.level) break;
1300 datestamp = get_timestamp_from_time(info.history[i].date);
1301 g_printf(_("WARNING: Level %d dump made %s can no longer be accurately restored.\n"),
1302 info.history[i].level, datestamp);
1305 warnings_printed = 1;
1307 if (warnings_printed)
1308 g_printf(_("WARNING: (note, dates shown above are for dumps, and may be later than the\nWARNING: corresponding run date)\n"));
1311 /* recalculate consecutive_runs based on the history: find the first run
1312 * at this level, and then count the consecutive runs at that level. This
1313 * number may be zero (if we just deleted the last run at this level) */
1314 info.consecutive_runs = 0;
1315 for (i = 0; info.history[i].level >= 0; i++) {
1316 if (info.history[i].level == info.last_level) break;
1318 while (info.history[i+info.consecutive_runs].level == info.last_level)
1319 info.consecutive_runs++;
1321 /* this function doesn't touch the performance stats */
1323 /* write out the changes */
1324 if (put_info(file.name, file.disk, &info) == -1) {
1325 g_printf(_("Could not write curinfo record for %s:%s\n"), file.name, file.disk);
1339 enum { HOLDING_USAGE, HOLDING_LIST, HOLDING_DELETE } action = HOLDING_USAGE;
1341 int outdated_list = 0;
1345 action = HOLDING_USAGE;
1346 else if (strcmp(argv[3], "list") == 0 && argc >= 4)
1347 action = HOLDING_LIST;
1348 else if (strcmp(argv[3], "delete") == 0 && argc > 4)
1349 action = HOLDING_DELETE;
1354 _("%s: expecting \"holding list [-l] [-d]\" or \"holding delete <host> [ .. ]\"\n"),
1360 argc -= 4; argv += 4;
1361 while (argc && argv[0][0] == '-') {
1362 switch (argv[0][1]) {
1366 case 'd': /* have to use '-d', and not '-o', because of parse_config */
1370 g_fprintf(stderr, _("Unknown option -%c\n"), argv[0][1]);
1379 g_printf("%-10s %-2s %-4s %s\n",
1380 _("size (kB)"), _("lv"), _("outd"), _("dump specification"));
1383 file_list = get_file_list(argc, argv, 1);
1384 for (li = file_list; li != NULL; li = li->next) {
1388 if (!holding_file_get_dumpfile((char *)li->data, &file)) {
1389 g_fprintf(stderr, _("Error reading %s\n"), (char *)li->data);
1393 is_outdated = holding_file_is_outdated(&file);
1395 dumpstr = cmdline_format_dumpspec_components(file.name, file.disk, file.datestamp, NULL);
1396 /* only print this entry if we're printing everything, or if it's outdated and
1397 * we're only printing outdated files (-o) */
1398 if (!outdated_list || is_outdated) {
1400 g_printf("%-10lld %-2d %-4s %s\n",
1401 (long long)holding_file_size((char *)li->data, 0),
1403 is_outdated? " *":"",
1406 g_printf("%s\n", dumpstr);
1411 g_slist_free_full(file_list);
1414 case HOLDING_DELETE:
1415 argc -= 4; argv += 4;
1417 file_list = get_file_list(argc, argv, 0);
1418 for (li = file_list; li != NULL; li = li->next) {
1419 g_fprintf(stderr, _("Deleting '%s'\n"), (char *)li->data);
1420 /* remove it from the catalog */
1421 if (!remove_holding_file_from_catalog((char *)li->data))
1425 if (!holding_file_unlink((char *)li->data)) {
1426 error(_("Could not delete '%s'"), (char *)li->data);
1429 g_slist_free_full(file_list);
1435 /* ------------------------ */
1438 /* shared code with planner.c */
1444 int bump = getconf_int(CNF_BUMPSIZE);
1445 double mult = getconf_real(CNF_BUMPMULT);
1448 bump = (int)((double)bump * mult);
1458 int conf_bumppercent = getconf_int(CNF_BUMPPERCENT);
1459 double conf_bumpmult = getconf_real(CNF_BUMPMULT);
1461 (void)argc; /* Quiet unused parameter warning */
1462 (void)argv; /* Quiet unused parameter warning */
1464 g_printf(_("Current bump parameters:\n"));
1465 if(conf_bumppercent == 0) {
1466 g_printf(_(" bumpsize %5d KB\t- minimum savings (threshold) to bump level 1 -> 2\n"),
1467 getconf_int(CNF_BUMPSIZE));
1468 g_printf(_(" bumpdays %5d\t- minimum days at each level\n"),
1469 getconf_int(CNF_BUMPDAYS));
1470 g_printf(_(" bumpmult %5.5lg\t- threshold = bumpsize * bumpmult**(level-1)\n\n"),
1473 g_printf(_(" Bump -> To Threshold\n"));
1474 for(l = 1; l < 9; l++)
1475 g_printf(_("\t%d -> %d %9d KB\n"), l, l+1, bump_thresh(l));
1479 double bumppercent = (double)conf_bumppercent;
1481 g_printf(_(" bumppercent %3d %%\t- minimum savings (threshold) to bump level 1 -> 2\n"),
1483 g_printf(_(" bumpdays %5d\t- minimum days at each level\n"),
1484 getconf_int(CNF_BUMPDAYS));
1485 g_printf(_(" bumpmult %5.5lg\t- threshold = disk_size * bumppercent * bumpmult**(level-1)\n\n"),
1487 g_printf(_(" Bump -> To Threshold\n"));
1488 for(l = 1; l < 9; l++) {
1489 g_printf(_("\t%d -> %d %7.2lf %%\n"), l, l+1, bumppercent);
1490 bumppercent *= conf_bumpmult;
1491 if(bumppercent >= 100.000) { bumppercent = 100.0;}
1497 /* ----------------------------------------------- */
1499 void export_one(disk_t *dp);
1508 char hostname[MAX_HOSTNAME_LENGTH+1];
1511 g_printf(_("CURINFO Version %s CONF %s\n"), version(), getconf_str(CNF_ORG));
1514 if(gethostname(hostname, SIZEOF(hostname)-1) == -1) {
1515 error(_("could not determine host name: %s\n"), strerror(errno));
1518 hostname[SIZEOF(hostname)-1] = '\0';
1519 g_printf(_("# Generated by:\n# host: %s\n# date: %s"),
1520 hostname, ctime(&curtime));
1522 g_printf(_("# command:"));
1523 for(i = 0; i < argc; i++)
1524 g_printf(_(" %s"), argv[i]);
1526 g_printf(_("\n# This file can be merged back in with \"amadmin import\".\n"));
1527 g_printf(_("# Edit only with care.\n"));
1530 diskloop(argc, argv, "export", export_one);
1531 else for(dp = diskq.head; dp != NULL; dp = dp->next)
1542 if(get_info(dp->host->hostname, dp->name, &info)) {
1543 g_fprintf(stderr, _("Warning: no curinfo record for %s:%s\n"),
1544 dp->host->hostname, dp->name);
1547 g_printf(_("host: %s\ndisk: %s\n"), dp->host->hostname, dp->name);
1548 g_printf(_("command: %u\n"), info.command);
1549 g_printf(_("last_level: %d\n"),info.last_level);
1550 g_printf(_("consecutive_runs: %d\n"),info.consecutive_runs);
1551 g_printf(_("full-rate:"));
1552 for(i=0;i<AVG_COUNT;i++) g_printf(_(" %lf"), info.full.rate[i]);
1553 g_printf(_("\nfull-comp:"));
1554 for(i=0;i<AVG_COUNT;i++) g_printf(_(" %lf"), info.full.comp[i]);
1556 g_printf(_("\nincr-rate:"));
1557 for(i=0;i<AVG_COUNT;i++) g_printf(_(" %lf"), info.incr.rate[i]);
1558 g_printf(_("\nincr-comp:"));
1559 for(i=0;i<AVG_COUNT;i++) g_printf(_(" %lf"), info.incr.comp[i]);
1561 for(l=0;l<DUMP_LEVELS;l++) {
1562 if(info.inf[l].date < (time_t)0 && info.inf[l].label[0] == '\0') continue;
1563 g_printf(_("stats: %d %lld %lld %jd %jd %lld %s\n"), l,
1564 (long long)info.inf[l].size,
1565 (long long)info.inf[l].csize,
1566 (intmax_t)info.inf[l].secs,
1567 (intmax_t)info.inf[l].date,
1568 (long long)info.inf[l].filenum,
1571 for(l=0;info.history[l].level > -1;l++) {
1572 g_printf(_("history: %d %lld %lld %jd\n"),
1573 info.history[l].level,
1574 (long long)info.history[l].size,
1575 (long long)info.history[l].csize,
1576 (intmax_t)info.history[l].date);
1581 /* ----------------------------------------------- */
1583 int import_one(void);
1584 char *impget_line(void);
1602 (void)argc; /* Quiet unused parameter warning */
1603 (void)argv; /* Quiet unused parameter warning */
1605 /* process header line */
1607 if((line = agets(stdin)) == NULL) {
1608 g_fprintf(stderr, _("%s: empty input.\n"), get_pname());
1616 if(strncmp_const_skip(s - 1, "CURINFO Version", s, ch) != 0) {
1620 skip_whitespace(s, ch);
1622 || sscanf(s - 1, "%d.%d.%d", &vers_maj, &vers_min, &vers_patch) != 3) {
1626 skip_integer(s, ch); /* skip over major */
1631 skip_integer(s, ch); /* skip over minor */
1636 skip_integer(s, ch); /* skip over patch */
1642 skip_non_whitespace(s, ch);
1646 skip_whitespace(s, ch); /* find the org keyword */
1647 if(ch == '\0' || strncmp_const_skip(s - 1, "CONF", s, ch) != 0) {
1653 skip_whitespace(s, ch); /* find the org string */
1660 newer = (vers_maj != VERSION_MAJOR)? vers_maj > VERSION_MAJOR :
1661 (vers_min != VERSION_MINOR)? vers_min > VERSION_MINOR :
1662 vers_patch > VERSION_PATCH;
1665 _("%s: WARNING: input is from newer Amanda version: %d.%d.%d.\n"),
1666 get_pname(), vers_maj, vers_min, vers_patch);
1669 if(strcmp(org, getconf_str(CNF_ORG)) != 0) {
1670 g_fprintf(stderr, _("%s: WARNING: input is from different org: %s\n"),
1683 /*@i@*/ amfree(line);
1684 g_fprintf(stderr, _("%s: bad CURINFO header line in input: %s.\n"),
1686 g_fprintf(stderr, _(" Was the input in \"amadmin export\" format?\n"));
1701 char *hostname = NULL;
1702 char *diskname = NULL;
1703 long long off_t_tmp;
1704 long long time_t_tmp;
1706 memset(&info, 0, SIZEOF(info_t));
1708 for(level = 0; level < DUMP_LEVELS; level++) {
1709 info.inf[level].date = (time_t)-1;
1712 /* get host: disk: command: lines */
1714 hostname = diskname = NULL;
1716 if((line = impget_line()) == NULL) return 0; /* nothing there */
1720 skip_whitespace(s, ch);
1721 if(ch == '\0' || strncmp_const_skip(s - 1, "host:", s, ch) != 0) goto parse_err;
1722 skip_whitespace(s, ch);
1723 if(ch == '\0') goto parse_err;
1725 skip_non_whitespace(s, ch);
1727 hostname = stralloc(fp);
1730 skip_whitespace(s, ch);
1733 if((line = impget_line()) == NULL) goto shortfile_err;
1736 skip_whitespace(s, ch);
1738 if(strncmp_const_skip(s - 1, "disk:", s, ch) != 0) goto parse_err;
1739 skip_whitespace(s, ch);
1740 if(ch == '\0') goto parse_err;
1742 skip_non_whitespace(s, ch);
1744 diskname = stralloc(fp);
1748 if((line = impget_line()) == NULL) goto shortfile_err;
1749 if(sscanf(line, "command: %u", &info.command) != 1) goto parse_err;
1751 /* get last_level and consecutive_runs */
1754 if((line = impget_line()) == NULL) goto shortfile_err;
1755 rc = sscanf(line, "last_level: %d", &info.last_level);
1758 if((line = impget_line()) == NULL) goto shortfile_err;
1759 if(sscanf(line, "consecutive_runs: %d", &info.consecutive_runs) != 1) goto parse_err;
1761 if((line = impget_line()) == NULL) goto shortfile_err;
1764 /* get rate: and comp: lines for full dumps */
1766 rc = sscanf(line, "full-rate: %lf %lf %lf",
1767 &info.full.rate[0], &info.full.rate[1], &info.full.rate[2]);
1768 if(rc != 3) goto parse_err;
1771 if((line = impget_line()) == NULL) goto shortfile_err;
1772 rc = sscanf(line, "full-comp: %lf %lf %lf",
1773 &info.full.comp[0], &info.full.comp[1], &info.full.comp[2]);
1774 if(rc != 3) goto parse_err;
1776 /* get rate: and comp: lines for incr dumps */
1779 if((line = impget_line()) == NULL) goto shortfile_err;
1780 rc = sscanf(line, "incr-rate: %lf %lf %lf",
1781 &info.incr.rate[0], &info.incr.rate[1], &info.incr.rate[2]);
1782 if(rc != 3) goto parse_err;
1785 if((line = impget_line()) == NULL) goto shortfile_err;
1786 rc = sscanf(line, "incr-comp: %lf %lf %lf",
1787 &info.incr.comp[0], &info.incr.comp[1], &info.incr.comp[2]);
1788 if(rc != 3) goto parse_err;
1790 /* get stats for dump levels */
1794 if((line = impget_line()) == NULL) goto shortfile_err;
1795 if(strncmp_const(line, "//") == 0) {
1799 if(strncmp_const(line, "history:") == 0) {
1803 memset(&onestat, 0, SIZEOF(onestat));
1808 skip_whitespace(s, ch);
1809 if(ch == '\0' || strncmp_const_skip(s - 1, "stats:", s, ch) != 0) {
1813 skip_whitespace(s, ch);
1814 if(ch == '\0' || sscanf(s - 1, "%d", &level) != 1) {
1817 skip_integer(s, ch);
1819 skip_whitespace(s, ch);
1820 if(ch == '\0' || sscanf(s - 1, "%lld", &off_t_tmp) != 1) {
1823 onestat.size = (off_t)off_t_tmp;
1824 skip_integer(s, ch);
1826 skip_whitespace(s, ch);
1827 if(ch == '\0' || sscanf(s - 1, "%lld", &off_t_tmp) != 1) {
1830 onestat.csize = (off_t)off_t_tmp;
1831 skip_integer(s, ch);
1833 skip_whitespace(s, ch);
1834 if(ch == '\0' || sscanf(s - 1, "%lld", &time_t_tmp) != 1) {
1837 onestat.secs = (time_t)time_t_tmp;
1838 skip_integer(s, ch);
1840 skip_whitespace(s, ch);
1841 if(ch == '\0' || sscanf(s - 1, "%lld", &time_t_tmp) != 1) {
1844 /* time_t not guarranteed to be long */
1845 /*@i1@*/ onestat.date = (time_t)time_t_tmp;
1846 skip_integer(s, ch);
1848 skip_whitespace(s, ch);
1850 if(sscanf(s - 1, "%lld", &off_t_tmp) != 1) {
1853 onestat.filenum = (off_t)off_t_tmp;
1854 skip_integer(s, ch);
1856 skip_whitespace(s, ch);
1858 if (onestat.filenum != 0)
1860 onestat.label[0] = '\0';
1862 strncpy(onestat.label, s - 1, SIZEOF(onestat.label)-1);
1863 onestat.label[SIZEOF(onestat.label)-1] = '\0';
1867 if(level < 0 || level > 9) goto parse_err;
1869 info.inf[level] = onestat;
1872 for(i=0;i<=NB_HISTORY;i++) {
1873 info.history[i].level = -2;
1876 history_t onehistory;
1878 if(line[0] == '/' && line[1] == '/') {
1879 info.history[nb_history].level = -2;
1883 memset(&onehistory, 0, SIZEOF(onehistory));
1886 if(strncmp_const_skip(line, "history:", s, ch) != 0) {
1890 skip_whitespace(s, ch);
1891 if(ch == '\0' || sscanf((s - 1), "%d", &onehistory.level) != 1) {
1894 skip_integer(s, ch);
1896 skip_whitespace(s, ch);
1897 if(ch == '\0' || sscanf((s - 1), "%lld", &off_t_tmp) != 1) {
1900 onehistory.size = (off_t)off_t_tmp;
1901 skip_integer(s, ch);
1903 skip_whitespace(s, ch);
1904 if(ch == '\0' || sscanf((s - 1), "%lld", &off_t_tmp) != 1) {
1907 onehistory.csize = (off_t)off_t_tmp;
1908 skip_integer(s, ch);
1910 skip_whitespace(s, ch);
1911 if((ch == '\0') || sscanf((s - 1), "%lld", &time_t_tmp) != 1) {
1914 /* time_t not guarranteed to be long */
1915 /*@i1@*/ onehistory.date = (time_t)time_t_tmp;
1916 skip_integer(s, ch);
1918 info.history[nb_history++] = onehistory;
1920 if((line = impget_line()) == NULL) goto shortfile_err;
1922 /*@i@*/ amfree(line);
1924 /* got a full record, now write it out to the database */
1926 if(put_info(hostname, diskname, &info)) {
1927 g_fprintf(stderr, _("%s: error writing record for %s:%s\n"),
1928 get_pname(), hostname, diskname);
1935 /*@i@*/ amfree(line);
1938 g_fprintf(stderr, _("%s: parse error reading import record.\n"), get_pname());
1942 /*@i@*/ amfree(line);
1945 g_fprintf(stderr, _("%s: short file reading import record.\n"), get_pname());
1956 for(; (line = agets(stdin)) != NULL; free(line)) {
1960 skip_whitespace(s, ch);
1962 /* ignore comment lines */
1965 /* found non-blank, return line */
1968 /* otherwise, a blank line, so keep going */
1971 g_fprintf(stderr, _("%s: reading stdin: %s\n"),
1972 get_pname(), strerror(errno));
1977 /* ----------------------------------------------- */
1990 g_printf("line %d:\n", dp->line);
1992 g_printf(" host %s:\n", hp->hostname);
1993 g_printf(" interface %s\n",
1994 interface_name(ip->config)[0] ? interface_name(ip->config) : "default");
1995 g_printf(" disk %s:\n", dp->name);
1996 if(dp->device) g_printf(" device %s\n", dp->device);
1998 g_printf(" program \"%s\"\n", dp->program);
1999 if(dp->exclude_file != NULL && dp->exclude_file->nb_element > 0) {
2000 g_printf(" exclude file");
2001 for(excl = dp->exclude_file->first; excl != NULL; excl = excl->next) {
2002 g_printf(" \"%s\"", excl->name);
2006 if(dp->exclude_list != NULL && dp->exclude_list->nb_element > 0) {
2007 g_printf(" exclude list");
2008 if(dp->exclude_optional) g_printf(" optional");
2009 for(excl = dp->exclude_list->first; excl != NULL; excl = excl->next) {
2010 g_printf(" \"%s\"", excl->name);
2014 if(dp->include_file != NULL && dp->include_file->nb_element > 0) {
2015 g_printf(" include file");
2016 for(excl = dp->include_file->first; excl != NULL; excl = excl->next) {
2017 g_printf(" \"%s\"", excl->name);
2021 if(dp->include_list != NULL && dp->include_list->nb_element > 0) {
2022 g_printf(" include list");
2023 if(dp->include_optional) g_printf(" optional");
2024 for(excl = dp->include_list->first; excl != NULL; excl = excl->next) {
2025 g_printf(" \"%s\"", excl->name);
2029 g_printf(" priority %d\n", dp->priority);
2030 g_printf(" dumpcycle %d\n", dp->dumpcycle);
2031 g_printf(" maxdumps %d\n", dp->maxdumps);
2032 g_printf(" maxpromoteday %d\n", dp->maxpromoteday);
2033 if(dp->bumppercent > 0) {
2034 g_printf(" bumppercent %d\n", dp->bumppercent);
2037 g_printf(" bumpsize %lld\n",
2038 (long long)dp->bumpsize);
2040 g_printf(" bumpdays %d\n", dp->bumpdays);
2041 g_printf(" bumpmult %lf\n", dp->bumpmult);
2043 g_printf(" strategy ");
2044 switch(dp->strategy) {
2049 g_printf("STANDARD\n");
2052 g_printf("NOFULL\n");
2055 g_printf("NOINC\n");
2058 g_printf("HANOI\n");
2061 g_printf("INCRONLY\n");
2064 g_printf(" ignore %s\n", (dp->ignore? "YES" : "NO"));
2065 g_printf(" estimate ");
2066 switch(dp->estimate) {
2068 g_printf("CLIENT\n");
2071 g_printf("SERVER\n");
2074 g_printf("CALCSIZE\n");
2078 g_printf(" compress ");
2079 switch(dp->compress) {
2084 g_printf("CLIENT FAST\n");
2087 g_printf("CLIENT BEST\n");
2089 case COMP_SERVER_FAST:
2090 g_printf("SERVER FAST\n");
2092 case COMP_SERVER_BEST:
2093 g_printf("SERVER BEST\n");
2096 if(dp->compress != COMP_NONE) {
2097 g_printf(" comprate %.2lf %.2lf\n",
2098 dp->comprate[0], dp->comprate[1]);
2101 g_printf(" encrypt ");
2102 switch(dp->encrypt) {
2107 g_printf("CLIENT\n");
2109 case ENCRYPT_SERV_CUST:
2110 g_printf("SERVER\n");
2114 g_printf(" auth %s\n", dp->security_driver);
2115 g_printf(" kencrypt %s\n", (dp->kencrypt? "YES" : "NO"));
2116 g_printf(" amandad_path %s\n", dp->amandad_path);
2117 g_printf(" client_username %s\n", dp->client_username);
2118 g_printf(" ssh_keys %s\n", dp->ssh_keys);
2120 g_printf(" holdingdisk ");
2121 switch(dp->to_holdingdisk) {
2123 g_printf("NEVER\n");
2129 g_printf("REQUIRED\n");
2133 g_printf(" record %s\n", (dp->record? "YES" : "NO"));
2134 g_printf(" index %s\n", (dp->index? "YES" : "NO"));
2135 g_printf(" starttime %04d\n", (int)dp->starttime);
2136 if(dp->tape_splitsize > (off_t)0) {
2137 g_printf(" tape_splitsize %lld\n",
2138 (long long)dp->tape_splitsize);
2140 if(dp->split_diskbuffer) {
2141 g_printf(" split_diskbuffer %s\n", dp->split_diskbuffer);
2143 if(dp->fallback_splitsize > (off_t)0) {
2144 g_printf(" fallback_splitsize %lldMb\n",
2145 (long long)(dp->fallback_splitsize / (off_t)1024));
2147 g_printf(" skip-incr %s\n", (dp->skip_incr? "YES" : "NO"));
2148 g_printf(" skip-full %s\n", (dp->skip_full? "YES" : "NO"));
2149 g_printf(" spindle %d\n", dp->spindle);
2162 diskloop(argc, argv, "disklist", disklist_one);
2164 for(dp = diskq.head; dp != NULL; dp = dp->next)
2175 (void)argc; /* Quiet unused parameter warning */
2176 (void)argv; /* Quiet unused parameter warning */
2178 for(i = 0; version_info[i] != NULL; i++)
2179 g_printf("%s", version_info[i]);
2184 int argc G_GNUC_UNUSED,
2185 char **argv G_GNUC_UNUSED)
2187 dump_configuration();