FM / mysql

/usr/share/usermin/mysql

Name	Size	Mode	Actions
help/	-	0755	rm
images/	-	0755	rm
lang/	-	0755	rm
ulang/	-	0755	rm
backup_db.cgi	8259	0755	edit dl rm
backup_form.cgi	7009	0755	edit dl rm
CHANGELOG	1459	0644	edit dl rm
config	522	0644	edit dl rm
config-aix	479	0644	edit dl rm
config-AlmaLinux-7.0-ALL	418	0644	edit dl rm
config-Amazon-Linux-2-ALL	403	0644	edit dl rm
config-CentOS-Linux-7.0-ALL	418	0644	edit dl rm
config-CentOS-Stream-Linux-8.0-ALL	418	0644	edit dl rm
config-CloudLinux-8.0-ALL	418	0644	edit dl rm
config-cobalt-linux	417	0644	edit dl rm
config-coherent-linux	419	0644	edit dl rm
config-debian-linux	416	0644	edit dl rm
config-debian-linux-2.2-9.0	436	0644	edit dl rm
config-debian-linux-10.0-12.0	420	0644	edit dl rm
config-debian-linux-13.0-ALL	437	0644	edit dl rm
config-freebsd	479	0644	edit dl rm
config-freebsd-8-ALL	516	0644	edit dl rm
config-gentoo-linux	413	0644	edit dl rm
config-mandrake-linux	399	0644	edit dl rm
config-mandrake-linux-10.1-ALL	401	0644	edit dl rm
config-msc-linux	421	0644	edit dl rm
config-netbsd	431	0644	edit dl rm
config-open-linux	417	0644	edit dl rm
config-openSUSE-Linux-15.0-ALL	403	0644	edit dl rm
config-Oracle-Linux-8.0-ALL	418	0644	edit dl rm
config-pardus-linux	346	0644	edit dl rm
config-qnx	333	0644	edit dl rm
config-Redhat-Enterprise-Linux-7.0-ALL	418	0644	edit dl rm
config-redhat-linux	417	0644	edit dl rm
config-redhat-linux-7.0-23.0	419	0644	edit dl rm
config-redhat-linux-24.0	421	0644	edit dl rm
config-redhat-linux-25.0-ALL	418	0644	edit dl rm
config-Rocky-Linux-7.0-ALL	418	0644	edit dl rm
config-Scientific-Linux-7.0-ALL	403	0644	edit dl rm
config-slackware-linux-8.0-ALL	449	0644	edit dl rm
config-sol-linux	455	0644	edit dl rm
config-solaris-9	498	0644	edit dl rm
config-solaris-10	440	0644	edit dl rm
config-solaris-11-ALL	490	0644	edit dl rm
config-suse-linux	409	0644	edit dl rm
config-suse-linux-7.1-ALL	407	0644	edit dl rm
config-syno-linux	528	0755	edit dl rm
config-trustix-linux	407	0644	edit dl rm
config-turbo-linux	417	0644	edit dl rm
config-Ubuntu-Linux-16.04-17.99	453	0644	edit dl rm
config-Ubuntu-Linux-18.04-ALL	420	0644	edit dl rm
config-united-linux	407	0644	edit dl rm
config.info	589	0644	edit dl rm
config.info.ca	714	0755	edit dl rm
config.info.nl	664	0755	edit dl rm
config.info.no	635	0644	edit dl rm
create_table.cgi	1041	0755	edit dl rm
csv.cgi	2316	0755	edit dl rm
csv_form.cgi	1715	0755	edit dl rm
defaultuconfig	53	0644	edit dl rm
delete_fields.cgi	665	0755	edit dl rm
download.cgi	1098	0755	edit dl rm
drop_table.cgi	1299	0755	edit dl rm
drop_tables.cgi	1792	0755	edit dl rm
edit_dbase.cgi	7074	0755	edit dl rm
edit_field.cgi	5111	0755	edit dl rm
edit_index.cgi	1870	0755	edit dl rm
edit_table.cgi	2920	0755	edit dl rm
edit_view.cgi	2224	0755	edit dl rm
exec.cgi	1563	0755	edit dl rm
exec_file.cgi	2838	0755	edit dl rm
exec_form.cgi	3716	0755	edit dl rm
import.cgi	2039	0755	edit dl rm
index.cgi	2919	0755	edit dl rm
login.cgi	514	0755	edit dl rm
module.info	192	0644	edit dl rm
module.info.ar	0	0644	edit dl rm
module.info.ar.auto	234	0644	edit dl rm
module.info.bg	0	0644	edit dl rm
module.info.bg.auto	222	0644	edit dl rm
module.info.ca	28	0644	edit dl rm
module.info.ca.auto	147	0644	edit dl rm
module.info.cs	24	0644	edit dl rm
module.info.cs.auto	129	0644	edit dl rm
module.info.da	0	0644	edit dl rm
module.info.da.auto	157	0644	edit dl rm
module.info.de	127	0644	edit dl rm
module.info.el	0	0644	edit dl rm
module.info.el.auto	277	0644	edit dl rm
module.info.es	0	0644	edit dl rm
module.info.es.auto	172	0644	edit dl rm
module.info.eu	0	0644	edit dl rm
module.info.eu.auto	160	0644	edit dl rm
module.info.fa	0	0644	edit dl rm
module.info.fa.auto	200	0644	edit dl rm
module.info.fi	0	0644	edit dl rm
module.info.fi.auto	170	0644	edit dl rm
module.info.fr	43	0644	edit dl rm
module.info.hr	0	0644	edit dl rm
module.info.hr.auto	158	0644	edit dl rm
module.info.hu	35	0644	edit dl rm
module.info.hu.auto	153	0644	edit dl rm
module.info.it	0	0644	edit dl rm
module.info.it.auto	149	0644	edit dl rm
module.info.ja	0	0644	edit dl rm
module.info.ja.auto	210	0644	edit dl rm
module.info.ko	0	0644	edit dl rm
module.info.ko.auto	192	0644	edit dl rm
module.info.ms	0	0644	edit dl rm
module.info.ms.auto	158	0644	edit dl rm
module.info.nl	30	0644	edit dl rm
module.info.no	23	0644	edit dl rm
module.info.no.auto	134	0644	edit dl rm
module.info.pl	0	0644	edit dl rm
module.info.pl.auto	160	0644	edit dl rm
module.info.pt	0	0644	edit dl rm
module.info.pt.auto	166	0644	edit dl rm
module.info.pt_BR	0	0644	edit dl rm
module.info.pt_BR.auto	175	0644	edit dl rm
module.info.ru	0	0644	edit dl rm
module.info.ru.auto	224	0644	edit dl rm
module.info.sk	0	0644	edit dl rm
module.info.sk.auto	155	0644	edit dl rm
module.info.sv	0	0644	edit dl rm
module.info.sv.auto	153	0644	edit dl rm
module.info.tr	0	0644	edit dl rm
module.info.tr.auto	170	0644	edit dl rm
module.info.uk	0	0644	edit dl rm
module.info.uk.auto	228	0644	edit dl rm
module.info.zh	0	0644	edit dl rm
module.info.zh.auto	135	0644	edit dl rm
module.info.zh_TW	0	0644	edit dl rm
module.info.zh_TW.auto	144	0644	edit dl rm
mysql-lib.pl	62858	0755	edit dl rm
save_field.cgi	4832	0755	edit dl rm
save_index.cgi	1419	0755	edit dl rm
save_view.cgi	1885	0755	edit dl rm
search_form.cgi	1412	0755	edit dl rm
table_form.cgi	1996	0755	edit dl rm
uconfig.info	373	0644	edit dl rm
uconfig.info.ca	114	0755	edit dl rm
uconfig.info.cs	432	0644	edit dl rm
uconfig.info.de	432	0644	edit dl rm
uconfig.info.nl	413	0644	edit dl rm
uconfig.info.no	388	0644	edit dl rm
view-lib.pl	3647	0755	edit dl rm
view_table.cgi	15522	0755	edit dl rm

