michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-02-03 06:03:28 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

ui_hr

Browse Source
This commit is contained in:
Joe Cooper
2008-05-10 03:09:08 +00:00
parent 5325b59fbc
commit 48445ebb60
44 changed files with 84 additions and 84 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
certmgr/gencert.cgi
View File

@@ -42,9 +42,9 @@ if ($error) {
print "$error</ul>\n$text{'gencert_pleasefix'}\n";
}
print "<hr>\n";
print &ui_hr();
&print_cert_form("gencert");
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
sub process{
@@ -52,7 +52,7 @@ sub process{
$outfile=&tempname();
if (((-e $in{'certfile'})||(-e $in{'keyfile'})||(-e $in{'keycertfile'}))&&($in{'overwrite'} ne "yes")) {
&overwriteprompt();
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
exit;
}
@@ -102,7 +102,7 @@ EOF
}
unlink($outfile);
unlink($conffilename);
print "<hr>\n";
print &ui_hr();
if ($error){ print "<b>$text{'gencert_e_genfailed'}</b>\n<pre>$error</pre>\n<hr>\n";}
else {
print "<b>$text{'gencert_genworked'}</b>\n<pre>$out</pre>\n";
@@ -114,9 +114,9 @@ EOF
if (-e $in{'keycertfile'}) {
print "<b>$text{'gencert_saved_keycert'} <a href=$url>$in{'keyfile'}</a></b><br>\n";
}
print "<hr>\n";
print &ui_hr();
}
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
}

10
certmgr/gencsr.cgi
View File

@@ -45,9 +45,9 @@ if ($error) {
if (!$in{'emailAddress'}) { $in{'emailAddress'}=$config{'default_email'}; }
}
print "<hr>\n";
print &ui_hr();
&print_cert_form("gencsr");
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
sub process{
@@ -55,7 +55,7 @@ sub process{
$outfile=&tempname();
if (((-e $in{'csrfile'})||(-e $in{'keyfile'}))&&($in{'overwrite'} ne "yes")) {
&overwriteprompt();
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
exit;
}
@@ -93,7 +93,7 @@ EOF
}
unlink($outfile);
unlink($conffilename);
print "<hr>\n";
print &ui_hr();
if ($error){ print "<b>$text{'gencsr_e_genfailed'}</b>\n<pre>$error</pre>\n<hr>\n";}
else {
print "<b>$text{'gencsr_genworked'}</b>\n<pre>$out</pre>\n";
@@ -102,7 +102,7 @@ EOF
$url="\"view.cgi?keyfile=".&my_urlize($in{'keyfile'}).'"';
print "<b>$text{'gencert_saved_key'} <a href=$url>$in{'keyfile'}</a></b><br>\n";
}
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
}

4
certmgr/import.cgi
View File

@@ -118,9 +118,9 @@ sub receive {
close(FILE);
if ($type eq "cert") { chmod(0644,$filename); }
elsif ($type eq "key") { chmod(0400,$filename); }
print "<hr>\n";
print &ui_hr();
print "<h4>File $filename uploaded successfully</h4>\n";
print "<hr>\n";
print &ui_hr();
&footer("", $text{'import_return'});
}

2
certmgr/index.cgi
View File

@@ -23,6 +23,6 @@ foreach $p (@pages) {
print "</td><td><a href=$p.cgi>$txt</a></td></tr>\n";
}
print "</table></td></tr></table>\n";
print "<hr>\n";
print &ui_hr();
&footer("/", $text{'index_index'});

10
certmgr/signcsr.cgi
View File

@@ -37,9 +37,9 @@ if ($error) {
print "$error</ul>\n$text{'gencert_pleasefix'}\n";
}
print "<hr>\n";
print &ui_hr();
&print_sign_form("signcsr");
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
sub process{
@@ -51,7 +51,7 @@ sub process{
}
if ((-e $in{'signfile'})&&($in{'overwrite'} ne "yes")) {
&overwriteprompt();
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
exit;
}
@@ -67,13 +67,13 @@ sub process{
$error=0;
chmod(0400,$in{'signfile'});
}
print "<hr>\n";
print &ui_hr();
if ($error){ print "<b>$text{'signcsr_e_signfailed'}</b>\n<pre>$error</pre>\n<hr>\n";}
else {
print "<b>$text{'signcsr_worked'}</b>\n<pre>$out</pre>\n";
$url="\"view.cgi?certfile=".&my_urlize($in{'signfile'}).'"';
print "<b>$text{'signcsr_saved_cert'} <a href=$url>$in{'signfile'}</a></b><br>\n";
print "<hr>\n";
print &ui_hr();
}
&footer("", $text{'index_return'});
}

