| Server IP : 49.231.201.246 / Your IP : 216.73.216.248 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 : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority, MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/mysql/ |
Upload File : |
#!/usr/bin/perl
# list_dbs.cgi
# Display database-level permissions
require './mysql-lib.pl';
$access{'perms'} || &error($text{'perms_ecannot'});
&ui_print_header(undef, $text{'dbs_title'}, "", "dbs");
@rowlinks = ( &ui_link("edit_db.cgi?new=1",$text{'dbs_add'}) );
$d = &execute_sql_safe($master_db, "select * from db order by db");
%fieldmap = map { $_->{'field'}, $_->{'index'} }
&table_structure($master_db, "db");
if (@{$d->{'data'}}) {
print &ui_form_start("delete_dbs.cgi");
unshift(@rowlinks, &select_all_link("d", 0),
&select_invert_link("d", 0) );
print &ui_links_row(\@rowlinks);
@tds = ( "width=5" );
print &ui_columns_start([ "",
$text{'dbs_db'},
$text{'dbs_user'},
$text{'dbs_host'},
$text{'dbs_perms'} ], 100, 0, \@tds);
$i = -1;
foreach $u (@{$d->{'data'}}) {
$i++;
next if ($access{'perms'} == 2 && !&can_edit_db($u->[1]));
local @cols;
my $dbname = &unquote_mysql_database($u->[1]);
my $big_style = ' style="position: absolute; margin-top: -2px;"';
my $wildcard = $u->[1]=~ /\_/ &&
$u->[1] eq $dbname ? "<big$big_style>∗</big>" : '';
push(@cols, "<a href='edit_db.cgi?idx=$i'>".
($u->[1] eq '%' || $u->[1] eq '' ? $text{'dbs_any'} :
&html_escape($dbname))." $wildcard</a>");
push(@cols, $u->[2] eq '' ? $text{'dbs_anon'}
: &html_escape($u->[2]));
push(@cols, $u->[0] eq '%' ? $text{'dbs_any'} :
$u->[0] eq '' ? $text{'dbs_hosts'}
: &html_escape($u->[0]));
my @priv;
my ($allprivs, $noprivs) = (1, 1);
my @priv_fields = &priv_fields('db');
foreach my $f (@priv_fields) {
if ($u->[$fieldmap{$f->[0]}] eq 'Y') {
push(@priv, $f->[1]);
$noprivs = 0;
}
else {
$allprivs = 0;
}
}
push(@cols, $allprivs ? $text{'users_all'} :
$noprivs ? $text{'users_none'} :
&format_privs(\@priv, \@priv_fields));
print &ui_checked_columns_row(\@cols, \@tds,
"d", join(" ", $u->[0], $u->[1], $u->[2]));
}
print &ui_columns_end();
}
else {
print "<b>$text{'dbs_empty'}</b> <p>\n";
}
print &ui_links_row(\@rowlinks);
print &ui_form_end([ [ "delete", $text{'users_delete'} ]]) if (@{$d->{'data'}});
&ui_print_footer("", $text{'index_return'});