#
# Tests for the performance_schema host_cache.
#
# Simulate failures from DNS full round trip (FCRDNS):
# - IP --> HOST --> IP returns no match
# - reported in COUNT_FCRDNS_ERRORS

--source include/not_embedded.inc
--source include/have_debug.inc
--source include/check_ipv6.inc
--source include/have_perfschema.inc
--source include/have_hostname_cache.inc

# [Warning] Hostname 'santa.claus.ipv6.example.com' does not resolve to '2001:db8::6:6'.
# [Note] Hostname 'santa.claus.ipv6.example.com' has the following IP addresses:
# [Note]  - 2001:db8::6:7e
# [Note]  - 2001:db8::6:7f
call mtr.add_suppression("santa.claus.ipv6.example.com");

# Enforce a clean state
--source ../include/wait_for_pfs_thread_count.inc
--source ../include/hostcache_set_state.inc

create user 'root'@'2001:db8::6:6';
grant select on test.* to 'root'@'2001:db8::6:6';

connect (con1,"::1",root,,test,$MASTER_MYPORT,);
select "Con1 is alive";
select current_user();
disconnect con1;

--connection default
SET @saved_dbug = @@GLOBAL.debug_dbug;
set global debug_dbug= "+d,vio_peer_addr_fake_ipv6,getnameinfo_fake_ipv6,getaddrinfo_fake_bad_ipv6";

connect (con2,"::1",root,,test,$MASTER_MYPORT,);
select "Con2 is alive";
select current_user();
disconnect con2;

--connection default
--source ../include/hostcache_dump.inc

connect (con3,"::1",root,,test,$MASTER_MYPORT,);
select "Con3 is alive";
select current_user();
disconnect con3;

--connection default
--source ../include/hostcache_dump.inc

revoke select on test.* from 'root'@'2001:db8::6:6';
drop user 'root'@'2001:db8::6:6';

SET @@GLOBAL.debug_dbug = @saved_dbug;