Changeset 4174 in genesis for tools/g_list.pl

Timestamp:

Mar 27, 2005, 2:11:21 PM (20 years ago)

Author:

rick

Message:

-Add support for ssh-keys
-Global config file

File:

• tools/g_list.pl (modified) (1 diff)

tools/g_list.pl

@@ -1 +1 @@
 #!/usr/bin/perl -w
 #
+# Copyright 2005 Stichting Wireless Leiden
+# Rick van der Zwet
 #
-#
-
-
-#filelist
-my @filelist = ();
-$filelist[0]="dhcpd.conf";
-$filelist[1]="rc.local";
-$filelist[2]="rc.node.local";
-$filelist[3]="resolv.conf";
-$filelist[4]="named.conf";
-$filelist[5]="snmpd.local.conf";
-$filelist[6]="txtconfig";
-
-#(inter)net env
-my $hostname=`hostname`;
-chomp($hostname);
-my $cgi_dir="http://$hostname/cgi-bin";
-my $source="$cgi_dir/g_list.pl";
-
-#path variablen
-my $home="/home/genesis";
-my $ndir="$home/nodes";
-my $toolfile="$home/tools/wleiden.pl";
-
-#exec vars
-my $svn="/usr/local/bin/svn";
-
-#naming vars
-my $configfile="wleiden.conf";
-
-######################## END OF CONFIG ##########################
+
+# Config located at other file
+my $conf_file="/home/genesis/tools/genesis.conf";
+do($conf_file) || die("Cann't open $conf_file");
+
+
+
 my $HTML=1;