1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
|
#
# test for replication and group sandbox port checking
#
my $TEST_VERSION = $ENV{TEST_VERSION};
my ($bare_version, $version) = get_bare_version ($TEST_VERSION);
my $SANDBOX_HOME= $ENV{SANDBOX_HOME} || "$ENV{HOME}/sandboxes";
my $custom_port = 11000;
my $custom_port1 = $custom_port + 1;
ok_exec({
command => "make_sandbox $TEST_VERSION -- --sandbox_port=$custom_port --no_confirm --master",
expected => 'sandbox server started',
msg => 'server 1 started',
});
ok_exec({
command => "make_sandbox $TEST_VERSION -- --sandbox_port=$custom_port --check_port --no_confirm --master",
expected => 'sandbox server started',
msg => 'server 2 started',
});
ok_sql({
path => "$SANDBOX_HOME/msb_${version}/",
query => "show variables like 'port'",
expected => $custom_port,
msg => 'right port on server 1',
});
ok_sql({
path => "$SANDBOX_HOME/msb_${version}/",
query => "show variables like 'server_id'",
expected => $custom_port,
msg => 'right server_id on server 1',
});
ok_sql({
path => "$SANDBOX_HOME/msb_${version}_a",
query => "show variables like 'port'",
expected => "$custom_port1",
msg => 'right port on server 2',
});
ok_sql({
path => "$SANDBOX_HOME/msb_${version}_a",
query => "show variables like 'server_id'",
expected => "$custom_port1",
msg => 'right server_id on server 2',
});
ok_exec ({
command => "sbtool -o delete -s $SANDBOX_HOME/msb_${version}/",
expected => 'has been removed',
msg => 'server 1 stopped and removed',
});
ok_exec({
command => "sbtool -o delete -s $SANDBOX_HOME/msb_${version}_a",
expected => "has been removed",
msg => "server 2 stopped and removed",
});
|
