1 <% include('/elements/header.html', 'Address Blocks') %>
3 <% include('/elements/error.html') %>
5 <% include('/elements/table-grid.html') %>
6 % my $bgcolor1 = '#eeeeee';
7 % my $bgcolor2 = '#ffffff';
11 <TH CLASS="grid" BGCOLOR="#cccccc">Address block(s)</TH>
12 <TH CLASS="grid" BGCOLOR="#cccccc">Router</TH>
13 <TH CLASS="grid" BGCOLOR="#cccccc">Action(s)</TH>
16 % foreach $block (sort {$a->NetAddr cmp $b->NetAddr} @addr_block) {
17 % if ( $bgcolor eq $bgcolor1 ) {
18 % $bgcolor = $bgcolor2;
20 % $bgcolor = $bgcolor1;
24 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>"><%$block->NetAddr%></TD>
26 % if (my $router = $block->router) {
28 % if (scalar($block->svc_broadband) == 0) {
30 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
31 <%$router->routername%>
33 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
34 <FORM ACTION="<%$path%>/deallocate.cgi" METHOD="POST">
35 <INPUT TYPE="hidden" NAME="blocknum" VALUE="<%$block->blocknum%>">
36 <INPUT TYPE="submit" NAME="submit" VALUE="Deallocate">
41 <TD COLSPAN="2" CLASS="grid" BGCOLOR="<% $bgcolor %>">
42 <%$router->routername%>
48 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
49 <FORM ACTION="<%$path%>/allocate.cgi" METHOD="POST">
50 <INPUT TYPE="hidden" NAME="blocknum" VALUE="<%$block->blocknum%>">
51 <SELECT NAME="routernum" SIZE="1">
53 <OPTION VALUE="<%$_->routernum %>"><%$_->routername%></OPTION>
56 <INPUT TYPE="submit" NAME="submit" VALUE="Allocate">
59 <TD CLASS="grid" BGCOLOR="<% $bgcolor %>">
60 <FORM ACTION="<%$path%>/split.cgi" METHOD="POST">
61 <INPUT TYPE="hidden" NAME="blocknum" VALUE="<%$block->blocknum%>">
62 <INPUT TYPE="submit" NAME="submit" VALUE="Split">
74 <FORM ACTION="<%$path%>/add.cgi" METHOD="POST">
76 <INPUT TYPE="text" NAME="ip_gateway" SIZE="15">/<INPUT TYPE="text" NAME="ip_netmask" SIZE="2">
77 <INPUT TYPE="submit" NAME="submit" VALUE="Add">
79 <% include('/elements/footer.html') %>
83 unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
85 my @addr_block = qsearch('addr_block', {});
86 my @router = qsearch('router', {});
89 my $path = $p2 . "edit/process/addr_block";