forked from tildeverse/uucp
Updated Bootstrapping script
This commit is contained in:
parent
ed33496ea9
commit
a9cbc37ecf
|
@ -3,7 +3,7 @@
|
|||
use warnings;
|
||||
use strict;
|
||||
|
||||
my $nodename = $ARGV[0];
|
||||
my $myNode = $ARGV[0];
|
||||
|
||||
sub getNodes {
|
||||
my $nodelist = "../nodelist";
|
||||
|
@ -19,10 +19,12 @@ sub getNodes {
|
|||
my $nodeAddress = $fields[1];
|
||||
generatePort($nodeName,$nodeAddress);
|
||||
generateSys($nodeName);
|
||||
getKeys($nodeAddress);
|
||||
generateConfig();
|
||||
print("System ".$nodeName." added successfully\n");
|
||||
}
|
||||
|
||||
print("UUCP bootstrapping complete. Please copy sys and port configuration files to /etc/uucp\n");
|
||||
print("Done\n");
|
||||
}
|
||||
|
||||
sub generatePort {
|
||||
|
@ -76,7 +78,32 @@ sub generatePasswd {
|
|||
}
|
||||
|
||||
sub generateConfig {
|
||||
my $nodeName = shift;
|
||||
|
||||
my $confFile = "config";
|
||||
open(FH, '>',$confFile);
|
||||
|
||||
my $nodeConfig = "nodename\t\t".$myNode;
|
||||
|
||||
print FH $nodeConfig;
|
||||
}
|
||||
|
||||
getNodes()
|
||||
sub getKeys {
|
||||
my $address = shift;
|
||||
|
||||
my $cmd = "/usr/bin/ssh-keyscan ".$address;
|
||||
system($cmd);
|
||||
}
|
||||
|
||||
sub preCheck()
|
||||
{
|
||||
print("Updating git repo\n");
|
||||
chdir("../");
|
||||
system("git pull");
|
||||
print("Installing authorized_keys\n");
|
||||
rename("authorized_keys",".ssh/authorized_keys");
|
||||
print("Pre-flight checks done\n");
|
||||
getNodes();
|
||||
}
|
||||
|
||||
preCheck();
|
||||
|
|
Loading…
Reference in New Issue