diff options
Diffstat (limited to 'httemplate/view/svc_domain/dns.html')
-rw-r--r-- | httemplate/view/svc_domain/dns.html | 150 |
1 files changed, 0 insertions, 150 deletions
diff --git a/httemplate/view/svc_domain/dns.html b/httemplate/view/svc_domain/dns.html deleted file mode 100644 index 184286c31..000000000 --- a/httemplate/view/svc_domain/dns.html +++ /dev/null @@ -1,150 +0,0 @@ -<SCRIPT> - function areyousure(href, message) { - if ( confirm(message) == true ) - window.location.href = href; - } - function slave_areyousure() { - return confirm("Remove all records and slave from " + document.SlaveForm.recdata.value + "?"); - } -</SCRIPT> -<% include('/elements/init_overlib.html') %> - -<A NAME="dns"></A> -<div class="fscontainer"> -<div class="fsbox"> -<div class="fsbox-title"> - <span class="left">DNS Records</span> -</div> - -<% include('/elements/table-grid.html') %> - -% my $bgcolor1 = '#eeeeee'; -% my $bgcolor2 = '#ffffff'; -% my $bgcolor = $bgcolor2; - - <tr> - <th CLASS="grid" BGCOLOR="#cccccc">Zone</th> - <th CLASS="grid" BGCOLOR="#cccccc">Type</th> - <th CLASS="grid" BGCOLOR="#cccccc">Data</th> - <th CLASS="grid" BGCOLOR="#cccccc">TTL</th> - <th CLASS="grid" BGCOLOR="#cccccc"></th> - </tr> - -% my @records = $svc_domain->domain_record; -% foreach my $domain_record ( @records ) { -% my $type = $domain_record->rectype eq '_mstr' -% ? "(slave)" -% : $domain_record->recaf. ' '. $domain_record->rectype; - - - <tr> - <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $domain_record->reczone %></td> - <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $type %></td> - <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $domain_record->recdata %></td> - <td CLASS="grid" BGCOLOR="<% $bgcolor %>"><% $domain_record->ttl %></td> - <td CLASS="grid" BGCOLOR="<% $bgcolor %>"> - -% unless ( $domain_record->rectype eq 'SOA' -% || ! $FS::CurrentUser::CurrentUser->access_right('Edit domain nameservice') -% ) { -% my $edit_link = include('/elements/popup_link.html', -% 'label' => 'edit', -% 'action' => $p.'edit/domain_record.html?recnum='. -% $domain_record->recnum, -% 'actionlabel' => 'Edit nameservice record', -% 'width' => 655, -% 'height' => 176, -% #'color' => '#ff0000', -% ); -% ( my $recdata = $domain_record->recdata ) =~ s/"/\\'\\'/g; -% my $delete_url= "javascript:areyousure('${p}misc/delete-domain_record.cgi?". -% $domain_record->recnum. "', 'Delete ". -% $domain_record->reczone. " $type $recdata ?' )"; - <%$edit_link%> | <A HREF="<%$delete_url%>">delete</A> -% } - </td> - </tr> - - -% if ( $bgcolor eq $bgcolor1 ) { -% $bgcolor = $bgcolor2; -% } else { -% $bgcolor = $bgcolor1; -% } - -% } - -% if ( ! @records ) { - - <FORM METHOD="POST" NAME="DefaultForm" ACTION="<%$p%>edit/process/svc_domain-defaultrecords.cgi"> - <tr> - <td class="grid" BGCOLOR="#ffffff" COLSPAN=5> - <INPUT TYPE="hidden" NAME="svcnum" VALUE="<%$svcnum%>"> - <INPUT TYPE="submit" VALUE="Add default records"> - </td> - </tr> - </FORM> - -% } - -% if ( $FS::CurrentUser::CurrentUser->access_right('Edit domain nameservice') ) { - <FORM METHOD="POST" ACTION="<%$p%>edit/process/domain_record.cgi"> - <INPUT TYPE="hidden" NAME="svcnum" VALUE="<%$svcnum%>"> - <tr> - <td class="grid" bgcolor="<%$bgcolor%>"> - <INPUT TYPE="text" NAME="reczone"><BR> - <FONT SIZE="-1"><I>Zone</I></FONT> - </TD> - <TD class="grid" bgcolor="<%$bgcolor%>"> - <INPUT TYPE="hidden" NAME="recaf" VALUE="IN"> - <SELECT NAME="rectype"> -% foreach ( @{ FS::domain_record->rectypes } ) { - <OPTION VALUE="<%$_%>">IN <%$_%></OPTION> -% } - </SELECT><BR> - <FONT SIZE="-1"><I>Type</I></FONT> - </TD> - <TD class="grid" bgcolor="<%$bgcolor%>"> - <INPUT TYPE="text" NAME="recdata"><BR> - <FONT SIZE="-1"><I>Data</I></FONT> - </TD> - <TD class="grid" bgcolor="<%$bgcolor%>"> - <INPUT TYPE="text" NAME="ttl" size="6"><BR> - <FONT SIZE="-1"><I>TTL</I></FONT> - </TD> - <TD class="grid" bgcolor="<%$bgcolor%>" VALIGN="top"> - <INPUT TYPE="submit" VALUE="Add record"> - </TD> - </TR> - </FORM> - - <BR> - <FORM NAME="SlaveForm" METHOD="POST" ACTION="<%$p%>edit/process/domain_record.cgi"> - <INPUT TYPE="hidden" NAME="svcnum" VALUE="<%$svcnum%>"> - Or -% if ( @records ) { - delete all records and -% } - slave from nameserver IP - <INPUT TYPE="hidden" NAME="svcnum" VALUE="<%$svcnum%>"> - <INPUT TYPE="hidden" NAME="reczone" VALUE="@"> - <INPUT TYPE="hidden" NAME="recaf" VALUE="IN"> - <INPUT TYPE="hidden" NAME="rectype" VALUE="_mstr"> - <INPUT TYPE="text" NAME="recdata"> - <INPUT TYPE="submit" VALUE="Slave domain" onClick="return slave_areyousure()"> - </FORM> - <BR><BR> - -% } - -</table> - -</div> -</div> -<%init> - -my($svc_domain, %opt) = @_; -my $svcnum = $svc_domain->svcnum; - -</%init> - |