Edit: /usr/share/usermin/mysql/edit_dbase.cgi (7074B)

#!/usr/bin/perl
# edit_dbase.cgi
# Show database tables and indexes

require './mysql-lib.pl';
&ReadParse();
&can_edit_db($in{'db'}) || &error($text{'dbase_ecannot'});
@titles = grep { &can_edit_db($_) } &list_databases();
$desc = "<tt>$in{'db'}</tt>";
if (@titles == 1 && $module_info{'usermin'}) {
	# Single-DB mode
	&ui_print_header($desc, $text{'dbase_title'}, "", "edit_dbase", 1, 1);
	$single = 1;
	}
else {
	&ui_print_header($desc, $text{'dbase_title'}, "", "edit_dbase");
	}
@titles = &list_tables($in{'db'});
if ($access{'indexes'}) {
	@indexes = &list_indexes($in{'db'});
	}
if (&supports_views() && $access{'views'}) {
	@views = &list_views($in{'db'});
	}

if ($in{'search'}) {
	# Limit to those matching search
	@titles = grep { /\Q$in{'search'}\E/i } @titles;
	@indexes = grep { /\Q$in{'search'}\E/i } @indexes;
	@views = grep { /\Q$in{'search'}\E/i } @views;
	print "<table width=100%><tr>\n";
	print "<td> ",&text('dbase_showing',
		"<tt>$in{'search'}</tt>"),"</td>\n";
	print "<td align=right><a href='edit_dbase.cgi?db=$in{'db'}'>",
		"$text{'view_searchreset'}</a></td>\n";
	print "</tr></table>\n";
	}

