2 # Display a form for updating multiple group quotas on a filesystem
4 require './quota-lib.pl';
7 @d = split(/\0/, $in{'d'});
10 &error(&text('egroup_eallowgr', $u));
12 $access{'ro'} && &error(&text('egroup_eallowgr', $u));
13 &can_edit_filesys($fs) ||
14 &error($text{'euser_eallowfs'});
15 &ui_print_header(undef, $text{'gmass_title'}, "", "edit_group_mass");
17 $bsize = &block_size($fs);
19 print &text('gmass_count', scalar(@d)),"<p>\n";
20 print &ui_form_start("save_group_mass.cgi", "post");
22 print &ui_hidden("d", $u),"\n";
24 print &ui_hidden("dir", $fs),"\n";
25 print &ui_table_start($text{'gmass_header'}, undef, 2);
27 foreach $t ('sblocks', 'hblocks', 'sfiles', 'hfiles') {
28 print &ui_table_row($text{'umass_'.$t},
29 &ui_radio($t.'_def', 0,
30 [ [ 0, $text{'umass_leave'} ],
31 [ 1, $text{'umass_unlimited'} ],
32 [ 2, $text{'umass_set'}." ".
33 ($t =~ /blocks$/ ? "a_inputbox($t, "", $bsize)
34 : &ui_textbox($t, "", 10)) ] ]));
37 print &ui_table_end();
38 print &ui_form_end([ [ "ok", $text{'gmass_ok'} ] ]);
40 &ui_print_footer("list_groups.cgi?dir=".&urlize($fs), $text{'egroup_greturn'});