[dbsrgits/DBIx-Class-Schema-Loader.git] / t / 10_02mysql_common.t

use strict;
use Test::More;
use lib qw(t/lib);
use dbixcsl_common_tests;

my $dsn         = $ENV{DBICTEST_MYSQL_DSN} || '';
my $user        = $ENV{DBICTEST_MYSQL_USER} || '';
my $password    = $ENV{DBICTEST_MYSQL_PASS} || '';
my $test_innodb = $ENV{DBICTEST_MYSQL_INNODB} || 0;

my $skip_rels_msg = 'You need to set the DBICTEST_MYSQL_INNODB environment variable to test relationships.';

my $innodb = $test_innodb ? q{Engine=InnoDB} : '';

my $tester = dbixcsl_common_tests->new(
    vendor           => 'Mysql',
    auto_inc_pk      => 'INTEGER NOT NULL PRIMARY KEY AUTO_INCREMENT',
    innodb           => $innodb,
    dsn              => $dsn,
    user             => $user,
    password         => $password,
    connect_info_opts=> { on_connect_call => 'set_strict_mode' },
    loader_options   => { preserve_case => 1 },
    skip_rels        => $test_innodb ? 0 : $skip_rels_msg,
    quote_char       => '`',
    no_inline_rels   => 1,
    no_implicit_rels => 1,
    data_types  => {
        # http://dev.mysql.com/doc/refman/5.5/en/data-type-overview.html
        # Numeric Types
        'bit'         => { data_type => 'bit', size => 1 },
        'bit(11)'     => { data_type => 'bit', size => 11 },

        'bool'        => { data_type => 'tinyint' },
        'boolean'     => { data_type => 'tinyint' },
        'tinyint'     => { data_type => 'tinyint' },
        'tinyint unsigned'
                      => { data_type => 'tinyint',   extra => { unsigned => 1 } },
        'smallint'    => { data_type => 'smallint' },
        'smallint unsigned'
                      => { data_type => 'smallint',  extra => { unsigned => 1 } },
        'mediumint'   => { data_type => 'mediumint' },
        'mediumint unsigned'
                      => { data_type => 'mediumint', extra => { unsigned => 1 } },
        'int'         => { data_type => 'integer' },
        'int unsigned'
                      => { data_type => 'integer',   extra => { unsigned => 1 } },
        'integer'     => { data_type => 'integer' },
        'integer unsigned'
                      => { data_type => 'integer',   extra => { unsigned => 1 } },
        'integer not null'
                      => { data_type => 'integer' },
        'bigint'      => { data_type => 'bigint' },
        'bigint unsigned'
                      => { data_type => 'bigint',    extra => { unsigned => 1 } },

        'serial'      => { data_type => 'bigint', is_auto_increment => 1, extra => { unsigned => 1 } },

        'float'       => { data_type => 'float' },
        'float unsigned'
                      => { data_type => 'float',     extra => { unsigned => 1 } },
        'double'      => { data_type => 'double precision' },
        'double unsigned'
                      => { data_type => 'double precision', extra => { unsigned => 1 } },
        'double precision' =>
                         { data_type => 'double precision' },
        'double precision unsigned'
                      => { data_type => 'double precision', extra => { unsigned => 1 } },

        # we skip 'real' because its alias depends on the 'REAL AS FLOAT' setting

        'float(2)'    => { data_type => 'float' },
        'float(24)'   => { data_type => 'float' },
        'float(25)'   => { data_type => 'double precision' },

        'float(3,3)'  => { data_type => 'float', size => [3,3] },
        'double(3,3)' => { data_type => 'double precision', size => [3,3] },
        'double precision(3,3)'
                      => { data_type => 'double precision', size => [3,3] },

        'decimal'     => { data_type => 'decimal' },
        'decimal unsigned'
                      => { data_type => 'decimal', extra => { unsigned => 1 } },
        'dec'         => { data_type => 'decimal' },
        'numeric'     => { data_type => 'decimal' },
        'fixed'       => { data_type => 'decimal' },

        'decimal(3)'   => { data_type => 'decimal', size => [3,0] },

        'decimal(3,3)' => { data_type => 'decimal', size => [3,3] },
        'dec(3,3)'     => { data_type => 'decimal', size => [3,3] },
        'numeric(3,3)' => { data_type => 'decimal', size => [3,3] },
        'fixed(3,3)'   => { data_type => 'decimal', size => [3,3] },

        # Date and Time Types
        'date'        => { data_type => 'date', datetime_undef_if_invalid => 1 },
        'datetime'    => { data_type => 'datetime', datetime_undef_if_invalid => 1 },
        'timestamp default current_timestamp'
                      => { data_type => 'timestamp', default_value => \'current_timestamp', datetime_undef_if_invalid => 1 },
        'time'        => { data_type => 'time' },
        'year'        => { data_type => 'year' },
        'year(4)'     => { data_type => 'year' },
        'year(2)'     => { data_type => 'year', size => 2 },

        # String Types
        'char'         => { data_type => 'char',      size => 1  },
        'char(11)'     => { data_type => 'char',      size => 11 },
        'varchar(20)'  => { data_type => 'varchar',   size => 20 },
        'binary'       => { data_type => 'binary',    size => 1  },
        'binary(11)'   => { data_type => 'binary',    size => 11 },
        'varbinary(20)'=> { data_type => 'varbinary', size => 20 },

        'tinyblob'    => { data_type => 'tinyblob' },
        'tinytext'    => { data_type => 'tinytext' },
        'blob'        => { data_type => 'blob' },

        # text(M) types will map to the appropriate type, length is not stored
        'text'        => { data_type => 'text' },

        'mediumblob'  => { data_type => 'mediumblob' },
        'mediumtext'  => { data_type => 'mediumtext' },
        'longblob'    => { data_type => 'longblob' },
        'longtext'    => { data_type => 'longtext' },

        "enum('foo','bar','baz')"
                      => { data_type => 'enum', extra => { list => [qw/foo bar baz/] } },
        "enum('foo \\'bar\\' baz', 'foo ''bar'' quux')"
                      => { data_type => 'enum', extra => { list => [q{foo 'bar' baz}, q{foo 'bar' quux}] } },
        "set('foo \\'bar\\' baz', 'foo ''bar'' quux')"
                      => { data_type => 'set', extra => { list => [q{foo 'bar' baz}, q{foo 'bar' quux}] } },
        "set('foo','bar','baz')"
                      => { data_type => 'set',  extra => { list => [qw/foo bar baz/] } },

        # RT#68717
        "enum('11,10 (<500)/0 DUN','4,90 (<120)/0 EUR') NOT NULL default '11,10 (<500)/0 DUN'"
                      => { data_type => 'enum', extra => { list => ['11,10 (<500)/0 DUN', '4,90 (<120)/0 EUR'] }, default_value => '11,10 (<500)/0 DUN' },
        "set('11_10 (<500)/0 DUN','4_90 (<120)/0 EUR') NOT NULL default '11_10 (<500)/0 DUN'"
                      => { data_type => 'set', extra => { list => ['11_10 (<500)/0 DUN', '4_90 (<120)/0 EUR'] }, default_value => '11_10 (<500)/0 DUN' },
        "enum('19,90 (<500)/0 EUR','4,90 (<120)/0 EUR','7,90 (<200)/0 CHF','300 (<6000)/0 CZK','4,90 (<100)/0 EUR','39 (<900)/0 DKK','299 (<5000)/0 EEK','9,90 (<250)/0 EUR','3,90 (<100)/0 GBP','3000 (<70000)/0 HUF','4000 (<70000)/0 JPY','13,90 (<200)/0 LVL','99 (<2500)/0 NOK','39 (<1000)/0 PLN','1000 (<20000)/0 RUB','49 (<2500)/0 SEK','29 (<600)/0 USD','19,90 (<600)/0 EUR','0 EUR','0 CHF') NOT NULL default '19,90 (<500)/0 EUR'"
                      => { data_type => 'enum', extra => { list => ['19,90 (<500)/0 EUR','4,90 (<120)/0 EUR','7,90 (<200)/0 CHF','300 (<6000)/0 CZK','4,90 (<100)/0 EUR','39 (<900)/0 DKK','299 (<5000)/0 EEK','9,90 (<250)/0 EUR','3,90 (<100)/0 GBP','3000 (<70000)/0 HUF','4000 (<70000)/0 JPY','13,90 (<200)/0 LVL','99 (<2500)/0 NOK','39 (<1000)/0 PLN','1000 (<20000)/0 RUB','49 (<2500)/0 SEK','29 (<600)/0 USD','19,90 (<600)/0 EUR','0 EUR','0 CHF'] }, default_value => '19,90 (<500)/0 EUR' },
    },
    extra => {
        create => [
            qq{
                CREATE TABLE `mysql_loader-test1` (
                    id INT AUTO_INCREMENT PRIMARY KEY,
                    value varchar(100)
                ) $innodb
            },
            q{
                CREATE VIEW mysql_loader_test2 AS SELECT * FROM `mysql_loader-test1`
            },
            # RT#68717
            qq{
                CREATE TABLE `mysql_loader_test3` (
                  `ISO3_code` char(3) NOT NULL default '',
                  `lang_pref` enum('de','en','fr','nl','dk','es','se') NOT NULL,
                  `vat` decimal(4,2) default '16.00',
                  `price_group` enum('EUR_DEFAULT','GBP_GBR','EUR_AUT_BEL_FRA_IRL_NLD','EUR_DNK_SWE','EUR_AUT','EUR_BEL','EUR_FIN','EUR_FRA','EUR_IRL','EUR_NLD','EUR_DNK','EUR_POL','EUR_PRT','EUR_SWE','CHF_CHE','DKK_DNK','SEK_SWE','NOK_NOR','USD_USA','CZK_CZE','PLN_POL','RUB_RUS','HUF_HUN','SKK_SVK','JPY_JPN','LVL_LVA','ROL_ROU','EEK_EST') NOT NULL default 'EUR_DEFAULT',
                  `del_group` enum('19,90 (<500)/0 EUR','4,90 (<120)/0 EUR','7,90 (<200)/0 CHF','300 (<6000)/0 CZK','4,90 (<100)/0 EUR','39 (<900)/0 DKK','299 (<5000)/0 EEK','9,90 (<250)/0 EUR','3,90 (<100)/0 GBP','3000 (<70000)/0 HUF','4000 (<70000)/0 JPY','13,90 (<200)/0 LVL','99 (<2500)/0 NOK','39 (<1000)/0 PLN','1000 (<20000)/0 RUB','49 (<2500)/0 SEK','29 (<600)/0 USD','19,90 (<600)/0 EUR','0 EUR','0 CHF') NOT NULL default '19,90 (<500)/0 EUR',
                  `express_del_group` enum('NO','39 EUR (EXPRESS)','59 EUR (EXPRESS)','79 CHF (EXPRESS)','49 EUR (EXPRESS)','990 CZK (EXPRESS)','19,9 EUR (EXPRESS)','290 DKK (EXPRESS)','990 EEK (EXPRESS)','39 GBP (EXPRESS)','14000 HUF (EXPRESS)','49 LVL (EXPRESS)','590 NOK (EXPRESS)','250 PLN (EXPRESS)','490 SEK (EXPRESS)') NOT NULL default 'NO',
                  `pmethod` varchar(255) NOT NULL default 'VISA,MASTER',
                  `delivery_time` varchar(5) default NULL,
                  `express_delivery_time` varchar(5) default NULL,
                  `eu` int(1) default '0',
                  `cod_costs` varchar(12) default NULL,
                  PRIMARY KEY (`ISO3_code`)
                ) $innodb
            },
        ],
        pre_drop_ddl => [ 'DROP VIEW mysql_loader_test2', ],
        drop => [ 'mysql_loader-test1', 'mysql_loader_test3' ],
        count => 3,
        run => sub {
            my ($schema, $monikers, $classes) = @_;

            is $monikers->{'mysql_loader-test1'}, 'MysqlLoaderTest1',
                'table with dash correctly monikerized';

            my $rsrc = $schema->source('MysqlLoaderTest2');

            is $rsrc->column_info('value')->{data_type}, 'varchar',
                'view introspected successfully';

            $rsrc = $schema->source('MysqlLoaderTest3');

            is_deeply $rsrc->column_info('del_group')->{extra}{list}, ['19,90 (<500)/0 EUR','4,90 (<120)/0 EUR','7,90 (<200)/0 CHF','300 (<6000)/0 CZK','4,90 (<100)/0 EUR','39 (<900)/0 DKK','299 (<5000)/0 EEK','9,90 (<250)/0 EUR','3,90 (<100)/0 GBP','3000 (<70000)/0 HUF','4000 (<70000)/0 JPY','13,90 (<200)/0 LVL','99 (<2500)/0 NOK','39 (<1000)/0 PLN','1000 (<20000)/0 RUB','49 (<2500)/0 SEK','29 (<600)/0 USD','19,90 (<600)/0 EUR','0 EUR','0 CHF'],
                'hairy enum introspected correctly';
        },
    },
);

