| Server IP : 14.207.165.8 / Your IP : 216.73.216.126 Web Server : Apache/2.4.18 (Ubuntu) System : Linux 246 4.4.0-210-generic #242-Ubuntu SMP Fri Apr 16 09:57:56 UTC 2021 x86_64 User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : exec,passthru,shell_exec,system,proc_open,popen,pcntl_exec MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /proc/thread-self/root/usr/share/webmin/samba/ |
Upload File : |
#!/usr/bin/perl
# save_group.cgi
# Update or delete a Samba group
require './samba-lib.pl';
$access{'maint_groups'} || &error($text{'groups_ecannot'});
&ReadParse();
@groups = &list_groups();
$group = $groups[$in{'idx'}] if (!$in{'new'});
$oldname = $group->{'name'} || $in{'name'};
if ($in{'delete'}) {
# Just remove this group
&delete_group($group);
}
else {
# Validate inputs
&error_setup($text{'gsave_err'});
if ($in{'new'}) {
$in{'name'} =~ /\S/ || &error($text{'gsave_ename'});
$group->{'name'} = $in{'name'};
}
$group->{'type'} = $in{'type'};
if ($in{'unix_def'}) {
$group->{'unix'} = -1;
}
else {
getgrnam($in{'unix'}) || $in{'unix'} =~ /^\-?\d+$/ ||
&error($text{'gsave_eunix'});
$group->{'unix'} = $in{'unix'};
}
$group->{'desc'} = $in{'desc'};
if ($in{'new'} && !$in{'priv_def'}) {
$in{'priv'} =~ /\S/ || &error($text{'gsave_epriv'});
$in{'type'} eq 'l' || &error($text{'gsave_elocal'});
$group->{'priv'} = $in{'priv'};
}
# Update or create the group
if ($in{'new'}) {
&create_group($group);
}
else {
&modify_group($group);
}
}
&webmin_log($in{'new'} ? "create" : $in{'delete'} ? "delete" : "modify",
"group", $oldname, \%group);
&redirect("list_groups.cgi");