mirror of
https://github.com/timescale/timescaledb.git
synced 2025-05-16 18:43:18 +08:00
Use subclassing to inherit from `PostgresNode` and create a hierarchy containing `AccessNode` and `DataNode` to simplify creating tests with multiple nodes. Also, two new functions are added: `TimescaleNode::create`: Creates the new node by calling `get_new_node`, `init` and `start` in that order. `AccessNode::add_data_node`: Adds a new data node to the access node. Also rewrite the test to use the new hierarchy.
22 lines
490 B
Perl
22 lines
490 B
Perl
# This file and its contents are licensed under the Timescale License.
|
|
# Please see the included NOTICE for copyright information and
|
|
# LICENSE-TIMESCALE for a copy of the license.
|
|
|
|
package AccessNode;
|
|
use parent qw(TimescaleNode);
|
|
use strict;
|
|
use warnings;
|
|
|
|
sub add_data_node
|
|
{
|
|
my ($self, $dn) = @_;
|
|
my $name = $dn->name;
|
|
my $host = $dn->host;
|
|
my $port = $dn->port;
|
|
$self->safe_psql('postgres',
|
|
"SELECT add_data_node('$name', host => '$host', port => $port)");
|
|
return $self;
|
|
}
|
|
|
|
1;
|