← Back
Editing: activate.cgi
#!/usr/bin/perl # activate.cgi # Turn quotas on or off for some filesystem require './quota-lib.pl'; &ReadParse(); &can_edit_filesys($in{'dir'}) && $access{'enable'} || &error($text{'activate_eallow'}); if ($in{'active'} == 0) { # Turn on quotas &error_setup($text{'activate_eon'}); @list = &list_filesystems(); ($fs) = grep { $_->[0] eq $in{'dir'} } @list; if (!$fs->[4] && $fs->[6]) { # Try to enable in /etc/fstab $error = "a_make_possible($in{'dir'}, $fs->[6]); &error($error) if ($error); &webmin_log("support", undef, $in{'dir'}, \%in); } else { # Try to turn on $error = "aon($in{'dir'}, $in{'mode'}); &error($error) if ($error); &webmin_log("activate", undef, $in{'dir'}, \%in); } } else { # Turn off quotas &error_setup($text{'activate_eoff'}); if ($error = "aoff($in{'dir'}, $in{'mode'})) { &error($error); } &webmin_log("deactivate", undef, $in{'dir'}, \%in); } &redirect("");
Save File
Cancel