このSPIを使った例は可視性規則を説明しています。 src/test/regress/regress.c と contrib/spi に、更に複雑な例があります。
これは非常に簡単な SPI を使った例です。execq プロシージャは第一引数 として SQL 問い合わせを、第二引数として tcount をとり、 SPI_exec を 使って問い合わせを実行し、問い合わせの対象となったタプルの数を 返します。
#include "executor/spi.h"
/* SPI を使うためにはこれが必要です */
int execq(text *sql, int cnt);
int
execq(text *sql, int cnt)
{
char *query;
int ret;
int proc;
/* 与えられた TEXT オブジェクトを C の文字列に変換します */
query = DatumGetCString(DirectFunctionCall1(textout,
PointerGetDatum(sql)));
SPI_connect();
ret = SPI_exec(query, cnt);
proc = SPI_processed;
/*
* SELECT問い合わせで、複数のタプルが取得された場合
* elog(NOTICE)を使って、タプルを呼び出し元に返します。
*/
if ( ret == SPI_OK_SELECT && SPI_processed > 0 )
{
TupleDesc tupdesc = SPI_tuptable->tupdesc;
SPITupleTable *tuptable = SPI_tuptable;
char buf[8192];
int i,j;
for (j = 0; j < proc; j++)
{
HeapTuple tuple = tuptable->vals[j];
for (i = 1, buf[0] = 0; i <= tupdesc->natts; i++)
sprintf(buf + strlen (buf), " %s%s",
SPI_getvalue(tuple, tupdesc, i),
(i == tupdesc->natts) ? " " : " |");
elog (NOTICE, "EXECQ: %s", buf);
}
}
SPI_finish();
pfree(query);
return (proc);
}ここでコンパイルを行ない、関数を作成します。
create function execq (text, int4) returns int4 as '...path_to_so' language 'c';
vac=> select execq('create table a (x int4)', 0);
execq
-----
0
(1 row)
vac=> insert into a values (execq('insert into a values (0)',0));
INSERT 167631 1
vac=> select execq('select * from a',0);
NOTICE:EXECQ: 0 <<< execq によって挿入されたもの
NOTICE:EXECQ: 1 <<< execq によって返されたものと上の INSERT によって挿入
されたもの
execq
-----
2
(1 row)
vac=> select execq('insert into a select x + 2 from a',1);
execq
-----
1
(1 row)
vac=> select execq('select * from a', 10);
NOTICE:EXECQ: 0
NOTICE:EXECQ: 1
NOTICE:EXECQ: 2 <<< 指定された 0 + 2という値の1つのタプルのみが挿入
されます。
execq
-----
3 <<< 10は最大値を示すだけです。実際のタプル数は3となります。
(1 row)
vac=> delete from a;
DELETE 3
vac=> insert into a values (execq('select * from a', 0) + 1);
INSERT 167712 1
vac=> select * from a;
x
-
1 <<< a テーブルにタプルが存在しない状態(0) + 1 を行なった結果
(1 row)
vac=> insert into a values (execq('select * from a', 0) + 1);
NOTICE:EXECQ: 0
INSERT 167713 1
vac=> select * from a;
x
-
1
2 <<< a テーブルに既存の 1 つのタプル + 1
(2 rows)
-- これはデータ変更に関する可視性規則を説明します。
vac=> insert into a select execq('select * from a', 0) * x from a;
NOTICE:EXECQ: 1
NOTICE:EXECQ: 2
NOTICE:EXECQ: 1
NOTICE:EXECQ: 2
NOTICE:EXECQ: 2
INSERT 0 2
vac=> select * from a;
x
-
1
2
2 <<< タプル数 2 * (1 番目のタプルの x の値である) 1
6 <<< タプル数 3 ( 2 + 挿入されたばかりの 1) * ( 2 番目のタプルの値である)2
(4 rows) ^^^^^^^^
execq()の異なる呼び出しで見ることができるタプル