forked from tildeverse/uucp
Updated Bootstrapping script
This commit is contained in:
parent
ed33496ea9
commit
a9cbc37ecf
|
@ -3,7 +3,7 @@
|
||||||
use warnings;
|
use warnings;
|
||||||
use strict;
|
use strict;
|
||||||
|
|
||||||
my $nodename = $ARGV[0];
|
my $myNode = $ARGV[0];
|
||||||
|
|
||||||
sub getNodes {
|
sub getNodes {
|
||||||
my $nodelist = "../nodelist";
|
my $nodelist = "../nodelist";
|
||||||
|
@ -19,10 +19,12 @@ sub getNodes {
|
||||||
my $nodeAddress = $fields[1];
|
my $nodeAddress = $fields[1];
|
||||||
generatePort($nodeName,$nodeAddress);
|
generatePort($nodeName,$nodeAddress);
|
||||||
generateSys($nodeName);
|
generateSys($nodeName);
|
||||||
|
getKeys($nodeAddress);
|
||||||
|
generateConfig();
|
||||||
print("System ".$nodeName." added successfully\n");
|
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 {
|
sub generatePort {
|
||||||
|
@ -76,7 +78,32 @@ sub generatePasswd {
|
||||||
}
|
}
|
||||||
|
|
||||||
sub generateConfig {
|
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