MDEV-6733: Implement ALTER PROCEDURE/FUNCTION DEFINER

Author: amrSherif12

sql/sp.cc

@@ -1765,9 +1765,19 @@ Sp_handler::sp_update_routine(THD *thd, const Database_qualified_name *name,
     if (chistics->comment.str)
       table->field[MYSQL_PROC_FIELD_COMMENT]->store(chistics->comment,
 						    system_charset_info);
+    if (thd->lex->definer)
+    {
+      char definer_str[USER_HOST_BUFF_SIZE];
+      uint definer_len= strxnmov(definer_str, sizeof(definer_str)-1,
+                                 thd->lex->definer->user.str, "@",
+                                 thd->lex->definer->host.str, NullS) - definer_str;
+
+      table->field[MYSQL_PROC_FIELD_DEFINER]->store(definer_str, definer_len, system_charset_info);
+    }
     if (chistics->agg_type != DEFAULT_AGGREGATE)
       table->field[MYSQL_PROC_FIELD_AGGREGATE]->
          store((longlong)chistics->agg_type, TRUE);
+
     if ((ret= table->file->ha_update_row(table->record[1],table->record[0])) &&
         ret != HA_ERR_RECORD_IS_THE_SAME)
       ret= SP_WRITE_ROW_FAILED;

sql/sql_parse.cc

@@ -6448,7 +6448,16 @@ alter_routine(THD *thd, LEX *lex)
   if (check_routine_access(thd, ALTER_PROC_ACL, &lex->spname->m_db,
                            &lex->spname->m_name, sph, 0))
     return 1;
+  if (lex->definer &&
+    (my_strcasecmp(system_charset_info, lex->definer->user.str, thd->security_ctx->priv_user) ||
+     my_strcasecmp(system_charset_info, lex->definer->host.str, thd->security_ctx->priv_host)) &&
+    check_global_access(thd, SUPER_ACL))
+  {
+    return 1;
+  }
+
   /*
+
     Note that if you implement the capability of ALTER FUNCTION to
     alter the body of the function, this command should be made to
     follow the restrictions that log-bin-trust-function-creators=0