--- /dev/null
+# This file was automatically generated by SWIG (http://www.swig.org).
+# Version 1.3.33
+#
+# Don't modify this file, modify the SWIG interface instead.
+
+package Amanda::Types;
+require Exporter;
+require DynaLoader;
+@ISA = qw(Exporter DynaLoader);
+package Amanda::Typesc;
+bootstrap Amanda::Types;
+package Amanda::Types;
+@EXPORT = qw( );
+
+# ---------- BASE METHODS -------------
+
+package Amanda::Types;
+
+sub TIEHASH {
+ my ($classname,$obj) = @_;
+ return bless $obj, $classname;
+}
+
+sub CLEAR { }
+
+sub FIRSTKEY { }
+
+sub NEXTKEY { }
+
+sub FETCH {
+ my ($self,$field) = @_;
+ my $member_func = "swig_${field}_get";
+ $self->$member_func();
+}
+
+sub STORE {
+ my ($self,$field,$newval) = @_;
+ my $member_func = "swig_${field}_set";
+ $self->$member_func($newval);
+}
+
+sub this {
+ my $ptr = shift;
+ return tied(%$ptr);
+}
+
+
+# ------- FUNCTION WRAPPERS --------
+
+package Amanda::Types;
+
+
+############# Class : Amanda::Types::dumpfile_t ##############
+
+package Amanda::Types::dumpfile_t;
+use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);
+@ISA = qw( Amanda::Types );
+%OWNER = ();
+%ITERATORS = ();
+*swig_type_get = *Amanda::Typesc::dumpfile_t_type_get;
+*swig_type_set = *Amanda::Typesc::dumpfile_t_type_set;
+*swig_datestamp_get = *Amanda::Typesc::dumpfile_t_datestamp_get;
+*swig_datestamp_set = *Amanda::Typesc::dumpfile_t_datestamp_set;
+*swig_dumplevel_get = *Amanda::Typesc::dumpfile_t_dumplevel_get;
+*swig_dumplevel_set = *Amanda::Typesc::dumpfile_t_dumplevel_set;
+*swig_compressed_get = *Amanda::Typesc::dumpfile_t_compressed_get;
+*swig_compressed_set = *Amanda::Typesc::dumpfile_t_compressed_set;
+*swig_encrypted_get = *Amanda::Typesc::dumpfile_t_encrypted_get;
+*swig_encrypted_set = *Amanda::Typesc::dumpfile_t_encrypted_set;
+*swig_comp_suffix_get = *Amanda::Typesc::dumpfile_t_comp_suffix_get;
+*swig_comp_suffix_set = *Amanda::Typesc::dumpfile_t_comp_suffix_set;
+*swig_encrypt_suffix_get = *Amanda::Typesc::dumpfile_t_encrypt_suffix_get;
+*swig_encrypt_suffix_set = *Amanda::Typesc::dumpfile_t_encrypt_suffix_set;
+*swig_name_get = *Amanda::Typesc::dumpfile_t_name_get;
+*swig_name_set = *Amanda::Typesc::dumpfile_t_name_set;
+*swig_disk_get = *Amanda::Typesc::dumpfile_t_disk_get;
+*swig_disk_set = *Amanda::Typesc::dumpfile_t_disk_set;
+*swig_program_get = *Amanda::Typesc::dumpfile_t_program_get;
+*swig_program_set = *Amanda::Typesc::dumpfile_t_program_set;
+*swig_dumper_get = *Amanda::Typesc::dumpfile_t_dumper_get;
+*swig_dumper_set = *Amanda::Typesc::dumpfile_t_dumper_set;
+*swig_srvcompprog_get = *Amanda::Typesc::dumpfile_t_srvcompprog_get;
+*swig_srvcompprog_set = *Amanda::Typesc::dumpfile_t_srvcompprog_set;
+*swig_clntcompprog_get = *Amanda::Typesc::dumpfile_t_clntcompprog_get;
+*swig_clntcompprog_set = *Amanda::Typesc::dumpfile_t_clntcompprog_set;
+*swig_srv_encrypt_get = *Amanda::Typesc::dumpfile_t_srv_encrypt_get;
+*swig_srv_encrypt_set = *Amanda::Typesc::dumpfile_t_srv_encrypt_set;
+*swig_clnt_encrypt_get = *Amanda::Typesc::dumpfile_t_clnt_encrypt_get;
+*swig_clnt_encrypt_set = *Amanda::Typesc::dumpfile_t_clnt_encrypt_set;
+*swig_recover_cmd_get = *Amanda::Typesc::dumpfile_t_recover_cmd_get;
+*swig_recover_cmd_set = *Amanda::Typesc::dumpfile_t_recover_cmd_set;
+*swig_uncompress_cmd_get = *Amanda::Typesc::dumpfile_t_uncompress_cmd_get;
+*swig_uncompress_cmd_set = *Amanda::Typesc::dumpfile_t_uncompress_cmd_set;
+*swig_encrypt_cmd_get = *Amanda::Typesc::dumpfile_t_encrypt_cmd_get;
+*swig_encrypt_cmd_set = *Amanda::Typesc::dumpfile_t_encrypt_cmd_set;
+*swig_decrypt_cmd_get = *Amanda::Typesc::dumpfile_t_decrypt_cmd_get;
+*swig_decrypt_cmd_set = *Amanda::Typesc::dumpfile_t_decrypt_cmd_set;
+*swig_srv_decrypt_opt_get = *Amanda::Typesc::dumpfile_t_srv_decrypt_opt_get;
+*swig_srv_decrypt_opt_set = *Amanda::Typesc::dumpfile_t_srv_decrypt_opt_set;
+*swig_clnt_decrypt_opt_get = *Amanda::Typesc::dumpfile_t_clnt_decrypt_opt_get;
+*swig_clnt_decrypt_opt_set = *Amanda::Typesc::dumpfile_t_clnt_decrypt_opt_set;
+*swig_cont_filename_get = *Amanda::Typesc::dumpfile_t_cont_filename_get;
+*swig_cont_filename_set = *Amanda::Typesc::dumpfile_t_cont_filename_set;
+*swig_is_partial_get = *Amanda::Typesc::dumpfile_t_is_partial_get;
+*swig_is_partial_set = *Amanda::Typesc::dumpfile_t_is_partial_set;
+*swig_partnum_get = *Amanda::Typesc::dumpfile_t_partnum_get;
+*swig_partnum_set = *Amanda::Typesc::dumpfile_t_partnum_set;
+*swig_totalparts_get = *Amanda::Typesc::dumpfile_t_totalparts_get;
+*swig_totalparts_set = *Amanda::Typesc::dumpfile_t_totalparts_set;
+*swig_blocksize_get = *Amanda::Typesc::dumpfile_t_blocksize_get;
+*swig_blocksize_set = *Amanda::Typesc::dumpfile_t_blocksize_set;
+sub new {
+ my $pkg = shift;
+ my $self = Amanda::Typesc::new_dumpfile_t(@_);
+ bless $self, $pkg if defined($self);
+}
+
+sub DESTROY {
+ return unless $_[0]->isa('HASH');
+ my $self = tied(%{$_[0]});
+ return unless defined $self;
+ delete $ITERATORS{$self};
+ if (exists $OWNER{$self}) {
+ Amanda::Typesc::delete_dumpfile_t($self);
+ delete $OWNER{$self};
+ }
+}
+
+sub DISOWN {
+ my $self = shift;
+ my $ptr = tied(%$self);
+ delete $OWNER{$ptr};
+}
+
+sub ACQUIRE {
+ my $self = shift;
+ my $ptr = tied(%$self);
+ $OWNER{$ptr} = 1;
+}
+
+
+# ------- VARIABLE STUBS --------
+
+package Amanda::Types;
+
+*F_UNKNOWN = *Amanda::Typesc::F_UNKNOWN;
+*F_WEIRD = *Amanda::Typesc::F_WEIRD;
+*F_TAPESTART = *Amanda::Typesc::F_TAPESTART;
+*F_TAPEEND = *Amanda::Typesc::F_TAPEEND;
+*F_DUMPFILE = *Amanda::Typesc::F_DUMPFILE;
+*F_CONT_DUMPFILE = *Amanda::Typesc::F_CONT_DUMPFILE;
+*F_SPLIT_DUMPFILE = *Amanda::Typesc::F_SPLIT_DUMPFILE;
+*F_EMPTY = *Amanda::Typesc::F_EMPTY;
+
+@EXPORT_OK = ();
+%EXPORT_TAGS = ();
+
+=head1 NAME
+
+Amanda::Types - Amanda data structures that are shared by several modules
+
+=head1 SYNOPSIS
+
+This module includes several types which are not specific to any
+single other module.
+
+=head1 API STATUS
+
+New structures may be added, but existing types are stable.
+
+=head1 dumpfile_t
+
+An in-memory representation of an Amanda header, with keys
+=over
+=item C<type>;
+=item C<datestamp>;
+=item C<dumplevel>;
+=item C<compressed>;
+=item C<encrypted>;
+=item C<comp_suffix>;
+=item C<encrypt_suffix>;
+=item C<name> -- hostname or label;
+=item C<disk>;
+=item C<program>;
+=item C<dumper>;
+=item C<srvcompprog>;
+=item C<clntcompprog>;
+=item C<srv_encrypt>;
+=item C<clnt_encrypt>;
+=item C<recover_cmd>;
+=item C<uncompress_cmd>;
+=item C<encrypt_cmd>;
+=item C<decrypt_cmd>;
+=item C<srv_decrypt_opt>;
+=item C<clnt_decrypt_opt>;
+=item C<cont_filename>;
+=item C<is_partial>;
+=item C<partnum>;
+=item C<totalparts> (-1 == UNKNOWN); and
+=item blocksize.
+=back
+
+where C<type> is one of the following constants, which are availble
+for import in the tag C<:filetype_t>:
+=over
+=item C<F_UNKNOWN>;
+=item C<F_WEIRD>;
+=item C<F_TAPESTART>;
+=item C<F_TAPEEND>;
+=item C<F_DUMPFILE>;
+=item C<F_CONT_DUMPFILE>;
+=item C<F_SPLIT_DUMPFILE>; or
+=item C<F_EMPTY>.
+=back
+
+NOTE: no methods are currently defined on C<dumpfile_t>; interfaces
+can be written as needed.
+
+=cut
+
+push @EXPORT_OK, qw(filetype_t_to_strings);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw(filetype_t_to_strings);
+
+my %_filetype_t_VALUES;
+#Convert a flag value to a list of names for flags that are set.
+sub filetype_t_to_strings {
+ my ($flags) = @_;
+ my @result = ();
+
+ for my $k (keys %_filetype_t_VALUES) {
+ my $v = $_filetype_t_VALUES{$k};
+
+ #is this a matching flag?
+ if (($v == 0 && $flags == 0) || ($v != 0 && ($flags & $v) == $v)) {
+ push @result, $k;
+ }
+ }
+
+#by default, just return the number as a 1-element list
+ if (!@result) {
+ return ($flags);
+ }
+
+ return @result;
+}
+
+push @EXPORT_OK, qw($F_UNKNOWN);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw($F_UNKNOWN);
+
+$_filetype_t_VALUES{"F_UNKNOWN"} = $F_UNKNOWN;
+
+push @EXPORT_OK, qw($F_WEIRD);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw($F_WEIRD);
+
+$_filetype_t_VALUES{"F_WEIRD"} = $F_WEIRD;
+
+push @EXPORT_OK, qw($F_TAPESTART);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw($F_TAPESTART);
+
+$_filetype_t_VALUES{"F_TAPESTART"} = $F_TAPESTART;
+
+push @EXPORT_OK, qw($F_TAPEEND);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw($F_TAPEEND);
+
+$_filetype_t_VALUES{"F_TAPEEND"} = $F_TAPEEND;
+
+push @EXPORT_OK, qw($F_DUMPFILE);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw($F_DUMPFILE);
+
+$_filetype_t_VALUES{"F_DUMPFILE"} = $F_DUMPFILE;
+
+push @EXPORT_OK, qw($F_CONT_DUMPFILE);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw($F_CONT_DUMPFILE);
+
+$_filetype_t_VALUES{"F_CONT_DUMPFILE"} = $F_CONT_DUMPFILE;
+
+push @EXPORT_OK, qw($F_SPLIT_DUMPFILE);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw($F_SPLIT_DUMPFILE);
+
+$_filetype_t_VALUES{"F_SPLIT_DUMPFILE"} = $F_SPLIT_DUMPFILE;
+
+push @EXPORT_OK, qw($F_EMPTY);
+push @{$EXPORT_TAGS{"filetype_t"}}, qw($F_EMPTY);
+
+$_filetype_t_VALUES{"F_EMPTY"} = $F_EMPTY;
+1;
projects / debian / amanda / blobdiff