[freeside-devel] current cvs

[ivan]

On Thu, Feb 22, 2001 at 03:54:32PM -0600, Adam Rose wrote:
> I see how you plan to currently implement ICRADIUS.  Has the dbdef-create
> script for adding columns (specifically radius attributes) been updated
> for postgres?  It still seems to have mysql info implemented in it.

The work has been done and is available in the CPAN module DBIx::DBSchema.
dbdef-create can be replaced by a DBIx::DBSchema one-liner.

>  Is
> there a workaround for adding the radius attributes to freeside on
> postgresql or does it need to be done manually?
>
> I will be glad to try to patch the current adding of radius attributes
> with dbdef-create and dbdef.pm

dbdef.pm is obsoleted by DBIx::DBSchema  If you would like to
contribute, you can update Freeside for DBIx::DBSchema and you'll get the
missing Pg support.

> but would like to know what I may be facing
> since(according to the mailing lists) this appears to be an issue.
> 
> Thanks
> 
> On Wed, 21 Feb 2001, ivan wrote:
> 
> > On Wed, Feb 21, 2001 at 05:01:46PM -0600, Adam Rose wrote:
> > > How are planing to implement Postgres with ICRadius since freeside is
> > > going toward using transactions.  Just want to see where I can
> > > help.
> > 
> > bin/svc_acct.export will need a small fix (checked into CVS) - with this,
> > you specify your local (MySQL) data source, username and password in an
> > icradius_secrets configuration file, and Freeside will export to this
> > local database and then copy the files to the external icradiusmachines,
> > as before.
> > 
> > ivan at rootwood:~/freeside_current/bin$ cvs diff -u svc_acct.export 
> > Index: svc_acct.export
> > ===================================================================
> > RCS file: /home/cvs/cvsroot/freeside/bin/svc_acct.export,v
> > retrieving revision 1.16
> > diff -u -r1.16 svc_acct.export
> > --- svc_acct.export     2000/07/06 13:23:29     1.16
> > +++ svc_acct.export     2001/02/21 23:30:42
> > @@ -64,6 +64,7 @@
> >  use vars qw($conf);
> >  use Fcntl qw(:flock);
> >  use IO::Handle;
> > +use DBI;
> >  use FS::Conf;
> >  use FS::SSH qw(scp ssh);
> >  use FS::UID qw(adminsuidsetup datasrc dbh);
> > @@ -98,8 +99,13 @@
> >  my $icradius_mysqlsource =
> >    $conf->config('icradius_mysqlsource') || "/usr/local/var/freeside"
> >      if $icradiusmachines;
> > -my $icradius_dbh = dbh; #could eventually get it from a config file if you're
> > -                        #not running MySQL for your Freeside database
> > +my $icradius_dbh;
> > +if ( $icradiusmachines && $conf->exists('icradius_secrets') ) {
> > +  $icradius_dbh = DBI->connect($conf->config('icradius_secrets'))
> > +    or die $DBI::errstr;;
> > +} else {
> > +  $icradius_dbh = dbh;
> > +}
> >  
> >  my $textradiusprepend = $conf->config('textradiusprepend');
> >  
> > 
> 
> -- 
> Adam Rose
> Systems Programmer/Jr. Systems/Network Administrator
> adamr at eaze.net
> 
> 
> 

-- 
meow
_ivan