if (@titles+@indexes+@views > $max_dbs && !$in{'search'}) {
	# Too many tables to show .. display search and jump forms
	print &ui_form_start("edit_dbase.cgi");
	print &ui_hidden("db", $in{'db'}),"\n";
	print $text{'dbase_toomany'},"\n";
	print &ui_textbox("search", undef, 20),"\n";
	print &ui_submit($text{'index_search'})," \n";
	print &ui_form_end();

# Table selector
	print &ui_form_start("edit_table.cgi");
	print $text{'dbase_jump'},"\n";
	print &ui_hidden("db", $in{'db'}),"\n";
	print &ui_select("table", undef, [ map { [ $_ ] } @titles ],
			 1, 0, 0, 0, "onChange='form.submit()'"),"\n";
	print &ui_submit($text{'index_jumpok'})," \n";
	print &ui_form_end();

# View selector (if any)
	if (@views) {
		print &ui_form_start("edit_view.cgi");
		print $text{'dbase_vjump'},"\n";
		print &ui_hidden("db", $in{'db'}),"\n";
		print &ui_select("view", undef, [ map { [ $_ ] } @views ],
				 1, 0, 0, 0, "onChange='form.submit()'"),"\n";
		print &ui_submit($text{'index_jumpok'})," \n";
		print &ui_form_end();
		}

# Index selector (if any)
	if (@indexes) {
		print &ui_form_start("edit_index.cgi");
		print $text{'dbase_ijump'},"\n";
		print &ui_hidden("db", $in{'db'}),"\n";
		print &ui_select("index", undef, [ map { [ $_ ] } @indexes ],
				 1, 0, 0, 0, "onChange='form.submit()'"),"\n";
		print &ui_submit($text{'index_jumpok'})," \n";
		print &ui_form_end();
		}
	print "\n";
	}
