1 # This file was automatically generated by SWIG
5 @ISA = qw(Exporter DynaLoader);
11 # ---------- BASE METHODS -------------
16 my ($classname,$obj) = @_;
17 return bless $obj, $classname;
32 # ------- FUNCTION WRAPPERS --------
36 *DESTROY = *IDZebrac::DESTROY;
37 *logLevel = *IDZebrac::logLevel;
38 *logFile = *IDZebrac::logFile;
39 *logMsg = *IDZebrac::logMsg;
40 *odr_createmem = *IDZebrac::odr_createmem;
41 *odr_reset = *IDZebrac::odr_reset;
42 *odr_destroy = *IDZebrac::odr_destroy;
43 *odr_malloc = *IDZebrac::odr_malloc;
44 *start = *IDZebrac::start;
45 *open = *IDZebrac::open;
46 *close = *IDZebrac::close;
47 *stop = *IDZebrac::stop;
48 *errCode = *IDZebrac::errCode;
49 *errString = *IDZebrac::errString;
50 *errAdd = *IDZebrac::errAdd;
51 *init_recordGroup = *IDZebrac::init_recordGroup;
52 *res_get_recordGroup = *IDZebrac::res_get_recordGroup;
53 *set_group = *IDZebrac::set_group;
54 *select_database = *IDZebrac::select_database;
55 *select_databases = *IDZebrac::select_databases;
56 *begin_trans = *IDZebrac::begin_trans;
57 *end_trans = *IDZebrac::end_trans;
58 *begin_read = *IDZebrac::begin_read;
59 *end_read = *IDZebrac::end_read;
60 *commit = *IDZebrac::commit;
61 *get_shadow_enable = *IDZebrac::get_shadow_enable;
62 *set_shadow_enable = *IDZebrac::set_shadow_enable;
63 *init = *IDZebrac::init;
64 *compact = *IDZebrac::compact;
65 *repository_update = *IDZebrac::repository_update;
66 *repository_delete = *IDZebrac::repository_delete;
67 *repository_show = *IDZebrac::repository_show;
68 *update_record = *IDZebrac::update_record;
69 *delete_record = *IDZebrac::delete_record;
70 *search_PQF = *IDZebrac::search_PQF;
71 *records_retrieve = *IDZebrac::records_retrieve;
72 *record_retrieve = *IDZebrac::record_retrieve;
73 *sort = *IDZebrac::sort;
74 *scan_PQF = *IDZebrac::scan_PQF;
77 my $result = IDZebrac::getScanEntry(@args);
78 return undef if (!defined($result));
80 tie %resulthash, ref($result), $result;
81 return bless \%resulthash, ref($result);
83 *nmem_create = *IDZebrac::nmem_create;
84 *nmem_destroy = *IDZebrac::nmem_destroy;
85 *data1_create = *IDZebrac::data1_create;
86 *data1_createx = *IDZebrac::data1_createx;
87 *data1_destroy = *IDZebrac::data1_destroy;
88 *get_parent_tag = *IDZebrac::get_parent_tag;
89 *data1_read_node = *IDZebrac::data1_read_node;
90 *data1_read_nodex = *IDZebrac::data1_read_nodex;
91 *data1_read_record = *IDZebrac::data1_read_record;
92 *data1_read_absyn = *IDZebrac::data1_read_absyn;
93 *data1_gettagbynum = *IDZebrac::data1_gettagbynum;
94 *data1_empty_tagset = *IDZebrac::data1_empty_tagset;
95 *data1_read_tagset = *IDZebrac::data1_read_tagset;
96 *data1_getelementbytagname = *IDZebrac::data1_getelementbytagname;
97 *data1_nodetogr = *IDZebrac::data1_nodetogr;
98 *data1_gettagbyname = *IDZebrac::data1_gettagbyname;
99 *data1_free_tree = *IDZebrac::data1_free_tree;
100 *data1_nodetobuf = *IDZebrac::data1_nodetobuf;
101 *data1_mk_tag_data_wd = *IDZebrac::data1_mk_tag_data_wd;
102 *data1_mk_tag_data = *IDZebrac::data1_mk_tag_data;
103 *data1_maptype = *IDZebrac::data1_maptype;
104 *data1_read_varset = *IDZebrac::data1_read_varset;
105 *data1_getvartypebyct = *IDZebrac::data1_getvartypebyct;
106 *data1_read_espec1 = *IDZebrac::data1_read_espec1;
107 *data1_doespec1 = *IDZebrac::data1_doespec1;
108 *data1_getesetbyname = *IDZebrac::data1_getesetbyname;
109 *data1_getelementbyname = *IDZebrac::data1_getelementbyname;
110 *data1_mk_node2 = *IDZebrac::data1_mk_node2;
111 *data1_mk_tag = *IDZebrac::data1_mk_tag;
112 *data1_mk_tag_n = *IDZebrac::data1_mk_tag_n;
113 *data1_tag_add_attr = *IDZebrac::data1_tag_add_attr;
114 *data1_mk_text_n = *IDZebrac::data1_mk_text_n;
115 *data1_mk_text_nf = *IDZebrac::data1_mk_text_nf;
116 *data1_mk_text = *IDZebrac::data1_mk_text;
117 *data1_mk_comment_n = *IDZebrac::data1_mk_comment_n;
118 *data1_mk_comment = *IDZebrac::data1_mk_comment;
119 *data1_mk_preprocess = *IDZebrac::data1_mk_preprocess;
120 *data1_mk_root = *IDZebrac::data1_mk_root;
121 *data1_set_root = *IDZebrac::data1_set_root;
122 *data1_mk_tag_data_int = *IDZebrac::data1_mk_tag_data_int;
123 *data1_mk_tag_data_oid = *IDZebrac::data1_mk_tag_data_oid;
124 *data1_mk_tag_data_text = *IDZebrac::data1_mk_tag_data_text;
125 *data1_mk_tag_data_text_uni = *IDZebrac::data1_mk_tag_data_text_uni;
126 *data1_get_absyn = *IDZebrac::data1_get_absyn;
127 *data1_search_tag = *IDZebrac::data1_search_tag;
128 *data1_mk_tag_uni = *IDZebrac::data1_mk_tag_uni;
129 *data1_get_attset = *IDZebrac::data1_get_attset;
130 *data1_read_maptab = *IDZebrac::data1_read_maptab;
131 *data1_map_record = *IDZebrac::data1_map_record;
132 *data1_read_marctab = *IDZebrac::data1_read_marctab;
133 *data1_nodetomarc = *IDZebrac::data1_nodetomarc;
134 *data1_nodetoidsgml = *IDZebrac::data1_nodetoidsgml;
135 *data1_nodetoexplain = *IDZebrac::data1_nodetoexplain;
136 *data1_nodetosummary = *IDZebrac::data1_nodetosummary;
137 *data1_nodetosoif = *IDZebrac::data1_nodetosoif;
138 *data1_get_wrbuf = *IDZebrac::data1_get_wrbuf;
139 *data1_get_read_buf = *IDZebrac::data1_get_read_buf;
140 *data1_get_map_buf = *IDZebrac::data1_get_map_buf;
141 *data1_absyn_cache_get = *IDZebrac::data1_absyn_cache_get;
142 *data1_attset_cache_get = *IDZebrac::data1_attset_cache_get;
143 *data1_nmem_get = *IDZebrac::data1_nmem_get;
144 *data1_pr_tree = *IDZebrac::data1_pr_tree;
145 *data1_print_tree = *IDZebrac::data1_print_tree;
146 *data1_insert_string = *IDZebrac::data1_insert_string;
147 *data1_insert_string_n = *IDZebrac::data1_insert_string_n;
148 *data1_read_sgml = *IDZebrac::data1_read_sgml;
149 *data1_absyn_trav = *IDZebrac::data1_absyn_trav;
150 *data1_attset_search_id = *IDZebrac::data1_attset_search_id;
151 *data1_getNodeValue = *IDZebrac::data1_getNodeValue;
152 *data1_LookupNode = *IDZebrac::data1_LookupNode;
153 *data1_CountOccurences = *IDZebrac::data1_CountOccurences;
154 *data1_path_fopen = *IDZebrac::data1_path_fopen;
155 *data1_set_tabpath = *IDZebrac::data1_set_tabpath;
156 *data1_set_tabroot = *IDZebrac::data1_set_tabroot;
157 *data1_get_tabpath = *IDZebrac::data1_get_tabpath;
158 *data1_get_tabroot = *IDZebrac::data1_get_tabroot;
159 *grs_perl_readf = *IDZebrac::grs_perl_readf;
160 *grs_perl_seekf = *IDZebrac::grs_perl_seekf;
161 *grs_perl_tellf = *IDZebrac::grs_perl_tellf;
162 *grs_perl_endf = *IDZebrac::grs_perl_endf;
163 *grs_perl_get_dh = *IDZebrac::grs_perl_get_dh;
164 *grs_perl_get_mem = *IDZebrac::grs_perl_get_mem;
165 *grs_perl_set_res = *IDZebrac::grs_perl_set_res;
167 ############# Class : IDZebra::recordGroup ##############
169 package IDZebra::recordGroup;
170 @ISA = qw( IDZebra );
176 *swig_groupName_get = *IDZebrac::recordGroup_groupName_get;
177 *swig_groupName_set = *IDZebrac::recordGroup_groupName_set;
178 *swig_databaseName_get = *IDZebrac::recordGroup_databaseName_get;
179 *swig_databaseName_set = *IDZebrac::recordGroup_databaseName_set;
180 *swig_path_get = *IDZebrac::recordGroup_path_get;
181 *swig_path_set = *IDZebrac::recordGroup_path_set;
182 *swig_recordId_get = *IDZebrac::recordGroup_recordId_get;
183 *swig_recordId_set = *IDZebrac::recordGroup_recordId_set;
184 *swig_recordType_get = *IDZebrac::recordGroup_recordType_get;
185 *swig_recordType_set = *IDZebrac::recordGroup_recordType_set;
186 *swig_flagStoreData_get = *IDZebrac::recordGroup_flagStoreData_get;
187 *swig_flagStoreData_set = *IDZebrac::recordGroup_flagStoreData_set;
188 *swig_flagStoreKeys_get = *IDZebrac::recordGroup_flagStoreKeys_get;
189 *swig_flagStoreKeys_set = *IDZebrac::recordGroup_flagStoreKeys_set;
190 *swig_flagRw_get = *IDZebrac::recordGroup_flagRw_get;
191 *swig_flagRw_set = *IDZebrac::recordGroup_flagRw_set;
192 *swig_fileVerboseLimit_get = *IDZebrac::recordGroup_fileVerboseLimit_get;
193 *swig_fileVerboseLimit_set = *IDZebrac::recordGroup_fileVerboseLimit_set;
194 *swig_databaseNamePath_get = *IDZebrac::recordGroup_databaseNamePath_get;
195 *swig_databaseNamePath_set = *IDZebrac::recordGroup_databaseNamePath_set;
196 *swig_explainDatabase_get = *IDZebrac::recordGroup_explainDatabase_get;
197 *swig_explainDatabase_set = *IDZebrac::recordGroup_explainDatabase_set;
198 *swig_followLinks_get = *IDZebrac::recordGroup_followLinks_get;
199 *swig_followLinks_set = *IDZebrac::recordGroup_followLinks_set;
203 my $self = IDZebrac::new_recordGroup(@args);
204 return undef if (!defined($self));
207 tie %retval, "IDZebra::recordGroup", $self;
208 return bless \%retval, $pkg;
212 return unless $_[0]->isa('HASH');
213 my $self = tied(%{$_[0]});
214 return unless defined $self;
215 delete $ITERATORS{$self};
216 if (exists $OWNER{$self}) {
217 IDZebrac::delete_recordGroup($self);
218 delete $OWNER{$self};
224 my $ptr = tied(%$self);
230 my $ptr = tied(%$self);
235 my ($self,$field) = @_;
236 my $member_func = "swig_${field}_get";
237 my $val = $self->$member_func();
238 if (exists $BLESSEDMEMBERS{$field}) {
239 return undef if (!defined($val));
241 tie %retval,$BLESSEDMEMBERS{$field},$val;
242 return bless \%retval, $BLESSEDMEMBERS{$field};
248 my ($self,$field,$newval) = @_;
249 my $member_func = "swig_${field}_set";
250 if (exists $BLESSEDMEMBERS{$field}) {
251 $self->$member_func(tied(%{$newval}));
253 $self->$member_func($newval);
258 ############# Class : IDZebra::RetrievalObj ##############
260 package IDZebra::RetrievalObj;
261 @ISA = qw( IDZebra );
267 *swig_noOfRecords_get = *IDZebrac::RetrievalObj_noOfRecords_get;
268 *swig_noOfRecords_set = *IDZebrac::RetrievalObj_noOfRecords_set;
269 *swig_records_get = *IDZebrac::RetrievalObj_records_get;
270 *swig_records_set = *IDZebrac::RetrievalObj_records_set;
274 my $self = IDZebrac::new_RetrievalObj(@args);
275 return undef if (!defined($self));
278 tie %retval, "IDZebra::RetrievalObj", $self;
279 return bless \%retval, $pkg;
283 return unless $_[0]->isa('HASH');
284 my $self = tied(%{$_[0]});
285 return unless defined $self;
286 delete $ITERATORS{$self};
287 if (exists $OWNER{$self}) {
288 IDZebrac::delete_RetrievalObj($self);
289 delete $OWNER{$self};
295 my $ptr = tied(%$self);
301 my $ptr = tied(%$self);
306 my ($self,$field) = @_;
307 my $member_func = "swig_${field}_get";
308 my $val = $self->$member_func();
309 if (exists $BLESSEDMEMBERS{$field}) {
310 return undef if (!defined($val));
312 tie %retval,$BLESSEDMEMBERS{$field},$val;
313 return bless \%retval, $BLESSEDMEMBERS{$field};
319 my ($self,$field,$newval) = @_;
320 my $member_func = "swig_${field}_set";
321 if (exists $BLESSEDMEMBERS{$field}) {
322 $self->$member_func(tied(%{$newval}));
324 $self->$member_func($newval);
329 ############# Class : IDZebra::RetrievalRecord ##############
331 package IDZebra::RetrievalRecord;
332 @ISA = qw( IDZebra );
338 *swig_errCode_get = *IDZebrac::RetrievalRecord_errCode_get;
339 *swig_errCode_set = *IDZebrac::RetrievalRecord_errCode_set;
340 *swig_errString_get = *IDZebrac::RetrievalRecord_errString_get;
341 *swig_errString_set = *IDZebrac::RetrievalRecord_errString_set;
342 *swig_position_get = *IDZebrac::RetrievalRecord_position_get;
343 *swig_position_set = *IDZebrac::RetrievalRecord_position_set;
344 *swig_base_get = *IDZebrac::RetrievalRecord_base_get;
345 *swig_base_set = *IDZebrac::RetrievalRecord_base_set;
346 *swig_format_get = *IDZebrac::RetrievalRecord_format_get;
347 *swig_format_set = *IDZebrac::RetrievalRecord_format_set;
348 *swig_buf_get = *IDZebrac::RetrievalRecord_buf_get;
349 *swig_buf_set = *IDZebrac::RetrievalRecord_buf_set;
353 my $self = IDZebrac::new_RetrievalRecord(@args);
354 return undef if (!defined($self));
357 tie %retval, "IDZebra::RetrievalRecord", $self;
358 return bless \%retval, $pkg;
362 return unless $_[0]->isa('HASH');
363 my $self = tied(%{$_[0]});
364 return unless defined $self;
365 delete $ITERATORS{$self};
366 if (exists $OWNER{$self}) {
367 IDZebrac::delete_RetrievalRecord($self);
368 delete $OWNER{$self};
374 my $ptr = tied(%$self);
380 my $ptr = tied(%$self);
385 my ($self,$field) = @_;
386 my $member_func = "swig_${field}_get";
387 my $val = $self->$member_func();
388 if (exists $BLESSEDMEMBERS{$field}) {
389 return undef if (!defined($val));
391 tie %retval,$BLESSEDMEMBERS{$field},$val;
392 return bless \%retval, $BLESSEDMEMBERS{$field};
398 my ($self,$field,$newval) = @_;
399 my $member_func = "swig_${field}_set";
400 if (exists $BLESSEDMEMBERS{$field}) {
401 $self->$member_func(tied(%{$newval}));
403 $self->$member_func($newval);
408 ############# Class : IDZebra::ScanEntry ##############
410 package IDZebra::ScanEntry;
411 @ISA = qw( IDZebra );
417 *swig_occurrences_get = *IDZebrac::ScanEntry_occurrences_get;
418 *swig_occurrences_set = *IDZebrac::ScanEntry_occurrences_set;
419 *swig_term_get = *IDZebrac::ScanEntry_term_get;
420 *swig_term_set = *IDZebrac::ScanEntry_term_set;
424 my $self = IDZebrac::new_ScanEntry(@args);
425 return undef if (!defined($self));
428 tie %retval, "IDZebra::ScanEntry", $self;
429 return bless \%retval, $pkg;
433 return unless $_[0]->isa('HASH');
434 my $self = tied(%{$_[0]});
435 return unless defined $self;
436 delete $ITERATORS{$self};
437 if (exists $OWNER{$self}) {
438 IDZebrac::delete_ScanEntry($self);
439 delete $OWNER{$self};
445 my $ptr = tied(%$self);
451 my $ptr = tied(%$self);
456 my ($self,$field) = @_;
457 my $member_func = "swig_${field}_get";
458 my $val = $self->$member_func();
459 if (exists $BLESSEDMEMBERS{$field}) {
460 return undef if (!defined($val));
462 tie %retval,$BLESSEDMEMBERS{$field},$val;
463 return bless \%retval, $BLESSEDMEMBERS{$field};
469 my ($self,$field,$newval) = @_;
470 my $member_func = "swig_${field}_set";
471 if (exists $BLESSEDMEMBERS{$field}) {
472 $self->$member_func(tied(%{$newval}));
474 $self->$member_func($newval);
479 ############# Class : IDZebra::ScanObj ##############
481 package IDZebra::ScanObj;
482 @ISA = qw( IDZebra );
485 entries => 'IDZebra::ScanEntry',
489 *swig_num_entries_get = *IDZebrac::ScanObj_num_entries_get;
490 *swig_num_entries_set = *IDZebrac::ScanObj_num_entries_set;
491 *swig_position_get = *IDZebrac::ScanObj_position_get;
492 *swig_position_set = *IDZebrac::ScanObj_position_set;
493 *swig_is_partial_get = *IDZebrac::ScanObj_is_partial_get;
494 *swig_is_partial_set = *IDZebrac::ScanObj_is_partial_set;
495 *swig_entries_get = *IDZebrac::ScanObj_entries_get;
496 *swig_entries_set = *IDZebrac::ScanObj_entries_set;
500 my $self = IDZebrac::new_ScanObj(@args);
501 return undef if (!defined($self));
504 tie %retval, "IDZebra::ScanObj", $self;
505 return bless \%retval, $pkg;
509 return unless $_[0]->isa('HASH');
510 my $self = tied(%{$_[0]});
511 return unless defined $self;
512 delete $ITERATORS{$self};
513 if (exists $OWNER{$self}) {
514 IDZebrac::delete_ScanObj($self);
515 delete $OWNER{$self};
521 my $ptr = tied(%$self);
527 my $ptr = tied(%$self);
532 my ($self,$field) = @_;
533 my $member_func = "swig_${field}_get";
534 my $val = $self->$member_func();
535 if (exists $BLESSEDMEMBERS{$field}) {
536 return undef if (!defined($val));
538 tie %retval,$BLESSEDMEMBERS{$field},$val;
539 return bless \%retval, $BLESSEDMEMBERS{$field};
545 my ($self,$field,$newval) = @_;
546 my $member_func = "swig_${field}_set";
547 if (exists $BLESSEDMEMBERS{$field}) {
548 $self->$member_func(tied(%{$newval}));
550 $self->$member_func($newval);
555 # ------- VARIABLE STUBS --------
559 *LOG_FATAL = *IDZebrac::LOG_FATAL;
560 *LOG_DEBUG = *IDZebrac::LOG_DEBUG;
561 *LOG_WARN = *IDZebrac::LOG_WARN;
562 *LOG_LOG = *IDZebrac::LOG_LOG;
563 *LOG_ERRNO = *IDZebrac::LOG_ERRNO;
564 *LOG_FILE = *IDZebrac::LOG_FILE;
565 *LOG_APP = *IDZebrac::LOG_APP;
566 *LOG_MALLOC = *IDZebrac::LOG_MALLOC;
567 *LOG_ALL = *IDZebrac::LOG_ALL;
568 *LOG_DEFAULT_LEVEL = *IDZebrac::LOG_DEFAULT_LEVEL;
569 *ODR_DECODE = *IDZebrac::ODR_DECODE;
570 *ODR_ENCODE = *IDZebrac::ODR_ENCODE;
571 *ODR_PRINT = *IDZebrac::ODR_PRINT;
572 *DATA1K_unknown = *IDZebrac::DATA1K_unknown;
573 *DATA1K_structured = *IDZebrac::DATA1K_structured;
574 *DATA1K_string = *IDZebrac::DATA1K_string;
575 *DATA1K_numeric = *IDZebrac::DATA1K_numeric;
576 *DATA1K_bool = *IDZebrac::DATA1K_bool;
577 *DATA1K_oid = *IDZebrac::DATA1K_oid;
578 *DATA1K_generalizedtime = *IDZebrac::DATA1K_generalizedtime;
579 *DATA1K_intunit = *IDZebrac::DATA1K_intunit;
580 *DATA1K_int = *IDZebrac::DATA1K_int;
581 *DATA1K_octetstring = *IDZebrac::DATA1K_octetstring;
582 *DATA1K_null = *IDZebrac::DATA1K_null;
583 *DATA1T_numeric = *IDZebrac::DATA1T_numeric;
584 *DATA1T_string = *IDZebrac::DATA1T_string;
585 *DATA1N_root = *IDZebrac::DATA1N_root;
586 *DATA1N_tag = *IDZebrac::DATA1N_tag;
587 *DATA1N_data = *IDZebrac::DATA1N_data;
588 *DATA1N_variant = *IDZebrac::DATA1N_variant;
589 *DATA1N_comment = *IDZebrac::DATA1N_comment;
590 *DATA1N_preprocess = *IDZebrac::DATA1N_preprocess;
591 *DATA1I_inctxt = *IDZebrac::DATA1I_inctxt;
592 *DATA1I_incbin = *IDZebrac::DATA1I_incbin;
593 *DATA1I_text = *IDZebrac::DATA1I_text;
594 *DATA1I_num = *IDZebrac::DATA1I_num;
595 *DATA1I_oid = *IDZebrac::DATA1I_oid;
596 *DATA1_LOCALDATA = *IDZebrac::DATA1_LOCALDATA;
597 *DATA1_FLAG_XML = *IDZebrac::DATA1_FLAG_XML;