Hi,
I check all the clients attributes and start sending the Digest attributes.. now the problem is I can't get those attributes in my perl code by accessing using RAD_REQUEST or RAD_CHECK, so that I can calculate my ha1, ha2 for md5 encryption.
looking at your log...
User-Name = "john@192.168.1.227" Digest-Attributes = "\n\006john" Digest-Attributes = "\001\017192.168.1.227" Digest-Attributes = "\002*48281f56caacb6aa62fc3bb31ec98146efeaae15" Digest-Attributes = "\004\023sip:192.168.1.227" Digest-Attributes = "\003\nREGISTER" Digest-Response = "9ae01536efc46358e61f2fe362552af4"
attributes are there..... thats fine.
perl_pool: item 0x8d08568 asigned new request. Handled so far: 1 found interpetator at address 0x8d08568 rlm_perl: ############################################################### rlm_perl: RAD_REQUEST: Digest-Response = 9ae01536efc46358e61f2fe362552af4 rlm_perl: RAD_REQUEST: Service-Type = SIP rlm_perl: RAD_REQUEST: Cisco-AVPair = call-id= 8717e9ec07014e138298c43a5dcdd370@192.168.1.193 rlm_perl: RAD_REQUEST: User-Name = john@192.168.1.227 rlm_perl: RAD_REQUEST: Sip-URI-User = john rlm_perl: RAD_REQUEST: NAS-IP-Address = 127.0.0.1 rlm_perl: RAD_REQUEST: NAS-Port = 5060 rlm_perl: RAD_REQUEST: Digest-Attributes = ARRAY(0x8df353c) ^^^^^^^^^^^^
attributes are here - there are muliple values for Digest-Attributes, so you need to handle that as an array (which its clearly telling you)
rlm_perl: Added pair Digest-Attributes = \n\006john rlm_perl: Added pair Digest-Attributes = \001\017192.168.1.227 rlm_perl: Added pair Digest-Attributes = \002*48281f56caacb6aa62fc3bb31ec98146efeaae15 rlm_perl: Added pair Digest-Attributes = \004\023sip:192.168.1.227 rlm_perl: Added pair Digest-Attributes = \003\nREGISTER
look. it knows about them alan