[sqlite] Extension for TCL evaluation by user-defined function inside SQLite

[Alexey Pechnikov]

I have a lot of TCL language structures stored in my databases and
want to get access to these from sqlite3 shell. So I write extension
for this:

    .load ./libsqlitetcl.so
    -- TCL (cmd, argv)
    SELECT TCL('info patchlevel');
    8.5.8
    SELECT TCL('return $argc','abba', 'baba');
    2
    SELECT TCL('return $argv','abba', 'baba');
    abba baba
    SELECT TCL('lindex $argv 0','abba', 'baba');
    abba
    SELECT TCL('lindex $argv 1','abba', 'baba');
    baba
    SELECT TCL('dict get [lindex $argv 0] mykey','key 1 mykey 2');
    2

    -- TCLCMD (cmd, args)
    SELECT TCLCMD('dict get', 'key 1 mykey 2', 'mykey');
    2
    SELECT TCLCMD('dict get', 'key 1 mykey 2', 'key');
    1
    SELECT TCLCMD('lindex', 'key 1 mykey 2', 0);
    key
    SELECT TCLCMD('lindex', 'key 1 mykey 2', 2);
    mykey

This is useful for testing and shell scripting. See sources here:
http://sqlite.mobigroup.ru/dir?name=ext/tcl

-- 
Best regards, Alexey Pechnikov.
http://pechnikov.tel/
_______________________________________________
sqlite-users mailing list
sqlite-users@sqlite.org
http://sqlite.org:8080/cgi-bin/mailman/listinfo/sqlite-users