37.4. ÐолнÑй пÑÐ¸Ð¼ÐµÑ ÑÑиггеÑа #
ÐÐ¾Ñ Ð¾ÑÐµÐ½Ñ Ð¿ÑоÑÑой пÑÐ¸Ð¼ÐµÑ ÑÑиггеÑной ÑÑнкÑии, напиÑанной на C. (ÐÑимеÑÑ ÑÑиггеÑов Ð´Ð»Ñ Ð¿ÑоÑедÑÑнÑÑ ÑзÑков могÑÑ Ð±ÑÑÑ Ð½Ð°Ð¹Ð´ÐµÐ½Ñ Ð² докÑменÑаÑии на пÑоÑедÑÑнÑе ÑзÑки.)
ФÑнкÑÐ¸Ñ trigf ÑообÑÐ°ÐµÑ ÐºÐ¾Ð»Ð¸ÑеÑÑво ÑÑÑок в ÑаблиÑе ttest и пÑопÑÑÐºÐ°ÐµÑ Ð¾Ð¿ÐµÑаÑÐ¸Ñ Ð´Ð»Ñ ÑÑÑоки пÑи попÑÑке вÑÑавиÑÑ Ð¿ÑÑÑое знаÑение в ÑÑÐ¾Ð»Ð±ÐµÑ x. (Таким обÑазом, ÑÑÐ¸Ð³Ð³ÐµÑ Ð´ÐµÐ¹ÑÑвÑÐµÑ ÐºÐ°Ðº огÑаниÑение NOT NULL, но не пÑеÑÑÐ²Ð°ÐµÑ ÑÑанзакÑиÑ.)
ÐнаÑале опÑеделение ÑаблиÑÑ:
CREATE TABLE ttest (
x integer
);ТепеÑÑ Ð¸ÑÑ Ð¾Ð´Ð½Ñй код ÑÑиггеÑной ÑÑнкÑии:
#include "postgres.h"
#include "fmgr.h"
#include "executor/spi.h" /* this is what you need to work with SPI */
#include "commands/trigger.h" /* ... triggers ... */
#include "utils/rel.h" /* ... and relations */
PG_MODULE_MAGIC;
PG_FUNCTION_INFO_V1(trigf);
Datum
trigf(PG_FUNCTION_ARGS)
{
TriggerData *trigdata = (TriggerData *) fcinfo->context;
TupleDesc tupdesc;
HeapTuple rettuple;
char *when;
bool checknull = false;
bool isnull;
int ret, i;
/* make sure it's called as a trigger at all */
if (!CALLED_AS_TRIGGER(fcinfo))
elog(ERROR, "trigf: not called by trigger manager");
/* tuple to return to executor */
if (TRIGGER_FIRED_BY_UPDATE(trigdata->tg_event))
rettuple = trigdata->tg_newtuple;
else
rettuple = trigdata->tg_trigtuple;
/* check for null values */
if (!TRIGGER_FIRED_BY_DELETE(trigdata->tg_event)
&& TRIGGER_FIRED_BEFORE(trigdata->tg_event))
checknull = true;
if (TRIGGER_FIRED_BEFORE(trigdata->tg_event))
when = "before";
else
when = "after ";
tupdesc = trigdata->tg_relation->rd_att;
/* connect to SPI manager */
SPI_connect();
/* get number of rows in table */
ret = SPI_exec("SELECT count(*) FROM ttest", 0);
if (ret < 0)
elog(ERROR, "trigf (fired %s): SPI_exec returned %d", when, ret);
/* count(*) returns int8, so be careful to convert */
i = DatumGetInt64(SPI_getbinval(SPI_tuptable->vals[0],
SPI_tuptable->tupdesc,
1,
&isnull));
elog (INFO, "trigf (fired %s): there are %d rows in ttest", when, i);
SPI_finish();
if (checknull)
{
SPI_getbinval(rettuple, tupdesc, 1, &isnull);
if (isnull)
rettuple = NULL;
}
return PointerGetDatum(rettuple);
}
ÐоÑле компилÑÑии иÑÑ Ð¾Ð´Ð½Ð¾Ð³Ð¾ кода (Ñм. ÐодÑаздел 36.10.5) обÑÑвлÑем ÑÑнкÑÐ¸Ñ Ð¸ ÑÑиггеÑÑ:
CREATE FUNCTION trigf() RETURNS trigger
AS 'имÑ_Ñайла'
LANGUAGE C;
CREATE TRIGGER tbefore BEFORE INSERT OR UPDATE OR DELETE ON ttest
FOR EACH ROW EXECUTE FUNCTION trigf();
CREATE TRIGGER tafter AFTER INSERT OR UPDATE OR DELETE ON ttest
FOR EACH ROW EXECUTE FUNCTION trigf();ТепеÑÑ Ð¼Ð¾Ð¶Ð½Ð¾ пÑовеÑиÑÑ ÑабоÑÑ ÑÑиггеÑа:
=> INSERT INTO ttest VALUES (NULL);
INFO: trigf (fired before): there are 0 rows in ttest
INSERT 0 0
-- ÐÑÑавка запиÑи пÑопÑÑена (знаÑение NULL), поÑÑÐ¾Ð¼Ñ ÑÑÐ¸Ð³Ð³ÐµÑ AFTER не ÑÑабоÑал
=> SELECT * FROM ttest;
x
---
(0 rows)
=> INSERT INTO ttest VALUES (1);
INFO: trigf (fired before): there are 0 rows in ttest
INFO: trigf (fired after ): there are 1 rows in ttest
^^^^^^^^
вÑпомниÑе, ÑÑо говоÑилоÑÑ Ð¾ видимоÑÑи
INSERT 167793 1
vac=> SELECT * FROM ttest;
x
---
1
(1 row)
=> INSERT INTO ttest SELECT x * 2 FROM ttest;
INFO: trigf (fired before): there are 1 rows in ttest
INFO: trigf (fired after ): there are 2 rows in ttest
^^^^^^
вÑпомниÑе, ÑÑо говоÑилоÑÑ Ð¾ видимоÑÑи
INSERT 167794 1
=> SELECT * FROM ttest;
x
---
1
2
(2 rows)
=> UPDATE ttest SET x = NULL WHERE x = 2;
INFO: trigf (fired before): there are 2 rows in ttest
UPDATE 0
=> UPDATE ttest SET x = 4 WHERE x = 2;
INFO: trigf (fired before): there are 2 rows in ttest
INFO: trigf (fired after ): there are 2 rows in ttest
UPDATE 1
vac=> SELECT * FROM ttest;
x
---
1
4
(2 rows)
=> DELETE FROM ttest;
INFO: trigf (fired before): there are 2 rows in ttest
INFO: trigf (fired before): there are 1 rows in ttest
INFO: trigf (fired after ): there are 0 rows in ttest
INFO: trigf (fired after ): there are 0 rows in ttest
^^^^^^
вÑпомниÑе, ÑÑо говоÑилоÑÑ Ð¾ видимоÑÑи
DELETE 2
=> SELECT * FROM ttest;
x
---
(0 rows)
Ðолее ÑложнÑе пÑимеÑÑ Ð¼Ð¾Ð¶Ð½Ð¾ найÑи в src/test/regress/regress.c и в spi.