I've checked Oracle PLSQL reference, DBD-Oracle manual.
The correct syntax to call Oracle stored procedure/function from a perl script is
to wrap it in BEGIN END; block then call prepare(), bind_param[_inout]() for IN and OUT
parameters if any, than execute().
To pass returned results (it can be OUT parameters in stored procedure) it must be
called "bind_param_inout" DBD function. The "exec..." will fail if DBD uses OCI.
The positional references work only with prefetched rows (result of @row =
$sth->fetchrow call)...
I would like to use the stored procedure 'cause it's the best way to implement
access policy to our networks.
May be I'm using wrong DBD-Oracle module?
Does anyone use stored procedure to get password, check and reply items from Oracle?
I need advice how can it be done without rewriting Radiator?
Thanx in advance,
Pavel A. Crasotin
____________________________________
Open Joint-Stock Company SeverTransCom
150000, Yaroslavl, Sobinova 40/13
Tel/Fax: +7 (0852) 72-17-28, 72-17-38
>
> Hello Pavel -
>
> On Fri, 30 Jun 2000, Pavel A. Crasotin wrote:
> > Hi all,
> >
> > we have stored procedure get_user_details(uname, pwd, check, reply) in Oracle8i
>which accepts
> > username and returns password, check and reply items.
> > Procedure works fine in the test Perl script.
> >
> > Can anyone help me and say what combinations of AuthSelect and AuthColumnDef
> > should I write to pass the returned parameters to Radiator for proccessing?
> >
> > I've dug the mailng list but didnt find how to do this.
> > The right syntax of AuthSelect should be
> >
> > AuthSelect begin get_user_details('%n', pwd, check, reply); end; I think.
> > But I dont get how to bind the returned parameters to Radiator. Is it possible?
> >
>
> Here is an example from Radius/AuthRODOPI.pm:
>
> "exec Interface_VircomUsers '$name'"
>
> I would have expected you to define something similar for your AuthSelect.
>
> As to dealing with the returned values, the AuthColumnDef's have positional
> references for the first, second, third, etc. values returned by the
> AuthSelect. Therefore you would have something like this (you will have to
> experiment a bit no doubt):
>
> AuthSelect exec get_user_details '%n'
>
> AuthColumnDef 0, User-Password, check
> AuthColumnDef 1, GENERIC, check
> AuthColumnDef 2, GENERIC, reply
>
> Have a look at sections 6.25.6 and 6.25.7 in the Radiator 2.16.1 reference
> manual.
>
> hth
>
> Hugh
>
> --
> Radiator: the most portable, flexible and configurable RADIUS server
> anywhere. SQL, proxy, DBM, files, LDAP, NIS+, password, NT, Emerald,
> Platypus, Freeside, Interbiller, TACACS+, PAM, external, etc, etc.
> Available on Unix, Linux, FreeBSD, Windows 95/98/2000, NT, MacOS X.
>
>
>
> ===
> Archive at http://www.starport.net/~radiator/
> Announcements on [EMAIL PROTECTED]
> To unsubscribe, email '[EMAIL PROTECTED]' with
> 'unsubscribe radiator' in the body of the message.
>
===
Archive at http://www.starport.net/~radiator/
Announcements on [EMAIL PROTECTED]
To unsubscribe, email '[EMAIL PROTECTED]' with
'unsubscribe radiator' in the body of the message.
