<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.18939">
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT size=2>Ok now it seems that the perl script is called (even php
script called inside perl script works)</FONT></DIV>
<DIV><FONT size=2>but $session is empty, despite of
session_in_hangup_hook=true</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>my Perl script is very simple :</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>----------------------------------------</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>#!/usr/local/bin/perl<BR>use strict;<BR>our $session;<BR>my
%VARS;</FONT></DIV>
<DIV> </DIV>
<DIV><FONT size=2> sub fprint($) #Dump
string to the console<BR>
{<BR>
my ($msg) =
@_;<BR>
freeswitch::consoleLog("CRIT",$msg .
"\n");<BR> }</FONT></DIV>
<DIV> </DIV><FONT size=2>
<DIV><BR> sub GETV #takes one or more
variables names to import in<BR>
{<BR>
my @arr =
@_;<BR>
foreach my $var
(@arr)<BR>
{<BR>
$VARS{$var} =
$session->getVariable($var);<BR>
}<BR>
&QWPHP();<BR> }</DIV>
<DIV> </DIV>
<DIV> sub
QWPHP<BR>
{<BR>
my
$shell_result;<BR>
if($VARS{fax_mode} eq
"recv")<BR>
{<BR>
$shell_result = `/usr/local/bin/php
/usr/local/freeswitch/scripts/php/faxCallBack.php $VARS{account_email}
$VARS{effective_caller_id_name} $VARS{caller_id_number} $VARS{fax_file}
$VARS{fax_status}
$VARS{fax_result_text}`;<BR>
}<BR>
elsif($VARS{fax_mode} eq
"send")<BR>
{<BR>
$shell_result = `/usr/local/bin/php
/usr/local/freeswitch/scripts/php/faxCallBack.php $VARS{php_session}
$VARS{fax_status}
$VARS{fax_result_text}`;<BR>
}<BR> }</DIV>
<DIV> </DIV>
<DIV>GETV(qw/fax_mode destination_number effective_caller_id_name
effective_caller_id_number caller_id_number fax_file fax_status
fax_result_text/);</DIV>
<DIV> </DIV>
<DIV>1;<BR></DIV>
<DIV>----------------------</DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV>Stucked.... help</DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV> </DIV></FONT>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px"
dir=ltr>
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=infos@madovsky.org href="mailto:infos@madovsky.org">Madovsky</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=freeswitch-users@lists.freeswitch.org
href="mailto:freeswitch-users@lists.freeswitch.org">freeswitch-users@lists.freeswitch.org</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Tuesday, December 07, 2010 11:04
PM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [Freeswitch-users]
api_hangup_hook question</DIV>
<DIV><BR></DIV>
<DIV><FONT size=2>arrrgh,</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>why I put parenthesis, this is the right syntax
:</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2><action application="set" data="api_hangup_hook=system
/usr/local/freeswitch/scripts/perl/faxStatus.pl"/></FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>thanks</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>Franck</FONT></DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px"
dir=ltr>
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=infos@madovsky.org href="mailto:infos@madovsky.org">Madovsky</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=freeswitch-users@lists.freeswitch.org
href="mailto:freeswitch-users@lists.freeswitch.org">freeswitch-users@lists.freeswitch.org</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Tuesday, December 07, 2010 10:58
PM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [Freeswitch-users]
api_hangup_hook question</DIV>
<DIV><BR></DIV>
<DIV><FONT size=2>Sorry correction for the last code it shows</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>2010-12-07 22:57:25.262675 [DEBUG]
switch_core_state_machine.c:492 Hangup Command with Session
system(/usr/local/freeswitch/scripts/perl/faxStatus.pl)():<BR>INVALID
COMMAND!<BR></FONT></DIV>
<DIV><FONT size=2>for </FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2><action application="set"
data="api_hangup_hook=system(/usr/local/freeswitch/scripts/perl/faxStatus.pl)"/></DIV></FONT>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px"
dir=ltr>
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=infos@madovsky.org href="mailto:infos@madovsky.org">Madovsky</A>
</DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=freeswitch-users@lists.freeswitch.org
href="mailto:freeswitch-users@lists.freeswitch.org">FreeSWITCH Users
Help</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Tuesday, December 07, 2010
10:53 PM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [Freeswitch-users]
api_hangup_hook question</DIV>
<DIV><BR></DIV>
<DIV><FONT size=2>mmmhmm, weird in the logs I can see :</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>/usr/local/freeswitch/scripts/perl/faxStatus.pl():
///////////// what is these parenthesis at the last?</FONT></DIV>
<DIV><FONT size=2>INVALID COMMAND!</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>if I use this xml</FONT></DIV>
<DIV><FONT size=2><action application="set"
data="api_hangup_hook=/usr/local/freeswitch/scripts/perl/faxStatus.pl"/></FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>and</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT
size=2>system(usr/local/freeswitch/scripts/perl/faxStatus.pl()):
<DIV><FONT size=2>INVALID COMMAND!</FONT></DIV></DIV>
<DIV> </DIV>
<DIV>if</DIV>
<DIV> </DIV>
<DIV><action application="set"
data="api_hangup_hook=system(/usr/local/freeswitch/scripts/perl/faxStatus.pl)"/></DIV>
<DIV> </DIV>
<DIV>if you think this log is not enough I will pastebin, but the rest of
logs are ok....</DIV>
<DIV><BR> </DIV>
<DIV><BR></DIV></FONT>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=msc@freeswitch.org href="mailto:msc@freeswitch.org">Michael
Collins</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=freeswitch-users@lists.freeswitch.org
href="mailto:freeswitch-users@lists.freeswitch.org">FreeSWITCH Users
Help</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Tuesday, December 07, 2010
3:51 PM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [Freeswitch-users]
api_hangup_hook question</DIV>
<DIV><BR></DIV>Can you pastebin your logs? There might be a clue as to
what is happening.
<DIV>-MC<BR><BR>
<DIV class=gmail_quote>On Tue, Dec 7, 2010 at 10:27 AM, Madovsky <SPAN
dir=ltr><<A
href="mailto:infos@madovsky.org">infos@madovsky.org</A>></SPAN>
wrote:<BR>
<BLOCKQUOTE
style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex"
class=gmail_quote>
<DIV bgcolor="#ffffff">
<DIV><FONT size=2>I have this in dialplan/default</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>
<extension
name="9999999999"><BR>
<condition field="destination_number"
expression="^(9999999999)$"><BR>
<action application="set"
data="domain_name=$${domain}"/><BR>
<action application="export"
data="dialed_extension=$1"/><BR>
<action application="set"
data="hangup_after_bridge=true"/><BR>
<action application="set"
data="continue_on_fail=NORMAL_TEMPORARY_FAILURE,CALL_REJECTED,USER_NOT_REGISTERED,NO_ANSWER,NO_USER_RESPONSE,USER_BUSY"/><BR>
<action
application="ring_ready"/><BR>
<action application="tone_detect" data="fax 1100 r +5000 transfer
'receivefax XML features' 1"
/><BR>
<action application="export"
data="originate_timeout=15"/><BR>
<action application="bridge" data="<A
href="mailto:%7Babsolute_codec_string='speex@16000k,G729,GSM,G726,PCMU,PCMA',sip_from_uri=$%7Bsip_from_user%7D@$%7Bsip_from_host%7D,origination_caller_id_name=$%7Bcaller_id_name%7D,origination_caller_id_number=$%7Bcaller_id_number%7D%7Duser/$%7Bdialed_extension%7D%22/"
target=_blank>{absolute_codec_string='speex@16000k,G729,GSM,G726,PCMU,PCMA',sip_from_uri=${sip_from_user}@${sip_from_host},origination_caller_id_name=${caller_id_name},origination_caller_id_number=${caller_id_number}}user/${dialed_extension}"/</A>><BR>
<action application="sleep"
data="3000"/><BR>
<action
application="answer"/><BR>
<action application="voicemail" data="default ${domain_name}
${dialed_extension}"/><BR>
</condition><BR>
</extension><BR></FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>and this in dialplan/features</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2> <extension
name="receivefax"><BR> <condition
field="destination_number"
expression="^receivefax$"><BR>
<action application="set"
data="session_in_hangup_hook=true"/><BR>
<action application="set"
data="fax_file=/usr/local/freeswitch/storage/fax/${caller_id_number}-${uuid}.rxfax.tiff"/><BR>
<action application="set"
data="fax_mode=recv"/><BR>
<action application="set" data="api_hangup_hook=perl
/usr/local/freeswitch/scripts/perl/faxStatus.pl"/><BR>
<action application="answer"
/><BR> <action
application="playback"
data="silence_stream://2000"/><BR>
<action application="set"
data="fax_enable_t38_request=true"/><BR>
<action application="set"
data="fax_enable_t38=true"/><BR>
<action application="rxfax"
data="/usr/local/freeswitch/storage/fax/${caller_id_number}-${uuid}.rxfax.tiff"/><BR>
<action application="hangup"/><BR>
</condition><BR>
</extension></FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>the fax is received well, but the perl script is not
executed.</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>Am I missing anything ?</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>Thanks</FONT></DIV>
<DIV><FONT size=2></FONT> </DIV>
<DIV><FONT size=2>Franck</FONT></DIV>
<DIV><BR></DIV></DIV><BR>_______________________________________________<BR>FreeSWITCH-users
mailing list<BR><A
href="mailto:FreeSWITCH-users@lists.freeswitch.org">FreeSWITCH-users@lists.freeswitch.org</A><BR><A
href="http://lists.freeswitch.org/mailman/listinfo/freeswitch-users"
target=_blank>http://lists.freeswitch.org/mailman/listinfo/freeswitch-users</A><BR>UNSUBSCRIBE:<A
href="http://lists.freeswitch.org/mailman/options/freeswitch-users"
target=_blank>http://lists.freeswitch.org/mailman/options/freeswitch-users</A><BR><A
href="http://www.freeswitch.org"
target=_blank>http://www.freeswitch.org</A><BR><BR></BLOCKQUOTE></DIV><BR></DIV>
<P>
<HR>
<P></P>_______________________________________________<BR>FreeSWITCH-users
mailing
list<BR>FreeSWITCH-users@lists.freeswitch.org<BR>http://lists.freeswitch.org/mailman/listinfo/freeswitch-users<BR>UNSUBSCRIBE:http://lists.freeswitch.org/mailman/options/freeswitch-users<BR>http://www.freeswitch.org<BR></BLOCKQUOTE></BLOCKQUOTE></BLOCKQUOTE></BLOCKQUOTE></BODY></HTML>