Thank you Baically what I have done is this. I wanting to use freeradius to be the radius server for a few of my hotspots. They use two different NAS devices.Now the problem I faced is that both NASes use different VSA's for limiting users bandwidth. So my perl script will check the NAS-Identifier and cross reference it with a table in the DB and collect the appropriate NAS device. Then I have a attribute in the radcheck table called databank, I take the value of that attribute and put it together with the attribute that my NAS will understand. This all seems to be ok, the only thing I need to do now is, when the accounting-stop packet arrives, I need to be able to take sum(acctinputoctets+acctoutputoctets) and subtract that from the total of Databank. This way no matter if a user is coming from hostpot with device A to hotspot with device B the amount of data that he can move will be constant. I can right the script, but I am not sure where to do it. How can you right a script to act on accounting-stop packet? Thanks On Mon, Aug 9, 2010 at 9:44 AM, Alan Buxey <A.L.M.Buxey@lboro.ac.uk> wrote:
Hi,
I see know that it was my fault (obviously it was going to be). I am using sql, and not the users file as the guide ( http://wiki.freeradius.org/Rlm_perl) suggests. I added Auth-Type attribute into the table and I know cannot login with the user baduser. So radcheck used to look like this
+------+----------+-----------+----+---------+ | id | username | attribute | op | value | +------+----------+-----------+----+---------+ 8813 | baduser | password | == | baduser +------+----------+-----------+----+---------+
it now looks like this.
+------+----------+-----------+----+---------+ | id | username | attribute | op | value | +------+----------+-----------+----+---------+ | 8813 | baduser | password | == | baduser | | 8814 | baduser | Auth-Type | = | Perl | +------+----------+-----------+----+---------+
using a recent version of FR? if so, change that first line to be
| 8813 | baduser | cleartext-password | := | baduser |
(as per the docs!)
your initial question.....'what is /^baduser/i ?' - its a quick function that checks the User-Name attribute and see if it matches (and begins with) the word 'baduser' (and is case insensitive). its a quick demo to show that things that you can do.... if you were to do this in production, you'd probably have an array of 'bad users' and do a loop function in which you check User-Name against all members of that array (and return a found or not found code back to the routine that fired off the check....eg
if (baduser() ){ }
etc.
alan - List info/subscribe/unsubscribe? See http://www.freeradius.org/list/users.html