Last Bit of Questions

[Ivan Kohler]

-----BEGIN PGP SIGNED MESSAGE-----

On Tue, 5 May 1998, Max wrote:

> All-
> Ok... this really is my last group of questions :)  :
>
> 1. How do you make someone a complimentary account issuer?

Right now that's mostly a stub for later use.  It is checked with this bit
of site_perl/cust_main.pm:

  } elsif ($recref->{'payby'} eq 'COMP') {

    $recref->{'payinfo'} =~ /^(\w{2,8})$/
      or return "Illegal comp account issuer";
    $recref->{'payinfo'} = $1;

  }

...so use 2-8 letters for now, unless you need to add some site-specific
security.

> 2. Where does it get its list of shells (its still using its own despite
> the fact that I put a custom one in the service definition)?

In site_perl/svc_acct.pm:

    unless ( $recref->{username} eq 'sync' ) {
      $recref->{shell} =~ /^(\/bin\/)(sh|csh|tcsh|bash|ksh|zsh|true)$/
        or return "Illegal shell";
      $recref->{shell} = $1.$2;
    } else {
      $recref->{shell} = '/bin/sync';
    }

> 3. Where is unimp.html?

Hmm... if that's not in there, it was just a message that the think you
were trying to do isn't done yet.  I don't have a 1.0.0 tree handly

> 4. Back to question 2... how does it determine what an 'illegal shell' is?

Right now it is "hardcoded" into svc_acct.pm, though I hope to eventually
move all configuration information into the database.
 
> Thats all for now.
> 
> -Max
> 
> 

- -- 
Ivan Kohler <ivan at sisd.com> - finger for PGP key
Silicon Interactive Software Design - http://www.sisd.com/
Open source billing and administraiton for ISPs - http://www.sisd.com/freeside
Simulation.  Do not drive in the ocean.

-----BEGIN PGP SIGNATURE-----
Version: 2.6.3ia
Charset: noconv

iQCVAwUBNVAF4b7OPBeQJv09AQGKTwP+PcCTRnKjTDPUqAJj0uQ3fAeFLT3kYBFb
p2MxJ5tx0bQeCn7ry6G3Odwmj0AF2hwKdpBetD0Kyt74eytBOR+ENJDmPFtKngT/
+A86p3x0MbcCh6wnA9SXOpIJOliLbsWxfcKseh282kj88DfSpiJtlbdh7YnPIzr7
RsOi5ku8LP0=
=1Ly7
-----END PGP SIGNATURE-----