bk commit into 5.0 tree (gluh:1.1929) BUG#11055

[gluh]

Below is the list of changes that have just been committed into a local
5.0 repository of gluh. When gluh does a push these changes will
be propagated to the main repository and, within 24 hours after the
push, to the public repository.
For information on how to access the public repository
see http://dev.mysql.com/doc/mysql/en/installing-source-tree.html

ChangeSet
  1.1929 05/06/07 13:52:38 gluh@stripped +4 -0
  Fix for bug #11055: information_schema: routines.sql_data_access has wrong value

  sql/sql_show.cc
    1.250 05/06/07 13:52:33 gluh@stripped +3 -4
    Fix for bug #11055: information_schema: routines.sql_data_access has wrong value

  sql/sql_lex.h
    1.181 05/06/07 13:52:33 gluh@stripped +9 -0
    Fix for bug #11055: information_schema: routines.sql_data_access has wrong value

  mysql-test/t/information_schema.test
    1.39 05/06/07 13:52:33 gluh@stripped +10 -0
    Fix for bug #11055: information_schema: routines.sql_data_access has wrong value

  mysql-test/r/information_schema.result
    1.56 05/06/07 13:52:33 gluh@stripped +9 -0
    Fix for bug #11055: information_schema: routines.sql_data_access has wrong value

# This is a BitKeeper patch.  What follows are the unified diffs for the
# set of deltas contained in the patch.  The rest of the patch, the part
# that BitKeeper cares about, is below these diffs.
# User:	gluh
# Host:	eagle.intranet.mysql.r18.ru
# Root:	/home/gluh/MySQL/Bugs/5.0.11055

--- 1.180/sql/sql_lex.h	Mon May 30 21:56:07 2005
+++ 1.181/sql/sql_lex.h	Tue Jun  7 13:52:33 2005
@@ -114,6 +114,15 @@
   SP_MODIFIES_SQL_DATA
 };
 
+const LEX_STRING sp_data_access_name[]=
+{
+  { (char*) "", 0},
+  { (char*) "CONTAINS SQL", 12 },
+  { (char*) "NO SQL", 6 },
+  { (char*) "READS SQL DATA", 14 },
+  { (char*) "MODIFIES SQL DATA", 17 }
+};
+
 
 #define DERIVED_SUBQUERY	1
 #define DERIVED_VIEW		2

--- 1.249/sql/sql_show.cc	Wed Jun  1 18:35:04 2005
+++ 1.250/sql/sql_show.cc	Tue Jun  7 13:52:33 2005
@@ -2646,6 +2646,7 @@
     restore_record(table, s->default_values);
     if (!wild || !wild[0] || !wild_compare(sp_name, wild, 0))
     {
+      int enum_idx= proc_table->field[5]->val_int();
       table->field[3]->store(sp_name, strlen(sp_name), cs);
       get_field(thd->mem_root, proc_table->field[3], &tmp_string);
       table->field[0]->store(tmp_string.ptr(), tmp_string.length(), cs);
@@ -2667,10 +2668,8 @@
       table->field[10]->store("SQL", 3, cs);
       get_field(thd->mem_root, proc_table->field[6], &tmp_string);
       table->field[11]->store(tmp_string.ptr(), tmp_string.length(), cs);
-      if (proc_table->field[5]->val_int() == SP_CONTAINS_SQL)
-      {
-        table->field[12]->store("CONTAINS SQL", 12 , cs);
-      }
+      table->field[12]->store(sp_data_access_name[enum_idx].str, 
+                              sp_data_access_name[enum_idx].length , cs);
       get_field(thd->mem_root, proc_table->field[7], &tmp_string);
       table->field[14]->store(tmp_string.ptr(), tmp_string.length(), cs);
       bzero((char *)&time, sizeof(time));

--- 1.55/mysql-test/r/information_schema.result	Tue Jun  7 11:30:59 2005
+++ 1.56/mysql-test/r/information_schema.result	Tue Jun  7 13:52:33 2005
@@ -823,3 +823,12 @@
 drop user user1@localhost, user2@localhost, user3@localhost, user4@localhost;
 use test;
 drop database mysqltest;
+create procedure p1 () modifies sql data set @a = 5;
+create procedure p2 () set @a = 5;
+select sql_data_access from information_schema.routines
+where specific_name like 'p%';
+sql_data_access
+MODIFIES SQL DATA
+CONTAINS SQL
+drop procedure p1;
+drop procedure p2;

--- 1.38/mysql-test/t/information_schema.test	Tue Jun  7 11:31:00 2005
+++ 1.39/mysql-test/t/information_schema.test	Tue Jun  7 13:52:33 2005
@@ -542,3 +542,13 @@
 drop user user1@localhost, user2@localhost, user3@localhost, user4@localhost;
 use test;
 drop database mysqltest;
+
+#
+# Bug #11055 information_schema: routines.sql_data_access has wrong value
+#
+create procedure p1 () modifies sql data set @a = 5;
+create procedure p2 () set @a = 5;
+select sql_data_access from information_schema.routines
+where specific_name like 'p%';
+drop procedure p1;
+drop procedure p2;