sqlite3pth (historical revision 36408) - The CHICKEN Scheme wiki

You are looking at historical revision 36408 of this page. It may differ significantly from its current revision.

Overview

Run SQLite queries asynchronously in pthreads. Supports calling Scheme from SQLite's VFS to supply database block storage.
Offloads the SQL work to pthreads; the chicken thread is free to continue.
VFS support allows sqlite3 to call back into chicken to supply blocks of the data base. (This is a breakout from ball.askemos.org - where the VFS is used to implement versioning and replication of the databases.)
Safe to be used with CHICKEN's srfi-18 threads. (I.e., does NOT use define-external.)

Requirements

sql-null, pthreads, srfi-18, srfi-34, llrb-tree, miscmacros, srfi-1

API

Currently only lightly documented at documented here at github.

<procedure>(:sql-result: string --> (or false fixnum))

convert field name to index
   ;;

<procedure> (: sqlite3-prepare ((struct <sqlite3-database>) string --> (struct <sqlite3-statement>))) <procedure> (: sqlite3-exec ((struct <sqlite3-database>) (or string (struct <sqlite3-statement>)) #!rest -> :sql-result:)) <procedure> (: sqlite3-call-with-transaction

      ((struct <sqlite3-database>)
       (procedure ((procedure (string #!rest) :sql-result:)) :sql-result:)
      -> :sql-result:))

<procedure> sqlite3-call-test/set questionable, undocumented <procedure> (: sqlite3-close ((struct <sqlite3-database>) -> . *)) <procedure> sqlite3-interrupt! <procedure> sql-result? ;; test result type <procedure> (sql-value RESULT ROW FIELD) --> *

<procedure> (: sql-ref (:sql-result: (or boolean fixnum) (or boolean fixnum string symbol) --> *)) <procedure> (: sql-fold (:sql-result: (procedure ((procedure (fixnum) *) *) *) * -> *))

<procedure>sqlite3-open <procedure>sqlite3-close <procedure> (: sqlite3-open-restricted (string #!optional string vector --> (struct <sqlite3-database>)))

   Restricted open optionally with VFS.  SQL may not attach other files.
   optional string requests sqlite3 VFS, vector holds VFS callbacks

<procedure> (: sqlite3-open-restricted-ro (string #!optional string vector --> (struct <sqlite3-database>)))

   Restricted open read only optionally with VFS.  SQL may not attach other files.
   optional string requests sqlite3 VFS, vector holds VFS callbacks

Accessors

   sqlite3-database-name
   sqlite3-changes
   sqlite3-statement?
   sqlite3-statement-name

   sqlite3-error? sqlite3-error-code sqlite3-error-args

<procedure>sqlite3-error-db-locked?

debug aid

<procedure>(sqlite3-debug-statements FLAG)

Log queries.

Examples

   (define db (sqlite-open "path"))
   (sqlite3-exec db "select 1") ; 1
   (sqlite3-exec db (sqlite3-prepare db "select ?1") 1) ; 1

sqlite3pth

Overview

Requirements

API

Accessors

debug aid

Examples

About this egg

Source Code

Author

License