1 <% include('/elements/header.html', 'Routers') %>
3 <% include('/elements/error.html') %>
5 %my $hidecustomerrouters = 0;
7 %if ($cgi->param('hidecustomerrouters') eq '1') {
8 % $hidecustomerrouters = 1;
9 % $cgi->param('hidecustomerrouters', 0);
10 % $hideurl = '<A HREF="' . $cgi->self_url() . '">Show customer routers</A>';
12 % $hidecustomerrouters = 0;
13 % $cgi->param('hidecustomerrouters', 1);
14 % $hideurl = '<A HREF="' . $cgi->self_url() . '">Hide customer routers</A>';
17 <A HREF="<%$p2%>edit/router.cgi">Add a new router</A> | <%$hideurl%>
21 <TD><B>Router name</B></TD>
22 <TD><B>Address block(s)</B></TD>
24 % foreach my $router (sort {$a->routernum <=> $b->routernum} @router) {
25 % next if $hidecustomerrouters && $router->svcnum;
26 % my @addr_block = $router->addr_block;
27 % if (scalar(@addr_block) == 0) {
28 % push @addr_block, ' ';
33 <TD ROWSPAN="<%scalar(@addr_block)+1%>">
34 <A HREF="<%$p2%>edit/router.cgi?<%$router->routernum%>"><%$router->routername%></A>
37 % foreach my $block ( @addr_block ) {
40 <TD><%UNIVERSAL::isa($block, 'FS::addr_block') ? $block->NetAddr : ' '%></TD>
49 <% include('/elements/footer.html') %>
54 unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
56 my @router = qsearch('router', {});