759 lines
27 KiB
Perl
759 lines
27 KiB
Perl
|
|
# Copyright (c) 2021-2023, PostgreSQL Global Development Group
|
|
|
|
# Sets up a KDC and then runs a variety of tests to make sure that the
|
|
# GSSAPI/Kerberos authentication and encryption are working properly,
|
|
# that the options in pg_hba.conf and pg_ident.conf are handled correctly,
|
|
# that the server-side pg_stat_gssapi view reports what we expect to
|
|
# see for each test and that SYSTEM_USER returns what we expect to see.
|
|
#
|
|
# Also test that GSSAPI delegation is working properly and that those
|
|
# credentials can be used to make dblink / postgres_fdw connections.
|
|
#
|
|
# Since this requires setting up a full KDC, it doesn't make much sense
|
|
# to have multiple test scripts (since they'd have to also create their
|
|
# own KDC and that could cause race conditions or other problems)- so
|
|
# just add whatever other tests are needed to here.
|
|
#
|
|
# See the README for additional information.
|
|
|
|
use strict;
|
|
use warnings;
|
|
use PostgreSQL::Test::Utils;
|
|
use PostgreSQL::Test::Cluster;
|
|
use Test::More;
|
|
use Time::HiRes qw(usleep);
|
|
|
|
if ($ENV{with_gssapi} ne 'yes')
|
|
{
|
|
plan skip_all => 'GSSAPI/Kerberos not supported by this build';
|
|
}
|
|
elsif ($ENV{PG_TEST_EXTRA} !~ /\bkerberos\b/)
|
|
{
|
|
plan skip_all => 'Potentially unsafe test GSSAPI/Kerberos not enabled in PG_TEST_EXTRA';
|
|
}
|
|
|
|
my ($krb5_bin_dir, $krb5_sbin_dir);
|
|
|
|
if ($^O eq 'darwin' && -d "/opt/homebrew" )
|
|
{
|
|
# typical paths for Homebrew on ARM
|
|
$krb5_bin_dir = '/opt/homebrew/opt/krb5/bin';
|
|
$krb5_sbin_dir = '/opt/homebrew/opt/krb5/sbin';
|
|
}
|
|
elsif ($^O eq 'darwin')
|
|
{
|
|
# typical paths for Homebrew on Intel
|
|
$krb5_bin_dir = '/usr/local/opt/krb5/bin';
|
|
$krb5_sbin_dir = '/usr/local/opt/krb5/sbin';
|
|
}
|
|
elsif ($^O eq 'freebsd')
|
|
{
|
|
$krb5_bin_dir = '/usr/local/bin';
|
|
$krb5_sbin_dir = '/usr/local/sbin';
|
|
}
|
|
elsif ($^O eq 'linux')
|
|
{
|
|
$krb5_sbin_dir = '/usr/sbin';
|
|
}
|
|
|
|
my $krb5_config = 'krb5-config';
|
|
my $kinit = 'kinit';
|
|
my $klist = 'klist';
|
|
my $kdb5_util = 'kdb5_util';
|
|
my $kadmin_local = 'kadmin.local';
|
|
my $krb5kdc = 'krb5kdc';
|
|
|
|
if ($krb5_bin_dir && -d $krb5_bin_dir)
|
|
{
|
|
$krb5_config = $krb5_bin_dir . '/' . $krb5_config;
|
|
$kinit = $krb5_bin_dir . '/' . $kinit;
|
|
$klist = $krb5_bin_dir . '/' . $klist;
|
|
}
|
|
if ($krb5_sbin_dir && -d $krb5_sbin_dir)
|
|
{
|
|
$kdb5_util = $krb5_sbin_dir . '/' . $kdb5_util;
|
|
$kadmin_local = $krb5_sbin_dir . '/' . $kadmin_local;
|
|
$krb5kdc = $krb5_sbin_dir . '/' . $krb5kdc;
|
|
}
|
|
|
|
my $host = 'auth-test-localhost.postgresql.example.com';
|
|
my $hostaddr = '127.0.0.1';
|
|
my $realm = 'EXAMPLE.COM';
|
|
|
|
my $krb5_conf = "${PostgreSQL::Test::Utils::tmp_check}/krb5.conf";
|
|
my $kdc_conf = "${PostgreSQL::Test::Utils::tmp_check}/kdc.conf";
|
|
my $krb5_cache = "${PostgreSQL::Test::Utils::tmp_check}/krb5cc";
|
|
my $krb5_log = "${PostgreSQL::Test::Utils::log_path}/krb5libs.log";
|
|
my $kdc_log = "${PostgreSQL::Test::Utils::log_path}/krb5kdc.log";
|
|
my $kdc_port = PostgreSQL::Test::Cluster::get_free_port();
|
|
my $kdc_datadir = "${PostgreSQL::Test::Utils::tmp_check}/krb5kdc";
|
|
my $kdc_pidfile = "${PostgreSQL::Test::Utils::tmp_check}/krb5kdc.pid";
|
|
my $keytab = "${PostgreSQL::Test::Utils::tmp_check}/krb5.keytab";
|
|
|
|
my $pgpass = "${PostgreSQL::Test::Utils::tmp_check}/.pgpass";
|
|
|
|
my $dbname = 'postgres';
|
|
my $username = 'test1';
|
|
my $application = '001_auth.pl';
|
|
|
|
note "setting up Kerberos";
|
|
|
|
my ($stdout, $krb5_version);
|
|
run_log [ $krb5_config, '--version' ], '>', \$stdout
|
|
or BAIL_OUT("could not execute krb5-config");
|
|
BAIL_OUT("Heimdal is not supported") if $stdout =~ m/heimdal/;
|
|
$stdout =~ m/Kerberos 5 release ([0-9]+\.[0-9]+)/
|
|
or BAIL_OUT("could not get Kerberos version");
|
|
$krb5_version = $1;
|
|
|
|
# Construct a pgpass file to make sure we don't use it
|
|
append_to_file(
|
|
$pgpass,
|
|
'*:*:*:*:abc123'
|
|
);
|
|
|
|
chmod 0600, $pgpass;
|
|
|
|
# Build the krb5.conf to use.
|
|
#
|
|
# Explicitly specify the default (test) realm and the KDC for
|
|
# that realm to avoid the Kerberos library trying to look up
|
|
# that information in DNS, and also because we're using a
|
|
# non-standard KDC port.
|
|
#
|
|
# Also explicitly disable DNS lookups since this isn't really
|
|
# our domain and we shouldn't be causing random DNS requests
|
|
# to be sent out (not to mention that broken DNS environments
|
|
# can cause the tests to take an extra long time and timeout).
|
|
#
|
|
# Reverse DNS is explicitly disabled to avoid any issue with a
|
|
# captive portal or other cases where the reverse DNS succeeds
|
|
# and the Kerberos library uses that as the canonical name of
|
|
# the host and then tries to acquire a cross-realm ticket.
|
|
append_to_file(
|
|
$krb5_conf,
|
|
qq![logging]
|
|
default = FILE:$krb5_log
|
|
kdc = FILE:$kdc_log
|
|
|
|
[libdefaults]
|
|
dns_lookup_realm = false
|
|
dns_lookup_kdc = false
|
|
default_realm = $realm
|
|
forwardable = false
|
|
rdns = false
|
|
|
|
[realms]
|
|
$realm = {
|
|
kdc = $hostaddr:$kdc_port
|
|
}
|
|
!);
|
|
|
|
append_to_file(
|
|
$kdc_conf,
|
|
qq![kdcdefaults]
|
|
!);
|
|
|
|
# For new-enough versions of krb5, use the _listen settings rather
|
|
# than the _ports settings so that we can bind to localhost only.
|
|
if ($krb5_version >= 1.15)
|
|
{
|
|
append_to_file(
|
|
$kdc_conf,
|
|
qq!kdc_listen = $hostaddr:$kdc_port
|
|
kdc_tcp_listen = $hostaddr:$kdc_port
|
|
!);
|
|
}
|
|
else
|
|
{
|
|
append_to_file(
|
|
$kdc_conf,
|
|
qq!kdc_ports = $kdc_port
|
|
kdc_tcp_ports = $kdc_port
|
|
!);
|
|
}
|
|
append_to_file(
|
|
$kdc_conf,
|
|
qq!
|
|
[realms]
|
|
$realm = {
|
|
database_name = $kdc_datadir/principal
|
|
admin_keytab = FILE:$kdc_datadir/kadm5.keytab
|
|
acl_file = $kdc_datadir/kadm5.acl
|
|
key_stash_file = $kdc_datadir/_k5.$realm
|
|
}!);
|
|
|
|
mkdir $kdc_datadir or die;
|
|
|
|
# Ensure that we use test's config and cache files, not global ones.
|
|
$ENV{'KRB5_CONFIG'} = $krb5_conf;
|
|
$ENV{'KRB5_KDC_PROFILE'} = $kdc_conf;
|
|
$ENV{'KRB5CCNAME'} = $krb5_cache;
|
|
|
|
my $service_principal = "$ENV{with_krb_srvnam}/$host";
|
|
|
|
system_or_bail $kdb5_util, 'create', '-s', '-P', 'secret0';
|
|
|
|
my $test1_password = 'secret1';
|
|
system_or_bail $kadmin_local, '-q', "addprinc -pw $test1_password test1";
|
|
|
|
system_or_bail $kadmin_local, '-q', "addprinc -randkey $service_principal";
|
|
system_or_bail $kadmin_local, '-q', "ktadd -k $keytab $service_principal";
|
|
|
|
system_or_bail $krb5kdc, '-P', $kdc_pidfile;
|
|
|
|
END
|
|
{
|
|
kill 'INT', `cat $kdc_pidfile` if -f $kdc_pidfile;
|
|
}
|
|
|
|
note "setting up PostgreSQL instance";
|
|
|
|
my $node = PostgreSQL::Test::Cluster->new('node');
|
|
$node->init;
|
|
$node->append_conf(
|
|
'postgresql.conf', qq{
|
|
listen_addresses = '$hostaddr'
|
|
krb_server_keyfile = '$keytab'
|
|
log_connections = on
|
|
lc_messages = 'C'
|
|
});
|
|
$node->start;
|
|
|
|
my $port = $node->port();
|
|
|
|
$node->safe_psql('postgres', 'CREATE USER test1;');
|
|
$node->safe_psql('postgres', "CREATE USER test2 WITH ENCRYPTED PASSWORD 'abc123';");
|
|
$node->safe_psql('postgres', 'CREATE EXTENSION postgres_fdw;');
|
|
$node->safe_psql('postgres', 'CREATE EXTENSION dblink;');
|
|
$node->safe_psql('postgres', "CREATE SERVER s1 FOREIGN DATA WRAPPER postgres_fdw OPTIONS (host '$host', hostaddr '$hostaddr', port '$port', dbname 'postgres');");
|
|
$node->safe_psql('postgres', "CREATE SERVER s2 FOREIGN DATA WRAPPER postgres_fdw OPTIONS (port '$port', dbname 'postgres', passfile '$pgpass');");
|
|
|
|
$node->safe_psql('postgres', 'GRANT USAGE ON FOREIGN SERVER s1 TO test1;');
|
|
|
|
$node->safe_psql('postgres', "CREATE USER MAPPING FOR test1 SERVER s1 OPTIONS (user 'test1');");
|
|
$node->safe_psql('postgres', "CREATE USER MAPPING FOR test1 SERVER s2 OPTIONS (user 'test2');");
|
|
|
|
$node->safe_psql('postgres', "CREATE TABLE t1 (c1 int);");
|
|
$node->safe_psql('postgres', "INSERT INTO t1 VALUES (1);");
|
|
$node->safe_psql('postgres', "CREATE FOREIGN TABLE tf1 (c1 int) SERVER s1 OPTIONS (schema_name 'public', table_name 't1');");
|
|
$node->safe_psql('postgres', "GRANT SELECT ON t1 TO test1;");
|
|
$node->safe_psql('postgres', "GRANT SELECT ON tf1 TO test1;");
|
|
|
|
$node->safe_psql('postgres', "CREATE FOREIGN TABLE tf2 (c1 int) SERVER s2 OPTIONS (schema_name 'public', table_name 't1');");
|
|
$node->safe_psql('postgres', "GRANT SELECT ON tf2 TO test1;");
|
|
|
|
# Set up a table for SYSTEM_USER parallel worker testing.
|
|
$node->safe_psql('postgres',
|
|
"CREATE TABLE ids (id) AS SELECT 'gss:test1\@$realm' FROM generate_series(1, 10);"
|
|
);
|
|
|
|
$node->safe_psql('postgres', 'GRANT SELECT ON ids TO public;');
|
|
|
|
note "running tests";
|
|
|
|
# Test connection success or failure, and if success, that query returns true.
|
|
sub test_access
|
|
{
|
|
local $Test::Builder::Level = $Test::Builder::Level + 1;
|
|
|
|
my ($node, $role, $query, $expected_res, $gssencmode, $test_name,
|
|
@expect_log_msgs)
|
|
= @_;
|
|
|
|
# need to connect over TCP/IP for Kerberos
|
|
my $connstr = $node->connstr('postgres')
|
|
. " user=$role host=$host hostaddr=$hostaddr $gssencmode";
|
|
|
|
my %params = (sql => $query,);
|
|
|
|
if (@expect_log_msgs)
|
|
{
|
|
# Match every message literally.
|
|
my @regexes = map { qr/\Q$_\E/ } @expect_log_msgs;
|
|
|
|
$params{log_like} = \@regexes;
|
|
}
|
|
|
|
if ($expected_res eq 0)
|
|
{
|
|
# The result is assumed to match "true", or "t", here.
|
|
$params{expected_stdout} = qr/^t$/;
|
|
|
|
$node->connect_ok($connstr, $test_name, %params);
|
|
}
|
|
else
|
|
{
|
|
$node->connect_fails($connstr, $test_name, %params);
|
|
}
|
|
}
|
|
|
|
# As above, but test for an arbitrary query result.
|
|
sub test_query
|
|
{
|
|
local $Test::Builder::Level = $Test::Builder::Level + 1;
|
|
|
|
my ($node, $role, $query, $expected, $gssencmode, $test_name) = @_;
|
|
|
|
# need to connect over TCP/IP for Kerberos
|
|
my $connstr = $node->connstr('postgres')
|
|
. " user=$role host=$host hostaddr=$hostaddr $gssencmode";
|
|
|
|
$node->connect_ok(
|
|
$connstr, $test_name,
|
|
sql => $query,
|
|
expected_stdout => $expected);
|
|
return;
|
|
}
|
|
|
|
unlink($node->data_dir . '/pg_hba.conf');
|
|
$node->append_conf('pg_hba.conf',
|
|
qq{
|
|
local all test2 scram-sha-256
|
|
host all all $hostaddr/32 gss map=mymap
|
|
});
|
|
$node->restart;
|
|
|
|
test_access($node, 'test1', 'SELECT true', 2, '', 'fails without ticket');
|
|
|
|
run_log [ $kinit, 'test1' ], \$test1_password or BAIL_OUT($?);
|
|
run_log [ $klist, '-f' ] or BAIL_OUT($?);
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT true',
|
|
2,
|
|
'',
|
|
'fails without mapping',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"no match in usermap \"mymap\" for user \"test1\"");
|
|
|
|
$node->append_conf('pg_ident.conf', qq{mymap /^(.*)\@$realm\$ \\1});
|
|
$node->restart;
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'',
|
|
'succeeds with mapping with default gssencmode and host hba, ticket not forwardable',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=prefer',
|
|
'succeeds with GSS-encrypted access preferred with host hba, ticket not forwardable',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=require',
|
|
'succeeds with GSS-encrypted access required with host hba, ticket not forwardable',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=prefer gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access preferred with host hba and credentials not delegated even though asked for (ticket not forwardable)',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=require gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access required with host hba and credentials not delegated even though asked for (ticket not forwardable)',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
|
|
|
|
# Test that we can transport a reasonable amount of data.
|
|
test_query(
|
|
$node,
|
|
'test1',
|
|
'SELECT * FROM generate_series(1, 100000);',
|
|
qr/^1\n.*\n1024\n.*\n9999\n.*\n100000$/s,
|
|
'gssencmode=require',
|
|
'receiving 100K lines works');
|
|
|
|
test_query(
|
|
$node,
|
|
'test1',
|
|
"CREATE TEMP TABLE mytab (f1 int primary key);\n"
|
|
. "COPY mytab FROM STDIN;\n"
|
|
. join("\n", (1 .. 100000))
|
|
. "\n\\.\n"
|
|
. "SELECT COUNT(*) FROM mytab;",
|
|
qr/^100000$/s,
|
|
'gssencmode=require',
|
|
'sending 100K lines works');
|
|
|
|
# require_auth=gss succeeds if required.
|
|
$node->connect_ok(
|
|
$node->connstr('postgres')
|
|
. " user=test1 host=$host hostaddr=$hostaddr gssencmode=disable require_auth=gss",
|
|
"GSS authentication requested, works with non-encyrpted GSS");
|
|
$node->connect_ok(
|
|
$node->connstr('postgres')
|
|
. " user=test1 host=$host hostaddr=$hostaddr gssencmode=require require_auth=gss",
|
|
"GSS authentication requested, works with encrypted GSS auth");
|
|
|
|
# require_auth=sspi fails if required.
|
|
$node->connect_fails(
|
|
$node->connstr('postgres')
|
|
. " user=test1 host=$host hostaddr=$hostaddr gssencmode=disable require_auth=sspi",
|
|
"SSPI authentication requested, fails with non-encrypted GSS",
|
|
expected_stderr =>
|
|
qr/auth method "sspi" requirement failed: server requested GSSAPI authentication/
|
|
);
|
|
$node->connect_fails(
|
|
$node->connstr('postgres')
|
|
. " user=test1 host=$host hostaddr=$hostaddr gssencmode=require require_auth=sspi",
|
|
"SSPI authentication requested, fails with encrypted GSS",
|
|
expected_stderr =>
|
|
qr/auth method "sspi" requirement failed: server did not complete authentication/
|
|
);
|
|
|
|
# Test that SYSTEM_USER works.
|
|
test_query($node, 'test1', 'SELECT SYSTEM_USER;',
|
|
qr/^gss:test1\@$realm$/s, 'gssencmode=require', 'testing system_user');
|
|
|
|
# Test that SYSTEM_USER works with parallel workers.
|
|
test_query(
|
|
$node,
|
|
'test1', qq(
|
|
SET min_parallel_table_scan_size TO 0;
|
|
SET parallel_setup_cost TO 0;
|
|
SET parallel_tuple_cost TO 0;
|
|
SET max_parallel_workers_per_gather TO 2;
|
|
SELECT bool_and(SYSTEM_USER = id) FROM ids;),
|
|
qr/^t$/s,
|
|
'gssencmode=require',
|
|
'testing system_user with parallel workers');
|
|
|
|
unlink($node->data_dir . '/pg_hba.conf');
|
|
$node->append_conf('pg_hba.conf',
|
|
qq{
|
|
local all test2 scram-sha-256
|
|
hostgssenc all all $hostaddr/32 gss map=mymap
|
|
});
|
|
|
|
string_replace_file($krb5_conf, "forwardable = false", "forwardable = true");
|
|
|
|
run_log [ $kinit, 'test1' ], \$test1_password or BAIL_OUT($?);
|
|
run_log [ $klist, '-f' ] or BAIL_OUT($?);
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated from pg_stat_gssapi where pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=prefer gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access preferred and hostgssenc hba and credentials not forwarded (server does not accept them, default)',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated from pg_stat_gssapi where pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=require gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access required and hostgssenc hba and credentials not forwarded (server does not accept them, default)',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
|
|
$node->append_conf('postgresql.conf',
|
|
qq{gss_accept_deleg=off});
|
|
$node->restart;
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated from pg_stat_gssapi where pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=prefer gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access preferred and hostgssenc hba and credentials not forwarded (server does not accept them, explicitly disabled)',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated from pg_stat_gssapi where pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=require gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access required and hostgssenc hba and credentials not forwarded (server does not accept them, explicitly disabled)',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
|
|
$node->append_conf('postgresql.conf',
|
|
qq{gss_accept_deleg=on});
|
|
$node->restart;
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND credentials_delegated from pg_stat_gssapi where pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=prefer gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access preferred and hostgssenc hba and credentials forwarded',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=yes, principal=test1\@$realm)"
|
|
);
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND credentials_delegated from pg_stat_gssapi where pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=require gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access required and hostgssenc hba and credentials forwarded',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=yes, principal=test1\@$realm)"
|
|
);
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=prefer',
|
|
'succeeds with GSS-encrypted access preferred and hostgssenc hba and credentials not forwarded',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND NOT credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=require gssdeleg=disable',
|
|
'succeeds with GSS-encrypted access required and hostgssenc hba and credentials explicitly not forwarded',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=no, principal=test1\@$realm)"
|
|
);
|
|
|
|
my $psql_out = '';
|
|
my $psql_stderr = '';
|
|
my $psql_rc = '';
|
|
|
|
$psql_rc = $node->psql(
|
|
'postgres',
|
|
"SELECT * FROM dblink('user=test1 dbname=$dbname host=$host hostaddr=$hostaddr port=$port','select 1') as t1(c1 int);",
|
|
connstr => "user=test1 host=$host hostaddr=$hostaddr gssencmode=require gssdeleg=disable",
|
|
stdout => \$psql_out,
|
|
stderr => \$psql_stderr
|
|
);
|
|
is($psql_rc,'3','dblink attempt fails without delegated credentials');
|
|
like($psql_stderr, qr/password or GSSAPI delegated credentials required/,'dblink does not work without delegated credentials');
|
|
like($psql_out, qr/^$/,'dblink does not work without delegated credentials');
|
|
|
|
$psql_out = '';
|
|
$psql_stderr = '';
|
|
|
|
$psql_rc = $node->psql(
|
|
'postgres',
|
|
"SELECT * FROM dblink('user=test2 dbname=$dbname port=$port passfile=$pgpass','select 1') as t1(c1 int);",
|
|
connstr => "user=test1 host=$host hostaddr=$hostaddr gssencmode=require gssdeleg=disable",
|
|
stdout => \$psql_out,
|
|
stderr => \$psql_stderr
|
|
);
|
|
is($psql_rc,'3','dblink does not work without delegated credentials and with passfile');
|
|
like($psql_stderr, qr/password or GSSAPI delegated credentials required/,'dblink does not work without delegated credentials and with passfile');
|
|
like($psql_out, qr/^$/,'dblink does not work without delegated credentials and with passfile');
|
|
|
|
$psql_out = '';
|
|
$psql_stderr = '';
|
|
|
|
$psql_rc = $node->psql(
|
|
'postgres',
|
|
"TABLE tf1;",
|
|
connstr => "user=test1 host=$host hostaddr=$hostaddr gssencmode=require gssdeleg=disable",
|
|
stdout => \$psql_out,
|
|
stderr => \$psql_stderr
|
|
);
|
|
is($psql_rc,'3','postgres_fdw does not work without delegated credentials');
|
|
like($psql_stderr, qr/password or GSSAPI delegated credentials required/,'postgres_fdw does not work without delegated credentials');
|
|
like($psql_out, qr/^$/,'postgres_fdw does not work without delegated credentials');
|
|
|
|
$psql_out = '';
|
|
$psql_stderr = '';
|
|
|
|
$psql_rc = $node->psql(
|
|
'postgres',
|
|
"TABLE tf2;",
|
|
connstr => "user=test1 host=$host hostaddr=$hostaddr gssencmode=require gssdeleg=disable",
|
|
stdout => \$psql_out,
|
|
stderr => \$psql_stderr
|
|
);
|
|
is($psql_rc,'3','postgres_fdw does not work without delegated credentials and with passfile');
|
|
like($psql_stderr, qr/password or GSSAPI delegated credentials required/,'postgres_fdw does not work without delegated credentials and with passfile');
|
|
like($psql_out, qr/^$/,'postgres_fdw does not work without delegated credentials and with passfile');
|
|
|
|
test_access($node, 'test1', 'SELECT true', 2, 'gssencmode=disable',
|
|
'fails with GSS encryption disabled and hostgssenc hba');
|
|
|
|
# require_auth=gss succeeds if required.
|
|
$node->connect_ok(
|
|
$node->connstr('postgres')
|
|
. " user=test1 host=$host hostaddr=$hostaddr gssencmode=require require_auth=gss",
|
|
"GSS authentication requested, works with GSS encryption");
|
|
$node->connect_ok(
|
|
$node->connstr('postgres')
|
|
. " user=test1 host=$host hostaddr=$hostaddr gssencmode=require require_auth=gss,scram-sha-256",
|
|
"multiple authentication types requested, works with GSS encryption");
|
|
|
|
unlink($node->data_dir . '/pg_hba.conf');
|
|
$node->append_conf('pg_hba.conf',
|
|
qq{
|
|
local all test2 scram-sha-256
|
|
hostnogssenc all all $hostaddr/32 gss map=mymap
|
|
});
|
|
$node->restart;
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND NOT encrypted AND credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=prefer gssdeleg=enable',
|
|
'succeeds with GSS-encrypted access preferred and hostnogssenc hba, but no encryption',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=no, deleg_credentials=yes, principal=test1\@$realm)"
|
|
);
|
|
test_access($node, 'test1', 'SELECT true', 2, 'gssencmode=require',
|
|
'fails with GSS-encrypted access required and hostnogssenc hba');
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND NOT encrypted AND credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssencmode=disable gssdeleg=enable',
|
|
'succeeds with GSS encryption disabled and hostnogssenc hba',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=no, deleg_credentials=yes, principal=test1\@$realm)"
|
|
);
|
|
|
|
test_query(
|
|
$node,
|
|
'test1',
|
|
"SELECT * FROM dblink('user=test1 dbname=$dbname host=$host hostaddr=$hostaddr port=$port','select 1') as t1(c1 int);",
|
|
qr/^1$/s,
|
|
'gssencmode=prefer gssdeleg=enable',
|
|
'dblink works not-encrypted (server not configured to accept encrypted GSSAPI connections)');
|
|
|
|
test_query(
|
|
$node,
|
|
'test1',
|
|
"TABLE tf1;",
|
|
qr/^1$/s,
|
|
'gssencmode=prefer gssdeleg=enable',
|
|
'postgres_fdw works not-encrypted (server not configured to accept encrypted GSSAPI connections)');
|
|
|
|
$psql_out = '';
|
|
$psql_stderr = '';
|
|
|
|
$psql_rc = $node->psql(
|
|
'postgres',
|
|
"SELECT * FROM dblink('user=test2 dbname=$dbname port=$port passfile=$pgpass','select 1') as t1(c1 int);",
|
|
connstr => "user=test1 host=$host hostaddr=$hostaddr gssencmode=prefer gssdeleg=enable",
|
|
stdout => \$psql_out,
|
|
stderr => \$psql_stderr
|
|
);
|
|
is($psql_rc,'3','dblink does not work with delegated credentials and with passfile');
|
|
like($psql_stderr, qr/password or GSSAPI delegated credentials required/,'dblink does not work with delegated credentials and with passfile');
|
|
like($psql_out, qr/^$/,'dblink does not work with delegated credentials and with passfile');
|
|
|
|
$psql_out = '';
|
|
$psql_stderr = '';
|
|
|
|
$psql_rc = $node->psql(
|
|
'postgres',
|
|
"TABLE tf2;",
|
|
connstr => "user=test1 host=$host hostaddr=$hostaddr gssencmode=prefer gssdeleg=enable",
|
|
stdout => \$psql_out,
|
|
stderr => \$psql_stderr
|
|
);
|
|
is($psql_rc,'3','postgres_fdw does not work with delegated credentials and with passfile');
|
|
like($psql_stderr, qr/password or GSSAPI delegated credentials required/,'postgres_fdw does not work with delegated credentials and with passfile');
|
|
like($psql_out, qr/^$/,'postgres_fdw does not work with delegated credentials and with passfile');
|
|
|
|
truncate($node->data_dir . '/pg_ident.conf', 0);
|
|
unlink($node->data_dir . '/pg_hba.conf');
|
|
$node->append_conf('pg_hba.conf',
|
|
qq{
|
|
local all test2 scram-sha-256
|
|
host all all $hostaddr/32 gss include_realm=0
|
|
});
|
|
$node->restart;
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT gss_authenticated AND encrypted AND credentials_delegated FROM pg_stat_gssapi WHERE pid = pg_backend_pid();',
|
|
0,
|
|
'gssdeleg=enable',
|
|
'succeeds with include_realm=0 and defaults',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss",
|
|
"connection authorized: user=$username database=$dbname application_name=$application GSS (authenticated=yes, encrypted=yes, deleg_credentials=yes, principal=test1\@$realm)"
|
|
);
|
|
|
|
test_query(
|
|
$node,
|
|
'test1',
|
|
"SELECT * FROM dblink('user=test1 dbname=$dbname host=$host hostaddr=$hostaddr port=$port password=1234','select 1') as t1(c1 int);",
|
|
qr/^1$/s,
|
|
'gssencmode=require gssdeleg=enable',
|
|
'dblink works encrypted');
|
|
|
|
test_query(
|
|
$node,
|
|
'test1',
|
|
"TABLE tf1;",
|
|
qr/^1$/s,
|
|
'gssencmode=require gssdeleg=enable',
|
|
'postgres_fdw works encrypted');
|
|
|
|
# Reset pg_hba.conf, and cause a usermap failure with an authentication
|
|
# that has passed.
|
|
unlink($node->data_dir . '/pg_hba.conf');
|
|
$node->append_conf('pg_hba.conf',
|
|
qq{
|
|
local all test2 scram-sha-256
|
|
host all all $hostaddr/32 gss include_realm=0 krb_realm=EXAMPLE.ORG
|
|
});
|
|
$node->restart;
|
|
|
|
test_access(
|
|
$node,
|
|
'test1',
|
|
'SELECT true',
|
|
2,
|
|
'',
|
|
'fails with wrong krb_realm, but still authenticates',
|
|
"connection authenticated: identity=\"test1\@$realm\" method=gss");
|
|
|
|
done_testing();
|