10
certmgr/view.cgi
View File

@@ -15,7 +15,7 @@ $wildcard_pattern=~s/\?/./g;
if ($in{'dl'} ne "yes" && $in{'pkcs12'} ne "yes") {
&header($text{'view_title'}, "");
print "<hr>\n";
print &ui_hr();
}
if ($in{'delete'} eq "yes"){
if ($in{'keyfile'}) { $file=$in{'keyfile'} }
@@ -72,7 +72,7 @@ if ($in{'keyfile'}) {
else {&print_key_info(1,$buffer);}
print "</td></tr></table>\n";
&download_form("keyfile", $in{'keyfile'}, $text{'key'});
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
exit;
}
@@ -101,7 +101,7 @@ if ($in{'certfile'}||$in{'csrfile'}) {
else {&print_cert_info(1,$buffer);}
print "</td></tr></table>\n";
&download_form("certfile", $in{'certfile'}, $text{'certificate'});
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
exit;
}
@@ -131,7 +131,7 @@ if ($in{'keycertfile'}) {
print "</td></tr></table>\n";
&download_form("keycertfile", $in{'keycertfile'},
"$text{'certificate'} / $text{'key'}");
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
exit;
}
@@ -147,7 +147,7 @@ foreach $f ( grep { /^(.*\/)*$wildcard_pattern$/ && -f "$config{'ssl_dir'}/$_" }
print "</select>\n";
print "</td><td><input type=submit name=view value=\"$text{'view_view'}\"></td></tr></table></td></tr></table>\n";
print "</form>\n";
print "<hr>\n";
print &ui_hr();
&footer("", $text{'index_return'});
sub output_cert

2
cfengine/cluster.cgi
View File

@@ -79,7 +79,7 @@ foreach $h (@hosts) {
local $rv = &unserialise_variable($line);
close($rh);
print "<hr>\n";
print &ui_hr();
if ($rv && $rv->[0]) {
# Run ok! Show the output
print "<font size=+1>",&text('cluster_success', $d),"</font><br>\n";

2
cfengine/edit_cfd.cgi
View File

@@ -19,7 +19,7 @@ $conf = &get_cfd_config();
# Allow starting or stopping of cfd
($pid) = &find_byname("cfd");
print "<hr>\n";
print &ui_hr();
print "<table width=100%><tr>\n";
if ($pid) {
print "<form action=stop.cgi>\n";

2
cfengine/edit_push.cgi
View File

@@ -42,7 +42,7 @@ print "</table></td></tr></table>\n";
print "<input type=submit value='$text{'save'}'></form>\n";
if (@$hosts) {
print "<hr>\n";
print &ui_hr();
print "<form action=push.cgi>\n";
print "<table width=100%><tr>\n";
print "<td><input type=submit value='$text{'push_push'}'></td>\n";

2
cfengine/index.cgi
View File

@@ -49,7 +49,7 @@ $conf = &get_config();
&show_classes_table(\@secs, 0);
# Display option icons
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_options'});
@links = ( "run_form.cgi", "list_hosts.cgi", "edit_cfd.cgi", "edit_push.cgi" );
@titles = ( $text{'run_title'}, $text{'hosts_title'}, $text{'cfd_title'},

2
cfengine/list_hosts.cgi
View File

@@ -52,7 +52,7 @@ print "</tr></table></form>\n";
# Display run form
if (@hosts) {
print "<hr>\n";
print &ui_hr();
print "<form action=cluster.cgi>\n";
print "<table width=100%>\n";
print "<tr> <td><input type=submit value='$text{'hosts_run'}'></td>\n";

2
cluster-software/edit_host.cgi
View File

@@ -83,7 +83,7 @@ $heiropen{""}++;
# traverse the heirarchy
$spacer = "&nbsp;"x3;
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'host_installed'});
print "<table width=100%>\n";
&traverse("", 0);

2
cluster-software/edit_pack.cgi
View File

@@ -89,7 +89,7 @@ if (!$pinfo[7]) {
print "</tr> </table><p>\n";
# Show hosts with the package
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'edit_hosts'});
@icons = map { "/servers/images/$_->{'type'}.gif" } @got;
@links = map { "edit_host.cgi?id=$_->{'id'}" } @got;

4
cluster-software/index.cgi
View File

@@ -108,7 +108,7 @@ print "</tr></table>\n";
if (@hosts) {
# Display search form
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_installed'});
print "<table cellpadding=0 cellspacing=0 width=100%><tr><td>\n";
$formno += 2;
@@ -123,7 +123,7 @@ if (@hosts) {
print "</form></td> </tr></table>\n";
# Display cross-cluster install form
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_install'});
print "$text{'index_installmsg'}<p>\n";

2
cluster-useradmin/edit_group.cgi
View File

@@ -114,7 +114,7 @@ print "<input type=hidden name=group value=\"$ginfo{'group'}\">\n";
print "<td align=right><input type=submit value=\"$text{'delete'}\"></td> </tr>\n";
print "</form></table><p>\n";
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'uedit_hosts'});
&icons_table(\@links, \@titles, \@icons);

2
cluster-useradmin/edit_host.cgi
View File

@@ -56,7 +56,7 @@ print "</form>\n";
print "</tr></table>\n";
# Show users and groups
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'host_ulist'});
print "<table width=100% border>\n";
print "<tr $tb> <td><b>$text{'index_users'}</b></td> </tr>\n";

2
cluster-useradmin/edit_user.cgi
View File

@@ -433,7 +433,7 @@ print "<td align=right><input type=submit ",
"value=\"$text{'delete'}\"></td> </tr>\n";
print "</form></table><p>\n";
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'uedit_hosts'});
&icons_table(\@links, \@titles, \@icons);

2
cluster-useradmin/index.cgi
View File

@@ -89,7 +89,7 @@ print "</tr></table></form>\n";
if (@hosts) {
# Display search and add forms
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_users'});
print "<table width=100%><tr>\n";

2
cluster-usermin/edit_mod.cgi
View File

@@ -184,7 +184,7 @@ print "</select></td></form>\n";
print "</tr></table>\n";
# Show hosts with the module or theme
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'edit_hosts'});
@icons = map { "/servers/images/$_->{'type'}.gif" } @got;
@links = map { "edit_host.cgi?id=$_->{'id'}" } @got;

