Commit d9dae9e2 authored by Leigh B Stoller's avatar Leigh B Stoller

Minor debugging.

parent 328b61d8
...@@ -475,7 +475,9 @@ my $slice_hrn = "${PGENIDOMAIN}.${slice_id}"; ...@@ -475,7 +475,9 @@ my $slice_hrn = "${PGENIDOMAIN}.${slice_id}";
print STDERR "\n"; print STDERR "\n";
print STDERR "$user_urn\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"; print STDERR "$rspecstr\n";
# #
......
...@@ -159,6 +159,9 @@ class Instance ...@@ -159,6 +159,9 @@ class Instance
if (isset($_SERVER['REMOTE_ADDR'])) { if (isset($_SERVER['REMOTE_ADDR'])) {
putenv("REMOTE_ADDR=" . $_SERVER['REMOTE_ADDR']); putenv("REMOTE_ADDR=" . $_SERVER['REMOTE_ADDR']);
} }
if (isset($_SERVER['SERVER_NAME'])) {
putenv("SERVER_NAME=" . $_SERVER['SERVER_NAME']);
}
$retval = SUEXEC($uid, $pid, $retval = SUEXEC($uid, $pid,
"webquickvm $options -u $uuid $xmlname", "webquickvm $options -u $uuid $xmlname",
SUEXEC_ACTION_CONTINUE); SUEXEC_ACTION_CONTINUE);
......
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