1 <% include("/elements/header.html",'Routers', menubar('Main Menu' => $p)) %>
3 %my @router = qsearch('router', {});
6 <% include('/elements/error.html') %>
8 %my $hidecustomerrouters = 0;
10 %if ($cgi->param('hidecustomerrouters') eq '1') {
11 % $hidecustomerrouters = 1;
12 % $cgi->param('hidecustomerrouters', 0);
13 % $hideurl = '<A HREF="' . $cgi->self_url() . '">Show customer routers</A>';
15 % $hidecustomerrouters = 0;
16 % $cgi->param('hidecustomerrouters', 1);
17 % $hideurl = '<A HREF="' . $cgi->self_url() . '">Hide customer routers</A>';
22 <A HREF="<%$p2%>edit/router.cgi">Add a new router</A> | <%$hideurl%>
26 <TD><B>Router name</B></TD>
27 <TD><B>Address block(s)</B></TD>
29 % foreach my $router (sort {$a->routernum <=> $b->routernum} @router) {
30 % next if $hidecustomerrouters && $router->svcnum;
31 % my @addr_block = $router->addr_block;
32 % if (scalar(@addr_block) == 0) {
33 % push @addr_block, ' ';
38 <TD ROWSPAN="<%scalar(@addr_block)+1%>">
39 <A HREF="<%$p2%>edit/router.cgi?<%$router->routernum%>"><%$router->routername%></A>
42 % foreach my $block ( @addr_block ) {
45 <TD><%UNIVERSAL::isa($block, 'FS::addr_block') ? $block->NetAddr : ' '%></TD>
57 unless $FS::CurrentUser::CurrentUser->access_right('Configuration');