VladPolskiy/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2025-08-16 14:51:18 +00:00
Code Issues Packages Projects Releases Wiki Activity

A little more ui-libification

Browse Source
This commit is contained in:
Jamie Cameron
2012-05-13 22:20:57 -07:00
parent aca1390c3f
commit f0d55d9eb6
2 changed files with 58 additions and 56 deletions
Download Patch File Download Diff File Expand all files Collapse all files

81
mount/netbsd-lib.pl
View File

@ -279,54 +279,57 @@ return $_[0] eq "nfs";
# Output HTML for editing the mount location of some filesystem.
sub generate_location
{
if ($_[0] eq "nfs") {
local ($type, $loc) = @_;
if ($type eq "nfs") {
# NFS mount from some host and directory
$_[1] =~ /^([^:]+):(.*)$/;
print "<tr> <td><b>NFS Hostname</b></td>\n";
print "<td><input name=nfs_host size=20 value=\"$1\">\n";
print &nfs_server_chooser_button("nfs_host");
print "</td>\n";
print "<td><b>NFS Directory</b></td>\n";
print "<td><input name=nfs_dir size=20 value=\"$2\">\n";
print &nfs_export_chooser_button("nfs_host", "nfs_dir");
print "</td> </tr>\n";
local ($host, $dir) = $loc =~ /^([^:]+):(.*)$/ ? ( $1, $2 ) : ( );
print &ui_table_row(&hlink($text{'linux_nfshost'}, "nfshost"),
&ui_textbox("nfs_host", $host, 30).
&nfs_server_chooser_button("nfs_host").
"&nbsp;".
"<b>".&hlink($text{'linux_nfsdir'}, "nfsdir")."</b> ".
&ui_textbox("nfs_dir",
($type eq "nfs4") && ($dir eq "") ? "/" : $dir, 30).
&nfs_export_chooser_button("nfs_host", "nfs_dir"));
}
else {
if ($_[0] eq "swap") {
# Swap file or device
printf "<tr> <td valign=top><b>Swap File</b></td>\n";
}
else {
# Disk-based filesystem
printf "<tr> <td valign=top><b>%s Disk</b></td>\n",
&fstype_name($_[0]);
}
print "<td colspan=3>\n";
if ($_[1] =~ /^\/dev\/wd(\d)s(\d)([a-z]*)$/) {
local $msg;
if ($type eq "swap") {
# Swap file or device
$msg = $text{'linux_swapfile'};
}
else {
# Disk-based filesystem
$msg = &fstype_name($type);
}
local ($disk_dev, $ide_t, $ide_s, $ide_p, $scsi_t, $scsi_s, $scsi_p);
if ($loc =~ /^\/dev\/wd(\d)s(\d)([a-z]*)$/) {
$disk_dev = 0; $ide_t = $1; $ide_s = $2; $ide_p = $3;
}
elsif ($_[1] =~ /^\/dev\/sd(\d)s(\d)([a-z]*)$/) {
elsif ($loc =~ /^\/dev\/sd(\d)s(\d)([a-z]*)$/) {
$disk_dev = 1; $scsi_t = $1; $scsi_s = $2; $scsi_p = $3;
}
else { $disk_dev = 2; }
printf "<input type=radio name=disk_dev value=0 %s> IDE Hard Disk:\n",
$disk_dev == 0 ? "checked" : "";
print "Device <input name=ide_t size=3 value=\"$ide_t\">\n";
print "Slice <input name=ide_s size=3 value=\"$ide_s\">\n";
print "Partition <input name=ide_p size=3 value=\"$ide_p\"><br>\n";
printf "<input type=radio name=disk_dev value=1 %s> SCSI Disk:\n",
$disk_dev == 1 ? "checked" : "";
print "Device <input name=scsi_t size=3 value=\"$scsi_t\">\n";
print "Slice <input name=scsi_s size=3 value=\"$scsi_s\">\n";
print "Partition <input name=scsi_p size=3 value=\"$scsi_p\"><br>\n";
printf "<input type=radio name=disk_dev value=2 %s> Other Device:\n",
$disk_dev == 2 ? "checked" : "";
printf "<input size=20 name=dev_path value=\"%s\"><br>\n",
$disk_dev == 2 ? $_[1] : "";
print "</td> </tr>\n";
print &ui_table_row($msg,
&ui_radio_table("disk_dev", $disk_dev,
[ [ 0, $text{'freebsd_ide'},
$text{'freebsd_device'}." ".
&ui_textbox("ide_t", $ide_t, 4)." ".
$text{'freebsd_slice'}." ".
&ui_textbox("ide_s", $ide_s, 4)." ".
$text{'freebsd_part'}." ".
&ui_textbox("ide_p", $ide_p, 4) ],
[ 1, $text{'freebsd_scsi'},
$text{'freebsd_device'}." ".
&ui_textbox("scsi_t", $scsi_t, 4)." ".
$text{'freebsd_slice'}." ".
&ui_textbox("scsi_s", $scsi_s, 4)." ".
$text{'freebsd_part'}." ".
&ui_textbox("scsi_p", $scsi_p, 4) ],
[ 2, $text{'freebsd_other'},
&ui_textbox("dev_path", $disk_dev == 2 ? $loc : "", 40).
" ".&file_chooser_button("dev_path", 0) ] ]));
}
}