FM / usermount

/usr/share/usermin/usermount

Name	Size	Mode	Actions
images/	-	0755	rm
lang/	-	0755	rm
ulang/	-	0755	rm
CHANGELOG	109	0644	edit dl rm
config	87	0644	edit dl rm
config.info	197	0644	edit dl rm
config.info.ca	272	0755	edit dl rm
config.info.de	244	0644	edit dl rm
config.info.nl	219	0755	edit dl rm
config.info.no	195	0644	edit dl rm
index.cgi	1737	0755	edit dl rm
linux-lib.pl	74536	0755	edit dl rm
module.info	202	0644	edit dl rm
module.info.ar	0	0644	edit dl rm
module.info.ar.auto	259	0644	edit dl rm
module.info.bg	0	0644	edit dl rm
module.info.bg.auto	292	0644	edit dl rm
module.info.ca	40	0644	edit dl rm
module.info.ca.auto	137	0644	edit dl rm
module.info.cs	43	0644	edit dl rm
module.info.cs.auto	130	0644	edit dl rm
module.info.da	0	0644	edit dl rm
module.info.da.auto	151	0644	edit dl rm
module.info.de	116	0644	edit dl rm
module.info.de.auto	18	0644	edit dl rm
module.info.el	0	0644	edit dl rm
module.info.el.auto	297	0644	edit dl rm
module.info.es	0	0644	edit dl rm
module.info.es.auto	166	0644	edit dl rm
module.info.eu	0	0644	edit dl rm
module.info.eu.auto	148	0644	edit dl rm
module.info.fa	0	0644	edit dl rm
module.info.fa.auto	222	0644	edit dl rm
module.info.fi	0	0644	edit dl rm
module.info.fi.auto	169	0644	edit dl rm
module.info.fr	0	0644	edit dl rm
module.info.fr.auto	186	0644	edit dl rm
module.info.hr	0	0644	edit dl rm
module.info.hr.auto	154	0644	edit dl rm
module.info.hu	35	0644	edit dl rm
module.info.hu.auto	138	0644	edit dl rm
module.info.it	0	0644	edit dl rm
module.info.it.auto	156	0644	edit dl rm
module.info.ja	0	0644	edit dl rm
module.info.ja.auto	241	0644	edit dl rm
module.info.ko	0	0644	edit dl rm
module.info.ko.auto	197	0644	edit dl rm
module.info.ms	0	0644	edit dl rm
module.info.ms.auto	146	0644	edit dl rm
module.info.nl	29	0644	edit dl rm
module.info.nl.auto	133	0644	edit dl rm
module.info.no	27	0644	edit dl rm
module.info.no.auto	112	0644	edit dl rm
module.info.pl	35	0644	edit dl rm
module.info.pl.auto	141	0644	edit dl rm
module.info.pt	0	0644	edit dl rm
module.info.pt.auto	176	0644	edit dl rm
module.info.pt_BR	0	0644	edit dl rm
module.info.pt_BR.auto	185	0644	edit dl rm
module.info.ru	0	0644	edit dl rm
module.info.ru.auto	299	0644	edit dl rm
module.info.sk	0	0644	edit dl rm
module.info.sk.auto	177	0644	edit dl rm
module.info.sv	0	0644	edit dl rm
module.info.sv.auto	144	0644	edit dl rm
module.info.tr	0	0644	edit dl rm
module.info.tr.auto	189	0644	edit dl rm
module.info.uk	0	0644	edit dl rm
module.info.uk.auto	305	0644	edit dl rm
module.info.zh	0	0644	edit dl rm
module.info.zh.auto	130	0644	edit dl rm
module.info.zh_TW	0	0644	edit dl rm
module.info.zh_TW.auto	139	0644	edit dl rm
mount.cgi	600	0755	edit dl rm
usermount-lib.pl	579	0755	edit dl rm

Edit: /usr/share/usermin/usermount/index.cgi (1737B)

#!/usr/bin/perl
# index.cgi
# Display a table of all filesystems that can be mounted/unmounted by
# a user, due to having the user flag set

