<% include('/elements/header.html', 'Routers') %> <% include('/elements/error.html') %> %my $hidecustomerrouters = 0; %my $hideurl = ''; %if ($cgi->param('hidecustomerrouters') eq '1') { % $hidecustomerrouters = 1; % $cgi->param('hidecustomerrouters', 0); % $hideurl = 'Show customer routers'; %} else { % $hidecustomerrouters = 0; % $cgi->param('hidecustomerrouters', 1); % $hideurl = 'Hide customer routers'; %} Add a new router | <%$hideurl%> <% include('/elements/table-grid.html') %> % my $bgcolor1 = '#eeeeee'; % my $bgcolor2 = '#ffffff'; % my $bgcolor = ''; Router name Address block(s) % foreach my $router (sort {$a->routernum <=> $b->routernum} @router) { % next if $hidecustomerrouters && $router->svcnum; % my @addr_block = $router->addr_block; % if (scalar(@addr_block) == 0) { % push @addr_block, ' '; % } % % if ( $bgcolor eq $bgcolor1 ) { % $bgcolor = $bgcolor2; % } else { % $bgcolor = $bgcolor1; % } <%$router->routername%> % foreach my $block ( @addr_block ) { % }
<%UNIVERSAL::isa($block, 'FS::addr_block') ? $block->NetAddr : ' '%>
% } <% include('/elements/footer.html') %> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Configuration'); my @router = qsearch('router', {}); my $p2 = popurl(2);