diff options
Diffstat (limited to 'databases/pgcluster/files/setup-sshkey.pl')
| -rw-r--r-- | databases/pgcluster/files/setup-sshkey.pl | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/databases/pgcluster/files/setup-sshkey.pl b/databases/pgcluster/files/setup-sshkey.pl deleted file mode 100644 index 11c3a034de1b..000000000000 --- a/databases/pgcluster/files/setup-sshkey.pl +++ /dev/null @@ -1,24 +0,0 @@ -#!/usr/bin/perl -w -# -# $FreeBSD$ - -use strict; - -my $base = "$ENV{HOME}/.ssh"; -foreach (@ARGV) { - my $dir = "$base/$_"; - system("mkdir -p $dir") == 0 or die; - if (not -r "$dir/id_dsa.pub") { - system("ssh-keygen -t dsa -N '' -C $ENV{USER}\@$_ -f $dir/id_dsa") == 0 - or die - } - system("ssh-keyscan -t dsa $_ >> $base/known_hosts") == 0 or die; - system("sort $base/known_hosts | uniq > $base/tmp.$$") == 0 or die; - system("mv $base/tmp.$$ $base/known_hosts") == 0 or die; -} -foreach (@ARGV) { - my $dir = "$base/$_"; - system("cat $base/*/id_dsa.pub > $dir/authorized_keys") == 0 or die; - system("cp $base/known_hosts $dir/known_hosts") == 0 or die; -} - |
