mirror of
https://github.com/MariaDB/server.git
synced 2025-07-29 05:21:33 +03:00
Merge neptunus.(none):/home/msvensson/mysql/work/my41-work
into neptunus.(none):/home/msvensson/mysql/work/my50-work
This commit is contained in:
@ -310,7 +310,7 @@ my $source_dist= 0;
|
|||||||
sub main ();
|
sub main ();
|
||||||
sub initial_setup ();
|
sub initial_setup ();
|
||||||
sub command_line_setup ();
|
sub command_line_setup ();
|
||||||
sub datadir_setup ();
|
sub datadir_list_setup ();
|
||||||
sub executable_setup ();
|
sub executable_setup ();
|
||||||
sub environment_setup ();
|
sub environment_setup ();
|
||||||
sub kill_running_servers ();
|
sub kill_running_servers ();
|
||||||
@ -1217,7 +1217,7 @@ sub command_line_setup () {
|
|||||||
$path_snapshot= "$opt_tmpdir/snapshot_$opt_master_myport/";
|
$path_snapshot= "$opt_tmpdir/snapshot_$opt_master_myport/";
|
||||||
}
|
}
|
||||||
|
|
||||||
sub datadir_setup () {
|
sub datadir_list_setup () {
|
||||||
|
|
||||||
# Make a list of all data_dirs
|
# Make a list of all data_dirs
|
||||||
@data_dir_lst = (
|
@data_dir_lst = (
|
||||||
@ -1981,10 +1981,6 @@ sub kill_running_servers () {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
sub created_by_mem_filename(){
|
|
||||||
return "$glob_mysql_test_dir/var/created_by_mem";
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
#
|
#
|
||||||
# Remove var and any directories in var/ created by previous
|
# Remove var and any directories in var/ created by previous
|
||||||
@ -2007,14 +2003,16 @@ sub remove_stale_vardir () {
|
|||||||
if ( -l $opt_vardir)
|
if ( -l $opt_vardir)
|
||||||
{
|
{
|
||||||
# var is a symlink
|
# var is a symlink
|
||||||
if (-f created_by_mem_filename() )
|
if ( readlink($opt_vardir) eq $opt_mem )
|
||||||
{
|
{
|
||||||
# Remove the directory which the link points at
|
# Remove the directory which the link points at
|
||||||
mtr_verbose("Removing " . readlink($opt_vardir));
|
mtr_verbose("Removing " . readlink($opt_vardir));
|
||||||
rmtree(readlink($opt_vardir));
|
rmtree(readlink($opt_vardir));
|
||||||
|
|
||||||
# Remove the entire "var" dir
|
# Remove the entire "var" dir
|
||||||
mtr_verbose("Removing $opt_vardir/");
|
mtr_verbose("Removing $opt_vardir/");
|
||||||
rmtree("$opt_vardir/");
|
rmtree("$opt_vardir/");
|
||||||
|
|
||||||
# Remove the "var" symlink
|
# Remove the "var" symlink
|
||||||
mtr_verbose("unlink($opt_vardir)");
|
mtr_verbose("unlink($opt_vardir)");
|
||||||
unlink($opt_vardir);
|
unlink($opt_vardir);
|
||||||
@ -2064,18 +2062,28 @@ sub remove_stale_vardir () {
|
|||||||
sub setup_vardir() {
|
sub setup_vardir() {
|
||||||
mtr_report("Creating Directories");
|
mtr_report("Creating Directories");
|
||||||
|
|
||||||
if ( $opt_mem )
|
if ( $opt_vardir eq $default_vardir )
|
||||||
{
|
{
|
||||||
# Runinng with var as a link to some "memory" location, normally tmpfs
|
#
|
||||||
mtr_verbose("Creating $opt_mem");
|
# Running with "var" in mysql-test dir
|
||||||
mkpath($opt_mem);
|
#
|
||||||
|
if ( -l $opt_vardir )
|
||||||
|
{
|
||||||
|
# it's a symlink
|
||||||
|
|
||||||
mtr_report("Symlinking 'var' to '$opt_mem'");
|
# Make sure the directory where it points exist
|
||||||
symlink($opt_mem, $opt_vardir);
|
mtr_error("The destination for symlink $opt_vardir does not exist")
|
||||||
|
if ! -d readlink($opt_vardir);
|
||||||
|
}
|
||||||
|
elsif ( $opt_mem )
|
||||||
|
{
|
||||||
|
# Runinng with "var" as a link to some "memory" location, normally tmpfs
|
||||||
|
mtr_verbose("Creating $opt_mem");
|
||||||
|
mkpath($opt_mem);
|
||||||
|
|
||||||
# Put a small file to recognize this dir was created by --mem
|
mtr_report("Symlinking 'var' to '$opt_mem'");
|
||||||
mtr_verbose("Creating " . created_by_mem_filename());
|
symlink($opt_mem, $opt_vardir);
|
||||||
mtr_tofile(created_by_mem_filename(), $opt_mem);
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
mkpath("$opt_vardir/log");
|
mkpath("$opt_vardir/log");
|
||||||
@ -2622,7 +2630,7 @@ sub run_suite () {
|
|||||||
|
|
||||||
sub initialize_servers () {
|
sub initialize_servers () {
|
||||||
|
|
||||||
datadir_setup();
|
datadir_list_setup();
|
||||||
|
|
||||||
if ( $opt_extern )
|
if ( $opt_extern )
|
||||||
{
|
{
|
||||||
|
Reference in New Issue
Block a user