require './usermount-lib.pl';
&ui_print_header(undef, $text{'index_title'}, "", undef, 0, 1);

@mounts = &list_mounts();
foreach $m (@mounts) {
	local %options;
	&parse_options($m->[2], $m->[3]);
	if (defined($options{'user'})) {
		push(@usermounts, $m);
		}
	}
foreach $m (&list_mounted()) {
	$mounted{$m->[0],$m->[1]}++;
	}
if (@usermounts) {
	print "<form action=mount.cgi>\n";
	@tds = ( "width=25%", "width=25%", "width=25%", "width=10%",
		 "width=15% nowrap" );
	print &ui_columns_start([ $text{'index_dir'},
				  $text{'index_type'},
				  $text{'index_dev'},
				  $text{'index_status'},
				  $text{'index_action'} ], 100, 0, \@tds);
	foreach $u (@usermounts) {
		local @cols;
		push(@cols, $u->[0]);
		local $fsn = &fstype_name($u->[2]);
		push(@cols, $u->[2] eq "*" ? $text{'index_auto'}
					   : $fsn);
		push(@cols, &device_name($u->[1]));
		if ($mounted{$u->[0],$u->[1]}) {
			# Mounted, show button to un-mount
			push(@cols, $text{'yes'});
			push(@cols, &ui_submit($text{'index_umount'},
					       "umount_$u->[0]"));
			}
		else {
			# Not mounted
			push(@cols, $text{'no'});
			if ($u->[3] =~ /encryption/) {
				# Assume a password is needed
				push(@cols, &ui_submit($text{'index_mount2'},
						       "mount_$u->[0]")." ".
					    &ui_textbox("pass_$u->[0]",
							undef, 15));
				}
			else {
				push(@cols, &ui_submit($text{'index_mount'},
						       "mount_$u->[0]"));
				}
			}
		print &ui_columns_row(\@cols);
		}
	print &ui_columns_end();
	print "</form>\n";
	}
else {
	print "<b>$text{'index_none'}</b><p>\n";
	}

&ui_print_footer("/", $text{'index'});

#!/usr/bin/perl # index.cgi # Display a table of all filesystems that can be mounted/unmounted by # a user, due to having the user flag set require './usermount-lib.pl'; &ui_print_header(undef, $text{'index_title'}, "", undef, 0, 1); @mounts = &list_mounts(); foreach $m (@mounts) { local %options; &parse_options($m->[2], $m->[3]); if (defined($options{'user'})) { push(@usermounts, $m); } } foreach $m (&list_mounted()) { $mounted{$m->[0],$m->[1]}++; } if (@usermounts) { print "

\n"; @tds = ( "width=25%", "width=25%", "width=25%", "width=10%", "width=15% nowrap" ); print &ui_columns_start([ $text{'index_dir'}, $text{'index_type'}, $text{'index_dev'}, $text{'index_status'}, $text{'index_action'} ], 100, 0, \@tds); foreach $u (@usermounts) { local @cols; push(@cols, $u->[0]); local $fsn = &fstype_name($u->[2]); push(@cols, $u->[2] eq "*" ? $text{'index_auto'} : $fsn); push(@cols, &device_name($u->[1])); if ($mounted{$u->[0],$u->[1]}) { # Mounted, show button to un-mount push(@cols, $text{'yes'}); push(@cols, &ui_submit($text{'index_umount'}, "umount_$u->[0]")); } else { # Not mounted push(@cols, $text{'no'}); if ($u->[3] =~ /encryption/) { # Assume a password is needed push(@cols, &ui_submit($text{'index_mount2'}, "mount_$u->[0]")." ". &ui_textbox("pass_$u->[0]", undef, 15)); } else { push(@cols, &ui_submit($text{'index_mount'}, "mount_$u->[0]")); } } print &ui_columns_row(\@cols); } print &ui_columns_end(); print "

\n"; } else { print "$text{'index_none'}

\n"; } &ui_print_footer("/", $text{'index'});