From 0354f39ed0e74fd2eae1d9da13906625b4f56591 Mon Sep 17 00:00:00 2001 From: khoff Date: Wed, 5 Feb 2003 23:17:17 +0000 Subject: svc_broadband rewrite --- httemplate/browse/router.cgi | 37 +++++++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) create mode 100644 httemplate/browse/router.cgi (limited to 'httemplate/browse/router.cgi') diff --git a/httemplate/browse/router.cgi b/httemplate/browse/router.cgi new file mode 100644 index 000000000..8864936d9 --- /dev/null +++ b/httemplate/browse/router.cgi @@ -0,0 +1,37 @@ +<%= header('Routers', menubar('Main Menu' => $p)) %> +<% + +my @router = qsearch('router', {}); +my $p2 = popurl(2); + +%> + +<% if ($cgi->param('error')) { %> + Error: <%=$cgi->param('error')%> +

+<% } %> + +Add a new router

+ +<%=table()%> + +<% foreach $router (sort {$a->routernum <=> $b->routernum} @router) { %> + + + + <%=$router->routername%> + + + +<% } %> + + + + -- cgit v1.2.1 From 58d44fbe5eb9ab32e6d87063a4a3b22ddba9a828 Mon Sep 17 00:00:00 2001 From: khoff Date: Tue, 5 Aug 2003 00:20:51 +0000 Subject: Virtual field merge --- httemplate/browse/router.cgi | 25 +++++++++++++------------ 1 file changed, 13 insertions(+), 12 deletions(-) (limited to 'httemplate/browse/router.cgi') diff --git a/httemplate/browse/router.cgi b/httemplate/browse/router.cgi index 8864936d9..a9ec6fd61 100644 --- a/httemplate/browse/router.cgi +++ b/httemplate/browse/router.cgi @@ -14,21 +14,22 @@ my $p2 = popurl(2); Add a new router

<%=table()%> - -<% foreach $router (sort {$a->routernum <=> $b->routernum} @router) { %> - - + Router name + Address block(s) + +<% foreach $router (sort {$a->routernum <=> $b->routernum} @router) { + my @addr_block = $router->addr_block; +%> + + <%=$router->routername%> - + + <% foreach my $block ( @addr_block ) { %> + <%=$block->NetAddr%>
+ <% } %> + <% } %> -- cgit v1.2.1 From 526a7b2f5b8675b086745cf3fa5cfa6366fd67cf Mon Sep 17 00:00:00 2001 From: khoff Date: Wed, 15 Oct 2003 23:17:19 +0000 Subject: $router isn't a global. --- httemplate/browse/router.cgi | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'httemplate/browse/router.cgi') diff --git a/httemplate/browse/router.cgi b/httemplate/browse/router.cgi index a9ec6fd61..feee4ecaa 100644 --- a/httemplate/browse/router.cgi +++ b/httemplate/browse/router.cgi @@ -18,7 +18,7 @@ my $p2 = popurl(2); Router name Address block(s) -<% foreach $router (sort {$a->routernum <=> $b->routernum} @router) { +<% foreach my $router (sort {$a->routernum <=> $b->routernum} @router) { my @addr_block = $router->addr_block; %> -- cgit v1.2.1 From 6f2e2ea05362732731d08bc2fdeb26946fa4d3bc Mon Sep 17 00:00:00 2001 From: khoff Date: Wed, 10 Mar 2004 02:37:23 +0000 Subject: UI cleanup. --- httemplate/browse/router.cgi | 16 ++++++++++------ 1 file changed, 10 insertions(+), 6 deletions(-) (limited to 'httemplate/browse/router.cgi') diff --git a/httemplate/browse/router.cgi b/httemplate/browse/router.cgi index feee4ecaa..4eee96167 100644 --- a/httemplate/browse/router.cgi +++ b/httemplate/browse/router.cgi @@ -20,16 +20,20 @@ my $p2 = popurl(2); <% foreach my $router (sort {$a->routernum <=> $b->routernum} @router) { my @addr_block = $router->addr_block; + if (scalar(@addr_block) == 0) { + push @addr_block, ' '; + } %> - + <%=$router->routername%> - - <% foreach my $block ( @addr_block ) { %> - <%=$block->NetAddr%>
- <% } %> - + + <% foreach my $block ( @addr_block ) { %> + + <%=UNIVERSAL::isa($block, 'FS::addr_block') ? $block->NetAddr : ' '%> + + <% } %> <% } %> -- cgit v1.2.1 From 432a10eb5431f3ef973f6273539b2a685f665807 Mon Sep 17 00:00:00 2001 From: khoff Date: Wed, 10 Mar 2004 19:06:21 +0000 Subject: Added hide/show customer router link. --- httemplate/browse/router.cgi | 17 ++++++++++++++++- 1 file changed, 16 insertions(+), 1 deletion(-) (limited to 'httemplate/browse/router.cgi') diff --git a/httemplate/browse/router.cgi b/httemplate/browse/router.cgi index 4eee96167..149db4903 100644 --- a/httemplate/browse/router.cgi +++ b/httemplate/browse/router.cgi @@ -11,7 +11,21 @@ my $p2 = popurl(2);

<% } %> -Add a new router

+<% +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%> <%=table()%> @@ -19,6 +33,7 @@ my $p2 = popurl(2); 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, ' '; -- cgit v1.2.1