edit_fmisc.cgi

Unix下基于Web的管理工具

#!/usr/local/bin/perl
# edit_fmisc.cgi
# Edit misc file options

require './samba-lib.pl';
&ReadParse();
$s = $in{'share'};
if ($s eq "global") {
	&header("Miscellaneous File Defaults", "");
	}
else {
	&header("Miscellaneous File Options", "");
	print "<center><font size=+1>For share <tt>$s</tt></font></center>\n";
	}
&get_share($s);
print "<hr>\n";

print "<form action=save_fmisc.cgi>\n";
print "<input type=hidden name=old_name value=\"$s\">\n";
print "<table border width=100%>\n";
print "<tr $tb> <td><b>Miscellaneous Options</b></td> </tr>\n";
print "<tr $cb> <td><table width=100%>\n";

print "<tr> <td align=right><b>Do file locking?</b></td>\n";
print "<td>",&yesno_input("locking"),"</td>\n";

print "<td align=right><b>Max connections</b></td>\n";
printf "<td><input type=radio name=max_connections_def value=1 %s> Unlimited\n",
	&getval("max connections") == 0 ? "checked" : "";
printf "<input type=radio name=max_connections_def value=0 %s>\n",
	&getval("max connections") > 0 ? "checked" : "";
printf "<input size=6 name=max_connections value=\"%s\"></td> </tr>\n",
	&getval("max connections") > 0 ? &getval("max connections") : "";

print "<tr> <td align=right><b>Fake oplocks?</b></td>\n";
print "<td>",&yesno_input("fake oplocks"),"</td>\n";

print "<td align=right><b>Use share modes?</b></td>\n";
print "<td>",&yesno_input("share modes"),"</td> </tr>\n";

print "<tr> <td align=right><b>Strict locking?</b></td>\n";
print "<td>",&yesno_input("strict locking"),"</td>\n";

print "<td align=right><b>Sync after writes?</b></td>\n";
print "<td>",&yesno_input("sync always"),"</td> </tr>\n";

print "<tr> <td align=right><b>Volume name</b></td>\n";
printf "<td colspan=3><input type=radio name=volume_def value=1 %s> Same as share\n",
	&getval("volume") eq "" ? "checked" : "";
printf "<input type=radio name=volume_def value=0 %s>\n",
	&getval("volume") eq "" ? "" : "checked";
printf "<input size=25 name=volume value=\"%s\"></td> </tr>\n",
	&getval("volume");

print "</table><table>\n";

print "<tr> <td align=right><b>Unix-DOS file name map</b></td>\n";
printf"<td><input name=mangled_map size=40 value=\"%s\"></td></tr>\n",
	&getval("mangled map");

print "<tr> <td align=right><b>Command to run on connect</b></td>\n";
printf "<td><input name=preexec size=40 value=\"%s\"></td> </tr>\n",
	&getval("preexec");

print "<tr> <td align=right><b>Command to run on disconnect</b></td>\n";
printf "<td><input name=postexec size=40 value=\"%s\"></td> </tr>\n",
	&getval("postexec");

print "<tr> <td align=right><b>Command to run on connect <i>as root</i></b></td>\n";
printf "<td><input name=root_preexec size=40 value=\"%s\"></td> </tr>\n",
	&getval("root preexec");

print "<tr> <td align=right><b>Command to run on disconnect <i>as root</i></b></td>\n";
printf "<td><input name=root_postexec size=40 value=\"%s\"></td> </tr>\n",
	&getval("root postexec");

print "</table> </td></tr></table><p>\n";
print "<input type=submit value=Save></form>\n";
print "<hr>\n";
&footer("edit_fshare.cgi?share=".&urlize($s), "file share");