heroku-tokyotyrant 0.4

data/ext/tokyocabinet-1.4.41/lab/tabcheck

@@ -0,0 +1,43 @@
+#! /bin/sh
+
+#================================================================
+# tabcheck
+# Find files including dispensable tab and space characters
+#================================================================
+
+
+# set variables
+LANG=C
+LC_ALL=C
+export LANG LC_ALL
+regex='\.(h|c|cc|cpp|cxx|java|pl|pm|pod|rb|rd|lua)$'
+tabcode=`printf '\t'`
+
+
+# find tab
+find . -type f | egrep $regex |
+while read file
+do
+  printf 'Checking %s ... ' $file
+  err=0
+  if grep "$tabcode" $file > /dev/null
+  then
+    printf '### !!! TAB FOUND !!! ###'
+    err=1
+  fi
+  if grep ' $' $file > /dev/null
+  then
+    printf '### !!! TAILING SPACE FOUND !!! ###'
+    err=1
+  fi
+  [ "$err" = 0 ] && printf 'ok'
+  printf '\n'
+done
+
+
+# exit normally
+exit 0
+
+
+
+# END OF FILE

data/ext/tokyocabinet-1.4.41/lab/wgettsv

@@ -0,0 +1,239 @@
+#! /usr/bin/ruby -w
+
+#================================================================
+# wgettsv
+# Collect WWW resources and generate TSV data
+#================================================================
+
+require 'open-uri'
+require 'iconv'
+require 'kconv'
+require 'date'
+require 'time'
+require 'cgi'
+
+def main
+  seeds = []
+  hist = {}
+  filters = []
+  max = 1 << 30
+  lim = 1 << 20
+  wait = 0
+  ndf = false
+  i = 0
+  while i < ARGV.length
+    if seeds.length < 1 && ARGV[i] =~ /^-/
+      if ARGV[i] == '-allow'
+        usage if (i += 1) >= ARGV.length
+        regex = Regexp::new(ARGV[i])
+        filters.push([true, regex]) if regex
+      elsif ARGV[i] == '-deny'
+        usage if (i += 1) >= ARGV.length
+        regex = Regexp::new(ARGV[i])
+        filters.push([false, regex]) if regex
+      elsif ARGV[i] == '-max'
+        usage if (i += 1) >= ARGV.length
+        max = ARGV[i].to_i
+      elsif ARGV[i] == '-lim'
+        usage if (i += 1) >= ARGV.length
+        lim = ARGV[i].to_i
+      elsif ARGV[i] == '-wait'
+        usage if (i += 1) >= ARGV.length
+        wait = ARGV[i].to_f
+      elsif ARGV[i] == '-ndf'
+        ndf = true
+      else
+        usage
+      end
+    else
+      if ARGV[i] =~ /^http:\/\//i
+        seeds.push(ARGV[i])
+        hist[ARGV[i]] = true
+      else
+        usage
+      end
+    end
+    i += 1
+  end
+  usage if seeds.length < 1
+  if !ndf
+    filters.push([false, /\.(txt|text|asc|c|cc|cxx|cpp|h|hxx|hpp|in)$/i])
+    filters.push([false, /\.(css|js|csv|tsv|log|md5|crc|conf|ini|inf|lnk|sys|tmp|bak)$/i])
+    filters.push([false, /\.(xml|xsl|xslt|rdf|rss|dtd|sgml|sgm)$/i])
+    filters.push([false, /\.(pgp|sig|cer|csr|pem|key|b64|uu|uue|[0-9])$/i])
+    filters.push([false, /\.(rtf|pdf|ps|eps|ai|doc|xls|ppt|sxw|sxc|sxi|xdw|jtd|oas|swf)$/i])
+    filters.push([false, /\.(zip|tar|tgz|gz|bz2|tbz2|z|lha|lzh)?$/i])
+    filters.push([false, /\.(7z|lzo|lzma|cpio|shar|cab|rar|sit|ace|hqx)?$/i])
+    filters.push([false, /\.(bin|o|a|so|exe|dll|lib|obj|ocx|class|jar|war)?$/i])
+    filters.push([false, /\.(rpm|deb|qdb|qdb|dbx|dbf|dat|msi|bat|com|iso)?$/i])
+    filters.push([false, /\.(png|gif|jpg|jpeg|tif|tiff|bmp|ico|pbm|pgm|ppm|xbm|xpm|dvi)$/i])
+    filters.push([false, /\.(au|snd|mid|midi|kar|smf|mp2|mp3|m3u|wav|wma|wmp|asx|at3|aif)$/i])
+    filters.push([false, /\.(mpg|mpeg|qt|mov|avi|wmv|wvx|asf|ram|rm)$/i])
+    filters.push([false, /\.(tch|tdb|tdf|tct)$/i])
+    filters.push([false, /\.idx\./i])
+    filters.push([false, /(core|casket|Makefile|README|NEWS|COPYING|LISENCE)($|\/)/i])
+  end
+  return proc(seeds, hist, filters, max, lim, wait) ? 0 : 1
+end
+
+def usage
+  STDERR.printf("%s: collect WWW resources and generate TSV data\n", $progname)
+  STDERR.printf("\n")
+  STDERR.printf("usage:\n")
+  STDERR.printf("  %s [-allow regex] [-deny regex] [-max num] [-lim num] [-wait num]" +
+                " url ...\n", $progname)
+  STDERR.printf("\n")
+  exit(1)
+end
+
+def proc(seeds, hist, filters, max, lim, wait)
+  cnt = 0
+  while (url = seeds.shift) && cnt < max
+    STDERR.printf("%d: getting: %s\n", cnt + 1, url)
+    begin
+      opts = {}
+      OpenURI.open_uri(url, 0, 0, opts) do |sio|
+        baseuri = sio.base_uri
+        if baseuri && baseuri.to_s != url
+          url = baseuri.to_s
+          hist[url] = true
+        end
+        size = sio.size
+        raise "invalid size" if size > lim || size < 3
+        type = sio.content_type
+        type = "text/plain" if !type
+        str = sio.read
+        head = str[0,2048]
+        if (head[0] == 0xfe && head[1] == 0xff) || (head[0] == 0xff && head[1] == 0xfe)
+          str = Kconv::kconv(str, Kconv::UTF8, Kconv::UTF16)
+          charset = "UTF-8"
+        elsif str.include?(0)
+          raise "binary data"
+        end
+        raise "not HTML" if type != "text/html" && head !~ /<html/i && head !~ /<body/i
+        if !charset && head =~ /<\?xml.*encoding=("|')?[-_a-zA-Z0-9]+("|')/im
+          charset = head.gsub(/.*<\?xml.*encoding=["']?([-_a-zA-Z0-9]+)["']?.*/im, '\1')
+        end
+        if !charset && head =~ /<meta.*content-type.*charset=[-_a-zA-Z0-9]+/im
+          charset = head.gsub(/.*<meta.*content-type.*charset=([-_a-zA-Z0-9]+).*/im, '\1')
+        end
+        charset = sio.charset if !charset || charset.length < 1
+        if charset && charset.length > 0
+          if charset !~ /^UTF-?8$/i
+            begin
+              nstr = Iconv.conv("UTF-8", charset, str)
+              str = nstr if nstr && nstr.length > 0
+            rescue
+              str = str.toutf8
+            end
+          end
+        else
+          str = str.toutf8
+        end
+        body = str.gsub(/.*<body[^>]*>/im, "")
+        body = body.gsub(/<\/body>.*/im, "")
+        body = htmltotext(body)
+        if str =~ /<title[^>]*>[^<]*<\/title>/im
+          title = str.gsub(/.*<title[^>]*>([^<]*)<\/title>.*/im, '\1')
+          title = htmltotext(title)
+        end
+        title = "" if !title
+        title = title[0,128] if title.length > 128
+        mtime = sio.last_modified
+        if mtime
+          mtime = Time::parse(mtime.to_s).to_i
+        else
+          mtime = 0
+        end
+        printf("%d", cnt + 1)
+        printf("\turl\t%s", url)
+        printf("\tsize\t%s", size) if size > 0
+        printf("\tmtime\t%s", mtime) if mtime > 0
+        printf("\ttitle\t%s", title) if title.length > 0
+        printf("\tbody\t%s", body) if body.length > 0
+        printf("\n")
+        str.gsub(/<a[^>]*>/im) do |tag|
+          if tag =~ /href=["']?[^"'>]+["']?/
+            href = tag.gsub(/.*href=["']?([^"'>]+)["']?.*/, '\1')
+            href = URI::join(url, href).to_s
+            href = href.gsub(/#.*/, "")
+            if !hist[href] && checkurl(href, filters)
+              seeds.push(href)
+              hist[href] = true
+            end
+          end
+        end
+      end
+      cnt += 1
+    rescue
+      STDERR.printf("%d: failed: %s: %s\n", cnt + 1, url, $!)
+    end
+    sleep(wait) if wait > 0
+  end
+  return 0
+end
+
+def htmltotext(str)
+  str = str.gsub(/<style[^>]*>.*?<\/style>/im, " ")
+  str = str.gsub(/<script[^>]*>.*?<\/script>/im, " ")
+  str = str.gsub(/<\/?(p|br|div|h1|h2|h3|h4|h5|h6|ul|ol|dl|li|dd|dt|td|th|pre)[^>]*>/im, " ")
+  str = str.gsub(/<[^>]*>/, "")
+  str = str.gsub(/&(nbsp|#160|#0160|#xa0|#x00a0);/i, " ")
+  hexrx = Regexp::new("^&#x[0-9a-zA-Z]+;")
+  decrx = Regexp::new("^&#[0-9]+;")
+  str = str.gsub(/&#?[A-Za-z0-9]+;/) do |pat|
+    case pat
+    when "&lt;"
+      pat = '<'
+    when "&gt;"
+      pat = '>'
+    when "&quot;"
+      pat = '"'
+    when "&apos;"
+      pat = "'"
+    when "&nbsp;"
+      pat = " "
+    else
+      begin
+        if pat =~ hexrx
+          pat = [ pat.gsub(/&#x([A-Za-z0-9]+);/i, '\1').hex ].pack("n")
+          pat = Iconv.conv("UTF-8", "UTF-16BE", pat)
+        elsif pat =~ decrx
+          pat = [ pat.gsub(/&#([A-Za-z0-9]+);/i, '\1').to_i ].pack("n")
+          pat = Iconv.conv("UTF-8", "UTF-16BE", pat)
+        else
+          pat = " "
+        end
+      rescue
+        pat = ""
+      end
+    end
+    pat
+  end
+  str = str.gsub(/[\x00-\x20]/, " ")
+  str = str.gsub(/\xe3\x80\x80/, " ")
+  str = str.gsub(/ +/, " ")
+  str = str.gsub(/^ */, "")
+  str = str.gsub(/ *$/, "")
+  return str
+end
+
+def checkurl(url, filters)
+  return false if url !~ /^http:\/\//i;
+  return true if filters.length < 1
+  ok = !filters[0][0]
+  filters.each do |filter|
+    ok = filter[0] if url =~ filter[1]
+  end
+  return ok
+end
+
+STDOUT.sync = true
+$progname = $0.dup
+$progname.gsub!(/.*\//, "")
+srand
+exit(main)
+
+
+
+# END OF FILE

data/ext/tokyocabinet-1.4.41/lab/widthcheck

@@ -0,0 +1,57 @@
+#! /usr/bin/ruby -w
+
+#================================================================
+# widthcheck
+# Find files including too wide lines
+#================================================================
+
+
+LIMITWIDTH = 97
+
+def checkfile(path)
+  printf("Checking: %s\n", path)
+  ok = true
+  open(path, "r") do |file|
+    num = 0
+    file.each do |line|
+      num += 1
+      line.chomp!
+      if line.length > LIMITWIDTH && !line.index("/*") && !line.index("*/")
+        printf("FOUND: %s: %d: %d: %s\n", path, num, line.length, line);
+        ok = false
+      end
+    end
+  end
+  return ok
+end
+
+ok = true
+list = Array::new(ARGV)
+list.push(".") if list.empty?
+while !list.empty?
+  path = list.shift
+  begin
+    if File::ftype(path) == "directory"
+      Dir.entries(path).each do |cpath|
+        if cpath != "." and cpath != ".."
+          list.push(path + "/" + cpath)
+        end
+      end
+    else
+      ok = false if !checkfile(path)
+    end
+  rescue
+  end
+end
+
+if ok
+  printf("ALL OK\n")
+  exit(0)
+else
+  printf("ERROR\n")
+  exit(1)
+end
+
+
+
+# END OF FILE

data/ext/tokyocabinet-1.4.41/man/htmltoman

@@ -0,0 +1,104 @@
+#! /usr/bin/awk -f
+
+function strip(text){
+  gsub("^ *<[a-zA-Z0-9]*[^>]*>", "", text)
+  gsub("</[a-zA-Z0-9]*> *$", "", text)
+  return text
+}
+
+function unescape(text){
+  gsub("&lt;", "<", text)
+  gsub("&gt;", ">", text)
+  gsub("&quot;", "\"", text)
+  gsub("&amp;", "\\&", text)
+  gsub("-", "\\-", text)
+  return text
+}
+
+BEGIN {
+  date = strftime("%Y-%m-%d")
+  printf(".TH \"%s\" %d \"%s\" \"%s\" \"%s\"\n\n", "INTRO", 3, date, "Man Page", "Tokyo Cabinet")
+}
+
+/ *<h[1-3] *[^>]*>.*<\/h[1-3]> *$/ {
+  text = $0
+  text = strip(text)
+  text = unescape(text)
+  text = toupper(text)
+  printf("\n")
+  printf(".SH %s\n", text)
+}
+
+/ *<p *[^>]*>.*<\/p> *$/ {
+  text = $0
+  text = strip(text)
+  text = gensub("<code *[^>]*>([^<]*)</code>", "\\\\fB\\1\\\\fR", "g", text)
+  text = gensub("<var *[^>]*>([^<]*)</var>", "\\\\fI\\1\\\\fR", "g", text)
+  gsub("<[^>]*>", "", text)
+  text = unescape(text)
+  printf(".PP\n")
+  printf("%s\n", text)
+}
+
+/ *<dl *[^>]*> *$/ {
+  printf(".PP\n")
+  printf(".RS\n")
+}
+/ *<\/dl> *$/ {
+  printf(".RE\n")
+}
+/ *<dt *[^>]*>.*<\/dt> *$/ {
+  text = $0
+  text = strip(text)
+  text = gensub("<var *[^>]*>([^<]*)</var>", "\\\\fI\\1\\\\fB", "g", text)
+  gsub("<[^>]*>", "", text)
+  gsub("[\\||\\[|\\]]", "\\fR&\\fB", text)
+  text = unescape(text)
+  printf(".br\n")
+  printf("\\fB%s\\fR\n", text)
+}
+/ *<dd *[^>]*>.*<\/dd> *$/ {
+  text = $0
+  text = strip(text)
+  text = gensub("<code *[^>]*>([^<]*)</code>", "\\\\fB\\1\\\\fR", "g", text)
+  text = gensub("<var *[^>]*>([^<]*)</var>", "\\\\fI\\1\\\\fR", "g", text)
+  gsub("<[^>]*>", "", text)
+  text = unescape(text)
+  printf(".RS\n")
+  printf("%s\n", text)
+  printf(".RE\n")
+}
+
+/ *<ul *[^>]*> *$/ {
+  printf(".PP\n")
+  printf(".RS\n")
+}
+/ *<\/ul> *$/ {
+  printf(".RE\n")
+}
+/ *<li *[^>]*>.*<\/li> *$/ {
+  text = $0
+  text = strip(text)
+  text = gensub("<code *[^>]*>(.*)</code>", "\\\\fB\\1\\\\fR", "g", text)
+  text = gensub("<var *[^>]*>([^<]*)</var>", "\\\\fI\\1\\\\fR", "g", text)
+  gsub("<[^>]*>", "", text)
+  text = unescape(text)
+  printf("%s\n", text)
+  printf(".br\n")
+}
+
+END {
+  printf("\n")
+  printf(".SH SEE ALSO\n")
+  printf(".PP\n")
+  printf(".BR tcutil (3),\n")
+  printf(".BR tchdb (3),\n")
+  printf(".BR tcbdb (3),\n")
+  printf(".BR tcfdb (3),\n")
+  printf(".BR tctdb (3),\n")
+  printf(".BR tcadb (3)\n")
+  printf(".PP\n")
+  printf("Please see\n")
+  printf(".I http://1978th.net/tokyocabinet/\n")
+  printf("for detail.\n")
+}

data/ext/tokyocabinet-1.4.41/man/tcadb.3

@@ -0,0 +1,676 @@
+.TH "TCADB" 3 "2009-10-13" "Man Page" "Tokyo Cabinet"
+
+.SH NAME
+tcadb \- the abstract database API
+
+.SH DESCRIPTION
+.PP
+Abstract database is a set of interfaces to use on\-memory hash database, on\-memory tree database, hash database, B+ tree database, fixed\-length database, and table database with the same API.
+.PP
+To use the abstract database API, include `\fBtcutil.h\fR', `\fBtcadb.h\fR', and related standard header files.  Usually, write the following description near the front of a source file.
+.PP
+.RS
+.br
+\fB#include <tcutil.h>\fR
+.br
+\fB#include <tcadb.h>\fR
+.br
+\fB#include <stdlib.h>\fR
+.br
+\fB#include <stdbool.h>\fR
+.br
+\fB#include <stdint.h>\fR
+.RE
+.PP
+Objects whose type is pointer to `\fBTCADB\fR' are used to handle abstract databases.  An abstract database object is created with the function `\fBtcadbnew\fR' and is deleted with the function `\fBtcadbdel\fR'.  To avoid memory leak, it is important to delete every object when it is no longer in use.
+.PP
+Before operations to store or retrieve records, it is necessary to connect the abstract database object to the concrete one.  The function `\fBtcadbopen\fR' is used to open a concrete database and the function `\fBtcadbclose\fR' is used to close the database.  To avoid data missing or corruption, it is important to close every database instance when it is no longer in use.  It is forbidden for multible database objects in a process to open the same database at the same time.
+
+.SH API
+.PP
+The function `tcadbnew' is used in order to create an abstract database object.
+.PP
+.RS
+.br
+\fBTCADB *tcadbnew(void);\fR
+.RS
+The return value is the new abstract database object.
+.RE
+.RE
+.PP
+The function `tcadbdel' is used in order to delete an abstract database object.
+.PP
+.RS
+.br
+\fBvoid tcadbdel(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RE
+.PP
+The function `tcadbopen' is used in order to open an abstract database.
+.PP
+.RS
+.br
+\fBbool tcadbopen(TCADB *\fIadb\fB, const char *\fIname\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIname\fR' specifies the name of the database.  If it is "*", the database will be an on\-memory hash database.  If it is "+", the database will be an on\-memory tree database.  If its suffix is ".tch", the database will be a hash database.  If its suffix is ".tcb", the database will be a B+ tree database.  If its suffix is ".tcf", the database will be a fixed\-length database.  If its suffix is ".tct", the database will be a table database.  Otherwise, this function fails.  Tuning parameters can trail the name, separated by "#".  Each parameter is composed of the name and the value, separated by "=".  On\-memory hash database supports "bnum", "capnum", and "capsiz".  On\-memory tree database supports "capnum" and "capsiz".  Hash database supports "mode", "bnum", "apow", "fpow", "opts", "rcnum", "xmsiz", and "dfunit".  B+ tree database supports "mode", "lmemb", "nmemb", "bnum", "apow", "fpow", "opts", "lcnum", "ncnum", "xmsiz", and "dfunit".  Fixed\-length database supports "mode", "width", and "limsiz".  Table database supports "mode", "bnum", "apow", "fpow", "opts", "rcnum", "lcnum", "ncnum", "xmsiz", "dfunit", and "idx".
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+The tuning parameter "capnum" specifies the capacity number of records.  "capsiz" specifies the capacity size of using memory.  Records spilled the capacity are removed by the storing order.  "mode" can contain "w" of writer, "r" of reader, "c" of creating, "t" of truncating, "e" of no locking, and "f" of non\-blocking lock.  The default mode is relevant to "wc".  "opts" can contains "l" of large option, "d" of Deflate option, "b" of BZIP2 option, and "t" of TCBS option.  "idx" specifies the column name of an index and its type separated by ":".  For example, "casket.tch#bnum=1000000#opts=ld" means that the name of the database file is "casket.tch", and the bucket number is 1000000, and the options are large and Deflate.
+.RE
+.RE
+.PP
+The function `tcadbclose' is used in order to close an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbclose(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+Update of a database is assured to be written when the database is closed.  If a writer opens a database but does not close it appropriately, the database will be broken.
+.RE
+.RE
+.PP
+The function `tcadbput' is used in order to store a record into an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbput(TCADB *\fIadb\fB, const void *\fIkbuf\fB, int \fIksiz\fB, const void *\fIvbuf\fB, int \fIvsiz\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkbuf\fR' specifies the pointer to the region of the key.
+.RE
+.RS
+`\fIksiz\fR' specifies the size of the region of the key.
+.RE
+.RS
+`\fIvbuf\fR' specifies the pointer to the region of the value.
+.RE
+.RS
+`\fIvsiz\fR' specifies the size of the region of the value.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+If a record with the same key exists in the database, it is overwritten.
+.RE
+.RE
+.PP
+The function `tcadbput2' is used in order to store a string record into an abstract object.
+.PP
+.RS
+.br
+\fBbool tcadbput2(TCADB *\fIadb\fB, const char *\fIkstr\fB, const char *\fIvstr\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkstr\fR' specifies the string of the key.
+.RE
+.RS
+`\fIvstr\fR' specifies the string of the value.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+If a record with the same key exists in the database, it is overwritten.
+.RE
+.RE
+.PP
+The function `tcadbputkeep' is used in order to store a new record into an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbputkeep(TCADB *\fIadb\fB, const void *\fIkbuf\fB, int \fIksiz\fB, const void *\fIvbuf\fB, int \fIvsiz\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkbuf\fR' specifies the pointer to the region of the key.
+.RE
+.RS
+`\fIksiz\fR' specifies the size of the region of the key.
+.RE
+.RS
+`\fIvbuf\fR' specifies the pointer to the region of the value.
+.RE
+.RS
+`\fIvsiz\fR' specifies the size of the region of the value.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+If a record with the same key exists in the database, this function has no effect.
+.RE
+.RE
+.PP
+The function `tcadbputkeep2' is used in order to store a new string record into an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbputkeep2(TCADB *\fIadb\fB, const char *\fIkstr\fB, const char *\fIvstr\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkstr\fR' specifies the string of the key.
+.RE
+.RS
+`\fIvstr\fR' specifies the string of the value.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+If a record with the same key exists in the database, this function has no effect.
+.RE
+.RE
+.PP
+The function `tcadbputcat' is used in order to concatenate a value at the end of the existing record in an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbputcat(TCADB *\fIadb\fB, const void *\fIkbuf\fB, int \fIksiz\fB, const void *\fIvbuf\fB, int \fIvsiz\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkbuf\fR' specifies the pointer to the region of the key.
+.RE
+.RS
+`\fIksiz\fR' specifies the size of the region of the key.
+.RE
+.RS
+`\fIvbuf\fR' specifies the pointer to the region of the value.
+.RE
+.RS
+`\fIvsiz\fR' specifies the size of the region of the value.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+If there is no corresponding record, a new record is created.
+.RE
+.RE
+.PP
+The function `tcadbputcat2' is used in order to concatenate a string value at the end of the existing record in an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbputcat2(TCADB *\fIadb\fB, const char *\fIkstr\fB, const char *\fIvstr\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkstr\fR' specifies the string of the key.
+.RE
+.RS
+`\fIvstr\fR' specifies the string of the value.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+If there is no corresponding record, a new record is created.
+.RE
+.RE
+.PP
+The function `tcadbout' is used in order to remove a record of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbout(TCADB *\fIadb\fB, const void *\fIkbuf\fB, int \fIksiz\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkbuf\fR' specifies the pointer to the region of the key.
+.RE
+.RS
+`\fIksiz\fR' specifies the size of the region of the key.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RE
+.PP
+The function `tcadbout2' is used in order to remove a string record of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbout2(TCADB *\fIadb\fB, const char *\fIkstr\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkstr\fR' specifies the string of the key.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RE
+.PP
+The function `tcadbget' is used in order to retrieve a record in an abstract database object.
+.PP
+.RS
+.br
+\fBvoid *tcadbget(TCADB *\fIadb\fB, const void *\fIkbuf\fB, int \fIksiz\fB, int *\fIsp\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkbuf\fR' specifies the pointer to the region of the key.
+.RE
+.RS
+`\fIksiz\fR' specifies the size of the region of the key.
+.RE
+.RS
+`\fIsp\fR' specifies the pointer to the variable into which the size of the region of the return value is assigned.
+.RE
+.RS
+If successful, the return value is the pointer to the region of the value of the corresponding record.  `NULL' is returned if no record corresponds.
+.RE
+.RS
+Because an additional zero code is appended at the end of the region of the return value, the return value can be treated as a character string.  Because the region of the return value is allocated with the `malloc' call, it should be released with the `free' call when it is no longer in use.
+.RE
+.RE
+.PP
+The function `tcadbget2' is used in order to retrieve a string record in an abstract database object.
+.PP
+.RS
+.br
+\fBchar *tcadbget2(TCADB *\fIadb\fB, const char *\fIkstr\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkstr\fR' specifies the string of the key.
+.RE
+.RS
+If successful, the return value is the string of the value of the corresponding record.  `NULL' is returned if no record corresponds.
+.RE
+.RS
+Because the region of the return value is allocated with the `malloc' call, it should be released with the `free' call when it is no longer in use.
+.RE
+.RE
+.PP
+The function `tcadbvsiz' is used in order to get the size of the value of a record in an abstract database object.
+.PP
+.RS
+.br
+\fBint tcadbvsiz(TCADB *\fIadb\fB, const void *\fIkbuf\fB, int \fIksiz\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkbuf\fR' specifies the pointer to the region of the key.
+.RE
+.RS
+`\fIksiz\fR' specifies the size of the region of the key.
+.RE
+.RS
+If successful, the return value is the size of the value of the corresponding record, else, it is \-1.
+.RE
+.RE
+.PP
+The function `tcadbvsiz2' is used in order to get the size of the value of a string record in an abstract database object.
+.PP
+.RS
+.br
+\fBint tcadbvsiz2(TCADB *\fIadb\fB, const char *\fIkstr\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkstr\fR' specifies the string of the key.
+.RE
+.RS
+If successful, the return value is the size of the value of the corresponding record, else, it is \-1.
+.RE
+.RE
+.PP
+The function `tcadbiterinit' is used in order to initialize the iterator of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbiterinit(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+The iterator is used in order to access the key of every record stored in a database.
+.RE
+.RE
+.PP
+The function `tcadbiternext' is used in order to get the next key of the iterator of an abstract database object.
+.PP
+.RS
+.br
+\fBvoid *tcadbiternext(TCADB *\fIadb\fB, int *\fIsp\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIsp\fR' specifies the pointer to the variable into which the size of the region of the return value is assigned.
+.RE
+.RS
+If successful, the return value is the pointer to the region of the next key, else, it is `NULL'.  `NULL' is returned when no record is to be get out of the iterator.
+.RE
+.RS
+Because an additional zero code is appended at the end of the region of the return value, the return value can be treated as a character string.  Because the region of the return value is allocated with the `malloc' call, it should be released with the `free' call when it is no longer in use.  It is possible to access every record by iteration of calling this function.  It is allowed to update or remove records whose keys are fetched while the iteration.  However, it is not assured if updating the database is occurred while the iteration.  Besides, the order of this traversal access method is arbitrary, so it is not assured that the order of storing matches the one of the traversal access.
+.RE
+.RE
+.PP
+The function `tcadbiternext2' is used in order to get the next key string of the iterator of an abstract database object.
+.PP
+.RS
+.br
+\fBchar *tcadbiternext2(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+If successful, the return value is the string of the next key, else, it is `NULL'.  `NULL' is returned when no record is to be get out of the iterator.
+.RE
+.RS
+Because the region of the return value is allocated with the `malloc' call, it should be released with the `free' call when it is no longer in use.  It is possible to access every record by iteration of calling this function.  However, it is not assured if updating the database is occurred while the iteration.  Besides, the order of this traversal access method is arbitrary, so it is not assured that the order of storing matches the one of the traversal access.
+.RE
+.RE
+.PP
+The function `tcadbfwmkeys' is used in order to get forward matching keys in an abstract database object.
+.PP
+.RS
+.br
+\fBTCLIST *tcadbfwmkeys(TCADB *\fIadb\fB, const void *\fIpbuf\fB, int \fIpsiz\fB, int \fImax\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIpbuf\fR' specifies the pointer to the region of the prefix.
+.RE
+.RS
+`\fIpsiz\fR' specifies the size of the region of the prefix.
+.RE
+.RS
+`\fImax\fR' specifies the maximum number of keys to be fetched.  If it is negative, no limit is specified.
+.RE
+.RS
+The return value is a list object of the corresponding keys.  This function does never fail.  It returns an empty list even if no key corresponds.
+.RE
+.RS
+Because the object of the return value is created with the function `tclistnew', it should be deleted with the function `tclistdel' when it is no longer in use.  Note that this function may be very slow because every key in the database is scanned.
+.RE
+.RE
+.PP
+The function `tcadbfwmkeys2' is used in order to get forward matching string keys in an abstract database object.
+.PP
+.RS
+.br
+\fBTCLIST *tcadbfwmkeys2(TCADB *\fIadb\fB, const char *\fIpstr\fB, int \fImax\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIpstr\fR' specifies the string of the prefix.
+.RE
+.RS
+`\fImax\fR' specifies the maximum number of keys to be fetched.  If it is negative, no limit is specified.
+.RE
+.RS
+The return value is a list object of the corresponding keys.  This function does never fail.  It returns an empty list even if no key corresponds.
+.RE
+.RS
+Because the object of the return value is created with the function `tclistnew', it should be deleted with the function `tclistdel' when it is no longer in use.  Note that this function may be very slow because every key in the database is scanned.
+.RE
+.RE
+.PP
+The function `tcadbaddint' is used in order to add an integer to a record in an abstract database object.
+.PP
+.RS
+.br
+\fBint tcadbaddint(TCADB *\fIadb\fB, const void *\fIkbuf\fB, int \fIksiz\fB, int \fInum\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkbuf\fR' specifies the pointer to the region of the key.
+.RE
+.RS
+`\fIksiz\fR' specifies the size of the region of the key.
+.RE
+.RS
+`\fInum\fR' specifies the additional value.
+.RE
+.RS
+If successful, the return value is the summation value, else, it is `INT_MIN'.
+.RE
+.RS
+If the corresponding record exists, the value is treated as an integer and is added to.  If no record corresponds, a new record of the additional value is stored.
+.RE
+.RE
+.PP
+The function `tcadbadddouble' is used in order to add a real number to a record in an abstract database object.
+.PP
+.RS
+.br
+\fBdouble tcadbadddouble(TCADB *\fIadb\fB, const void *\fIkbuf\fB, int \fIksiz\fB, double \fInum\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIkbuf\fR' specifies the pointer to the region of the key.
+.RE
+.RS
+`\fIksiz\fR' specifies the size of the region of the key.
+.RE
+.RS
+`\fInum\fR' specifies the additional value.
+.RE
+.RS
+If successful, the return value is the summation value, else, it is Not-a-Number.
+.RE
+.RS
+If the corresponding record exists, the value is treated as a real number and is added to.  If no record corresponds, a new record of the additional value is stored.
+.RE
+.RE
+.PP
+The function `tcadbsync' is used in order to synchronize updated contents of an abstract database object with the file and the device.
+.PP
+.RS
+.br
+\fBbool tcadbsync(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RE
+.PP
+The function `tcadboptimize' is used in order to optimize the storage of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadboptimize(TCADB *\fIadb\fB, const char *\fIparams\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIparams\fR' specifies the string of the tuning parameters, which works as with the tuning of parameters the function `tcadbopen'.  If it is `NULL', it is not used.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+This function is useful to reduce the size of the database storage with data fragmentation by successive updating.
+.RE
+.RE
+.PP
+The function `tcadbvanish' is used in order to remove all records of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbvanish(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RE
+.PP
+The function `tcadbcopy' is used in order to copy the database file of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbcopy(TCADB *\fIadb\fB, const char *\fIpath\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIpath\fR' specifies the path of the destination file.  If it begins with `@', the trailing substring is executed as a command line.
+.RE
+.RS
+If successful, the return value is true, else, it is false.  False is returned if the executed command returns non\-zero code.
+.RE
+.RS
+The database file is assured to be kept synchronized and not modified while the copying or executing operation is in progress.  So, this function is useful to create a backup file of the database file.
+.RE
+.RE
+.PP
+The function `tcadbtranbegin' is used in order to begin the transaction of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbtranbegin(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+The database is locked by the thread while the transaction so that only one transaction can be activated with a database object at the same time.  Thus, the serializable isolation level is assumed if every database operation is performed in the transaction.  All updated regions are kept track of by write ahead logging while the transaction.  If the database is closed during transaction, the transaction is aborted implicitly.
+.RE
+.RE
+.PP
+The function `tcadbtrancommit' is used in order to commit the transaction of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbtrancommit(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+Update in the transaction is fixed when it is committed successfully.
+.RE
+.RE
+.PP
+The function `tcadbtranabort' is used in order to abort the transaction of an abstract database object.
+.PP
+.RS
+.br
+\fBbool tcadbtranabort(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+If successful, the return value is true, else, it is false.
+.RE
+.RS
+Update in the transaction is discarded when it is aborted.  The state of the database is rollbacked to before transaction.
+.RE
+.RE
+.PP
+The function `tcadbpath' is used in order to get the file path of an abstract database object.
+.PP
+.RS
+.br
+\fBconst char *tcadbpath(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+The return value is the path of the database file or `NULL' if the object does not connect to any database.  "*" stands for on\-memory hash database.  "+" stands for on\-memory tree database.
+.RE
+.RE
+.PP
+The function `tcadbrnum' is used in order to get the number of records of an abstract database object.
+.PP
+.RS
+.br
+\fBuint64_t tcadbrnum(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+The return value is the number of records or 0 if the object does not connect to any database instance.
+.RE
+.RE
+.PP
+The function `tcadbsize' is used in order to get the size of the database of an abstract database object.
+.PP
+.RS
+.br
+\fBuint64_t tcadbsize(TCADB *\fIadb\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+The return value is the size of the database or 0 if the object does not connect to any database instance.
+.RE
+.RE
+.PP
+The function `tcadbmisc' is used in order to call a versatile function for miscellaneous operations of an abstract database object.
+.PP
+.RS
+.br
+\fBTCLIST *tcadbmisc(TCADB *\fIadb\fB, const char *\fIname\fB, const TCLIST *\fIargs\fB);\fR
+.RS
+`\fIadb\fR' specifies the abstract database object.
+.RE
+.RS
+`\fIname\fR' specifies the name of the function.  All databases support "put", "out", "get", "putlist", "outlist", "getlist", and "getpart".  "put" is to store a record.  It receives a key and a value, and returns an empty list.  "out" is to remove a record.  It receives a key, and returns an empty list.  "get" is to retrieve a record.  It receives a key, and returns a list of the values.  "putlist" is to store records.  It receives keys and values one after the other, and returns an empty list.  "outlist" is to remove records.  It receives keys, and returns an empty list.  "getlist" is to retrieve records.  It receives keys, and returns keys and values of corresponding records one after the other.  "getpart" is to retrieve the partial value of a record.  It receives a key, the offset of the region, and the length of the region.
+.RE
+.RS
+`\fIargs\fR' specifies a list object containing arguments.
+.RE
+.RS
+If successful, the return value is a list object of the result.  `NULL' is returned on failure.
+.RE
+.RS
+Because the object of the return value is created with the function `tclistnew', it should be deleted with the function `tclistdel' when it is no longer in use.
+.RE
+.RE
+
+.SH SEE ALSO
+.PP
+.BR tcatest (1),
+.BR tcamttest (1),
+.BR tcamgr (1),
+.BR tokyocabinet (3)