/[Search-TokyoDystopia]/lib/Search/TokyoDystopia.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /lib/Search/TokyoDystopia.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 11 by dpavlin, Sun Aug 17 23:57:02 2008 UTC revision 22 by dpavlin, Mon Aug 18 18:53:39 2008 UTC
# Line 30  IDBOTRUNC Line 30  IDBOTRUNC
30  IDBONOLCK  IDBONOLCK
31  IDBOLCKNB  IDBOLCKNB
32  tcidbclose  tcidbclose
33    tcidbput
34    tcidbout
35    tcidbget
36    tcidbsearch
37    tcidbsearch2
38    IDBSSUBSTR
39    IDBSPREFIX
40    IDBSSUFFIX
41    IDBSFULL
42    IDBSTOKEN
43    IDBSTOKPRE
44    IDBSTOKSUF
45    tcidbiterinit
46    tcidbiternext
47    tcidbsync
48  );  );
49    
50  =head1 NAME  =head1 NAME
# Line 42  If you don't prevent it, it will export Line 57  If you don't prevent it, it will export
57    
58  =head2 tcidberrmsg  =head2 tcidberrmsg
59    
60    my $message = Search::TokyoDystopia::tcidberrmsg( $ecode );    my $message = tcidberrmsg( $ecode );
61    
62  =head2 tcidbnew  =head2 tcidbnew
63    
64    my $idb = Search::TokyoDystopia::tcidbnew;    my $idb = tcidbnew;
65    
66  =head2 tcidbdel  =head2 tcidbdel
67    
68    Search::TokyoDystopia::tcidbdel( $idb );    tcidbdel( $idb );
69    
70  =head2 tcidbecode  =head2 tcidbecode
71    
72    my $ecode = Search::TokyoDystopia::tcidbecode( $idb );    my $ecode = tcidbecode( $idb );
73    
74  =head2 tcidbtune  =head2 tcidbtune
75    
76    my $success = Search::TokyoDystopia::tcidbtune( $idb, $ernum, $etnum, $iusiz, IDBTLARGE || IDBTDEFLATE );    my $success = tcidbtune( $idb, $ernum, $etnum, $iusiz, IDBTLARGE | IDBTDEFLATE );
77    
78  =cut  =cut
79    
# Line 70  use constant { Line 85  use constant {
85    
86  =head2 tcidbsetcache  =head2 tcidbsetcache
87    
88    my $success = Search::TokyoDystopia::tcidbsetcache( $idb, $icsiz, $lcnum );    my $success = tcidbsetcache( $idb, $icsiz, $lcnum );
89    
90  =head2 tcidbsetfwmmax  =head2 tcidbsetfwmmax
91    
92    my $success = Search::TokyoDystopia::tcidbsetfwmmax( $idb, $fwnum );    my $success = tcidbsetfwmmax( $idb, $fwnum );
93    
94  =head2 tcidbopen  =head2 tcidbopen
95    
96    Search::TokyoDystopia::tcidbopen( $idb, 'casket', IDBOTRUNC ), 1, 'tcidbopen' );    my $success = tcidbopen( $idb, 'casket', IDBOWRITER | IDBOCREAT );
97    
98  =cut  =cut
99    
# Line 91  use constant { Line 106  use constant {
106          IDBOLCKNB => 1 << 5,          IDBOLCKNB => 1 << 5,
107  };  };
108    
109    =head2 tcidbclose
110    
111      my $success = tcidbclose( $idb );
112    
113    =head2 tcidbput
114    
115      my $success = tcidbput( $idb, $id, $text );
116    
117    =head2 tcidbout
118      
119      my $success = tcidbout( $idb, $id );
120    
121    =head2 tcidbget
122      
123      my $text = tcidbget( $idb, $id );
124    
125    =head2 tcidbsearch
126    
127      my $ids = tcidbsearch( $idb, $word, IDBSSUBSTR );
128    
129    =cut
130    
131    use constant {
132            IDBSSUBSTR => 0,                # substring matching
133            IDBSPREFIX => 1,                # prefix matching
134            IDBSSUFFIX => 2,                # suffix matching
135            IDBSFULL => 3,          # full matching
136            IDBSTOKEN => 4,         # token matching
137            IDBSTOKPRE => 5,                # token prefix matching
138            IDBSTOKSUF => 6,                # token suffix matching
139    };
140    
141    =head2 tcidbsearch2
142    
143      my $ids = tcidbsearch2( $idb, $expr );
144    
145    =head2 tcidbiterinit
146    
147      my $success = tcidbiterinit( $idb );
148    
149    =head2 tcidbiternext
150    
151      my $id = tcidbiternext( $idb );
152    
153    =head2 tcidbsync
154    
155      my $success = tcidbsync( $idb );
156    
157    =cut
158    
159  =head1 KNOWN BUGS  =head1 KNOWN BUGS
160    
161  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
Legend:
Removed from v.11  
changed lines
  Added in v.22
  ViewVC Help
Powered by ViewVC 1.1.26