From d9dae9e245b9ffd656d320861ec5a7fe7e215f2c Mon Sep 17 00:00:00 2001
From: Leigh B Stoller <stoller@flux.utah.edu>
Date: Tue, 2 Sep 2014 14:55:17 -0600
Subject: [PATCH] Minor debugging.
---
protogeni/scripts/quickvm.in | 4 +++-
www/aptui/instance_defs.php | 3 +++
2 files changed, 6 insertions(+), 1 deletion(-)
diff --git a/protogeni/scripts/quickvm.in b/protogeni/scripts/quickvm.in
index 6dd0b7a304..e1bd2458f1 100755
--- a/protogeni/scripts/quickvm.in
+++ b/protogeni/scripts/quickvm.in
@@ -475,7 +475,9 @@ my $slice_hrn = "${PGENIDOMAIN}.${slice_id}";
print STDERR "\n";
print STDERR "$user_urn\n";
-print STDERR "$slice_urn\n\n\n";
+print STDERR "$slice_urn\n";
+print STDERR $ENV{"SERVER_NAME"} . "\n" if (exists($ENV{"SERVER_NAME"}));
+print STDERR "\n";
print STDERR "$rspecstr\n";
#
diff --git a/www/aptui/instance_defs.php b/www/aptui/instance_defs.php
index 3e7885c211..09f4a760ea 100644
--- a/www/aptui/instance_defs.php
+++ b/www/aptui/instance_defs.php
@@ -159,6 +159,9 @@ class Instance
if (isset($_SERVER['REMOTE_ADDR'])) {
putenv("REMOTE_ADDR=" . $_SERVER['REMOTE_ADDR']);
}
+ if (isset($_SERVER['SERVER_NAME'])) {
+ putenv("SERVER_NAME=" . $_SERVER['SERVER_NAME']);
+ }
$retval = SUEXEC($uid, $pid,
"webquickvm $options -u $uuid $xmlname",
SUEXEC_ACTION_CONTINUE);
--
GitLab