X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2FSelfService%2FFreeRadiusVoip.pm;h=25f673f4ad99ee4d3d7815005687b2a95cd40078;hb=ff27c3f36240aee48ed50153dd5d8fe3ac3f2443;hp=0df24f7d704283cd8d6b3eead204cb9af0a9db92;hpb=b5c4237a34aef94976bc343c8d9e138664fc3984;p=freeside.git diff --git a/fs_selfservice/FS-SelfService/SelfService/FreeRadiusVoip.pm b/fs_selfservice/FS-SelfService/SelfService/FreeRadiusVoip.pm index 0df24f7d7..25f673f4a 100644 --- a/fs_selfservice/FS-SelfService/SelfService/FreeRadiusVoip.pm +++ b/fs_selfservice/FS-SelfService/SelfService/FreeRadiusVoip.pm @@ -1,8 +1,13 @@ #Add this to the modules section of radiusd.conf # perl { # #path to this module -# module=/usr/local/share/perl/5.8.8/FS/SelfService/FreeRadiusVoip.pm +# # deb 6 example +# #module=/usr/local/share/perl/5.10.1/FS/SelfService/FreeRadiusVoip.pm +# # deb 7 example +# module=/usr/local/share/perl/5.14.2/FS/SelfService/FreeRadiusVoip.pm +# # func_authorize = authorize; +# # } # #In the Authorize section @@ -11,9 +16,9 @@ # # #N/A# Add a line containing 'perl' to the Accounting section. # -# and on debian systems, add this to /etc/init.d/freeradius, with the +# and on debian 6 systems, add this to /etc/init.d/freeradius, with the # correct path (http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=416266) -# LD_PRELOAD=/usr/lib/libperl.so.5.8.8 +# LD_PRELOAD=/usr/lib/libperl.so.5.10 # export LD_PRELOAD BEGIN { $FS::SelfService::skip_uid_check = 1; } @@ -44,8 +49,13 @@ sub authorize { if ( $response->{'error'} ) { $RAD_REPLY{'Reply-Message'} = $response->{'error'}; return RLM_MODULE_REJECT; - } else { + } elsif ( $response->{'seconds'} ) { $RAD_REPLY{'Session-Timeout'} = $response->{'seconds'}; + $RAD_REPLY{'Termination-Action'} = 0; + return RLM_MODULE_OK; + } else { + # if the called number is free, put 1 in the Termination-Action attribute + $RAD_REPLY{'Termination-Action'} = 1; return RLM_MODULE_OK; }