extra/tokyo/alien/tctdb/tctdb.factor

   1 ! Copyright (C) 2009 Bruno Deferrari
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: alien alien.c-types alien.libraries alien.syntax
   4 combinators kernel tokyo.alien.tchdb tokyo.alien.tcutil ;
   5 IN: tokyo.alien.tctdb
   6
   7 LIBRARY: tokyocabinet
   8
   9 TYPEDEF: void* TDBIDX*
  10 TYPEDEF: void* TCTDB*
  11
  12 CONSTANT: TDBFOPEN  HDBFOPEN
  13 CONSTANT: TDBFFATAL HDBFFATAL
  14
  15 CONSTANT: TDBTLARGE   1
  16 CONSTANT: TDBTDEFLATE 2
  17 CONSTANT: TDBTBZIP    4
  18 CONSTANT: TDBTTCBS    8
  19 CONSTANT: TDBTEXCODEC 16
  20
  21 CONSTANT: TDBOREADER 1
  22 CONSTANT: TDBOWRITER 2
  23 CONSTANT: TDBOCREAT  4
  24 CONSTANT: TDBOTRUNC  8
  25 CONSTANT: TDBONOLCK  16
  26 CONSTANT: TDBOLCKNB  32
  27 CONSTANT: TDBOTSYNC  64
  28
  29 C-ENUM:
  30   TDBITLEXICAL
  31   TDBITDECIMAL ;
  32
  33 CONSTANT: TDBITOPT  9998
  34 CONSTANT: TDBITVOID 9999
  35 CONSTANT: TDBITKEEP 16777216
  36
  37 TYPEDEF: void* TDBCOND*
  38 TYPEDEF: void* TDBQRY*
  39
  40 C-ENUM:
  41     TDBQCSTREQ
  42     TDBQCSTRINC
  43     TDBQCSTRBW
  44     TDBQCSTREW
  45     TDBQCSTRAND
  46     TDBQCSTROR
  47     TDBQCSTROREQ
  48     TDBQCSTRRX
  49     TDBQCNUMEQ
  50     TDBQCNUMGT
  51     TDBQCNUMGE
  52     TDBQCNUMLT
  53     TDBQCNUMLE
  54     TDBQCNUMBT
  55     TDBQCNUMOREQ ;
  56
  57 CONSTANT: TDBQCNEGATE 16777216
  58 CONSTANT: TDBQCNOIDX  33554432
  59
  60 C-ENUM:
  61     TDBQOSTRASC
  62     TDBQOSTRDESC
  63     TDBQONUMASC
  64     TDBQONUMDESC ;
  65
  66 CONSTANT: TDBQPPUT  1
  67 CONSTANT: TDBQPOUT  2
  68 CONSTANT: TDBQPSTOP 16777216
  69
  70 ! int (*)(const void *pkbuf, int pksiz, TCMAP *cols, void *op);
  71 TYPEDEF: void* TDBQRYPROC
  72
  73 FUNCTION: char* tctdberrmsg ( int ecode ) ;
  74 FUNCTION: TCTDB* tctdbnew ( ) ;
  75 FUNCTION: void tctdbdel ( TCTDB* tdb ) ;
  76 FUNCTION: int tctdbecode ( TCTDB* tdb ) ;
  77 FUNCTION: bool tctdbsetmutex ( TCTDB* tdb ) ;
  78 FUNCTION: bool tctdbtune ( TCTDB* tdb, longlong bnum, char apow, char fpow, uchar opts ) ;
  79 FUNCTION: bool tctdbsetcache ( TCTDB* tdb, int32_t rcnum, int32_t lcnum, int32_t ncnum ) ;
  80 FUNCTION: bool tctdbsetxmsiz ( TCTDB* tdb, longlong xmsiz ) ;
  81 FUNCTION: bool tctdbopen ( TCTDB* tdb, char* path, int omode ) ;
  82 FUNCTION: bool tctdbclose ( TCTDB* tdb ) ;
  83 FUNCTION: bool tctdbput ( TCTDB* tdb, void* pkbuf, int pksiz, TCMAP* cols ) ;
  84 FUNCTION: bool tctdbput2 ( TCTDB* tdb, void* pkbuf, int pksiz, void* cbuf, int csiz ) ;
  85 FUNCTION: bool tctdbput3 ( TCTDB* tdb, char* pkstr, char* cstr ) ;
  86 FUNCTION: bool tctdbputkeep ( TCTDB* tdb, void* pkbuf, int pksiz, TCMAP* cols ) ;
  87 FUNCTION: bool tctdbputkeep2 ( TCTDB* tdb, void* pkbuf, int pksiz, void* cbuf, int csiz ) ;
  88 FUNCTION: bool tctdbputkeep3 ( TCTDB* tdb, char* pkstr, char* cstr ) ;
  89 FUNCTION: bool tctdbputcat ( TCTDB* tdb, void* pkbuf, int pksiz, TCMAP* cols ) ;
  90 FUNCTION: bool tctdbputcat2 ( TCTDB* tdb, void* pkbuf, int pksiz, void* cbuf, int csiz ) ;
  91 FUNCTION: bool tctdbputcat3 ( TCTDB* tdb, char* pkstr, char* cstr ) ;
  92 FUNCTION: bool tctdbout ( TCTDB* tdb, void* pkbuf, int pksiz ) ;
  93 FUNCTION: bool tctdbout2 ( TCTDB* tdb, char* pkstr ) ;
  94 FUNCTION: TCMAP* tctdbget ( TCTDB* tdb, void* pkbuf, int pksiz ) ;
  95 FUNCTION: char* tctdbget2 ( TCTDB* tdb, void* pkbuf, int pksiz, int* sp ) ;
  96 FUNCTION: char* tctdbget3 ( TCTDB* tdb, char* pkstr ) ;
  97 FUNCTION: int tctdbvsiz ( TCTDB* tdb, void* pkbuf, int pksiz ) ;
  98 FUNCTION: int tctdbvsiz2 ( TCTDB* tdb, char* pkstr ) ;
  99 FUNCTION: bool tctdbiterinit ( TCTDB* tdb ) ;
 100 FUNCTION: void* tctdbiternext ( TCTDB* tdb, int* sp ) ;
 101 FUNCTION: char* tctdbiternext2 ( TCTDB* tdb ) ;
 102 FUNCTION: TCLIST* tctdbfwmkeys ( TCTDB* tdb, void* pbuf, int psiz, int max ) ;
 103 FUNCTION: TCLIST* tctdbfwmkeys2 ( TCTDB* tdb, char* pstr, int max ) ;
 104 FUNCTION: int tctdbaddint ( TCTDB* tdb, void* pkbuf, int pksiz, int num ) ;
 105 FUNCTION: double tctdbadddouble ( TCTDB* tdb, void* pkbuf, int pksiz, double num ) ;
 106 FUNCTION: bool tctdbsync ( TCTDB* tdb ) ;
 107 FUNCTION: bool tctdboptimize ( TCTDB* tdb, longlong bnum, char apow, char fpow, uchar opts ) ;
 108 FUNCTION: bool tctdbvanish ( TCTDB* tdb ) ;
 109 FUNCTION: bool tctdbcopy ( TCTDB* tdb, char* path ) ;
 110 FUNCTION: bool tctdbtranbegin ( TCTDB* tdb ) ;
 111 FUNCTION: bool tctdbtrancommit ( TCTDB* tdb ) ;
 112 FUNCTION: bool tctdbtranabort ( TCTDB* tdb ) ;
 113 FUNCTION: char* tctdbpath ( TCTDB* tdb ) ;
 114 FUNCTION: ulonglong tctdbrnum ( TCTDB* tdb ) ;
 115 FUNCTION: ulonglong tctdbfsiz ( TCTDB* tdb ) ;
 116 FUNCTION: bool tctdbsetindex ( TCTDB* tdb, char* name, int type ) ;
 117 FUNCTION: longlong tctdbgenuid ( TCTDB* tdb ) ;
 118 FUNCTION: TDBQRY* tctdbqrynew ( TCTDB* tdb ) ;
 119 FUNCTION: void tctdbqrydel ( TDBQRY* qry ) ;
 120 FUNCTION: void tctdbqryaddcond ( TDBQRY* qry, char* name, int op, char* expr ) ;
 121 FUNCTION: void tctdbqrysetorder ( TDBQRY* qry, char* name, int type ) ;
 122 FUNCTION: void tctdbqrysetlimit ( TDBQRY* qry, int max, int skip ) ;
 123 FUNCTION: TCLIST* tctdbqrysearch ( TDBQRY* qry ) ;
 124 FUNCTION: bool tctdbqrysearchout ( TDBQRY* qry ) ;
 125 FUNCTION: bool tctdbqryproc ( TDBQRY* qry, TDBQRYPROC proc, void* op ) ;
 126 FUNCTION: char* tctdbqryhint ( TDBQRY* qry ) ;
 127
 128 ! =======
 129
 130 FUNCTION: void tctdbsetecode ( TCTDB* tdb, int ecode, char* filename, int line, char* func ) ;
 131 FUNCTION: void tctdbsetdbgfd ( TCTDB* tdb, int fd ) ;
 132 FUNCTION: int tctdbdbgfd ( TCTDB* tdb ) ;
 133 FUNCTION: bool tctdbhasmutex ( TCTDB* tdb ) ;
 134 FUNCTION: bool tctdbmemsync ( TCTDB* tdb, bool phys ) ;
 135 FUNCTION: ulonglong tctdbbnum ( TCTDB* tdb ) ;
 136 FUNCTION: uint tctdbalign ( TCTDB* tdb ) ;
 137 FUNCTION: uint tctdbfbpmax ( TCTDB* tdb ) ;
 138 FUNCTION: ulonglong tctdbinode ( TCTDB* tdb ) ;
 139 FUNCTION: tokyo_time_t tctdbmtime ( TCTDB* tdb ) ;
 140 FUNCTION: uchar tctdbflags ( TCTDB* tdb ) ;
 141 FUNCTION: uchar tctdbopts ( TCTDB* tdb ) ;
 142 FUNCTION: char* tctdbopaque ( TCTDB* tdb ) ;
 143 FUNCTION: ulonglong tctdbbnumused ( TCTDB* tdb ) ;
 144 FUNCTION: int tctdbinum ( TCTDB* tdb ) ;
 145 FUNCTION: longlong tctdbuidseed ( TCTDB* tdb ) ;
 146 FUNCTION: bool tctdbsetuidseed ( TCTDB* tdb, longlong seed ) ;
 147 FUNCTION: bool tctdbsetcodecfunc ( TCTDB* tdb, TCCODEC enc, void* encop, TCCODEC dec, void* decop ) ;
 148 FUNCTION: bool tctdbputproc ( TCTDB* tdb, void* pkbuf, int pksiz, void* cbuf, int csiz, TCPDPROC proc, void* op ) ;
 149 FUNCTION: bool tctdbforeach ( TCTDB* tdb, TCITER iter, void* op ) ;
 150 FUNCTION: bool tctdbqryproc2 ( TDBQRY* qry, TDBQRYPROC proc, void* op ) ;
 151 FUNCTION: bool tctdbqrysearchout2 ( TDBQRY* qry ) ;
 152 FUNCTION: int tctdbstrtoindextype ( char* str ) ;
 153 FUNCTION: int tctdbqrycount ( TDBQRY* qry ) ;
 154 FUNCTION: int tctdbqrystrtocondop ( char* str ) ;
 155 FUNCTION: int tctdbqrystrtoordertype ( char* str ) ;