CREATE EXTENSION adminpack;

-- create new file

SELECT pg_file_write('test_file1', 'test1', false);

pg_file_write

---------------

5

(1 row)

SELECT pg_read_file('test_file1');

pg_read_file

--------------

test1

(1 row)

-- append

SELECT pg_file_write('test_file1', 'test1', true);

pg_file_write

---------------

5

(1 row)

SELECT pg_read_file('test_file1');

pg_read_file

--------------

test1test1

(1 row)

-- error, already exists

SELECT pg_file_write('test_file1', 'test1', false);

ERROR: file "test_file1" exists

SELECT pg_read_file('test_file1');

pg_read_file

--------------

test1test1

(1 row)

-- disallowed file paths

SELECT pg_file_write('../test_file0', 'test0', false);

ERROR: path must be in or below the current directory

SELECT pg_file_write('/tmp/test_file0', 'test0', false);

ERROR: absolute path not allowed

SELECT pg_file_write(current_setting('data_directory') || '/test_file4', 'test4', false);

pg_file_write

---------------

5

(1 row)

SELECT pg_file_write(current_setting('data_directory') || '/../test_file4', 'test4', false);

ERROR: reference to parent directory ("..") not allowed

-- rename file

SELECT pg_file_rename('test_file1', 'test_file2');

pg_file_rename

----------------

t

(1 row)

SELECT pg_read_file('test_file1'); -- not there

ERROR: could not stat file "test_file1": No such file or directory

SELECT pg_read_file('test_file2');

pg_read_file

--------------

test1test1

(1 row)

-- error

SELECT pg_file_rename('test_file1', 'test_file2');

WARNING: file "test_file1" is not accessible: No such file or directory

pg_file_rename

----------------

f

(1 row)

-- rename file and archive

SELECT pg_file_write('test_file3', 'test3', false);

pg_file_write

---------------

5

(1 row)

SELECT pg_file_rename('test_file2', 'test_file3', 'test_file3_archive');

pg_file_rename

----------------

t

(1 row)

SELECT pg_read_file('test_file2'); -- not there

ERROR: could not stat file "test_file2": No such file or directory

SELECT pg_read_file('test_file3');

pg_read_file

--------------

test1test1

(1 row)

SELECT pg_read_file('test_file3_archive');

pg_read_file

--------------

test3

(1 row)

-- unlink

SELECT pg_file_unlink('test_file1'); -- does not exist

pg_file_unlink

----------------

f

(1 row)

SELECT pg_file_unlink('test_file2'); -- does not exist

pg_file_unlink

----------------

f

(1 row)

SELECT pg_file_unlink('test_file3');

pg_file_unlink

----------------

t

(1 row)

SELECT pg_file_unlink('test_file3_archive');

pg_file_unlink

----------------

t

(1 row)

SELECT pg_file_unlink('test_file4');

pg_file_unlink

----------------

t

(1 row)

-- superuser checks

CREATE USER regress_user1;

SET ROLE regress_user1;

SELECT pg_file_write('test_file0', 'test0', false);

ERROR: only superuser may access generic file functions

SELECT pg_file_rename('test_file0', 'test_file0');

ERROR: only superuser may access generic file functions

CONTEXT: SQL function "pg_file_rename" statement 1

SELECT pg_file_unlink('test_file0');

ERROR: only superuser may access generic file functions

SELECT pg_logdir_ls();

ERROR: only superuser can list the log directory

RESET ROLE;

DROP USER regress_user1;

-- no further tests for pg_logdir_ls() because it depends on the

-- server's logging setup