Re: Freeradius COA trigger

13 Dec 2010


      On 2010/12/13 05:23 AM, Andrew Paternoster wrote:
...
Hi Johan
Do you mind sharing a copy of your COA triggers?
In Perl (rlm_perl) - Where I make my decision to disconnect.
-------------------
if ($balance <= 0)
{ $RAD_REPLY{'Tmp-String-0'} = 'DISCONNECT'; };


In my virtual server
--------------------
accounting {
   perl
   if ("%{reply:Tmp-String-0}" == "DISCONNECT") {
     update disconnect {
       User-Name = "%{User-Name}"
     }
   }
}


-- 


Johan Meiring
Cape PC Services CC
Tel: (021) 883-8271
Fax: (021) 886-7782