44.7. PL/Tcl 中的事件触发器函数#

事件触发器函数可以用 PL/Tcl 编写。PostgreSQL要求作为事件触发器调用的函数必须声明为无参数且返回类型为event_trigger的函数。

触发器管理器中的信息通过以下变量传递给函数体

$TG_event

触发器触发的事件的名称。

$TG_tag

触发器触发的命令标记。

触发器函数的返回值将被忽略。

这是一个简单的示例事件触发器函数，它每次执行受支持的命令时都会引发一条NOTICE消息

CREATE OR REPLACE FUNCTION tclsnitch() RETURNS event_trigger AS $$
  elog NOTICE "tclsnitch: $TG_event $TG_tag"
$$ LANGUAGE pltcl;

CREATE EVENT TRIGGER tcl_a_snitch ON ddl_command_start EXECUTE FUNCTION tclsnitch();