if( !$dsn || !$user ) {
    $tester->skip_tests('You need to set the DBICTEST_MYSQL_DSN, _USER, and _PASS environment variables');
}
else {
    diag $skip_rels_msg if not $test_innodb;
    $tester->run_tests();
}

# vim:et sts=4 sw=4 tw=0:
Commit	Line	Data
a78e3fed	1	use strict;
26334ec1	2	use Test::More;
c2849787	3	use lib qw(t/lib);
fbd83464	4	use dbixcsl_common_tests;
a78e3fed	5
9e978a19	6	my $dsn = $ENV{DBICTEST_MYSQL_DSN} \|\| '';
	7	my $user = $ENV{DBICTEST_MYSQL_USER} \|\| '';
	8	my $password = $ENV{DBICTEST_MYSQL_PASS} \|\| '';
	9	my $test_innodb = $ENV{DBICTEST_MYSQL_INNODB} \|\| 0;
a78e3fed	10
26334ec1	11	my $skip_rels_msg = 'You need to set the DBICTEST_MYSQL_INNODB environment variable to test relationships.';
a78e3fed	12
e00d61ac	13	my $innodb = $test_innodb ? q{Engine=InnoDB} : '';
e00d61ac	14
fbd83464	15	my $tester = dbixcsl_common_tests->new(
52bf3f26	16	vendor => 'Mysql',
52bf3f26	17	auto_inc_pk => 'INTEGER NOT NULL PRIMARY KEY AUTO_INCREMENT',
e00d61ac	18	innodb => $innodb,
52bf3f26	19	dsn => $dsn,
	20	user => $user,
	21	password => $password,
309e2aa1	22	connect_info_opts=> { on_connect_call => 'set_strict_mode' },
eb040f78	23	loader_options => { preserve_case => 1 },
8ff3a23a	24	skip_rels => $test_innodb ? 0 : $skip_rels_msg,
6ebd0f33	25	quote_char => '`',
52bf3f26	26	no_inline_rels => 1,
52bf3f26	27	no_implicit_rels => 1,
98857177	28	data_types => {
	29	# http://dev.mysql.com/doc/refman/5.5/en/data-type-overview.html
	30	# Numeric Types
26334ec1	31	'bit' => { data_type => 'bit', size => 1 },
	32	'bit(11)' => { data_type => 'bit', size => 11 },
	33
	34	'bool' => { data_type => 'tinyint' },
	35	'boolean' => { data_type => 'tinyint' },
	36	'tinyint' => { data_type => 'tinyint' },
	37	'tinyint unsigned'
	38	=> { data_type => 'tinyint', extra => { unsigned => 1 } },
	39	'smallint' => { data_type => 'smallint' },
	40	'smallint unsigned'
	41	=> { data_type => 'smallint', extra => { unsigned => 1 } },
	42	'mediumint' => { data_type => 'mediumint' },
	43	'mediumint unsigned'
	44	=> { data_type => 'mediumint', extra => { unsigned => 1 } },
	45	'int' => { data_type => 'integer' },
	46	'int unsigned'
	47	=> { data_type => 'integer', extra => { unsigned => 1 } },
	48	'integer' => { data_type => 'integer' },
	49	'integer unsigned'
	50	=> { data_type => 'integer', extra => { unsigned => 1 } },
33aa3462	51	'integer not null'
33aa3462	52	=> { data_type => 'integer' },
26334ec1	53	'bigint' => { data_type => 'bigint' },
	54	'bigint unsigned'
	55	=> { data_type => 'bigint', extra => { unsigned => 1 } },
	56
	57	'serial' => { data_type => 'bigint', is_auto_increment => 1, extra => { unsigned => 1 } },
	58
	59	'float' => { data_type => 'float' },
	60	'float unsigned'
	61	=> { data_type => 'float', extra => { unsigned => 1 } },
	62	'double' => { data_type => 'double precision' },
	63	'double unsigned'
	64	=> { data_type => 'double precision', extra => { unsigned => 1 } },
98857177	65	'double precision' =>
26334ec1	66	{ data_type => 'double precision' },
	67	'double precision unsigned'
	68	=> { data_type => 'double precision', extra => { unsigned => 1 } },
	69
	70	# we skip 'real' because its alias depends on the 'REAL AS FLOAT' setting
	71
	72	'float(2)' => { data_type => 'float' },
	73	'float(24)' => { data_type => 'float' },
	74	'float(25)' => { data_type => 'double precision' },
	75
	76	'float(3,3)' => { data_type => 'float', size => [3,3] },
	77	'double(3,3)' => { data_type => 'double precision', size => [3,3] },
	78	'double precision(3,3)'
	79	=> { data_type => 'double precision', size => [3,3] },
	80
	81	'decimal' => { data_type => 'decimal' },
	82	'decimal unsigned'
	83	=> { data_type => 'decimal', extra => { unsigned => 1 } },
	84	'dec' => { data_type => 'decimal' },
	85	'numeric' => { data_type => 'decimal' },
	86	'fixed' => { data_type => 'decimal' },
	87
	88	'decimal(3)' => { data_type => 'decimal', size => [3,0] },
	89
	90	'decimal(3,3)' => { data_type => 'decimal', size => [3,3] },
	91	'dec(3,3)' => { data_type => 'decimal', size => [3,3] },
	92	'numeric(3,3)' => { data_type => 'decimal', size => [3,3] },
	93	'fixed(3,3)' => { data_type => 'decimal', size => [3,3] },
	94
98857177	95	# Date and Time Types
58333f16	96	'date' => { data_type => 'date', datetime_undef_if_invalid => 1 },
58333f16	97	'datetime' => { data_type => 'datetime', datetime_undef_if_invalid => 1 },
6e566cc4	98	'timestamp default current_timestamp'
58333f16	99	=> { data_type => 'timestamp', default_value => \'current_timestamp', datetime_undef_if_invalid => 1 },
26334ec1	100	'time' => { data_type => 'time' },
	101	'year' => { data_type => 'year' },
	102	'year(4)' => { data_type => 'year' },
	103	'year(2)' => { data_type => 'year', size => 2 },
	104
98857177	105	# String Types
26334ec1	106	'char' => { data_type => 'char', size => 1 },
	107	'char(11)' => { data_type => 'char', size => 11 },
	108	'varchar(20)' => { data_type => 'varchar', size => 20 },
	109	'binary' => { data_type => 'binary', size => 1 },
	110	'binary(11)' => { data_type => 'binary', size => 11 },
	111	'varbinary(20)'=> { data_type => 'varbinary', size => 20 },
	112
	113	'tinyblob' => { data_type => 'tinyblob' },
	114	'tinytext' => { data_type => 'tinytext' },
	115	'blob' => { data_type => 'blob' },
	116
	117	# text(M) types will map to the appropriate type, length is not stored
	118	'text' => { data_type => 'text' },
	119
	120	'mediumblob' => { data_type => 'mediumblob' },
	121	'mediumtext' => { data_type => 'mediumtext' },
	122	'longblob' => { data_type => 'longblob' },
	123	'longtext' => { data_type => 'longtext' },
	124
33aa3462	125	"enum('foo','bar','baz')"
26334ec1	126	=> { data_type => 'enum', extra => { list => [qw/foo bar baz/] } },
e00d61ac	127	"enum('foo \\'bar\\' baz', 'foo ''bar'' quux')"
	128	=> { data_type => 'enum', extra => { list => [q{foo 'bar' baz}, q{foo 'bar' quux}] } },
	129	"set('foo \\'bar\\' baz', 'foo ''bar'' quux')"
	130	=> { data_type => 'set', extra => { list => [q{foo 'bar' baz}, q{foo 'bar' quux}] } },
33aa3462	131	"set('foo','bar','baz')"
26334ec1	132	=> { data_type => 'set', extra => { list => [qw/foo bar baz/] } },
698c11d8	133
	134	# RT#68717
	135	"enum('11,10 (<500)/0 DUN','4,90 (<120)/0 EUR') NOT NULL default '11,10 (<500)/0 DUN'"
	136	=> { data_type => 'enum', extra => { list => ['11,10 (<500)/0 DUN', '4,90 (<120)/0 EUR'] }, default_value => '11,10 (<500)/0 DUN' },
	137	"set('11_10 (<500)/0 DUN','4_90 (<120)/0 EUR') NOT NULL default '11_10 (<500)/0 DUN'"
	138	=> { data_type => 'set', extra => { list => ['11_10 (<500)/0 DUN', '4_90 (<120)/0 EUR'] }, default_value => '11_10 (<500)/0 DUN' },
0da287c8	139	"enum('19,90 (<500)/0 EUR','4,90 (<120)/0 EUR','7,90 (<200)/0 CHF','300 (<6000)/0 CZK','4,90 (<100)/0 EUR','39 (<900)/0 DKK','299 (<5000)/0 EEK','9,90 (<250)/0 EUR','3,90 (<100)/0 GBP','3000 (<70000)/0 HUF','4000 (<70000)/0 JPY','13,90 (<200)/0 LVL','99 (<2500)/0 NOK','39 (<1000)/0 PLN','1000 (<20000)/0 RUB','49 (<2500)/0 SEK','29 (<600)/0 USD','19,90 (<600)/0 EUR','0 EUR','0 CHF') NOT NULL default '19,90 (<500)/0 EUR'"
0da287c8	140	=> { data_type => 'enum', extra => { list => ['19,90 (<500)/0 EUR','4,90 (<120)/0 EUR','7,90 (<200)/0 CHF','300 (<6000)/0 CZK','4,90 (<100)/0 EUR','39 (<900)/0 DKK','299 (<5000)/0 EEK','9,90 (<250)/0 EUR','3,90 (<100)/0 GBP','3000 (<70000)/0 HUF','4000 (<70000)/0 JPY','13,90 (<200)/0 LVL','99 (<2500)/0 NOK','39 (<1000)/0 PLN','1000 (<20000)/0 RUB','49 (<2500)/0 SEK','29 (<600)/0 USD','19,90 (<600)/0 EUR','0 EUR','0 CHF'] }, default_value => '19,90 (<500)/0 EUR' },
98857177	141	},
3de915bc	142	extra => {
3de915bc	143	create => [
e00d61ac	144	qq{
6ebd0f33	145	CREATE TABLE `mysql_loader-test1` (
3de915bc	146	id INT AUTO_INCREMENT PRIMARY KEY,
3de915bc	147	value varchar(100)
e00d61ac	148	) $innodb
3de915bc	149	},
3de915bc	150	q{
6ebd0f33	151	CREATE VIEW mysql_loader_test2 AS SELECT * FROM `mysql_loader-test1`
3de915bc	152	},
e00d61ac	153	# RT#68717
	154	qq{
	155	CREATE TABLE `mysql_loader_test3` (
	156	`ISO3_code` char(3) NOT NULL default '',
	157	`lang_pref` enum('de','en','fr','nl','dk','es','se') NOT NULL,
	158	`vat` decimal(4,2) default '16.00',
	159	`price_group` enum('EUR_DEFAULT','GBP_GBR','EUR_AUT_BEL_FRA_IRL_NLD','EUR_DNK_SWE','EUR_AUT','EUR_BEL','EUR_FIN','EUR_FRA','EUR_IRL','EUR_NLD','EUR_DNK','EUR_POL','EUR_PRT','EUR_SWE','CHF_CHE','DKK_DNK','SEK_SWE','NOK_NOR','USD_USA','CZK_CZE','PLN_POL','RUB_RUS','HUF_HUN','SKK_SVK','JPY_JPN','LVL_LVA','ROL_ROU','EEK_EST') NOT NULL default 'EUR_DEFAULT',
	160	`del_group` enum('19,90 (<500)/0 EUR','4,90 (<120)/0 EUR','7,90 (<200)/0 CHF','300 (<6000)/0 CZK','4,90 (<100)/0 EUR','39 (<900)/0 DKK','299 (<5000)/0 EEK','9,90 (<250)/0 EUR','3,90 (<100)/0 GBP','3000 (<70000)/0 HUF','4000 (<70000)/0 JPY','13,90 (<200)/0 LVL','99 (<2500)/0 NOK','39 (<1000)/0 PLN','1000 (<20000)/0 RUB','49 (<2500)/0 SEK','29 (<600)/0 USD','19,90 (<600)/0 EUR','0 EUR','0 CHF') NOT NULL default '19,90 (<500)/0 EUR',
	161	`express_del_group` enum('NO','39 EUR (EXPRESS)','59 EUR (EXPRESS)','79 CHF (EXPRESS)','49 EUR (EXPRESS)','990 CZK (EXPRESS)','19,9 EUR (EXPRESS)','290 DKK (EXPRESS)','990 EEK (EXPRESS)','39 GBP (EXPRESS)','14000 HUF (EXPRESS)','49 LVL (EXPRESS)','590 NOK (EXPRESS)','250 PLN (EXPRESS)','490 SEK (EXPRESS)') NOT NULL default 'NO',
	162	`pmethod` varchar(255) NOT NULL default 'VISA,MASTER',
	163	`delivery_time` varchar(5) default NULL,
	164	`express_delivery_time` varchar(5) default NULL,
	165	`eu` int(1) default '0',
	166	`cod_costs` varchar(12) default NULL,
	167	PRIMARY KEY (`ISO3_code`)
	168	) $innodb
	169	},
3de915bc	170	],
3de915bc	171	pre_drop_ddl => [ 'DROP VIEW mysql_loader_test2', ],
e00d61ac	172	drop => [ 'mysql_loader-test1', 'mysql_loader_test3' ],
e00d61ac	173	count => 3,
3de915bc	174	run => sub {
	175	my ($schema, $monikers, $classes) = @_;
	176
6ebd0f33	177	is $monikers->{'mysql_loader-test1'}, 'MysqlLoaderTest1',
	178	'table with dash correctly monikerized';
	179
e00d61ac	180	my $rsrc = $schema->source('MysqlLoaderTest2');
3de915bc	181
	182	is $rsrc->column_info('value')->{data_type}, 'varchar',
	183	'view introspected successfully';
e00d61ac	184
	185	$rsrc = $schema->source('MysqlLoaderTest3');
	186
	187	is_deeply $rsrc->column_info('del_group')->{extra}{list}, ['19,90 (<500)/0 EUR','4,90 (<120)/0 EUR','7,90 (<200)/0 CHF','300 (<6000)/0 CZK','4,90 (<100)/0 EUR','39 (<900)/0 DKK','299 (<5000)/0 EEK','9,90 (<250)/0 EUR','3,90 (<100)/0 GBP','3000 (<70000)/0 HUF','4000 (<70000)/0 JPY','13,90 (<200)/0 LVL','99 (<2500)/0 NOK','39 (<1000)/0 PLN','1000 (<20000)/0 RUB','49 (<2500)/0 SEK','29 (<600)/0 USD','19,90 (<600)/0 EUR','0 EUR','0 CHF'],
	188	'hairy enum introspected correctly';
3de915bc	189	},
3de915bc	190	},
a78e3fed	191	);
a78e3fed	192
9e978a19	193	if( !$dsn \|\| !$user ) {
9e978a19	194	$tester->skip_tests('You need to set the DBICTEST_MYSQL_DSN, _USER, and _PASS environment variables');
a78e3fed	195	}
a78e3fed	196	else {
26334ec1	197	diag $skip_rels_msg if not $test_innodb;
a78e3fed	198	$tester->run_tests();
a78e3fed	199	}
26334ec1	200
26334ec1	201	# vim:et sts=4 sw=4 tw=0: