mirror of
				https://github.com/MariaDB/server.git
				synced 2025-11-03 14:33:32 +03:00 
			
		
		
		
	This allows us to use statement replication with functions and triggers The following things are fixed with this patch: - NOW() and automatic timestamps takes the value from the main event for functions and triggers (which allows these to replicate with statement level logging) - No side effects for triggers or functions with auto-increment values(), last_insert_id(), rand() or found_rows() - Triggers can't return result sets Fixes bugs: #12480: NOW() is not constant in a trigger #12481: Using NOW() in a stored function breaks statement based replication #12482: Triggers has side effects with auto_increment values #11587: trigger causes lost connection error mysql-test/r/trigger.result: Added test fpr big mysql-test/t/sp-error.test: Changed error message numbers mysql-test/t/trigger.test: Added test for trigger returning result (#11587) sql/item_func.cc: Store the first used seed value for RAND() value. (This makes rand() replicatable in functions and triggers) Save and clear run context before executing a stored function and restore it afterwards. This removes side effects of stored functions for RAND(), auto-increment values and NOW() and makes most stored function replicatable sql/share/errmsg.txt: Reuse error message also for triggers sql/sp_head.cc: If in function or trigger, don't change value of NOW() (This allows us to use statement replication with functions that directly or indirectly uses timestamps) sql/sql_class.cc: Added framework for storing and retrieving run context while exceuting triggers or stored functions. sql/sql_class.h: Added framework for storing and retrieving run context while exceuting triggers or stored functions. sql/sql_parse.cc: If in function or trigger, don't change value of NOW() (This allows us to use statement replication with functions that directly or indirectly uses timestamps) sql/sql_trigger.cc: Moved process_triggers function from sql_trigger.h Use reset/restore sub_statement_state while executing triggers to avoid side effects and make them replicatable sql/sql_trigger.h: Moved process_triggers function from sql_trigger.h Use reset/restore sub_statement_state while executing triggers to avoid side effects and make them replicatable sql/sql_yacc.yy: Give error message if trigger can return a result set (Bug #11587) tests/fork_big2.pl: Removed return from end of lines mysql-test/r/rpl_trigger.result: New BitKeeper file ``mysql-test/r/rpl_trigger.result'' mysql-test/t/rpl_trigger.test: New BitKeeper file ``mysql-test/t/rpl_trigger.test''
		
			
				
	
	
		
			908 lines
		
	
	
		
			26 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
			
		
		
	
	
			908 lines
		
	
	
		
			26 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
/* Copyright (C) 2004-2005 MySQL AB
 | 
						|
 | 
						|
   This program is free software; you can redistribute it and/or modify
 | 
						|
   it under the terms of the GNU General Public License as published by
 | 
						|
   the Free Software Foundation; either version 2 of the License, or
 | 
						|
   (at your option) any later version.
 | 
						|
 | 
						|
   This program is distributed in the hope that it will be useful,
 | 
						|
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
						|
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 | 
						|
   GNU General Public License for more details.
 | 
						|
 | 
						|
   You should have received a copy of the GNU General Public License
 | 
						|
   along with this program; if not, write to the Free Software
 | 
						|
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA */
 | 
						|
 | 
						|
 | 
						|
#include "mysql_priv.h"
 | 
						|
#include "sp_head.h"
 | 
						|
#include "sql_trigger.h"
 | 
						|
#include "parse_file.h"
 | 
						|
 | 
						|
static const LEX_STRING triggers_file_type= {(char *)"TRIGGERS", 8};
 | 
						|
 | 
						|
const char * const triggers_file_ext= ".TRG";
 | 
						|
 | 
						|
/*
 | 
						|
  Table of .TRG file field descriptors.
 | 
						|
  We have here only one field now because in nearest future .TRG
 | 
						|
  files will be merged into .FRM files (so we don't need something
 | 
						|
  like md5 or created fields).
 | 
						|
*/
 | 
						|
static File_option triggers_file_parameters[]=
 | 
						|
{
 | 
						|
  {{(char*)"triggers", 8},
 | 
						|
    offsetof(class Table_triggers_list, definitions_list),
 | 
						|
    FILE_OPTIONS_STRLIST},
 | 
						|
  {{(char*)"sql_modes", 13},
 | 
						|
    offsetof(class Table_triggers_list, definition_modes_list),
 | 
						|
    FILE_OPTIONS_ULLLIST},
 | 
						|
  {{0, 0}, 0, FILE_OPTIONS_STRING}
 | 
						|
};
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Structure representing contents of .TRN file which are used to support
 | 
						|
  database wide trigger namespace.
 | 
						|
*/
 | 
						|
 | 
						|
struct st_trigname
 | 
						|
{
 | 
						|
  LEX_STRING trigger_table;
 | 
						|
};
 | 
						|
 | 
						|
static const LEX_STRING trigname_file_type= {(char *)"TRIGGERNAME", 11};
 | 
						|
 | 
						|
const char * const trigname_file_ext= ".TRN";
 | 
						|
 | 
						|
static File_option trigname_file_parameters[]=
 | 
						|
{
 | 
						|
  {{(char*)"trigger_table", 15}, offsetof(struct st_trigname, trigger_table),
 | 
						|
   FILE_OPTIONS_ESTRING},
 | 
						|
  {{0, 0}, 0, FILE_OPTIONS_STRING}
 | 
						|
};
 | 
						|
 | 
						|
 | 
						|