4
cluster-usermin/index.cgi
View File

@@ -109,7 +109,7 @@ print "</tr></table>\n";
if (@hosts) {
# Display modules lists and new module form
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_modules'});
print "<table width=100%><tr>\n";
print "<form action=edit_mod.cgi><td>\n";
@@ -155,7 +155,7 @@ if (@hosts) {
# Display upgrade form
&foreign_require("webmin", "webmin-lib.pl");
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_upgrade'});
print "$text{'index_updesc'}<p>\n";

2
cluster-webmin/edit_group.cgi
View File

@@ -145,7 +145,7 @@ print "<td align=right><input type=submit value='$text{'delete'}'></td></form>\n
print "</tr></table>\n";
# Show hosts with the group
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'group_hosts'});
@icons = map { "/servers/images/$_->{'type'}.gif" } @got;
@links = map { "edit_host.cgi?id=$_->{'id'}" } @got;

2
cluster-webmin/edit_mod.cgi
View File

@@ -233,7 +233,7 @@ if ($type eq 'mod') {
print "</tr></table>\n";
# Show hosts with the module or theme
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'edit_hosts'});
@icons = map { "/servers/images/$_->{'type'}.gif" } @got;
@links = map { "edit_host.cgi?id=$_->{'id'}" } @got;

2
cluster-webmin/edit_user.cgi
View File

@@ -202,7 +202,7 @@ print "<td align=right><input type=submit value='$text{'delete'}'></td></form>\n
print "</tr></table>\n";
# Show hosts with the user
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'user_hosts'});
@icons = map { "/servers/images/$_->{'type'}.gif" } @got;
@links = map { "edit_host.cgi?id=$_->{'id'}" } @got;

8
cluster-webmin/index.cgi
View File

