database/mariadb
1
0
Fork 0
mirror of https://github.com/MariaDB/server.git synced 2025-08-01 03:47:19 +03:00
Code Activity

copy from test-extra-5.1 to main tree

Browse Source 
BitKeeper/etc/ignore:
  Added mysql-test/suite/funcs_1/r/innodb_views.warnings mysql-test/suite/funcs_1/r/memory_trig_03e.warnings mysql-test/suite/funcs_1/r/memory_views.warnings mysql-test/suite/funcs_1/r/myisam_trig_03e.warnings mysql-test/suite/funcs_1/r/myisam_views.warnings mysql-test/suite/funcs_1/r/ndb_trig_03e.warnings mysql-test/suite/funcs_1/r/ndb_views.warnings mysql-test/suite/partitions/r/diff mysql-test/suite/partitions/r/partition_bit_ndb.warnings mysql-test/suite/partitions/r/partition_special_innodb.warnings mysql-test/suite/partitions/r/partition_special_myisam.warnings storage/archive/archive_reader mysql-test/suite/funcs_1/r/innodb_trig_03e.warnings to the ignore list
mysql-test/suite/funcs_2/include/check_charset.inc:
  inserted newline at the end of file.
mysql-test/suite/objects/include/drop_all.inc:
  inserted newline at the end of file.
mysql-test/suite/partitions/include/partition_key_32col.inc:
  inserted newline at the end of file.
mysql-test/suite/rpl/data/rpl_mixed.dat:
  inserted newline at the end of file.
mysql-test/suite/rpl/include/rpl_mixed_check_event.inc:
  inserted newline at the end of file.
mysql-test/suite/rpl/include/rpl_mixed_check_select.inc:
  inserted newline at the end of file.
mysql-test/suite/rpl/include/rpl_mixed_check_user.inc:
  inserted newline at the end of file.
mysql-test/suite/rpl/include/rpl_mixed_check_view.inc:
  inserted newline at the end of file.
This commit is contained in:
unknown
2007-02-06 13:35:54 +01:00
parent 13390debf6
commit ee5eb8bbe1
510 changed files with 2007041 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

60
mysql-test/suite/funcs_2/lib/gen_charset_utf8.pl Executable file
View File

@ -0,0 +1,60 @@
#!/usr/bin/perl
#################################################################################
# Author: Serge Kozlov #
# Date: 09/21/2005 #
# Purpose: The script produces a text file ../data/charset_utf8.txt #
# in UTF8 format. Each line contains one UTF8 character #
# between 20 and 07FF #
#################################################################################
genfile("../data/charset_utf8.txt", 33, 2047, "utf8");
genfile(">../data/charset_utf8.txt", 19968, 20479,"utf8");
#genfile("../data/charset_utf8.txt", 33, 2047, "utf8");
sub genfile ($$$$)
{
my $fn = shift;
my $i_from = shift;
my $i_to = shift;
my $typ = shift;
open F, ">$fn";
for ($i = $i_from; $i <= $i_to; $i++)
{
if (($i > 32) && ($i < 65533) && ($i != 65279))
{
if ($typ eq "utf8")
{
if ($i < 128)
{
print F pack("C", $i), "\n";
}
elsif (($i > 127) && ($i < 2048))
{
$b1 = (($i & 1984) >> 6) + 192;
$b2 = ($i & 63) + 128;
print F pack("C", $b1);
print F pack("C", $b2), "\n";
}
else
{
$b1 = (($i & 61440) >> 12) + 224;
$b2 = (($i & 4032) >> 6) + 128;
$b3 = ($i & 63) + 128;
print F pack("C", $b1);
print F pack("C", $b2);
print F pack("C", $b3), "\n";
}
}
elsif ($typ eq "ucs2")
{
print F pack("C", 0);
print F pack("C", $i);
print F pack("C", 0), "\n";
}
}
}
close F;
}