Commit cd0e561b authored by Kirk Webb's avatar Kirk Webb

Fixes.

parent 154f0155
......@@ -144,7 +144,7 @@ sub getPGWDBID($) {
$dbh = connectDB($OAI_DB_USER, $OAI_DB_PASS, $OAI_DB_NAME)
if !$dbh;
my $sth = $dbh->prepare("SELECT id FROM pgw WHERE ipv4='$pgw_ipaddr");
my $sth = $dbh->prepare("SELECT id FROM pgw WHERE ipv4='$pgw_ipaddr'");
$sth->execute();
my ($pgw_id,) = $sth->fetchrow();
$sth->finish();
......@@ -163,9 +163,9 @@ sub provisionRealUEs($$$) {
if !$dbh;
# Get various DB entity IDs.
my $mme_id = getMMEDBID($mme_fqdn, $realm);
my $pgw_id = getPGWDBID($pgw_ipaddr);
my $pdn_id = get_max_id("pdn") + 1;
my $mme_id = getMMEDBID($mme_fqdn, $realm) || die "Failed to lookup mme_id!";
my $pgw_id = getPGWDBID($pgw_ipaddr) || die "Failed to lookup pgw_id!";
my $pdn_id = get_max_id("pdn") + 1 || die "Failed to get initial PDN id!";
# Extract GENI manifest from the testbed database.
my $mani = loadManifest();
......
......@@ -13,9 +13,14 @@ use FindBin;
$| = 1;
# Import OAI library
use lib "$FindBin::Bin/../lib";
use lib "$FindBin::Bin/lib";
use oailib;
sub help() {
print "Usage: $0 [-d] -m <MME hostname> -r <FreeRADIUS Realm> -p <SPGW IP address>\n";
exit 1;
}
#
# Parse command line arguments.
#
......
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