X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=server-src%2Fdiskfile.c;h=b909b0dcc97ba032920b6fbb2f3c87246dd21960;hb=94a044f90357edefa6f4ae9f0b1d5885b0e34aee;hp=e2abcf9111eb57ead44daa4bbe161b10adf708ad;hpb=3ab887b9bc819a846c75dd7f2ee5d41fac22b19f;p=debian%2Famanda diff --git a/server-src/diskfile.c b/server-src/diskfile.c index e2abcf9..b909b0d 100644 --- a/server-src/diskfile.c +++ b/server-src/diskfile.c @@ -25,7 +25,7 @@ * University of Maryland at College Park */ /* - * $Id: diskfile.c,v 1.27.4.6.4.3.2.15 2003/12/16 22:36:45 martinea Exp $ + * $Id: diskfile.c,v 1.95 2006/07/26 15:17:37 martinea Exp $ * * read disklist file */ @@ -33,74 +33,93 @@ #include "arglist.h" #include "conffile.h" #include "diskfile.h" +#include "util.h" - -static disklist_t lst; -static FILE *diskf; -static char *diskfname = NULL; -static host_t *hostlist; -static int line_num, got_parserror; +static am_host_t *hostlist; +static netif_t *all_netifs; /* local functions */ -static char *upcase P((char *st)); -static int read_diskline P((void)); -static void parserror P((char *format, ...)) - __attribute__ ((format (printf, 1, 2))); +static char *upcase(char *st); +static int parse_diskline(disklist_t *, const char *, FILE *, int *, char **); +static void disk_parserror(const char *, int, const char *, ...) + G_GNUC_PRINTF(3, 4); -disklist_t *read_diskfile(filename) -char *filename; +int +read_diskfile( + const char *filename, + disklist_t *lst) { - extern int errno; + FILE *diskf; + int line_num; + char *line; /* initialize */ - hostlist = NULL; - lst.head = lst.tail = NULL; - diskfname = newstralloc(diskfname, filename); - malloc_mark(diskfname); - line_num = got_parserror = 0; + lst->head = lst->tail = NULL; + line_num = 0; - if((diskf = fopen(filename, "r")) == NULL) - error("could not open disklist file \"%s\": %s", - filename, strerror(errno)); + if ((diskf = fopen(filename, "r")) == NULL) { + return -1; + /*NOTREACHED*/ + } - while(read_diskline()); - afclose(diskf); + while ((line = agets(diskf)) != NULL) { + line_num++; + if (line[0] != '\0') { + if (parse_diskline(lst, filename, diskf, &line_num, &line) < 0) { + amfree(line); + afclose(diskf); + return (-1); + } + } + amfree(line); + } - if(got_parserror) return NULL; - else return &lst; + afclose(diskf); + return (0); } -host_t *lookup_host(hostname) -char *hostname; +am_host_t * +lookup_host( + const char *hostname) { - host_t *p; + am_host_t *p; - for(p = hostlist; p != NULL; p = p->next) { + for (p = hostlist; p != NULL; p = p->next) { if(strcasecmp(p->hostname, hostname) == 0) return p; } - return NULL; + return (NULL); } -disk_t *lookup_disk(hostname, diskname) -char *hostname, *diskname; +disk_t * +lookup_disk( + const char *hostname, + const char *diskname) { - host_t *host; + am_host_t *host; disk_t *disk; host = lookup_host(hostname); - if(host == NULL) return NULL; + if (host == NULL) + return (NULL); - for(disk = host->disks; disk != NULL; disk = disk->hostnext) { - if(strcmp(disk->name, diskname) == 0) return disk; + for (disk = host->disks; disk != NULL; disk = disk->hostnext) { + if (strcmp(disk->name, diskname) == 0) + return (disk); } - return NULL; + return (NULL); } -void enqueue_disk(list, disk) /* put disk on end of queue */ -disklist_t *list; -disk_t *disk; + +/* + * put disk on end of queue + */ + +void +enqueue_disk( + disklist_t *list, + disk_t * disk) { if(list->tail == NULL) list->head = disk; else list->tail->next = disk; @@ -110,9 +129,15 @@ disk_t *disk; disk->next = NULL; } -void headqueue_disk(list, disk) /* put disk on head of queue */ -disklist_t *list; -disk_t *disk; + +/* + * put disk on head of queue + */ + +void +headqueue_disk( + disklist_t *list, + disk_t * disk) { if(list->head == NULL) list->tail = disk; else list->head->prev = disk; @@ -122,10 +147,16 @@ disk_t *disk; disk->prev = NULL; } -void insert_disk(list, disk, cmp) /* insert in sorted order */ -disklist_t *list; -disk_t *disk; -int (*cmp) P((disk_t *a, disk_t *b)); + +/* + * insert in sorted order + */ + +void +insert_disk( + disklist_t *list, + disk_t * disk, + int (*cmp)(disk_t *a, disk_t *b)) { disk_t *prev, *ptr; @@ -146,26 +177,38 @@ int (*cmp) P((disk_t *a, disk_t *b)); else ptr->prev = disk; } -disk_t *add_disk(hostname, diskname) -char *hostname; -char *diskname; +disk_t * +add_disk( + disklist_t *list, + char * hostname, + char * diskname) { disk_t *disk; - host_t *host; + am_host_t *host; - disk = alloc(sizeof(disk_t)); + disk = alloc(SIZEOF(disk_t)); disk->line = 0; + disk->tape_splitsize = (off_t)0; + disk->split_diskbuffer = NULL; + disk->fallback_splitsize = (off_t)0; + disk->hostname = stralloc(hostname); disk->name = stralloc(diskname); disk->device = stralloc(diskname); disk->spindle = -1; disk->up = NULL; disk->compress = COMP_NONE; + disk->encrypt = ENCRYPT_NONE; disk->start_t = 0; disk->todo = 1; + disk->index = 1; + disk->exclude_list = NULL; + disk->exclude_file = NULL; + disk->include_list = NULL; + disk->include_file = NULL; host = lookup_host(hostname); if(host == NULL) { - host = alloc(sizeof(host_t)); + host = alloc(SIZEOF(am_host_t)); host->next = hostlist; hostlist = host; @@ -178,7 +221,7 @@ char *diskname; host->up = NULL; host->features = NULL; } - enqueue_disk(&lst, disk); + enqueue_disk(list, disk); disk->host = host; disk->hostnext = host->disks; @@ -187,22 +230,35 @@ char *diskname; return disk; } -int find_disk(list, disk) -disklist_t *list; -disk_t *disk; -/* check if disk is present in list. Return true if so, false otherwise. */ -{ -disk_t *t; - for( t = list->head; t && t != disk; t = t->next ); +/* + * check if disk is present in list. Return true if so, false otherwise. + */ - return t == disk; +int +find_disk( + disklist_t *list, + disk_t * disk) +{ + disk_t *t; + + t = list->head; + while ((t != NULL) && (t != disk)) { + t = t->next; + } + return (t == disk); } -void sort_disk(in, out, cmp) /* sort a whole queue */ -disklist_t *in; -disklist_t *out; -int (*cmp) P((disk_t *a, disk_t *b)); + +/* + * sort a whole queue + */ + +void +sort_disk( + disklist_t *in, + disklist_t *out, + int (*cmp)(disk_t *a, disk_t *b)) { disklist_t *tmp; disk_t *disk; @@ -216,8 +272,14 @@ int (*cmp) P((disk_t *a, disk_t *b)); insert_disk(out, disk, cmp); } -disk_t *dequeue_disk(list) /* remove disk from front of queue */ -disklist_t *list; + +/* + * remove disk from front of queue + */ + +disk_t * +dequeue_disk( + disklist_t *list) { disk_t *disk; @@ -233,9 +295,10 @@ disklist_t *list; return disk; } -void remove_disk(list, disk) -disklist_t *list; -disk_t *disk; +void +remove_disk( + disklist_t *list, + disk_t * disk) { if(disk->prev == NULL) list->head = disk->next; else disk->prev->next = disk->next; @@ -246,197 +309,380 @@ disk_t *disk; disk->prev = disk->next = NULL; } -static char *upcase(st) -char *st; +void +free_disklist( + disklist_t* dl) +{ + disk_t *dp; + am_host_t *host, *hostnext; + + while (dl->head != NULL) { + dp = dequeue_disk(dl); + amfree(dp->name); + amfree(dp->hostname); + amfree(dp->device); + free_sl(dp->exclude_file); + free_sl(dp->exclude_list); + free_sl(dp->include_file); + free_sl(dp->include_list); + free(dp); + } + + for(host=hostlist; host != NULL; host = hostnext) { + amfree(host->hostname); + am_release_feature_set(host->features); + host->features = NULL; + hostnext = host->next; + amfree(host); + } + hostlist=NULL; +} + +static char * +upcase( + char *st) { char *s = st; while(*s) { - if(islower((int)*s)) *s = toupper(*s); + if(islower((int)*s)) *s = (char)toupper((int)*s); s++; } return st; } -static int read_diskline() +/* return 0 on success */ +/* return -1 on error */ +static int +parse_diskline( + disklist_t *lst, + const char *filename, + FILE * diskf, + int * line_num_p, + /*@keep@*/ char ** line_p) { - host_t *host; + am_host_t *host; disk_t *disk; dumptype_t *dtype; - interface_t *netif = 0; + netif_t *netif = NULL; + interface_t *cfg_if = NULL; char *hostname = NULL; char *diskname, *diskdevice; - static char *line = NULL; - char *s = NULL, *fp; - int ch = '\0', dup = 0; - char *dn; - - amfree(line); - for(; (line = agets(diskf)) != NULL; free(line)) { - line_num += 1; - s = line; - ch = *s++; + char *dumptype; + char *s, *fp; + int ch, dup = 0; + char *line = *line_p; + int line_num = *line_num_p; + struct tm *stm; + time_t st; + char *shost, *sdisk; + am_host_t *p; + disk_t *dp; - skip_whitespace(s, ch); - if(ch != '\0' && ch != '#') break; - } - if(line == NULL) return 0; + assert(filename != NULL); + assert(line_num > 0); + assert(line != NULL); + + s = line; + ch = *s++; + skip_whitespace(s, ch); + if(ch == '\0' || ch == '#') + return (0); fp = s - 1; skip_non_whitespace(s, ch); s[-1] = '\0'; host = lookup_host(fp); if (host == NULL) { - hostname = stralloc(fp); - malloc_mark(hostname); + hostname = stralloc(fp); } else { - hostname = host->hostname; + hostname = stralloc(host->hostname); + if (strcmp(host->hostname, fp) != 0) { + disk_parserror(filename, line_num, "Same host with different case: \"%s\" and \"%s\".", host->hostname, fp); + return -1; + } } + shost = sanitise_filename(hostname); + for (p = hostlist; p != NULL; p = p->next) { + char *shostp = sanitise_filename(p->hostname); + if (strcmp(hostname, p->hostname) && + !strcmp(shost, shostp)) { + disk_parserror(filename, line_num, "Two hosts are mapping to the same name: \"%s\" and \"%s\"", p->hostname, hostname); + return(-1); + } + else if (strcasecmp(hostname, p->hostname) && + match_host(hostname, p->hostname) && + match_host(p->hostname, hostname)) { + disk_parserror(filename, line_num, _("Duplicate host name: \"%s\" and \"%s\""), p->hostname, hostname); + return(-1); + } + amfree(shostp); + } + amfree(shost); + skip_whitespace(s, ch); if(ch == '\0' || ch == '#') { - parserror("disk device name expected"); - return 1; + disk_parserror(filename, line_num, _("disk device name expected")); + amfree(hostname); + return (-1); } + fp = s - 1; - skip_non_whitespace(s, ch); + skip_quoted_string(s, ch); s[-1] = '\0'; - diskname = stralloc(fp); + diskname = unquote_string(fp); skip_whitespace(s, ch); if(ch == '\0' || ch == '#') { - parserror("disk dumptype expected"); - if(host == NULL) amfree(hostname); + disk_parserror(filename, line_num, _("disk dumptype expected")); + amfree(hostname); amfree(diskname); - return 1; + return (-1); } fp = s - 1; - skip_non_whitespace(s, ch); + skip_quoted_string(s, ch); s[-1] = '\0'; /* diskdevice */ - dn = stralloc(fp); - if(fp[0] != '{' && (dtype = lookup_dumptype(upcase(fp))) == NULL) { - diskdevice = dn; - skip_whitespace(s, ch); - if(ch == '\0' || ch == '#') { - parserror("disk dumptype expected"); - if(host == NULL) amfree(hostname); - amfree(diskname); - amfree(diskdevice); - return 1; + dumptype = NULL; + diskdevice = NULL; + if(fp[0] != '{') { + dumptype = unquote_string(fp); + if ((dtype = lookup_dumptype(dumptype)) == NULL) { + diskdevice = dumptype; + skip_whitespace(s, ch); + if(ch == '\0' || ch == '#') { + disk_parserror(filename, line_num, + _("disk dumptype '%s' not found"), dumptype); + amfree(hostname); + amfree(diskdevice); + amfree(diskname); + return (-1); + } + + fp = s - 1; + skip_quoted_string(s, ch); + s[-1] = '\0'; + if (fp[0] != '{') { + dumptype = unquote_string(fp); + } } - fp = s - 1; - skip_non_whitespace(s, ch); - s[-1] = '\0'; - } - else { - diskdevice = NULL; - amfree(dn); } /* check for duplicate disk */ - if(host && (disk = lookup_disk(hostname, diskname)) != NULL) { - parserror("duplicate disk record, previous on line %d", disk->line); - dup = 1; - } else { - disk = alloc(sizeof(disk_t)); - malloc_mark(disk); + disk = NULL; + if (host) { + if ((disk = lookup_disk(hostname, diskname)) != NULL) { + dup = 1; + } else { + disk = host->disks; + do { + if (match_disk(diskname, disk->name) && + match_disk(disk->name, diskname)) { + dup = 1; + } else { + disk = disk->hostnext; + } + } + while (dup == 0 && disk != NULL); + } + if (dup == 1) { + disk_parserror(filename, line_num, + _("duplicate disk record, previous on line %d"), + disk->line); + } + } + if (!disk) { + disk = alloc(SIZEOF(disk_t)); disk->line = line_num; + disk->hostname = stralloc(hostname); disk->name = diskname; disk->device = diskdevice; - malloc_mark(disk->name); disk->spindle = -1; disk->up = NULL; disk->inprogress = 0; } + if (host) { + sdisk = sanitise_filename(diskname); + for (dp = host->disks; dp != NULL; dp = dp->next) { + char *sdiskp = sanitise_filename(dp->name); + if (strcmp(diskname, dp->name) != 0 && + strcmp(sdisk, sdiskp) == 0) { + disk_parserror(filename, line_num, + _("Two disks are mapping to the same name: \"%s\" and \"%s\"; you must use different diskname"), + dp->name, diskname); + return(-1); + } + amfree(sdiskp); + } + amfree(sdisk); + } + if (fp[0] == '{') { - s[-1] = ch; + s[-1] = (char)ch; s = fp+2; skip_whitespace(s, ch); if (ch != '\0' && ch != '#') { - parserror("expected line break after `{\', ignoring rest of line"); + disk_parserror(filename, line_num, + _("expected line break after `{\', ignoring rest of line")); } if (strchr(s-1, '}') && (strchr(s-1, '#') == NULL || strchr(s-1, '}') < strchr(s-1, '#'))) { - if(host == NULL) amfree(hostname); + disk_parserror(filename, line_num,_("'}' on same line than '{'")); + amfree(hostname); if(!dup) { + amfree(disk->device); amfree(disk->name); amfree(disk); + } else { + amfree(diskdevice); + amfree(diskname); } - return 1; + return (-1); } - amfree(line); - dtype = read_dumptype(vstralloc("custom(", hostname, - ":", disk->name, ")", 0), - diskf, diskfname, &line_num); - - line = agets(diskf); - /* line_num += 1; */ /* read_dumptype did it already */ - + ":", disk->name, ")", NULL), + diskf, (char*)filename, line_num_p); if (dtype == NULL || dup) { - if(host == NULL) amfree(hostname); + disk_parserror(filename, line_num, + _("read of custom dumptype failed")); + amfree(hostname); if(!dup) { - amfree(disk->name); - amfree(disk); + amfree(disk->device); + amfree(disk->name); + amfree(disk); + } else { + amfree(diskdevice); + amfree(diskname); } - return line != NULL; + return (-1); } + amfree(line); + + *line_p = line = agets(diskf); + line_num = *line_num_p; /* no incr, read_dumptype did it already */ if (line == NULL) - line = stralloc(""); + *line_p = line = stralloc(""); s = line; ch = *s++; - } else if((dtype = lookup_dumptype(upcase(fp))) == NULL) { - parserror("undefined dumptype `%s'", fp); - if(host == NULL) amfree(hostname); - if(!dup) { - amfree(disk->name); - amfree(disk); + } else { + if((dtype = lookup_dumptype(dumptype)) == NULL) { + char *qdt = quote_string(dumptype); + + disk_parserror(filename, line_num, _("undefined dumptype `%s'"), qdt); + amfree(qdt); + amfree(dumptype); + amfree(hostname); + if (!dup) { + amfree(disk->device); + amfree(disk->name); + amfree(disk); + } else { + amfree(diskdevice); + amfree(diskname); + } + return (-1); } - return 1; } if (dup) { - if(host == NULL) amfree(hostname); - return 1; + amfree(hostname); + amfree(diskdevice); + amfree(diskname); + return (-1); + } + + disk->dtype_name = dumptype_name(dtype); + disk->program = dumptype_get_program(dtype); + disk->exclude_list = duplicate_sl(dumptype_get_exclude(dtype).sl_list); + disk->exclude_file = duplicate_sl(dumptype_get_exclude(dtype).sl_file); + disk->exclude_optional = dumptype_get_exclude(dtype).optional; + disk->include_list = duplicate_sl(dumptype_get_include(dtype).sl_list); + disk->include_file = duplicate_sl(dumptype_get_include(dtype).sl_file); + disk->include_optional = dumptype_get_include(dtype).optional; + disk->priority = dumptype_get_priority(dtype); + disk->dumpcycle = dumptype_get_dumpcycle(dtype); +/* disk->frequency = dumptype_get_frequency(dtype);*/ + disk->security_driver = dumptype_get_security_driver(dtype); + disk->maxdumps = dumptype_get_maxdumps(dtype); + disk->tape_splitsize = dumptype_get_tape_splitsize(dtype); + disk->split_diskbuffer = dumptype_get_split_diskbuffer(dtype); + disk->fallback_splitsize = dumptype_get_fallback_splitsize(dtype); + disk->maxpromoteday = dumptype_get_maxpromoteday(dtype); + disk->bumppercent = dumptype_get_bumppercent(dtype); + disk->bumpsize = dumptype_get_bumpsize(dtype); + disk->bumpdays = dumptype_get_bumpdays(dtype); + disk->bumpmult = dumptype_get_bumpmult(dtype); + disk->starttime = dumptype_get_starttime(dtype); + disk->start_t = 0; + if (disk->starttime > 0) { + st = time(NULL); + disk->start_t = st; + stm = localtime(&st); + disk->start_t -= stm->tm_sec + 60 * stm->tm_min + 3600 * stm->tm_hour; + disk->start_t += disk->starttime / 100 * 3600 + + disk->starttime % 100 * 60; + if ((disk->start_t - st) < -43200) + disk->start_t += 86400; } + disk->strategy = dumptype_get_strategy(dtype); + disk->ignore = dumptype_get_ignore(dtype); + disk->estimate = dumptype_get_estimate(dtype); + disk->compress = dumptype_get_compress(dtype); + disk->srvcompprog = dumptype_get_srvcompprog(dtype); + disk->clntcompprog = dumptype_get_clntcompprog(dtype); + disk->encrypt = dumptype_get_encrypt(dtype); + disk->srv_decrypt_opt = dumptype_get_srv_decrypt_opt(dtype); + disk->clnt_decrypt_opt = dumptype_get_clnt_decrypt_opt(dtype); + disk->srv_encrypt = dumptype_get_srv_encrypt(dtype); + disk->clnt_encrypt = dumptype_get_clnt_encrypt(dtype); + disk->amandad_path = dumptype_get_amandad_path(dtype); + disk->client_username = dumptype_get_client_username(dtype); + disk->ssh_keys = dumptype_get_ssh_keys(dtype); + disk->comprate[0] = dumptype_get_comprate(dtype)[0]; + disk->comprate[1] = dumptype_get_comprate(dtype)[1]; - disk->dtype_name = dtype->name; - disk->program = dtype->program; - disk->exclude_file = duplicate_sl(dtype->exclude_file); - disk->exclude_list = duplicate_sl(dtype->exclude_list); - disk->include_file = duplicate_sl(dtype->include_file); - disk->include_list = duplicate_sl(dtype->include_list); - disk->exclude_optional = dtype->exclude_optional; - disk->include_optional = dtype->include_optional; - disk->priority = dtype->priority; - disk->dumpcycle = dtype->dumpcycle; - disk->frequency = dtype->frequency; - disk->auth = dtype->auth; - disk->maxdumps = dtype->maxdumps; - disk->maxpromoteday = dtype->maxpromoteday; - disk->start_t = dtype->start_t; - disk->strategy = dtype->strategy; - disk->compress = dtype->compress; - disk->comprate[0] = dtype->comprate[0]; - disk->comprate[1] = dtype->comprate[1]; - disk->record = dtype->record; - disk->skip_incr = dtype->skip_incr; - disk->skip_full = dtype->skip_full; - disk->no_hold = dtype->no_hold; - disk->kencrypt = dtype->kencrypt; - disk->index = dtype->index; - disk->todo = 1; + /* + * Boolean parameters with no value (Appears here as value 2) defaults + * to TRUE for backward compatibility and for logical consistency. + */ + disk->record = dumptype_get_record(dtype) != 0; + disk->skip_incr = dumptype_get_skip_incr(dtype) != 0; + disk->skip_full = dumptype_get_skip_full(dtype) != 0; + disk->to_holdingdisk = dumptype_get_to_holdingdisk(dtype); + disk->kencrypt = dumptype_get_kencrypt(dtype) != 0; + disk->index = dumptype_get_index(dtype) != 0; + + disk->todo = 1; skip_whitespace(s, ch); fp = s - 1; if(ch && ch != '#') { /* get optional spindle number */ + char *fp1; + int is_digit=1; + + skip_non_whitespace(s, ch); + s[-1] = '\0'; + fp1=fp; + if (*fp1 == '-') fp1++; + for(;*fp1!='\0';fp1++) { + if(!isdigit((int)*fp1)) { + is_digit = 0; + } + } + if(is_digit == 0) { + disk_parserror(filename, line_num, _("non-integer spindle `%s'"), fp); + amfree(hostname); + amfree(disk->name); + amfree(disk); + return (-1); + } disk->spindle = atoi(fp); skip_integer(s, ch); } @@ -446,37 +692,46 @@ static int read_diskline() if(ch && ch != '#') { /* get optional network interface */ skip_non_whitespace(s, ch); s[-1] = '\0'; - if((netif = lookup_interface(upcase(fp))) == NULL) { - parserror("undefined network interface `%s'", fp); - if(host == NULL) amfree(hostname); + if((cfg_if = lookup_interface(upcase(fp))) == NULL) { + disk_parserror(filename, line_num, + _("undefined network interface `%s'"), fp); + amfree(hostname); amfree(disk->name); amfree(disk); - return 1; + return (-1); } } else { - netif = lookup_interface(""); + cfg_if = lookup_interface("default"); + } + + /* see if we already have a netif_t for this interface */ + for (netif = all_netifs; netif != NULL; netif = netif->next) { + if (netif->config == cfg_if) + break; + } + + /* nope; make up a new one */ + if (!netif) { + netif = alloc(sizeof(*netif)); + netif->next = all_netifs; + all_netifs = netif; + netif->config = cfg_if; + netif->curusage = 0; } skip_whitespace(s, ch); if(ch && ch != '#') { /* now we have garbage, ignore it */ - parserror("end of line expected"); + disk_parserror(filename, line_num, _("end of line expected")); } - if(dtype->ignore || dtype->strategy == DS_SKIP) { - amfree(diskname); - free_sl(disk->exclude_file); - free_sl(disk->exclude_list); - free_sl(disk->include_file); - free_sl(disk->include_list); - amfree(disk); - return 1; + if(dumptype_get_ignore(dtype) || dumptype_get_strategy(dtype) == DS_SKIP) { + disk->todo = 0; } /* success, add disk to lists */ if(host == NULL) { /* new host */ - host = alloc(sizeof(host_t)); - malloc_mark(host); + host = alloc(SIZEOF(am_host_t)); host->next = hostlist; hostlist = host; @@ -489,74 +744,83 @@ static int read_diskline() host->start_t = 0; host->up = NULL; host->features = NULL; + } else { + amfree(hostname); } host->netif = netif; - enqueue_disk(&lst, disk); + enqueue_disk(lst, disk); disk->host = host; disk->hostnext = host->disks; host->disks = disk; host->maxdumps = disk->maxdumps; - return 1; + return (0); } -printf_arglist_function(static void parserror, char *, format) +printf_arglist_function2(void disk_parserror, const char *, filename, + int, line_num, const char *, format) { va_list argp; + const char *xlated_fmt = gettext(format); /* print error message */ - fprintf(stderr, "\"%s\", line %d: ", diskfname, line_num); + g_fprintf(stderr, "\"%s\", line %d: ", filename, line_num); arglist_start(argp, format); - vfprintf(stderr, format, argp); + g_vfprintf(stderr, xlated_fmt, argp); arglist_end(argp); fputc('\n', stderr); - - got_parserror = 1; } -void dump_queue(st, q, npr, f) -char *st; -disklist_t q; -int npr; /* we print first npr disks on queue, plus last two */ -FILE *f; +void +dump_queue( + char * st, + disklist_t q, + int npr, /* we print first npr disks on queue, plus last two */ + FILE * f) { disk_t *d,*p; int pos; + char *qname; if(empty(q)) { - fprintf(f, "%s QUEUE: empty\n", st); + g_fprintf(f, _("%s QUEUE: empty\n"), st); return; } - fprintf(f, "%s QUEUE:\n", st); + g_fprintf(f, _("%s QUEUE:\n"), st); for(pos = 0, d = q.head, p = NULL; d != NULL; p = d, d = d->next, pos++) { - if(pos < npr) fprintf(f, "%3d: %-10s %-4s\n", - pos, d->host->hostname, d->name); + qname = quote_string(d->name); + if(pos < npr) g_fprintf(f, "%3d: %-10s %-4s\n", + pos, d->host->hostname, qname); + amfree(qname); } if(pos > npr) { - if(pos > npr+2) fprintf(f, " ...\n"); + if(pos > npr+2) g_fprintf(f, " ...\n"); if(pos > npr+1) { d = p->prev; - fprintf(f, "%3d: %-10s %-4s\n", pos-2, d->host->hostname, d->name); + g_fprintf(f, "%3d: %-10s %-4s\n", pos-2, d->host->hostname, d->name); } d = p; - fprintf(f, "%3d: %-10s %-4s\n", pos-1, d->host->hostname, d->name); + g_fprintf(f, "%3d: %-10s %-4s\n", pos-1, d->host->hostname, d->name); } } -char *optionstr(dp, their_features, fdout) -disk_t *dp; -am_feature_t * their_features; -FILE *fdout; +char * +optionstr( + disk_t * dp, + am_feature_t * their_features, + FILE * fdout) { char *auth_opt = NULL; char *kencrypt_opt = ""; char *compress_opt = ""; + char *encrypt_opt = stralloc(""); + char *decrypt_opt = stralloc(""); char *record_opt = ""; char *index_opt = ""; char *exclude_file = NULL; @@ -570,60 +834,40 @@ FILE *fdout; sle_t *excl; int nb_exclude_file; int nb_include_file; - - /* modification by BIS@BBN 4/25/2003: - * The first "if" statement has a number of problems, so I removed the - * am_has_feature(dp->host->features, fe_options_auth) - * condition and caused the first case to always fail. - * 1) If dp->host is a NULL pointer, subsequent tests which look - * at dp->host->features or dp->host->hostname will cause a dump. - * It appears that there should be an assertion that dp->host - * is NOT NULL. - * 2) The code which checks for the kencrypt feature is only executed - * in the case where dp->auth == AUTH_KRB4. If we enable Kerberos IV - * in the first case, then the code checking for kencrypt will never - * be executed. - * 3) The option processing code in server-src/dumper.c and - * client-src/sendbackup.c do not yet handle the "auth=krb4" - * option style of specifying Kerberos IV. - * Getting rid of the whole first case seems to take care of problems - * 2 and 3, but not problem 1. - */ - if(dp->host && 0) - /* && am_has_feature(dp->host->features, fe_options_auth)) */ { - auth_opt = stralloc("auth="); - if(dp->auth == AUTH_BSD) { - strappend(auth_opt, "bsd"); - } else if(dp->auth == AUTH_KRB4) { - strappend(auth_opt, "krb4"); - } else { - strappend(auth_opt, "unknown"); - } - strappend(auth_opt, ";"); - } else if(dp->auth == AUTH_BSD) { - if(am_has_feature(dp->host->features, fe_options_bsd_auth)) { + char *qdpname; + char *qname; + int err=0; + + assert(dp != NULL); + assert(dp->host != NULL); + + qdpname = quote_string(dp->name); + if(am_has_feature(dp->host->features, fe_options_auth)) { + auth_opt = vstralloc("auth=", dp->security_driver, ";", NULL); + } else if(strcasecmp(dp->security_driver, "bsd") == 0) { + if(am_has_feature(dp->host->features, fe_options_bsd_auth)) auth_opt = stralloc("bsd-auth;"); - } else if(fdout) { - fprintf(fdout, "WARNING: %s:%s does not support bsd-auth\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support auth or bsd-auth\n"), + dp->host->hostname, qdpname); } - } else if(dp->auth == AUTH_KRB4) { - if(am_has_feature(dp->host->features, fe_options_krb4_auth)) { + } else if(strcasecmp(dp->security_driver, "krb4") == 0) { + if(am_has_feature(dp->host->features, fe_options_krb4_auth)) auth_opt = stralloc("krb4-auth;"); - } else if(fdout) { - fprintf(fdout, "WARNING: %s:%s does not support krb4-auth\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support auth or krb4-auth\n"), + dp->host->hostname, qdpname); } if(dp->kencrypt) { if(am_has_feature(dp->host->features, fe_options_kencrypt)) { kencrypt_opt = "kencrypt;"; } else if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support kencrypt\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support kencrypt\n"), + dp->host->hostname, qdpname); } } } @@ -634,9 +878,9 @@ FILE *fdout; compress_opt = "compress-fast;"; } else if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support fast compression\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support fast compression\n"), + dp->host->hostname, qdpname); } break; case COMP_BEST: @@ -644,30 +888,143 @@ FILE *fdout; compress_opt = "compress-best;"; } else if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support best compression\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support best compression\n"), + dp->host->hostname, qdpname); } break; - case COMP_SERV_FAST: + case COMP_CUST: + if(am_has_feature(their_features, fe_options_compress_cust)) { + compress_opt = vstralloc("comp-cust=", dp->clntcompprog, ";", NULL); + if (BSTRNCMP(compress_opt, "comp-cust=;") == 0){ + if(fdout) { + g_fprintf(fdout, + _("ERROR: %s:%s client custom compression with no compression program specified\n"), + dp->host->hostname, qdpname); + } + err++; + } + } + else if(fdout) { + g_fprintf(fdout, + _("WARNING: %s:%s does not support client custom compression\n"), + dp->host->hostname, qdpname); + } + break; + case COMP_SERVER_FAST: if(am_has_feature(their_features, fe_options_srvcomp_fast)) { compress_opt = "srvcomp-fast;"; } break; - case COMP_SERV_BEST: + case COMP_SERVER_BEST: if(am_has_feature(their_features, fe_options_srvcomp_best)) { compress_opt = "srvcomp-best;"; } break; + case COMP_SERVER_CUST: + if(am_has_feature(their_features, fe_options_srvcomp_cust)) { + compress_opt = vstralloc("srvcomp-cust=", dp->srvcompprog, ";", NULL); + if (BSTRNCMP(compress_opt, "srvcomp-cust=;") == 0){ + if(fdout) { + g_fprintf(fdout, + _("ERROR: %s:%s server custom compression with no compression program specified\n"), + dp->host->hostname, qdpname); + } + err++; + } + } + else if(fdout) { + g_fprintf(fdout, + _("WARNING: %s:%s does not support server custom compression\n"), + dp->host->hostname, qdpname); + } + break; } + switch(dp->encrypt) { + case ENCRYPT_CUST: + if(am_has_feature(their_features, fe_options_encrypt_cust)) { + encrypt_opt = newvstralloc(encrypt_opt, "encrypt-cust=", + dp->clnt_encrypt, ";", NULL); + if (BSTRNCMP(encrypt_opt, "encrypt-cust=;") == 0) { + if(fdout) { + g_fprintf(fdout, + _("ERROR: %s:%s encrypt client with no encryption program specified\n"), + dp->host->hostname, qdpname); + } + err++; + } + if ( dp->compress == COMP_SERVER_FAST || + dp->compress == COMP_SERVER_BEST || + dp->compress == COMP_SERVER_CUST ) { + if(fdout) { + g_fprintf(fdout, + _("ERROR: %s:Client encryption with server compression is " + "not supported. See amanda.conf(5) for detail.\n"), + dp->host->hostname); + } + err++; + } + if(dp->clnt_decrypt_opt) { + if(am_has_feature(their_features, fe_options_client_decrypt_option)) { + decrypt_opt = newvstralloc(decrypt_opt, "client-decrypt-option=", + dp->clnt_decrypt_opt, ";", NULL); + } + else if(fdout) { + g_fprintf(fdout, + _("WARNING: %s:%s does not support client decrypt option\n"), + dp->host->hostname, qdpname); + } + } + } + else if(fdout) { + g_fprintf(fdout, + _("WARNING: %s:%s does not support client data encryption\n"), + dp->host->hostname, qdpname); + } + break; + case ENCRYPT_SERV_CUST: + if(am_has_feature(their_features, fe_options_encrypt_serv_cust)) { + encrypt_opt = newvstralloc(encrypt_opt, "encrypt-serv-cust=", + dp->srv_encrypt, ";", NULL); + if (BSTRNCMP(encrypt_opt, "encrypt-serv-cust=;") == 0){ + if(fdout) { + g_fprintf(fdout, + _("ERROR: %s:%s No encryption program specified in dumptypes\n"), + dp->host->hostname, qdpname); + g_fprintf(fdout, _("Change the dumptype in the disklist or mention " + "the ecnryption program to use in the dumptypes file")); + + } + err++; + } + if(dp->srv_decrypt_opt) { + if(am_has_feature(their_features, fe_options_server_decrypt_option)) { + decrypt_opt = newvstralloc(decrypt_opt, "server-decrypt-option=", + dp->srv_decrypt_opt, ";", NULL); + } + else if(fdout) { + g_fprintf(fdout, + _("WARNING: %s:%s does not support server decrypt option\n"), + dp->host->hostname, qdpname); + } + } + } + else if(fdout) { + g_fprintf(fdout, + _("WARNING: %s:%s does not support server data encryption\n"), + dp->host->hostname, qdpname); + } + break; + } + if(!dp->record) { if(am_has_feature(their_features, fe_options_no_record)) { record_opt = "no-record;"; } else if(fdout) { - fprintf(fdout, "WARNING: %s:%s does not support no record\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, _("WARNING: %s:%s does not support no record\n"), + dp->host->hostname, qdpname); } } @@ -676,11 +1033,14 @@ FILE *fdout; index_opt = "index;"; } else if(fdout) { - fprintf(fdout, "WARNING: %s:%s does not support index\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, _("WARNING: %s:%s does not support index\n"), + dp->host->hostname, qdpname); } } + if(dp->kencrypt) kencrypt_opt = "kencrypt;"; + + exclude_file = stralloc(""); nb_exclude_file = 0; if(dp->exclude_file != NULL && dp->exclude_file->nb_element > 0) { @@ -690,23 +1050,25 @@ FILE *fdout; dp->exclude_file->nb_element == 1) { for(excl = dp->exclude_file->first; excl != NULL; excl = excl->next) { - exc = newvstralloc( exc, "exclude-file=", excl->name, - ";", NULL); + qname = quote_string(excl->name); + exc = newvstralloc( exc, "exclude-file=", qname, ";", NULL); strappend(exclude_file, exc); + amfree(qname); } } else { - exc = newvstralloc(exc, "exclude-file=", - dp->exclude_file->last->name, ";", NULL); + qname = quote_string(dp->exclude_file->last->name); + exc = newvstralloc(exc, "exclude-file=", qname, ";", NULL); strappend(exclude_file, exc); if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support multiple exclude\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support multiple exclude\n"), + dp->host->hostname, qdpname); } + amfree(qname); } } else if(fdout) { - fprintf(fdout, "WARNING: %s:%s does not support exclude file\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, _("WARNING: %s:%s does not support exclude file\n"), + dp->host->hostname, qdpname); } } exclude_list = stralloc(""); @@ -716,23 +1078,25 @@ FILE *fdout; (dp->exclude_list->nb_element == 1 && nb_exclude_file == 0)) { for(excl = dp->exclude_list->first; excl != NULL; excl = excl->next) { - exc = newvstralloc( exc, "exclude-list=", excl->name, - ";", NULL); + qname = quote_string(excl->name); + exc = newvstralloc( exc, "exclude-list=", qname, ";", NULL); strappend(exclude_list, exc); + amfree(qname); } } else { - exc = newvstralloc(exc, "exclude-list=", - dp->exclude_list->last->name, ";", NULL); + qname = quote_string(dp->exclude_list->last->name); + exc = newvstralloc(exc, "exclude-list=", qname, ";", NULL); strappend(exclude_list, exc); if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support multiple exclude\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support multiple exclude\n"), + dp->host->hostname, qdpname); } + amfree(qname); } } else if(fdout) { - fprintf(fdout, "WARNING: %s:%s does not support exclude list\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, _("WARNING: %s:%s does not support exclude list\n"), + dp->host->hostname, qdpname); } } @@ -745,23 +1109,25 @@ FILE *fdout; dp->include_file->nb_element == 1) { for(excl = dp->include_file->first; excl != NULL; excl = excl->next) { - exc = newvstralloc( exc, "include-file=", excl->name, - ";", NULL); + qname = quote_string(excl->name); + exc = newvstralloc(exc, "include-file=", qname, ";", NULL); strappend(include_file, exc); + amfree(qname); } } else { - exc = newvstralloc(exc, "include-file=", - dp->include_file->last->name, ";", NULL); + qname = quote_string(dp->include_file->last->name); + exc = newvstralloc(exc, "include-file=", qname, ";", NULL); strappend(include_file, exc); if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support multiple include\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support multiple include\n"), + dp->host->hostname, qdpname); } + amfree(qname); } } else if(fdout) { - fprintf(fdout, "WARNING: %s:%s does not support include file\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, _("WARNING: %s:%s does not support include file\n"), + dp->host->hostname, qdpname); } } include_list = stralloc(""); @@ -771,23 +1137,25 @@ FILE *fdout; (dp->include_list->nb_element == 1 && nb_include_file == 0)) { for(excl = dp->include_list->first; excl != NULL; excl = excl->next) { - exc = newvstralloc( exc, "include-list=", excl->name, - ";", NULL); + qname = quote_string(excl->name); + exc = newvstralloc(exc, "include-list=", qname, ";", NULL); strappend(include_list, exc); + amfree(qname); } } else { - exc = newvstralloc(exc, "include-list=", - dp->include_list->last->name, ";", NULL); + qname = quote_string(dp->include_list->last->name); + exc = newvstralloc(exc, "include-list=", qname, ";", NULL); strappend(include_list, exc); if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support multiple include\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support multiple include\n"), + dp->host->hostname, qdpname); } + amfree(qname); } } else if(fdout) { - fprintf(fdout, "WARNING: %s:%s does not support include list\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, _("WARNING: %s:%s does not support include list\n"), + dp->host->hostname, qdpname); } } @@ -796,9 +1164,9 @@ FILE *fdout; excl_opt = "exclude-optional;"; } else if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support optional exclude\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support optional exclude\n"), + dp->host->hostname, qdpname); } } if(dp->include_optional) { @@ -806,9 +1174,9 @@ FILE *fdout; incl_opt = "include-optional;"; } else if(fdout) { - fprintf(fdout, - "WARNING: %s:%s does not support optional include\n", - dp->host->hostname, dp->name); + g_fprintf(fdout, + _("WARNING: %s:%s does not support optional include\n"), + dp->host->hostname, qdpname); } } @@ -816,6 +1184,8 @@ FILE *fdout; auth_opt, kencrypt_opt, compress_opt, + encrypt_opt, + decrypt_opt, record_opt, index_opt, exclude_file, @@ -825,20 +1195,34 @@ FILE *fdout; excl_opt, incl_opt, NULL); + amfree(qdpname); amfree(auth_opt); - amfree(exclude_file); amfree(exclude_list); + amfree(exclude_file); amfree(include_file); amfree(include_list); amfree(exc); + amfree(decrypt_opt); + amfree(encrypt_opt); - return result; + /* result contains at least 'auth=...' */ + if ( err ) { + amfree(result); + return NULL; + } else { + return result; + } } -void match_disklist(disklist_t *origqp, int sargc, char **sargv) +char * +match_disklist( + disklist_t *origqp, + int sargc, + char ** sargv) { char *prevhost = NULL; + char *errstr = NULL; int i; int match_a_host; int match_a_disk; @@ -846,7 +1230,7 @@ void match_disklist(disklist_t *origqp, int sargc, char **sargv) disk_t *dp; if(sargc <= 0) - return; + return NULL; for(dp = origqp->head; dp != NULL; dp = dp->next) { if(dp->todo == 1) @@ -867,7 +1251,8 @@ void match_disklist(disklist_t *origqp, int sargc, char **sargv) (match_disk(sargv[i], dp->name) || (dp->device && match_disk(sargv[i], dp->device)))) { if(match_a_host) { - error("Argument %s match a host and a disk",sargv[i]); + error(_("Argument %s cannot be both a host and a disk"),sargv[i]); + /*NOTREACHED*/ } else { if(dp->todo == -1) { @@ -891,8 +1276,9 @@ void match_disklist(disklist_t *origqp, int sargc, char **sargv) prev_match = 1; } else { + char *errstr1 = vstrallocf(_("Argument '%s' matches neither a host nor a disk.\n"), sargv[i]); + vstrextend(&errstr, errstr1, NULL); prev_match = 0; - /*error("%s match nothing",sargv[i]);*/ } } } @@ -909,81 +1295,98 @@ void match_disklist(disklist_t *origqp, int sargc, char **sargv) if(dp->todo == -1) dp->todo = 0; } + + return errstr; +} + +netif_t * +disklist_netifs(void) +{ + return all_netifs; } - #ifdef TEST -void -dump_disk(dp) -disk_t *dp; +static void dump_disk(const disk_t *); +static void dump_disklist(const disklist_t *); +int main(int, char *[]); + +static void +dump_disk( + const disk_t * dp) { - printf(" DISK %s (HOST %s, LINE %d) TYPE %s NAME %s SPINDLE %d\n", + g_printf(_(" DISK %s (HOST %s, LINE %d) TYPE %s NAME %s SPINDLE %d\n"), dp->name, dp->host->hostname, dp->line, dp->dtype_name, dp->name == NULL? "(null)": dp->name, dp->spindle); } -void -dump_disklist() +static void +dump_disklist( + const disklist_t * lst) { - disk_t *dp, *prev; - host_t *hp; + const disk_t *dp, *prev; + const am_host_t *hp; if(hostlist == NULL) { - printf("DISKLIST not read in\n"); + g_printf(_("DISKLIST not read in\n")); return; } - printf("DISKLIST BY HOSTNAME:\n"); + g_printf(_("DISKLIST BY HOSTNAME:\n")); for(hp = hostlist; hp != NULL; hp = hp->next) { - printf("HOST %s INTERFACE %s\n", + char *if_name = NULL; + if (hp->netif && hp->netif->config) + if_name = interface_name(hp->netif->config); + + g_printf(_("HOST %s INTERFACE %s\n"), hp->hostname, - (hp->netif == NULL||hp->netif->name == NULL) ? "(null)" - : hp->netif->name); + if_name ? _("(null)") : if_name); for(dp = hp->disks; dp != NULL; dp = dp->hostnext) dump_disk(dp); putchar('\n'); } - printf("DISKLIST IN FILE ORDER:\n"); + g_printf(_("DISKLIST IN FILE ORDER:\n")); prev = NULL; - for(dp = lst.head; dp != NULL; prev = dp, dp = dp->next) { + for(dp = lst->head; dp != NULL; prev = dp, dp = dp->next) { dump_disk(dp); /* check pointers */ - if(dp->prev != prev) printf("*** prev pointer mismatch!\n"); - if(dp->next == NULL && lst.tail != dp) printf("tail mismatch!\n"); + if(dp->prev != prev) g_printf(_("*** prev pointer mismatch!\n")); + if(dp->next == NULL && lst->tail != dp) g_printf(_("tail mismatch!\n")); } } int -main(argc, argv) -int argc; -char *argv[]; +main( + int argc, + char ** argv) { char *conffile; char *conf_diskfile; + disklist_t lst; int result; - int fd; - unsigned long malloc_hist_1, malloc_size_1; - unsigned long malloc_hist_2, malloc_size_2; - for(fd = 3; fd < FD_SETSIZE; fd++) { - /* - * Make sure nobody spoofs us with a lot of extra open files - * that would cause an open we do to get a very high file - * descriptor, which in turn might be used as an index into - * an array (e.g. an fd_set). - */ - close(fd); - } + /* + * Configure program for internationalization: + * 1) Only set the message locale for now. + * 2) Set textdomain for all amanda related programs to "amanda" + * We don't want to be forced to support dozens of message catalogs. + */ + setlocale(LC_MESSAGES, "C"); + textdomain("amanda"); + + safe_fd(-1, 0); set_pname("diskfile"); - malloc_size_1 = malloc_inuse(&malloc_hist_1); + dbopen(DBG_SUBDIR_SERVER); + + /* Don't die when child closes pipe */ + signal(SIGPIPE, SIG_IGN); if (argc>1) { config_name = argv[1]; @@ -998,27 +1401,16 @@ char *argv[]; } conffile = stralloc2(config_dir, CONFFILE_NAME); if((result = read_conffile(conffile)) == 0) { - conf_diskfile = getconf_str(CNF_DISKFILE); - if (*conf_diskfile == '/') { - conf_diskfile = stralloc(conf_diskfile); - } else { - conf_diskfile = stralloc2(config_dir, conf_diskfile); - } - if((result = (read_diskfile(conf_diskfile) == NULL)) == 0) { - dump_disklist(); + conf_diskfile = config_dir_relative(getconf_str(CNF_DISKFILE)); + result = read_diskfile(conf_diskfile, &lst); + if(result == 0) { + dump_disklist(&lst); } amfree(conf_diskfile); } amfree(conffile); amfree(config_dir); - malloc_size_2 = malloc_inuse(&malloc_hist_2); - - if(malloc_size_1 != malloc_size_2) { - malloc_list(fileno(stderr), malloc_hist_1, malloc_hist_2); - } - return result; } - #endif /* TEST */