29 |
IDBOTRUNC |
IDBOTRUNC |
30 |
IDBONOLCK |
IDBONOLCK |
31 |
IDBOLCKNB |
IDBOLCKNB |
32 |
|
tcidbclose |
33 |
|
tcidbput |
34 |
|
tcidbout |
35 |
|
tcidbget |
36 |
); |
); |
37 |
|
|
38 |
=head1 NAME |
=head1 NAME |
45 |
|
|
46 |
=head2 tcidberrmsg |
=head2 tcidberrmsg |
47 |
|
|
48 |
my $message = Search::TokyoDystopia::tcidberrmsg( $ecode ); |
my $message = tcidberrmsg( $ecode ); |
49 |
|
|
50 |
=head2 tcidbnew |
=head2 tcidbnew |
51 |
|
|
52 |
my $idb = Search::TokyoDystopia::tcidbnew; |
my $idb = tcidbnew; |
53 |
|
|
54 |
=head2 tcidbdel |
=head2 tcidbdel |
55 |
|
|
56 |
Search::TokyoDystopia::tcidbdel( $idb ); |
tcidbdel( $idb ); |
57 |
|
|
58 |
=head2 tcidbecode |
=head2 tcidbecode |
59 |
|
|
60 |
my $ecode = Search::TokyoDystopia::tcidbecode( $idb ); |
my $ecode = tcidbecode( $idb ); |
61 |
|
|
62 |
=head2 tcidbtune |
=head2 tcidbtune |
63 |
|
|
64 |
my $success = Search::TokyoDystopia::tcidbtune( $idb, $ernum, $etnum, $iusiz, IDBTLARGE || IDBTDEFLATE ); |
my $success = tcidbtune( $idb, $ernum, $etnum, $iusiz, IDBTLARGE | IDBTDEFLATE ); |
65 |
|
|
66 |
=cut |
=cut |
67 |
|
|
73 |
|
|
74 |
=head2 tcidbsetcache |
=head2 tcidbsetcache |
75 |
|
|
76 |
my $success = Search::TokyoDystopia::tcidbsetcache( $idb, $icsiz, $lcnum ); |
my $success = tcidbsetcache( $idb, $icsiz, $lcnum ); |
77 |
|
|
78 |
=head2 tcidbsetfwmmax |
=head2 tcidbsetfwmmax |
79 |
|
|
80 |
my $success = Search::TokyoDystopia::tcidbsetfwmmax( $idb, $fwnum ); |
my $success = tcidbsetfwmmax( $idb, $fwnum ); |
81 |
|
|
82 |
=head2 tcidbopen |
=head2 tcidbopen |
83 |
|
|
84 |
Search::TokyoDystopia::tcidbopen( $idb, 'casket', IDBOTRUNC ), 1, 'tcidbopen' ); |
my $success = tcidbopen( $idb, 'casket', IDBOWRITER | IDBOCREAT ); |
85 |
|
|
86 |
=cut |
=cut |
87 |
|
|
94 |
IDBOLCKNB => 1 << 5, |
IDBOLCKNB => 1 << 5, |
95 |
}; |
}; |
96 |
|
|
97 |
|
=head2 tcidbclose |
98 |
|
|
99 |
|
my $success = tcidbclose( $idb ); |
100 |
|
|
101 |
|
=head2 tcidbput |
102 |
|
|
103 |
|
my $success = tcidbput( $idb, $id, $text ); |
104 |
|
|
105 |
|
=head2 tcidbout |
106 |
|
|
107 |
|
my $success = tcidbout( $idb, $id ); |
108 |
|
|
109 |
|
=head2 tcidbget |
110 |
|
|
111 |
|
my $text = tcidbget( $idb, $id ); |
112 |
|
|
113 |
=head1 KNOWN BUGS |
=head1 KNOWN BUGS |
114 |
|
|
115 |
Low-level functions often just die when called on invalid (or deleted) database |
Low-level functions often just die when called on invalid (or deleted) database |