mirror of
https://github.com/MariaDB/server.git
synced 2025-01-31 19:11:46 +01:00
704b4845aa
There were so many changes into mtr (this is the new mtr coming) that I rather copied mtr from 6.0-main here (at least this one knows how to run Maria tests). I also fixed suite/maria tests to be accepted by the new mtr. mysys/thr_mutex.c: adding DBUG_PRINT here, so that we can locate where the warning is issued.
65 lines
2.3 KiB
Text
65 lines
2.3 KiB
Text
# Test of the --maria-recover option.
|
|
|
|
--source include/have_maria.inc
|
|
|
|
call mtr.add_suppression("Checking table: '.\/mysqltest\/t_corrupted2'");
|
|
call mtr.add_suppression("Recovering table: '.\/mysqltest\/t_corrupted2'");
|
|
call mtr.add_suppression("Table '.\/mysqltest\/t_corrupted2' is marked as crashed and should be repaired");
|
|
|
|
# Note: we're setting an environment variable (not prefixing it by $),
|
|
# so that the perl code below can access it.
|
|
let MYSQLD_DATADIR= `select @@datadir`;
|
|
|
|
select @@global.maria_recover;
|
|
set global maria_recover=off;
|
|
select @@global.maria_recover;
|
|
set global maria_recover=default;
|
|
select @@global.maria_recover;
|
|
set global maria_recover=normal;
|
|
select @@global.maria_recover;
|
|
|
|
--disable_warnings
|
|
drop database if exists mysqltest;
|
|
--enable_warnings
|
|
create database mysqltest;
|
|
|
|
use mysqltest;
|
|
|
|
create table t1 (a varchar(1000), index(a)) engine=maria;
|
|
insert into t1 values("ThursdayMorningsMarket");
|
|
|
|
flush table t1; # put index page on disk
|
|
insert into t1 select concat(a,'b') from t1 limit 1;
|
|
# now t1 has its open_count>0 and so will t2_corrupted.
|
|
# It is not named t2 because the corruption messages which will be put
|
|
# in the error log need to be detected in mtr_process.pl, and we want
|
|
# a specific name to do specific detection (don't want to ignore
|
|
# any corruption messages of other tests using "t2" as table).
|
|
|
|
copy_file $MYSQLD_DATADIR/mysqltest/t1.frm $MYSQLD_DATADIR/mysqltest/t_corrupted2.frm;
|
|
copy_file $MYSQLD_DATADIR/mysqltest/t1.MAD $MYSQLD_DATADIR/mysqltest/t_corrupted2.MAD;
|
|
copy_file $MYSQLD_DATADIR/mysqltest/t1.MAI $MYSQLD_DATADIR/mysqltest/t_corrupted2.MAI;
|
|
|
|
# Ruin the index file.
|
|
# If maria-block-size is smaller than the default, the corruption
|
|
# messages will differ.
|
|
perl;
|
|
use strict;
|
|
use warnings;
|
|
my $fname= "$ENV{'MYSQLD_DATADIR'}/mysqltest/t_corrupted2.MAI";
|
|
open(FILE, "+<", $fname) or die;
|
|
my $whatever= ("\xAB" x 100);
|
|
sysseek (FILE, 8192, 0) or die;
|
|
syswrite (FILE, $whatever) or die;
|
|
close FILE;
|
|
EOF
|
|
|
|
# line below will be removed
|
|
disable_ps_protocol;
|
|
replace_regex /Table.*t_corrupted2/t_corrupted2/ ;
|
|
select * from t_corrupted2; # should show corruption and repair messages
|
|
enable_ps_protocol;
|
|
select * from t_corrupted2; # should show just rows
|
|
|
|
drop database mysqltest;
|
|
set global maria_recover=backup;
|