elsif (@titles || @indexes) {
	@icons = ( ( map { "images/table.gif" } @titles ),
		 ( map { "images/index.gif" } @indexes ),
		 ( map { "images/view.gif" } @views ),
		 );
	@links = ( ( map { "edit_table.cgi?db=$in{'db'}&table=".&urlize($_) }
		 	 @titles ),
		 ( map { "edit_index.cgi?db=$in{'db'}&index=".&urlize($_) }
 @indexes ),
		 ( map { "edit_view.cgi?db=$in{'db'}&view=".&urlize($_) }
 @views ),
		 );
	@descs = ( ( map { "" } @titles ),
		 ( map { " ($text{'dbase_index'})" } @indexes),
		 ( map { " ($text{'dbase_view'})" } @views),
		 );
	#&show_buttons();
	print &ui_form_start("drop_tables.cgi");
	print &ui_hidden("db", $in{'db'});
	@rowlinks = ( &select_all_link("d", $form),
		 &select_invert_link("d", $form) );
	print &ui_links_row(\@rowlinks);
	@checks = ( ( @titles ),
		 ( map { "!".$_ } @indexes ),
		 ( map { "*".$_ } @views ),
		 );
	if ($displayconfig{'style'} == 1) {
		# Show table names, fields and row counts
		my $all_tables_size = &get_all_tables_size($in{'db'});
		foreach $t (@titles) {
			local $c = &execute_sql($in{'db'},
					"show create table ".quotestr($t));
			push(@types, &text('dbase_typetable',
				$c->{'data'}->[0]->[1] =~ /ENGINE=(\S+)/i ?
				 "$1" : "Unknown"));
			local $c = &execute_sql($in{'db'},
					"select count(*) from ".quotestr($t));
			push(@rows, $c->{'data'}->[0]->[0]);
			local @str = &table_structure($in{'db'}, $t);
			push(@fields, scalar(@str));
			my $table_size = &get_table_size($all_tables_size, $t);
			push(@sizes, &nice_size($table_size));
			}
		my $table_index_stats = &get_table_index_stats($in{'db'});
		foreach $t (@indexes) {
			push(@types, $text{'dbase_typeindex'});
			$str = &parse_index_structure($table_index_stats,
						 $in{'db'}, $t);
			push(@rows, "$text{'dbase_index'}");
			push(@fields, scalar(@{$str->{'cols'}}));
			}
		foreach $v (@views) {
			push(@types, $text{'dbase_typeview'});
			push(@rows, undef);
			push(@fields, undef);
			}
		@dtitles = map { &html_escape($_) }
			 ( @titles, @indexes, @views );
		&split_table([ "", $text{'dbase_name'}, $text{'dbase_type'},
			 $text{'dbase_rows'}, $text{'dbase_cols'},
				 $text{'dbase_size'} ],
			 \@checks, \@links, \@dtitles, \@types,
			 \@rows, \@fields, \@sizes) if (@titles);
		}
	elsif ($displayconfig{'style'} == 2) {
		# Just show table names
		@grid = ( );
		@all = ( @titles, @indexes, @views );
		for(my $i=0; $i<@links; $i++) {
			push(@grid, &ui_checkbox("d", $checks[$i]).
			 " <a href='$links[$i]'>".
			 &html_escape($all[$i])." ".$descs[$i]."</a>");
			}
		print &ui_grid_table(\@grid, 4, 100, undef, undef,
				 $text{'dbase_header'});
		}
	else {
		# Show table icons
		@checks = map { &ui_checkbox("d", $_) } @checks;
		@titles = map { &html_escape($_) } ( @titles, @indexes, @views);
		&icons_table(\@links, \@titles, \@icons, 5, undef, undef, undef,
			 \@checks);
		}
	print &ui_links_row(\@rowlinks);
	if (!$access{'edonly'}) {
		print &ui_form_end([ [ "delete", @indexes ? $text{'dbase_delete2'} : $text{'dbase_delete'} ] ]);
		}
	else {
		print &ui_form_end();
		}
	}
else {
	if ($in{'search'}) {
		print "$text{'dbase_none2'} \n";
		}
	else {
		print "$text{'dbase_none'} \n";
		}
	}
&show_buttons();

if ($single) {
	&ui_print_footer("/", $text{'index'});
	}
else {
	&ui_print_footer(&get_databases_return_link($in{'db'}),
			 $text{'index_return'});
	}

sub show_buttons
{
if (!$access{'edonly'}) {
	print &ui_form_start("table_form.cgi");
	print &ui_hidden("db", $in{'db'});

# Add a new table
	print &ui_submit($text{'dbase_add'})." ".$text{'dbase_fields'}.
			  " ".&ui_textbox("fields", 4, 4);
	print "&nbsp;\n";

# Add a new view
	if (&supports_views() && $access{'views'}) {
		print &ui_submit($text{'dbase_addview'}, 'addview');
		print "&nbsp;\n";
		}

# Delete this database
	if ($access{'delete'}) {
		print &ui_submit($text{'dbase_drop'}, 'dropdb');
		print "&nbsp;\n";
		}
	elsif (@titles) {
		print &ui_submit($text{'dbase_empty'}, 'dropdb');
		print "&nbsp;\n";
		}

# Open backup form
	if ($access{'buser'}) {
		print &ui_submit($text{'dbase_backup'}, 'backupdb');
		print "&nbsp;\n";
		}

# Execute SQL form
	print &ui_submit($text{'dbase_exec'}, 'exec');
	print "&nbsp;\n";

print &ui_form_end();
	$form++;
	}
}

sub get_table_size
{
my ($tables_data, $table_name) = @_;
foreach my $row (@{$tables_data->{'data'}}) {
	return $row->[3] if $row->[1] eq $table_name;
	}
return undef;
}

cmd: