#!/usr/local/bin/perl # edit_table.cgi # Display the structure of some table require './mysql-lib.pl'; &ReadParse(); &can_edit_db($in{'db'}) || &error($text{'dbase_ecannot'}); if ($access{'edonly'}) { &redirect("view_table.cgi?db=$in{'db'}&table=".&urlize($in{'table'})); exit; } $desc = &text('table_header', "$in{'table'}", "$in{'db'}"); &ui_print_header($desc, $text{'table_title'}, "", "edit_table"); print &ui_form_start("delete_fields.cgi", "post"); print &ui_hidden("db", $in{'db'}),"\n"; print &ui_hidden("table", $in{'table'}),"\n"; @desc = &table_structure($in{'db'}, $in{'table'}); @tds = ( "width=5" ); @rowlinks = ( &select_all_link("d"), &select_invert_link("d") ); print &ui_links_row(\@rowlinks); print &ui_columns_start([ "", $text{'table_field'}, $text{'table_type'}, $text{'table_null'}, $text{'table_key'}, $text{'table_default'}, $text{'table_extra'} ], 100, 0, \@tds); $i = 0; foreach $r (@desc) { local @cols; push(@cols, "".&html_escape($r->{'field'}).""); push(@cols, &html_escape($r->{'type'})); push(@cols, $r->{'null'} eq 'YES' ? $text{'yes'} : $text{'no'}); push(@cols, $r->{'key'} eq 'PRI' ? $text{'table_pri'} : $r->{'key'} eq 'MUL' ? $text{'table_mul'} : $text{'table_none'}); push(@cols, &html_escape(defined($r->{'default'}) ? $r->{'default'} : 'NULL')); push(@cols, &html_escape($r->{'extra'})); print &ui_checked_columns_row(\@cols, \@tds, "d", $r->{'field'}); $i++; } print &ui_columns_end(); print &ui_links_row(\@rowlinks); print &ui_form_end([ [ "delete", $text{'table_delete'} ] ]); $hiddens = &ui_hidden("db", $in{'db'}).&ui_hidden("table", $in{'table'}); print "\n"; # Add field button print &ui_form_start("edit_field.cgi"); print $hiddens; print "",&ui_form_end(); # View and edit data button print &ui_form_start("view_table.cgi", "form-data"); print $hiddens; print "",&ui_form_end(); # CSV export button print &ui_form_start("csv_form.cgi"); print $hiddens; print "",&ui_form_end(); if ($access{'indexes'}) { # Create index button print &ui_form_start("edit_index.cgi"); print $hiddens; print "",&ui_form_end(); } # Drop table button print &ui_form_start("drop_table.cgi"); print $hiddens; print "",&ui_form_end(); print "
",&ui_submit($text{'table_add'}); print &ui_select("type", undef, \@type_list); print "",&ui_submit($text{'table_data'}); print "",&ui_submit($text{'table_csv'}); print "",&ui_submit($text{'table_index'}); print "",&ui_submit($text{'table_drop'}); print "
\n"; &ui_print_footer("edit_dbase.cgi?db=$in{'db'}", $text{'dbase_return'}, "", $text{'index_return'});