mysql/edit_cpriv.cgi

   1 #!/usr/local/bin/perl
   2 # edit_cpriv.cgi
   3 # Display a form for editing or creating new column permissions
   4
   5 require './mysql-lib.pl';
   6 &ReadParse();
   7 $access{'perms'} || &error($text{'perms_ecannot'});
   8 if (defined($in{'table'})) {
   9         &ui_print_header(undef, $text{'cpriv_title1'}, "", "create_cpriv");
  10         if (defined($in{'db'})) {
  11                 # From two fields
  12                 $d = $in{'db'};
  13                 $t = $in{'table'};
  14                 $in{'db'} =~ /^\S+$/ || &error($text{'cpriv_edb'});
  15                 $in{'table'} =~ /^\S+$/ || &error($text{'cpriv_etable'});
  16                 }
  17         else {
  18                 # From selector
  19                 ($d, $t) = split(/\./, $in{'table'});
  20                 }
  21         }
  22 else {
  23         $d = &execute_sql_safe($master_db, "select * from columns_priv order by table_name,column_name");
  24         $u = $d->{'data'}->[$in{'idx'}];
  25         $access{'perms'} == 1 || &can_edit_db($u->[1]) ||
  26                 &error($text{'perms_edb'});
  27         $d = $u->[1]; $t = $u->[3];
  28         &ui_print_header(undef, $text{'cpriv_title2'}, "", "edit_cpriv");
  29         }
  30
  31 print &ui_form_start("save_cpriv.cgi");
  32 if ($in{'table'}) {
  33         print &ui_hidden("table", $in{'table'});
  34         }
  35 else {
  36         print &ui_hidden("oldhost", $u->[0]);
  37         print &ui_hidden("olddb", $u->[1]);
  38         print &ui_hidden("olduser", $u->[2]);
  39         print &ui_hidden("oldtable", $u->[3]);
  40         print &ui_hidden("oldfield", $u->[4]);
  41         }
  42 print &ui_table_start($text{'cpriv_header'}, undef, 2);
  43
  44 # Apply to DB and table
  45 print &ui_table_row($text{'cpriv_db'}, "<tt>$d</tt>");
  46 print &ui_table_row($text{'cpriv_table'}, "<tt>$t</tt>");
  47
  48 # Table field
  49 print &ui_table_row($text{'cpriv_field'},
  50         &ui_select("field", $in{'table'} ? '' : $u->[4],
  51                    [ $in{'table'} ? ( '' ) : ( ),
  52                      map { $_->{'field'} } &table_structure($d, $t) ], 1, 0, 1));
  53
  54 # Apply to user
  55 print &ui_table_row($text{'cpriv_user'},
  56         &ui_opt_textbox("user", $u->[2], 20, $text{'cpriv_anon'}));
  57
  58 # Apply to host
  59 print &ui_table_row($text{'cpriv_host'},
  60         &ui_opt_textbox("host", $u->[0] eq '%' ? '' : $u->[0], 40,
  61                         $text{'cpriv_any'}));
  62
  63 # Permissions to grant
  64 print &ui_table_row($text{'cpriv_perms'},
  65         &ui_select("perms", [ split(/,/, $u->[6]) ],
  66                    [ 'Select','Insert','Update','References' ], 4, 1));
  67
  68 print &ui_table_end();
  69 print &ui_form_end([ $in{'table'} ? ( [ undef, $text{'create'} ] )
  70                                   : ( [ undef, $text{'save'} ],
  71                                       [ 'delete', $text{'delete'} ] ) ]);
  72
  73 &ui_print_footer('list_cprivs.cgi', $text{'cprivs_return'},
  74         "", $text{'index_return'});
  75