| Server IP : 49.231.201.246 / Your IP : 216.73.216.149 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 : /usr/share/webmin/samba/ |
Upload File : |
do 'samba-lib.pl';
sub cgi_args
{
my ($cgi) = @_;
my @shares = &list_shares();
if ($cgi eq 'edit_pshare.cgi' || $cgi eq 'edit_popts.cgi') {
# First printer share
foreach my $s (@shares) {
next if (!&can('r', \%access, $s) || $s eq 'global');
local %share;
&get_share($s);
if (&istrue("printable")) {
return 'share='.&urlize($s);
}
}
return $access{'c_ps'} ? '' : 'none'; # Create if allowed
}
elsif ($cgi eq 'edit_fshare.cgi' || $cgi eq 'edit_sec.cgi' ||
$cgi eq 'edit_fperm.cgi' || $cgi eq 'edit_fname.cgi' ||
$cgi eq 'edit_fmisc.cgi') {
# First non-printer share
foreach my $s (@shares) {
next if (!&can('r', \%access, $s) || $s eq 'global');
local %share;
&get_share($s);
if (!&istrue("printable")) {
return 'share='.&urlize($s);
}
}
return $access{'c_fs'} ? '' : 'none'; # Create if allowed
}
elsif ($cgi eq 'edit_euser.cgi') {
# First user, if any
my @ulist = &list_users();
return @ulist ? 'idx='.$ulist[0]->{'index'} : 'none';
}
return undef;
}