diff options
author | Ivan Kohler <ivan@freeside.biz> | 2016-03-30 13:02:31 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2016-03-30 13:02:31 -0700 |
commit | 6c80350b6c5301cfbd3b9a69e76f4f945ce806f8 (patch) | |
tree | baa2ac17dda9a798892116cdf31353ddf8756c8d | |
parent | 6f30185e698e138885182b9c6e2b503fb46d1e28 (diff) |
set Motorola-Canopy-Gateway, RT#41261
-rw-r--r-- | FS/FS/svc_IP_Mixin.pm | 18 |
1 files changed, 16 insertions, 2 deletions
diff --git a/FS/FS/svc_IP_Mixin.pm b/FS/FS/svc_IP_Mixin.pm index c0f202e..abafe86 100644 --- a/FS/FS/svc_IP_Mixin.pm +++ b/FS/FS/svc_IP_Mixin.pm @@ -5,6 +5,8 @@ use strict; use NEXT; use FS::Record qw(qsearchs qsearch); use FS::Conf; +use FS::router; +use FS::part_svc_router; =item addr_block @@ -192,9 +194,21 @@ sub radius_reply { # (the "1" at the end is the route metric) $reply{'Framed-Route'} = $block->cidr . ' ' . ($self->ip_addr || '0.0.0.0') . ' 1'; + } + + if ( $self->router_routernum && FS::Conf->new->exists('radius-canopy') ) { + + my @addr_block = + qsearch('addr_block', { routernum => $self->router_routernum } ); + if ( @addr_block ) { + + #? + warn "Multiple address blocks attached to this service's router; using first" + if scalar(@addr_block) > 1; - $reply{'Motorola-Canopy-Gateway'} = $block->ip_gateway - if FS::Conf->new->exists('radius-canopy'); + $reply{'Motorola-Canopy-Gateway'} = $addr_block[0]->ip_gateway + + } } %reply; |