Commit 4ec0c43d authored by Christopher Alfeld's avatar Christopher Alfeld

Configurized a bunch of scripts in DB. For some reason these never got

updated.  This was breaking the testing stuff as some scripts were still
using the One True DB.
parent 54202a49
......@@ -1020,7 +1020,7 @@ outfiles="$outfiles Makeconf GNUmakefile \
capture/GNUmakefile \
db/GNUmakefile db/nalloc db/nfree db/if2port db/backup \
db/webcontrol db/node_status db/genelists discvr/GNUmakefile \
db/libdb.pm \
db/libdb.pm db/inuse db/avail db/mac2if db/nodeip db/showgraph \
ipod/GNUmakefile \
lib/GNUmakefile \
os/GNUmakefile os/split-image.sh os/imagezip/GNUmakefile \
......
......@@ -142,7 +142,7 @@ outfiles="$outfiles Makeconf GNUmakefile \
capture/GNUmakefile \
db/GNUmakefile db/nalloc db/nfree db/if2port db/backup \
db/webcontrol db/node_status db/genelists discvr/GNUmakefile \
db/libdb.pm \
db/libdb.pm db/inuse db/avail db/mac2if db/nodeip db/showgraph \
ipod/GNUmakefile \
lib/GNUmakefile \
os/GNUmakefile os/split-image.sh os/imagezip/GNUmakefile \
......
......@@ -18,7 +18,7 @@ if ($#ARGV >= 0 && $ARGV[0] =~ /^-?h/i ) {
);
}
my $dbh = Mysql->connect("localhost","tbdb","script","none");
my $dbh = Mysql->connect("localhost","@TBDBNAME@","script","none");
print "Got ARGS = ",join(" ",@ARGV),"\n" if $d;
......
#!/usr/local/bin/perl -w
use Mysql;
my $dbh = Mysql->connect("localhost","tbdb","script","none");
my $dbh = Mysql->connect("localhost","@TBDBNAME@","script","none");
my $sth = $dbh->
query("select r.* from reserved as r left join nodes as n on r.node_id=n.node_id order by n.type,n.node_id");
......
......@@ -4,7 +4,7 @@ if ($#ARGV < 0) {die("Usage: mac2if <mac|if> <mac|if> <...>\n");}
use Mysql;
my $dbh = Mysql->connect("localhost","tbdb","script","none");
my $dbh = Mysql->connect("localhost","@TBDBNAME@","script","none");
my @list = "";
my $n=0;
......
......@@ -4,7 +4,7 @@ if ($#ARGV < 0) {die("Usage: nodeip <node_id|if|IP> <node_id|if|IP> <...>\n");}
use Mysql;
my $dbh = Mysql->connect("localhost","tbdb","script","none");
my $dbh = Mysql->connect("localhost","@TBDBNAME@","script","none");
my @list = "";
my $n=0;
......
......@@ -30,7 +30,7 @@ my $display = shift;
my $v = 0; # Verbose
my $dbh = Mysql->connect("localhost","tbdb","script","none");
my $dbh = Mysql->connect("localhost","@TBDBNAME@","script","none");
my @tbls = $dbh->listtables;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment