1 /* ----------------------------------------------------------------------------
2 * This file was automatically generated by SWIG (http://www.swig.org).
5 * This file is not intended to be easily readable and contains a number of
6 * coding conventions designed to improve portability and efficiency. Do not make
7 * changes to this file unless you know what you are doing--modify the SWIG
8 * interface file instead.
9 * ----------------------------------------------------------------------------- */
12 #define SWIG_CASTRANK_MODE
13 /* -----------------------------------------------------------------------------
14 * This section contains generic SWIG labels for method/variable
15 * declarations/attributes, and other compiler dependent labels.
16 * ----------------------------------------------------------------------------- */
18 /* template workaround for compilers that cannot correctly implement the C++ standard */
19 #ifndef SWIGTEMPLATEDISAMBIGUATOR
20 # if defined(__SUNPRO_CC) && (__SUNPRO_CC <= 0x560)
21 # define SWIGTEMPLATEDISAMBIGUATOR template
22 # elif defined(__HP_aCC)
23 /* Needed even with `aCC -AA' when `aCC -V' reports HP ANSI C++ B3910B A.03.55 */
24 /* If we find a maximum version that requires this, the test would be __HP_aCC <= 35500 for A.03.55 */
25 # define SWIGTEMPLATEDISAMBIGUATOR template
27 # define SWIGTEMPLATEDISAMBIGUATOR
31 /* inline attribute */
33 # if defined(__cplusplus) || (defined(__GNUC__) && !defined(__STRICT_ANSI__))
34 # define SWIGINLINE inline
40 /* attribute recognised by some compilers to avoid 'unused' warnings */
42 # if defined(__GNUC__)
43 # if !(defined(__cplusplus)) || (__GNUC__ > 3 || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4))
44 # define SWIGUNUSED __attribute__ ((__unused__))
49 # define SWIGUNUSED __attribute__ ((__unused__))
55 #ifndef SWIGUNUSEDPARM
57 # define SWIGUNUSEDPARM(p)
59 # define SWIGUNUSEDPARM(p) p SWIGUNUSED
63 /* internal SWIG method */
65 # define SWIGINTERN static SWIGUNUSED
68 /* internal inline SWIG method */
69 #ifndef SWIGINTERNINLINE
70 # define SWIGINTERNINLINE SWIGINTERN SWIGINLINE
73 /* exporting methods */
74 #if (__GNUC__ >= 4) || (__GNUC__ == 3 && __GNUC_MINOR__ >= 4)
75 # ifndef GCC_HASCLASSVISIBILITY
76 # define GCC_HASCLASSVISIBILITY
81 # if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)
82 # if defined(STATIC_LINKED)
85 # define SWIGEXPORT __declspec(dllexport)
88 # if defined(__GNUC__) && defined(GCC_HASCLASSVISIBILITY)
89 # define SWIGEXPORT __attribute__ ((visibility("default")))
96 /* calling conventions for Windows */
98 # if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)
99 # define SWIGSTDCALL __stdcall
105 /* Deal with Microsoft's attempt at deprecating C standard runtime functions */
106 #if !defined(SWIG_NO_CRT_SECURE_NO_DEPRECATE) && defined(_MSC_VER) && !defined(_CRT_SECURE_NO_DEPRECATE)
107 # define _CRT_SECURE_NO_DEPRECATE
110 /* Deal with Microsoft's attempt at deprecating methods in the standard C++ library */
111 #if !defined(SWIG_NO_SCL_SECURE_NO_DEPRECATE) && defined(_MSC_VER) && !defined(_SCL_SECURE_NO_DEPRECATE)
112 # define _SCL_SECURE_NO_DEPRECATE
116 /* -----------------------------------------------------------------------------
119 * This file contains generic CAPI SWIG runtime support for pointer
121 * ----------------------------------------------------------------------------- */
123 /* This should only be incremented when either the layout of swig_type_info changes,
124 or for whatever reason, the runtime changes incompatibly */
125 #define SWIG_RUNTIME_VERSION "3"
127 /* define SWIG_TYPE_TABLE_NAME as "SWIG_TYPE_TABLE" */
128 #ifdef SWIG_TYPE_TABLE
129 # define SWIG_QUOTE_STRING(x) #x
130 # define SWIG_EXPAND_AND_QUOTE_STRING(x) SWIG_QUOTE_STRING(x)
131 # define SWIG_TYPE_TABLE_NAME SWIG_EXPAND_AND_QUOTE_STRING(SWIG_TYPE_TABLE)
133 # define SWIG_TYPE_TABLE_NAME
137 You can use the SWIGRUNTIME and SWIGRUNTIMEINLINE macros for
138 creating a static or dynamic library from the swig runtime code.
139 In 99.9% of the cases, swig just needs to declare them as 'static'.
141 But only do this if is strictly necessary, ie, if you have problems
142 with your compiler or so.
146 # define SWIGRUNTIME SWIGINTERN
149 #ifndef SWIGRUNTIMEINLINE
150 # define SWIGRUNTIMEINLINE SWIGRUNTIME SWIGINLINE
153 /* Generic buffer size */
154 #ifndef SWIG_BUFFER_SIZE
155 # define SWIG_BUFFER_SIZE 1024
158 /* Flags for pointer conversions */
159 #define SWIG_POINTER_DISOWN 0x1
161 /* Flags for new pointer objects */
162 #define SWIG_POINTER_OWN 0x1
166 Flags/methods for returning states.
168 The swig conversion methods, as ConvertPtr, return and integer
169 that tells if the conversion was successful or not. And if not,
170 an error code can be returned (see swigerrors.swg for the codes).
172 Use the following macros/flags to set or process the returning
175 In old swig versions, you usually write code as:
177 if (SWIG_ConvertPtr(obj,vptr,ty.flags) != -1) {
183 Now you can be more explicit as:
185 int res = SWIG_ConvertPtr(obj,vptr,ty.flags);
186 if (SWIG_IsOK(res)) {
192 that seems to be the same, but now you can also do
195 int res = SWIG_ConvertPtr(obj,(void **)(&ptr),ty.flags);
196 if (SWIG_IsOK(res)) {
198 if (SWIG_IsNewObj(res) {
208 I.e., now SWIG_ConvertPtr can return new objects and you can
209 identify the case and take care of the deallocation. Of course that
210 requires also to SWIG_ConvertPtr to return new result values, as
212 int SWIG_ConvertPtr(obj, ptr,...) {
214 if (<need new object>) {
215 *ptr = <ptr to new allocated object>;
218 *ptr = <ptr to old object>;
226 Of course, returning the plain '0(success)/-1(fail)' still works, but you can be
227 more explicit by returning SWIG_BADOBJ, SWIG_ERROR or any of the
230 Finally, if the SWIG_CASTRANK_MODE is enabled, the result code
231 allows to return the 'cast rank', for example, if you have this
238 food(1) // cast rank '1' (1 -> 1.0)
239 fooi(1) // cast rank '0'
241 just use the SWIG_AddCast()/SWIG_CheckState()
246 #define SWIG_ERROR (-1)
247 #define SWIG_IsOK(r) (r >= 0)
248 #define SWIG_ArgError(r) ((r != SWIG_ERROR) ? r : SWIG_TypeError)
250 /* The CastRankLimit says how many bits are used for the cast rank */
251 #define SWIG_CASTRANKLIMIT (1 << 8)
252 /* The NewMask denotes the object was created (using new/malloc) */
253 #define SWIG_NEWOBJMASK (SWIG_CASTRANKLIMIT << 1)
254 /* The TmpMask is for in/out typemaps that use temporal objects */
255 #define SWIG_TMPOBJMASK (SWIG_NEWOBJMASK << 1)
256 /* Simple returning values */
257 #define SWIG_BADOBJ (SWIG_ERROR)
258 #define SWIG_OLDOBJ (SWIG_OK)
259 #define SWIG_NEWOBJ (SWIG_OK | SWIG_NEWOBJMASK)
260 #define SWIG_TMPOBJ (SWIG_OK | SWIG_TMPOBJMASK)
261 /* Check, add and del mask methods */
262 #define SWIG_AddNewMask(r) (SWIG_IsOK(r) ? (r | SWIG_NEWOBJMASK) : r)
263 #define SWIG_DelNewMask(r) (SWIG_IsOK(r) ? (r & ~SWIG_NEWOBJMASK) : r)
264 #define SWIG_IsNewObj(r) (SWIG_IsOK(r) && (r & SWIG_NEWOBJMASK))
265 #define SWIG_AddTmpMask(r) (SWIG_IsOK(r) ? (r | SWIG_TMPOBJMASK) : r)
266 #define SWIG_DelTmpMask(r) (SWIG_IsOK(r) ? (r & ~SWIG_TMPOBJMASK) : r)
267 #define SWIG_IsTmpObj(r) (SWIG_IsOK(r) && (r & SWIG_TMPOBJMASK))
271 #if defined(SWIG_CASTRANK_MODE)
272 # ifndef SWIG_TypeRank
273 # define SWIG_TypeRank unsigned long
275 # ifndef SWIG_MAXCASTRANK /* Default cast allowed */
276 # define SWIG_MAXCASTRANK (2)
278 # define SWIG_CASTRANKMASK ((SWIG_CASTRANKLIMIT) -1)
279 # define SWIG_CastRank(r) (r & SWIG_CASTRANKMASK)
280 SWIGINTERNINLINE int SWIG_AddCast(int r) {
281 return SWIG_IsOK(r) ? ((SWIG_CastRank(r) < SWIG_MAXCASTRANK) ? (r + 1) : SWIG_ERROR) : r;
283 SWIGINTERNINLINE int SWIG_CheckState(int r) {
284 return SWIG_IsOK(r) ? SWIG_CastRank(r) + 1 : 0;
286 #else /* no cast-rank mode */
287 # define SWIG_AddCast
288 # define SWIG_CheckState(r) (SWIG_IsOK(r) ? 1 : 0)
300 typedef void *(*swig_converter_func)(void *);
301 typedef struct swig_type_info *(*swig_dycast_func)(void **);
303 /* Structure to store inforomation on one type */
304 typedef struct swig_type_info {
305 const char *name; /* mangled name of this type */
306 const char *str; /* human readable name of this type */
307 swig_dycast_func dcast; /* dynamic cast function down a hierarchy */
308 struct swig_cast_info *cast; /* linked list of types that can cast into this type */
309 void *clientdata; /* language specific type data */
310 int owndata; /* flag if the structure owns the clientdata */
313 /* Structure to store a type and conversion function used for casting */
314 typedef struct swig_cast_info {
315 swig_type_info *type; /* pointer to type that is equivalent to this type */
316 swig_converter_func converter; /* function to cast the void pointers */
317 struct swig_cast_info *next; /* pointer to next cast in linked list */
318 struct swig_cast_info *prev; /* pointer to the previous cast */
321 /* Structure used to store module information
322 * Each module generates one structure like this, and the runtime collects
323 * all of these structures and stores them in a circularly linked list.*/
324 typedef struct swig_module_info {
325 swig_type_info **types; /* Array of pointers to swig_type_info structures that are in this module */
326 size_t size; /* Number of types in this module */
327 struct swig_module_info *next; /* Pointer to next element in circularly linked list */
328 swig_type_info **type_initial; /* Array of initially generated type structures */
329 swig_cast_info **cast_initial; /* Array of initially generated casting structures */
330 void *clientdata; /* Language specific module data */
334 Compare two type names skipping the space characters, therefore
335 "char*" == "char *" and "Class<int>" == "Class<int >", etc.
337 Return 0 when the two name types are equivalent, as in
338 strncmp, but skipping ' '.
341 SWIG_TypeNameComp(const char *f1, const char *l1,
342 const char *f2, const char *l2) {
343 for (;(f1 != l1) && (f2 != l2); ++f1, ++f2) {
344 while ((*f1 == ' ') && (f1 != l1)) ++f1;
345 while ((*f2 == ' ') && (f2 != l2)) ++f2;
346 if (*f1 != *f2) return (*f1 > *f2) ? 1 : -1;
348 return (int)((l1 - f1) - (l2 - f2));
352 Check type equivalence in a name list like <name1>|<name2>|...
353 Return 0 if not equal, 1 if equal
356 SWIG_TypeEquiv(const char *nb, const char *tb) {
358 const char* te = tb + strlen(tb);
360 while (!equiv && *ne) {
361 for (nb = ne; *ne; ++ne) {
362 if (*ne == '|') break;
364 equiv = (SWIG_TypeNameComp(nb, ne, tb, te) == 0) ? 1 : 0;
371 Check type equivalence in a name list like <name1>|<name2>|...
372 Return 0 if equal, -1 if nb < tb, 1 if nb > tb
375 SWIG_TypeCompare(const char *nb, const char *tb) {
377 const char* te = tb + strlen(tb);
379 while (!equiv && *ne) {
380 for (nb = ne; *ne; ++ne) {
381 if (*ne == '|') break;
383 equiv = (SWIG_TypeNameComp(nb, ne, tb, te) == 0) ? 1 : 0;
390 /* think of this as a c++ template<> or a scheme macro */
391 #define SWIG_TypeCheck_Template(comparison, ty) \
393 swig_cast_info *iter = ty->cast; \
396 if (iter == ty->cast) return iter; \
397 /* Move iter to the top of the linked list */ \
398 iter->prev->next = iter->next; \
400 iter->next->prev = iter->prev; \
401 iter->next = ty->cast; \
403 if (ty->cast) ty->cast->prev = iter; \
415 SWIGRUNTIME swig_cast_info *
416 SWIG_TypeCheck(const char *c, swig_type_info *ty) {
417 SWIG_TypeCheck_Template(strcmp(iter->type->name, c) == 0, ty);
420 /* Same as previous function, except strcmp is replaced with a pointer comparison */
421 SWIGRUNTIME swig_cast_info *
422 SWIG_TypeCheckStruct(swig_type_info *from, swig_type_info *into) {
423 SWIG_TypeCheck_Template(iter->type == from, into);
427 Cast a pointer up an inheritance hierarchy
429 SWIGRUNTIMEINLINE void *
430 SWIG_TypeCast(swig_cast_info *ty, void *ptr) {
431 return ((!ty) || (!ty->converter)) ? ptr : (*ty->converter)(ptr);
435 Dynamic pointer casting. Down an inheritance hierarchy
437 SWIGRUNTIME swig_type_info *
438 SWIG_TypeDynamicCast(swig_type_info *ty, void **ptr) {
439 swig_type_info *lastty = ty;
440 if (!ty || !ty->dcast) return ty;
441 while (ty && (ty->dcast)) {
442 ty = (*ty->dcast)(ptr);
449 Return the name associated with this type
451 SWIGRUNTIMEINLINE const char *
452 SWIG_TypeName(const swig_type_info *ty) {
457 Return the pretty name associated with this type,
458 that is an unmangled type name in a form presentable to the user.
460 SWIGRUNTIME const char *
461 SWIG_TypePrettyName(const swig_type_info *type) {
462 /* The "str" field contains the equivalent pretty names of the
463 type, separated by vertical-bar characters. We choose
464 to print the last name, as it is often (?) the most
466 if (!type) return NULL;
467 if (type->str != NULL) {
468 const char *last_name = type->str;
470 for (s = type->str; *s; s++)
471 if (*s == '|') last_name = s+1;
479 Set the clientdata field for a type
482 SWIG_TypeClientData(swig_type_info *ti, void *clientdata) {
483 swig_cast_info *cast = ti->cast;
484 /* if (ti->clientdata == clientdata) return; */
485 ti->clientdata = clientdata;
488 if (!cast->converter) {
489 swig_type_info *tc = cast->type;
490 if (!tc->clientdata) {
491 SWIG_TypeClientData(tc, clientdata);
498 SWIG_TypeNewClientData(swig_type_info *ti, void *clientdata) {
499 SWIG_TypeClientData(ti, clientdata);
504 Search for a swig_type_info structure only by mangled name
505 Search is a O(log #types)
507 We start searching at module start, and finish searching when start == end.
508 Note: if start == end at the beginning of the function, we go all the way around
511 SWIGRUNTIME swig_type_info *
512 SWIG_MangledTypeQueryModule(swig_module_info *start,
513 swig_module_info *end,
515 swig_module_info *iter = start;
518 register size_t l = 0;
519 register size_t r = iter->size - 1;
521 /* since l+r >= 0, we can (>> 1) instead (/ 2) */
522 register size_t i = (l + r) >> 1;
523 const char *iname = iter->types[i]->name;
525 register int compare = strcmp(name, iname);
527 return iter->types[i];
528 } else if (compare < 0) {
534 } else if (compare > 0) {
538 break; /* should never happen */
543 } while (iter != end);
548 Search for a swig_type_info structure for either a mangled name or a human readable name.
549 It first searches the mangled names of the types, which is a O(log #types)
550 If a type is not found it then searches the human readable names, which is O(#types).
552 We start searching at module start, and finish searching when start == end.
553 Note: if start == end at the beginning of the function, we go all the way around
556 SWIGRUNTIME swig_type_info *
557 SWIG_TypeQueryModule(swig_module_info *start,
558 swig_module_info *end,
560 /* STEP 1: Search the name field using binary search */
561 swig_type_info *ret = SWIG_MangledTypeQueryModule(start, end, name);
565 /* STEP 2: If the type hasn't been found, do a complete search
566 of the str field (the human readable name) */
567 swig_module_info *iter = start;
569 register size_t i = 0;
570 for (; i < iter->size; ++i) {
571 if (iter->types[i]->str && (SWIG_TypeEquiv(iter->types[i]->str, name)))
572 return iter->types[i];
575 } while (iter != end);
578 /* neither found a match */
583 Pack binary data into a string
586 SWIG_PackData(char *c, void *ptr, size_t sz) {
587 static const char hex[17] = "0123456789abcdef";
588 register const unsigned char *u = (unsigned char *) ptr;
589 register const unsigned char *eu = u + sz;
590 for (; u != eu; ++u) {
591 register unsigned char uu = *u;
592 *(c++) = hex[(uu & 0xf0) >> 4];
593 *(c++) = hex[uu & 0xf];
599 Unpack binary data from a string
601 SWIGRUNTIME const char *
602 SWIG_UnpackData(const char *c, void *ptr, size_t sz) {
603 register unsigned char *u = (unsigned char *) ptr;
604 register const unsigned char *eu = u + sz;
605 for (; u != eu; ++u) {
606 register char d = *(c++);
607 register unsigned char uu;
608 if ((d >= '0') && (d <= '9'))
609 uu = ((d - '0') << 4);
610 else if ((d >= 'a') && (d <= 'f'))
611 uu = ((d - ('a'-10)) << 4);
615 if ((d >= '0') && (d <= '9'))
617 else if ((d >= 'a') && (d <= 'f'))
618 uu |= (d - ('a'-10));
627 Pack 'void *' into a string buffer.
630 SWIG_PackVoidPtr(char *buff, void *ptr, const char *name, size_t bsz) {
632 if ((2*sizeof(void *) + 2) > bsz) return 0;
634 r = SWIG_PackData(r,&ptr,sizeof(void *));
635 if (strlen(name) + 1 > (bsz - (r - buff))) return 0;
640 SWIGRUNTIME const char *
641 SWIG_UnpackVoidPtr(const char *c, void **ptr, const char *name) {
643 if (strcmp(c,"NULL") == 0) {
650 return SWIG_UnpackData(++c,ptr,sizeof(void *));
654 SWIG_PackDataName(char *buff, void *ptr, size_t sz, const char *name, size_t bsz) {
656 size_t lname = (name ? strlen(name) : 0);
657 if ((2*sz + 2 + lname) > bsz) return 0;
659 r = SWIG_PackData(r,ptr,sz);
661 strncpy(r,name,lname+1);
668 SWIGRUNTIME const char *
669 SWIG_UnpackDataName(const char *c, void *ptr, size_t sz, const char *name) {
671 if (strcmp(c,"NULL") == 0) {
678 return SWIG_UnpackData(++c,ptr,sz);
686 #define SWIG_UnknownError -1
687 #define SWIG_IOError -2
688 #define SWIG_RuntimeError -3
689 #define SWIG_IndexError -4
690 #define SWIG_TypeError -5
691 #define SWIG_DivisionByZero -6
692 #define SWIG_OverflowError -7
693 #define SWIG_SyntaxError -8
694 #define SWIG_ValueError -9
695 #define SWIG_SystemError -10
696 #define SWIG_AttributeError -11
697 #define SWIG_MemoryError -12
698 #define SWIG_NullReferenceError -13
703 /* Needed on some windows machines---since MS plays funny games with the header files under C++ */
712 /* Add in functionality missing in older versions of Perl. Much of this is based on Devel-PPPort on cpan. */
714 /* Add PERL_REVISION, PERL_VERSION, PERL_SUBVERSION if missing */
715 #ifndef PERL_REVISION
716 # if !defined(__PATCHLEVEL_H_INCLUDED__) && !(defined(PATCHLEVEL) && defined(SUBVERSION))
717 # define PERL_PATCHLEVEL_H_IMPLICIT
718 # include <patchlevel.h>
720 # if !(defined(PERL_VERSION) || (defined(SUBVERSION) && defined(PATCHLEVEL)))
721 # include <could_not_find_Perl_patchlevel.h>
723 # ifndef PERL_REVISION
724 # define PERL_REVISION (5)
725 # define PERL_VERSION PATCHLEVEL
726 # define PERL_SUBVERSION SUBVERSION
730 #if defined(WIN32) && defined(PERL_OBJECT) && !defined(PerlIO_exportFILE)
731 #define PerlIO_exportFILE(fh,fl) (FILE*)(fh)
735 # define SvIOK_UV(sv) (SvIOK(sv) && (SvUVX(sv) == SvIVX(sv)))
739 # define SvUOK(sv) SvIOK_UV(sv)
742 #if ((PERL_VERSION < 4) || ((PERL_VERSION == 4) && (PERL_SUBVERSION <= 5)))
743 # define PL_sv_undef sv_undef
745 # define PL_errgv errgv
746 # define PL_sv_no sv_no
747 # define PL_sv_yes sv_yes
748 # define PL_markstack_ptr markstack_ptr
753 # define IVSIZE LONGSIZE
755 # define IVSIZE 4 /* A bold guess, but the best we can make. */
760 # if (IVSIZE == PTRSIZE) && (UVSIZE == PTRSIZE)
762 # define INT2PTR(any,d) (any)(d)
764 # if PTRSIZE == LONGSIZE
765 # define PTRV unsigned long
767 # define PTRV unsigned
769 # define INT2PTR(any,d) (any)(PTRV)(d)
772 # define NUM2PTR(any,d) (any)(PTRV)(d)
773 # define PTR2IV(p) INT2PTR(IV,p)
774 # define PTR2UV(p) INT2PTR(UV,p)
775 # define PTR2NV(p) NUM2PTR(NV,p)
777 # if PTRSIZE == LONGSIZE
778 # define PTR2ul(p) (unsigned long)(p)
780 # define PTR2ul(p) INT2PTR(unsigned long,p)
782 #endif /* !INT2PTR */
785 # define SvPV_nolen(x) SvPV(x,PL_na)
789 # define get_sv perl_get_sv
793 # define ERRSV get_sv("@",FALSE)
805 /* -----------------------------------------------------------------------------
807 * ----------------------------------------------------------------------------- */
809 SWIGINTERN const char*
810 SWIG_Perl_ErrorType(int code) {
811 const char* type = 0;
813 case SWIG_MemoryError:
814 type = "MemoryError";
819 case SWIG_RuntimeError:
820 type = "RuntimeError";
822 case SWIG_IndexError:
828 case SWIG_DivisionByZero:
829 type = "ZeroDivisionError";
831 case SWIG_OverflowError:
832 type = "OverflowError";
834 case SWIG_SyntaxError:
835 type = "SyntaxError";
837 case SWIG_ValueError:
840 case SWIG_SystemError:
841 type = "SystemError";
843 case SWIG_AttributeError:
844 type = "AttributeError";
847 type = "RuntimeError";
855 /* -----------------------------------------------------------------------------
858 * This file contains the runtime support for Perl modules
859 * and includes code for managing global variables and pointer
861 * ----------------------------------------------------------------------------- */
864 #define SWIG_PERL_OBJECT_DECL CPerlObj *SWIGUNUSEDPARM(pPerl),
865 #define SWIG_PERL_OBJECT_CALL pPerl,
867 #define SWIG_PERL_OBJECT_DECL
868 #define SWIG_PERL_OBJECT_CALL
871 /* Common SWIG API */
873 /* for raw pointers */
874 #define SWIG_ConvertPtr(obj, pp, type, flags) SWIG_Perl_ConvertPtr(SWIG_PERL_OBJECT_CALL obj, pp, type, flags)
875 #define SWIG_NewPointerObj(p, type, flags) SWIG_Perl_NewPointerObj(SWIG_PERL_OBJECT_CALL p, type, flags)
877 /* for raw packed data */
878 #define SWIG_ConvertPacked(obj, p, s, type) SWIG_Perl_ConvertPacked(SWIG_PERL_OBJECT_CALL obj, p, s, type)
879 #define SWIG_NewPackedObj(p, s, type) SWIG_Perl_NewPackedObj(SWIG_PERL_OBJECT_CALL p, s, type)
881 /* for class or struct pointers */
882 #define SWIG_ConvertInstance(obj, pptr, type, flags) SWIG_ConvertPtr(obj, pptr, type, flags)
883 #define SWIG_NewInstanceObj(ptr, type, flags) SWIG_NewPointerObj(ptr, type, flags)
885 /* for C or C++ function pointers */
886 #define SWIG_ConvertFunctionPtr(obj, pptr, type) SWIG_ConvertPtr(obj, pptr, type, 0)
887 #define SWIG_NewFunctionPtrObj(ptr, type) SWIG_NewPointerObj(ptr, type, 0)
889 /* for C++ member pointers, ie, member methods */
890 #define SWIG_ConvertMember(obj, ptr, sz, ty) SWIG_ConvertPacked(obj, ptr, sz, ty)
891 #define SWIG_NewMemberObj(ptr, sz, type) SWIG_NewPackedObj(ptr, sz, type)
896 #define SWIG_GetModule(clientdata) SWIG_Perl_GetModule()
897 #define SWIG_SetModule(clientdata, pointer) SWIG_Perl_SetModule(pointer)
900 /* Error manipulation */
902 #define SWIG_ErrorType(code) SWIG_Perl_ErrorType(code)
903 #define SWIG_Error(code, msg) sv_setpvf(GvSV(PL_errgv),"%s %s\n", SWIG_ErrorType(code), msg)
904 #define SWIG_fail goto fail
906 /* Perl-specific SWIG API */
908 #define SWIG_MakePtr(sv, ptr, type, flags) SWIG_Perl_MakePtr(SWIG_PERL_OBJECT_CALL sv, ptr, type, flags)
909 #define SWIG_MakePackedObj(sv, p, s, type) SWIG_Perl_MakePackedObj(SWIG_PERL_OBJECT_CALL sv, p, s, type)
910 #define SWIG_SetError(str) SWIG_Error(SWIG_RuntimeError, str)
913 #define SWIG_PERL_DECL_ARGS_1(arg1) (SWIG_PERL_OBJECT_DECL arg1)
914 #define SWIG_PERL_CALL_ARGS_1(arg1) (SWIG_PERL_OBJECT_CALL arg1)
915 #define SWIG_PERL_DECL_ARGS_2(arg1, arg2) (SWIG_PERL_OBJECT_DECL arg1, arg2)
916 #define SWIG_PERL_CALL_ARGS_2(arg1, arg2) (SWIG_PERL_OBJECT_CALL arg1, arg2)
918 /* -----------------------------------------------------------------------------
919 * pointers/data manipulation
920 * ----------------------------------------------------------------------------- */
922 /* For backward compatibility only */
923 #define SWIG_POINTER_EXCEPTION 0
929 #define SWIG_OWNER SWIG_POINTER_OWN
930 #define SWIG_SHADOW SWIG_OWNER << 1
932 #define SWIG_MAYBE_PERL_OBJECT SWIG_PERL_OBJECT_DECL
934 /* SWIG Perl macros */
936 /* Macro to declare an XS function */
938 # define XSPROTO(name) void name(pTHX_ CV* cv)
941 /* Macro to call an XS function */
943 # define SWIG_CALLXS(_name) _name(cv,pPerl)
945 # ifndef MULTIPLICITY
946 # define SWIG_CALLXS(_name) _name(cv)
948 # define SWIG_CALLXS(_name) _name(PERL_GET_THX, cv)
953 #define MAGIC_PPERL CPerlObj *pPerl = (CPerlObj *) this;
958 typedef int (CPerlObj::*SwigMagicFunc)(SV *, MAGIC *);
963 #define SWIG_MAGIC(a,b) (SV *a, MAGIC *b)
964 #define SWIGCLASS_STATIC
966 #else /* PERL_OBJECT */
969 #define SWIGCLASS_STATIC static SWIGUNUSED
972 #define SWIG_MAGIC(a,b) (SV *a, MAGIC *b)
977 typedef int (*SwigMagicFunc)(SV *, MAGIC *);
982 #else /* MULTIPLICITY */
984 #define SWIG_MAGIC(a,b) (struct interpreter *interp, SV *a, MAGIC *b)
989 typedef int (*SwigMagicFunc)(struct interpreter *, SV *, MAGIC *);
994 #endif /* MULTIPLICITY */
995 #endif /* PERL_OBJECT */
997 /* Workaround for bug in perl 5.6.x croak and earlier */
998 #if (PERL_VERSION < 8)
1000 # define SWIG_croak_null() SWIG_Perl_croak_null(pPerl)
1001 static void SWIG_Perl_croak_null(CPerlObj *pPerl)
1003 static void SWIG_croak_null()
1007 # if (PERL_VERSION < 6)
1010 if (SvOK(err) && !SvROK(err)) croak("%_", err);
1015 # define SWIG_croak_null() croak(Nullch)
1020 Define how strict is the cast between strings and integers/doubles
1021 when overloading between these types occurs.
1023 The default is making it as strict as possible by using SWIG_AddCast
1026 You can use -DSWIG_PERL_NO_STRICT_STR2NUM at compilation time to
1027 disable the SWIG_AddCast, making the casting between string and
1028 numbers less strict.
1030 In the end, we try to solve the overloading between strings and
1031 numerical types in the more natural way, but if you can avoid it,
1032 well, avoid it using %rename, for example.
1034 #ifndef SWIG_PERL_NO_STRICT_STR2NUM
1035 # ifndef SWIG_PERL_STRICT_STR2NUM
1036 # define SWIG_PERL_STRICT_STR2NUM
1039 #ifdef SWIG_PERL_STRICT_STR2NUM
1040 /* string takes precedence */
1041 #define SWIG_Str2NumCast(x) SWIG_AddCast(x)
1043 /* number takes precedence */
1044 #define SWIG_Str2NumCast(x) x
1051 SWIGRUNTIME const char *
1052 SWIG_Perl_TypeProxyName(const swig_type_info *type) {
1053 if (!type) return NULL;
1054 if (type->clientdata != NULL) {
1055 return (const char*) type->clientdata;
1062 SWIGRUNTIME swig_cast_info *
1063 SWIG_TypeProxyCheck(const char *c, swig_type_info *ty) {
1064 SWIG_TypeCheck_Template(( (!iter->type->clientdata && (strcmp((char*)iter->type->name, c) == 0))
1065 || (iter->type->clientdata && (strcmp((char*)iter->type->clientdata, c) == 0))), ty);
1069 /* Function for getting a pointer value */
1072 SWIG_Perl_ConvertPtr(SWIG_MAYBE_PERL_OBJECT SV *sv, void **ptr, swig_type_info *_t, int flags) {
1074 void *voidptr = (void *)0;
1076 /* If magical, apply more magic */
1080 /* Check to see if this is an object */
1081 if (sv_isobject(sv)) {
1083 tsv = (SV*) SvRV(sv);
1084 if ((SvTYPE(tsv) == SVt_PVHV)) {
1086 if (SvMAGICAL(tsv)) {
1087 mg = mg_find(tsv,'P');
1090 if (sv_isobject(sv)) {
1091 tsv = (SV*)SvRV(sv);
1101 voidptr = INT2PTR(void *,tmp);
1102 } else if (! SvOK(sv)) { /* Check for undef */
1103 *(ptr) = (void *) 0;
1105 } else if (SvTYPE(sv) == SVt_RV) { /* Check for NULL pointer */
1107 *(ptr) = (void *) 0;
1112 } else { /* Don't know what it is */
1116 /* Now see if the types match */
1117 char *_c = HvNAME(SvSTASH(SvRV(sv)));
1118 tc = SWIG_TypeProxyCheck(_c,_t);
1122 *ptr = SWIG_TypeCast(tc,voidptr);
1128 * DISOWN implementation: we need a perl guru to check this one.
1130 if (tsv && (flags & SWIG_POINTER_DISOWN)) {
1132 * almost copy paste code from below SWIG_POINTER_OWN setting
1135 HV *stash = SvSTASH(SvRV(obj));
1136 GV *gv = *(GV**) hv_fetch(stash, "OWNER", 5, TRUE);
1140 * To set ownership (see below), a newSViv(1) entry is added.
1141 * Hence, to remove ownership, we delete the entry.
1143 if (hv_exists_ent(hv, obj, 0)) {
1144 hv_delete_ent(hv, obj, 0, 0);
1152 SWIG_Perl_MakePtr(SWIG_MAYBE_PERL_OBJECT SV *sv, void *ptr, swig_type_info *t, int flags) {
1153 if (ptr && (flags & SWIG_SHADOW)) {
1158 sv_setref_pv(obj, (char *) SWIG_Perl_TypeProxyName(t), ptr);
1159 stash=SvSTASH(SvRV(obj));
1160 if (flags & SWIG_POINTER_OWN) {
1162 GV *gv=*(GV**)hv_fetch(stash, "OWNER", 5, TRUE);
1164 gv_init(gv, stash, "OWNER", 5, FALSE);
1166 hv_store_ent(hv, obj, newSViv(1), 0);
1168 sv_magic((SV *)hash, (SV *)obj, 'P', Nullch, 0);
1170 self=newRV_noinc((SV *)hash);
1172 SvREFCNT_dec((SV *)self);
1173 sv_bless(sv, stash);
1176 sv_setref_pv(sv, (char *) SWIG_Perl_TypeProxyName(t), ptr);
1180 SWIGRUNTIMEINLINE SV *
1181 SWIG_Perl_NewPointerObj(SWIG_MAYBE_PERL_OBJECT void *ptr, swig_type_info *t, int flags) {
1182 SV *result = sv_newmortal();
1183 SWIG_MakePtr(result, ptr, t, flags);
1188 SWIG_Perl_MakePackedObj(SWIG_MAYBE_PERL_OBJECT SV *sv, void *ptr, int sz, swig_type_info *type) {
1191 if ((2*sz + 1 + strlen(SWIG_Perl_TypeProxyName(type))) > 1000) return;
1193 r = SWIG_PackData(r,ptr,sz);
1194 strcpy(r,SWIG_Perl_TypeProxyName(type));
1195 sv_setpv(sv, result);
1199 SWIG_Perl_NewPackedObj(SWIG_MAYBE_PERL_OBJECT void *ptr, int sz, swig_type_info *type) {
1200 SV *result = sv_newmortal();
1201 SWIG_Perl_MakePackedObj(result, ptr, sz, type);
1205 /* Convert a packed value value */
1207 SWIG_Perl_ConvertPacked(SWIG_MAYBE_PERL_OBJECT SV *obj, void *ptr, int sz, swig_type_info *ty) {
1211 if ((!obj) || (!SvOK(obj))) return SWIG_ERROR;
1212 c = SvPV_nolen(obj);
1213 /* Pointer values must start with leading underscore */
1214 if (*c != '_') return SWIG_ERROR;
1216 c = SWIG_UnpackData(c,ptr,sz);
1218 tc = SWIG_TypeCheck(c,ty);
1219 if (!tc) return SWIG_ERROR;
1225 /* Macros for low-level exception handling */
1226 #define SWIG_croak(x) { SWIG_Error(SWIG_RuntimeError, x); SWIG_fail; }
1229 typedef XSPROTO(SwigPerlWrapper);
1230 typedef SwigPerlWrapper *SwigPerlWrapperPtr;
1232 /* Structure for command table */
1235 SwigPerlWrapperPtr wrapper;
1236 } swig_command_info;
1238 /* Information for constant table */
1241 #define SWIG_FLOAT 2
1242 #define SWIG_STRING 3
1243 #define SWIG_POINTER 4
1244 #define SWIG_BINARY 5
1246 /* Constant information structure */
1247 typedef struct swig_constant_info {
1253 swig_type_info **ptype;
1254 } swig_constant_info;
1257 /* Structure for variable table */
1262 swig_type_info **type;
1263 } swig_variable_info;
1265 /* Magic variable code */
1267 #define swig_create_magic(s,a,b,c) _swig_create_magic(s,a,b,c)
1268 #ifndef MULTIPLICITY
1269 SWIGRUNTIME void _swig_create_magic(SV *sv, char *name, int (*set)(SV *, MAGIC *), int (*get)(SV *,MAGIC *))
1271 SWIGRUNTIME void _swig_create_magic(SV *sv, char *name, int (*set)(struct interpreter*, SV *, MAGIC *), int (*get)(struct interpreter*, SV *,MAGIC *))
1274 # define swig_create_magic(s,a,b,c) _swig_create_magic(pPerl,s,a,b,c)
1275 SWIGRUNTIME void _swig_create_magic(CPerlObj *pPerl, SV *sv, const char *name, int (CPerlObj::*set)(SV *, MAGIC *), int (CPerlObj::*get)(SV *, MAGIC *))
1279 sv_magic(sv,sv,'U',(char *) name,strlen(name));
1280 mg = mg_find(sv,'U');
1281 mg->mg_virtual = (MGVTBL *) malloc(sizeof(MGVTBL));
1282 mg->mg_virtual->svt_get = (SwigMagicFunc) get;
1283 mg->mg_virtual->svt_set = (SwigMagicFunc) set;
1284 mg->mg_virtual->svt_len = 0;
1285 mg->mg_virtual->svt_clear = 0;
1286 mg->mg_virtual->svt_free = 0;
1290 SWIGRUNTIME swig_module_info *
1291 SWIG_Perl_GetModule(void) {
1292 static void *type_pointer = (void *)0;
1295 /* first check if pointer already created */
1296 if (!type_pointer) {
1297 pointer = get_sv("swig_runtime_data::type_pointer" SWIG_RUNTIME_VERSION SWIG_TYPE_TABLE_NAME, FALSE);
1298 if (pointer && SvOK(pointer)) {
1299 type_pointer = INT2PTR(swig_type_info **, SvIV(pointer));
1303 return (swig_module_info *) type_pointer;
1307 SWIG_Perl_SetModule(swig_module_info *module) {
1310 /* create a new pointer */
1311 pointer = get_sv("swig_runtime_data::type_pointer" SWIG_RUNTIME_VERSION SWIG_TYPE_TABLE_NAME, TRUE);
1312 sv_setiv(pointer, PTR2IV(module));
1319 /* Workaround perl5 global namespace pollution. Note that undefining library
1320 * functions like fopen will not solve the problem on all platforms as fopen
1321 * might be a macro on Windows but not necessarily on other operating systems. */
1415 #define SWIG_exception_fail(code, msg) do { SWIG_Error(code, msg); SWIG_fail; } while(0)
1417 #define SWIG_contract_assert(expr, msg) if (!(expr)) { SWIG_Error(SWIG_RuntimeError, msg); SWIG_fail; } else
1421 #define SWIG_exception(code, msg) do { SWIG_Error(code, msg); SWIG_fail;; } while(0)
1424 /* -------- TYPES TABLE (BEGIN) -------- */
1426 #define SWIGTYPE_p_a_STRMAX__char swig_types[0]
1427 #define SWIGTYPE_p_char swig_types[1]
1428 #define SWIGTYPE_p_double swig_types[2]
1429 #define SWIGTYPE_p_dumpfile_t swig_types[3]
1430 #define SWIGTYPE_p_float swig_types[4]
1431 #define SWIGTYPE_p_int swig_types[5]
1432 #define SWIGTYPE_p_unsigned_char swig_types[6]
1433 static swig_type_info *swig_types[8];
1434 static swig_module_info swig_module = {swig_types, 7, 0, 0, 0, 0};
1435 #define SWIG_TypeQuery(name) SWIG_TypeQueryModule(&swig_module, &swig_module, name)
1436 #define SWIG_MangledTypeQuery(name) SWIG_MangledTypeQueryModule(&swig_module, &swig_module, name)
1438 /* -------- TYPES TABLE (END) -------- */
1440 #define SWIG_init boot_Amanda__Types
1442 #define SWIG_name "Amanda::Typesc::boot_Amanda__Types"
1443 #define SWIG_prefix "Amanda::Typesc::"
1445 #define SWIGVERSION 0x010333
1446 #define SWIG_VERSION SWIGVERSION
1449 #define SWIG_as_voidptr(a) (void *)((const void *)(a))
1450 #define SWIG_as_voidptrptr(a) ((void)SWIG_as_voidptr(*a),(void**)(a))
1457 #ifndef MULTIPLICITY
1458 SWIGEXPORT void SWIG_init (CV* cv);
1460 SWIGEXPORT void SWIG_init (pTHXo_ CV* cv);
1463 SWIGEXPORT void SWIG_init (CV *cv, CPerlObj *);
1476 #include "fileheader.h"
1479 SWIGINTERNINLINE SV *
1480 SWIG_From_long SWIG_PERL_DECL_ARGS_1(long value)
1482 SV *obj = sv_newmortal();
1483 sv_setiv(obj, (IV) value);
1488 SWIGINTERNINLINE SV *
1489 SWIG_From_int SWIG_PERL_DECL_ARGS_1(int value)
1491 return SWIG_From_long SWIG_PERL_CALL_ARGS_1(value);
1496 #if !defined(SWIG_NO_LLONG_MAX)
1497 # if !defined(LLONG_MAX) && defined(__GNUC__) && defined (__LONG_LONG_MAX__)
1498 # define LLONG_MAX __LONG_LONG_MAX__
1499 # define LLONG_MIN (-LLONG_MAX - 1LL)
1500 # define ULLONG_MAX (LLONG_MAX * 2ULL + 1ULL)
1506 SWIG_AsVal_double SWIG_PERL_DECL_ARGS_2(SV *obj, double *val)
1509 if (val) *val = SvNV(obj);
1511 } else if (SvIOK(obj)) {
1512 if (val) *val = (double) SvIV(obj);
1513 return SWIG_AddCast(SWIG_OK);
1515 const char *nptr = SvPV_nolen(obj);
1518 double v = strtod(nptr, &endptr);
1519 if (errno == ERANGE) {
1521 return SWIG_OverflowError;
1523 if (*endptr == '\0') {
1525 return SWIG_Str2NumCast(SWIG_OK);
1530 return SWIG_TypeError;
1540 SWIGINTERNINLINE int
1541 SWIG_CanCastAsInteger(double *d, double min, double max) {
1543 if ((min <= x && x <= max)) {
1544 double fx = floor(x);
1545 double cx = ceil(x);
1546 double rd = ((x - fx) < 0.5) ? fx : cx; /* simple rint */
1547 if ((errno == EDOM) || (errno == ERANGE)) {
1550 double summ, reps, diff;
1553 } else if (rd > x) {
1560 if (reps < 8*DBL_EPSILON) {
1571 SWIG_AsVal_long SWIG_PERL_DECL_ARGS_2(SV *obj, long* val)
1574 if (val) *val = SvIV(obj);
1578 const char *nptr = SvPV_nolen(obj);
1583 v = strtol(nptr, &endptr,0);
1584 if (errno == ERANGE) {
1586 return SWIG_OverflowError;
1588 if (*endptr == '\0') {
1590 return SWIG_Str2NumCast(SWIG_OK);
1596 int res = SWIG_AddCast(SWIG_AsVal_double SWIG_PERL_CALL_ARGS_2(obj,&d));
1597 if (SWIG_IsOK(res) && SWIG_CanCastAsInteger(&d, LONG_MIN, LONG_MAX)) {
1598 if (val) *val = (long)(d);
1603 return SWIG_TypeError;
1608 SWIG_AsVal_int SWIG_PERL_DECL_ARGS_2(SV * obj, int *val)
1611 int res = SWIG_AsVal_long SWIG_PERL_CALL_ARGS_2(obj, &v);
1612 if (SWIG_IsOK(res)) {
1613 if ((v < INT_MIN || v > INT_MAX)) {
1614 return SWIG_OverflowError;
1616 if (val) *val = (int)(v);
1623 SWIGINTERN swig_type_info*
1624 SWIG_pchar_descriptor(void)
1626 static int init = 0;
1627 static swig_type_info* info = 0;
1629 info = SWIG_TypeQuery("_p_char");
1637 SWIG_AsCharPtrAndSize(SV *obj, char** cptr, size_t* psize, int *alloc)
1641 char *cstr = SvPV(obj, len);
1642 size_t size = len + 1;
1645 if (*alloc == SWIG_NEWOBJ) {
1646 *cptr = (char *)memcpy((char *)malloc((size)*sizeof(char)), cstr, sizeof(char)*(size));
1649 *alloc = SWIG_OLDOBJ;
1653 if (psize) *psize = size;
1656 swig_type_info* pchar_descriptor = SWIG_pchar_descriptor();
1657 if (pchar_descriptor) {
1659 if (SWIG_ConvertPtr(obj, (void**)&vptr, pchar_descriptor, 0) == SWIG_OK) {
1660 if (cptr) *cptr = vptr;
1661 if (psize) *psize = vptr ? (strlen(vptr) + 1) : 0;
1662 if (alloc) *alloc = SWIG_OLDOBJ;
1667 return SWIG_TypeError;
1672 SWIG_AsCharArray(SV * obj, char *val, size_t size)
1674 char* cptr = 0; size_t csize = 0; int alloc = SWIG_OLDOBJ;
1675 int res = SWIG_AsCharPtrAndSize(obj, &cptr, &csize, &alloc);
1676 if (SWIG_IsOK(res)) {
1677 if ((csize == size + 1) && cptr && !(cptr[csize-1])) --csize;
1678 if (csize <= size) {
1680 if (csize) memcpy(val, cptr, csize*sizeof(char));
1681 if (csize < size) memset(val + csize, 0, (size - csize)*sizeof(char));
1683 if (alloc == SWIG_NEWOBJ) {
1685 res = SWIG_DelNewMask(res);
1689 if (alloc == SWIG_NEWOBJ) free((char*)cptr);
1691 return SWIG_TypeError;
1695 SWIGINTERNINLINE SV *
1696 SWIG_FromCharPtrAndSize(const char* carray, size_t size)
1698 SV *obj = sv_newmortal();
1700 sv_setpvn(obj, carray, size);
1702 sv_setsv(obj, &PL_sv_undef);
1709 SWIG_AsVal_unsigned_SS_long SWIG_PERL_DECL_ARGS_2(SV *obj, unsigned long *val)
1712 if (val) *val = SvUV(obj);
1714 } else if (SvIOK(obj)) {
1720 return SWIG_OverflowError;
1724 const char *nptr = SvPV_nolen(obj);
1729 v = strtoul(nptr, &endptr,0);
1730 if (errno == ERANGE) {
1732 return SWIG_OverflowError;
1734 if (*endptr == '\0') {
1736 return SWIG_Str2NumCast(SWIG_OK);
1742 int res = SWIG_AddCast(SWIG_AsVal_double SWIG_PERL_CALL_ARGS_2(obj,&d));
1743 if (SWIG_IsOK(res) && SWIG_CanCastAsInteger(&d, 0, ULONG_MAX)) {
1744 if (val) *val = (unsigned long)(d);
1749 return SWIG_TypeError;
1753 SWIGINTERNINLINE int
1754 SWIG_AsVal_size_t SWIG_PERL_DECL_ARGS_2(SV * obj, size_t *val)
1757 int res = SWIG_AsVal_unsigned_SS_long SWIG_PERL_CALL_ARGS_2(obj, val ? &v : 0);
1758 if (SWIG_IsOK(res) && val) *val = (size_t)(v);
1762 SWIGINTERN dumpfile_t *new_dumpfile_t(){
1763 dumpfile_t *df = malloc(sizeof(*df));
1772 #define MAGIC_CLASS _wrap_Amanda::Types_var::
1773 class _wrap_Amanda::Types_var : public CPerlObj {
1778 SWIGCLASS_STATIC int swig_magic_readonly(pTHX_ SV *SWIGUNUSEDPARM(sv), MAGIC *SWIGUNUSEDPARM(mg)) {
1780 croak("Value is read-only.");
1796 XS(_wrap_dumpfile_t_type_set) {
1798 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
1805 if ((items < 2) || (items > 2)) {
1806 SWIG_croak("Usage: dumpfile_t_type_set(self,type);");
1808 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
1809 if (!SWIG_IsOK(res1)) {
1810 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_type_set" "', argument " "1"" of type '" "dumpfile_t *""'");
1812 arg1 = (dumpfile_t *)(argp1);
1814 if (sizeof(signed int) == 1) {
1815 arg2 = amglue_SvI8(ST(1));
1816 } else if (sizeof(signed int) == 2) {
1817 arg2 = amglue_SvI16(ST(1));
1818 } else if (sizeof(signed int) == 4) {
1819 arg2 = amglue_SvI32(ST(1));
1820 } else if (sizeof(signed int) == 8) {
1821 arg2 = amglue_SvI64(ST(1));
1823 g_critical("Unexpected signed int >64 bits?"); /* should be optimized out unless sizeof(signed int) > 8 */
1826 if (arg1) (arg1)->type = arg2;
1840 XS(_wrap_dumpfile_t_type_get) {
1842 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
1849 if ((items < 1) || (items > 1)) {
1850 SWIG_croak("Usage: dumpfile_t_type_get(self);");
1852 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
1853 if (!SWIG_IsOK(res1)) {
1854 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_type_get" "', argument " "1"" of type '" "dumpfile_t *""'");
1856 arg1 = (dumpfile_t *)(argp1);
1857 result = (filetype_t) ((arg1)->type);
1859 ST(argvi) = sv_2mortal(amglue_newSVi64(result));
1871 XS(_wrap_dumpfile_t_datestamp_set) {
1873 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
1877 char temp2[STRMAX] ;
1882 if ((items < 2) || (items > 2)) {
1883 SWIG_croak("Usage: dumpfile_t_datestamp_set(self,datestamp);");
1885 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
1886 if (!SWIG_IsOK(res1)) {
1887 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_datestamp_set" "', argument " "1"" of type '" "dumpfile_t *""'");
1889 arg1 = (dumpfile_t *)(argp1);
1890 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
1891 if (!SWIG_IsOK(res2)) {
1892 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_datestamp_set" "', argument " "2"" of type '" "char [STRMAX]""'");
1894 arg2 = (char *)(temp2);
1896 strncpy(arg1->datestamp, arg2, STRMAX);
1897 if (arg1->datestamp[STRMAX-1] != '\0')
1898 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
1912 XS(_wrap_dumpfile_t_datestamp_get) {
1914 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
1921 if ((items < 1) || (items > 1)) {
1922 SWIG_croak("Usage: dumpfile_t_datestamp_get(self);");
1924 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
1925 if (!SWIG_IsOK(res1)) {
1926 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_datestamp_get" "', argument " "1"" of type '" "dumpfile_t *""'");
1928 arg1 = (dumpfile_t *)(argp1);
1929 result = (char *) ((arg1)->datestamp);
1931 size_t size = STRMAX;
1933 while (size && (result[size - 1] == '\0')) --size;
1935 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
1946 XS(_wrap_dumpfile_t_dumplevel_set) {
1948 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
1955 if ((items < 2) || (items > 2)) {
1956 SWIG_croak("Usage: dumpfile_t_dumplevel_set(self,dumplevel);");
1958 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
1959 if (!SWIG_IsOK(res1)) {
1960 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_dumplevel_set" "', argument " "1"" of type '" "dumpfile_t *""'");
1962 arg1 = (dumpfile_t *)(argp1);
1964 if (sizeof(signed int) == 1) {
1965 arg2 = amglue_SvI8(ST(1));
1966 } else if (sizeof(signed int) == 2) {
1967 arg2 = amglue_SvI16(ST(1));
1968 } else if (sizeof(signed int) == 4) {
1969 arg2 = amglue_SvI32(ST(1));
1970 } else if (sizeof(signed int) == 8) {
1971 arg2 = amglue_SvI64(ST(1));
1973 g_critical("Unexpected signed int >64 bits?"); /* should be optimized out unless sizeof(signed int) > 8 */
1976 if (arg1) (arg1)->dumplevel = arg2;
1990 XS(_wrap_dumpfile_t_dumplevel_get) {
1992 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
1999 if ((items < 1) || (items > 1)) {
2000 SWIG_croak("Usage: dumpfile_t_dumplevel_get(self);");
2002 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2003 if (!SWIG_IsOK(res1)) {
2004 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_dumplevel_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2006 arg1 = (dumpfile_t *)(argp1);
2007 result = (int) ((arg1)->dumplevel);
2009 ST(argvi) = sv_2mortal(amglue_newSVi64(result));
2021 XS(_wrap_dumpfile_t_compressed_set) {
2023 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2030 if ((items < 2) || (items > 2)) {
2031 SWIG_croak("Usage: dumpfile_t_compressed_set(self,compressed);");
2033 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2034 if (!SWIG_IsOK(res1)) {
2035 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_compressed_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2037 arg1 = (dumpfile_t *)(argp1);
2039 if (sizeof(signed int) == 1) {
2040 arg2 = amglue_SvI8(ST(1));
2041 } else if (sizeof(signed int) == 2) {
2042 arg2 = amglue_SvI16(ST(1));
2043 } else if (sizeof(signed int) == 4) {
2044 arg2 = amglue_SvI32(ST(1));
2045 } else if (sizeof(signed int) == 8) {
2046 arg2 = amglue_SvI64(ST(1));
2048 g_critical("Unexpected signed int >64 bits?"); /* should be optimized out unless sizeof(signed int) > 8 */
2051 if (arg1) (arg1)->compressed = arg2;
2065 XS(_wrap_dumpfile_t_compressed_get) {
2067 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2074 if ((items < 1) || (items > 1)) {
2075 SWIG_croak("Usage: dumpfile_t_compressed_get(self);");
2077 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2078 if (!SWIG_IsOK(res1)) {
2079 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_compressed_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2081 arg1 = (dumpfile_t *)(argp1);
2082 result = (int) ((arg1)->compressed);
2084 ST(argvi) = sv_2mortal(amglue_newSVi64(result));
2096 XS(_wrap_dumpfile_t_encrypted_set) {
2098 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2105 if ((items < 2) || (items > 2)) {
2106 SWIG_croak("Usage: dumpfile_t_encrypted_set(self,encrypted);");
2108 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2109 if (!SWIG_IsOK(res1)) {
2110 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_encrypted_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2112 arg1 = (dumpfile_t *)(argp1);
2114 if (sizeof(signed int) == 1) {
2115 arg2 = amglue_SvI8(ST(1));
2116 } else if (sizeof(signed int) == 2) {
2117 arg2 = amglue_SvI16(ST(1));
2118 } else if (sizeof(signed int) == 4) {
2119 arg2 = amglue_SvI32(ST(1));
2120 } else if (sizeof(signed int) == 8) {
2121 arg2 = amglue_SvI64(ST(1));
2123 g_critical("Unexpected signed int >64 bits?"); /* should be optimized out unless sizeof(signed int) > 8 */
2126 if (arg1) (arg1)->encrypted = arg2;
2140 XS(_wrap_dumpfile_t_encrypted_get) {
2142 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2149 if ((items < 1) || (items > 1)) {
2150 SWIG_croak("Usage: dumpfile_t_encrypted_get(self);");
2152 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2153 if (!SWIG_IsOK(res1)) {
2154 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_encrypted_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2156 arg1 = (dumpfile_t *)(argp1);
2157 result = (int) ((arg1)->encrypted);
2159 ST(argvi) = sv_2mortal(amglue_newSVi64(result));
2171 XS(_wrap_dumpfile_t_comp_suffix_set) {
2173 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2177 char temp2[STRMAX] ;
2182 if ((items < 2) || (items > 2)) {
2183 SWIG_croak("Usage: dumpfile_t_comp_suffix_set(self,comp_suffix);");
2185 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2186 if (!SWIG_IsOK(res1)) {
2187 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_comp_suffix_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2189 arg1 = (dumpfile_t *)(argp1);
2190 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2191 if (!SWIG_IsOK(res2)) {
2192 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_comp_suffix_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2194 arg2 = (char *)(temp2);
2196 strncpy(arg1->comp_suffix, arg2, STRMAX);
2197 if (arg1->comp_suffix[STRMAX-1] != '\0')
2198 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2212 XS(_wrap_dumpfile_t_comp_suffix_get) {
2214 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2221 if ((items < 1) || (items > 1)) {
2222 SWIG_croak("Usage: dumpfile_t_comp_suffix_get(self);");
2224 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2225 if (!SWIG_IsOK(res1)) {
2226 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_comp_suffix_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2228 arg1 = (dumpfile_t *)(argp1);
2229 result = (char *) ((arg1)->comp_suffix);
2231 size_t size = STRMAX;
2233 while (size && (result[size - 1] == '\0')) --size;
2235 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2246 XS(_wrap_dumpfile_t_encrypt_suffix_set) {
2248 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2252 char temp2[STRMAX] ;
2257 if ((items < 2) || (items > 2)) {
2258 SWIG_croak("Usage: dumpfile_t_encrypt_suffix_set(self,encrypt_suffix);");
2260 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2261 if (!SWIG_IsOK(res1)) {
2262 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_encrypt_suffix_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2264 arg1 = (dumpfile_t *)(argp1);
2265 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2266 if (!SWIG_IsOK(res2)) {
2267 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_encrypt_suffix_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2269 arg2 = (char *)(temp2);
2271 strncpy(arg1->encrypt_suffix, arg2, STRMAX);
2272 if (arg1->encrypt_suffix[STRMAX-1] != '\0')
2273 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2287 XS(_wrap_dumpfile_t_encrypt_suffix_get) {
2289 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2296 if ((items < 1) || (items > 1)) {
2297 SWIG_croak("Usage: dumpfile_t_encrypt_suffix_get(self);");
2299 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2300 if (!SWIG_IsOK(res1)) {
2301 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_encrypt_suffix_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2303 arg1 = (dumpfile_t *)(argp1);
2304 result = (char *) ((arg1)->encrypt_suffix);
2306 size_t size = STRMAX;
2308 while (size && (result[size - 1] == '\0')) --size;
2310 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2321 XS(_wrap_dumpfile_t_name_set) {
2323 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2327 char temp2[STRMAX] ;
2332 if ((items < 2) || (items > 2)) {
2333 SWIG_croak("Usage: dumpfile_t_name_set(self,name);");
2335 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2336 if (!SWIG_IsOK(res1)) {
2337 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_name_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2339 arg1 = (dumpfile_t *)(argp1);
2340 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2341 if (!SWIG_IsOK(res2)) {
2342 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_name_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2344 arg2 = (char *)(temp2);
2346 strncpy(arg1->name, arg2, STRMAX);
2347 if (arg1->name[STRMAX-1] != '\0')
2348 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2362 XS(_wrap_dumpfile_t_name_get) {
2364 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2371 if ((items < 1) || (items > 1)) {
2372 SWIG_croak("Usage: dumpfile_t_name_get(self);");
2374 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2375 if (!SWIG_IsOK(res1)) {
2376 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_name_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2378 arg1 = (dumpfile_t *)(argp1);
2379 result = (char *) ((arg1)->name);
2381 size_t size = STRMAX;
2383 while (size && (result[size - 1] == '\0')) --size;
2385 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2396 XS(_wrap_dumpfile_t_disk_set) {
2398 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2402 char temp2[STRMAX] ;
2407 if ((items < 2) || (items > 2)) {
2408 SWIG_croak("Usage: dumpfile_t_disk_set(self,disk);");
2410 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2411 if (!SWIG_IsOK(res1)) {
2412 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_disk_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2414 arg1 = (dumpfile_t *)(argp1);
2415 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2416 if (!SWIG_IsOK(res2)) {
2417 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_disk_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2419 arg2 = (char *)(temp2);
2421 strncpy(arg1->disk, arg2, STRMAX);
2422 if (arg1->disk[STRMAX-1] != '\0')
2423 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2437 XS(_wrap_dumpfile_t_disk_get) {
2439 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2446 if ((items < 1) || (items > 1)) {
2447 SWIG_croak("Usage: dumpfile_t_disk_get(self);");
2449 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2450 if (!SWIG_IsOK(res1)) {
2451 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_disk_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2453 arg1 = (dumpfile_t *)(argp1);
2454 result = (char *) ((arg1)->disk);
2456 size_t size = STRMAX;
2458 while (size && (result[size - 1] == '\0')) --size;
2460 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2471 XS(_wrap_dumpfile_t_program_set) {
2473 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2477 char temp2[STRMAX] ;
2482 if ((items < 2) || (items > 2)) {
2483 SWIG_croak("Usage: dumpfile_t_program_set(self,program);");
2485 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2486 if (!SWIG_IsOK(res1)) {
2487 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_program_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2489 arg1 = (dumpfile_t *)(argp1);
2490 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2491 if (!SWIG_IsOK(res2)) {
2492 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_program_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2494 arg2 = (char *)(temp2);
2496 strncpy(arg1->program, arg2, STRMAX);
2497 if (arg1->program[STRMAX-1] != '\0')
2498 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2512 XS(_wrap_dumpfile_t_program_get) {
2514 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2521 if ((items < 1) || (items > 1)) {
2522 SWIG_croak("Usage: dumpfile_t_program_get(self);");
2524 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2525 if (!SWIG_IsOK(res1)) {
2526 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_program_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2528 arg1 = (dumpfile_t *)(argp1);
2529 result = (char *) ((arg1)->program);
2531 size_t size = STRMAX;
2533 while (size && (result[size - 1] == '\0')) --size;
2535 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2546 XS(_wrap_dumpfile_t_dumper_set) {
2548 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2552 char temp2[STRMAX] ;
2557 if ((items < 2) || (items > 2)) {
2558 SWIG_croak("Usage: dumpfile_t_dumper_set(self,dumper);");
2560 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2561 if (!SWIG_IsOK(res1)) {
2562 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_dumper_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2564 arg1 = (dumpfile_t *)(argp1);
2565 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2566 if (!SWIG_IsOK(res2)) {
2567 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_dumper_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2569 arg2 = (char *)(temp2);
2571 strncpy(arg1->dumper, arg2, STRMAX);
2572 if (arg1->dumper[STRMAX-1] != '\0')
2573 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2587 XS(_wrap_dumpfile_t_dumper_get) {
2589 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2596 if ((items < 1) || (items > 1)) {
2597 SWIG_croak("Usage: dumpfile_t_dumper_get(self);");
2599 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2600 if (!SWIG_IsOK(res1)) {
2601 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_dumper_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2603 arg1 = (dumpfile_t *)(argp1);
2604 result = (char *) ((arg1)->dumper);
2606 size_t size = STRMAX;
2608 while (size && (result[size - 1] == '\0')) --size;
2610 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2621 XS(_wrap_dumpfile_t_srvcompprog_set) {
2623 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2627 char temp2[STRMAX] ;
2632 if ((items < 2) || (items > 2)) {
2633 SWIG_croak("Usage: dumpfile_t_srvcompprog_set(self,srvcompprog);");
2635 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2636 if (!SWIG_IsOK(res1)) {
2637 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_srvcompprog_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2639 arg1 = (dumpfile_t *)(argp1);
2640 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2641 if (!SWIG_IsOK(res2)) {
2642 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_srvcompprog_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2644 arg2 = (char *)(temp2);
2646 strncpy(arg1->srvcompprog, arg2, STRMAX);
2647 if (arg1->srvcompprog[STRMAX-1] != '\0')
2648 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2662 XS(_wrap_dumpfile_t_srvcompprog_get) {
2664 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2671 if ((items < 1) || (items > 1)) {
2672 SWIG_croak("Usage: dumpfile_t_srvcompprog_get(self);");
2674 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2675 if (!SWIG_IsOK(res1)) {
2676 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_srvcompprog_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2678 arg1 = (dumpfile_t *)(argp1);
2679 result = (char *) ((arg1)->srvcompprog);
2681 size_t size = STRMAX;
2683 while (size && (result[size - 1] == '\0')) --size;
2685 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2696 XS(_wrap_dumpfile_t_clntcompprog_set) {
2698 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2702 char temp2[STRMAX] ;
2707 if ((items < 2) || (items > 2)) {
2708 SWIG_croak("Usage: dumpfile_t_clntcompprog_set(self,clntcompprog);");
2710 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2711 if (!SWIG_IsOK(res1)) {
2712 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_clntcompprog_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2714 arg1 = (dumpfile_t *)(argp1);
2715 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2716 if (!SWIG_IsOK(res2)) {
2717 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_clntcompprog_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2719 arg2 = (char *)(temp2);
2721 strncpy(arg1->clntcompprog, arg2, STRMAX);
2722 if (arg1->clntcompprog[STRMAX-1] != '\0')
2723 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2737 XS(_wrap_dumpfile_t_clntcompprog_get) {
2739 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2746 if ((items < 1) || (items > 1)) {
2747 SWIG_croak("Usage: dumpfile_t_clntcompprog_get(self);");
2749 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2750 if (!SWIG_IsOK(res1)) {
2751 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_clntcompprog_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2753 arg1 = (dumpfile_t *)(argp1);
2754 result = (char *) ((arg1)->clntcompprog);
2756 size_t size = STRMAX;
2758 while (size && (result[size - 1] == '\0')) --size;
2760 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2771 XS(_wrap_dumpfile_t_srv_encrypt_set) {
2773 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2777 char temp2[STRMAX] ;
2782 if ((items < 2) || (items > 2)) {
2783 SWIG_croak("Usage: dumpfile_t_srv_encrypt_set(self,srv_encrypt);");
2785 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2786 if (!SWIG_IsOK(res1)) {
2787 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_srv_encrypt_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2789 arg1 = (dumpfile_t *)(argp1);
2790 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2791 if (!SWIG_IsOK(res2)) {
2792 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_srv_encrypt_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2794 arg2 = (char *)(temp2);
2796 strncpy(arg1->srv_encrypt, arg2, STRMAX);
2797 if (arg1->srv_encrypt[STRMAX-1] != '\0')
2798 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2812 XS(_wrap_dumpfile_t_srv_encrypt_get) {
2814 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2821 if ((items < 1) || (items > 1)) {
2822 SWIG_croak("Usage: dumpfile_t_srv_encrypt_get(self);");
2824 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2825 if (!SWIG_IsOK(res1)) {
2826 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_srv_encrypt_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2828 arg1 = (dumpfile_t *)(argp1);
2829 result = (char *) ((arg1)->srv_encrypt);
2831 size_t size = STRMAX;
2833 while (size && (result[size - 1] == '\0')) --size;
2835 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2846 XS(_wrap_dumpfile_t_clnt_encrypt_set) {
2848 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2852 char temp2[STRMAX] ;
2857 if ((items < 2) || (items > 2)) {
2858 SWIG_croak("Usage: dumpfile_t_clnt_encrypt_set(self,clnt_encrypt);");
2860 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2861 if (!SWIG_IsOK(res1)) {
2862 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_clnt_encrypt_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2864 arg1 = (dumpfile_t *)(argp1);
2865 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2866 if (!SWIG_IsOK(res2)) {
2867 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_clnt_encrypt_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2869 arg2 = (char *)(temp2);
2871 strncpy(arg1->clnt_encrypt, arg2, STRMAX);
2872 if (arg1->clnt_encrypt[STRMAX-1] != '\0')
2873 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2887 XS(_wrap_dumpfile_t_clnt_encrypt_get) {
2889 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2896 if ((items < 1) || (items > 1)) {
2897 SWIG_croak("Usage: dumpfile_t_clnt_encrypt_get(self);");
2899 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2900 if (!SWIG_IsOK(res1)) {
2901 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_clnt_encrypt_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2903 arg1 = (dumpfile_t *)(argp1);
2904 result = (char *) ((arg1)->clnt_encrypt);
2906 size_t size = STRMAX;
2908 while (size && (result[size - 1] == '\0')) --size;
2910 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2921 XS(_wrap_dumpfile_t_recover_cmd_set) {
2923 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2927 char temp2[STRMAX] ;
2932 if ((items < 2) || (items > 2)) {
2933 SWIG_croak("Usage: dumpfile_t_recover_cmd_set(self,recover_cmd);");
2935 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2936 if (!SWIG_IsOK(res1)) {
2937 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_recover_cmd_set" "', argument " "1"" of type '" "dumpfile_t *""'");
2939 arg1 = (dumpfile_t *)(argp1);
2940 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
2941 if (!SWIG_IsOK(res2)) {
2942 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_recover_cmd_set" "', argument " "2"" of type '" "char [STRMAX]""'");
2944 arg2 = (char *)(temp2);
2946 strncpy(arg1->recover_cmd, arg2, STRMAX);
2947 if (arg1->recover_cmd[STRMAX-1] != '\0')
2948 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
2962 XS(_wrap_dumpfile_t_recover_cmd_get) {
2964 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
2971 if ((items < 1) || (items > 1)) {
2972 SWIG_croak("Usage: dumpfile_t_recover_cmd_get(self);");
2974 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
2975 if (!SWIG_IsOK(res1)) {
2976 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_recover_cmd_get" "', argument " "1"" of type '" "dumpfile_t *""'");
2978 arg1 = (dumpfile_t *)(argp1);
2979 result = (char *) ((arg1)->recover_cmd);
2981 size_t size = STRMAX;
2983 while (size && (result[size - 1] == '\0')) --size;
2985 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
2996 XS(_wrap_dumpfile_t_uncompress_cmd_set) {
2998 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3002 char temp2[STRMAX] ;
3007 if ((items < 2) || (items > 2)) {
3008 SWIG_croak("Usage: dumpfile_t_uncompress_cmd_set(self,uncompress_cmd);");
3010 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3011 if (!SWIG_IsOK(res1)) {
3012 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_uncompress_cmd_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3014 arg1 = (dumpfile_t *)(argp1);
3015 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
3016 if (!SWIG_IsOK(res2)) {
3017 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_uncompress_cmd_set" "', argument " "2"" of type '" "char [STRMAX]""'");
3019 arg2 = (char *)(temp2);
3021 strncpy(arg1->uncompress_cmd, arg2, STRMAX);
3022 if (arg1->uncompress_cmd[STRMAX-1] != '\0')
3023 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
3037 XS(_wrap_dumpfile_t_uncompress_cmd_get) {
3039 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3046 if ((items < 1) || (items > 1)) {
3047 SWIG_croak("Usage: dumpfile_t_uncompress_cmd_get(self);");
3049 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3050 if (!SWIG_IsOK(res1)) {
3051 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_uncompress_cmd_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3053 arg1 = (dumpfile_t *)(argp1);
3054 result = (char *) ((arg1)->uncompress_cmd);
3056 size_t size = STRMAX;
3058 while (size && (result[size - 1] == '\0')) --size;
3060 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
3071 XS(_wrap_dumpfile_t_encrypt_cmd_set) {
3073 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3077 char temp2[STRMAX] ;
3082 if ((items < 2) || (items > 2)) {
3083 SWIG_croak("Usage: dumpfile_t_encrypt_cmd_set(self,encrypt_cmd);");
3085 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3086 if (!SWIG_IsOK(res1)) {
3087 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_encrypt_cmd_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3089 arg1 = (dumpfile_t *)(argp1);
3090 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
3091 if (!SWIG_IsOK(res2)) {
3092 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_encrypt_cmd_set" "', argument " "2"" of type '" "char [STRMAX]""'");
3094 arg2 = (char *)(temp2);
3096 strncpy(arg1->encrypt_cmd, arg2, STRMAX);
3097 if (arg1->encrypt_cmd[STRMAX-1] != '\0')
3098 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
3112 XS(_wrap_dumpfile_t_encrypt_cmd_get) {
3114 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3121 if ((items < 1) || (items > 1)) {
3122 SWIG_croak("Usage: dumpfile_t_encrypt_cmd_get(self);");
3124 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3125 if (!SWIG_IsOK(res1)) {
3126 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_encrypt_cmd_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3128 arg1 = (dumpfile_t *)(argp1);
3129 result = (char *) ((arg1)->encrypt_cmd);
3131 size_t size = STRMAX;
3133 while (size && (result[size - 1] == '\0')) --size;
3135 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
3146 XS(_wrap_dumpfile_t_decrypt_cmd_set) {
3148 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3152 char temp2[STRMAX] ;
3157 if ((items < 2) || (items > 2)) {
3158 SWIG_croak("Usage: dumpfile_t_decrypt_cmd_set(self,decrypt_cmd);");
3160 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3161 if (!SWIG_IsOK(res1)) {
3162 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_decrypt_cmd_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3164 arg1 = (dumpfile_t *)(argp1);
3165 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
3166 if (!SWIG_IsOK(res2)) {
3167 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_decrypt_cmd_set" "', argument " "2"" of type '" "char [STRMAX]""'");
3169 arg2 = (char *)(temp2);
3171 strncpy(arg1->decrypt_cmd, arg2, STRMAX);
3172 if (arg1->decrypt_cmd[STRMAX-1] != '\0')
3173 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
3187 XS(_wrap_dumpfile_t_decrypt_cmd_get) {
3189 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3196 if ((items < 1) || (items > 1)) {
3197 SWIG_croak("Usage: dumpfile_t_decrypt_cmd_get(self);");
3199 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3200 if (!SWIG_IsOK(res1)) {
3201 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_decrypt_cmd_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3203 arg1 = (dumpfile_t *)(argp1);
3204 result = (char *) ((arg1)->decrypt_cmd);
3206 size_t size = STRMAX;
3208 while (size && (result[size - 1] == '\0')) --size;
3210 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
3221 XS(_wrap_dumpfile_t_srv_decrypt_opt_set) {
3223 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3227 char temp2[STRMAX] ;
3232 if ((items < 2) || (items > 2)) {
3233 SWIG_croak("Usage: dumpfile_t_srv_decrypt_opt_set(self,srv_decrypt_opt);");
3235 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3236 if (!SWIG_IsOK(res1)) {
3237 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_srv_decrypt_opt_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3239 arg1 = (dumpfile_t *)(argp1);
3240 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
3241 if (!SWIG_IsOK(res2)) {
3242 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_srv_decrypt_opt_set" "', argument " "2"" of type '" "char [STRMAX]""'");
3244 arg2 = (char *)(temp2);
3246 strncpy(arg1->srv_decrypt_opt, arg2, STRMAX);
3247 if (arg1->srv_decrypt_opt[STRMAX-1] != '\0')
3248 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
3262 XS(_wrap_dumpfile_t_srv_decrypt_opt_get) {
3264 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3271 if ((items < 1) || (items > 1)) {
3272 SWIG_croak("Usage: dumpfile_t_srv_decrypt_opt_get(self);");
3274 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3275 if (!SWIG_IsOK(res1)) {
3276 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_srv_decrypt_opt_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3278 arg1 = (dumpfile_t *)(argp1);
3279 result = (char *) ((arg1)->srv_decrypt_opt);
3281 size_t size = STRMAX;
3283 while (size && (result[size - 1] == '\0')) --size;
3285 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
3296 XS(_wrap_dumpfile_t_clnt_decrypt_opt_set) {
3298 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3302 char temp2[STRMAX] ;
3307 if ((items < 2) || (items > 2)) {
3308 SWIG_croak("Usage: dumpfile_t_clnt_decrypt_opt_set(self,clnt_decrypt_opt);");
3310 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3311 if (!SWIG_IsOK(res1)) {
3312 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_clnt_decrypt_opt_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3314 arg1 = (dumpfile_t *)(argp1);
3315 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
3316 if (!SWIG_IsOK(res2)) {
3317 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_clnt_decrypt_opt_set" "', argument " "2"" of type '" "char [STRMAX]""'");
3319 arg2 = (char *)(temp2);
3321 strncpy(arg1->clnt_decrypt_opt, arg2, STRMAX);
3322 if (arg1->clnt_decrypt_opt[STRMAX-1] != '\0')
3323 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
3337 XS(_wrap_dumpfile_t_clnt_decrypt_opt_get) {
3339 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3346 if ((items < 1) || (items > 1)) {
3347 SWIG_croak("Usage: dumpfile_t_clnt_decrypt_opt_get(self);");
3349 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3350 if (!SWIG_IsOK(res1)) {
3351 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_clnt_decrypt_opt_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3353 arg1 = (dumpfile_t *)(argp1);
3354 result = (char *) ((arg1)->clnt_decrypt_opt);
3356 size_t size = STRMAX;
3358 while (size && (result[size - 1] == '\0')) --size;
3360 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
3371 XS(_wrap_dumpfile_t_cont_filename_set) {
3373 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3377 char temp2[STRMAX] ;
3382 if ((items < 2) || (items > 2)) {
3383 SWIG_croak("Usage: dumpfile_t_cont_filename_set(self,cont_filename);");
3385 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3386 if (!SWIG_IsOK(res1)) {
3387 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_cont_filename_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3389 arg1 = (dumpfile_t *)(argp1);
3390 res2 = SWIG_AsCharArray(ST(1), temp2, STRMAX);
3391 if (!SWIG_IsOK(res2)) {
3392 SWIG_exception_fail(SWIG_ArgError(res2), "in method '" "dumpfile_t_cont_filename_set" "', argument " "2"" of type '" "char [STRMAX]""'");
3394 arg2 = (char *)(temp2);
3396 strncpy(arg1->cont_filename, arg2, STRMAX);
3397 if (arg1->cont_filename[STRMAX-1] != '\0')
3398 SWIG_exception(SWIG_ValueError, "String too large for dumpfile_t");
3412 XS(_wrap_dumpfile_t_cont_filename_get) {
3414 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3421 if ((items < 1) || (items > 1)) {
3422 SWIG_croak("Usage: dumpfile_t_cont_filename_get(self);");
3424 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3425 if (!SWIG_IsOK(res1)) {
3426 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_cont_filename_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3428 arg1 = (dumpfile_t *)(argp1);
3429 result = (char *) ((arg1)->cont_filename);
3431 size_t size = STRMAX;
3433 while (size && (result[size - 1] == '\0')) --size;
3435 ST(argvi) = SWIG_FromCharPtrAndSize(result, size); argvi++ ;
3446 XS(_wrap_dumpfile_t_is_partial_set) {
3448 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3455 if ((items < 2) || (items > 2)) {
3456 SWIG_croak("Usage: dumpfile_t_is_partial_set(self,is_partial);");
3458 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3459 if (!SWIG_IsOK(res1)) {
3460 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_is_partial_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3462 arg1 = (dumpfile_t *)(argp1);
3464 if (sizeof(signed int) == 1) {
3465 arg2 = amglue_SvI8(ST(1));
3466 } else if (sizeof(signed int) == 2) {
3467 arg2 = amglue_SvI16(ST(1));
3468 } else if (sizeof(signed int) == 4) {
3469 arg2 = amglue_SvI32(ST(1));
3470 } else if (sizeof(signed int) == 8) {
3471 arg2 = amglue_SvI64(ST(1));
3473 g_critical("Unexpected signed int >64 bits?"); /* should be optimized out unless sizeof(signed int) > 8 */
3476 if (arg1) (arg1)->is_partial = arg2;
3490 XS(_wrap_dumpfile_t_is_partial_get) {
3492 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3499 if ((items < 1) || (items > 1)) {
3500 SWIG_croak("Usage: dumpfile_t_is_partial_get(self);");
3502 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3503 if (!SWIG_IsOK(res1)) {
3504 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_is_partial_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3506 arg1 = (dumpfile_t *)(argp1);
3507 result = (int) ((arg1)->is_partial);
3509 ST(argvi) = sv_2mortal(amglue_newSVi64(result));
3521 XS(_wrap_dumpfile_t_partnum_set) {
3523 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3530 if ((items < 2) || (items > 2)) {
3531 SWIG_croak("Usage: dumpfile_t_partnum_set(self,partnum);");
3533 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3534 if (!SWIG_IsOK(res1)) {
3535 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_partnum_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3537 arg1 = (dumpfile_t *)(argp1);
3539 if (sizeof(signed int) == 1) {
3540 arg2 = amglue_SvI8(ST(1));
3541 } else if (sizeof(signed int) == 2) {
3542 arg2 = amglue_SvI16(ST(1));
3543 } else if (sizeof(signed int) == 4) {
3544 arg2 = amglue_SvI32(ST(1));
3545 } else if (sizeof(signed int) == 8) {
3546 arg2 = amglue_SvI64(ST(1));
3548 g_critical("Unexpected signed int >64 bits?"); /* should be optimized out unless sizeof(signed int) > 8 */
3551 if (arg1) (arg1)->partnum = arg2;
3565 XS(_wrap_dumpfile_t_partnum_get) {
3567 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3574 if ((items < 1) || (items > 1)) {
3575 SWIG_croak("Usage: dumpfile_t_partnum_get(self);");
3577 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3578 if (!SWIG_IsOK(res1)) {
3579 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_partnum_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3581 arg1 = (dumpfile_t *)(argp1);
3582 result = (int) ((arg1)->partnum);
3584 ST(argvi) = sv_2mortal(amglue_newSVi64(result));
3596 XS(_wrap_dumpfile_t_totalparts_set) {
3598 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3605 if ((items < 2) || (items > 2)) {
3606 SWIG_croak("Usage: dumpfile_t_totalparts_set(self,totalparts);");
3608 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3609 if (!SWIG_IsOK(res1)) {
3610 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_totalparts_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3612 arg1 = (dumpfile_t *)(argp1);
3614 if (sizeof(signed int) == 1) {
3615 arg2 = amglue_SvI8(ST(1));
3616 } else if (sizeof(signed int) == 2) {
3617 arg2 = amglue_SvI16(ST(1));
3618 } else if (sizeof(signed int) == 4) {
3619 arg2 = amglue_SvI32(ST(1));
3620 } else if (sizeof(signed int) == 8) {
3621 arg2 = amglue_SvI64(ST(1));
3623 g_critical("Unexpected signed int >64 bits?"); /* should be optimized out unless sizeof(signed int) > 8 */
3626 if (arg1) (arg1)->totalparts = arg2;
3640 XS(_wrap_dumpfile_t_totalparts_get) {
3642 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3649 if ((items < 1) || (items > 1)) {
3650 SWIG_croak("Usage: dumpfile_t_totalparts_get(self);");
3652 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3653 if (!SWIG_IsOK(res1)) {
3654 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_totalparts_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3656 arg1 = (dumpfile_t *)(argp1);
3657 result = (int) ((arg1)->totalparts);
3659 ST(argvi) = sv_2mortal(amglue_newSVi64(result));
3671 XS(_wrap_dumpfile_t_blocksize_set) {
3673 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3680 if ((items < 2) || (items > 2)) {
3681 SWIG_croak("Usage: dumpfile_t_blocksize_set(self,blocksize);");
3683 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3684 if (!SWIG_IsOK(res1)) {
3685 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_blocksize_set" "', argument " "1"" of type '" "dumpfile_t *""'");
3687 arg1 = (dumpfile_t *)(argp1);
3689 if (sizeof(size_t) == 1) {
3690 arg2 = amglue_SvU8(ST(1));
3691 } else if (sizeof(size_t) == 2) {
3692 arg2 = amglue_SvU16(ST(1));
3693 } else if (sizeof(size_t) == 4) {
3694 arg2 = amglue_SvU32(ST(1));
3695 } else if (sizeof(size_t) == 8) {
3696 arg2 = amglue_SvU64(ST(1));
3698 croak("Unexpected size_t >64 bits?"); /* should be optimized out unless sizeof(size_t) > 8 */
3701 if (arg1) (arg1)->blocksize = arg2;
3715 XS(_wrap_dumpfile_t_blocksize_get) {
3717 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3724 if ((items < 1) || (items > 1)) {
3725 SWIG_croak("Usage: dumpfile_t_blocksize_get(self);");
3727 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, 0 | 0 );
3728 if (!SWIG_IsOK(res1)) {
3729 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "dumpfile_t_blocksize_get" "', argument " "1"" of type '" "dumpfile_t *""'");
3731 arg1 = (dumpfile_t *)(argp1);
3732 result = ((arg1)->blocksize);
3734 ST(argvi) = sv_2mortal(amglue_newSVu64(result));
3746 XS(_wrap_new_dumpfile_t) {
3748 dumpfile_t *result = 0 ;
3752 if ((items < 0) || (items > 0)) {
3753 SWIG_croak("Usage: new_dumpfile_t();");
3755 result = (dumpfile_t *)new_dumpfile_t();
3756 ST(argvi) = SWIG_NewPointerObj(SWIG_as_voidptr(result), SWIGTYPE_p_dumpfile_t, SWIG_OWNER | SWIG_SHADOW); argvi++ ;
3764 XS(_wrap_delete_dumpfile_t__SWIG_1) {
3766 dumpfile_t *arg1 = (dumpfile_t *) 0 ;
3772 if ((items < 1) || (items > 1)) {
3773 SWIG_croak("Usage: delete_dumpfile_t(self);");
3775 res1 = SWIG_ConvertPtr(ST(0), &argp1,SWIGTYPE_p_dumpfile_t, SWIG_POINTER_DISOWN | 0 );
3776 if (!SWIG_IsOK(res1)) {
3777 SWIG_exception_fail(SWIG_ArgError(res1), "in method '" "delete_dumpfile_t" "', argument " "1"" of type '" "dumpfile_t *""'");
3779 arg1 = (dumpfile_t *)(argp1);
3780 free((char *) arg1);
3792 XS(_wrap_delete_dumpfile_t) {
3796 unsigned long _index = 0;
3797 SWIG_TypeRank _rank = 0;
3799 SWIG_TypeRank _ranki = 0;
3800 SWIG_TypeRank _rankm = 0;
3801 SWIG_TypeRank _pi = 1;
3805 int res = SWIG_ConvertPtr(ST(0), &vptr, SWIGTYPE_p_dumpfile_t, 0);
3806 _v = SWIG_CheckState(res);
3808 if (!_v) goto check_1;
3811 _pi *= SWIG_MAXCASTRANK;
3812 if (!_index || (_ranki < _rank)) {
3813 _rank = _ranki; _index = 1;
3814 if (_rank == _rankm) goto dispatch;
3822 ++PL_markstack_ptr; SWIG_CALLXS(_wrap_delete_dumpfile_t__SWIG_1); return;
3826 croak("No matching function for overloaded 'delete_dumpfile_t'");
3832 /* -------- TYPE CONVERSION AND EQUIVALENCE RULES (BEGIN) -------- */
3834 static swig_type_info _swigt__p_a_STRMAX__char = {"_p_a_STRMAX__char", "char (*)[STRMAX]|string_t *", 0, 0, (void*)0, 0};
3835 static swig_type_info _swigt__p_char = {"_p_char", "gchar *|char *", 0, 0, (void*)0, 0};
3836 static swig_type_info _swigt__p_double = {"_p_double", "double *|gdouble *", 0, 0, (void*)0, 0};
3837 static swig_type_info _swigt__p_dumpfile_t = {"_p_dumpfile_t", "dumpfile_t *", 0, 0, (void*)"Amanda::Types::dumpfile_t", 0};
3838 static swig_type_info _swigt__p_float = {"_p_float", "float *|gfloat *", 0, 0, (void*)0, 0};
3839 static swig_type_info _swigt__p_int = {"_p_int", "int *|filetype_t *|gboolean *", 0, 0, (void*)0, 0};
3840 static swig_type_info _swigt__p_unsigned_char = {"_p_unsigned_char", "guchar *|unsigned char *", 0, 0, (void*)0, 0};
3842 static swig_type_info *swig_type_initial[] = {
3843 &_swigt__p_a_STRMAX__char,
3846 &_swigt__p_dumpfile_t,
3849 &_swigt__p_unsigned_char,
3852 static swig_cast_info _swigc__p_a_STRMAX__char[] = { {&_swigt__p_a_STRMAX__char, 0, 0, 0},{0, 0, 0, 0}};
3853 static swig_cast_info _swigc__p_char[] = { {&_swigt__p_char, 0, 0, 0},{0, 0, 0, 0}};
3854 static swig_cast_info _swigc__p_double[] = { {&_swigt__p_double, 0, 0, 0},{0, 0, 0, 0}};
3855 static swig_cast_info _swigc__p_dumpfile_t[] = { {&_swigt__p_dumpfile_t, 0, 0, 0},{0, 0, 0, 0}};
3856 static swig_cast_info _swigc__p_float[] = { {&_swigt__p_float, 0, 0, 0},{0, 0, 0, 0}};
3857 static swig_cast_info _swigc__p_int[] = { {&_swigt__p_int, 0, 0, 0},{0, 0, 0, 0}};
3858 static swig_cast_info _swigc__p_unsigned_char[] = { {&_swigt__p_unsigned_char, 0, 0, 0},{0, 0, 0, 0}};
3860 static swig_cast_info *swig_cast_initial[] = {
3861 _swigc__p_a_STRMAX__char,
3864 _swigc__p_dumpfile_t,
3867 _swigc__p_unsigned_char,
3871 /* -------- TYPE CONVERSION AND EQUIVALENCE RULES (END) -------- */
3873 static swig_constant_info swig_constants[] = {
3879 static swig_variable_info swig_variables[] = {
3882 static swig_command_info swig_commands[] = {
3883 {"Amanda::Typesc::dumpfile_t_type_set", _wrap_dumpfile_t_type_set},
3884 {"Amanda::Typesc::dumpfile_t_type_get", _wrap_dumpfile_t_type_get},
3885 {"Amanda::Typesc::dumpfile_t_datestamp_set", _wrap_dumpfile_t_datestamp_set},
3886 {"Amanda::Typesc::dumpfile_t_datestamp_get", _wrap_dumpfile_t_datestamp_get},
3887 {"Amanda::Typesc::dumpfile_t_dumplevel_set", _wrap_dumpfile_t_dumplevel_set},
3888 {"Amanda::Typesc::dumpfile_t_dumplevel_get", _wrap_dumpfile_t_dumplevel_get},
3889 {"Amanda::Typesc::dumpfile_t_compressed_set", _wrap_dumpfile_t_compressed_set},
3890 {"Amanda::Typesc::dumpfile_t_compressed_get", _wrap_dumpfile_t_compressed_get},
3891 {"Amanda::Typesc::dumpfile_t_encrypted_set", _wrap_dumpfile_t_encrypted_set},
3892 {"Amanda::Typesc::dumpfile_t_encrypted_get", _wrap_dumpfile_t_encrypted_get},
3893 {"Amanda::Typesc::dumpfile_t_comp_suffix_set", _wrap_dumpfile_t_comp_suffix_set},
3894 {"Amanda::Typesc::dumpfile_t_comp_suffix_get", _wrap_dumpfile_t_comp_suffix_get},
3895 {"Amanda::Typesc::dumpfile_t_encrypt_suffix_set", _wrap_dumpfile_t_encrypt_suffix_set},
3896 {"Amanda::Typesc::dumpfile_t_encrypt_suffix_get", _wrap_dumpfile_t_encrypt_suffix_get},
3897 {"Amanda::Typesc::dumpfile_t_name_set", _wrap_dumpfile_t_name_set},
3898 {"Amanda::Typesc::dumpfile_t_name_get", _wrap_dumpfile_t_name_get},
3899 {"Amanda::Typesc::dumpfile_t_disk_set", _wrap_dumpfile_t_disk_set},
3900 {"Amanda::Typesc::dumpfile_t_disk_get", _wrap_dumpfile_t_disk_get},
3901 {"Amanda::Typesc::dumpfile_t_program_set", _wrap_dumpfile_t_program_set},
3902 {"Amanda::Typesc::dumpfile_t_program_get", _wrap_dumpfile_t_program_get},
3903 {"Amanda::Typesc::dumpfile_t_dumper_set", _wrap_dumpfile_t_dumper_set},
3904 {"Amanda::Typesc::dumpfile_t_dumper_get", _wrap_dumpfile_t_dumper_get},
3905 {"Amanda::Typesc::dumpfile_t_srvcompprog_set", _wrap_dumpfile_t_srvcompprog_set},
3906 {"Amanda::Typesc::dumpfile_t_srvcompprog_get", _wrap_dumpfile_t_srvcompprog_get},
3907 {"Amanda::Typesc::dumpfile_t_clntcompprog_set", _wrap_dumpfile_t_clntcompprog_set},
3908 {"Amanda::Typesc::dumpfile_t_clntcompprog_get", _wrap_dumpfile_t_clntcompprog_get},
3909 {"Amanda::Typesc::dumpfile_t_srv_encrypt_set", _wrap_dumpfile_t_srv_encrypt_set},
3910 {"Amanda::Typesc::dumpfile_t_srv_encrypt_get", _wrap_dumpfile_t_srv_encrypt_get},
3911 {"Amanda::Typesc::dumpfile_t_clnt_encrypt_set", _wrap_dumpfile_t_clnt_encrypt_set},
3912 {"Amanda::Typesc::dumpfile_t_clnt_encrypt_get", _wrap_dumpfile_t_clnt_encrypt_get},
3913 {"Amanda::Typesc::dumpfile_t_recover_cmd_set", _wrap_dumpfile_t_recover_cmd_set},
3914 {"Amanda::Typesc::dumpfile_t_recover_cmd_get", _wrap_dumpfile_t_recover_cmd_get},
3915 {"Amanda::Typesc::dumpfile_t_uncompress_cmd_set", _wrap_dumpfile_t_uncompress_cmd_set},
3916 {"Amanda::Typesc::dumpfile_t_uncompress_cmd_get", _wrap_dumpfile_t_uncompress_cmd_get},
3917 {"Amanda::Typesc::dumpfile_t_encrypt_cmd_set", _wrap_dumpfile_t_encrypt_cmd_set},
3918 {"Amanda::Typesc::dumpfile_t_encrypt_cmd_get", _wrap_dumpfile_t_encrypt_cmd_get},
3919 {"Amanda::Typesc::dumpfile_t_decrypt_cmd_set", _wrap_dumpfile_t_decrypt_cmd_set},
3920 {"Amanda::Typesc::dumpfile_t_decrypt_cmd_get", _wrap_dumpfile_t_decrypt_cmd_get},
3921 {"Amanda::Typesc::dumpfile_t_srv_decrypt_opt_set", _wrap_dumpfile_t_srv_decrypt_opt_set},
3922 {"Amanda::Typesc::dumpfile_t_srv_decrypt_opt_get", _wrap_dumpfile_t_srv_decrypt_opt_get},
3923 {"Amanda::Typesc::dumpfile_t_clnt_decrypt_opt_set", _wrap_dumpfile_t_clnt_decrypt_opt_set},
3924 {"Amanda::Typesc::dumpfile_t_clnt_decrypt_opt_get", _wrap_dumpfile_t_clnt_decrypt_opt_get},
3925 {"Amanda::Typesc::dumpfile_t_cont_filename_set", _wrap_dumpfile_t_cont_filename_set},
3926 {"Amanda::Typesc::dumpfile_t_cont_filename_get", _wrap_dumpfile_t_cont_filename_get},
3927 {"Amanda::Typesc::dumpfile_t_is_partial_set", _wrap_dumpfile_t_is_partial_set},
3928 {"Amanda::Typesc::dumpfile_t_is_partial_get", _wrap_dumpfile_t_is_partial_get},
3929 {"Amanda::Typesc::dumpfile_t_partnum_set", _wrap_dumpfile_t_partnum_set},
3930 {"Amanda::Typesc::dumpfile_t_partnum_get", _wrap_dumpfile_t_partnum_get},
3931 {"Amanda::Typesc::dumpfile_t_totalparts_set", _wrap_dumpfile_t_totalparts_set},
3932 {"Amanda::Typesc::dumpfile_t_totalparts_get", _wrap_dumpfile_t_totalparts_get},
3933 {"Amanda::Typesc::dumpfile_t_blocksize_set", _wrap_dumpfile_t_blocksize_set},
3934 {"Amanda::Typesc::dumpfile_t_blocksize_get", _wrap_dumpfile_t_blocksize_get},
3935 {"Amanda::Typesc::new_dumpfile_t", _wrap_new_dumpfile_t},
3936 {"Amanda::Typesc::delete_dumpfile_t", _wrap_delete_dumpfile_t},
3939 /* -----------------------------------------------------------------------------
3940 * Type initialization:
3941 * This problem is tough by the requirement that no dynamic
3942 * memory is used. Also, since swig_type_info structures store pointers to
3943 * swig_cast_info structures and swig_cast_info structures store pointers back
3944 * to swig_type_info structures, we need some lookup code at initialization.
3945 * The idea is that swig generates all the structures that are needed.
3946 * The runtime then collects these partially filled structures.
3947 * The SWIG_InitializeModule function takes these initial arrays out of
3948 * swig_module, and does all the lookup, filling in the swig_module.types
3949 * array with the correct data and linking the correct swig_cast_info
3950 * structures together.
3952 * The generated swig_type_info structures are assigned staticly to an initial
3953 * array. We just loop through that array, and handle each type individually.
3954 * First we lookup if this type has been already loaded, and if so, use the
3955 * loaded structure instead of the generated one. Then we have to fill in the
3956 * cast linked list. The cast data is initially stored in something like a
3957 * two-dimensional array. Each row corresponds to a type (there are the same
3958 * number of rows as there are in the swig_type_initial array). Each entry in
3959 * a column is one of the swig_cast_info structures for that type.
3960 * The cast_initial array is actually an array of arrays, because each row has
3961 * a variable number of columns. So to actually build the cast linked list,
3962 * we find the array of casts associated with the type, and loop through it
3963 * adding the casts to the list. The one last trick we need to do is making
3964 * sure the type pointer in the swig_cast_info struct is correct.
3966 * First off, we lookup the cast->type name to see if it is already loaded.
3967 * There are three cases to handle:
3968 * 1) If the cast->type has already been loaded AND the type we are adding
3969 * casting info to has not been loaded (it is in this module), THEN we
3970 * replace the cast->type pointer with the type pointer that has already
3972 * 2) If BOTH types (the one we are adding casting info to, and the
3973 * cast->type) are loaded, THEN the cast info has already been loaded by
3974 * the previous module so we just ignore it.
3975 * 3) Finally, if cast->type has not already been loaded, then we add that
3976 * swig_cast_info to the linked list (because the cast->type) pointer will
3978 * ----------------------------------------------------------------------------- */
3988 #define SWIGRUNTIME_DEBUG
3993 SWIG_InitializeModule(void *clientdata) {
3995 swig_module_info *module_head, *iter;
3998 clientdata = clientdata;
4000 /* check to see if the circular list has been setup, if not, set it up */
4001 if (swig_module.next==0) {
4002 /* Initialize the swig_module */
4003 swig_module.type_initial = swig_type_initial;
4004 swig_module.cast_initial = swig_cast_initial;
4005 swig_module.next = &swig_module;
4008 /* Try and load any already created modules */
4009 module_head = SWIG_GetModule(clientdata);
4011 /* This is the first module loaded for this interpreter */
4012 /* so set the swig module into the interpreter */
4013 SWIG_SetModule(clientdata, &swig_module);
4014 module_head = &swig_module;
4016 /* the interpreter has loaded a SWIG module, but has it loaded this one? */
4020 if (iter==&swig_module) {
4025 } while (iter!= module_head);
4027 /* if the is found in the list, then all is done and we may leave */
4029 /* otherwise we must add out module into the list */
4030 swig_module.next = module_head->next;
4031 module_head->next = &swig_module;
4034 /* Now work on filling in swig_module.types */
4035 #ifdef SWIGRUNTIME_DEBUG
4036 printf("SWIG_InitializeModule: size %d\n", swig_module.size);
4038 for (i = 0; i < swig_module.size; ++i) {
4039 swig_type_info *type = 0;
4040 swig_type_info *ret;
4041 swig_cast_info *cast;
4043 #ifdef SWIGRUNTIME_DEBUG
4044 printf("SWIG_InitializeModule: type %d %s\n", i, swig_module.type_initial[i]->name);
4047 /* if there is another module already loaded */
4048 if (swig_module.next != &swig_module) {
4049 type = SWIG_MangledTypeQueryModule(swig_module.next, &swig_module, swig_module.type_initial[i]->name);
4052 /* Overwrite clientdata field */
4053 #ifdef SWIGRUNTIME_DEBUG
4054 printf("SWIG_InitializeModule: found type %s\n", type->name);
4056 if (swig_module.type_initial[i]->clientdata) {
4057 type->clientdata = swig_module.type_initial[i]->clientdata;
4058 #ifdef SWIGRUNTIME_DEBUG
4059 printf("SWIG_InitializeModule: found and overwrite type %s \n", type->name);
4063 type = swig_module.type_initial[i];
4066 /* Insert casting types */
4067 cast = swig_module.cast_initial[i];
4068 while (cast->type) {
4069 /* Don't need to add information already in the list */
4071 #ifdef SWIGRUNTIME_DEBUG
4072 printf("SWIG_InitializeModule: look cast %s\n", cast->type->name);
4074 if (swig_module.next != &swig_module) {
4075 ret = SWIG_MangledTypeQueryModule(swig_module.next, &swig_module, cast->type->name);
4076 #ifdef SWIGRUNTIME_DEBUG
4077 if (ret) printf("SWIG_InitializeModule: found cast %s\n", ret->name);
4081 if (type == swig_module.type_initial[i]) {
4082 #ifdef SWIGRUNTIME_DEBUG
4083 printf("SWIG_InitializeModule: skip old type %s\n", ret->name);
4088 /* Check for casting already in the list */
4089 swig_cast_info *ocast = SWIG_TypeCheck(ret->name, type);
4090 #ifdef SWIGRUNTIME_DEBUG
4091 if (ocast) printf("SWIG_InitializeModule: skip old cast %s\n", ret->name);
4093 if (!ocast) ret = 0;
4098 #ifdef SWIGRUNTIME_DEBUG
4099 printf("SWIG_InitializeModule: adding cast %s\n", cast->type->name);
4102 type->cast->prev = cast;
4103 cast->next = type->cast;
4109 /* Set entry in modules->types array equal to the type */
4110 swig_module.types[i] = type;
4112 swig_module.types[i] = 0;
4114 #ifdef SWIGRUNTIME_DEBUG
4115 printf("**** SWIG_InitializeModule: Cast List ******\n");
4116 for (i = 0; i < swig_module.size; ++i) {
4118 swig_cast_info *cast = swig_module.cast_initial[i];
4119 printf("SWIG_InitializeModule: type %d %s\n", i, swig_module.type_initial[i]->name);
4120 while (cast->type) {
4121 printf("SWIG_InitializeModule: cast type %s\n", cast->type->name);
4125 printf("---- Total casts: %d\n",j);
4127 printf("**** SWIG_InitializeModule: Cast List ******\n");
4131 /* This function will propagate the clientdata field of type to
4132 * any new swig_type_info structures that have been added into the list
4133 * of equivalent types. It is like calling
4134 * SWIG_TypeClientData(type, clientdata) a second time.
4137 SWIG_PropagateClientData(void) {
4139 swig_cast_info *equiv;
4140 static int init_run = 0;
4142 if (init_run) return;
4145 for (i = 0; i < swig_module.size; i++) {
4146 if (swig_module.types[i]->clientdata) {
4147 equiv = swig_module.types[i]->cast;
4149 if (!equiv->converter) {
4150 if (equiv->type && !equiv->type->clientdata)
4151 SWIG_TypeClientData(equiv->type, swig_module.types[i]->clientdata);
4153 equiv = equiv->next;
4177 SWIG_InitializeModule(0);
4179 /* Install commands */
4180 for (i = 0; swig_commands[i].name; i++) {
4181 newXS((char*) swig_commands[i].name,swig_commands[i].wrapper, (char*)__FILE__);
4184 /* Install variables */
4185 for (i = 0; swig_variables[i].name; i++) {
4187 sv = get_sv((char*) swig_variables[i].name, TRUE | 0x2);
4188 if (swig_variables[i].type) {
4189 SWIG_MakePtr(sv,(void *)1, *swig_variables[i].type,0);
4191 sv_setiv(sv,(IV) 0);
4193 swig_create_magic(sv, (char *) swig_variables[i].name, swig_variables[i].set, swig_variables[i].get);
4196 /* Install constant */
4197 for (i = 0; swig_constants[i].type; i++) {
4199 sv = get_sv((char*)swig_constants[i].name, TRUE | 0x2);
4200 switch(swig_constants[i].type) {
4202 sv_setiv(sv, (IV) swig_constants[i].lvalue);
4205 sv_setnv(sv, (double) swig_constants[i].dvalue);
4208 sv_setpv(sv, (char *) swig_constants[i].pvalue);
4211 SWIG_MakePtr(sv, swig_constants[i].pvalue, *(swig_constants[i].ptype),0);
4214 SWIG_MakePackedObj(sv, swig_constants[i].pvalue, swig_constants[i].lvalue, *(swig_constants[i].ptype));
4222 /*@SWIG:/usr/share/swig/1.3.33/perl5/perltypemaps.swg,64,%set_constant@*/ do {
4223 SV *sv = get_sv((char*) SWIG_prefix "F_UNKNOWN", TRUE | 0x2);
4224 sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(F_UNKNOWN)));
4226 } while(0) /*@SWIG@*/;
4227 /*@SWIG:/usr/share/swig/1.3.33/perl5/perltypemaps.swg,64,%set_constant@*/ do {
4228 SV *sv = get_sv((char*) SWIG_prefix "F_WEIRD", TRUE | 0x2);
4229 sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(F_WEIRD)));
4231 } while(0) /*@SWIG@*/;
4232 /*@SWIG:/usr/share/swig/1.3.33/perl5/perltypemaps.swg,64,%set_constant@*/ do {
4233 SV *sv = get_sv((char*) SWIG_prefix "F_TAPESTART", TRUE | 0x2);
4234 sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(F_TAPESTART)));
4236 } while(0) /*@SWIG@*/;
4237 /*@SWIG:/usr/share/swig/1.3.33/perl5/perltypemaps.swg,64,%set_constant@*/ do {
4238 SV *sv = get_sv((char*) SWIG_prefix "F_TAPEEND", TRUE | 0x2);
4239 sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(F_TAPEEND)));
4241 } while(0) /*@SWIG@*/;
4242 /*@SWIG:/usr/share/swig/1.3.33/perl5/perltypemaps.swg,64,%set_constant@*/ do {
4243 SV *sv = get_sv((char*) SWIG_prefix "F_DUMPFILE", TRUE | 0x2);
4244 sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(F_DUMPFILE)));
4246 } while(0) /*@SWIG@*/;
4247 /*@SWIG:/usr/share/swig/1.3.33/perl5/perltypemaps.swg,64,%set_constant@*/ do {
4248 SV *sv = get_sv((char*) SWIG_prefix "F_CONT_DUMPFILE", TRUE | 0x2);
4249 sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(F_CONT_DUMPFILE)));
4251 } while(0) /*@SWIG@*/;
4252 /*@SWIG:/usr/share/swig/1.3.33/perl5/perltypemaps.swg,64,%set_constant@*/ do {
4253 SV *sv = get_sv((char*) SWIG_prefix "F_SPLIT_DUMPFILE", TRUE | 0x2);
4254 sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(F_SPLIT_DUMPFILE)));
4256 } while(0) /*@SWIG@*/;
4257 /*@SWIG:/usr/share/swig/1.3.33/perl5/perltypemaps.swg,64,%set_constant@*/ do {
4258 SV *sv = get_sv((char*) SWIG_prefix "F_EMPTY", TRUE | 0x2);
4259 sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(F_EMPTY)));
4261 } while(0) /*@SWIG@*/;
4262 SWIG_TypeClientData(SWIGTYPE_p_dumpfile_t, (void*) "Amanda::Types::dumpfile_t");