HylaFAX The world's most advanced open source fax server
[Date Prev][Date Next][Thread Prev][Thread Next] [Date Index] [Thread Index]

[hylafax-users] Web-hylafax-gw question

Is there a way to tell sendfax to run as a different user?
I'm using web-hylafax-gw. All faxes from the coming in to hylafax are from
user "apache". I would   like to add to the html a field asking for the
users account name, which would run sendfax as that user, then the
confirmation emails would go to each user's account.

Below is the cgi script if anyone cares to see.
Thanks
-ANdrew







#! /usr/bin/perl

# #################################################################
#
# Web HylaFAX gateway 1.0		           December 1998
# Nic Tjirkalli (nic@uunet.co.za, http://duffus.iafrica.com/~nic)
#
# #################################################################


require("cgilib.pl");
require("fax-gw-config.pl");

# Set perl not to buffer ouptput
        $| = 1;


# Static variables
	$fileo = "/tmp/.fax.$$";
	$filestat = "/tmp/.fax.stat.$$";

# Initialise  variables 

# Extract variables
$Name = "";
$Company = "";
$FaxNumber = "";
$Document = "";
$File = "";
$From = "";
$regarding = "";

$error = "";


&ReadParse(*input);

$Name = $input{'Name'}; 
$Company = $input{'Company'}; 
$FaxNumber = $input{'FaxNumber'}; 
$Document = $input{'Document'}; 
$File = $input{'File'}; 
$From = $input{'From'}; 
$Regarding = $input{'Regarding'}; 

# No fax number - ERROR
if ($FaxNumber) {
$error = "";
}
else
{
$error = "NO FAX NUMBER ENTERED - REDO";
}


# Error Exit
if ($error) {
&pagetop;
&errmess;
⊥
exit();
}

$command = $prog." -P high -m -D -f \"$From\" -r \"$Regarding\" -x
\"$Company\"  -d \"$Name\"\@$FaxNumber $fileo"; 

# A file has been specified - make it the same as Document
if ($File)
{
	$Document = $File;
}

open(OUTPUT, ">$fileo");
print OUTPUT $Document;
close(OUTPUT);

# Produce output
&pagetop;
&output;
system("$command 1>$filestat 2>$filestat");

open(RESULT, "$cat $filestat |");
while($line=<RESULT>) {
print $line
}
close(RESULT);
print "<CENTER>";

system("$rm $fileo $filestat 1>/dev/null 2>/dev/null");



&bottom;


###########################################
sub pagetop {
{ print <<EOF
Content-Type: text/html


<HTML>
<HEAD>$title</HEAD>
<BODY BGCOLOR=#ffffff LINK=#0000ff VLINK=#ff0000 ALINK=#FF0000 TEXT=#000000>

<HR SIZE="2" NOSHADE>
<CENTER>
<TABLE BORDER="0" WIDTH="100%">
<TR>
<TD BGCOLOR="FF0000" ALIGN="CENTER">
<H1><FONT COLOR="FFFF00">&nbsp; <BR> Web HylaFAX gateway 1.0</FONT></H1>
</TD>
</TR>
</TABLE>
</CENTER>


<HR SIZE="2" NOSHADE>

EOF
}
}

############################################
sub output	{
{ print <<DEFANGED_EOF
<H1>FAX Transmission Details</H1>
<BR><P>
<HR SIZE="2" NOSHADE>
<BR><P>
<PRE>
Sending To 		:- $Name
To Fax Number 		:- $FaxNumber
Company 		:- $Company
From 			:- $From
Running Command 	:- $command
</PRE>

<BR><P>
<DD><B><i>sendfax</B></I> command output :-
<BR> 
EOF
}
}


############################################
sub errmess      {
{ print <<DEFANGED_EOF
<H1>FAX Details Entry Error</H1>
<BR><P>
<HR SIZE="2" NOSHADE>
<BR><P>
<CENTER>
$error
EOF
}
}








____________________ HylaFAX(tm) Users Mailing List _______________________
  To subscribe/unsubscribe, click http://lists.hylafax.org/cgi-bin/lsg2.cgi
 On UNIX: mail -s unsubscribe hylafax-users-request@hylafax.org < /dev/null
  *To learn about commercial HylaFAX(tm) support, mail sales@hylafax.org.*

Project hosted by iFAX Solutions