--- TokyoDystopia.xs	2008/08/17 22:17:40	1
+++ TokyoDystopia.xs	2008/08/18 15:35:18	14
@@ -14,6 +14,103 @@
 tcidberrmsg(ecode)
 	int	ecode
 CODE:
-	RETVAL = tchdberrmsg(ecode);
+	RETVAL = tcidberrmsg(ecode);
 OUTPUT:
 	RETVAL
+
+
+void *
+tcidbnew()
+PREINIT:
+	TCIDB *idb;
+CODE:
+	idb = tcidbnew();
+	RETVAL = idb;
+OUTPUT:
+	RETVAL
+
+
+void
+tcidbdel(idb)
+	void *	idb
+CODE:
+	tcidbdel(idb);
+
+
+int
+tcidbecode(idb)
+	void *	idb
+CODE:
+	RETVAL = tcidbecode(idb);
+OUTPUT:
+	RETVAL
+
+
+int
+tcidbtune(idb, ernum, etnum, iusiz, opts)
+	void *	idb
+	int	ernum
+	int	etnum
+	int	iusiz
+	int	opts
+CODE:
+	RETVAL = tcidbtune(idb, ernum, etnum, iusiz, opts);
+OUTPUT:
+	RETVAL
+
+
+int
+tcidbsetcache(idb, icsiz, lcnum)
+	void *	idb
+	int	icsiz
+	int	lcnum
+CODE:
+	RETVAL = tcidbsetcache(idb, icsiz, lcnum);
+OUTPUT:
+	RETVAL
+
+
+int
+tcidbsetfwmmax(idb, fwmax)
+	void *	idb
+	int	fwmax
+CODE:
+	RETVAL = tcidbsetfwmmax(idb, fwmax);
+OUTPUT:
+	RETVAL
+
+
+int
+tcidbopen(idb, path, omode)
+	void *	idb
+	char *	path
+	int	omode
+CODE:
+	RETVAL = tcidbopen(idb, path, omode);
+OUTPUT:
+	RETVAL
+
+
+int
+tcidbclose(idb)
+	void *	idb
+CODE:
+	RETVAL = tcidbclose(idb);
+OUTPUT:
+	RETVAL
+
+
+int
+tcidbput(idb, id, val)
+	void *	idb
+	int	id
+	SV *	val
+PREINIT:
+	STRLEN vsiz;
+	const char *vbuf;
+CODE:
+	vbuf = SvPV(val, vsiz);
+	RETVAL = tcidbput(idb, id, vbuf);
+OUTPUT:
+	RETVAL
+