Hi Christian,

Ive rolled your patch in. Thanks for that.

On Jul 29, 11:24am, Hugh Irvine wrote:
> Subject: Re: (RADIATOR) patch for getProfiles
>
> Hello Christian -
>
> Many thanks for the patch - I've forwarded it to Mike for inclusion in the
next
> release.
>
> regards
>
> Hugh
>
> On Fri, 28 Jul 2000, Christian Hammers wrote:
> > Hello
> >
> > The files read by getProfiles must have every entry in one single line
> > which makes it horrible to look at. I patched it so that it can now
> > handle the normal UNIX line wrapping standart with a '\' as last char
> > on a line:
> >     westend-dynamic-dialup:ascend:  \
> >             ramed-Protocol=PPP, \
> >             Framed-Routing=None, \
> >             ...
> > bye,
> >
> >  -christian-
> >
> > --- hook.getProfiles.orig   Fri Jul 28 13:30:06 2000
> > +++ hook.getProfiles        Fri Jul 28 13:40:05 2000
> > @@ -34,8 +34,11 @@
> >
> >      my $record;
> >
> > +    $/ = "\n\n";
> >      while (<FILE>)
> >      {
> > +   # Join input to one line
> > +   s/\\\n//g;
> >
> >          # Skip comment lines and blank lines
> >          next if /^#/ || /^\s*$/;
> > @@ -44,7 +47,7 @@
> >
> >     # Format: $profile:$identifier:$attributes
> >     # We cannot use split due to ':' in attributes like cisco-avpair
> > -   if ($record =~ /^([^:]+):([^:]+):(.*)/)
> > +   if ($record =~ /^([^:]+)\s*:\s*([^:]+)\s*:\s*(.*)/)
> >     {
> >         # add Profile to GlobalVars for use by PostAuthHook
> >         &main::log($main::LOG_DEBUG,"setVariable |$1|.|$2|=|$3|");
> > @@ -52,6 +55,10 @@
> >     }
> >      }
> >      close(FILE);
> > +
> > +    # reset $INPUT_RECORD_SEPERATOR. Don't know if necessary but at least
safe.
> > +    $/ = "\n";
> > +
> >      return;
> >  }
> >
> >
> >
> > --
> > Christian Hammers    WESTEND GmbH - Aachen und Dueren     Tel 0241/701333-0
> > [EMAIL PROTECTED]     Internet & Security for Professionals    Fax 0241/911879
> >            WESTEND ist CISCO Systems Partner - Premium Certified
> >
> > ===
> > 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.
> --
> 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.
>
>
>
>-- End of excerpt from Hugh Irvine



-- 
Mike McCauley                               [EMAIL PROTECTED]
Open System Consultants Pty. Ltd            Unix, Perl, Motif, C++, WWW
24 Bateman St Hampton, VIC 3188 Australia   http://www.open.com.au
Phone +61 3 9598-0985                       Fax   +61 3 9598-0955

Radiator: the most portable, flexible and configurable RADIUS server 
anywhere. SQL, proxy, DBM, files, LDAP, NIS+, password, NT, Emerald, 
Platypus, Freeside, TACACS+, PAM, external, Active Directory etc etc 
on Unix, Win95/8, 2000, NT, MacOS 9, 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.

Reply via email to