~drizzle-trunk/drizzle/development

#

# Some regexp tests

#

--disable_warnings

drop table if exists t1;

--enable_warnings

set names latin1;

--source include/ctype_regex.inc

#

# This test a bug in regexp on Alpha

#

create table t1 (xxx char(128));

insert into t1 (xxx) values('this is a test of some long text to see what happens');

select * from t1 where xxx regexp('is a test of some long text to');

explain extended select * from t1 where xxx regexp('is a test of some long text to');

select * from t1 where xxx regexp('is a test of some long text to ');

select * from t1 where xxx regexp('is a test of some long text to s');

select * from t1 where xxx regexp('is a test of some long text to se');

drop table t1;

create table t1 (xxx char(128));

insert into t1 (xxx) values('this is some text: to test - out.reg exp (22/45)');

select * from t1 where xxx REGEXP '^this is some text: to test - out\\.reg exp [[(][0-9]+[/\\][0-9]+[])][ ]*$';

drop table t1;

#

# Check with different character sets and collations

#

select _latin1 0xFF regexp _latin1 '[[:lower:]]' COLLATE latin1_bin;

select _koi8r  0xFF regexp _koi8r  '[[:lower:]]' COLLATE koi8r_bin;

select _latin1 0xFF regexp _latin1 '[[:upper:]]' COLLATE latin1_bin;

select _koi8r  0xFF regexp _koi8r  '[[:upper:]]' COLLATE koi8r_bin;

select _latin1 0xF7 regexp _latin1 '[[:alpha:]]';

select _koi8r  0xF7 regexp _koi8r  '[[:alpha:]]';

select _latin1'a' regexp _latin1'A' collate latin1_general_ci;

select _latin1'a' regexp _latin1'A' collate latin1_bin;

--echo End of 4.1 tests

#

# Bug #31440: 'select 1 regex null' asserts debug server

#

SELECT 1 REGEXP NULL;

--echo End of 5.0 tests