diff options
Diffstat (limited to 'databases/pgpool-II-30/files/pgpool_remote_start')
-rw-r--r-- | databases/pgpool-II-30/files/pgpool_remote_start | 26 |
1 files changed, 0 insertions, 26 deletions
diff --git a/databases/pgpool-II-30/files/pgpool_remote_start b/databases/pgpool-II-30/files/pgpool_remote_start deleted file mode 100644 index 1c044aef90cb..000000000000 --- a/databases/pgpool-II-30/files/pgpool_remote_start +++ /dev/null @@ -1,26 +0,0 @@ -#!/usr/bin/perl -# -# $FreeBSD$ - -use strict; -use warnings; - -my ($host, $dir) = @ARGV; - -my $logger = "logger -t pgpool -p local0.info"; -my $pgctl = "/usr/local/bin/pg_ctl -D $dir"; -my ($fh, $log); - -if (not open($fh, "ssh pgsql\@$host $pgctl -t 5 -w -s -m fast start 2>&1 |")) { - die "cannot open ssh: $!"; -} -if (not open($log, "| $logger")) { - die "cannot open logger: $!"; -} -while (<$fh>) { - print $log $_; -} -close($fh) or die "close(ssh) failed: $!"; -close($log) or die "close(logger): $!"; - -system("ssh pgsql\@$host $pgctl status 2>&1") == 0 or die "pg_ctl status failed"; |