Как установить язык PL/CTL в базу данных PostgreSQL 8.1.22

Question

Привет, я использую postgresql 8.1.22, я пытаюсь настроить аудит postgresql, используя следующую функцию.

CREATE OR REPLACE FUNCTION audit.if_modified_func() RETURNS TRIGGER AS $body$
DECLARE
    v_old_data TEXT;
    v_new_data TEXT;
BEGIN
    /*  If this actually for real auditing (where you need to log EVERY action),
        then you would need to use something like dblink or plperl that could log outside the transaction,
        regardless of whether the transaction committed or rolled back.
    */

    /* This dance with casting the NEW and OLD values to a ROW is not necessary in pg 9.0+ */

    IF (TG_OP = 'UPDATE') THEN
        v_old_data := ROW(OLD.*);
        v_new_data := ROW(NEW.*);
        INSERT INTO audit.logged_actions (schema_name,table_name,user_name,action,original_data,new_data,query) 
        VALUES (TG_TABLE_SCHEMA::TEXT,TG_TABLE_NAME::TEXT,session_user::TEXT,substring(TG_OP,1,1),v_old_data,v_new_data, current_query());
        RETURN NEW;
    ELSIF (TG_OP = 'DELETE') THEN
        v_old_data := ROW(OLD.*);
        INSERT INTO audit.logged_actions (schema_name,table_name,user_name,action,original_data,query)
        VALUES (TG_TABLE_SCHEMA::TEXT,TG_TABLE_NAME::TEXT,session_user::TEXT,substring(TG_OP,1,1),v_old_data, current_query());
        RETURN OLD;
    ELSIF (TG_OP = 'INSERT') THEN
        v_new_data := ROW(NEW.*);
        INSERT INTO audit.logged_actions (schema_name,table_name,user_name,action,new_data,query)
        VALUES (TG_TABLE_SCHEMA::TEXT,TG_TABLE_NAME::TEXT,session_user::TEXT,substring(TG_OP,1,1),v_new_data, current_query());
        RETURN NEW;
    ELSE
        RAISE WARNING '[AUDIT.IF_MODIFIED_FUNC] - Other action occurred: %, at %',TG_OP,now();
        RETURN NULL;
    END IF;

EXCEPTION
    WHEN data_exception THEN
        RAISE WARNING '[AUDIT.IF_MODIFIED_FUNC] - UDF ERROR [DATA EXCEPTION] - SQLSTATE: %, SQLERRM: %',SQLSTATE,SQLERRM;
        RETURN NULL;
    WHEN unique_violation THEN
        RAISE WARNING '[AUDIT.IF_MODIFIED_FUNC] - UDF ERROR [UNIQUE] - SQLSTATE: %, SQLERRM: %',SQLSTATE,SQLERRM;
        RETURN NULL;
    WHEN OTHERS THEN
        RAISE WARNING '[AUDIT.IF_MODIFIED_FUNC] - UDF ERROR [OTHER] - SQLSTATE: %, SQLERRM: %',SQLSTATE,SQLERRM;
        RETURN NULL;
END;
$body$
LANGUAGE plpgsql
SECURITY DEFINER

Но если вы заметили, что в приведенной выше функции current_query() не идет с упомянутым языком plpgsql. Выдает какую-то ошибку. Когда я гуглил, я обнаружил, что для использования функции current_query() должен быть установлен язык PL/CTL. Я пытался установить, как указано ниже. Выдает ошибку. Поэтому, пожалуйста, помогите мне установить язык PL/CTL в мою базу данных, чтобы функция current_query() работала

-bash-3.2$ createlang -d dbname pltcl
createlang: language installation failed: ERROR:  could not access file "$libdir/pltcl": No such file or directory

Хорошо, как вы предположили, я создал эту функцию current_query(), но на этот раз я получил что-то вроде этого, что я сделал,

CREATE TABLE phonebook(phone VARCHAR(32), firstname VARCHAR(32), lastname VARCHAR(32), address VARCHAR(64));


CREATE TRIGGER phonebook_auditt AFTER INSERT OR UPDATE OR DELETE ON phonebook 
    FOR EACH ROW EXECUTE PROCEDURE audit.if_modified_func();



INSERT INTO phonebook(phone, firstname, lastname, address) VALUES('9966888200', 'John', 'Doe', 'North America'); 

для тестирования функции я создал таблицу с именем телефонной книги и создал триггер, чтобы упомянутая выше функция audit.if_modified_func() выполнялась после любой вставки, обновления или удаления. строка вставляется, но я получаю сообщение об ошибке в ходе аудита.if_modified_func () функция. Ошибка заключается в следующем

WARNING:  [AUDIT.IF_MODIFIED_FUNC] - UDF ERROR [OTHER] - SQLSTATE: 42703, SQLERRM: column "*" not found in data type phonebook

Query returned successfully: 1 rows affected, 10 ms execution time.

Пожалуйста, скажите мне, что я могу сделать, чтобы избавиться от вышеуказанной ошибки.

Answer 1

Не уверен, где вы нашли информацию о current_query и pltcl. Это не связано. Причина, по которой вы не можете найти pltcl, заключается просто в том, что вы используете слишком старый PostgreSQL. current_query() был добавлен в Pg в версии 8.4.

Есть ли какая-то конкретная причина, почему вы используете такую ​​старую версию? Он больше не поддерживается, и ему не хватает почти 8 лет дополнительных функций!

Если вам нужно использовать 8.1, вы можете определить:

create function current_query() returns text as '
select current_query from pg_stat_activity where procpid = pg_backend_pid();
' language sql;

Но это гораздо лучшая идея просто обновить.

Что касается отредактированного и добавленного второго вопроса - очень вероятно, что Pg 8.1 не может использовать конструкцию "row.*". Найдите, кто написал оригинальный код с "комментариями к танцу", и спросите об этом. Возможно, это было предназначено для работы в новых Pgs.