Re: [hylafax-users] commID and more

[moritz winterberg <winterberg@xxxxxxxxxx>]

thanks for your reply.
I already have a function for requesting JPARMs in my script. The
problem is however, no matter wether I use your code or mine or even
telnet into the server and issue the JPARM COMMID command. The Response
is always just 213 (see session trace..) ?

any further hints ? 

--------- TRACE -------------------------------
T 127.0.0.1:52444 -> 127.0.0.1:4559 [AP]
JOB 100034.
#
T 127.0.0.1:4559 -> 127.0.0.1:52444 [AP]
200 Current job: jobid: 100034 groupid: 100034..
#
T 127.0.0.1:52444 -> 127.0.0.1:4559 [AP]
JPARM COMMID.
#
T 127.0.0.1:4559 -> 127.0.0.1:52444 [AP]
213 .
#
T 127.0.0.1:52444 -> 127.0.0.1:4559 [AP]
QUIT.
#
T 127.0.0.1:4559 -> 127.0.0.1:52444 [AP]
221 Goodbye..




On Wed, 2005-12-07 at 08:41 -0500, Aidan Van Dyk wrote:
> * moritz winterberg <winterberg@xxxxxxxxxx> [051207 07:28]:
> > Hi there,
> > 
> > I'm currently writing a FAX Daemon in Perl. It is getting pdf and
> > faxnumber from a webinterface via socket and uses its own ftp/client
> > module for communication with hylafax.
> > All this works quite fine already and now I'd like to tune it a little
> > by getting more information on faxjob status.
> > Since I am using isdn/capi hardware (eicon diva server) I'd be
> > interested in getting more information on fax trasmit failures. To be
> > more specific, I'd like to know the type of error that occured if there
> > is one such as "line busy" or "number unavailable" and so on. Also I'd
> > like to know how many pages have been sent if the fax partially failed.
> > 
> > Does somebody have a hint how to get those infos ?
> > 
> > I already know there are some of these in the c000* log files
> > under /var/spool/hylafax/log. But in order to parse those I'd need
> > the commID where I only have the JobID and I don't know how to get this
> 
> The last commid is stored in the job:
> 
> 	#!/usr/bin/perl
> 		
> 	use Net::FTP;
> 
> 	my %OPTIONS =
> 	  (
> 		hylafax => localhost,
> 		port => 4559,
> 		debug => 1,
> 	  );
> 
> 	my $ftp = Net::FTP->new($OPTIONS{hylafax}, Debug => ($OPTIONS{debug} > 2), Port => $OPTIONS{port})
> 		  or die "Cannot connect to $OPTIONS{hylafax}: $@";
> 
> 	$ftp->login('aidan') or die "Couldnt' login in: $@";
> 	foreach my $jobid (@ARGV)
> 	{
> 	    $ftp->quot('JOB', $jobid);
> 	    $ftp->quot('JPARM COMMID');
> 	    my $commid = $ftp->message(); chomp $commid;
> 	    $ftp->cwd('/log');
> 	    $ftp->get("c$commid", \*STDOUT);
> 	}
> 	$ftp->quit;
> 
> a.
> 


____________________ 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@xxxxxxxxxxx < /dev/null
  *To learn about commercial HylaFAX(tm) support, mail sales@xxxxxxxxx*