%PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY
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/iscsi-server/ |
Upload File : |
#!/usr/bin/perl # Create, update or delete a user use strict; use warnings; no warnings 'redefine'; no warnings 'uninitialized'; require './iscsi-server-lib.pl'; our (%text, %in, %config); &error_setup($text{'user_err'}); &lock_file($config{'auths_file'}); &ReadParse(); # Get the user my $user; if (!$in{'new'}) { ($user) = grep { $_->{'user'} eq $in{'old'} } &list_iscsi_users(); $user || &error($text{'user_egone'}); } else { $user = { }; } if ($in{'delete'}) { # Just remove the user &delete_iscsi_user($user); } else { # Validate and store inputs $in{'iuser'} =~ /^[^ \t:]+$/ || &error($text{'user_euser'}); $in{'ipass'} =~ /^[^ \t:]+$/ || &error($text{'user_epass'}); $user->{'user'} = $in{'iuser'}; $user->{'pass'} = $in{'ipass'}; $user->{'mode'} = $in{'imode'}; # Create or update the user if ($in{'new'}) { &create_iscsi_user($user); } else { &modify_iscsi_user($user); } } &unlock_file($config{'auths_file'}); &webmin_log($in{'new'} ? 'create' : $in{'delete'} ? 'delete' : 'modify', 'user', $user->{'user'}); &redirect("list_users.cgi");