[freeside] Re: Attempting to import

[Ivan Kohler]

On Wed, Jul 07, 1999 at 09:23:32PM -0400, Ivan Kohler wrote:
> On Sun, Jun 27, 1999 at 04:06:31PM -0600, Ben Leibig wrote:
> > Ok I'm attempting to import... First let me explain my situation... MY ISP
> > is JUST getting started up, so we only have like 2 or 3 real users.  All the
> > other accounts in the password file are either staff or system accounts(such
> > as the qmail ones.)  I attempt to do an svc_import
> 
> I'm guessing you mean svc_acct.import or svc_acct_sm.import, but I don't
> know which.
> 
> > and first of all the ssh
> > copy command seems to not wok, it evaulates to root at 1 /dir1 /dir2.
> 
> I'm guessing you gave it invalid input.  Perhaps if you posted an detailed
> description of your problem, including what you responded to each of the
> prompts, I could be of assistance.

To follow up my own post:

This is a bug.  Mea culpa.  Fix is just checked into CVS.  Here's the
diff:

===================================================================
RCS file: /home/cvs/cvsroot/freeside/bin/svc_acct.import,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- freeside/bin/svc_acct.import        1999/07/08 01:49:00     1.6
+++ freeside/bin/svc_acct.import        1999/07/08 02:32:26     1.7
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -Tw
 #
-# $Id: svc_acct.import,v 1.6 1999/07/08 01:49:00 ivan Exp $
+# $Id: svc_acct.import,v 1.7 1999/07/08 02:32:26 ivan Exp $
 #
 # ivan at sisd.com 98-mar-9
 #
@@ -17,6 +17,9 @@
 # don't import /var/spool/freeside/conf/shells!  ivan at sisd.com 98-aug-13
 #
 # $Log: svc_acct.import,v $
+# Revision 1.7  1999/07/08 02:32:26  ivan
+# import fix, noticed by Ben Leibig and Joel Griffiths
+#
 # Revision 1.6  1999/07/08 01:49:00  ivan
 # updates to avoid -w warnings from Joel Griffiths
<griff at aver-computer.com>
 #
@@ -115,14 +118,16 @@
 }
 sub getpart {
   $^W=0; # Term::Query isn't -w-safe
-  query "Enter part number:", 'irk', [ keys %part_svc ];
+  my $return = query "Enter part number:", 'irk', [ keys %part_svc ];
   $^W=1;
+  $return;
 }
 sub getvalue {
   my $prompt = shift;
   $^W=0; # Term::Query isn't -w-safe
-  query $prompt, '';
+  my $return = query $prompt, '';
   $^W=1;
+  $return;
 }
 
 print "\n\n";

> > I went ahead and manually copied the files into the correct directory...
> 
> That should work fine as well.
> 
> > Ran the
> > setup, now I get a bunch of errors once I answer all the questions:
> > 
> > 
> > Use of uninitialized value at bin/svc_acct.import line 166.
> > Use of uninitialized value at bin/svc_acct.import line 166.
> > Use of uninitialized value at bin/svc_acct.import line 168.
> > Use of uninitialized value at bin/svc_acct.import line 168.
> 
> These are annoying, but I think they can safely be ignored (they're Perl
> warnings).
> 
> > Username root in use at bin/svc_acct.import line 212, <PASSWD> chunk 1.
> 
> As Joel posted, this is because you've run the import several times.  You
> should probably wipe the database before you import.
> 
> If that's inconvenient, wipe the svc_acct, svc_acct_sm, svc_domain and
> cust_svc tables.
> 
> > ----
> > 
> > Any ideas of whats wrong... My system has more then 50 system specific
> > accounts, i'd rather not have to add each one individually in freeside...
> > Any ideas on how to get the import script working.
> > 
> > Secondly, does anyone have a step by step howto on how to get freeside
> > running using modperl and it's own web server.  I can't figure out how to do
> > it..
> 
> The mod_perl mini-guide is good, at <http://perl.apache.org/guide>.
> 
> -- 
> Ivan Kohler <ivan at sisd.com> - finger for PGP key - <moc.dsis at navi> Relhok Navi
> Open-source billing and administration for ISPs - http://www.sisd.com/freeside
> 20 4,16 * * * saytime # please don't be surprised if you find me dreaming too

-- 
Ivan Kohler <ivan at sisd.com> - finger for PGP key - <moc.dsis at navi> Relhok Navi
Open-source billing and administration for ISPs - http://www.sisd.com/freeside
20 4,16 * * * saytime # please don't be surprised if you find me dreaming too