const LEX_STRING trg_action_time_type_names[]=
 | 
						|
{
 | 
						|
  { (char *) STRING_WITH_LEN("BEFORE") },
 | 
						|
  { (char *) STRING_WITH_LEN("AFTER") }
 | 
						|
};
 | 
						|
 | 
						|
const LEX_STRING trg_event_type_names[]=
 | 
						|
{
 | 
						|
  { (char *) STRING_WITH_LEN("INSERT") },
 | 
						|
  { (char *) STRING_WITH_LEN("UPDATE") },
 | 
						|
  { (char *) STRING_WITH_LEN("DELETE") }
 | 
						|
};
 | 
						|
 | 
						|
 | 
						|
static TABLE_LIST *add_table_for_trigger(THD *thd, sp_name *trig);
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Create or drop trigger for table.
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    mysql_create_or_drop_trigger()
 | 
						|
      thd    - current thread context (including trigger definition in LEX)
 | 
						|
      tables - table list containing one table for which trigger is created.
 | 
						|
      create - whenever we create (TRUE) or drop (FALSE) trigger
 | 
						|
 | 
						|
  NOTE
 | 
						|
    This function is mainly responsible for opening and locking of table and
 | 
						|
    invalidation of all its instances in table cache after trigger creation.
 | 
						|
    Real work on trigger creation/dropping is done inside Table_triggers_list
 | 
						|
    methods.
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    FALSE Success
 | 
						|
    TRUE  error
 | 
						|
*/
 | 
						|
