问用于单元测试PL/PgSQL的工具/库

EN

create or replace function test.foo() returns void as $$
begin

  perform assert_equals('stuff', public.foo('thing'));
  perform assert_null(public.foo(null));
  ...

end $$ language plpgsql;

CREATE OR REPLACE FUNCTION assert_equals(expected text, actual text) RETURNS void AS $$
begin
        if expected = actual or (expected is null and actual is null) then
            --do nothing
        else
            raise exception 'Assertion Error. Expected <%> but was <%>', expected, actual;
        end if;

end $$ LANGUAGE plpgsql;

CREATE OR REPLACE FUNCTION test.run_all() RETURNS void AS $$
declare
    skip constant name[] = '{run_all}';
    test_schema_name constant name = 'test';
    proc pg_catalog.pg_proc%rowtype;
    started timestamptz;
begin

    raise notice 'Time(m)   Name';
    for proc in select p.* from pg_catalog.pg_proc p join pg_catalog.pg_namespace n on pronamespace = n.oid where nspname = test_schema_name and not proname = any(skip) order by proname loop
        started = clock_timestamp();
        execute format('select %s.%s();', test_schema_name, proc.proname);
        raise notice '% %.%()', to_char(clock_timestamp() - started, 'MI:SS:MS'), test_schema_name, proc.proname;
    end loop;  

end $$ LANGUAGE plpgsql;