summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
c76f8d2)
Note that under systemd there is the concept of a PrivateTmp. When turned on
we have problems writing out the MAPSMessage file. I turned off PrivateTmp
in the apache2 systemd unit file /lib/systemd/system/apache2.service
my $userid = GetContext;
# Dump message into a file
my $userid = GetContext;
# Dump message into a file
- open my $message, '>', "/tmp/MAPSMessage.$$"
- or error("Unable to open message file (/tmp/MAPSMessage.$$): $!\n"), return -1;
+ my $msgfile = "/tmp/MAPSMessage.$$";
+
+ open my $message, '>', $msgfile
+ or error("Unable to open message file ($msgfile): $!\n"), return -1;
print $message $data;
close $message;
# Now call MAPSDeliver
print $message $data;
close $message;
# Now call MAPSDeliver
- my ($status, @output) = Execute "$FindBin::Bin/MAPSDeliver $userid /tmp/MAPSMessage.$$";
- #my $status = system "$FindBin::Bin/MAPSDeliver $userid /tmp/MAPSMessage.$$";
+ my ($status, @output) = Execute "$FindBin::Bin/MAPSDeliver $userid $msgfile";
- my $msg = "Unable to deliver message (message left at /tmp/MAPSMessage.%%\n\n";
+ my $msg = "Unable to deliver message (message left at $msgfile\n\n";
$msg .= join "\n", @output;
Logmsg(
$msg .= join "\n", @output;
Logmsg(
- unlink "/tmp/MAPSMessage.$$";
if ($status == 0) {
Logmsg(
if ($status == 0) {
Logmsg(