summaryrefslogtreecommitdiff
path: root/FS/FS/ClientAPI/MyAccount.pm
diff options
context:
space:
mode:
authorChristopher Burger <burgerc@freeside.biz>2018-10-02 12:48:56 -0400
committerChristopher Burger <burgerc@freeside.biz>2018-10-02 14:39:23 -0400
commitf464dfb4fed3f68c330938d455083424e7c838de (patch)
tree5ae30f34112950079d9e6c3b2285b09434916824 /FS/FS/ClientAPI/MyAccount.pm
parent529ec19487d625e011fd899da3d88af63c9668ca (diff)
Revert "RT# 39340 - configured the minimal selfservice to get mac address from radius account table"
This reverts commit 30fabfe8ce8c9a48fa96c6a50d48b32161b1680f.
Diffstat (limited to 'FS/FS/ClientAPI/MyAccount.pm')
-rw-r--r--FS/FS/ClientAPI/MyAccount.pm30
1 files changed, 2 insertions, 28 deletions
diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm
index 3390687..d724e2c 100644
--- a/FS/FS/ClientAPI/MyAccount.pm
+++ b/FS/FS/ClientAPI/MyAccount.pm
@@ -183,29 +183,6 @@ sub skin_info {
}
-sub get_mac_address {
- my $p = shift;
-
-## access radius exports acct tables to get mac
- my @part_export = ();
- @part_export = (
- qsearch( 'part_export', { 'exporttype' => 'sqlradius' } ),
- qsearch( 'part_export', { 'exporttype' => 'sqlradius_withdomain' } ),
- qsearch( 'part_export', { 'exporttype' => 'broadband_sqlradius' } ),
- );
-
- my @sessions;
- foreach my $part_export (@part_export) {
- push @sessions, ( @{ $part_export->usage_sessions( {
- 'ip' => $p->{'ip'},
- } ) } );
- }
-
- my $mac = $sessions[0]->{'callingstationid'};
-
- return { 'mac_address' => $mac, };
-}
-
sub login_info {
my $p = shift;
@@ -261,11 +238,8 @@ sub login {
} elsif ( $p->{'domain'} eq 'ip_mac' ) {
- my $mac_address = $p->{'username'};
- $mac_address =~ s/\://g;
-
- my $svc_broadband = qsearchs( 'svc_broadband', { 'mac_addr' => $mac_address } );
- return { error => 'MAC address not found '.$p->{'username'} }
+ my $svc_broadband = qsearchs( 'svc_broadband', { 'mac_addr' => $p->{'username'} } );
+ return { error => 'IP address not found' }
unless $svc_broadband;
$svc_x = $svc_broadband;