extra/tokyo/alien/tctdb/tctdb.factor

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