/usr/share/postgresql-common/t/031_errors_disk_full.t is in postgresql-common 154.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 | # Check for proper ENOSPC handling
use strict;
require File::Temp;
use lib 't';
use TestLib;
use Test::More tests => 26;
my $outref;
# check that a failed pg_createcluster leaves no cruft behind: try creating a
# cluster on a 10 MB tmpfs
my $cmd = <<EOF;
exec 2>&1
set -e
mkdir -p /var/lib/postgresql
trap "umount /var/lib/postgresql" 0 HUP INT QUIT ILL ABRT PIPE TERM
mount -t tmpfs -o size=10000000 none /var/lib/postgresql
# this is supposed to fail
LC_MESSAGES=C pg_createcluster $MAJORS[-1] test && exit 1 || true
echo -n "ls>"
# should not output anything
ls /etc/postgresql
ls /var/lib/postgresql
echo "<ls"
EOF
my $result;
$result = exec_as 'root', "echo '$cmd' | unshare -m sh", $outref;
is $result, 0, 'script failed';
like $$outref, qr/No space left on device/i,
'pg_createcluster fails due to insufficient disk space';
like $$outref, qr/\nls><ls\n/, 'does not leave files behind';
check_clean;
# check disk full conditions on startup
my $cmd = <<EOF;
set -e
export LC_MESSAGES=C
dirs="/etc/postgresql /var/lib/postgresql /var/log/postgresql"
mkdir -p \$dirs
trap "umount \$dirs" 0 HUP INT QUIT ILL ABRT PIPE TERM
mount -t tmpfs -o size=1000000 none /etc/postgresql
mount -t tmpfs -o size=50000000 none /var/lib/postgresql
mount -t tmpfs -o size=1000000 none /var/log/postgresql
pg_createcluster $MAJORS[-1] test
# fill up /var/lib/postgresql
! cat < /dev/zero > /var/lib/postgresql/cruft 2>/dev/null
echo '-- full lib --'
! pg_ctlcluster $MAJORS[-1] test start
echo '-- end full lib --'
echo '-- full lib log --'
cat /var/log/postgresql/postgresql-$MAJORS[-1]-test.log
echo '-- end full lib log --'
rm /var/lib/postgresql/cruft
pg_dropcluster $MAJORS[-1] test --stop
EOF
$result = exec_as 'root', "echo '$cmd' | unshare -m sh", $outref;
is $result, 0, 'script failed';
like $$outref, qr/^-- full lib --.*No space left on device.*^-- end full lib --/ims,
'pg_ctlcluster prints error message';
like $$outref, qr/^-- full lib log --.*No space left on device.*^-- end full lib log --/ims,
'log file has error message';
check_clean;
# vim: filetype=perl
|