Hi Joost,
Thanks very much for that. I have rolled the new -p switch into the code for
the next release, with credit to you.
Cheers.
On Mar 29, 1:47pm, Joost Stegeman wrote:
> Subject: Re: (RADIATOR) Extracting Users from a DBM file
>
> Hi all,
>
> Attached you will find a new version of builddbm,
> it includes an option -p wich will print the dbm
> as a flat userfile.
>
> Use at your own risk ;-)
>
> - Joost.
>
> Mike McCauley wrote:
> >
> > Hi Richard,
> >
> > On Mar 28, 12:23pm, Richard Barnes -Listserv wrote:
> > > Subject: (RADIATOR) Extracting Users from a DBM file
> > > is there a quick and easy way to extract usernames (all of them) from the
db
> > > file?
> > >
> > > I know of the builddbm -l <username> command, but as far as I can figure,
> > > you can't supply a wildcard, or if you can, I haven't figured out what
the
> > > wildcard character is...
> >
> > builddbm will not do what you want, but a little code like this (untested)
> > might help:
> >
> > #!/usr/local/bin/perl
> > use AnyDBM_File;
> > my $dbfile = 'yourdbmfilename';
> > my $mode = 0666;
> > my $dbtype = 'AnyDBM_File';
> > my %users;
> > tie (%users, $dbtype, $dbfile, O_CREAT | O_RDWR, $mode)
> > || die "Could not open user database file '$dbfile': $!";
> > my ($name, $value);
> > while (($name, $value) = each %users)
> > {
> > print "$name\n";
> > }
> >
> > >
> > > TIA
> > >
> > > Richard Barnes
> > >
> > >
> > > ===
> > > 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.
> > >-- End of excerpt from Richard Barnes -Listserv
> >
> > --
> > 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, etc etc on Unix, Win95/8,
> > 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.
>
> --
> ================================================
> Joost Stegeman
> Service Developer Integration Services
> KPN
> OVN BBT/IP Integration Services
> tel. 070 - 371 37 83
> fax. 070 - 371 26 38
> E-mail: [EMAIL PROTECTED]
> ================================================
>
> [ Attachment (application/octet-stream): "builddbm" 6312 bytes
> Encoded with "base64" ]
>-- End of excerpt from Joost Stegeman
--
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, etc etc on Unix, Win95/8,
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.
