Forum Discussion
Mike_Finney_119
Sep 06, 2013Nimbostratus
Getting ready to test this in a few minutes, hopefully it will be the solution we need. :)
when ACCESS_POLICY_AGENT_EVENT { expr srand([clock clicks]) set otp [string range [format "%08d" [expr int(rand() * 1e9)]] 1 6 ] set mail [ACCESS::session data get "session.ldap.last.attr.mail"] set mobile [ACCESS::session data get [string map {"." "" " " "" "-" "" "(" "" ")" "" "+" ""} "session.ldap.last.attr.mobile"]]
ACCESS::session data set session.user.otp.pw $otp ACCESS::session data set session.user.otp.mobile $mobile ACCESS::session data set session.user.otp.username [ACCESS::session data get "session.logon.last.username"] }