@@ -120,7 +120,7 @@ print "</tr></table>\n";
if (@hosts) {
# Display user search forms and new user buttons
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_users'});
print "<table width=100%>\n";
@@ -181,7 +181,7 @@ if (@hosts) {
print "</table>\n";
# Display modules lists and new module form
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_modules'});
print "<table width=100%><tr>\n";
print "<form action=edit_mod.cgi><td>\n";
@@ -226,7 +226,7 @@ if (@hosts) {
# Display upgrade form
&foreign_require("webmin", "webmin-lib.pl");
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_upgrade'});
print "$text{'index_updesc'}<p>\n";
@@ -261,7 +261,7 @@ if (@hosts) {
$formno++;
# Show form for installing updates
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'index_update'});
print "$text{'index_updatedesc'}<p>\n";
print "<form action=update.cgi>\n";

2
dfsadmin/index.cgi
View File

@@ -85,7 +85,7 @@ else {
}
if (!$access{'view'}) {
print "<hr>\n";
print &ui_hr();
print &ui_buttons_start();
print &ui_buttons_row("restart_sharing.cgi",
$text{'index_apply'},

2
dhcp-dns/index.cgi
View File

@@ -101,7 +101,7 @@ else {
print "<b>$text{'index_none'}</b><p>\n";
}
print "<hr>\n";
print &ui_hr();
print &ui_buttons_start();
print &ui_buttons_row("apply.cgi", $text{'index_apply'},
$text{'index_applydesc'});

2
dhcpd/edit_shared.cgi
View File

@@ -159,7 +159,7 @@ else {
if ($config{'dhcpd_version'} >= 3 && !$in{'new'}) {
# Display address pools
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'esh_pools'});
local $pn = 1;
foreach $p (&find('pool', $sconf)) {

2
dhcpd/edit_subnet.cgi
View File

@@ -186,7 +186,7 @@ else {
if ($config{'dhcpd_version'} >= 3 && !$in{'new'}) {
# Display address pools
print "<hr>\n";
print &ui_hr();
print &ui_subheading($text{'esub_pools'});
local $pn = 1;
foreach $p (&find('pool', $sconf)) {

6
dhcpd/index.cgi
View File

@@ -287,7 +287,7 @@ if ($show_subnet_shared) {
print "</tr></table>\n";
}
print "<hr>\n";
print &ui_hr();
foreach $g (@group) {
$parent = (defined($subnet{$g}) ? 1 + $subnet{$g} : 0) +
@@ -439,7 +439,7 @@ if ($show_host_group) {
print "</tr></table>\n";
}
print "<hr>\n";
print &ui_hr();
############ START ZONES #####
@@ -471,7 +471,7 @@ if ($config{'dhcpd_version'} >= 3) {
print "<b>$text{'index_nozones'}</b><p>\n";
}
print "<a href='edit_zones.cgi?new=1'>","$text{'index_addzone'}</a>&nbsp;&nbsp;\n" if $access{'c_sub'};
print "<hr>\n";
print &ui_hr();
}
############ END ZONES #####

4
dnsadmin/delete_zone.cgi
View File

@@ -14,7 +14,7 @@ $rev = $zconf->{'values'}->[0] =~ /in-addr.arpa/i;
if (!$in{'confirm'}) {
# Ask the user if he is sure ..
&header("Delete Zone", "");
print "<hr>\n";
print &ui_hr();
print "<center><p>Are you sure you want to delete the zone <tt>",
&arpa_to_ip($zconf->{'values'}->[0]),"</tt> ? All records ",
@@ -27,7 +27,7 @@ if (!$in{'confirm'}) {
print "<input type=radio name=rev value=1 checked> $text{'yes'}\n";
print "<input type=radio name=rev value=0> $text{'no'}\n";
print "</form></center>\n";
print "<hr>\n";
print &ui_hr();
&footer("", "record types");
exit;
}

2
dnsadmin/edit_master.cgi
View File

@@ -85,7 +85,7 @@ print "<input type=hidden name=index value=\"$in{'index'}\">\n";
print "<td align=right><input type=submit value=Delete>\n";
print "</td></form> </tr></table>\n";
print "<hr>\n";
print &ui_hr();
&footer("", "zone list");
sub types_table

4
dnsadmin/edit_record.cgi
View File

@@ -12,12 +12,12 @@ $dom = $zconf->{'values'}->[0];
&error("You are not allowed to edit records in this zone");
&header("Edit $code_map{$in{'type'}}", "");
print "<center><font size=+2>In ",&arpa_to_ip($dom),"</font></center>\n";
print "<hr>\n";
print &ui_hr();
@recs = &read_zone_file($zconf->{'values'}->[1], $zconf->{'values'}->[0]);
&foreign_call("bind8", "record_input", $in{'index'}, undef, $in{'type'},
$zconf->{'values'}->[1], $zconf->{'values'}->[0], $in{'num'},
$recs[$in{'num'}]);
print "<hr>\n";
print &ui_hr();
&footer("edit_recs.cgi?index=$in{'index'}&type=$in{'type'}", "records");

2
dnsadmin/edit_recs.cgi
View File

@@ -42,7 +42,7 @@ if (@recs) {
}
print "<p>\n";
}
print "<hr>\n";
print &ui_hr();
&footer("edit_master.cgi?index=$in{'index'}", "record types");
sub recs_table

4
dnsadmin/edit_slave.cgi
View File

@@ -12,7 +12,7 @@ $conf = &get_config();
&header("Edit Slave Zone", "");
print "<center><font size=+2>",&arpa_to_ip($v[0]),"</font></center>\n";
print "<hr>\n";
print &ui_hr();
print "<form action=save_slave.cgi>\n";
print "<input type=hidden name=index value=\"$in{'index'}\">\n";
print "<table border width=100%>\n";
@@ -41,6 +41,6 @@ print "<form action=delete_zone.cgi>\n";
print "<input type=hidden name=index value=\"$in{'index'}\">\n";
print "<td align=right><input type=submit value=Delete></td></form>\n";
print "</tr></table>\n";
print "<hr>\n";
print &ui_hr();
&footer("", "zone list");

4
dnsadmin/edit_text.cgi
View File

@@ -11,7 +11,7 @@ $zconf = &get_config()->[$in{'index'}];
$file = &absolute_path($zconf->{'values'}->[1]);
&header("Edit Records File", "");
print "<center><font size=+1>$file</font></center>\n";
print "<hr>\n";
print &ui_hr();
open(FILE, $file);
while(<FILE>) {
@@ -29,6 +29,6 @@ print "<textarea name=text rows=20 cols=80>",
join("", @lines),"</textarea><p>\n";
print "<input type=submit value=Save> <input type=reset value=Undo></form>\n";
print "<hr>\n";
print &ui_hr();
&footer("edit_master.cgi?index=$in{'index'}", "record types");

16
dnsadmin/index.cgi
View File

@@ -3,7 +3,7 @@
require './dns-lib.pl';
&header("BIND 4 DNS Server", "", undef, 1, 1);
print "<hr>\n";
print &ui_hr();
%access = &get_module_acl();
# Check if named exists
@@ -12,7 +12,7 @@ if (!-x $config{'named_pathname'}) {
print "could not be found on your system. Maybe it is not installed,\n";
print "or your <a href=\"$gconfig{'webprefix'}/config.cgi?$module_name\">BIND 4 module\n";
print "configuration</a> is incorrect. <p>\n";
print "<hr>\n";
print &ui_hr();
&footer("/", "index");
exit;
}
@@ -23,7 +23,7 @@ if (0 && ($out =~ /bind\s+(\d+)\./i || $out =~ /named\s+(\d+)\./) && $1 >= 8) {
print "<p>The server <i>$config{'named_pathname'}</i> appears to\n";
print "be BIND 8. Maybe your should use the\n";
print "<a href=/bind8/>BIND 8 server module</a> instead. <p>\n";
print "<hr>\n";
print &ui_hr();
&footer("/", "index");
exit;
}
@@ -35,7 +35,7 @@ if (0 && $out =~ /\[-f\]/) {
print "<p>The server <i>$config{'named_pathname'}</i> appears to\n";
print "be BIND 8. Maybe your should use the\n";
print "<a href=/bind8/>BIND 8 server module</a> instead. <p>\n";
print "<hr>\n";
print &ui_hr();
&footer("/", "index");
exit;
}
@@ -61,7 +61,7 @@ if ($need_create) {
"server, but use Webmin's older root server information<p>\n";
print "<center><input type=submit value=\"Create Primary Configuration File and Start Nameserver\"></center>\n";
print "</form>\n";
print "<hr>\n";
print &ui_hr();
&footer("/", "index");
exit;
}
@@ -130,7 +130,7 @@ print "<p>\n";
if ($access{'defaults'}) {
# Display form to set the defaults for new zones
&get_zone_defaults(\%zd);
print "<hr>\n";
print &ui_hr();
print &ui_subheading("New Master Zone Defaults");
print "<form action=save_zonedef.cgi>\n";
print "<table border>\n";
@@ -151,7 +151,7 @@ if ($access{'defaults'}) {
}
# Display a form to start or restart named
print "<hr>\n";
print &ui_hr();
if ($config{'named_pid_file'}) {
if (open(PID, $config{'named_pid_file'})) {
<PID> =~ /(\d+)/;
@@ -189,7 +189,7 @@ else {
print "</form>\n";
}
print "<hr>\n";
print &ui_hr();
&footer("/", "index");
sub zones_table

4
dnsadmin/master_form.cgi
View File

@@ -7,7 +7,7 @@ require './dns-lib.pl';
&header("Create Master Zone", "");
%access = &get_module_acl();
$access{'master'} || &error("You cannot create master zones");
print "<hr>\n";
print &ui_hr();
print "<form action=create_master.cgi>\n";
print "<table border width=100%>\n";
@@ -51,6 +51,6 @@ print "<td><input name=minimum size=8 value=$zd{'minimum'}> seconds</td> </tr>\n
print "</table></td></tr></table><br>\n";
print "<input type=submit value=\"Create Zone\"></form>\n";
print "<hr>\n";
print &ui_hr();
&footer("", "zone list");

4
dnsadmin/slave_form.cgi
View File

@@ -6,7 +6,7 @@ require './dns-lib.pl';
%access = &get_module_acl();
$access{'slave'} || &error("You are not allowed to create slave zones");
&header("Create Slave Zone", "");
print "<hr>\n";
print &ui_hr();
print "<form action=create_slave.cgi>\n";
print "<input type=hidden name=type value=\"$lctype\">\n";
@@ -35,6 +35,6 @@ print "<textarea name=masters rows=4 cols=30></textarea></td> </tr>\n";
print "</table></td></tr></table><br>\n";
print "<input type=submit value=\"Create Zone\"></form>\n";
print "<hr>\n";
print &ui_hr();
&footer("", "zone list");

2
exports/index.cgi
View File

@@ -59,7 +59,7 @@ else {
print "<a href=\"edit_export.cgi?new=1\">$text{'index_add'}</a> <p>\n";
}
print "<hr>\n";
print &ui_hr();
print "<table width=100%> <tr>\n";
print "<td><form action=restart_mountd.cgi>\n";
print "<input type=submit value=\"$text{'index_apply'}\">\n";

2
fdisk/edit_disk.cgi
View File

@@ -134,7 +134,7 @@ else {
print &ui_links_row(\@edlinks);
# Buttons for IDE params and SMART
print "<hr>\n";
print &ui_hr();
print &ui_buttons_start();
if (&supports_hdparm($d)) {
print &ui_buttons_row("edit_hdparm.cgi", $text{'index_hdparm'},

2
fdisk/edit_part.cgi
View File

@@ -206,7 +206,7 @@ else {
}
if (!$in{'new'} && !$pinfo->{'extended'}) {
print "<hr>\n";
print &ui_hr();
print &ui_buttons_start();
if (!@stat || $stat[2] == 0) {

4
fetchmail/index.cgi
View File

@@ -30,7 +30,7 @@ if ($config{'config_file'}) {
&show_polls(\@conf, $config{'config_file'}, $config{'daemon_user'});
local @uinfo = getpwnam($config{'daemon_user'});
print "<hr>\n";
print &ui_hr();
print "<table width=100%>\n";
if (&foreign_installed("cron") && $access{'cron'}) {
@@ -132,7 +132,7 @@ else {
if (&foreign_installed("cron") && $access{'cron'}) {
# Show button to manage global cron job
print "<hr>\n";
print &ui_hr();
print &ui_buttons_start();
print &ui_buttons_row("edit_cron.cgi",
$text{'index_cron'}, $text{'index_crondesc2'});

4
firewall/index.cgi
View File

@@ -177,7 +177,7 @@ else {
# Display a table of rules for each chain
foreach $c (sort by_string_for_iptables keys %{$table->{'defaults'}}) {
print "<hr>\n";
print &ui_hr();
@rules = grep { lc($_->{'chain'}) eq lc($c) }
@{$table->{'rules'}};
print "<b>",$text{"index_chain_".lc($c)} ||
@@ -336,7 +336,7 @@ else {
# Display buttons for applying and un-applying the configuration,
# and for creating an init script if possible
print "<hr>\n";
print &ui_hr();
print "<table width=100%>\n";
if (!$config{'direct'}) {

2
frox/index.cgi
View File

@@ -40,7 +40,7 @@ push(@names, "iptables") if (&foreign_check("firewall"));
# Show start/stop/apply buttons
$conf = &get_config();
if (&find_value("FromInetd", $conf) ne "yes") {
print "<hr>\n";
print &ui_hr();
print &ui_buttons_start();
if (&is_frox_running()) {
print &ui_buttons_row("apply.cgi", $text{'index_apply'},