Imported Upstream version 3.2.0
[debian/amanda] / perl / Amanda / Cmdline.swg
index 678443867fab80019b1f9aadca43a1ff7d650334..b908c9575c4066076721a06bced96f8a27939e2d 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * Copyright (c) 2007,2008,2009 Zmanda, Inc.  All Rights Reserved.
+ * Copyright (c) 2007, 2008, 2009, 2010 Zmanda, Inc.  All Rights Reserved.
  *
  * This program is free software; you can redistribute it and/or modify it
  * under the terms of the GNU General Public License version 2 as published
@@ -39,12 +39,13 @@ typedef struct dumpspec_t {
     char *disk;
     char *datestamp;
     char *level;
+    char *write_timestamp;
     %mutable;
 
     %extend {
        /* constructor */
-       dumpspec_t(char *host, char *disk, char *datestamp, char *level) {
-           return dumpspec_new(host, disk, datestamp, level);
+       dumpspec_t(char *host, char *disk, char *datestamp, char *level, char *write_timestamp) {
+           return dumpspec_new(host, disk, datestamp, level, write_timestamp);
        }
 
        ~dumpspec_t() {
@@ -93,6 +94,7 @@ amglue_add_flag_tag_fns(cmdline_parse_dumpspecs_flags);
 amglue_add_constant(CMDLINE_PARSE_DATESTAMP, cmdline_parse_dumpspecs_flags);
 amglue_add_constant(CMDLINE_PARSE_LEVEL, cmdline_parse_dumpspecs_flags);
 amglue_add_constant(CMDLINE_EMPTY_TO_WILDCARD, cmdline_parse_dumpspecs_flags);
+amglue_copy_to_tag(cmdline_parse_dumpspecs_flags, constants);
 
 %rename(parse_dumpspecs) cmdline_parse_dumpspecs;
 amglue_dumpspec_list *cmdline_parse_dumpspecs(int argc, char **argv, int flags);
@@ -141,4 +143,4 @@ gboolean header_matches_dumpspecs(dumpfile_t *dumpfile, amglue_dumpspec_list *du
 }
 %}
 
-amglue_export_ok(header_matches_dumpspecs);
+amglue_export_ok(header_matches_dumpspecs parse_dumpspecs format_dumpspec_components);