jeffallen
/
uucp
forked from tildeverse/uucp
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Finished bootstrapping script

This commit is contained in:
root 2019-03-06 19:13:50 +00:00
parent a9cbc37ecf
commit 89ce28e5d4
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
utils/bootstrap.pl
View File

@ -8,7 +8,7 @@ my $myNode = $ARGV[0];
sub getNodes { sub getNodes {
my $nodelist = "../nodelist"; my $nodelist = "../nodelist";
open(my $data, '<', $nodelist); open(my $data, '<', $nodelist) or die ("Cannot open nodelist");
print("Generating files\n"); print("Generating files\n");
while (my $line = <$data>) { while (my $line = <$data>) {
@ -24,15 +24,15 @@ sub getNodes {
print("System ".$nodeName." added successfully\n"); print("System ".$nodeName." added successfully\n");
} }
print("Done\n"); print("Done\n\n");
} }
sub generatePort { sub generatePort {
my $currentNode = shift; my $nodeName = shift;
my $nodeAddress = shift; my $nodeAddress = shift;
$currentNode =~ s/^([a-z])/\U$1/; my $currentNode = ucfirst($nodeName);
my $template = qq{ my $template = qq{
port $currentNode port $currentNode
@ -51,6 +51,8 @@ sub generatePort {
sub generateSys { sub generateSys {
my $nodeName = shift; my $nodeName = shift;
my $currentNode = ucfirst($nodeName);
my $template = qq{ my $template = qq{
system $nodeName system $nodeName
call-login * call-login *
@ -64,7 +66,7 @@ sub generateSys {
chat \"\" \\d\\d\\r\\c login: \\d\\L word: \\P chat \"\" \\d\\d\\r\\c login: \\d\\L word: \\P
chat-timeout 60 chat-timeout 60
protocol t protocol t
port Center port $currentNode
}; };
my $sysFile = "sys"; my $sysFile = "sys";
@ -102,8 +104,11 @@ sub preCheck()
system("git pull"); system("git pull");
print("Installing authorized_keys\n"); print("Installing authorized_keys\n");
rename("authorized_keys",".ssh/authorized_keys"); rename("authorized_keys",".ssh/authorized_keys");
chdir("./utils");
print("Pre-flight checks done\n"); print("Pre-flight checks done\n");
getNodes(); getNodes();
} }
preCheck(); preCheck();
print("\n\n");
print("This setup script has finished. Please move the generated configuration files as ROOT to /etc/uucp\n");