1 # This file was automatically generated by SWIG (http://www.swig.org).

     2 # Version 1.3.35

     3 #

     4 # Don't modify this file, modify the SWIG interface instead.

     5 

     6 package dtnapi;

     7 require Exporter;

     8 require DynaLoader;

     9 @ISA = qw(Exporter DynaLoader);

    10 package dtnapic;

    11 bootstrap dtnapi;

    12 package dtnapi;

    13 @EXPORT = qw( );

    14 

    15 # ---------- BASE METHODS -------------

    16 

    17 package dtnapi;

    18 

    19 sub TIEHASH {

    20     my ($classname,$obj) = @_;

    21     return bless $obj, $classname;

    22 }

    23 

    24 sub CLEAR { }

    25 

    26 sub FIRSTKEY { }

    27 

    28 sub NEXTKEY { }

    29 

    30 sub FETCH {

    31     my ($self,$field) = @_;

    32     my $member_func = "swig_${field}_get";

    33     $self->$member_func();

    34 }

    35 

    36 sub STORE {

    37     my ($self,$field,$newval) = @_;

    38     my $member_func = "swig_${field}_set";

    39     $self->$member_func($newval);

    40 }

    41 

    42 sub this {

    43     my $ptr = shift;

    44     return tied(%$ptr);

    45 }

    46 

    47 

    48 # ------- FUNCTION WRAPPERS --------

    49 

    50 package dtnapi;

    51 

    52 *xdr_dtn_endpoint_id_t = *dtnapic::xdr_dtn_endpoint_id_t;

    53 *xdr_dtn_reg_id_t = *dtnapic::xdr_dtn_reg_id_t;

    54 *xdr_dtn_timeval_t = *dtnapic::xdr_dtn_timeval_t;

    55 *xdr_dtn_timestamp_t = *dtnapic::xdr_dtn_timestamp_t;

    56 *xdr_dtn_service_tag_t = *dtnapic::xdr_dtn_service_tag_t;

    57 *xdr_dtn_reg_flags_t = *dtnapic::xdr_dtn_reg_flags_t;

    58 *xdr_dtn_reg_info_t = *dtnapic::xdr_dtn_reg_info_t;

    59 *xdr_dtn_bundle_priority_t = *dtnapic::xdr_dtn_bundle_priority_t;

    60 *xdr_dtn_bundle_delivery_opts_t = *dtnapic::xdr_dtn_bundle_delivery_opts_t;

    61 *xdr_dtn_extension_block_flags_t = *dtnapic::xdr_dtn_extension_block_flags_t;

    62 *xdr_dtn_extension_block_t = *dtnapic::xdr_dtn_extension_block_t;

    63 *xdr_dtn_sequence_id_t = *dtnapic::xdr_dtn_sequence_id_t;

    64 *xdr_dtn_bundle_spec_t = *dtnapic::xdr_dtn_bundle_spec_t;

    65 *xdr_dtn_bundle_id_t = *dtnapic::xdr_dtn_bundle_id_t;

    66 *xdr_dtn_status_report_reason_t = *dtnapic::xdr_dtn_status_report_reason_t;

    67 *xdr_dtn_status_report_flags_t = *dtnapic::xdr_dtn_status_report_flags_t;

    68 *xdr_dtn_bundle_status_report_t = *dtnapic::xdr_dtn_bundle_status_report_t;

    69 *xdr_dtn_bundle_payload_location_t = *dtnapic::xdr_dtn_bundle_payload_location_t;

    70 *xdr_dtn_bundle_payload_t = *dtnapic::xdr_dtn_bundle_payload_t;

    71 *dtn_strerror = *dtnapic::dtn_strerror;

    72 *dtn_open = *dtnapic::dtn_open;

    73 *find_handle = *dtnapic::find_handle;

    74 *dtn_close = *dtnapic::dtn_close;

    75 *dtn_errno = *dtnapic::dtn_errno;

    76 *dtn_build_local_eid = *dtnapic::dtn_build_local_eid;

    77 *build_reginfo = *dtnapic::build_reginfo;

    78 *dtn_register = *dtnapic::dtn_register;

    79 *dtn_unregister = *dtnapic::dtn_unregister;

    80 *dtn_find_registration = *dtnapic::dtn_find_registration;

    81 *dtn_change_registration = *dtnapic::dtn_change_registration;

    82 *dtn_bind = *dtnapic::dtn_bind;

    83 *dtn_unbind = *dtnapic::dtn_unbind;

    84 *dtn_send = *dtnapic::dtn_send;

    85 *dtn_cancel = *dtnapic::dtn_cancel;

    86 *dtn_status_report_reason_to_str = *dtnapic::dtn_status_report_reason_to_str;

    87 *dtn_recv = *dtnapic::dtn_recv;

    88 *dtn_session_update = *dtnapic::dtn_session_update;

    89 *dtn_poll_fd = *dtnapic::dtn_poll_fd;

    90 *dtn_begin_poll = *dtnapic::dtn_begin_poll;

    91 *dtn_cancel_poll = *dtnapic::dtn_cancel_poll;

    92 

    93 ############# Class : dtnapi::dtn_endpoint_id_t ##############

    94 

    95 package dtnapi::dtn_endpoint_id_t;

    96 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

    97 @ISA = qw( dtnapi );

    98 %OWNER = ();

    99 %ITERATORS = ();

   100 *swig_uri_get = *dtnapic::dtn_endpoint_id_t_uri_get;

   101 *swig_uri_set = *dtnapic::dtn_endpoint_id_t_uri_set;

   102 sub new {

   103     my $pkg = shift;

   104     my $self = dtnapic::new_dtn_endpoint_id_t(@_);

   105     bless $self, $pkg if defined($self);

   106 }

   107 

   108 sub DESTROY {

   109     return unless $_[0]->isa('HASH');

   110     my $self = tied(%{$_[0]});

   111     return unless defined $self;

   112     delete $ITERATORS{$self};

   113     if (exists $OWNER{$self}) {

   114         dtnapic::delete_dtn_endpoint_id_t($self);

   115         delete $OWNER{$self};

   116     }

   117 }

   118 

   119 sub DISOWN {

   120     my $self = shift;

   121     my $ptr = tied(%$self);

   122     delete $OWNER{$ptr};

   123 }

   124 

   125 sub ACQUIRE {

   126     my $self = shift;

   127     my $ptr = tied(%$self);

   128     $OWNER{$ptr} = 1;

   129 }

   130 

   131 

   132 ############# Class : dtnapi::dtn_timestamp_t ##############

   133 

   134 package dtnapi::dtn_timestamp_t;

   135 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   136 @ISA = qw( dtnapi );

   137 %OWNER = ();

   138 %ITERATORS = ();

   139 *swig_secs_get = *dtnapic::dtn_timestamp_t_secs_get;

   140 *swig_secs_set = *dtnapic::dtn_timestamp_t_secs_set;

   141 *swig_seqno_get = *dtnapic::dtn_timestamp_t_seqno_get;

   142 *swig_seqno_set = *dtnapic::dtn_timestamp_t_seqno_set;

   143 sub new {

   144     my $pkg = shift;

   145     my $self = dtnapic::new_dtn_timestamp_t(@_);

   146     bless $self, $pkg if defined($self);

   147 }

   148 

   149 sub DESTROY {

   150     return unless $_[0]->isa('HASH');

   151     my $self = tied(%{$_[0]});

   152     return unless defined $self;

   153     delete $ITERATORS{$self};

   154     if (exists $OWNER{$self}) {

   155         dtnapic::delete_dtn_timestamp_t($self);

   156         delete $OWNER{$self};

   157     }

   158 }

   159 

   160 sub DISOWN {

   161     my $self = shift;

   162     my $ptr = tied(%$self);

   163     delete $OWNER{$ptr};

   164 }

   165 

   166 sub ACQUIRE {

   167     my $self = shift;

   168     my $ptr = tied(%$self);

   169     $OWNER{$ptr} = 1;

   170 }

   171 

   172 

   173 ############# Class : dtnapi::dtn_service_tag_t ##############

   174 

   175 package dtnapi::dtn_service_tag_t;

   176 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   177 @ISA = qw( dtnapi );

   178 %OWNER = ();

   179 %ITERATORS = ();

   180 *swig_tag_get = *dtnapic::dtn_service_tag_t_tag_get;

   181 *swig_tag_set = *dtnapic::dtn_service_tag_t_tag_set;

   182 sub new {

   183     my $pkg = shift;

   184     my $self = dtnapic::new_dtn_service_tag_t(@_);

   185     bless $self, $pkg if defined($self);

   186 }

   187 

   188 sub DESTROY {

   189     return unless $_[0]->isa('HASH');

   190     my $self = tied(%{$_[0]});

   191     return unless defined $self;

   192     delete $ITERATORS{$self};

   193     if (exists $OWNER{$self}) {

   194         dtnapic::delete_dtn_service_tag_t($self);

   195         delete $OWNER{$self};

   196     }

   197 }

   198 

   199 sub DISOWN {

   200     my $self = shift;

   201     my $ptr = tied(%$self);

   202     delete $OWNER{$ptr};

   203 }

   204 

   205 sub ACQUIRE {

   206     my $self = shift;

   207     my $ptr = tied(%$self);

   208     $OWNER{$ptr} = 1;

   209 }

   210 

   211 

   212 ############# Class : dtnapi::dtn_reg_info_t ##############

   213 

   214 package dtnapi::dtn_reg_info_t;

   215 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   216 @ISA = qw( dtnapi );

   217 %OWNER = ();

   218 %ITERATORS = ();

   219 *swig_endpoint_get = *dtnapic::dtn_reg_info_t_endpoint_get;

   220 *swig_endpoint_set = *dtnapic::dtn_reg_info_t_endpoint_set;

   221 *swig_regid_get = *dtnapic::dtn_reg_info_t_regid_get;

   222 *swig_regid_set = *dtnapic::dtn_reg_info_t_regid_set;

   223 *swig_flags_get = *dtnapic::dtn_reg_info_t_flags_get;

   224 *swig_flags_set = *dtnapic::dtn_reg_info_t_flags_set;

   225 *swig_expiration_get = *dtnapic::dtn_reg_info_t_expiration_get;

   226 *swig_expiration_set = *dtnapic::dtn_reg_info_t_expiration_set;

   227 *swig_init_passive_get = *dtnapic::dtn_reg_info_t_init_passive_get;

   228 *swig_init_passive_set = *dtnapic::dtn_reg_info_t_init_passive_set;

   229 *swig_script_get = *dtnapic::dtn_reg_info_t_script_get;

   230 *swig_script_set = *dtnapic::dtn_reg_info_t_script_set;

   231 sub new {

   232     my $pkg = shift;

   233     my $self = dtnapic::new_dtn_reg_info_t(@_);

   234     bless $self, $pkg if defined($self);

   235 }

   236 

   237 sub DESTROY {

   238     return unless $_[0]->isa('HASH');

   239     my $self = tied(%{$_[0]});

   240     return unless defined $self;

   241     delete $ITERATORS{$self};

   242     if (exists $OWNER{$self}) {

   243         dtnapic::delete_dtn_reg_info_t($self);

   244         delete $OWNER{$self};

   245     }

   246 }

   247 

   248 sub DISOWN {

   249     my $self = shift;

   250     my $ptr = tied(%$self);

   251     delete $OWNER{$ptr};

   252 }

   253 

   254 sub ACQUIRE {

   255     my $self = shift;

   256     my $ptr = tied(%$self);

   257     $OWNER{$ptr} = 1;

   258 }

   259 

   260 

   261 ############# Class : dtnapi::dtn_reg_info_t_script ##############

   262 

   263 package dtnapi::dtn_reg_info_t_script;

   264 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   265 @ISA = qw( dtnapi );

   266 %OWNER = ();

   267 %ITERATORS = ();

   268 *swig_script_len_get = *dtnapic::dtn_reg_info_t_script_script_len_get;

   269 *swig_script_len_set = *dtnapic::dtn_reg_info_t_script_script_len_set;

   270 *swig_script_val_get = *dtnapic::dtn_reg_info_t_script_script_val_get;

   271 *swig_script_val_set = *dtnapic::dtn_reg_info_t_script_script_val_set;

   272 sub new {

   273     my $pkg = shift;

   274     my $self = dtnapic::new_dtn_reg_info_t_script(@_);

   275     bless $self, $pkg if defined($self);

   276 }

   277 

   278 sub DESTROY {

   279     return unless $_[0]->isa('HASH');

   280     my $self = tied(%{$_[0]});

   281     return unless defined $self;

   282     delete $ITERATORS{$self};

   283     if (exists $OWNER{$self}) {

   284         dtnapic::delete_dtn_reg_info_t_script($self);

   285         delete $OWNER{$self};

   286     }

   287 }

   288 

   289 sub DISOWN {

   290     my $self = shift;

   291     my $ptr = tied(%$self);

   292     delete $OWNER{$ptr};

   293 }

   294 

   295 sub ACQUIRE {

   296     my $self = shift;

   297     my $ptr = tied(%$self);

   298     $OWNER{$ptr} = 1;

   299 }

   300 

   301 

   302 ############# Class : dtnapi::dtn_extension_block_t ##############

   303 

   304 package dtnapi::dtn_extension_block_t;

   305 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   306 @ISA = qw( dtnapi );

   307 %OWNER = ();

   308 %ITERATORS = ();

   309 *swig_type_get = *dtnapic::dtn_extension_block_t_type_get;

   310 *swig_type_set = *dtnapic::dtn_extension_block_t_type_set;

   311 *swig_flags_get = *dtnapic::dtn_extension_block_t_flags_get;

   312 *swig_flags_set = *dtnapic::dtn_extension_block_t_flags_set;

   313 *swig_data_get = *dtnapic::dtn_extension_block_t_data_get;

   314 *swig_data_set = *dtnapic::dtn_extension_block_t_data_set;

   315 sub new {

   316     my $pkg = shift;

   317     my $self = dtnapic::new_dtn_extension_block_t(@_);

   318     bless $self, $pkg if defined($self);

   319 }

   320 

   321 sub DESTROY {

   322     return unless $_[0]->isa('HASH');

   323     my $self = tied(%{$_[0]});

   324     return unless defined $self;

   325     delete $ITERATORS{$self};

   326     if (exists $OWNER{$self}) {

   327         dtnapic::delete_dtn_extension_block_t($self);

   328         delete $OWNER{$self};

   329     }

   330 }

   331 

   332 sub DISOWN {

   333     my $self = shift;

   334     my $ptr = tied(%$self);

   335     delete $OWNER{$ptr};

   336 }

   337 

   338 sub ACQUIRE {

   339     my $self = shift;

   340     my $ptr = tied(%$self);

   341     $OWNER{$ptr} = 1;

   342 }

   343 

   344 

   345 ############# Class : dtnapi::dtn_extension_block_t_data ##############

   346 

   347 package dtnapi::dtn_extension_block_t_data;

   348 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   349 @ISA = qw( dtnapi );

   350 %OWNER = ();

   351 %ITERATORS = ();

   352 *swig_data_len_get = *dtnapic::dtn_extension_block_t_data_data_len_get;

   353 *swig_data_len_set = *dtnapic::dtn_extension_block_t_data_data_len_set;

   354 *swig_data_val_get = *dtnapic::dtn_extension_block_t_data_data_val_get;

   355 *swig_data_val_set = *dtnapic::dtn_extension_block_t_data_data_val_set;

   356 sub new {

   357     my $pkg = shift;

   358     my $self = dtnapic::new_dtn_extension_block_t_data(@_);

   359     bless $self, $pkg if defined($self);

   360 }

   361 

   362 sub DESTROY {

   363     return unless $_[0]->isa('HASH');

   364     my $self = tied(%{$_[0]});

   365     return unless defined $self;

   366     delete $ITERATORS{$self};

   367     if (exists $OWNER{$self}) {

   368         dtnapic::delete_dtn_extension_block_t_data($self);

   369         delete $OWNER{$self};

   370     }

   371 }

   372 

   373 sub DISOWN {

   374     my $self = shift;

   375     my $ptr = tied(%$self);

   376     delete $OWNER{$ptr};

   377 }

   378 

   379 sub ACQUIRE {

   380     my $self = shift;

   381     my $ptr = tied(%$self);

   382     $OWNER{$ptr} = 1;

   383 }

   384 

   385 

   386 ############# Class : dtnapi::dtn_sequence_id_t ##############

   387 

   388 package dtnapi::dtn_sequence_id_t;

   389 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   390 @ISA = qw( dtnapi );

   391 %OWNER = ();

   392 %ITERATORS = ();

   393 *swig_data_get = *dtnapic::dtn_sequence_id_t_data_get;

   394 *swig_data_set = *dtnapic::dtn_sequence_id_t_data_set;

   395 sub new {

   396     my $pkg = shift;

   397     my $self = dtnapic::new_dtn_sequence_id_t(@_);

   398     bless $self, $pkg if defined($self);

   399 }

   400 

   401 sub DESTROY {

   402     return unless $_[0]->isa('HASH');

   403     my $self = tied(%{$_[0]});

   404     return unless defined $self;

   405     delete $ITERATORS{$self};

   406     if (exists $OWNER{$self}) {

   407         dtnapic::delete_dtn_sequence_id_t($self);

   408         delete $OWNER{$self};

   409     }

   410 }

   411 

   412 sub DISOWN {

   413     my $self = shift;

   414     my $ptr = tied(%$self);

   415     delete $OWNER{$ptr};

   416 }

   417 

   418 sub ACQUIRE {

   419     my $self = shift;

   420     my $ptr = tied(%$self);

   421     $OWNER{$ptr} = 1;

   422 }

   423 

   424 

   425 ############# Class : dtnapi::dtn_sequence_id_t_data ##############

   426 

   427 package dtnapi::dtn_sequence_id_t_data;

   428 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   429 @ISA = qw( dtnapi );

   430 %OWNER = ();

   431 %ITERATORS = ();

   432 *swig_data_len_get = *dtnapic::dtn_sequence_id_t_data_data_len_get;

   433 *swig_data_len_set = *dtnapic::dtn_sequence_id_t_data_data_len_set;

   434 *swig_data_val_get = *dtnapic::dtn_sequence_id_t_data_data_val_get;

   435 *swig_data_val_set = *dtnapic::dtn_sequence_id_t_data_data_val_set;

   436 sub new {

   437     my $pkg = shift;

   438     my $self = dtnapic::new_dtn_sequence_id_t_data(@_);

   439     bless $self, $pkg if defined($self);

   440 }

   441 

   442 sub DESTROY {

   443     return unless $_[0]->isa('HASH');

   444     my $self = tied(%{$_[0]});

   445     return unless defined $self;

   446     delete $ITERATORS{$self};

   447     if (exists $OWNER{$self}) {

   448         dtnapic::delete_dtn_sequence_id_t_data($self);

   449         delete $OWNER{$self};

   450     }

   451 }

   452 

   453 sub DISOWN {

   454     my $self = shift;

   455     my $ptr = tied(%$self);

   456     delete $OWNER{$ptr};

   457 }

   458 

   459 sub ACQUIRE {

   460     my $self = shift;

   461     my $ptr = tied(%$self);

   462     $OWNER{$ptr} = 1;

   463 }

   464 

   465 

   466 ############# Class : dtnapi::dtn_bundle_spec_t ##############

   467 

   468 package dtnapi::dtn_bundle_spec_t;

   469 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   470 @ISA = qw( dtnapi );

   471 %OWNER = ();

   472 %ITERATORS = ();

   473 *swig_source_get = *dtnapic::dtn_bundle_spec_t_source_get;

   474 *swig_source_set = *dtnapic::dtn_bundle_spec_t_source_set;

   475 *swig_dest_get = *dtnapic::dtn_bundle_spec_t_dest_get;

   476 *swig_dest_set = *dtnapic::dtn_bundle_spec_t_dest_set;

   477 *swig_replyto_get = *dtnapic::dtn_bundle_spec_t_replyto_get;

   478 *swig_replyto_set = *dtnapic::dtn_bundle_spec_t_replyto_set;

   479 *swig_priority_get = *dtnapic::dtn_bundle_spec_t_priority_get;

   480 *swig_priority_set = *dtnapic::dtn_bundle_spec_t_priority_set;

   481 *swig_dopts_get = *dtnapic::dtn_bundle_spec_t_dopts_get;

   482 *swig_dopts_set = *dtnapic::dtn_bundle_spec_t_dopts_set;

   483 *swig_expiration_get = *dtnapic::dtn_bundle_spec_t_expiration_get;

   484 *swig_expiration_set = *dtnapic::dtn_bundle_spec_t_expiration_set;

   485 *swig_creation_ts_get = *dtnapic::dtn_bundle_spec_t_creation_ts_get;

   486 *swig_creation_ts_set = *dtnapic::dtn_bundle_spec_t_creation_ts_set;

   487 *swig_delivery_regid_get = *dtnapic::dtn_bundle_spec_t_delivery_regid_get;

   488 *swig_delivery_regid_set = *dtnapic::dtn_bundle_spec_t_delivery_regid_set;

   489 *swig_sequence_id_get = *dtnapic::dtn_bundle_spec_t_sequence_id_get;

   490 *swig_sequence_id_set = *dtnapic::dtn_bundle_spec_t_sequence_id_set;

   491 *swig_obsoletes_id_get = *dtnapic::dtn_bundle_spec_t_obsoletes_id_get;

   492 *swig_obsoletes_id_set = *dtnapic::dtn_bundle_spec_t_obsoletes_id_set;

   493 *swig_metadata_get = *dtnapic::dtn_bundle_spec_t_metadata_get;

   494 *swig_metadata_set = *dtnapic::dtn_bundle_spec_t_metadata_set;

   495 *swig_blocks_get = *dtnapic::dtn_bundle_spec_t_blocks_get;

   496 *swig_blocks_set = *dtnapic::dtn_bundle_spec_t_blocks_set;

   497 sub new {

   498     my $pkg = shift;

   499     my $self = dtnapic::new_dtn_bundle_spec_t(@_);

   500     bless $self, $pkg if defined($self);

   501 }

   502 

   503 sub DESTROY {

   504     return unless $_[0]->isa('HASH');

   505     my $self = tied(%{$_[0]});

   506     return unless defined $self;

   507     delete $ITERATORS{$self};

   508     if (exists $OWNER{$self}) {

   509         dtnapic::delete_dtn_bundle_spec_t($self);

   510         delete $OWNER{$self};

   511     }

   512 }

   513 

   514 sub DISOWN {

   515     my $self = shift;

   516     my $ptr = tied(%$self);

   517     delete $OWNER{$ptr};

   518 }

   519 

   520 sub ACQUIRE {

   521     my $self = shift;

   522     my $ptr = tied(%$self);

   523     $OWNER{$ptr} = 1;

   524 }

   525 

   526 

   527 ############# Class : dtnapi::dtn_bundle_spec_t_metadata ##############

   528 

   529 package dtnapi::dtn_bundle_spec_t_metadata;

   530 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   531 @ISA = qw( dtnapi );

   532 %OWNER = ();

   533 %ITERATORS = ();

   534 *swig_metadata_len_get = *dtnapic::dtn_bundle_spec_t_metadata_metadata_len_get;

   535 *swig_metadata_len_set = *dtnapic::dtn_bundle_spec_t_metadata_metadata_len_set;

   536 *swig_metadata_val_get = *dtnapic::dtn_bundle_spec_t_metadata_metadata_val_get;

   537 *swig_metadata_val_set = *dtnapic::dtn_bundle_spec_t_metadata_metadata_val_set;

   538 sub new {

   539     my $pkg = shift;

   540     my $self = dtnapic::new_dtn_bundle_spec_t_metadata(@_);

   541     bless $self, $pkg if defined($self);

   542 }

   543 

   544 sub DESTROY {

   545     return unless $_[0]->isa('HASH');

   546     my $self = tied(%{$_[0]});

   547     return unless defined $self;

   548     delete $ITERATORS{$self};

   549     if (exists $OWNER{$self}) {

   550         dtnapic::delete_dtn_bundle_spec_t_metadata($self);

   551         delete $OWNER{$self};

   552     }

   553 }

   554 

   555 sub DISOWN {

   556     my $self = shift;

   557     my $ptr = tied(%$self);

   558     delete $OWNER{$ptr};

   559 }

   560 

   561 sub ACQUIRE {

   562     my $self = shift;

   563     my $ptr = tied(%$self);

   564     $OWNER{$ptr} = 1;

   565 }

   566 

   567 

   568 ############# Class : dtnapi::dtn_bundle_spec_t_blocks ##############

   569 

   570 package dtnapi::dtn_bundle_spec_t_blocks;

   571 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   572 @ISA = qw( dtnapi );

   573 %OWNER = ();

   574 %ITERATORS = ();

   575 *swig_blocks_len_get = *dtnapic::dtn_bundle_spec_t_blocks_blocks_len_get;

   576 *swig_blocks_len_set = *dtnapic::dtn_bundle_spec_t_blocks_blocks_len_set;

   577 *swig_blocks_val_get = *dtnapic::dtn_bundle_spec_t_blocks_blocks_val_get;

   578 *swig_blocks_val_set = *dtnapic::dtn_bundle_spec_t_blocks_blocks_val_set;

   579 sub new {

   580     my $pkg = shift;

   581     my $self = dtnapic::new_dtn_bundle_spec_t_blocks(@_);

   582     bless $self, $pkg if defined($self);

   583 }

   584 

   585 sub DESTROY {

   586     return unless $_[0]->isa('HASH');

   587     my $self = tied(%{$_[0]});

   588     return unless defined $self;

   589     delete $ITERATORS{$self};

   590     if (exists $OWNER{$self}) {

   591         dtnapic::delete_dtn_bundle_spec_t_blocks($self);

   592         delete $OWNER{$self};

   593     }

   594 }

   595 

   596 sub DISOWN {

   597     my $self = shift;

   598     my $ptr = tied(%$self);

   599     delete $OWNER{$ptr};

   600 }

   601 

   602 sub ACQUIRE {

   603     my $self = shift;

   604     my $ptr = tied(%$self);

   605     $OWNER{$ptr} = 1;

   606 }

   607 

   608 

   609 ############# Class : dtnapi::dtn_bundle_id_t ##############

   610 

   611 package dtnapi::dtn_bundle_id_t;

   612 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   613 @ISA = qw( dtnapi );

   614 %OWNER = ();

   615 %ITERATORS = ();

   616 *swig_source_get = *dtnapic::dtn_bundle_id_t_source_get;

   617 *swig_source_set = *dtnapic::dtn_bundle_id_t_source_set;

   618 *swig_creation_ts_get = *dtnapic::dtn_bundle_id_t_creation_ts_get;

   619 *swig_creation_ts_set = *dtnapic::dtn_bundle_id_t_creation_ts_set;

   620 *swig_frag_offset_get = *dtnapic::dtn_bundle_id_t_frag_offset_get;

   621 *swig_frag_offset_set = *dtnapic::dtn_bundle_id_t_frag_offset_set;

   622 *swig_orig_length_get = *dtnapic::dtn_bundle_id_t_orig_length_get;

   623 *swig_orig_length_set = *dtnapic::dtn_bundle_id_t_orig_length_set;

   624 sub new {

   625     my $pkg = shift;

   626     my $self = dtnapic::new_dtn_bundle_id_t(@_);

   627     bless $self, $pkg if defined($self);

   628 }

   629 

   630 sub DESTROY {

   631     return unless $_[0]->isa('HASH');

   632     my $self = tied(%{$_[0]});

   633     return unless defined $self;

   634     delete $ITERATORS{$self};

   635     if (exists $OWNER{$self}) {

   636         dtnapic::delete_dtn_bundle_id_t($self);

   637         delete $OWNER{$self};

   638     }

   639 }

   640 

   641 sub DISOWN {

   642     my $self = shift;

   643     my $ptr = tied(%$self);

   644     delete $OWNER{$ptr};

   645 }

   646 

   647 sub ACQUIRE {

   648     my $self = shift;

   649     my $ptr = tied(%$self);

   650     $OWNER{$ptr} = 1;

   651 }

   652 

   653 

   654 ############# Class : dtnapi::dtn_bundle_status_report_t ##############

   655 

   656 package dtnapi::dtn_bundle_status_report_t;

   657 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   658 @ISA = qw( dtnapi );

   659 %OWNER = ();

   660 %ITERATORS = ();

   661 *swig_bundle_id_get = *dtnapic::dtn_bundle_status_report_t_bundle_id_get;

   662 *swig_bundle_id_set = *dtnapic::dtn_bundle_status_report_t_bundle_id_set;

   663 *swig_reason_get = *dtnapic::dtn_bundle_status_report_t_reason_get;

   664 *swig_reason_set = *dtnapic::dtn_bundle_status_report_t_reason_set;

   665 *swig_flags_get = *dtnapic::dtn_bundle_status_report_t_flags_get;

   666 *swig_flags_set = *dtnapic::dtn_bundle_status_report_t_flags_set;

   667 *swig_receipt_ts_get = *dtnapic::dtn_bundle_status_report_t_receipt_ts_get;

   668 *swig_receipt_ts_set = *dtnapic::dtn_bundle_status_report_t_receipt_ts_set;

   669 *swig_custody_ts_get = *dtnapic::dtn_bundle_status_report_t_custody_ts_get;

   670 *swig_custody_ts_set = *dtnapic::dtn_bundle_status_report_t_custody_ts_set;

   671 *swig_forwarding_ts_get = *dtnapic::dtn_bundle_status_report_t_forwarding_ts_get;

   672 *swig_forwarding_ts_set = *dtnapic::dtn_bundle_status_report_t_forwarding_ts_set;

   673 *swig_delivery_ts_get = *dtnapic::dtn_bundle_status_report_t_delivery_ts_get;

   674 *swig_delivery_ts_set = *dtnapic::dtn_bundle_status_report_t_delivery_ts_set;

   675 *swig_deletion_ts_get = *dtnapic::dtn_bundle_status_report_t_deletion_ts_get;

   676 *swig_deletion_ts_set = *dtnapic::dtn_bundle_status_report_t_deletion_ts_set;

   677 *swig_ack_by_app_ts_get = *dtnapic::dtn_bundle_status_report_t_ack_by_app_ts_get;

   678 *swig_ack_by_app_ts_set = *dtnapic::dtn_bundle_status_report_t_ack_by_app_ts_set;

   679 sub new {

   680     my $pkg = shift;

   681     my $self = dtnapic::new_dtn_bundle_status_report_t(@_);

   682     bless $self, $pkg if defined($self);

   683 }

   684 

   685 sub DESTROY {

   686     return unless $_[0]->isa('HASH');

   687     my $self = tied(%{$_[0]});

   688     return unless defined $self;

   689     delete $ITERATORS{$self};

   690     if (exists $OWNER{$self}) {

   691         dtnapic::delete_dtn_bundle_status_report_t($self);

   692         delete $OWNER{$self};

   693     }

   694 }

   695 

   696 sub DISOWN {

   697     my $self = shift;

   698     my $ptr = tied(%$self);

   699     delete $OWNER{$ptr};

   700 }

   701 

   702 sub ACQUIRE {

   703     my $self = shift;

   704     my $ptr = tied(%$self);

   705     $OWNER{$ptr} = 1;

   706 }

   707 

   708 

   709 ############# Class : dtnapi::dtn_bundle_payload_t ##############

   710 

   711 package dtnapi::dtn_bundle_payload_t;

   712 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   713 @ISA = qw( dtnapi );

   714 %OWNER = ();

   715 %ITERATORS = ();

   716 *swig_location_get = *dtnapic::dtn_bundle_payload_t_location_get;

   717 *swig_location_set = *dtnapic::dtn_bundle_payload_t_location_set;

   718 *swig_status_report_get = *dtnapic::dtn_bundle_payload_t_status_report_get;

   719 *swig_status_report_set = *dtnapic::dtn_bundle_payload_t_status_report_set;

   720 *swig_buf_get = *dtnapic::dtn_bundle_payload_t_buf_get;

   721 *swig_buf_set = *dtnapic::dtn_bundle_payload_t_buf_set;

   722 *swig_filename_get = *dtnapic::dtn_bundle_payload_t_filename_get;

   723 *swig_filename_set = *dtnapic::dtn_bundle_payload_t_filename_set;

   724 sub new {

   725     my $pkg = shift;

   726     my $self = dtnapic::new_dtn_bundle_payload_t(@_);

   727     bless $self, $pkg if defined($self);

   728 }

   729 

   730 sub DESTROY {

   731     return unless $_[0]->isa('HASH');

   732     my $self = tied(%{$_[0]});

   733     return unless defined $self;

   734     delete $ITERATORS{$self};

   735     if (exists $OWNER{$self}) {

   736         dtnapic::delete_dtn_bundle_payload_t($self);

   737         delete $OWNER{$self};

   738     }

   739 }

   740 

   741 sub DISOWN {

   742     my $self = shift;

   743     my $ptr = tied(%$self);

   744     delete $OWNER{$ptr};

   745 }

   746 

   747 sub ACQUIRE {

   748     my $self = shift;

   749     my $ptr = tied(%$self);

   750     $OWNER{$ptr} = 1;

   751 }

   752 

   753 

   754 ############# Class : dtnapi::dtn_bundle_payload_t_buf ##############

   755 

   756 package dtnapi::dtn_bundle_payload_t_buf;

   757 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   758 @ISA = qw( dtnapi );

   759 %OWNER = ();

   760 %ITERATORS = ();

   761 *swig_buf_len_get = *dtnapic::dtn_bundle_payload_t_buf_buf_len_get;

   762 *swig_buf_len_set = *dtnapic::dtn_bundle_payload_t_buf_buf_len_set;

   763 *swig_buf_val_get = *dtnapic::dtn_bundle_payload_t_buf_buf_val_get;

   764 *swig_buf_val_set = *dtnapic::dtn_bundle_payload_t_buf_buf_val_set;

   765 sub new {

   766     my $pkg = shift;

   767     my $self = dtnapic::new_dtn_bundle_payload_t_buf(@_);

   768     bless $self, $pkg if defined($self);

   769 }

   770 

   771 sub DESTROY {

   772     return unless $_[0]->isa('HASH');

   773     my $self = tied(%{$_[0]});

   774     return unless defined $self;

   775     delete $ITERATORS{$self};

   776     if (exists $OWNER{$self}) {

   777         dtnapic::delete_dtn_bundle_payload_t_buf($self);

   778         delete $OWNER{$self};

   779     }

   780 }

   781 

   782 sub DISOWN {

   783     my $self = shift;

   784     my $ptr = tied(%$self);

   785     delete $OWNER{$ptr};

   786 }

   787 

   788 sub ACQUIRE {

   789     my $self = shift;

   790     my $ptr = tied(%$self);

   791     $OWNER{$ptr} = 1;

   792 }

   793 

   794 

   795 ############# Class : dtnapi::dtn_bundle_payload_t_filename ##############

   796 

   797 package dtnapi::dtn_bundle_payload_t_filename;

   798 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   799 @ISA = qw( dtnapi );

   800 %OWNER = ();

   801 %ITERATORS = ();

   802 *swig_filename_len_get = *dtnapic::dtn_bundle_payload_t_filename_filename_len_get;

   803 *swig_filename_len_set = *dtnapic::dtn_bundle_payload_t_filename_filename_len_set;

   804 *swig_filename_val_get = *dtnapic::dtn_bundle_payload_t_filename_filename_val_get;

   805 *swig_filename_val_set = *dtnapic::dtn_bundle_payload_t_filename_filename_val_set;

   806 sub new {

   807     my $pkg = shift;

   808     my $self = dtnapic::new_dtn_bundle_payload_t_filename(@_);

   809     bless $self, $pkg if defined($self);

   810 }

   811 

   812 sub DESTROY {

   813     return unless $_[0]->isa('HASH');

   814     my $self = tied(%{$_[0]});

   815     return unless defined $self;

   816     delete $ITERATORS{$self};

   817     if (exists $OWNER{$self}) {

   818         dtnapic::delete_dtn_bundle_payload_t_filename($self);

   819         delete $OWNER{$self};

   820     }

   821 }

   822 

   823 sub DISOWN {

   824     my $self = shift;

   825     my $ptr = tied(%$self);

   826     delete $OWNER{$ptr};

   827 }

   828 

   829 sub ACQUIRE {

   830     my $self = shift;

   831     my $ptr = tied(%$self);

   832     $OWNER{$ptr} = 1;

   833 }

   834 

   835 

   836 ############# Class : dtnapi::dtn_bundle_id ##############

   837 

   838 package dtnapi::dtn_bundle_id;

   839 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   840 @ISA = qw( dtnapi );

   841 %OWNER = ();

   842 %ITERATORS = ();

   843 *swig_source_get = *dtnapic::dtn_bundle_id_source_get;

   844 *swig_source_set = *dtnapic::dtn_bundle_id_source_set;

   845 *swig_creation_secs_get = *dtnapic::dtn_bundle_id_creation_secs_get;

   846 *swig_creation_secs_set = *dtnapic::dtn_bundle_id_creation_secs_set;

   847 *swig_creation_seqno_get = *dtnapic::dtn_bundle_id_creation_seqno_get;

   848 *swig_creation_seqno_set = *dtnapic::dtn_bundle_id_creation_seqno_set;

   849 sub new {

   850     my $pkg = shift;

   851     my $self = dtnapic::new_dtn_bundle_id(@_);

   852     bless $self, $pkg if defined($self);

   853 }

   854 

   855 sub DESTROY {

   856     return unless $_[0]->isa('HASH');

   857     my $self = tied(%{$_[0]});

   858     return unless defined $self;

   859     delete $ITERATORS{$self};

   860     if (exists $OWNER{$self}) {

   861         dtnapic::delete_dtn_bundle_id($self);

   862         delete $OWNER{$self};

   863     }

   864 }

   865 

   866 sub DISOWN {

   867     my $self = shift;

   868     my $ptr = tied(%$self);

   869     delete $OWNER{$ptr};

   870 }

   871 

   872 sub ACQUIRE {

   873     my $self = shift;

   874     my $ptr = tied(%$self);

   875     $OWNER{$ptr} = 1;

   876 }

   877 

   878 

   879 ############# Class : dtnapi::dtn_status_report ##############

   880 

   881 package dtnapi::dtn_status_report;

   882 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   883 @ISA = qw( dtnapi );

   884 %OWNER = ();

   885 %ITERATORS = ();

   886 *swig_bundle_id_get = *dtnapic::dtn_status_report_bundle_id_get;

   887 *swig_bundle_id_set = *dtnapic::dtn_status_report_bundle_id_set;

   888 *swig_reason_get = *dtnapic::dtn_status_report_reason_get;

   889 *swig_reason_set = *dtnapic::dtn_status_report_reason_set;

   890 *swig_flags_get = *dtnapic::dtn_status_report_flags_get;

   891 *swig_flags_set = *dtnapic::dtn_status_report_flags_set;

   892 *swig_receipt_ts_secs_get = *dtnapic::dtn_status_report_receipt_ts_secs_get;

   893 *swig_receipt_ts_secs_set = *dtnapic::dtn_status_report_receipt_ts_secs_set;

   894 *swig_receipt_ts_seqno_get = *dtnapic::dtn_status_report_receipt_ts_seqno_get;

   895 *swig_receipt_ts_seqno_set = *dtnapic::dtn_status_report_receipt_ts_seqno_set;

   896 *swig_custody_ts_secs_get = *dtnapic::dtn_status_report_custody_ts_secs_get;

   897 *swig_custody_ts_secs_set = *dtnapic::dtn_status_report_custody_ts_secs_set;

   898 *swig_custody_ts_seqno_get = *dtnapic::dtn_status_report_custody_ts_seqno_get;

   899 *swig_custody_ts_seqno_set = *dtnapic::dtn_status_report_custody_ts_seqno_set;

   900 *swig_forwarding_ts_secs_get = *dtnapic::dtn_status_report_forwarding_ts_secs_get;

   901 *swig_forwarding_ts_secs_set = *dtnapic::dtn_status_report_forwarding_ts_secs_set;

   902 *swig_forwarding_ts_seqno_get = *dtnapic::dtn_status_report_forwarding_ts_seqno_get;

   903 *swig_forwarding_ts_seqno_set = *dtnapic::dtn_status_report_forwarding_ts_seqno_set;

   904 *swig_delivery_ts_secs_get = *dtnapic::dtn_status_report_delivery_ts_secs_get;

   905 *swig_delivery_ts_secs_set = *dtnapic::dtn_status_report_delivery_ts_secs_set;

   906 *swig_delivery_ts_seqno_get = *dtnapic::dtn_status_report_delivery_ts_seqno_get;

   907 *swig_delivery_ts_seqno_set = *dtnapic::dtn_status_report_delivery_ts_seqno_set;

   908 *swig_deletion_ts_secs_get = *dtnapic::dtn_status_report_deletion_ts_secs_get;

   909 *swig_deletion_ts_secs_set = *dtnapic::dtn_status_report_deletion_ts_secs_set;

   910 *swig_deletion_ts_seqno_get = *dtnapic::dtn_status_report_deletion_ts_seqno_get;

   911 *swig_deletion_ts_seqno_set = *dtnapic::dtn_status_report_deletion_ts_seqno_set;

   912 *swig_ack_by_app_ts_secs_get = *dtnapic::dtn_status_report_ack_by_app_ts_secs_get;

   913 *swig_ack_by_app_ts_secs_set = *dtnapic::dtn_status_report_ack_by_app_ts_secs_set;

   914 *swig_ack_by_app_ts_seqno_get = *dtnapic::dtn_status_report_ack_by_app_ts_seqno_get;

   915 *swig_ack_by_app_ts_seqno_set = *dtnapic::dtn_status_report_ack_by_app_ts_seqno_set;

   916 sub new {

   917     my $pkg = shift;

   918     my $self = dtnapic::new_dtn_status_report(@_);

   919     bless $self, $pkg if defined($self);

   920 }

   921 

   922 sub DESTROY {

   923     return unless $_[0]->isa('HASH');

   924     my $self = tied(%{$_[0]});

   925     return unless defined $self;

   926     delete $ITERATORS{$self};

   927     if (exists $OWNER{$self}) {

   928         dtnapic::delete_dtn_status_report($self);

   929         delete $OWNER{$self};

   930     }

   931 }

   932 

   933 sub DISOWN {

   934     my $self = shift;

   935     my $ptr = tied(%$self);

   936     delete $OWNER{$ptr};

   937 }

   938 

   939 sub ACQUIRE {

   940     my $self = shift;

   941     my $ptr = tied(%$self);

   942     $OWNER{$ptr} = 1;

   943 }

   944 

   945 

   946 ############# Class : dtnapi::dtn_bundle ##############

   947 

   948 package dtnapi::dtn_bundle;

   949 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

   950 @ISA = qw( dtnapi );

   951 %OWNER = ();

   952 %ITERATORS = ();

   953 *swig_source_get = *dtnapic::dtn_bundle_source_get;

   954 *swig_source_set = *dtnapic::dtn_bundle_source_set;

   955 *swig_dest_get = *dtnapic::dtn_bundle_dest_get;

   956 *swig_dest_set = *dtnapic::dtn_bundle_dest_set;

   957 *swig_replyto_get = *dtnapic::dtn_bundle_replyto_get;

   958 *swig_replyto_set = *dtnapic::dtn_bundle_replyto_set;

   959 *swig_priority_get = *dtnapic::dtn_bundle_priority_get;

   960 *swig_priority_set = *dtnapic::dtn_bundle_priority_set;

   961 *swig_dopts_get = *dtnapic::dtn_bundle_dopts_get;

   962 *swig_dopts_set = *dtnapic::dtn_bundle_dopts_set;

   963 *swig_expiration_get = *dtnapic::dtn_bundle_expiration_get;

   964 *swig_expiration_set = *dtnapic::dtn_bundle_expiration_set;

   965 *swig_creation_secs_get = *dtnapic::dtn_bundle_creation_secs_get;

   966 *swig_creation_secs_set = *dtnapic::dtn_bundle_creation_secs_set;

   967 *swig_creation_seqno_get = *dtnapic::dtn_bundle_creation_seqno_get;

   968 *swig_creation_seqno_set = *dtnapic::dtn_bundle_creation_seqno_set;

   969 *swig_delivery_regid_get = *dtnapic::dtn_bundle_delivery_regid_get;

   970 *swig_delivery_regid_set = *dtnapic::dtn_bundle_delivery_regid_set;

   971 *swig_sequence_id_get = *dtnapic::dtn_bundle_sequence_id_get;

   972 *swig_sequence_id_set = *dtnapic::dtn_bundle_sequence_id_set;

   973 *swig_obsoletes_id_get = *dtnapic::dtn_bundle_obsoletes_id_get;

   974 *swig_obsoletes_id_set = *dtnapic::dtn_bundle_obsoletes_id_set;

   975 *swig_payload_get = *dtnapic::dtn_bundle_payload_get;

   976 *swig_payload_set = *dtnapic::dtn_bundle_payload_set;

   977 *swig_status_report_get = *dtnapic::dtn_bundle_status_report_get;

   978 *swig_status_report_set = *dtnapic::dtn_bundle_status_report_set;

   979 sub new {

   980     my $pkg = shift;

   981     my $self = dtnapic::new_dtn_bundle(@_);

   982     bless $self, $pkg if defined($self);

   983 }

   984 

   985 sub DESTROY {

   986     return unless $_[0]->isa('HASH');

   987     my $self = tied(%{$_[0]});

   988     return unless defined $self;

   989     delete $ITERATORS{$self};

   990     if (exists $OWNER{$self}) {

   991         dtnapic::delete_dtn_bundle($self);

   992         delete $OWNER{$self};

   993     }

   994 }

   995 

   996 sub DISOWN {

   997     my $self = shift;

   998     my $ptr = tied(%$self);

   999     delete $OWNER{$ptr};

  1000 }

  1001 

  1002 sub ACQUIRE {

  1003     my $self = shift;

  1004     my $ptr = tied(%$self);

  1005     $OWNER{$ptr} = 1;

  1006 }

  1007 

  1008 

  1009 ############# Class : dtnapi::dtn_session_info ##############

  1010 

  1011 package dtnapi::dtn_session_info;

  1012 use vars qw(@ISA %OWNER %ITERATORS %BLESSEDMEMBERS);

  1013 @ISA = qw( dtnapi );

  1014 %OWNER = ();

  1015 %ITERATORS = ();

  1016 *swig_status_get = *dtnapic::dtn_session_info_status_get;

  1017 *swig_status_set = *dtnapic::dtn_session_info_status_set;

  1018 *swig_session_get = *dtnapic::dtn_session_info_session_get;

  1019 *swig_session_set = *dtnapic::dtn_session_info_session_set;

  1020 sub new {

  1021     my $pkg = shift;

  1022     my $self = dtnapic::new_dtn_session_info(@_);

  1023     bless $self, $pkg if defined($self);

  1024 }

  1025 

  1026 sub DESTROY {

  1027     return unless $_[0]->isa('HASH');

  1028     my $self = tied(%{$_[0]});

  1029     return unless defined $self;

  1030     delete $ITERATORS{$self};

  1031     if (exists $OWNER{$self}) {

  1032         dtnapic::delete_dtn_session_info($self);

  1033         delete $OWNER{$self};

  1034     }

  1035 }

  1036 

  1037 sub DISOWN {

  1038     my $self = shift;

  1039     my $ptr = tied(%$self);

  1040     delete $OWNER{$ptr};

  1041 }

  1042 

  1043 sub ACQUIRE {

  1044     my $self = shift;

  1045     my $ptr = tied(%$self);

  1046     $OWNER{$ptr} = 1;

  1047 }

  1048 

  1049 

  1050 # ------- VARIABLE STUBS --------

  1051 

  1052 package dtnapi;

  1053 

  1054 *DTN_MAX_ENDPOINT_ID = *dtnapic::DTN_MAX_ENDPOINT_ID;

  1055 *DTN_MAX_AUTHDATA = *dtnapic::DTN_MAX_AUTHDATA;

  1056 *DTN_MAX_REGION_LEN = *dtnapic::DTN_MAX_REGION_LEN;

  1057 *DTN_MAX_BUNDLE_MEM = *dtnapic::DTN_MAX_BUNDLE_MEM;

  1058 *DTN_MAX_BLOCK_LEN = *dtnapic::DTN_MAX_BLOCK_LEN;

  1059 *DTN_MAX_BLOCKS = *dtnapic::DTN_MAX_BLOCKS;

  1060 *DTN_REGID_NONE = *dtnapic::DTN_REGID_NONE;

  1061 *DTN_REG_DROP = *dtnapic::DTN_REG_DROP;

  1062 *DTN_REG_DEFER = *dtnapic::DTN_REG_DEFER;

  1063 *DTN_REG_EXEC = *dtnapic::DTN_REG_EXEC;

  1064 *DTN_SESSION_CUSTODY = *dtnapic::DTN_SESSION_CUSTODY;

  1065 *DTN_SESSION_PUBLISH = *dtnapic::DTN_SESSION_PUBLISH;

  1066 *DTN_SESSION_SUBSCRIBE = *dtnapic::DTN_SESSION_SUBSCRIBE;

  1067 *COS_BULK = *dtnapic::COS_BULK;

  1068 *COS_NORMAL = *dtnapic::COS_NORMAL;

  1069 *COS_EXPEDITED = *dtnapic::COS_EXPEDITED;

  1070 *COS_RESERVED = *dtnapic::COS_RESERVED;

  1071 *DOPTS_NONE = *dtnapic::DOPTS_NONE;

  1072 *DOPTS_CUSTODY = *dtnapic::DOPTS_CUSTODY;

  1073 *DOPTS_DELIVERY_RCPT = *dtnapic::DOPTS_DELIVERY_RCPT;

  1074 *DOPTS_RECEIVE_RCPT = *dtnapic::DOPTS_RECEIVE_RCPT;

  1075 *DOPTS_FORWARD_RCPT = *dtnapic::DOPTS_FORWARD_RCPT;

  1076 *DOPTS_CUSTODY_RCPT = *dtnapic::DOPTS_CUSTODY_RCPT;

  1077 *DOPTS_DELETE_RCPT = *dtnapic::DOPTS_DELETE_RCPT;

  1078 *DOPTS_SINGLETON_DEST = *dtnapic::DOPTS_SINGLETON_DEST;

  1079 *DOPTS_MULTINODE_DEST = *dtnapic::DOPTS_MULTINODE_DEST;

  1080 *DOPTS_DO_NOT_FRAGMENT = *dtnapic::DOPTS_DO_NOT_FRAGMENT;

  1081 *BLOCK_FLAG_NONE = *dtnapic::BLOCK_FLAG_NONE;

  1082 *BLOCK_FLAG_REPLICATE = *dtnapic::BLOCK_FLAG_REPLICATE;

  1083 *BLOCK_FLAG_REPORT = *dtnapic::BLOCK_FLAG_REPORT;

  1084 *BLOCK_FLAG_DELETE_BUNDLE = *dtnapic::BLOCK_FLAG_DELETE_BUNDLE;

  1085 *BLOCK_FLAG_LAST = *dtnapic::BLOCK_FLAG_LAST;

  1086 *BLOCK_FLAG_DISCARD_BLOCK = *dtnapic::BLOCK_FLAG_DISCARD_BLOCK;

  1087 *BLOCK_FLAG_UNPROCESSED = *dtnapic::BLOCK_FLAG_UNPROCESSED;

  1088 *REASON_NO_ADDTL_INFO = *dtnapic::REASON_NO_ADDTL_INFO;

  1089 *REASON_LIFETIME_EXPIRED = *dtnapic::REASON_LIFETIME_EXPIRED;

  1090 *REASON_FORWARDED_UNIDIR_LINK = *dtnapic::REASON_FORWARDED_UNIDIR_LINK;

  1091 *REASON_TRANSMISSION_CANCELLED = *dtnapic::REASON_TRANSMISSION_CANCELLED;

  1092 *REASON_DEPLETED_STORAGE = *dtnapic::REASON_DEPLETED_STORAGE;

  1093 *REASON_ENDPOINT_ID_UNINTELLIGIBLE = *dtnapic::REASON_ENDPOINT_ID_UNINTELLIGIBLE;

  1094 *REASON_NO_ROUTE_TO_DEST = *dtnapic::REASON_NO_ROUTE_TO_DEST;

  1095 *REASON_NO_TIMELY_CONTACT = *dtnapic::REASON_NO_TIMELY_CONTACT;

  1096 *REASON_BLOCK_UNINTELLIGIBLE = *dtnapic::REASON_BLOCK_UNINTELLIGIBLE;

  1097 *STATUS_RECEIVED = *dtnapic::STATUS_RECEIVED;

  1098 *STATUS_CUSTODY_ACCEPTED = *dtnapic::STATUS_CUSTODY_ACCEPTED;

  1099 *STATUS_FORWARDED = *dtnapic::STATUS_FORWARDED;

  1100 *STATUS_DELIVERED = *dtnapic::STATUS_DELIVERED;

  1101 *STATUS_DELETED = *dtnapic::STATUS_DELETED;

  1102 *STATUS_ACKED_BY_APP = *dtnapic::STATUS_ACKED_BY_APP;

  1103 *DTN_PAYLOAD_FILE = *dtnapic::DTN_PAYLOAD_FILE;

  1104 *DTN_PAYLOAD_MEM = *dtnapic::DTN_PAYLOAD_MEM;

  1105 *DTN_PAYLOAD_TEMP_FILE = *dtnapic::DTN_PAYLOAD_TEMP_FILE;

  1106 *DTN_SUCCESS = *dtnapic::DTN_SUCCESS;

  1107 *DTN_ERRBASE = *dtnapic::DTN_ERRBASE;

  1108 *DTN_EINVAL = *dtnapic::DTN_EINVAL;

  1109 *DTN_EXDR = *dtnapic::DTN_EXDR;

  1110 *DTN_ECOMM = *dtnapic::DTN_ECOMM;

  1111 *DTN_ECONNECT = *dtnapic::DTN_ECONNECT;

  1112 *DTN_ETIMEOUT = *dtnapic::DTN_ETIMEOUT;

  1113 *DTN_ESIZE = *dtnapic::DTN_ESIZE;

  1114 *DTN_ENOTFOUND = *dtnapic::DTN_ENOTFOUND;

  1115 *DTN_EINTERNAL = *dtnapic::DTN_EINTERNAL;

  1116 *DTN_EINPOLL = *dtnapic::DTN_EINPOLL;

  1117 *DTN_EBUSY = *dtnapic::DTN_EBUSY;

  1118 *DTN_EVERSION = *dtnapic::DTN_EVERSION;

  1119 *DTN_EMSGTYPE = *dtnapic::DTN_EMSGTYPE;

  1120 *DTN_ENOSPACE = *dtnapic::DTN_ENOSPACE;

  1121 *DTN_ERRMAX = *dtnapic::DTN_ERRMAX;

  1122 *Handles = *dtnapic::Handles;

  1123 *HandleID = *dtnapic::HandleID;

  1124 1;