bool mysql_create_or_drop_trigger(THD *thd, TABLE_LIST *tables, bool create)
 | 
						|
{
 | 
						|
  TABLE *table;
 | 
						|
  bool result= 0;
 | 
						|
 | 
						|
  DBUG_ENTER("mysql_create_or_drop_trigger");
 | 
						|
 | 
						|
  /*
 | 
						|
    QQ: This function could be merged in mysql_alter_table() function
 | 
						|
    But do we want this ?
 | 
						|
  */
 | 
						|
 | 
						|
  if (!create &&
 | 
						|
      !(tables= add_table_for_trigger(thd, thd->lex->spname)))
 | 
						|
    DBUG_RETURN(TRUE);
 | 
						|
 | 
						|
  /* We should have only one table in table list. */
 | 
						|
  DBUG_ASSERT(tables->next_global == 0);
 | 
						|
 | 
						|
  if (!(table= open_ltable(thd, tables, tables->lock_type)))
 | 
						|
    DBUG_RETURN(TRUE);
 | 
						|
 | 
						|
  /*
 | 
						|
    TODO: We should check if user has TRIGGER privilege for table here.
 | 
						|
    Now we just require SUPER privilege for creating/dropping because
 | 
						|
    we don't have proper privilege checking for triggers in place yet.
 | 
						|
  */
 | 
						|
  if (check_global_access(thd, SUPER_ACL))
 | 
						|
    DBUG_RETURN(TRUE);
 | 
						|
 | 
						|
  /*
 | 
						|
    We do not allow creation of triggers on temporary tables. We also don't
 | 
						|
    allow creation of triggers on views but fulfilment of this restriction
 | 
						|
    is guaranteed by open_ltable(). It is better to have this check here
 | 
						|
    than do it in Table_triggers_list::create_trigger() and mess with table
 | 
						|
    cache.
 | 
						|
  */
 | 
						|
  if (table->s->tmp_table != NO_TMP_TABLE)
 | 
						|
  {
 | 
						|
    my_error(ER_TRG_ON_VIEW_OR_TEMP_TABLE, MYF(0), tables->alias);
 | 
						|
    DBUG_RETURN(TRUE);
 | 
						|
  }
 | 
						|
 | 
						|
  if (!table->triggers)
 | 
						|
  {
 | 
						|
    if (!create)
 | 
						|
    {
 | 
						|
      my_message(ER_TRG_DOES_NOT_EXIST, ER(ER_TRG_DOES_NOT_EXIST), MYF(0));
 | 
						|
      DBUG_RETURN(TRUE);
 | 
						|
    }
 | 
						|
 | 
						|
    if (!(table->triggers= new (&table->mem_root) Table_triggers_list(table)))
 | 
						|
      DBUG_RETURN(TRUE);
 | 
						|
  }
 | 
						|
 | 
						|
  /*
 | 
						|
    We don't want perform our operations while global read lock is held
 | 
						|
    so we have to wait until its end and then prevent it from occuring
 | 
						|
    again until we are done. (Acquiring LOCK_open is not enough because
 | 
						|
    global read lock is held without helding LOCK_open).
 | 
						|
  */
 | 
						|
  if (wait_if_global_read_lock(thd, 0, 0))
 | 
						|
    DBUG_RETURN(TRUE);
 | 
						|
 | 
						|
  /*
 | 
						|
    There is no DETERMINISTIC clause for triggers, so can't check it.
 | 
						|
    But a trigger can in theory be used to do nasty things (if it supported
 | 
						|
    DROP for example) so we do the check for privileges. For now there is
 | 
						|
    already a stronger test above (see start of the function); but when this
 | 
						|
    stronger test will be removed, the test below will hold.
 | 
						|
  */
 | 
						|
  if (!trust_routine_creators && mysql_bin_log.is_open() &&
 | 
						|
      !(thd->master_access & SUPER_ACL))
 | 
						|
  {
 | 
						|
    my_message(ER_BINLOG_CREATE_ROUTINE_NEED_SUPER,
 | 
						|
	       ER(ER_BINLOG_CREATE_ROUTINE_NEED_SUPER), MYF(0));
 | 
						|
    DBUG_RETURN(TRUE);
 | 
						|
  }
 | 
						|
 | 
						|
  VOID(pthread_mutex_lock(&LOCK_open));
 | 
						|
  result= (create ?
 | 
						|
           table->triggers->create_trigger(thd, tables):
 | 
						|
           table->triggers->drop_trigger(thd, tables));
 | 
						|
 | 
						|
  /* It is sensible to invalidate table in any case */
 | 
						|
  close_cached_table(thd, table);
 | 
						|
  VOID(pthread_mutex_unlock(&LOCK_open));
 | 
						|
  start_waiting_global_read_lock(thd);
 | 
						|
 | 
						|
  if (!result)
 | 
						|
    {
 | 
						|
      if (mysql_bin_log.is_open())
 | 
						|
      {
 | 
						|
	thd->clear_error();
 | 
						|
	/* Such a statement can always go directly to binlog, no trans cache */
 | 
						|
	Query_log_event qinfo(thd, thd->query, thd->query_length, 0, FALSE);
 | 
						|
	mysql_bin_log.write(&qinfo);
 | 
						|
      }
 | 
						|
      send_ok(thd);
 | 
						|
    }
 | 
						|
 | 
						|
  DBUG_RETURN(result);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Create trigger for table.
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    create_trigger()
 | 
						|
      thd    - current thread context (including trigger definition in LEX)
 | 
						|
      tables - table list containing one open table for which trigger is
 | 
						|
               created.
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    False - success
 | 
						|
    True  - error
 | 
						|
*/
 | 
						|
bool Table_triggers_list::create_trigger(THD *thd, TABLE_LIST *tables)
 | 
						|
{
 | 
						|
  LEX *lex= thd->lex;
 | 
						|
  TABLE *table= tables->table;
 | 
						|
  char dir_buff[FN_REFLEN], file_buff[FN_REFLEN], trigname_buff[FN_REFLEN],
 | 
						|
       trigname_path[FN_REFLEN];
 | 
						|
  LEX_STRING dir, file, trigname_file;
 | 
						|
  LEX_STRING *trg_def, *name;
 | 
						|
  ulonglong *trg_sql_mode;
 | 
						|
  Item_trigger_field *trg_field;
 | 
						|
  struct st_trigname trigname;
 | 
						|
 | 
						|
 | 
						|
  /* Trigger must be in the same schema as target table. */
 | 
						|
  if (my_strcasecmp(table_alias_charset, table->s->db,
 | 
						|
                    lex->spname->m_db.str ? lex->spname->m_db.str :
 | 
						|
                                            thd->db))
 | 
						|
  {
 | 
						|
    my_error(ER_TRG_IN_WRONG_SCHEMA, MYF(0));
 | 
						|
    return 1;
 | 
						|
  }
 | 
						|
 | 
						|
  /* We don't allow creation of several triggers of the same type yet */
 | 
						|
  if (bodies[lex->trg_chistics.event][lex->trg_chistics.action_time])
 | 
						|
  {
 | 
						|
    my_message(ER_TRG_ALREADY_EXISTS, ER(ER_TRG_ALREADY_EXISTS), MYF(0));
 | 
						|
    return 1;
 | 
						|
  }
 | 
						|
 | 
						|
  /*
 | 
						|
    Let us check if all references to fields in old/new versions of row in
 | 
						|
    this trigger are ok.
 | 
						|
 | 
						|
    NOTE: We do it here more from ease of use standpoint. We still have to
 | 
						|
    do some checks on each execution. E.g. we can catch privilege changes
 | 
						|
    only during execution. Also in near future, when we will allow access
 | 
						|
    to other tables from trigger we won't be able to catch changes in other
 | 
						|
    tables...
 | 
						|
 | 
						|
    Since we don't plan to access to contents of the fields it does not
 | 
						|
    matter that we choose for both OLD and NEW values the same versions
 | 
						|
    of Field objects here.
 | 
						|
  */
 | 
						|
  old_field= new_field= table->field;
 | 
						|
 | 
						|
  for (trg_field= (Item_trigger_field *)(lex->trg_table_fields.first);
 | 
						|
       trg_field; trg_field= trg_field->next_trg_field)
 | 
						|
  {
 | 
						|
    trg_field->setup_field(thd, table);
 | 
						|
    if (!trg_field->fixed &&
 | 
						|
        trg_field->fix_fields(thd, (Item **)0))
 | 
						|
      return 1;
 | 
						|
  }
 | 
						|
 | 
						|
  /*
 | 
						|
    Here we are creating file with triggers and save all triggers in it.
 | 
						|
    sql_create_definition_file() files handles renaming and backup of older
 | 
						|
    versions
 | 
						|
  */
 | 
						|
  strxnmov(dir_buff, FN_REFLEN, mysql_data_home, "/", tables->db, "/", NullS);
 | 
						|
  dir.length= unpack_filename(dir_buff, dir_buff);
 | 
						|
  dir.str= dir_buff;
 | 
						|
  file.length=  strxnmov(file_buff, FN_REFLEN, tables->table_name,
 | 
						|
                         triggers_file_ext, NullS) - file_buff;
 | 
						|
  file.str= file_buff;
 | 
						|
  trigname_file.length= strxnmov(trigname_buff, FN_REFLEN,
 | 
						|
                                 lex->spname->m_name.str,
 | 
						|
                                 trigname_file_ext, NullS) - trigname_buff;
 | 
						|
  trigname_file.str= trigname_buff;
 | 
						|
  strxnmov(trigname_path, FN_REFLEN, dir_buff, trigname_buff, NullS);
 | 
						|
 | 
						|
  /* Use the filesystem to enforce trigger namespace constraints. */
 | 
						|
  if (!access(trigname_path, F_OK))
 | 
						|
  {
 | 
						|
    my_error(ER_TRG_ALREADY_EXISTS, MYF(0));
 | 
						|
    return 1;
 | 
						|
  }
 | 
						|
 | 
						|
  trigname.trigger_table.str= tables->table_name;
 | 
						|
  trigname.trigger_table.length= tables->table_name_length;
 | 
						|
 | 
						|
  if (sql_create_definition_file(&dir, &trigname_file, &trigname_file_type,
 | 
						|
                                 (gptr)&trigname, trigname_file_parameters, 0))
 | 
						|
    return 1;
 | 
						|
 | 
						|
  /*
 | 
						|
    Soon we will invalidate table object and thus Table_triggers_list object
 | 
						|
    so don't care about place to which trg_def->ptr points and other
 | 
						|
    invariants (e.g. we don't bother to update names_list)
 | 
						|
 | 
						|
    QQ: Hmm... probably we should not care about setting up active thread
 | 
						|
        mem_root too.
 | 
						|
  */
 | 
						|
  if (!(trg_def= (LEX_STRING *)alloc_root(&table->mem_root,
 | 
						|
                                          sizeof(LEX_STRING))) ||
 | 
						|
      definitions_list.push_back(trg_def, &table->mem_root) ||
 | 
						|
      !(trg_sql_mode= (ulonglong*)alloc_root(&table->mem_root,
 | 
						|
                                             sizeof(ulonglong))) ||
 | 
						|
      definition_modes_list.push_back(trg_sql_mode, &table->mem_root))
 | 
						|
    goto err_with_cleanup;
 | 
						|
 | 
						|
  trg_def->str= thd->query;
 | 
						|
  trg_def->length= thd->query_length;
 | 
						|
  *trg_sql_mode= thd->variables.sql_mode;
 | 
						|
 | 
						|
  if (!sql_create_definition_file(&dir, &file, &triggers_file_type,
 | 
						|
                                  (gptr)this, triggers_file_parameters, 3))
 | 
						|
    return 0;
 | 
						|
 | 
						|
err_with_cleanup:
 | 
						|
  my_delete(trigname_path, MYF(MY_WME));
 | 
						|
  return 1;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Deletes the .TRG file for a table
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    rm_trigger_file()
 | 
						|
      path       - char buffer of size FN_REFLEN to be used
 | 
						|
                   for constructing path to .TRG file.
 | 
						|
      db         - table's database name
 | 
						|
      table_name - table's name
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    False - success
 | 
						|
    True  - error
 | 
						|
*/
 | 
						|
 | 
						|
static bool rm_trigger_file(char *path, char *db, char *table_name)
 | 
						|
{
 | 
						|
  strxnmov(path, FN_REFLEN, mysql_data_home, "/", db, "/", table_name,
 | 
						|
           triggers_file_ext, NullS);
 | 
						|
  unpack_filename(path, path);
 | 
						|
  return my_delete(path, MYF(MY_WME));
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Deletes the .TRN file for a trigger
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    rm_trigname_file()
 | 
						|
      path       - char buffer of size FN_REFLEN to be used
 | 
						|
                   for constructing path to .TRN file.
 | 
						|
      db         - trigger's database name
 | 
						|
      table_name - trigger's name
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    False - success
 | 
						|
    True  - error
 | 
						|
*/
 | 
						|
 | 
						|
static bool rm_trigname_file(char *path, char *db, char *trigger_name)
 | 
						|
{
 | 
						|
  strxnmov(path, FN_REFLEN, mysql_data_home, "/", db, "/", trigger_name,
 | 
						|
           trigname_file_ext, NullS);
 | 
						|
  unpack_filename(path, path);
 | 
						|
  return my_delete(path, MYF(MY_WME));
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Drop trigger for table.
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    drop_trigger()
 | 
						|
      thd    - current thread context (including trigger definition in LEX)
 | 
						|
      tables - table list containing one open table for which trigger is
 | 
						|
               dropped.
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    False - success
 | 
						|
    True  - error
 | 
						|
*/
 | 
						|
bool Table_triggers_list::drop_trigger(THD *thd, TABLE_LIST *tables)
 | 
						|
{
 | 
						|
  LEX *lex= thd->lex;
 | 
						|
  LEX_STRING *name;
 | 
						|
  List_iterator_fast<LEX_STRING> it_name(names_list);
 | 
						|
  List_iterator<LEX_STRING>      it_def(definitions_list);
 | 
						|
  List_iterator<ulonglong>       it_mod(definition_modes_list);
 | 
						|
  char path[FN_REFLEN];
 | 
						|
 | 
						|
  while ((name= it_name++))
 | 
						|
  {
 | 
						|
    it_def++;
 | 
						|
    it_mod++;
 | 
						|
 | 
						|
    if (my_strcasecmp(table_alias_charset, lex->spname->m_name.str,
 | 
						|
                      name->str) == 0)
 | 
						|
    {
 | 
						|
      /*
 | 
						|
        Again we don't care much about other things required for
 | 
						|
        clean trigger removing since table will be reopened anyway.
 | 
						|
      */
 | 
						|
      it_def.remove();
 | 
						|
      it_mod.remove();
 | 
						|
 | 
						|
      if (definitions_list.is_empty())
 | 
						|
      {
 | 
						|
        /*
 | 
						|
          TODO: Probably instead of removing .TRG file we should move
 | 
						|
          to archive directory but this should be done as part of
 | 
						|
          parse_file.cc functionality (because we will need it
 | 
						|
          elsewhere).
 | 
						|
        */
 | 
						|
        if (rm_trigger_file(path, tables->db, tables->table_name))
 | 
						|
          return 1;
 | 
						|
      }
 | 
						|
      else
 | 
						|
      {
 | 
						|
        char dir_buff[FN_REFLEN], file_buff[FN_REFLEN];
 | 
						|
        LEX_STRING dir, file;
 | 
						|
 | 
						|
        strxnmov(dir_buff, FN_REFLEN, mysql_data_home, "/", tables->db,
 | 
						|
                 "/", NullS);
 | 
						|
        dir.length= unpack_filename(dir_buff, dir_buff);
 | 
						|
        dir.str= dir_buff;
 | 
						|
        file.length=  strxnmov(file_buff, FN_REFLEN, tables->table_name,
 | 
						|
                               triggers_file_ext, NullS) - file_buff;
 | 
						|
        file.str= file_buff;
 | 
						|
 | 
						|
        if (sql_create_definition_file(&dir, &file, &triggers_file_type,
 | 
						|
                                       (gptr)this, triggers_file_parameters,
 | 
						|
                                       3))
 | 
						|
          return 1;
 | 
						|
      }
 | 
						|
 | 
						|
      if (rm_trigname_file(path, tables->db, lex->spname->m_name.str))
 | 
						|
        return 1;
 | 
						|
      return 0;
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  my_message(ER_TRG_DOES_NOT_EXIST, ER(ER_TRG_DOES_NOT_EXIST), MYF(0));
 | 
						|
  return 1;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
Table_triggers_list::~Table_triggers_list()
 | 
						|
{
 | 
						|
  for (int i= 0; i < (int)TRG_EVENT_MAX; i++)
 | 
						|
    for (int j= 0; j < (int)TRG_ACTION_MAX; j++)
 | 
						|
      delete bodies[i][j];
 | 
						|
 | 
						|
  if (record1_field)
 | 
						|
    for (Field **fld_ptr= record1_field; *fld_ptr; fld_ptr++)
 | 
						|
      delete *fld_ptr;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Prepare array of Field objects referencing to TABLE::record[1] instead
 | 
						|
  of record[0] (they will represent OLD.* row values in ON UPDATE trigger
 | 
						|
  and in ON DELETE trigger which will be called during REPLACE execution).
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    prepare_record1_accessors()
 | 
						|
      table - pointer to TABLE object for which we are creating fields.
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    False - success
 | 
						|
    True  - error
 | 
						|
*/
 | 
						|
bool Table_triggers_list::prepare_record1_accessors(TABLE *table)
 | 
						|
{
 | 
						|
  Field **fld, **old_fld;
 | 
						|
 | 
						|
  if (!(record1_field= (Field **)alloc_root(&table->mem_root,
 | 
						|
                                            (table->s->fields + 1) *
 | 
						|
                                            sizeof(Field*))))
 | 
						|
    return 1;
 | 
						|
 | 
						|
  for (fld= table->field, old_fld= record1_field; *fld; fld++, old_fld++)
 | 
						|
  {
 | 
						|
    /*
 | 
						|
      QQ: it is supposed that it is ok to use this function for field
 | 
						|
      cloning...
 | 
						|
    */
 | 
						|
    if (!(*old_fld= (*fld)->new_field(&table->mem_root, table)))
 | 
						|
      return 1;
 | 
						|
    (*old_fld)->move_field((my_ptrdiff_t)(table->record[1] -
 | 
						|
                                          table->record[0]));
 | 
						|
  }
 | 
						|
  *old_fld= 0;
 | 
						|
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Check whenever .TRG file for table exist and load all triggers it contains.
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    check_n_load()
 | 
						|
      thd        - current thread context
 | 
						|
      db         - table's database name
 | 
						|
      table_name - table's name
 | 
						|
      table      - pointer to table object
 | 
						|
      names_only - stop after loading trigger names
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    False - success
 | 
						|
    True  - error
 | 
						|
*/
 | 
						|
 | 
						|
bool Table_triggers_list::check_n_load(THD *thd, const char *db,
 | 
						|
                                       const char *table_name, TABLE *table,
 | 
						|
                                       bool names_only)
 | 
						|
{
 | 
						|
  char path_buff[FN_REFLEN];
 | 
						|
  LEX_STRING path;
 | 
						|
  File_parser *parser;
 | 
						|
  LEX_STRING save_db;
 | 
						|
 | 
						|
  DBUG_ENTER("Table_triggers_list::check_n_load");
 | 
						|
 | 
						|
  strxnmov(path_buff, FN_REFLEN, mysql_data_home, "/", db, "/", table_name,
 | 
						|
           triggers_file_ext, NullS);
 | 
						|
  path.length= unpack_filename(path_buff, path_buff);
 | 
						|
  path.str= path_buff;
 | 
						|
 | 
						|
  // QQ: should we analyze errno somehow ?
 | 
						|
  if (access(path_buff, F_OK))
 | 
						|
    DBUG_RETURN(0);
 | 
						|
 | 
						|
  /*
 | 
						|
    File exists so we got to load triggers
 | 
						|
    FIXME: A lot of things to do here e.g. how about other funcs and being
 | 
						|
    more paranoical ?
 | 
						|
  */
 | 
						|
 | 
						|
  if ((parser= sql_parse_prepare(&path, &table->mem_root, 1)))
 | 
						|
  {
 | 
						|
    if (is_equal(&triggers_file_type, parser->type()))
 | 
						|
    {
 | 
						|
      Table_triggers_list *triggers=
 | 
						|
        new (&table->mem_root) Table_triggers_list(table);
 | 
						|
 | 
						|
      if (!triggers)
 | 
						|
        DBUG_RETURN(1);
 | 
						|
 | 
						|
      /*
 | 
						|
        We don't have sql_modes in old versions of .TRG file, so we should
 | 
						|
        initialize list for safety.
 | 
						|
      */
 | 
						|
      triggers->definition_modes_list.empty();
 | 
						|
 | 
						|
      if (parser->parse((gptr)triggers, &table->mem_root,
 | 
						|
                        triggers_file_parameters, 2))
 | 
						|
        DBUG_RETURN(1);
 | 
						|
 | 
						|
      List_iterator_fast<LEX_STRING> it(triggers->definitions_list);
 | 
						|
      LEX_STRING *trg_create_str, *trg_name_str;
 | 
						|
      ulonglong *trg_sql_mode;
 | 
						|
 | 
						|
      if (triggers->definition_modes_list.is_empty() &&
 | 
						|
          !triggers->definitions_list.is_empty())
 | 
						|
      {
 | 
						|
        /*
 | 
						|
          It is old file format => we should fill list of sql_modes.
 | 
						|
 | 
						|
          We use one mode (current) for all triggers, because we have not
 | 
						|
          information about mode in old format.
 | 
						|
        */
 | 
						|
        if (!(trg_sql_mode= (ulonglong*)alloc_root(&table->mem_root,
 | 
						|
                                                   sizeof(ulonglong))))
 | 
						|
        {
 | 
						|
          DBUG_RETURN(1); // EOM
 | 
						|
        }
 | 
						|
        *trg_sql_mode= global_system_variables.sql_mode;
 | 
						|
        while ((trg_create_str= it++))
 | 
						|
        {
 | 
						|
          if (triggers->definition_modes_list.push_back(trg_sql_mode,
 | 
						|
                                                        &table->mem_root))
 | 
						|
          {
 | 
						|
            DBUG_RETURN(1); // EOM
 | 
						|
          }
 | 
						|
        }
 | 
						|
        it.rewind();
 | 
						|
      }
 | 
						|
 | 
						|
      DBUG_ASSERT(triggers->definition_modes_list.elements ==
 | 
						|
                  triggers->definitions_list.elements);
 | 
						|
      table->triggers= triggers;
 | 
						|
 | 
						|
      /*
 | 
						|
        Construct key that will represent triggers for this table in the set
 | 
						|
        of routines used by statement.
 | 
						|
      */
 | 
						|
      triggers->sroutines_key.length= 1+strlen(db)+1+strlen(table_name)+1;
 | 
						|
      if (!(triggers->sroutines_key.str=
 | 
						|
              alloc_root(&table->mem_root, triggers->sroutines_key.length)))
 | 
						|
        DBUG_RETURN(1);
 | 
						|
      triggers->sroutines_key.str[0]= TYPE_ENUM_TRIGGER;
 | 
						|
      strxmov(triggers->sroutines_key.str+1, db, ".", table_name, NullS);
 | 
						|
 | 
						|
      /*
 | 
						|
        TODO: This could be avoided if there is no triggers
 | 
						|
              for UPDATE and DELETE.
 | 
						|
      */
 | 
						|
      if (!names_only && triggers->prepare_record1_accessors(table))
 | 
						|
        DBUG_RETURN(1);
 | 
						|
 | 
						|
      char *trg_name_buff;
 | 
						|
      List_iterator_fast<ulonglong> itm(triggers->definition_modes_list);
 | 
						|
      LEX *old_lex= thd->lex, lex;
 | 
						|
      ulong save_sql_mode= thd->variables.sql_mode;
 | 
						|
 | 
						|
      thd->lex= &lex;
 | 
						|
 | 
						|
      save_db.str= thd->db;
 | 
						|
      save_db.length= thd->db_length;
 | 
						|
      thd->db_length= strlen(db);
 | 
						|
      thd->db= (char *) db;
 | 
						|
      while ((trg_create_str= it++))
 | 
						|
      {
 | 
						|
        trg_sql_mode= itm++;
 | 
						|
        thd->variables.sql_mode= (ulong)*trg_sql_mode;
 | 
						|
        lex_start(thd, (uchar*)trg_create_str->str, trg_create_str->length);
 | 
						|
 | 
						|
        if (yyparse((void *)thd) || thd->is_fatal_error)
 | 
						|
        {
 | 
						|
          /*
 | 
						|
            Free lex associated resources
 | 
						|
            QQ: Do we really need all this stuff here ?
 | 
						|
          */
 | 
						|
          delete lex.sphead;
 | 
						|
          goto err_with_lex_cleanup;
 | 
						|
        }
 | 
						|
 | 
						|
        lex.sphead->m_sql_mode= *trg_sql_mode;
 | 
						|
        triggers->bodies[lex.trg_chistics.event]
 | 
						|
                             [lex.trg_chistics.action_time]= lex.sphead;
 | 
						|
        if (triggers->names_list.push_back(&lex.sphead->m_name,
 | 
						|
                                           &table->mem_root))
 | 
						|
            goto err_with_lex_cleanup;
 | 
						|
 | 
						|
        if (names_only)
 | 
						|
        {
 | 
						|
          lex_end(&lex);
 | 
						|
          continue;
 | 
						|
        }
 | 
						|
 | 
						|
        /*
 | 
						|
          Let us bind Item_trigger_field objects representing access to fields
 | 
						|
          in old/new versions of row in trigger to Field objects in table being
 | 
						|
          opened.
 | 
						|
 | 
						|
          We ignore errors here, because if even something is wrong we still
 | 
						|
          will be willing to open table to perform some operations (e.g.
 | 
						|
          SELECT)...
 | 
						|
          Anyway some things can be checked only during trigger execution.
 | 
						|
        */
 | 
						|
        for (Item_trigger_field *trg_field=
 | 
						|
               (Item_trigger_field *)(lex.trg_table_fields.first);
 | 
						|
             trg_field;
 | 
						|
             trg_field= trg_field->next_trg_field)
 | 
						|
          trg_field->setup_field(thd, table);
 | 
						|
 | 
						|
        lex_end(&lex);
 | 
						|
      }
 | 
						|
      thd->db= save_db.str;
 | 
						|
      thd->db_length= save_db.length;
 | 
						|
      thd->lex= old_lex;
 | 
						|
      thd->variables.sql_mode= save_sql_mode;
 | 
						|
 | 
						|
      DBUG_RETURN(0);
 | 
						|
 | 
						|
err_with_lex_cleanup:
 | 
						|
      // QQ: anything else ?
 | 
						|
      lex_end(&lex);
 | 
						|
      thd->lex= old_lex;
 | 
						|
      thd->variables.sql_mode= save_sql_mode;
 | 
						|
      thd->db= save_db.str;
 | 
						|
      thd->db_length= save_db.length;
 | 
						|
      DBUG_RETURN(1);
 | 
						|
    }
 | 
						|
 | 
						|
    /*
 | 
						|
      We don't care about this error message much because .TRG files will
 | 
						|
      be merged into .FRM anyway.
 | 
						|
    */
 | 
						|
    my_error(ER_WRONG_OBJECT, MYF(0),
 | 
						|
             table_name, triggers_file_ext+1, "TRIGGER");
 | 
						|
    DBUG_RETURN(1);
 | 
						|
  }
 | 
						|
 | 
						|
  DBUG_RETURN(1);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Obtains and returns trigger metadata
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    get_trigger_info()
 | 
						|
      thd       - current thread context
 | 
						|
      event     - trigger event type
 | 
						|
      time_type - trigger action time
 | 
						|
      name      - returns name of trigger
 | 
						|
      stmt      - returns statement of trigger
 | 
						|
      sql_mode  - returns sql_mode of trigger
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    False - success
 | 
						|
    True  - error
 | 
						|
*/
 | 
						|
 | 
						|
bool Table_triggers_list::get_trigger_info(THD *thd, trg_event_type event,
 | 
						|
                                           trg_action_time_type time_type,
 | 
						|
                                           LEX_STRING *trigger_name,
 | 
						|
                                           LEX_STRING *trigger_stmt,
 | 
						|
                                           ulong *sql_mode)
 | 
						|
{
 | 
						|
  sp_head *body;
 | 
						|
  DBUG_ENTER("get_trigger_info");
 | 
						|
  if ((body= bodies[event][time_type]))
 | 
						|
  {
 | 
						|
    *trigger_name= body->m_name;
 | 
						|
    *trigger_stmt= body->m_body;
 | 
						|
    *sql_mode= body->m_sql_mode;
 | 
						|
    DBUG_RETURN(0);
 | 
						|
  }
 | 
						|
  DBUG_RETURN(1);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Find trigger's table from trigger identifier and add it to
 | 
						|
  the statement table list.
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    mysql_table_for_trigger()
 | 
						|
      thd    - current thread context
 | 
						|
      trig   - identifier for trigger
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    0 - error
 | 
						|
    # - pointer to TABLE_LIST object for the table
 | 
						|
*/
 | 
						|
 | 
						|
static TABLE_LIST *add_table_for_trigger(THD *thd, sp_name *trig)
 | 
						|
{
 | 
						|
  const char *db= !trig->m_db.str ? thd->db : trig->m_db.str;
 | 
						|
  LEX *lex= thd->lex;
 | 
						|
  char path_buff[FN_REFLEN];
 | 
						|
  LEX_STRING path;
 | 
						|
  File_parser *parser;
 | 
						|
  struct st_trigname trigname;
 | 
						|
  DBUG_ENTER("add_table_for_trigger");
 | 
						|
 | 
						|
  strxnmov(path_buff, FN_REFLEN, mysql_data_home, "/", db, "/",
 | 
						|
           trig->m_name.str, trigname_file_ext, NullS);
 | 
						|
  path.length= unpack_filename(path_buff, path_buff);
 | 
						|
  path.str= path_buff;
 | 
						|
 | 
						|
  if (access(path_buff, F_OK))
 | 
						|
  {
 | 
						|
    my_error(ER_TRG_DOES_NOT_EXIST, MYF(0));
 | 
						|
    DBUG_RETURN(0);
 | 
						|
  }
 | 
						|
 | 
						|
  if (!(parser= sql_parse_prepare(&path, thd->mem_root, 1)))
 | 
						|
    DBUG_RETURN(0);
 | 
						|
 | 
						|
  if (!is_equal(&trigname_file_type, parser->type()))
 | 
						|
  {
 | 
						|
    my_error(ER_WRONG_OBJECT, MYF(0), trig->m_name.str, trigname_file_ext+1,
 | 
						|
             "TRIGGERNAME");
 | 
						|
    DBUG_RETURN(0);
 | 
						|
  }
 | 
						|
 | 
						|
  if (parser->parse((gptr)&trigname, thd->mem_root,
 | 
						|
                    trigname_file_parameters, 1))
 | 
						|
    DBUG_RETURN(0);
 | 
						|
 | 
						|
  /* We need to reset statement table list to be PS/SP friendly. */
 | 
						|
  lex->query_tables= 0;
 | 
						|
  lex->query_tables_last= &lex->query_tables;
 | 
						|
  DBUG_RETURN(sp_add_to_query_tables(thd, lex, db,
 | 
						|
                                     trigname.trigger_table.str, TL_WRITE));
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/*
 | 
						|
  Drop all triggers for table.
 | 
						|
 | 
						|
  SYNOPSIS
 | 
						|
    drop_all_triggers()
 | 
						|
      thd    - current thread context
 | 
						|
      db     - schema for table
 | 
						|
      name   - name for table
 | 
						|
 | 
						|
  NOTE
 | 
						|
    The calling thread should hold the LOCK_open mutex;
 | 
						|
 | 
						|
  RETURN VALUE
 | 
						|
    False - success
 | 
						|
    True  - error
 | 
						|
*/
 | 
						|
 | 
						|
bool Table_triggers_list::drop_all_triggers(THD *thd, char *db, char *name)
 | 
						|
{
 | 
						|
  TABLE table;
 | 
						|
  char path[FN_REFLEN];
 | 
						|
  bool result= 0;
 | 
						|
  DBUG_ENTER("drop_all_triggers");
 | 
						|
 | 
						|
  bzero(&table, sizeof(table));
 | 
						|
  init_alloc_root(&table.mem_root, 8192, 0);
 | 
						|
 | 
						|
  safe_mutex_assert_owner(&LOCK_open);
 | 
						|
 | 
						|
  if (Table_triggers_list::check_n_load(thd, db, name, &table, 1))
 | 
						|
  {
 | 
						|
    result= 1;
 | 
						|
    goto end;
 | 
						|
  }
 | 
						|
  if (table.triggers)
 | 
						|
  {
 | 
						|
    LEX_STRING *trigger;
 | 
						|
    List_iterator_fast<LEX_STRING> it_name(table.triggers->names_list);
 | 
						|
 | 
						|
    while ((trigger= it_name++))
 | 
						|
    {
 | 
						|
      if (rm_trigname_file(path, db, trigger->str))
 | 
						|
      {
 | 
						|
        /*
 | 
						|
          Instead of immediately bailing out with error if we were unable
 | 
						|
          to remove .TRN file we will try to drop other files.
 | 
						|
        */
 | 
						|
        result= 1;
 | 
						|
        continue;
 | 
						|
      }
 | 
						|
    }
 | 
						|
 | 
						|
    if (rm_trigger_file(path, db, name))
 | 
						|
    {
 | 
						|
      result= 1;
 | 
						|
      goto end;
 | 
						|
    }
 | 
						|
  }
 | 
						|
end:
 | 
						|
  if (table.triggers)
 | 
						|
    delete table.triggers;
 | 
						|
  free_root(&table.mem_root, MYF(0));
 | 
						|
  DBUG_RETURN(result);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
 | 
						|
bool Table_triggers_list::process_triggers(THD *thd, trg_event_type event,
 | 
						|
                                           trg_action_time_type time_type,
 | 
						|
                                           bool old_row_is_record1)
 | 
						|
{
 | 
						|
  int res= 0;
 | 
						|
 | 
						|
  if (bodies[event][time_type])
 | 
						|
  {
 | 
						|
    Sub_statement_state statement_state;
 | 
						|
 | 
						|
    if (old_row_is_record1)
 | 
						|
    {
 | 
						|
      old_field= record1_field;
 | 
						|
      new_field= table->field;
 | 
						|
    }
 | 
						|
    else
 | 
						|
    {
 | 
						|
      new_field= record1_field;
 | 
						|
      old_field= table->field;
 | 
						|
    }
 | 
						|
 | 
						|
    /*
 | 
						|
      FIXME: We should juggle with security context here (because trigger
 | 
						|
      should be invoked with creator rights).
 | 
						|
    */
 | 
						|
 | 
						|
    thd->reset_sub_statement_state(&statement_state, SUB_STMT_TRIGGER);
 | 
						|
    res= bodies[event][time_type]->execute_function(thd, 0, 0, 0);
 | 
						|
    thd->restore_sub_statement_state(&statement_state);
 | 
						|
  }
 | 
						|
 | 
						|
  return res;
 | 
						|
}
 |