Quelle  tables1.inc   Sprache: Delphi

# suite/funcs_1/datadict/tables1.inc
#
# Auxiliary script to be sourced by
#    is_tables_mysql.test
#    is_tables_mysql_embedded.test
#    is_tables_is.test
#
# Author:
# 2008-01-23 mleich WL#4203 Reorganize and fix the data dictionary tests of
#                           testsuite funcs_1
#                   Create this script based on older scripts and new code.
#

--disable_warnings
DROP DATABASE IF EXISTS test1;
--enable_warnings
CREATE DATABASE test1;

--source suite/funcs_1/datadict/tables2.inc

# Create a low privileged user.
# Note: The database test1 is just a "home" for the low privileged user
#       and not in the focus of testing.
--error 0,ER_CANNOT_USER
DROP   USER testuser1@localhost;
CREATE USER testuser1@localhost;
GRANT SELECT ON test1.* TO testuser1@localhost;

--replace_result $MASTER_MYPORT MYSQL_PORT $MASTER_MYSOCK MYSQL_SOCK
connect (testuser1,localhost,testuser1,,test1);
--source suite/funcs_1/datadict/tables2.inc

connection default;
disconnect testuser1;
DROP USER testuser1@localhost;
DROP DATABASE test1;