2 * Amanda, The Advanced Maryland Automatic Network Disk Archiver
3 * Copyright (c) 1991-1999 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: fileheader.c 6512 2007-05-24 17:00:24Z ian $
31 #include "fileheader.h"
36 static const char * filetype2str(filetype_t);
37 static filetype_t str2filetype(const char *);
38 static void strange_header(dumpfile_t *, const char *,
39 size_t, const char *, const char *);
40 static char *quote_heredoc(char *text, char *delimiter_prefix);
41 static char *parse_heredoc(char *line, char **saveptr);
47 memset(file, '\0', SIZEOF(*file));
65 g_debug("strange amanda header: \"%.*s\"", (int)buflen, buffer);
66 g_debug("Expected: \"%s\" Actual: \"%s\"", expected, actual);
71 /* chop whitespace off of a string, in place */
80 /* trim leading space */
81 while (g_ascii_isspace(*s)) { s++; }
83 memmove(str, s, strlen(s)+1);
85 /* trim trailing space */
87 for (s = str+strlen(str)-1; s >= str; s--) {
88 if (!g_ascii_isspace(*s))
101 char *buf, *line, *tok, *line1;
105 char *saveptr = NULL;
107 /* put the buffer into a writable chunk of memory and nul-term it */
108 buf = alloc(buflen + 1);
109 memcpy(buf, buffer, buflen);
113 /* extract the first unquoted line */
115 for (line = buf, lsize = 0; lsize < buflen; line++) {
116 if ((*line == '\n') && !in_quotes)
120 in_quotes = !in_quotes;
121 } else if ((*line == '\\') && (*(line + 1) == '"')) {
128 line1 = alloc(lsize + 1);
129 strncpy(line1, buf, lsize);
133 tok = strtok_r(line1, " ", &saveptr);
135 g_debug("Empty amanda header: buflen=%zu lsize=%zu", buflen, lsize);
136 strange_header(file, buffer, buflen, _("<Non-empty line>"), tok);
140 if (strcmp(tok, "NETDUMP:") != 0 && strcmp(tok, "AMANDA:") != 0) {
142 file->type = F_UNKNOWN;
147 tok = strtok_r(NULL, " ", &saveptr);
149 strange_header(file, buffer, buflen, _("<file type>"), tok);
152 file->type = str2filetype(tok);
154 switch (file->type) {
156 tok = strtok_r(NULL, " ", &saveptr);
157 if ((tok == NULL) || (strcmp(tok, "DATE") != 0)) {
158 strange_header(file, buffer, buflen, "DATE", tok);
162 tok = strtok_r(NULL, " ", &saveptr);
164 strange_header(file, buffer, buflen, _("<date stamp>"), tok);
167 strncpy(file->datestamp, tok, SIZEOF(file->datestamp) - 1);
169 tok = strtok_r(NULL, " ", &saveptr);
170 if ((tok == NULL) || (strcmp(tok, "TAPE") != 0)) {
171 strange_header(file, buffer, buflen, "TAPE", tok);
175 tok = strtok_r(NULL, " ", &saveptr);
177 strange_header(file, buffer, buflen, _("<file type>"), tok);
180 strncpy(file->name, tok, SIZEOF(file->name) - 1);
184 case F_CONT_DUMPFILE:
185 case F_SPLIT_DUMPFILE:
186 tok = strtok_r(NULL, " ", &saveptr);
188 strange_header(file, buffer, buflen, _("<date stamp>"), tok);
191 strncpy(file->datestamp, tok, SIZEOF(file->datestamp) - 1);
193 tok = strtok_r(NULL, " ", &saveptr);
195 strange_header(file, buffer, buflen, _("<file name>"), tok);
198 strncpy(file->name, tok, SIZEOF(file->name) - 1);
200 tok = strquotedstr(&saveptr);
202 strange_header(file, buffer, buflen, _("<disk name>"), tok);
205 uqname = unquote_string(tok);
206 strncpy(file->disk, uqname, SIZEOF(file->disk) - 1);
209 if(file->type == F_SPLIT_DUMPFILE) {
210 tok = strtok_r(NULL, " ", &saveptr);
211 if (tok == NULL || strcmp(tok, "part") != 0) {
212 strange_header(file, buffer, buflen, "part", tok);
216 tok = strtok_r(NULL, "/", &saveptr);
217 if ((tok == NULL) || (sscanf(tok, "%d", &file->partnum) != 1)) {
218 strange_header(file, buffer, buflen, _("<part num param>"), tok);
222 /* If totalparts == -1, then the original dump was done in
223 streaming mode (no holding disk), thus we don't know how
224 many parts there are. */
225 tok = strtok_r(NULL, " ", &saveptr);
226 if((tok == NULL) || (sscanf(tok, "%d", &file->totalparts) != 1)) {
227 strange_header(file, buffer, buflen, _("<total parts param>"), tok);
230 } else if (file->type == F_DUMPFILE) {
231 /* only one part in this dump, so call it partnum 1 */
233 file->totalparts = 1;
236 file->totalparts = 0;
239 tok = strtok_r(NULL, " ", &saveptr);
240 if ((tok == NULL) || (strcmp(tok, "lev") != 0)) {
241 strange_header(file, buffer, buflen, "lev", tok);
245 tok = strtok_r(NULL, " ", &saveptr);
246 if ((tok == NULL) || (sscanf(tok, "%d", &file->dumplevel) != 1)) {
247 strange_header(file, buffer, buflen, _("<dump level param>"), tok);
251 tok = strtok_r(NULL, " ", &saveptr);
252 if ((tok == NULL) || (strcmp(tok, "comp") != 0)) {
253 strange_header(file, buffer, buflen, "comp", tok);
257 tok = strtok_r(NULL, " ", &saveptr);
259 strange_header(file, buffer, buflen, _("<comp param>"), tok);
262 strncpy(file->comp_suffix, tok, SIZEOF(file->comp_suffix) - 1);
264 file->compressed = (0 != strcmp(file->comp_suffix, "N"));
265 if (file->compressed) {
266 /* compatibility with pre-2.2 amanda */
267 if (strcmp(file->comp_suffix, "C") == 0)
268 strncpy(file->comp_suffix, ".Z", SIZEOF(file->comp_suffix) - 1);
270 strcpy(file->comp_suffix, "");
273 tok = strtok_r(NULL, " ", &saveptr);
274 /* "program" is optional */
275 if (tok == NULL || strcmp(tok, "program") != 0) {
279 tok = strtok_r(NULL, " ", &saveptr);
281 strange_header(file, buffer, buflen, _("<program name>"), tok);
284 strncpy(file->program, tok, SIZEOF(file->program) - 1);
286 if ((tok = strtok_r(NULL, " ", &saveptr)) == NULL)
287 break; /* reached the end of the buffer */
289 /* encryption is optional */
290 if (BSTRNCMP(tok, "crypt") == 0) {
291 tok = strtok_r(NULL, " ", &saveptr);
293 strange_header(file, buffer, buflen, _("<crypt param>"), tok);
296 strncpy(file->encrypt_suffix, tok,
297 SIZEOF(file->encrypt_suffix) - 1);
300 /* for compatibility with who-knows-what, allow "comp N" to be
301 * equivalent to no compression */
302 if (0 == BSTRNCMP(file->encrypt_suffix, "N")) {
304 strcpy(file->encrypt_suffix, "");
307 if ((tok = strtok_r(NULL, " ", &saveptr)) == NULL)
311 /* "srvcompprog" is optional */
312 if (BSTRNCMP(tok, "server_custom_compress") == 0) {
313 tok = strtok_r(NULL, " ", &saveptr);
315 strange_header(file, buffer, buflen,
316 _("<server custom compress param>"), tok);
319 strncpy(file->srvcompprog, tok, SIZEOF(file->srvcompprog) - 1);
320 if ((tok = strtok_r(NULL, " ", &saveptr)) == NULL)
324 /* "clntcompprog" is optional */
325 if (BSTRNCMP(tok, "client_custom_compress") == 0) {
326 tok = strtok_r(NULL, " ", &saveptr);
328 strange_header(file, buffer, buflen,
329 _("<client custom compress param>"), tok);
332 strncpy(file->clntcompprog, tok, SIZEOF(file->clntcompprog) - 1);
333 if ((tok = strtok_r(NULL, " ", &saveptr)) == NULL)
337 /* "srv_encrypt" is optional */
338 if (BSTRNCMP(tok, "server_encrypt") == 0) {
339 tok = strtok_r(NULL, " ", &saveptr);
341 strange_header(file, buffer, buflen,
342 _("<server encrypt param>"), tok);
345 strncpy(file->srv_encrypt, tok, SIZEOF(file->srv_encrypt) - 1);
346 if ((tok = strtok_r(NULL, " ", &saveptr)) == NULL)
350 /* "clnt_encrypt" is optional */
351 if (BSTRNCMP(tok, "client_encrypt") == 0) {
352 tok = strtok_r(NULL, " ", &saveptr);
354 strange_header(file, buffer, buflen,
355 _("<client encrypt param>"), tok);
358 strncpy(file->clnt_encrypt, tok, SIZEOF(file->clnt_encrypt) - 1);
359 if ((tok = strtok_r(NULL, " ", &saveptr)) == NULL)
363 /* "srv_decrypt_opt" is optional */
364 if (BSTRNCMP(tok, "server_decrypt_option") == 0) {
365 tok = strtok_r(NULL, " ", &saveptr);
367 strange_header(file, buffer, buflen,
368 _("<server decrypt param>"), tok);
371 strncpy(file->srv_decrypt_opt, tok,
372 SIZEOF(file->srv_decrypt_opt) - 1);
373 if ((tok = strtok_r(NULL, " ", &saveptr)) == NULL)
377 /* "clnt_decrypt_opt" is optional */
378 if (BSTRNCMP(tok, "client_decrypt_option") == 0) {
379 tok = strtok_r(NULL, " ", &saveptr);
381 strange_header(file, buffer, buflen,
382 _("<client decrypt param>"), tok);
385 strncpy(file->clnt_decrypt_opt, tok,
386 SIZEOF(file->clnt_decrypt_opt) - 1);
387 if ((tok = strtok_r(NULL, " ", &saveptr)) == NULL)
394 tok = strtok_r(NULL, " ", &saveptr);
395 /* DATE is optional */
397 if (strcmp(tok, "DATE") == 0) {
398 tok = strtok_r(NULL, " ", &saveptr);
400 file->datestamp[0] = '\0';
402 strncpy(file->datestamp, tok, SIZEOF(file->datestamp) - 1);
404 strange_header(file, buffer, buflen, _("<DATE>"), tok);
407 file->datestamp[0] = '\0';
412 /* nothing follows */
416 strange_header(file, buffer, buflen,
417 _("TAPESTART|DUMPFILE|CONT_DUMPFILE|SPLIT_DUMPFILE|TAPEEND|NOOP"), tok);
421 (void)strtok_r(buf, "\n", &saveptr); /* this is the first line */
422 /* iterate through the rest of the lines */
423 while ((line = strtok_r(NULL, "\n", &saveptr)) != NULL) {
424 #define SC "CONT_FILENAME="
425 if (strncmp(line, SC, SIZEOF(SC) - 1) == 0) {
426 line += SIZEOF(SC) - 1;
427 strncpy(file->cont_filename, line,
428 SIZEOF(file->cont_filename) - 1);
433 #define SC "PARTIAL="
434 if (strncmp(line, SC, SIZEOF(SC) - 1) == 0) {
435 line += SIZEOF(SC) - 1;
436 file->is_partial = !strcasecmp(line, "yes");
440 #define SC "APPLICATION="
441 if (strncmp(line, SC, SIZEOF(SC) - 1) == 0) {
442 line += SIZEOF(SC) - 1;
443 strncpy(file->application, line,
444 SIZEOF(file->application) - 1);
449 #define SC "ORIGSIZE="
450 if (strncmp(line, SC, SIZEOF(SC) - 1) == 0) {
451 line += SIZEOF(SC) - 1;
452 file->orig_size = OFF_T_ATOI(line);
457 if (strncmp(line, SC, SIZEOF(SC) - 1) == 0) {
458 line += SIZEOF(SC) - 1;
459 file->dle_str = parse_heredoc(line, &saveptr);
463 #define SC _("To restore, position tape at start of file and run:")
464 if (strncmp(line, SC, SIZEOF(SC) - 1) == 0)
468 #define SC "\tdd if=<tape> "
469 if (strncmp(line, SC, SIZEOF(SC) - 1) == 0) {
470 char *cmd1, *cmd2, *cmd3=NULL;
472 /* skip over dd command */
473 if ((cmd1 = strchr(line, '|')) == NULL) {
475 strncpy(file->recover_cmd, "BUG",
476 SIZEOF(file->recover_cmd) - 1);
481 /* block out first pipeline command */
482 if ((cmd2 = strchr(cmd1, '|')) != NULL) {
484 if ((cmd3 = strchr(cmd2, '|')) != NULL)
488 /* clean up some extra spaces in various fields */
493 /* three cmds: decrypt | uncompress | recover
494 * two cmds: uncompress | recover
495 * XXX note that if there are two cmds, the first one
496 * XXX could be either uncompress or decrypt. Since no
497 * XXX code actually call uncompress_cmd/decrypt_cmd, it's ok
498 * XXX for header information.
504 strncpy(file->recover_cmd, cmd1,
505 SIZEOF(file->recover_cmd) - 1);
507 g_snprintf(file->uncompress_cmd,
508 SIZEOF(file->uncompress_cmd), "%s |", cmd1);
509 strncpy(file->recover_cmd, cmd2,
510 SIZEOF(file->recover_cmd) - 1);
512 } else { /* cmd3 presents: decrypt | uncompress | recover */
513 g_snprintf(file->decrypt_cmd,
514 SIZEOF(file->decrypt_cmd), "%s |", cmd1);
515 g_snprintf(file->uncompress_cmd,
516 SIZEOF(file->uncompress_cmd), "%s |", cmd2);
517 strncpy(file->recover_cmd, cmd3,
518 SIZEOF(file->recover_cmd) - 1);
523 /* XXX complain about weird lines? */
533 const dumpfile_t *file)
535 g_debug(_("Contents of *(dumpfile_t *)%p:"), file);
536 g_debug(_(" type = %d (%s)"),
537 file->type, filetype2str(file->type));
538 g_debug(_(" datestamp = '%s'"), file->datestamp);
539 g_debug(_(" dumplevel = %d"), file->dumplevel);
540 g_debug(_(" compressed = %d"), file->compressed);
541 g_debug(_(" encrypted = %d"), file->encrypted);
542 g_debug(_(" comp_suffix = '%s'"), file->comp_suffix);
543 g_debug(_(" encrypt_suffix = '%s'"), file->encrypt_suffix);
544 g_debug(_(" name = '%s'"), file->name);
545 g_debug(_(" disk = '%s'"), file->disk);
546 g_debug(_(" program = '%s'"), file->program);
547 g_debug(_(" application = '%s'"), file->application);
548 g_debug(_(" srvcompprog = '%s'"), file->srvcompprog);
549 g_debug(_(" clntcompprog = '%s'"), file->clntcompprog);
550 g_debug(_(" srv_encrypt = '%s'"), file->srv_encrypt);
551 g_debug(_(" clnt_encrypt = '%s'"), file->clnt_encrypt);
552 g_debug(_(" recover_cmd = '%s'"), file->recover_cmd);
553 g_debug(_(" uncompress_cmd = '%s'"), file->uncompress_cmd);
554 g_debug(_(" decrypt_cmd = '%s'"), file->decrypt_cmd);
555 g_debug(_(" srv_decrypt_opt = '%s'"), file->srv_decrypt_opt);
556 g_debug(_(" clnt_decrypt_opt = '%s'"), file->clnt_decrypt_opt);
557 g_debug(_(" cont_filename = '%s'"), file->cont_filename);
559 g_debug(_(" dle_str = %s"), file->dle_str);
561 g_debug(_(" dle_str = (null)"));
562 g_debug(_(" is_partial = %d"), file->is_partial);
563 g_debug(_(" partnum = %d"), file->partnum);
564 g_debug(_(" totalparts = %d"), file->totalparts);
566 g_debug(_(" blocksize = %zu"), file->blocksize);
570 validate_nonempty_str(
574 if (strlen(val) == 0) {
575 error(_("Invalid %s '%s'\n"), name, val);
582 const char *val1, const char *val2,
583 const char *name1, const char *name2)
585 if (*val1 && *val2) {
586 error("cannot set both %s and %s\n", name1, name2);
595 if (strchr(val, ' ') != NULL) {
596 error(_("%s cannot contain spaces\n"), name);
606 if (strlen(cmd) && cmd[strlen(cmd)-1] != '|') {
607 error("invalid %s (must end with '|'): '%s'\n", name, cmd);
612 validate_encrypt_suffix(
617 if (!suff[0] || (0 == strcmp(suff, "N"))) {
618 error(_("Invalid encrypt_suffix '%s'\n"), suff);
621 if (suff[0] && (0 != strcmp(suff, "N"))) {
622 error(_("Invalid header: encrypt_suffix '%s' specified but not encrypted\n"), suff);
629 const char *datestamp)
631 if (strcmp(datestamp, "X") == 0) {
635 if ((strlen(datestamp) == 8) && match("^[0-9]{8}$", datestamp)) {
638 if ((strlen(datestamp) == 14) && match("^[0-9]{14}$", datestamp)) {
641 error(_("Invalid datestamp '%s'\n"), datestamp);
648 const int totalparts)
651 error(_("Invalid partnum (%d)\n"), partnum);
655 if (partnum > totalparts && totalparts >= 0) {
656 error(_("Invalid partnum (%d) > totalparts (%d)\n"),
657 partnum, totalparts);
663 build_header(const dumpfile_t * file, size_t *size, size_t max_size)
665 GString *rval, *split_data;
670 min_size = size? *size : max_size;
671 g_debug(_("Building type %s header of %zu-%zu bytes with name='%s' disk='%s' dumplevel=%d and blocksize=%zu"),
672 filetype2str(file->type), min_size, max_size,
673 file->name, file->disk, file->dumplevel, file->blocksize);
675 rval = g_string_sized_new(min_size);
676 split_data = g_string_sized_new(10);
678 switch (file->type) {
680 validate_nonempty_str(file->name, "name");
681 validate_datestamp(file->datestamp);
682 g_string_printf(rval,
683 "AMANDA: TAPESTART DATE %s TAPE %s\n\014\n",
684 file->datestamp, file->name);
687 case F_SPLIT_DUMPFILE:
688 validate_parts(file->partnum, file->totalparts);
689 g_string_printf(split_data,
690 " part %d/%d ", file->partnum, file->totalparts);
693 case F_CONT_DUMPFILE:
695 validate_nonempty_str(file->name, "name");
696 validate_nonempty_str(file->program, "program");
697 validate_datestamp(file->datestamp);
698 validate_encrypt_suffix(file->encrypted, file->encrypt_suffix);
699 qname = quote_string(file->disk);
700 program = stralloc(file->program);
701 if (match("^.*[.][Ee][Xx][Ee]$", program)) {
702 /* Trim ".exe" from program name */
703 program[strlen(program) - strlen(".exe")] = '\0';
705 g_string_printf(rval,
706 "AMANDA: %s %s %s %s %s lev %d comp %s program %s",
707 filetype2str(file->type),
708 file->datestamp, file->name, qname,
711 file->compressed? file->comp_suffix : "N",
716 /* only output crypt if it's enabled */
717 if (file->encrypted) {
718 g_string_append_printf(rval, " crypt %s", file->encrypt_suffix);
721 validate_not_both(file->srvcompprog, file->clntcompprog,
722 "srvcompprog", "clntcompprog");
723 if (*file->srvcompprog) {
724 validate_no_space(file->srvcompprog, "srvcompprog");
725 g_string_append_printf(rval, " server_custom_compress %s",
727 } else if (*file->clntcompprog) {
728 validate_no_space(file->clntcompprog, "clntcompprog");
729 g_string_append_printf(rval, " client_custom_compress %s",
733 validate_not_both(file->srv_encrypt, file->clnt_encrypt,
734 "srv_encrypt", "clnt_encrypt");
735 if (*file->srv_encrypt) {
736 validate_no_space(file->srv_encrypt, "srv_encrypt");
737 g_string_append_printf(rval, " server_encrypt %s",
739 } else if (*file->clnt_encrypt) {
740 validate_no_space(file->clnt_encrypt, "clnt_encrypt");
741 g_string_append_printf(rval, " client_encrypt %s",
745 validate_not_both(file->srv_decrypt_opt, file->clnt_decrypt_opt,
746 "srv_decrypt_opt", "clnt_decrypt_opt");
747 if (*file->srv_decrypt_opt) {
748 validate_no_space(file->srv_decrypt_opt, "srv_decrypt_opt");
749 g_string_append_printf(rval, " server_decrypt_option %s",
750 file->srv_decrypt_opt);
751 } else if (*file->clnt_decrypt_opt) {
752 g_string_append_printf(rval, " client_decrypt_option %s",
753 file->clnt_decrypt_opt);
756 g_string_append_printf(rval, "\n");
758 if (file->cont_filename[0] != '\0') {
759 g_string_append_printf(rval, "CONT_FILENAME=%s\n",
760 file->cont_filename);
762 if (file->application[0] != '\0') {
763 g_string_append_printf(rval, "APPLICATION=%s\n", file->application);
765 if (file->is_partial != 0) {
766 g_string_append_printf(rval, "PARTIAL=YES\n");
768 if (file->orig_size > 0) {
769 g_string_append_printf(rval, "ORIGSIZE=%jd\n",
770 (intmax_t)file->orig_size);
772 if (file->dle_str && strlen(file->dle_str) < max_size-2048) {
773 char *heredoc = quote_heredoc(file->dle_str, "ENDDLE");
774 g_string_append_printf(rval, "DLE=%s\n", heredoc);
778 g_string_append_printf(rval,
779 _("To restore, position tape at start of file and run:\n"));
781 g_string_append_printf(rval, "\tdd if=<tape> ");
783 g_string_append_printf(rval, "bs=%zuk ",
784 file->blocksize / 1024);
785 g_string_append_printf(rval, "skip=1 | ");
786 if (*file->recover_cmd) {
787 if (*file->decrypt_cmd) {
788 validate_pipe_cmd(file->decrypt_cmd, "decrypt_cmd");
789 g_string_append_printf(rval, "%s ", file->decrypt_cmd);
791 if (*file->uncompress_cmd) {
792 validate_pipe_cmd(file->uncompress_cmd, "uncompress_cmd");
793 g_string_append_printf(rval, "%s ", file->uncompress_cmd);
795 g_string_append_printf(rval, "%s ", file->recover_cmd);
797 if (*file->uncompress_cmd || *file->decrypt_cmd)
798 error("cannot specify uncompress_cmd or decrypt_cmd without recover_cmd\n");
800 /* \014 == ^L == form feed */
801 g_string_append_printf(rval, "\n\014\n");
805 validate_datestamp(file->datestamp);
806 g_string_printf(rval, "AMANDA: TAPEEND DATE %s\n\014\n",
811 g_string_printf(rval, "AMANDA: NOOP\n\014\n");
818 error(_("Invalid header type: %d (%s)"),
819 file->type, filetype2str(file->type));
823 g_string_free(split_data, TRUE);
826 if (rval->len > max_size) {
827 g_debug("header is larger than %zu bytes -- cannot create", max_size);
828 g_string_free(rval, TRUE);
832 /* Clear extra bytes. */
833 if (rval->len < min_size) {
834 bzero(rval->str + rval->len, rval->allocated_len - rval->len);
837 *size = MAX(min_size, (size_t)rval->len);
839 return g_string_free(rval, FALSE);
845 const dumpfile_t * file)
847 char *summ = summarize_header(file);
848 g_fprintf(outf, "%s\n", summ);
853 * Prints the contents of the file structure.
857 const dumpfile_t * file)
864 return g_strdup(_("EMPTY file"));
867 return g_strdup(_("UNKNOWN file"));
871 return g_strdup(_("WEIRD file"));
874 return g_strdup_printf(_("start of tape: date %s label %s"),
875 file->datestamp, file->name);
878 return g_strdup(_("NOOP file"));
881 case F_CONT_DUMPFILE:
882 qdisk = quote_string(file->disk);
883 summ = g_string_new("");
884 g_string_printf(summ, "%s: date %s host %s disk %s lev %d comp %s",
885 filetype2str(file->type), file->datestamp, file->name,
886 qdisk, file->dumplevel,
887 file->compressed? file->comp_suffix : "N");
891 case F_SPLIT_DUMPFILE: {
892 char totalparts[NUM_STR_SIZE*2];
893 if(file->totalparts > 0)
894 g_snprintf(totalparts, SIZEOF(totalparts), "%d", file->totalparts);
896 g_snprintf(totalparts, SIZEOF(totalparts), "UNKNOWN");
897 qdisk = quote_string(file->disk);
898 summ = g_string_new("");
899 g_string_printf(summ, "split dumpfile: date %s host %s disk %s"
900 " part %d/%s lev %d comp %s",
901 file->datestamp, file->name, qdisk, file->partnum,
902 totalparts, file->dumplevel,
903 file->compressed? file->comp_suffix : "N");
910 g_string_append_printf(summ, " program %s", file->program);
911 if (strcmp(file->encrypt_suffix, "enc") == 0)
912 g_string_append_printf(summ, " crypt %s", file->encrypt_suffix);
913 if (*file->srvcompprog)
914 g_string_append_printf(summ, " server_custom_compress %s", file->srvcompprog);
915 if (*file->clntcompprog)
916 g_string_append_printf(summ, " client_custom_compress %s", file->clntcompprog);
917 if (*file->srv_encrypt)
918 g_string_append_printf(summ, " server_encrypt %s", file->srv_encrypt);
919 if (*file->clnt_encrypt)
920 g_string_append_printf(summ, " client_encrypt %s", file->clnt_encrypt);
921 if (*file->srv_decrypt_opt)
922 g_string_append_printf(summ, " server_decrypt_option %s", file->srv_decrypt_opt);
923 if (*file->clnt_decrypt_opt)
924 g_string_append_printf(summ, " client_decrypt_option %s", file->clnt_decrypt_opt);
925 return g_string_free(summ, FALSE);
928 return g_strdup_printf("end of tape: date %s", file->datestamp);
935 const dumpfile_t * file)
937 if(strcmp(file->comp_suffix, ".Z") == 0)
940 if(strcmp(file->comp_suffix, ".gz") == 0)
943 if(strcmp(file->comp_suffix, "cust") == 0)
948 static const struct {
952 { F_UNKNOWN, "UNKNOWN" },
953 { F_WEIRD, "WEIRD" },
954 { F_TAPESTART, "TAPESTART" },
955 { F_TAPEEND, "TAPEEND" },
956 { F_DUMPFILE, "FILE" },
957 { F_CONT_DUMPFILE, "CONT_FILE" },
958 { F_SPLIT_DUMPFILE, "SPLIT_FILE" },
961 #define NFILETYPES (size_t)(sizeof(filetypetab) / sizeof(filetypetab[0]))
969 for (i = 0; i < (int)NFILETYPES; i++)
970 if (filetypetab[i].type == type)
971 return (filetypetab[i].str);
981 for (i = 0; i < (int)NFILETYPES; i++)
982 if (strcmp(filetypetab[i].str, str) == 0)
983 return (filetypetab[i].type);
987 gboolean headers_are_equal(dumpfile_t * a, dumpfile_t * b) {
988 if (a == NULL && b == NULL)
991 if (a == NULL || b == NULL)
994 if (a->type != b->type) return FALSE;
995 if (strcmp(a->datestamp, b->datestamp)) return FALSE;
996 if (a->dumplevel != b->dumplevel) return FALSE;
997 if (a->compressed != b->compressed) return FALSE;
998 if (a->encrypted != b->encrypted) return FALSE;
999 if (strcmp(a->comp_suffix, b->comp_suffix)) return FALSE;
1000 if (strcmp(a->encrypt_suffix, b->encrypt_suffix)) return FALSE;
1001 if (strcmp(a->name, b->name)) return FALSE;
1002 if (strcmp(a->disk, b->disk)) return FALSE;
1003 if (strcmp(a->program, b->program)) return FALSE;
1004 if (strcmp(a->application, b->application)) return FALSE;
1005 if (strcmp(a->srvcompprog, b->srvcompprog)) return FALSE;
1006 if (strcmp(a->clntcompprog, b->clntcompprog)) return FALSE;
1007 if (strcmp(a->srv_encrypt, b->srv_encrypt)) return FALSE;
1008 if (strcmp(a->clnt_encrypt, b->clnt_encrypt)) return FALSE;
1009 if (strcmp(a->recover_cmd, b->recover_cmd)) return FALSE;
1010 if (strcmp(a->uncompress_cmd, b->uncompress_cmd)) return FALSE;
1011 if (strcmp(a->decrypt_cmd, b->decrypt_cmd)) return FALSE;
1012 if (strcmp(a->srv_decrypt_opt, b->srv_decrypt_opt)) return FALSE;
1013 if (strcmp(a->clnt_decrypt_opt, b->clnt_decrypt_opt)) return FALSE;
1014 if (strcmp(a->cont_filename, b->cont_filename)) return FALSE;
1015 if (a->dle_str != b->dle_str && a->dle_str && b->dle_str
1016 && strcmp(a->dle_str, b->dle_str)) return FALSE;
1017 if (a->is_partial != b->is_partial) return FALSE;
1018 if (a->partnum != b->partnum) return FALSE;
1019 if (a->totalparts != b->totalparts) return FALSE;
1020 if (a->blocksize != b->blocksize) return FALSE;
1022 return TRUE; /* ok, they're the same */
1025 dumpfile_t * dumpfile_copy(dumpfile_t* source) {
1026 dumpfile_t* rval = malloc(sizeof(dumpfile_t));
1027 memcpy(rval, source, sizeof(dumpfile_t));
1028 if (rval->dle_str) rval->dle_str = stralloc(rval->dle_str);
1033 dumpfile_copy_in_place(
1037 memcpy(dest, source, sizeof(dumpfile_t));
1038 if (dest->dle_str) dest->dle_str = stralloc(dest->dle_str);
1041 void dumpfile_free_data(dumpfile_t* info) {
1043 amfree(info->dle_str);
1047 void dumpfile_free(dumpfile_t* info) {
1048 dumpfile_free_data(info);
1052 static char *quote_heredoc(
1054 char *delimiter_prefix)
1056 char *delimiter = stralloc(delimiter_prefix);
1057 int delimiter_n = 0;
1058 int delimiter_len = strlen(delimiter);
1061 /* keep picking delimiters until we find one that's not a line in TEXT */
1065 gboolean found_delimiter = FALSE;
1068 if (*c == '\n' || *c == '\0') {
1069 int linelen = c - line;
1070 if (linelen == delimiter_len && 0 == strncmp(line, delimiter, linelen)) {
1071 found_delimiter = TRUE;
1080 if (!found_delimiter)
1083 delimiter = newvstrallocf(delimiter, "%s%d", delimiter_prefix, ++delimiter_n);
1084 delimiter_len = strlen(delimiter);
1087 /* we have a delimiter .. now use it */
1088 quoted = vstrallocf("<<%s\n%s\n%s", delimiter, text, delimiter);
1093 static char *parse_heredoc(
1097 char *result = NULL;
1099 if (strncmp(line, "<<", 2) == 0) {
1100 char *keyword = line+2;
1103 while((new_line = strtok_r(NULL, "\n", saveptr)) != NULL &&
1104 strcmp(new_line, keyword) != 0) {
1105 result = vstrextend(&result, new_line, "\n", NULL);
1107 /* make sure we have something */
1109 result = g_strdup("");
1110 /* remove latest '\n' */
1111 else if (strlen(result) > 0)
1112 result[strlen(result)-1] = '\0';
1114 result = stralloc(line);