From b0751164c5a5df98dfc4b81904f8c8ea3569490e Mon Sep 17 00:00:00 2001
From: bjordanov <bjordanov>
Date: Mon, 29 Aug 2005 12:42:17 +0000
Subject: [PATCH] Patch from bug #267 Enhancements for rlm_perl

---
 raddb/experimental.conf | 56 ++++++++++++++++++++++++++++++++++++-------------
 1 file changed, 42 insertions(+), 14 deletions(-)

diff --git a/raddb/experimental.conf b/raddb/experimental.conf
index 2aa79c0..2ab36c1 100644
--- a/raddb/experimental.conf
+++ b/raddb/experimental.conf
@@ -193,19 +193,16 @@
 		#  'rlm_exec' module, but it is persistent, and therefore
 		#  faster.
 		#
-                module = /path/to/your/perl_program
+		module = /path/to/your/perl_module.pm
 
 		#
 		#  The following hashes are given to the module and
                 #  filled with value-pairs (Attribute names and values)
 		#
-		#  %RAD_REPLY		Attributes to go into the reply
-		#  %RAD_REQUEST		Attributes from the request
-		#  %RAD_CHECK		Check items
-		#
-		#  Only the %RAD_REPLY hash can be modified.
-		#  All of the other hashes are read only.
-		#
+		#  %RAD_CHECK		Read-only	Check items
+		#  %RAD_REQUEST		Read-only	Attributes from the request
+		#  %RAD_REPLY		Read-write	Attributes for the reply
+		# 
 		#  The return codes from functions in the perl_script
 		#  are passed directly back to the server.  These
 		#  codes are defined in doc/configurable_failover,
@@ -213,12 +210,43 @@
 		#  and are pre-defined in the 'example.pl' program
 		#  which is included.
 		#		
-                func_accounting = accounting
-                func_authenticate = authenticate
-		func_authorize = authorize
-                func_preacct = preacct
-                func_checksimul = checksimul
-                func_xlat = xlat
+
+		#
+		#  List of functions in the module to call.
+		#  Comment out and change if you want to use other
+		#  function names than the defaults.
+		#
+		#func_authenticate = authenticate
+		#func_authorize = authorize
+		#func_preacct = preacct
+		#func_accounting = accounting
+		#func_checksimul = checksimul
+		#func_pre_proxy = pre_proxy
+		#func_post_proxy = post_proxy
+		#func_post_auth = post_auth
+		#func_xlat = xlat
+		#func_detach = detach
+
+		#
+		#  Comment out the following line if you whish
+		#  to use seperate functions for Start and Stop
+		#  accounting packets. In that case, the 
+		#  func_accounting function is not called.
+		#
+		#func_start_accounting = accounting_start
+		#func_stop_accounting = accounting_stop
+		
+		#  Comment out the following lines if your perl is 
+		#  compiled with ithreads support.
+		#  the settings bellow are the default one.
+		#
+		#max_clones = 32
+		#start_clones = 32
+		#min_spare_clones = 0
+		#max_spare_clones = 32
+		#cleanup_delay = 5
+		#max_request_per_clone = 0
+
 	}
 
 	#
-- 
2.1.4