diff options
| author | Christopher Burger <burgerc@freeside.biz> | 2018-01-16 12:14:54 -0500 |
|---|---|---|
| committer | Christopher Burger <burgerc@freeside.biz> | 2018-09-12 12:30:50 -0400 |
| commit | f17c3f4acb20b02308c280347586737f21de74c5 (patch) | |
| tree | db002ec8a335dffaf5ef1532f8766dd5f3432618 /FS/FS | |
| parent | 4cf578816f5a491b1f66ddb5a9e832457ebe1332 (diff) | |
RT# 39340 - Created minimal selfservice that only allows payments to be made, authorization is based on ip and mac address. This is not done yet need to write routine to get mac address from radius server based on ip address.
Diffstat (limited to 'FS/FS')
| -rw-r--r-- | FS/FS/ClientAPI/MyAccount.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm index f32523e35..8c8cfc2ee 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -236,6 +236,13 @@ sub login { $svc_x = $svc_phone; + } elsif ( $p->{'domain'} eq 'ip_mac' ) { + + my $svc_broadband = qsearchs( 'svc_broadband', { 'mac_addr' => $p->{'username'} } ); + return { error => 'IP address not found' } + unless $svc_broadband; + $svc_x = $svc_broadband; + } elsif ( $p->{email} && (my $contact = FS::contact->by_selfservice_email($p->{email})) ) |