parent
196b7c72a3
commit
aae7aa527f
@ -6,99 +6,19 @@ require './postfix-lib.pl';
|
|||||||
|
|
||||||
&ReadParse();
|
&ReadParse();
|
||||||
|
|
||||||
$System=$in{'system'}||1;
|
$System=1;
|
||||||
$Package=$in{'package'}||1;
|
$Package=1;
|
||||||
$Locking=$in{'locking'}||0;
|
$Locking=1;
|
||||||
$Tables=$in{'tables'}||0;
|
$Tables=1;
|
||||||
$Main=$in{'main'}||1;
|
$Main=1;
|
||||||
$Master=$in{'master'}||1;
|
$Master=1;
|
||||||
$Permissions=$in{'permissions'}||0;
|
$Permissions=1;
|
||||||
$Libraries=$in{'libraries'}||0;
|
$Libraries=1;
|
||||||
$Warn=$in{'warn'}||1;
|
$Warn=1;
|
||||||
$Defaultsinmain=$in{'defaultsinmain'}||1;
|
$Defaultsinmain=1;
|
||||||
|
|
||||||
$access{'postfinger'} || &error($text{'postfinger_ecannot'});
|
$access{'postfinger'} || &error($text{'postfinger_ecannot'});
|
||||||
&header($text{'postfinger_title'}, "");
|
&header($text{'postfinger_title'}, "");
|
||||||
if ( !$in{'go'} ) {
|
|
||||||
print "<br><form action=postfinger.cgi>\n";
|
|
||||||
print "<input type=hidden name=go value=go>\n";
|
|
||||||
print "<table border>\n";
|
|
||||||
print "<tr $cb> <td><table>\n";
|
|
||||||
print "<tr $cb> <td><font color=0000FF size=4><b>Display Options</b></font></td></tr>\n";
|
|
||||||
print "<tr $cb> <td><b>System</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=system value=1 %s> %s\n",
|
|
||||||
$System eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=system value=no %s> %s\n",
|
|
||||||
$System eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $System),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Package</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=package value=1 %s> %s\n",
|
|
||||||
$Package eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=package value=no %s> %s\n",
|
|
||||||
$Package eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Package),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Main</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=main value=1 %s> %s\n",
|
|
||||||
$Main eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=main value=no %s> %s\n",
|
|
||||||
$Main eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Main),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Defaults in Main</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=defaultsinmain value=1 %s> %s\n",
|
|
||||||
$Defaultsinmain eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=defaultsinmain value=no %s> %s\n",
|
|
||||||
$Defaultsinmain eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Defaultsinmain),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Master</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=master value=1 %s> %s\n",
|
|
||||||
$Master eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=master value=no %s> %s\n",
|
|
||||||
$Master eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Master),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Locking</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=locking value=1 %s> %s\n",
|
|
||||||
$Locking eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=locking value=no %s> %s\n",
|
|
||||||
$Locking eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Locking),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Tables</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=tables value=1 %s> %s\n",
|
|
||||||
$Tables eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=tables value=no %s> %s\n",
|
|
||||||
$Tables eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Tables),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Permissions</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=permissions value=1 %s> %s\n",
|
|
||||||
$Permissions eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=permissions value=no %s> %s\n",
|
|
||||||
$Permissions eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Permissions),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Libraries</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=libraries value=1 %s> %s\n",
|
|
||||||
$Libraries eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=libraries value=no %s> %s\n",
|
|
||||||
$Libraries eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Libraries),"</td></tr>\n";
|
|
||||||
|
|
||||||
print "<tr $cb> <td><b>Warn</b></td> <td colspan=3>\n";
|
|
||||||
printf "<input type=radio name=warn value=1 %s> %s\n",
|
|
||||||
$Warn eq 1 ? 'checked' : '', $text{'yes'};
|
|
||||||
printf "<input type=radio name=warn value=no %s> %s\n",
|
|
||||||
$Warn eq 1 ? '' : 'checked', $text{'no'},
|
|
||||||
join(" ", $Warn),"</td></tr>\n";
|
|
||||||
print "<tr><td></td></tr><tr><td><input type=submit value=\"$text{'postfinger_show'}\"></td></tr></form>\n";
|
|
||||||
|
|
||||||
print "</table></td></tr></table>";
|
|
||||||
&ui_print_footer("index.cgi", $text{'index_title'});
|
|
||||||
} else {
|
|
||||||
&head;
|
&head;
|
||||||
if (! -x $config{'postfix_config_command'} && ! -r $config{'postfix_config_file'} ) {
|
if (! -x $config{'postfix_config_command'} && ! -r $config{'postfix_config_file'} ) {
|
||||||
print "Can not find postconf";
|
print "Can not find postconf";
|
||||||
@ -297,7 +217,6 @@ if ( !$in{'go'} ) {
|
|||||||
}
|
}
|
||||||
print "</td></tr></table></td></tr></table>";
|
print "</td></tr></table></td></tr></table>";
|
||||||
&ui_print_footer("index.cgi", $text{'index_title'});
|
&ui_print_footer("index.cgi", $text{'index_title'});
|
||||||
}
|
|
||||||
|
|
||||||
sub head {
|
sub head {
|
||||||
print "<style type='text/css'><!--";
|
print "<style type='text/css'><!--";
|
||||||
|
Loading…
x
Reference in New Issue
Block a user