log_event.cc 308 KB
Newer Older
Marc Alff's avatar
Marc Alff committed
1
/* Copyright 2000-2008 MySQL AB, 2008-2009 Sun Microsystems, Inc.
2

unknown's avatar
unknown committed
3 4
   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
unknown's avatar
unknown committed
5
   the Free Software Foundation; version 2 of the License.
6

unknown's avatar
unknown committed
7 8 9 10
   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.
11

unknown's avatar
unknown committed
12 13 14 15 16
   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 */


17 18
#ifdef MYSQL_CLIENT

19
#include "sql_priv.h"
20 21

#else
unknown's avatar
unknown committed
22

23
#ifdef USE_PRAGMA_IMPLEMENTATION
unknown's avatar
unknown committed
24 25
#pragma implementation				// gcc: Class implementation
#endif
26

27 28 29 30 31 32 33 34 35 36 37 38 39
#include "sql_priv.h"
#include "unireg.h"
#include "my_global.h" // REQUIRED by log_event.h > m_string.h > my_bitmap.h
#include "log_event.h"
#include "sql_base.h"                           // close_thread_tables
#include "sql_cache.h"                       // QUERY_CACHE_FLAGS_SIZE
#include "sql_locale.h" // MY_LOCALE, my_locale_by_number, my_locale_en_US
#include "key.h"        // key_copy
#include "lock.h"       // mysql_unlock_tables
#include "sql_parse.h"  // mysql_test_parse_for_slave
#include "tztime.h"     // struct Time_zone
#include "sql_load.h"   // mysql_load
#include "sql_db.h"     // load_db_opt_by_name
40
#include "slave.h"
41 42
#include "rpl_rli.h"
#include "rpl_mi.h"
unknown's avatar
unknown committed
43
#include "rpl_filter.h"
unknown's avatar
unknown committed
44
#include "rpl_record.h"
Konstantin Osipov's avatar
Konstantin Osipov committed
45
#include "transaction.h"
46
#include <my_dir.h>
47

unknown's avatar
unknown committed
48
#endif /* MYSQL_CLIENT */
49

50 51
#include <base64.h>
#include <my_bitmap.h>
52
#include "rpl_utility.h"
unknown's avatar
unknown committed
53

unknown's avatar
unknown committed
54
#define log_cs	&my_charset_latin1
55

56 57
#define FLAGSTR(V,F) ((V)&(F)?#F" ":"")

58 59 60 61 62 63 64 65 66 67

/*
  Size of buffer for printing a double in format %.<PREC>g

  optional '-' + optional zero + '.'  + PREC digits + 'e' + sign +
  exponent digits + '\0'
*/
#define FMT_G_BUFSIZE(PREC) (3 + (PREC) + 5 + 1)


68
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
69 70
static int rows_event_stmt_cleanup(Relay_log_info const *rli, THD* thd);

71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122
static const char *HA_ERR(int i)
{
  switch (i) {
  case HA_ERR_KEY_NOT_FOUND: return "HA_ERR_KEY_NOT_FOUND";
  case HA_ERR_FOUND_DUPP_KEY: return "HA_ERR_FOUND_DUPP_KEY";
  case HA_ERR_RECORD_CHANGED: return "HA_ERR_RECORD_CHANGED";
  case HA_ERR_WRONG_INDEX: return "HA_ERR_WRONG_INDEX";
  case HA_ERR_CRASHED: return "HA_ERR_CRASHED";
  case HA_ERR_WRONG_IN_RECORD: return "HA_ERR_WRONG_IN_RECORD";
  case HA_ERR_OUT_OF_MEM: return "HA_ERR_OUT_OF_MEM";
  case HA_ERR_NOT_A_TABLE: return "HA_ERR_NOT_A_TABLE";
  case HA_ERR_WRONG_COMMAND: return "HA_ERR_WRONG_COMMAND";
  case HA_ERR_OLD_FILE: return "HA_ERR_OLD_FILE";
  case HA_ERR_NO_ACTIVE_RECORD: return "HA_ERR_NO_ACTIVE_RECORD";
  case HA_ERR_RECORD_DELETED: return "HA_ERR_RECORD_DELETED";
  case HA_ERR_RECORD_FILE_FULL: return "HA_ERR_RECORD_FILE_FULL";
  case HA_ERR_INDEX_FILE_FULL: return "HA_ERR_INDEX_FILE_FULL";
  case HA_ERR_END_OF_FILE: return "HA_ERR_END_OF_FILE";
  case HA_ERR_UNSUPPORTED: return "HA_ERR_UNSUPPORTED";
  case HA_ERR_TO_BIG_ROW: return "HA_ERR_TO_BIG_ROW";
  case HA_WRONG_CREATE_OPTION: return "HA_WRONG_CREATE_OPTION";
  case HA_ERR_FOUND_DUPP_UNIQUE: return "HA_ERR_FOUND_DUPP_UNIQUE";
  case HA_ERR_UNKNOWN_CHARSET: return "HA_ERR_UNKNOWN_CHARSET";
  case HA_ERR_WRONG_MRG_TABLE_DEF: return "HA_ERR_WRONG_MRG_TABLE_DEF";
  case HA_ERR_CRASHED_ON_REPAIR: return "HA_ERR_CRASHED_ON_REPAIR";
  case HA_ERR_CRASHED_ON_USAGE: return "HA_ERR_CRASHED_ON_USAGE";
  case HA_ERR_LOCK_WAIT_TIMEOUT: return "HA_ERR_LOCK_WAIT_TIMEOUT";
  case HA_ERR_LOCK_TABLE_FULL: return "HA_ERR_LOCK_TABLE_FULL";
  case HA_ERR_READ_ONLY_TRANSACTION: return "HA_ERR_READ_ONLY_TRANSACTION";
  case HA_ERR_LOCK_DEADLOCK: return "HA_ERR_LOCK_DEADLOCK";
  case HA_ERR_CANNOT_ADD_FOREIGN: return "HA_ERR_CANNOT_ADD_FOREIGN";
  case HA_ERR_NO_REFERENCED_ROW: return "HA_ERR_NO_REFERENCED_ROW";
  case HA_ERR_ROW_IS_REFERENCED: return "HA_ERR_ROW_IS_REFERENCED";
  case HA_ERR_NO_SAVEPOINT: return "HA_ERR_NO_SAVEPOINT";
  case HA_ERR_NON_UNIQUE_BLOCK_SIZE: return "HA_ERR_NON_UNIQUE_BLOCK_SIZE";
  case HA_ERR_NO_SUCH_TABLE: return "HA_ERR_NO_SUCH_TABLE";
  case HA_ERR_TABLE_EXIST: return "HA_ERR_TABLE_EXIST";
  case HA_ERR_NO_CONNECTION: return "HA_ERR_NO_CONNECTION";
  case HA_ERR_NULL_IN_SPATIAL: return "HA_ERR_NULL_IN_SPATIAL";
  case HA_ERR_TABLE_DEF_CHANGED: return "HA_ERR_TABLE_DEF_CHANGED";
  case HA_ERR_NO_PARTITION_FOUND: return "HA_ERR_NO_PARTITION_FOUND";
  case HA_ERR_RBR_LOGGING_FAILED: return "HA_ERR_RBR_LOGGING_FAILED";
  case HA_ERR_DROP_INDEX_FK: return "HA_ERR_DROP_INDEX_FK";
  case HA_ERR_FOREIGN_DUPLICATE_KEY: return "HA_ERR_FOREIGN_DUPLICATE_KEY";
  case HA_ERR_TABLE_NEEDS_UPGRADE: return "HA_ERR_TABLE_NEEDS_UPGRADE";
  case HA_ERR_TABLE_READONLY: return "HA_ERR_TABLE_READONLY";
  case HA_ERR_AUTOINC_READ_FAILED: return "HA_ERR_AUTOINC_READ_FAILED";
  case HA_ERR_AUTOINC_ERANGE: return "HA_ERR_AUTOINC_ERANGE";
  case HA_ERR_GENERIC: return "HA_ERR_GENERIC";
  case HA_ERR_RECORD_IS_THE_SAME: return "HA_ERR_RECORD_IS_THE_SAME";
  case HA_ERR_LOGGING_IMPOSSIBLE: return "HA_ERR_LOGGING_IMPOSSIBLE";
  case HA_ERR_CORRUPT_EVENT: return "HA_ERR_CORRUPT_EVENT";
123
  case HA_ERR_ROWS_EVENT_APPLY : return "HA_ERR_ROWS_EVENT_APPLY";
124
  }
125 126 127 128
  return 0;
}

/**
129 130 131 132 133 134 135 136 137 138 139
   Error reporting facility for Rows_log_event::do_apply_event

   @param level     error, warning or info
   @param ha_error  HA_ERR_ code
   @param rli       pointer to the active Relay_log_info instance
   @param thd       pointer to the slave thread's thd
   @param table     pointer to the event's table object
   @param type      the type of the event
   @param log_name  the master binlog file name
   @param pos       the master binlog file pos (the next after the event)

140 141 142 143 144 145
*/
static void inline slave_rows_error_report(enum loglevel level, int ha_error,
                                           Relay_log_info const *rli, THD *thd,
                                           TABLE *table, const char * type,
                                           const char *log_name, ulong pos)
{
146 147 148 149
  const char *handler_error= HA_ERR(ha_error);
  char buff[MAX_SLAVE_ERRMSG], *slider;
  const char *buff_end= buff + sizeof(buff);
  uint len;
Marc Alff's avatar
Marc Alff committed
150
  List_iterator_fast<MYSQL_ERROR> it(thd->warning_info->warn_list());
151 152 153 154 155 156 157
  MYSQL_ERROR *err;
  buff[0]= 0;

  for (err= it++, slider= buff; err && slider < buff_end - 1;
       slider += len, err= it++)
  {
    len= my_snprintf(slider, buff_end - slider,
Marc Alff's avatar
Marc Alff committed
158 159
                     " %s, Error_code: %d;", err->get_message_text(),
                     err->get_sql_errno());
160 161
  }
  
Marc Alff's avatar
Marc Alff committed
162
  rli->report(level, thd->is_error()? thd->stmt_da->sql_errno() : 0,
163
              "Could not execute %s event on table %s.%s;"
164
              "%s handler error %s; "
165 166 167
              "the event's master log %s, end_log_pos %lu",
              type, table->s->db.str,
              table->s->table_name.str,
168
              buff,
169 170
              handler_error == NULL? "<unknown>" : handler_error,
              log_name, pos);
171 172 173
}
#endif

174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217
/*
  Cache that will automatically be written to a dedicated file on
  destruction.

  DESCRIPTION

 */
class Write_on_release_cache
{
public:
  enum flag
  {
    FLUSH_F
  };

  typedef unsigned short flag_set;

  /*
    Constructor.

    SYNOPSIS
      Write_on_release_cache
      cache  Pointer to cache to use
      file   File to write cache to upon destruction
      flags  Flags for the cache

    DESCRIPTION

      Class used to guarantee copy of cache to file before exiting the
      current block.  On successful copy of the cache, the cache will
      be reinited as a WRITE_CACHE.

      Currently, a pointer to the cache is provided in the
      constructor, but it would be possible to create a subclass
      holding the IO_CACHE itself.
   */
  Write_on_release_cache(IO_CACHE *cache, FILE *file, flag_set flags = 0)
    : m_cache(cache), m_file(file), m_flags(flags)
  {
    reinit_io_cache(m_cache, WRITE_CACHE, 0L, FALSE, TRUE);
  }

  ~Write_on_release_cache()
  {
218
    copy_event_cache_to_file_and_reinit(m_cache, m_file);
219 220 221 222 223 224 225 226 227 228 229
    if (m_flags | FLUSH_F)
      fflush(m_file);
  }

  /*
    Return a pointer to the internal IO_CACHE.

    SYNOPSIS
      operator&()

    DESCRIPTION
230 231 232 233

      Function to return a pointer to the internal cache, so that the
      object can be treated as a IO_CACHE and used with the my_b_*
      IO_CACHE functions
234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251

    RETURN VALUE
      A pointer to the internal IO_CACHE.
   */
  IO_CACHE *operator&()
  {
    return m_cache;
  }

private:
  // Hidden, to prevent usage.
  Write_on_release_cache(Write_on_release_cache const&);

  IO_CACHE *m_cache;
  FILE *m_file;
  flag_set m_flags;
};

252 253 254
#ifndef DBUG_OFF
uint debug_not_change_ts_if_art_event= 1; // bug#29309 simulation
#endif
255

unknown's avatar
unknown committed
256
/*
257
  pretty_print_str()
unknown's avatar
unknown committed
258
*/
259

260
#ifdef MYSQL_CLIENT
261
static void pretty_print_str(IO_CACHE* cache, const char* str, int len)
unknown's avatar
unknown committed
262
{
263
  const char* end = str + len;
264
  my_b_printf(cache, "\'");
265 266
  while (str < end)
  {
unknown's avatar
unknown committed
267
    char c;
268
    switch ((c=*str++)) {
269 270 271 272 273 274 275
    case '\n': my_b_printf(cache, "\\n"); break;
    case '\r': my_b_printf(cache, "\\r"); break;
    case '\\': my_b_printf(cache, "\\\\"); break;
    case '\b': my_b_printf(cache, "\\b"); break;
    case '\t': my_b_printf(cache, "\\t"); break;
    case '\'': my_b_printf(cache, "\\'"); break;
    case 0   : my_b_printf(cache, "\\0"); break;
276
    default:
277
      my_b_printf(cache, "%c", c);
278 279
      break;
    }
280
  }
281
  my_b_printf(cache, "\'");
unknown's avatar
unknown committed
282
}
unknown's avatar
unknown committed
283
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
284

unknown's avatar
unknown committed
285
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
286

287
static void clear_all_errors(THD *thd, Relay_log_info *rli)
288
{
289
  thd->is_slave_error = 0;
290
  thd->clear_error();
291
  rli->clear_error();
292 293
}

294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334
inline int idempotent_error_code(int err_code)
{
  int ret= 0;

  switch (err_code)
  {
    case 0:
      ret= 1;
    break;
    /*
      The following list of "idempotent" errors
      means that an error from the list might happen
      because of idempotent (more than once)
      applying of a binlog file.
      Notice, that binlog has a  ddl operation its
      second applying may cause

      case HA_ERR_TABLE_DEF_CHANGED:
      case HA_ERR_CANNOT_ADD_FOREIGN:

      which are not included into to the list.

      Note that HA_ERR_RECORD_DELETED is not in the list since
      do_exec_row() should not return that error code.
    */
    case HA_ERR_RECORD_CHANGED:
    case HA_ERR_KEY_NOT_FOUND:
    case HA_ERR_END_OF_FILE:
    case HA_ERR_FOUND_DUPP_KEY:
    case HA_ERR_FOUND_DUPP_UNIQUE:
    case HA_ERR_FOREIGN_DUPLICATE_KEY:
    case HA_ERR_NO_REFERENCED_ROW:
    case HA_ERR_ROW_IS_REFERENCED:
      ret= 1;
    break;
    default:
      ret= 0;
    break;
  }
  return (ret);
}
unknown's avatar
unknown committed
335

unknown's avatar
unknown committed
336 337
/**
  Ignore error code specified on command line.
unknown's avatar
unknown committed
338
*/
339

340 341
inline int ignored_error_code(int err_code)
{
unknown's avatar
unknown committed
342 343 344 345 346 347 348 349 350 351 352 353 354 355
#ifdef HAVE_NDB_BINLOG
  /*
    The following error codes are hard-coded and will always be ignored.
  */
  switch (err_code)
  {
  case ER_DB_CREATE_EXISTS:
  case ER_DB_DROP_EXISTS:
    return 1;
  default:
    /* Nothing to do */
    break;
  }
#endif
unknown's avatar
unknown committed
356 357
  return ((err_code == ER_SLAVE_IGNORED_TABLE) ||
          (use_slave_mask && bitmap_is_set(&slave_error_mask, err_code)));
358
}
359

360 361 362 363 364 365 366 367 368 369
/*
  This function converts an engine's error to a server error.
   
  If the thread does not have an error already reported, it tries to 
  define it by calling the engine's method print_error. However, if a 
  mapping is not found, it uses the ER_UNKNOWN_ERROR and prints out a 
  warning message.
*/ 
int convert_handler_error(int error, THD* thd, TABLE *table)
{
Marc Alff's avatar
Marc Alff committed
370
  uint actual_error= (thd->is_error() ? thd->stmt_da->sql_errno() :
371 372 373 374 375
                           0);

  if (actual_error == 0)
  {
    table->file->print_error(error, MYF(0));
Marc Alff's avatar
Marc Alff committed
376
    actual_error= (thd->is_error() ? thd->stmt_da->sql_errno() :
377 378 379 380 381 382 383 384
                        ER_UNKNOWN_ERROR);
    if (actual_error == ER_UNKNOWN_ERROR)
      if (global_system_variables.log_warnings)
        sql_print_warning("Unknown error detected %d in handler", error);
  }

  return (actual_error);
}
unknown's avatar
unknown committed
385

386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413
inline bool concurrency_error_code(int error)
{
  switch (error)
  {
  case ER_LOCK_WAIT_TIMEOUT:
  case ER_LOCK_DEADLOCK:
  case ER_XA_RBDEADLOCK:
    return TRUE;
  default: 
    return (FALSE);
  }
}

inline bool unexpected_error_code(int unexpected_error)
{
  switch (unexpected_error) 
  {
  case ER_NET_READ_ERROR:
  case ER_NET_ERROR_ON_WRITE:
  case ER_QUERY_INTERRUPTED:
  case ER_SERVER_SHUTDOWN:
  case ER_NEW_ABORTING_CONNECTION:
    return(TRUE);
  default:
    return(FALSE);
  }
}

unknown's avatar
unknown committed
414
/*
415
  pretty_print_str()
unknown's avatar
unknown committed
416
*/
unknown's avatar
unknown committed
417

418
static char *pretty_print_str(char *packet, const char *str, int len)
unknown's avatar
unknown committed
419
{
420
  const char *end= str + len;
unknown's avatar
unknown committed
421
  char *pos= packet;
422
  *pos++= '\'';
423 424 425
  while (str < end)
  {
    char c;
426
    switch ((c=*str++)) {
unknown's avatar
unknown committed
427 428 429 430 431 432 433
    case '\n': *pos++= '\\'; *pos++= 'n'; break;
    case '\r': *pos++= '\\'; *pos++= 'r'; break;
    case '\\': *pos++= '\\'; *pos++= '\\'; break;
    case '\b': *pos++= '\\'; *pos++= 'b'; break;
    case '\t': *pos++= '\\'; *pos++= 't'; break;
    case '\'': *pos++= '\\'; *pos++= '\''; break;
    case 0   : *pos++= '\\'; *pos++= '0'; break;
434
    default:
unknown's avatar
unknown committed
435
      *pos++= c;
436 437
      break;
    }
unknown's avatar
unknown committed
438
  }
439 440
  *pos++= '\'';
  return pos;
unknown's avatar
unknown committed
441
}
unknown's avatar
unknown committed
442
#endif /* !MYSQL_CLIENT */
443

unknown's avatar
unknown committed
444

unknown's avatar
unknown committed
445
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
446

unknown's avatar
unknown committed
447 448
/**
  Creates a temporary name for load data infile:.
unknown's avatar
unknown committed
449

unknown's avatar
unknown committed
450 451 452 453
  @param buf		      Store new filename here
  @param file_id	      File_id (part of file name)
  @param event_server_id     Event_id (part of file name)
  @param ext		      Extension for file name
unknown's avatar
unknown committed
454

unknown's avatar
unknown committed
455
  @return
unknown's avatar
unknown committed
456
    Pointer to start of extension
unknown's avatar
unknown committed
457
*/
unknown's avatar
unknown committed
458

unknown's avatar
unknown committed
459 460
static char *slave_load_file_stem(char *buf, uint file_id,
                                  int event_server_id, const char *ext)
461
{
unknown's avatar
unknown committed
462
  char *res;
463
  fn_format(buf,PREFIX_SQL_LOAD,slave_load_tmpdir, "", MY_UNPACK_FILENAME);
464 465
  to_unix_path(buf);

466 467 468 469 470
  buf = strend(buf);
  buf = int10_to_str(::server_id, buf, 10);
  *buf++ = '-';
  buf = int10_to_str(event_server_id, buf, 10);
  *buf++ = '-';
unknown's avatar
unknown committed
471 472 473
  res= int10_to_str(file_id, buf, 10);
  strmov(res, ext);                             // Add extension last
  return res;                                   // Pointer to extension
474
}
unknown's avatar
SCRUM  
unknown committed
475
#endif
476

unknown's avatar
unknown committed
477

unknown's avatar
unknown committed
478
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
479

unknown's avatar
unknown committed
480 481
/**
  Delete all temporary files used for SQL_LOAD.
unknown's avatar
unknown committed
482
*/
483 484 485 486 487 488

static void cleanup_load_tmpdir()
{
  MY_DIR *dirp;
  FILEINFO *file;
  uint i;
unknown's avatar
unknown committed
489
  char fname[FN_REFLEN], prefbuf[31], *p;
unknown's avatar
unknown committed
490

491
  if (!(dirp=my_dir(slave_load_tmpdir,MYF(0))))
492 493
    return;

494 495 496 497 498 499 500 501
  /* 
     When we are deleting temporary files, we should only remove
     the files associated with the server id of our server.
     We don't use event_server_id here because since we've disabled
     direct binlogging of Create_file/Append_file/Exec_load events
     we cannot meet Start_log event in the middle of events from one 
     LOAD DATA.
  */
502
  p= strmake(prefbuf, STRING_WITH_LEN(PREFIX_SQL_LOAD));
503 504 505 506
  p= int10_to_str(::server_id, p, 10);
  *(p++)= '-';
  *p= 0;

507 508 509
  for (i=0 ; i < (uint)dirp->number_off_files; i++)
  {
    file=dirp->dir_entry+i;
510
    if (is_prefix(file->name, prefbuf))
unknown's avatar
unknown committed
511 512
    {
      fn_format(fname,file->name,slave_load_tmpdir,"",MY_UNPACK_FILENAME);
Marc Alff's avatar
Marc Alff committed
513
      mysql_file_delete(key_file_misc, fname, MYF(0));
unknown's avatar
unknown committed
514
    }
515 516 517 518
  }

  my_dirend(dirp);
}
unknown's avatar
SCRUM  
unknown committed
519
#endif
520 521


unknown's avatar
unknown committed
522
/*
523
  write_str()
unknown's avatar
unknown committed
524
*/
525

526
static bool write_str(IO_CACHE *file, const char *str, uint length)
527
{
528 529
  uchar tmp[1];
  tmp[0]= (uchar) length;
530
  return (my_b_safe_write(file, tmp, sizeof(tmp)) ||
531
	  my_b_safe_write(file, (uchar*) str, length));
532 533 534
}


unknown's avatar
unknown committed
535
/*
536
  read_str()
unknown's avatar
unknown committed
537
*/
538

539 540
static inline int read_str(const char **buf, const char *buf_end,
                           const char **str, uint8 *len)
541
{
542
  if (*buf + ((uint) (uchar) **buf) >= buf_end)
543
    return 1;
544 545 546
  *len= (uint8) **buf;
  *str= (*buf)+1;
  (*buf)+= (uint) *len+1;
547 548 549
  return 0;
}

550

unknown's avatar
unknown committed
551
/**
552 553
  Transforms a string into "" or its expression in 0x... form.
*/
unknown's avatar
unknown committed
554

555
char *str_to_hex(char *to, const char *from, uint len)
556 557 558
{
  if (len)
  {
unknown's avatar
unknown committed
559 560 561
    *to++= '0';
    *to++= 'x';
    to= octet2hex(to, from, len);
562 563
  }
  else
unknown's avatar
unknown committed
564 565
    to= strmov(to, "\"\"");
  return to;                               // pointer to end 0 of 'to'
566 567
}

unknown's avatar
unknown committed
568 569 570
#ifndef MYSQL_CLIENT

/**
571 572 573
  Append a version of the 'from' string suitable for use in a query to
  the 'to' string.  To generate a correct escaping, the character set
  information in 'csinfo' is used.
unknown's avatar
unknown committed
574 575
*/

576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591
int
append_query_string(CHARSET_INFO *csinfo,
                    String const *from, String *to)
{
  char *beg, *ptr;
  uint32 const orig_len= to->length();
  if (to->reserve(orig_len + from->length()*2+3))
    return 1;

  beg= to->c_ptr_quick() + to->length();
  ptr= beg;
  if (csinfo->escape_with_backslash_is_dangerous)
    ptr= str_to_hex(ptr, from->ptr(), from->length());
  else
  {
    *ptr++= '\'';
592
    ptr+= escape_string_for_mysql(csinfo, ptr, 0,
593 594 595 596 597 598 599 600
                                  from->ptr(), from->length());
    *ptr++='\'';
  }
  to->length(orig_len + ptr - beg);
  return 0;
}
#endif

601

unknown's avatar
unknown committed
602
/**
603 604 605 606
  Prints a "session_var=value" string. Used by mysqlbinlog to print some SET
  commands just before it prints a query.
*/

607
#ifdef MYSQL_CLIENT
608

609 610 611
static void print_set_option(IO_CACHE* file, uint32 bits_changed,
                             uint32 option, uint32 flags, const char* name,
                             bool* need_comma)
612 613 614 615
{
  if (bits_changed & option)
  {
    if (*need_comma)
616 617
      my_b_printf(file,", ");
    my_b_printf(file,"%s=%d", name, test(flags & option));
618 619 620
    *need_comma= 1;
  }
}
621
#endif
622

unknown's avatar
unknown committed
623
/**************************************************************************
624
	Log_event methods (= the parent class of all events)
unknown's avatar
unknown committed
625
**************************************************************************/
626

unknown's avatar
unknown committed
627 628 629
/**
  @return
  returns the human readable name of the event's type
unknown's avatar
unknown committed
630
*/
631

632
const char* Log_event::get_type_str(Log_event_type type)
unknown's avatar
unknown committed
633
{
634
  switch(type) {
635
  case START_EVENT_V3:  return "Start_v3";
unknown's avatar
unknown committed
636 637 638 639 640
  case STOP_EVENT:   return "Stop";
  case QUERY_EVENT:  return "Query";
  case ROTATE_EVENT: return "Rotate";
  case INTVAR_EVENT: return "Intvar";
  case LOAD_EVENT:   return "Load";
641
  case NEW_LOAD_EVENT:   return "New_load";
unknown's avatar
unknown committed
642
  case SLAVE_EVENT:  return "Slave";
643 644 645 646
  case CREATE_FILE_EVENT: return "Create_file";
  case APPEND_BLOCK_EVENT: return "Append_block";
  case DELETE_FILE_EVENT: return "Delete_file";
  case EXEC_LOAD_EVENT: return "Exec_load";
647
  case RAND_EVENT: return "RAND";
648
  case XID_EVENT: return "Xid";
unknown's avatar
unknown committed
649
  case USER_VAR_EVENT: return "User var";
650
  case FORMAT_DESCRIPTION_EVENT: return "Format_desc";
651
  case TABLE_MAP_EVENT: return "Table_map";
652 653 654
  case PRE_GA_WRITE_ROWS_EVENT: return "Write_rows_event_old";
  case PRE_GA_UPDATE_ROWS_EVENT: return "Update_rows_event_old";
  case PRE_GA_DELETE_ROWS_EVENT: return "Delete_rows_event_old";
655 656 657
  case WRITE_ROWS_EVENT: return "Write_rows";
  case UPDATE_ROWS_EVENT: return "Update_rows";
  case DELETE_ROWS_EVENT: return "Delete_rows";
unknown's avatar
unknown committed
658 659
  case BEGIN_LOAD_QUERY_EVENT: return "Begin_load_query";
  case EXECUTE_LOAD_QUERY_EVENT: return "Execute_load_query";
660
  case INCIDENT_EVENT: return "Incident";
661
  default: return "Unknown";				/* impossible */
unknown's avatar
unknown committed
662 663 664
  }
}

665 666 667 668 669
const char* Log_event::get_type_str()
{
  return get_type_str(get_type_code());
}

670

unknown's avatar
unknown committed
671
/*
672
  Log_event::Log_event()
unknown's avatar
unknown committed
673
*/
674

unknown's avatar
unknown committed
675
#ifndef MYSQL_CLIENT
676
Log_event::Log_event(THD* thd_arg, uint16 flags_arg, bool using_trans)
677
  :log_pos(0), temp_buf(0), exec_time(0), flags(flags_arg), thd(thd_arg)
678
{
unknown's avatar
unknown committed
679 680
  server_id=	thd->server_id;
  when=		thd->start_time;
681
  cache_type= (using_trans || stmt_has_updated_trans_table(thd)
682
               || thd->thread_temporary_used
683 684
               ? Log_event::EVENT_TRANSACTIONAL_CACHE :
               Log_event::EVENT_STMT_CACHE);
685 686
}

unknown's avatar
unknown committed
687
/**
688 689 690 691
  This minimal constructor is for when you are not even sure that there
  is a valid THD. For example in the server when we are shutting down or
  flushing logs after receiving a SIGHUP (then we must write a Rotate to
  the binlog but we have no THD, so we need this minimal constructor).
unknown's avatar
unknown committed
692 693
*/

694
Log_event::Log_event()
695 696
  :temp_buf(0), exec_time(0), flags(0),
  cache_type(Log_event::EVENT_INVALID_CACHE), thd(0)
697
{
unknown's avatar
unknown committed
698
  server_id=	::server_id;
699 700 701 702 703
  /*
    We can't call my_time() here as this would cause a call before
    my_init() is called
  */
  when=		0;
unknown's avatar
unknown committed
704
  log_pos=	0;
705
}
unknown's avatar
unknown committed
706
#endif /* !MYSQL_CLIENT */
707 708


unknown's avatar
unknown committed
709
/*
710
  Log_event::Log_event()
711
*/
712

713
Log_event::Log_event(const char* buf,
unknown's avatar
unknown committed
714
                     const Format_description_log_event* description_event)
715
  :temp_buf(0), cache_type(Log_event::EVENT_INVALID_CACHE)
716
{
717 718
#ifndef MYSQL_CLIENT
  thd = 0;
unknown's avatar
unknown committed
719
#endif
720 721
  when = uint4korr(buf);
  server_id = uint4korr(buf + SERVER_ID_OFFSET);
722
  data_written= uint4korr(buf + EVENT_LEN_OFFSET);
723
  if (description_event->binlog_version==1)
724
  {
725 726 727
    log_pos= 0;
    flags= 0;
    return;
728
  }
729 730 731
  /* 4.0 or newer */
  log_pos= uint4korr(buf + LOG_POS_OFFSET);
  /*
732 733 734 735 736 737 738 739
    If the log is 4.0 (so here it can only be a 4.0 relay log read by
    the SQL thread or a 4.0 master binlog read by the I/O thread),
    log_pos is the beginning of the event: we transform it into the end
    of the event, which is more useful.
    But how do you know that the log is 4.0: you know it if
    description_event is version 3 *and* you are not reading a
    Format_desc (remember that mysqlbinlog starts by assuming that 5.0
    logs are in 4.0 format, until it finds a Format_desc).
740 741 742
  */
  if (description_event->binlog_version==3 &&
      buf[EVENT_TYPE_OFFSET]<FORMAT_DESCRIPTION_EVENT && log_pos)
743
  {
744 745 746
      /*
        If log_pos=0, don't change it. log_pos==0 is a marker to mean
        "don't change rli->group_master_log_pos" (see
747 748
        inc_group_relay_log_pos()). As it is unreal log_pos, adding the
        event len's is nonsense. For example, a fake Rotate event should
749
        not have its log_pos (which is 0) changed or it will modify
750 751 752 753
        Exec_master_log_pos in SHOW SLAVE STATUS, displaying a nonsense
        value of (a non-zero offset which does not exist in the master's
        binlog, so which will cause problems if the user uses this value
        in CHANGE MASTER).
754
      */
unknown's avatar
unknown committed
755
    log_pos+= data_written; /* purecov: inspected */
756
  }
757 758 759 760 761 762 763
  DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));

  flags= uint2korr(buf + FLAGS_OFFSET);
  if ((buf[EVENT_TYPE_OFFSET] == FORMAT_DESCRIPTION_EVENT) ||
      (buf[EVENT_TYPE_OFFSET] == ROTATE_EVENT))
  {
    /*
764 765
      These events always have a header which stops here (i.e. their
      header is FROZEN).
766 767
    */
    /*
768 769 770 771 772 773 774
      Initialization to zero of all other Log_event members as they're
      not specified. Currently there are no such members; in the future
      there will be an event UID (but Format_description and Rotate
      don't need this UID, as they are not propagated through
      --log-slave-updates (remember the UID is used to not play a query
      twice when you have two masters which are slaves of a 3rd master).
      Then we are done.
775 776 777 778
    */
    return;
  }
  /* otherwise, go on with reading the header from buf (nothing now) */
779 780 781
}

#ifndef MYSQL_CLIENT
unknown's avatar
SCRUM  
unknown committed
782
#ifdef HAVE_REPLICATION
783

784
int Log_event::do_update_pos(Relay_log_info *rli)
785
{
786
  /*
787
    rli is null when (as far as I (Guilhem) know) the caller is
788 789 790 791
    Load_log_event::do_apply_event *and* that one is called from
    Execute_load_log_event::do_apply_event.  In this case, we don't
    do anything here ; Execute_load_log_event::do_apply_event will
    call Log_event::do_apply_event again later with the proper rli.
792 793 794
    Strictly speaking, if we were sure that rli is null only in the
    case discussed above, 'if (rli)' is useless here.  But as we are
    not 100% sure, keep it for now.
795 796

    Matz: I don't think we will need this check with this refactoring.
797
  */
798
  if (rli)
799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824
  {
    /*
      bug#29309 simulation: resetting the flag to force
      wrong behaviour of artificial event to update
      rli->last_master_timestamp for only one time -
      the first FLUSH LOGS in the test.
    */
    DBUG_EXECUTE_IF("let_first_flush_log_change_timestamp",
                    if (debug_not_change_ts_if_art_event == 1
                        && is_artificial_event())
                    {
                      debug_not_change_ts_if_art_event= 0;
                    });
#ifndef DBUG_OFF
    rli->stmt_done(log_pos, 
                   is_artificial_event() &&
                   debug_not_change_ts_if_art_event > 0 ? 0 : when);
#else
    rli->stmt_done(log_pos, is_artificial_event()? 0 : when);
#endif
    DBUG_EXECUTE_IF("let_first_flush_log_change_timestamp",
                    if (debug_not_change_ts_if_art_event == 0)
                    {
                      debug_not_change_ts_if_art_event= 2;
                    });
  }
825 826
  return 0;                                   // Cannot fail currently
}
827

828 829

Log_event::enum_skip_reason
830
Log_event::do_shall_skip(Relay_log_info *rli)
831 832 833 834 835 836 837
{
  DBUG_PRINT("info", ("ev->server_id=%lu, ::server_id=%lu,"
                      " rli->replicate_same_server_id=%d,"
                      " rli->slave_skip_counter=%d",
                      (ulong) server_id, (ulong) ::server_id,
                      rli->replicate_same_server_id,
                      rli->slave_skip_counter));
838 839
  if ((server_id == ::server_id && !rli->replicate_same_server_id) ||
      (rli->slave_skip_counter == 1 && rli->is_in_group()))
840
    return EVENT_SKIP_IGNORE;
841 842 843
  else if (rli->slave_skip_counter > 0)
    return EVENT_SKIP_COUNT;
  else
844
    return EVENT_SKIP_NOT;
845
}
unknown's avatar
unknown committed
846

847

unknown's avatar
unknown committed
848
/*
849
  Log_event::pack_info()
unknown's avatar
unknown committed
850
*/
851

852
void Log_event::pack_info(Protocol *protocol)
unknown's avatar
unknown committed
853
{
854
  protocol->store("", &my_charset_bin);
unknown's avatar
unknown committed
855 856 857
}


unknown's avatar
unknown committed
858
/**
859
  Only called by SHOW BINLOG EVENTS
unknown's avatar
unknown committed
860
*/
861
int Log_event::net_send(Protocol *protocol, const char* log_name, my_off_t pos)
862
{
unknown's avatar
unknown committed
863 864
  const char *p= strrchr(log_name, FN_LIBCHAR);
  const char *event_type;
865 866
  if (p)
    log_name = p + 1;
867

868
  protocol->prepare_for_resend();
869
  protocol->store(log_name, &my_charset_bin);
870
  protocol->store((ulonglong) pos);
871
  event_type = get_type_str();
872
  protocol->store(event_type, strlen(event_type), &my_charset_bin);
873 874 875 876
  protocol->store((uint32) server_id);
  protocol->store((ulonglong) log_pos);
  pack_info(protocol);
  return protocol->write();
877
}
unknown's avatar
SCRUM  
unknown committed
878 879 880
#endif /* HAVE_REPLICATION */


unknown's avatar
unknown committed
881 882 883 884
/**
  init_show_field_list() prepares the column names and types for the
  output of SHOW BINLOG EVENTS; it is used only by SHOW BINLOG
  EVENTS.
unknown's avatar
unknown committed
885
*/
unknown's avatar
SCRUM  
unknown committed
886 887 888 889

void Log_event::init_show_field_list(List<Item>* field_list)
{
  field_list->push_back(new Item_empty_string("Log_name", 20));
890
  field_list->push_back(new Item_return_int("Pos", MY_INT32_NUM_DECIMAL_DIGITS,
unknown's avatar
SCRUM  
unknown committed
891 892 893 894
					    MYSQL_TYPE_LONGLONG));
  field_list->push_back(new Item_empty_string("Event_type", 20));
  field_list->push_back(new Item_return_int("Server_id", 10,
					    MYSQL_TYPE_LONG));
895 896
  field_list->push_back(new Item_return_int("End_log_pos",
                                            MY_INT32_NUM_DECIMAL_DIGITS,
unknown's avatar
SCRUM  
unknown committed
897 898 899 900
					    MYSQL_TYPE_LONGLONG));
  field_list->push_back(new Item_empty_string("Info", 20));
}

901

unknown's avatar
unknown committed
902
/*
903
  Log_event::write()
unknown's avatar
unknown committed
904
*/
905

906
bool Log_event::write_header(IO_CACHE* file, ulong event_data_length)
unknown's avatar
unknown committed
907
{
908
  uchar header[LOG_EVENT_HEADER_LEN];
909
  ulong now;
910
  DBUG_ENTER("Log_event::write_header");
unknown's avatar
unknown committed
911

912 913
  /* Store number of bytes that will be written by this event */
  data_written= event_data_length + sizeof(header);
914

915 916 917 918
  /*
    log_pos != 0 if this is relay-log event. In this case we should not
    change the position
  */
919

920 921 922
  if (is_artificial_event())
  {
    /*
923 924
      Artificial events are automatically generated and do not exist
      in master's binary log, so log_pos should be set to 0.
925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958
    */
    log_pos= 0;
  }
  else  if (!log_pos)
  {
    /*
      Calculate position of end of event

      Note that with a SEQ_READ_APPEND cache, my_b_tell() does not
      work well.  So this will give slightly wrong positions for the
      Format_desc/Rotate/Stop events which the slave writes to its
      relay log. For example, the initial Format_desc will have
      end_log_pos=91 instead of 95. Because after writing the first 4
      bytes of the relay log, my_b_tell() still reports 0. Because
      my_b_append() does not update the counter which my_b_tell()
      later uses (one should probably use my_b_append_tell() to work
      around this).  To get right positions even when writing to the
      relay log, we use the (new) my_b_safe_tell().

      Note that this raises a question on the correctness of all these
      DBUG_ASSERT(my_b_tell()=rli->event_relay_log_pos).

      If in a transaction, the log_pos which we calculate below is not
      very good (because then my_b_safe_tell() returns start position
      of the BEGIN, so it's like the statement was at the BEGIN's
      place), but it's not a very serious problem (as the slave, when
      it is in a transaction, does not take those end_log_pos into
      account (as it calls inc_event_relay_log_pos()). To be fixed
      later, so that it looks less strange. But not bug.
    */

    log_pos= my_b_safe_tell(file)+data_written;
  }

unknown's avatar
unknown committed
959
  now= (ulong) get_time();                              // Query start time
960

961 962 963 964 965 966 967
  /*
    Header will be of size LOG_EVENT_HEADER_LEN for all events, except for
    FORMAT_DESCRIPTION_EVENT and ROTATE_EVENT, where it will be
    LOG_EVENT_MINIMAL_HEADER_LEN (remember these 2 have a frozen header,
    because we read them before knowing the format).
  */

968
  int4store(header, now);              // timestamp
969 970 971 972 973 974 975
  header[EVENT_TYPE_OFFSET]= get_type_code();
  int4store(header+ SERVER_ID_OFFSET, server_id);
  int4store(header+ EVENT_LEN_OFFSET, data_written);
  int4store(header+ LOG_POS_OFFSET, log_pos);
  int2store(header+ FLAGS_OFFSET, flags);

  DBUG_RETURN(my_b_safe_write(file, header, sizeof(header)) != 0);
unknown's avatar
unknown committed
976 977 978
}


unknown's avatar
unknown committed
979
/**
980 981
  This needn't be format-tolerant, because we only read
  LOG_EVENT_MINIMAL_HEADER_LEN (we just want to read the event's length).
unknown's avatar
unknown committed
982
*/
983

984
int Log_event::read_log_event(IO_CACHE* file, String* packet,
Marc Alff's avatar
Marc Alff committed
985
                              mysql_mutex_t* log_lock)
unknown's avatar
unknown committed
986 987
{
  ulong data_len;
988
  int result=0;
989
  char buf[LOG_EVENT_MINIMAL_HEADER_LEN];
990
  DBUG_ENTER("Log_event::read_log_event");
991

992
  if (log_lock)
Marc Alff's avatar
Marc Alff committed
993
    mysql_mutex_lock(log_lock);
994
  if (my_b_read(file, (uchar*) buf, sizeof(buf)))
995
  {
996 997 998 999 1000
    /*
      If the read hits eof, we must report it as eof so the caller
      will know it can go into cond_wait to be woken up on the next
      update to the log.
    */
1001
    DBUG_PRINT("error",("file->error: %d", file->error));
1002 1003 1004
    if (!file->error)
      result= LOG_READ_EOF;
    else
1005
      result= (file->error > 0 ? LOG_READ_TRUNC : LOG_READ_IO);
1006
    goto end;
1007
  }
1008
  data_len= uint4korr(buf + EVENT_LEN_OFFSET);
1009
  if (data_len < LOG_EVENT_MINIMAL_HEADER_LEN ||
unknown's avatar
unknown committed
1010
      data_len > current_thd->variables.max_allowed_packet)
1011
  {
1012
    DBUG_PRINT("error",("data_len: %ld", data_len));
1013
    result= ((data_len < LOG_EVENT_MINIMAL_HEADER_LEN) ? LOG_READ_BOGUS :
1014 1015
	     LOG_READ_TOO_LARGE);
    goto end;
1016
  }
1017 1018 1019 1020 1021 1022 1023 1024

  /* Append the log event header to packet */
  if (packet->append(buf, sizeof(buf)))
  {
    /* Failed to allocate packet */
    result= LOG_READ_MEM;
    goto end;
  }
1025
  data_len-= LOG_EVENT_MINIMAL_HEADER_LEN;
1026 1027
  if (data_len)
  {
1028
    /* Append rest of event, read directly from file into packet */
1029
    if (packet->append(file, data_len))
1030
    {
1031
      /*
1032 1033 1034 1035 1036 1037 1038 1039 1040 1041
        Fatal error occured when appending rest of the event
        to packet, possible failures:
	1. EOF occured when reading from file, it's really an error
           as data_len is >=0 there's supposed to be more bytes available.
           file->error will have been set to number of bytes left to read
        2. Read was interrupted, file->error would normally be set to -1
        3. Failed to allocate memory for packet, my_errno
           will be ENOMEM(file->error shuold be 0, but since the
           memory allocation occurs before the call to read it might
           be uninitialized)
1042
      */
1043 1044
      result= (my_errno == ENOMEM ? LOG_READ_MEM :
               (file->error >= 0 ? LOG_READ_TRUNC: LOG_READ_IO));
1045
      /* Implicit goto end; */
1046
    }
1047
  }
1048 1049 1050

end:
  if (log_lock)
Marc Alff's avatar
Marc Alff committed
1051
    mysql_mutex_unlock(log_lock);
1052
  DBUG_RETURN(result);
unknown's avatar
unknown committed
1053
}
unknown's avatar
unknown committed
1054
#endif /* !MYSQL_CLIENT */
unknown's avatar
unknown committed
1055

unknown's avatar
unknown committed
1056
#ifndef MYSQL_CLIENT
Marc Alff's avatar
Marc Alff committed
1057 1058
#define UNLOCK_MUTEX if (log_lock) mysql_mutex_unlock(log_lock);
#define LOCK_MUTEX if (log_lock) mysql_mutex_lock(log_lock);
1059
#else
1060
#define UNLOCK_MUTEX
1061 1062 1063
#define LOCK_MUTEX
#endif

unknown's avatar
unknown committed
1064 1065 1066
#ifndef MYSQL_CLIENT
/**
  @note
1067
    Allocates memory;  The caller is responsible for clean-up.
unknown's avatar
unknown committed
1068
*/
1069
Log_event* Log_event::read_log_event(IO_CACHE* file,
Marc Alff's avatar
Marc Alff committed
1070
                                     mysql_mutex_t* log_lock,
1071 1072
                                     const Format_description_log_event
                                     *description_event)
unknown's avatar
unknown committed
1073
#else
1074
Log_event* Log_event::read_log_event(IO_CACHE* file,
1075 1076
                                     const Format_description_log_event
                                     *description_event)
1077
#endif
unknown's avatar
unknown committed
1078
{
1079
  DBUG_ENTER("Log_event::read_log_event");
1080
  DBUG_ASSERT(description_event != 0);
1081 1082 1083 1084 1085
  char head[LOG_EVENT_MINIMAL_HEADER_LEN];
  /*
    First we only want to read at most LOG_EVENT_MINIMAL_HEADER_LEN, just to
    check the event for sanity and to know its length; no need to really parse
    it. We say "at most" because this could be a 3.23 master, which has header
1086 1087
    of 13 bytes, whereas LOG_EVENT_MINIMAL_HEADER_LEN is 19 bytes (it's
    "minimal" over the set {MySQL >=4.0}).
1088 1089 1090
  */
  uint header_size= min(description_event->common_header_len,
                        LOG_EVENT_MINIMAL_HEADER_LEN);
1091

1092
  LOCK_MUTEX;
unknown's avatar
unknown committed
1093
  DBUG_PRINT("info", ("my_b_tell: %lu", (ulong) my_b_tell(file)));
1094
  if (my_b_read(file, (uchar *) head, header_size))
1095
  {
1096 1097
    DBUG_PRINT("info", ("Log_event::read_log_event(IO_CACHE*,Format_desc*) \
failed my_b_read"));
unknown's avatar
unknown committed
1098
    UNLOCK_MUTEX;
1099
    /*
1100 1101 1102
      No error here; it could be that we are at the file's end. However
      if the next my_b_read() fails (below), it will be an error as we
      were able to read the first bytes.
1103
    */
1104
    DBUG_RETURN(0);
1105
  }
1106
  uint data_len = uint4korr(head + EVENT_LEN_OFFSET);
1107 1108 1109
  char *buf= 0;
  const char *error= 0;
  Log_event *res=  0;
1110 1111
#ifndef max_allowed_packet
  THD *thd=current_thd;
unknown's avatar
unknown committed
1112
  uint max_allowed_packet= thd ? thd->variables.max_allowed_packet : ~(ulong)0;
1113
#endif
unknown's avatar
unknown committed
1114

1115
  if (data_len > max_allowed_packet)
unknown's avatar
unknown committed
1116
  {
1117 1118
    error = "Event too big";
    goto err;
unknown's avatar
unknown committed
1119 1120
  }

1121
  if (data_len < header_size)
unknown's avatar
unknown committed
1122
  {
1123 1124
    error = "Event too small";
    goto err;
unknown's avatar
unknown committed
1125
  }
1126 1127

  // some events use the extra byte to null-terminate strings
1128
  if (!(buf = (char*) my_malloc(data_len+1, MYF(MY_WME))))
1129 1130 1131
  {
    error = "Out of memory";
    goto err;
unknown's avatar
unknown committed
1132
  }
1133
  buf[data_len] = 0;
1134
  memcpy(buf, head, header_size);
1135
  if (my_b_read(file, (uchar*) buf + header_size, data_len - header_size))
1136 1137 1138 1139
  {
    error = "read error";
    goto err;
  }
1140
  if ((res= read_log_event(buf, data_len, &error, description_event)))
1141
    res->register_temp_buf(buf);
1142

1143
err:
unknown's avatar
unknown committed
1144
  UNLOCK_MUTEX;
1145
  if (!res)
1146
  {
1147
    DBUG_ASSERT(error != 0);
1148 1149
    sql_print_error("Error in Log_event::read_log_event(): "
                    "'%s', data_len: %d, event_type: %d",
1150
		    error,data_len,head[EVENT_TYPE_OFFSET]);
1151
    my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
1152 1153 1154 1155 1156 1157 1158 1159 1160
    /*
      The SQL slave thread will check if file->error<0 to know
      if there was an I/O error. Even if there is no "low-level" I/O errors
      with 'file', any of the high-level above errors is worrying
      enough to stop the SQL thread now ; as we are skipping the current event,
      going on with reading and successfully executing other events can
      only corrupt the slave's databases. So stop.
    */
    file->error= -1;
1161
  }
1162
  DBUG_RETURN(res);
unknown's avatar
unknown committed
1163 1164
}

1165

unknown's avatar
unknown committed
1166
/**
1167 1168
  Binlog format tolerance is in (buf, event_len, description_event)
  constructors.
unknown's avatar
unknown committed
1169
*/
1170

1171 1172 1173
Log_event* Log_event::read_log_event(const char* buf, uint event_len,
				     const char **error,
                                     const Format_description_log_event *description_event)
unknown's avatar
unknown committed
1174
{
1175 1176
  Log_event* ev;
  DBUG_ENTER("Log_event::read_log_event(char*,...)");
1177
  DBUG_ASSERT(description_event != 0);
1178
  DBUG_PRINT("info", ("binlog_version: %d", description_event->binlog_version));
1179 1180
  DBUG_DUMP("data", (unsigned char*) buf, event_len);

1181
  /* Check the integrity */
1182
  if (event_len < EVENT_LEN_OFFSET ||
1183
      buf[EVENT_TYPE_OFFSET] >= ENUM_END_EVENT ||
1184 1185 1186
      (uint) event_len != uint4korr(buf+EVENT_LEN_OFFSET))
  {
    *error="Sanity check failed";		// Needed to free buffer
unknown's avatar
unknown committed
1187
    DBUG_RETURN(NULL); // general sanity check - will fail on a partial read
1188
  }
1189

1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205
  uint event_type= buf[EVENT_TYPE_OFFSET];
  if (event_type > description_event->number_of_event_types &&
      event_type != FORMAT_DESCRIPTION_EVENT)
  {
    /*
      It is unsafe to use the description_event if its post_header_len
      array does not include the event type.
    */
    DBUG_PRINT("error", ("event type %d found, but the current "
                         "Format_description_log_event supports only %d event "
                         "types", event_type,
                         description_event->number_of_event_types));
    ev= NULL;
  }
  else
  {
1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217
    /*
      In some previuos versions (see comment in
      Format_description_log_event::Format_description_log_event(char*,...)),
      event types were assigned different id numbers than in the
      present version. In order to replicate from such versions to the
      present version, we must map those event type id's to our event
      type id's.  The mapping is done with the event_type_permutation
      array, which was set up when the Format_description_log_event
      was read.
    */
    if (description_event->event_type_permutation)
    {
1218 1219 1220 1221 1222
      int new_event_type= description_event->event_type_permutation[event_type];
      DBUG_PRINT("info", ("converting event type %d to %d (%s)",
                   event_type, new_event_type,
                   get_type_str((Log_event_type)new_event_type)));
      event_type= new_event_type;
1223 1224
    }

1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237
    switch(event_type) {
    case QUERY_EVENT:
      ev  = new Query_log_event(buf, event_len, description_event, QUERY_EVENT);
      break;
    case LOAD_EVENT:
      ev = new Load_log_event(buf, event_len, description_event);
      break;
    case NEW_LOAD_EVENT:
      ev = new Load_log_event(buf, event_len, description_event);
      break;
    case ROTATE_EVENT:
      ev = new Rotate_log_event(buf, event_len, description_event);
      break;
unknown's avatar
SCRUM  
unknown committed
1238
#ifdef HAVE_REPLICATION
1239 1240 1241
    case SLAVE_EVENT: /* can never happen (unused event) */
      ev = new Slave_log_event(buf, event_len);
      break;
unknown's avatar
SCRUM  
unknown committed
1242
#endif /* HAVE_REPLICATION */
1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275
    case CREATE_FILE_EVENT:
      ev = new Create_file_log_event(buf, event_len, description_event);
      break;
    case APPEND_BLOCK_EVENT:
      ev = new Append_block_log_event(buf, event_len, description_event);
      break;
    case DELETE_FILE_EVENT:
      ev = new Delete_file_log_event(buf, event_len, description_event);
      break;
    case EXEC_LOAD_EVENT:
      ev = new Execute_load_log_event(buf, event_len, description_event);
      break;
    case START_EVENT_V3: /* this is sent only by MySQL <=4.x */
      ev = new Start_log_event_v3(buf, description_event);
      break;
    case STOP_EVENT:
      ev = new Stop_log_event(buf, description_event);
      break;
    case INTVAR_EVENT:
      ev = new Intvar_log_event(buf, description_event);
      break;
    case XID_EVENT:
      ev = new Xid_log_event(buf, description_event);
      break;
    case RAND_EVENT:
      ev = new Rand_log_event(buf, description_event);
      break;
    case USER_VAR_EVENT:
      ev = new User_var_log_event(buf, description_event);
      break;
    case FORMAT_DESCRIPTION_EVENT:
      ev = new Format_description_log_event(buf, event_len, description_event);
      break;
1276
#if defined(HAVE_REPLICATION) 
1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297
    case PRE_GA_WRITE_ROWS_EVENT:
      ev = new Write_rows_log_event_old(buf, event_len, description_event);
      break;
    case PRE_GA_UPDATE_ROWS_EVENT:
      ev = new Update_rows_log_event_old(buf, event_len, description_event);
      break;
    case PRE_GA_DELETE_ROWS_EVENT:
      ev = new Delete_rows_log_event_old(buf, event_len, description_event);
      break;
    case WRITE_ROWS_EVENT:
      ev = new Write_rows_log_event(buf, event_len, description_event);
      break;
    case UPDATE_ROWS_EVENT:
      ev = new Update_rows_log_event(buf, event_len, description_event);
      break;
    case DELETE_ROWS_EVENT:
      ev = new Delete_rows_log_event(buf, event_len, description_event);
      break;
    case TABLE_MAP_EVENT:
      ev = new Table_map_log_event(buf, event_len, description_event);
      break;
1298
#endif
1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313
    case BEGIN_LOAD_QUERY_EVENT:
      ev = new Begin_load_query_log_event(buf, event_len, description_event);
      break;
    case EXECUTE_LOAD_QUERY_EVENT:
      ev= new Execute_load_query_log_event(buf, event_len, description_event);
      break;
    case INCIDENT_EVENT:
      ev = new Incident_log_event(buf, event_len, description_event);
      break;
    default:
      DBUG_PRINT("error",("Unknown event code: %d",
                          (int) buf[EVENT_TYPE_OFFSET]));
      ev= NULL;
      break;
    }
unknown's avatar
unknown committed
1314
  }
1315

1316 1317 1318 1319
  DBUG_PRINT("read_event", ("%s(type_code: %d; event_len: %d)",
                            ev ? ev->get_type_str() : "<unknown>",
                            buf[EVENT_TYPE_OFFSET],
                            event_len));
1320
  /*
1321 1322 1323 1324 1325 1326 1327
    is_valid() are small event-specific sanity tests which are
    important; for example there are some my_malloc() in constructors
    (e.g. Query_log_event::Query_log_event(char*...)); when these
    my_malloc() fail we can't return an error out of the constructor
    (because constructor is "void") ; so instead we leave the pointer we
    wanted to allocate (e.g. 'query') to 0 and we test it in is_valid().
    Same for Format_description_log_event, member 'post_header_len'.
1328
  */
1329
  if (!ev || !ev->is_valid())
1330
  {
1331 1332
    DBUG_PRINT("error",("Found invalid event in binary log"));

1333
    delete ev;
1334
#ifdef MYSQL_CLIENT
1335
    if (!force_opt) /* then mysqlbinlog dies */
1336 1337
    {
      *error= "Found invalid event in binary log";
unknown's avatar
unknown committed
1338
      DBUG_RETURN(0);
1339
    }
1340
    ev= new Unknown_log_event(buf, description_event);
1341 1342
#else
    *error= "Found invalid event in binary log";
unknown's avatar
unknown committed
1343
    DBUG_RETURN(0);
1344
#endif
1345
  }
unknown's avatar
unknown committed
1346
  DBUG_RETURN(ev);  
unknown's avatar
unknown committed
1347 1348
}

1349
#ifdef MYSQL_CLIENT
1350

unknown's avatar
unknown committed
1351
/*
1352
  Log_event::print_header()
unknown's avatar
unknown committed
1353
*/
1354

1355 1356 1357
void Log_event::print_header(IO_CACHE* file,
                             PRINT_EVENT_INFO* print_event_info,
                             bool is_more __attribute__((unused)))
1358
{
1359
  char llbuff[22];
unknown's avatar
unknown committed
1360
  my_off_t hexdump_from= print_event_info->hexdump_from;
1361
  DBUG_ENTER("Log_event::print_header");
unknown's avatar
unknown committed
1362

1363
  my_b_printf(file, "#");
1364
  print_timestamp(file);
1365
  my_b_printf(file, " server id %lu  end_log_pos %s ", (ulong) server_id,
1366
              llstr(log_pos,llbuff));
1367

1368
  /* mysqlbinlog --hexdump */
unknown's avatar
unknown committed
1369
  if (print_event_info->hexdump_from)
1370
  {
1371
    my_b_printf(file, "\n");
1372 1373 1374
    uchar *ptr= (uchar*)temp_buf;
    my_off_t size=
      uint4korr(ptr + EVENT_LEN_OFFSET) - LOG_EVENT_MINIMAL_HEADER_LEN;
1375 1376
    my_off_t i;

1377 1378 1379 1380
    /* Header len * 4 >= header len * (2 chars + space + extra space) */
    char *h, hex_string[LOG_EVENT_MINIMAL_HEADER_LEN*4]= {0};
    char *c, char_string[16+1]= {0};

unknown's avatar
unknown committed
1381
    /* Pretty-print event common header if header is exactly 19 bytes */
unknown's avatar
unknown committed
1382
    if (print_event_info->common_header_len == LOG_EVENT_MINIMAL_HEADER_LEN)
unknown's avatar
unknown committed
1383
    {
1384 1385 1386
      char emit_buf[256];               // Enough for storing one line
      my_b_printf(file, "# Position  Timestamp   Type   Master ID        "
                  "Size      Master Pos    Flags \n");
1387
      size_t const bytes_written=
1388 1389 1390 1391 1392 1393 1394 1395
        my_snprintf(emit_buf, sizeof(emit_buf),
                    "# %8.8lx %02x %02x %02x %02x   %02x   "
                    "%02x %02x %02x %02x   %02x %02x %02x %02x   "
                    "%02x %02x %02x %02x   %02x %02x\n",
                    (unsigned long) hexdump_from,
                    ptr[0], ptr[1], ptr[2], ptr[3], ptr[4], ptr[5], ptr[6],
                    ptr[7], ptr[8], ptr[9], ptr[10], ptr[11], ptr[12], ptr[13],
                    ptr[14], ptr[15], ptr[16], ptr[17], ptr[18]);
1396 1397
      DBUG_ASSERT(static_cast<size_t>(bytes_written) < sizeof(emit_buf));
      my_b_write(file, (uchar*) emit_buf, bytes_written);
unknown's avatar
unknown committed
1398 1399 1400
      ptr += LOG_EVENT_MINIMAL_HEADER_LEN;
      hexdump_from += LOG_EVENT_MINIMAL_HEADER_LEN;
    }
1401 1402 1403 1404 1405

    /* Rest of event (without common header) */
    for (i= 0, c= char_string, h=hex_string;
	 i < size;
	 i++, ptr++)
1406
    {
1407 1408
      my_snprintf(h, 4, "%02x ", *ptr);
      h += 3;
1409

1410
      *c++= my_isalnum(&my_charset_bin, *ptr) ? *ptr : '.';
1411 1412 1413

      if (i % 16 == 15)
      {
1414 1415 1416 1417 1418 1419 1420
        /*
          my_b_printf() does not support full printf() formats, so we
          have to do it this way.

          TODO: Rewrite my_b_printf() to support full printf() syntax.
         */
        char emit_buf[256];
1421
        size_t const bytes_written=
1422 1423 1424 1425
          my_snprintf(emit_buf, sizeof(emit_buf),
                      "# %8.8lx %-48.48s |%16s|\n",
                      (unsigned long) (hexdump_from + (i & 0xfffffff0)),
                      hex_string, char_string);
1426 1427
        DBUG_ASSERT(static_cast<size_t>(bytes_written) < sizeof(emit_buf));
	my_b_write(file, (uchar*) emit_buf, bytes_written);
1428 1429 1430 1431
	hex_string[0]= 0;
	char_string[0]= 0;
	c= char_string;
	h= hex_string;
1432
      }
1433
      else if (i % 8 == 7) *h++ = ' ';
1434
    }
1435
    *c= '\0';
1436

unknown's avatar
unknown committed
1437
    if (hex_string[0])
1438 1439
    {
      char emit_buf[256];
1440
      size_t const bytes_written=
1441
        my_snprintf(emit_buf, sizeof(emit_buf),
1442
                    "# %8.8lx %-48.48s |%s|\n",
1443 1444
                    (unsigned long) (hexdump_from + (i & 0xfffffff0)),
                    hex_string, char_string);
1445 1446
      DBUG_ASSERT(static_cast<size_t>(bytes_written) < sizeof(emit_buf));
      my_b_write(file, (uchar*) emit_buf, bytes_written);
1447
    }
1448 1449 1450 1451
    /*
      need a # to prefix the rest of printouts for example those of
      Rows_log_event::print_helper().
    */
1452
    my_b_write(file, reinterpret_cast<const uchar*>("# "), 2);
1453
  }
1454
  DBUG_VOID_RETURN;
1455 1456
}

1457

1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585
/**
  Prints a quoted string to io cache.
  Control characters are displayed as hex sequence, e.g. \x00
  
  @param[in] file              IO cache
  @param[in] prt               Pointer to string
  @param[in] length            String length
*/

static void
my_b_write_quoted(IO_CACHE *file, const uchar *ptr, uint length)
{
  const uchar *s;
  my_b_printf(file, "'");
  for (s= ptr; length > 0 ; s++, length--)
  {
    if (*s > 0x1F)
      my_b_write(file, s, 1);
    else
    {
      uchar hex[10];
      size_t len= my_snprintf((char*) hex, sizeof(hex), "%s%02x", "\\x", *s);
      my_b_write(file, hex, len);
    }
  }
  my_b_printf(file, "'");
}


/**
  Prints a bit string to io cache in format  b'1010'.
  
  @param[in] file              IO cache
  @param[in] ptr               Pointer to string
  @param[in] nbits             Number of bits
*/
static void
my_b_write_bit(IO_CACHE *file, const uchar *ptr, uint nbits)
{
  uint bitnum, nbits8= ((nbits + 7) / 8) * 8, skip_bits= nbits8 - nbits;
  my_b_printf(file, "b'");
  for (bitnum= skip_bits ; bitnum < nbits8; bitnum++)
  {
    int is_set= (ptr[(bitnum) / 8] >> (7 - bitnum % 8))  & 0x01;
    my_b_write(file, (const uchar*) (is_set ? "1" : "0"), 1);
  }
  my_b_printf(file, "'");
}


/**
  Prints a packed string to io cache.
  The string consists of length packed to 1 or 2 bytes,
  followed by string data itself.
  
  @param[in] file              IO cache
  @param[in] ptr               Pointer to string
  @param[in] length            String size
  
  @retval   - number of bytes scanned.
*/
static size_t
my_b_write_quoted_with_length(IO_CACHE *file, const uchar *ptr, uint length)
{
  if (length < 256)
  {
    length= *ptr;
    my_b_write_quoted(file, ptr + 1, length);
    return length + 1;
  }
  else
  {
    length= uint2korr(ptr);
    my_b_write_quoted(file, ptr + 2, length);
    return length + 2;
  }
}


/**
  Prints a 32-bit number in both signed and unsigned representation
  
  @param[in] file              IO cache
  @param[in] sl                Signed number
  @param[in] ul                Unsigned number
*/
static void
my_b_write_sint32_and_uint32(IO_CACHE *file, int32 si, uint32 ui)
{
  my_b_printf(file, "%d", si);
  if (si < 0)
    my_b_printf(file, " (%u)", ui);
}


/**
  Print a packed value of the given SQL type into IO cache
  
  @param[in] file              IO cache
  @param[in] ptr               Pointer to string
  @param[in] type              Column type
  @param[in] meta              Column meta information
  @param[out] typestr          SQL type string buffer (for verbose output)
  @param[out] typestr_length   Size of typestr
  
  @retval   - number of bytes scanned from ptr.
*/

static size_t
log_event_print_value(IO_CACHE *file, const uchar *ptr,
                      uint type, uint meta,
                      char *typestr, size_t typestr_length)
{
  uint32 length= 0;

  if (type == MYSQL_TYPE_STRING)
  {
    if (meta >= 256)
    {
      uint byte0= meta >> 8;
      uint byte1= meta & 0xFF;
      
      if ((byte0 & 0x30) != 0x30)
      {
        /* a long CHAR() field: see #37426 */
        length= byte1 | (((byte0 & 0x30) ^ 0x30) << 4);
        type= byte0 | 0x30;
      }
1586 1587
      else
        length = meta & 0xFF;
1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680
    }
    else
      length= meta;
  }

  switch (type) {
  case MYSQL_TYPE_LONG:
    {
      int32 si= sint4korr(ptr);
      uint32 ui= uint4korr(ptr);
      my_b_write_sint32_and_uint32(file, si, ui);
      my_snprintf(typestr, typestr_length, "INT");
      return 4;
    }

  case MYSQL_TYPE_TINY:
    {
      my_b_write_sint32_and_uint32(file, (int) (signed char) *ptr,
                                  (uint) (unsigned char) *ptr);
      my_snprintf(typestr, typestr_length, "TINYINT");
      return 1;
    }

  case MYSQL_TYPE_SHORT:
    {
      int32 si= (int32) sint2korr(ptr);
      uint32 ui= (uint32) uint2korr(ptr);
      my_b_write_sint32_and_uint32(file, si, ui);
      my_snprintf(typestr, typestr_length, "SHORTINT");
      return 2;
    }
  
  case MYSQL_TYPE_INT24:
    {
      int32 si= sint3korr(ptr);
      uint32 ui= uint3korr(ptr);
      my_b_write_sint32_and_uint32(file, si, ui);
      my_snprintf(typestr, typestr_length, "MEDIUMINT");
      return 3;
    }

  case MYSQL_TYPE_LONGLONG:
    {
      char tmp[64];
      longlong si= sint8korr(ptr);
      longlong10_to_str(si, tmp, -10);
      my_b_printf(file, "%s", tmp);
      if (si < 0)
      {
        ulonglong ui= uint8korr(ptr);
        longlong10_to_str((longlong) ui, tmp, 10);
        my_b_printf(file, " (%s)", tmp);        
      }
      my_snprintf(typestr, typestr_length, "LONGINT");
      return 8;
    }

  case MYSQL_TYPE_NEWDECIMAL:
    {
      uint precision= meta >> 8;
      uint decimals= meta & 0xFF;
      uint bin_size= my_decimal_get_binary_size(precision, decimals);
      my_decimal dec;
      binary2my_decimal(E_DEC_FATAL_ERROR, (uchar*) ptr, &dec,
                        precision, decimals);
      int i, end;
      char buff[512], *pos;
      pos= buff;
      pos+= my_sprintf(buff, (buff, "%s", dec.sign() ? "-" : ""));
      end= ROUND_UP(dec.frac) + ROUND_UP(dec.intg)-1;
      for (i=0; i < end; i++)
        pos+= my_sprintf(pos, (pos, "%09d.", dec.buf[i]));
      pos+= my_sprintf(pos, (pos, "%09d", dec.buf[i]));
      my_b_printf(file, "%s", buff);
      my_snprintf(typestr, typestr_length, "DECIMAL(%d,%d)",
                  precision, decimals);
      return bin_size;
    }
    
  case MYSQL_TYPE_FLOAT:
    {
      float fl;
      float4get(fl, ptr);
      char tmp[320];
      sprintf(tmp, "%-20g", (double) fl);
      my_b_printf(file, "%s", tmp); /* my_snprintf doesn't support %-20g */
      my_snprintf(typestr, typestr_length, "FLOAT");
      return 4;
    }

  case MYSQL_TYPE_DOUBLE:
    {
      double dbl;
1681
      float8get(dbl, ptr);
1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708
      char tmp[320];
      sprintf(tmp, "%-.20g", dbl); /* my_snprintf doesn't support %-20g */
      my_b_printf(file, "%s", tmp);
      strcpy(typestr, "DOUBLE");
      return 8;
    }
  
  case MYSQL_TYPE_BIT:
    {
      /* Meta-data: bit_len, bytes_in_rec, 2 bytes */
      uint nbits= ((meta >> 8) * 8) + (meta & 0xFF);
      length= (nbits + 7) / 8;
      my_b_write_bit(file, ptr, nbits);
      my_snprintf(typestr, typestr_length, "BIT(%d)", nbits);
      return length;
    }

  case MYSQL_TYPE_TIMESTAMP:
    {
      uint32 i32= uint4korr(ptr);
      my_b_printf(file, "%d", i32);
      my_snprintf(typestr, typestr_length, "TIMESTAMP");
      return 4;
    }

  case MYSQL_TYPE_DATETIME:
    {
1709
      size_t d, t;
1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728
      uint64 i64= uint8korr(ptr); /* YYYYMMDDhhmmss */
      d= i64 / 1000000;
      t= i64 % 1000000;
      my_b_printf(file, "%04d-%02d-%02d %02d:%02d:%02d",
                  d / 10000, (d % 10000) / 100, d % 100,
                  t / 10000, (t % 10000) / 100, t % 100);
      my_snprintf(typestr, typestr_length, "DATETIME");
      return 8;
    }

  case MYSQL_TYPE_TIME:
    {
      uint32 i32= uint3korr(ptr);
      my_b_printf(file, "'%02d:%02d:%02d'",
                  i32 / 10000, (i32 % 10000) / 100, i32 % 100);
      my_snprintf(typestr,  typestr_length, "TIME");
      return 3;
    }
    
1729 1730 1731 1732
  case MYSQL_TYPE_NEWDATE:
    {
      uint32 tmp= uint3korr(ptr);
      int part;
1733 1734
      char buf[11];
      char *pos= &buf[10];  // start from '\0' to the beginning
1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755

      /* Copied from field.cc */
      *pos--=0;					// End NULL
      part=(int) (tmp & 31);
      *pos--= (char) ('0'+part%10);
      *pos--= (char) ('0'+part/10);
      *pos--= ':';
      part=(int) (tmp >> 5 & 15);
      *pos--= (char) ('0'+part%10);
      *pos--= (char) ('0'+part/10);
      *pos--= ':';
      part=(int) (tmp >> 9);
      *pos--= (char) ('0'+part%10); part/=10;
      *pos--= (char) ('0'+part%10); part/=10;
      *pos--= (char) ('0'+part%10); part/=10;
      *pos=   (char) ('0'+part);
      my_b_printf(file , "'%s'", buf);
      my_snprintf(typestr, typestr_length, "DATE");
      return 3;
    }
    
1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773
  case MYSQL_TYPE_DATE:
    {
      uint i32= uint3korr(ptr);
      my_b_printf(file , "'%04d:%02d:%02d'",
                  (i32 / (16L * 32L)), (i32 / 32L % 16L), (i32 % 32L));
      my_snprintf(typestr, typestr_length, "DATE");
      return 3;
    }
  
  case MYSQL_TYPE_YEAR:
    {
      uint32 i32= *ptr;
      my_b_printf(file, "%04d", i32+ 1900);
      my_snprintf(typestr, typestr_length, "YEAR");
      return 1;
    }
  
  case MYSQL_TYPE_ENUM:
1774
    switch (meta & 0xFF) {
1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786
    case 1:
      my_b_printf(file, "%d", (int) *ptr);
      my_snprintf(typestr, typestr_length, "ENUM(1 byte)");
      return 1;
    case 2:
      {
        int32 i32= uint2korr(ptr);
        my_b_printf(file, "%d", i32);
        my_snprintf(typestr, typestr_length, "ENUM(2 bytes)");
        return 2;
      }
    default:
1787
      my_b_printf(file, "!! Unknown ENUM packlen=%d", meta & 0xFF); 
1788 1789 1790 1791 1792
      return 0;
    }
    break;
    
  case MYSQL_TYPE_SET:
1793 1794 1795
    my_b_write_bit(file, ptr , (meta & 0xFF) * 8);
    my_snprintf(typestr, typestr_length, "SET(%d bytes)", meta & 0xFF);
    return meta & 0xFF;
1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870
  
  case MYSQL_TYPE_BLOB:
    switch (meta) {
    case 1:
      length= *ptr;
      my_b_write_quoted(file, ptr + 1, length);
      my_snprintf(typestr, typestr_length, "TINYBLOB/TINYTEXT");
      return length + 1;
    case 2:
      length= uint2korr(ptr);
      my_b_write_quoted(file, ptr + 2, length);
      my_snprintf(typestr, typestr_length, "BLOB/TEXT");
      return length + 2;
    case 3:
      length= uint3korr(ptr);
      my_b_write_quoted(file, ptr + 3, length);
      my_snprintf(typestr, typestr_length, "MEDIUMBLOB/MEDIUMTEXT");
      return length + 3;
    case 4:
      length= uint4korr(ptr);
      my_b_write_quoted(file, ptr + 4, length);
      my_snprintf(typestr, typestr_length, "LONGBLOB/LONGTEXT");
      return length + 4;
    default:
      my_b_printf(file, "!! Unknown BLOB packlen=%d", length);
      return 0;
    }

  case MYSQL_TYPE_VARCHAR:
  case MYSQL_TYPE_VAR_STRING:
    length= meta;
    my_snprintf(typestr, typestr_length, "VARSTRING(%d)", length);
    return my_b_write_quoted_with_length(file, ptr, length);

  case MYSQL_TYPE_STRING:
    my_snprintf(typestr, typestr_length, "STRING(%d)", length);
    return my_b_write_quoted_with_length(file, ptr, length);

  default:
    {
      char tmp[5];
      my_snprintf(tmp, sizeof(tmp), "%04x", meta);
      my_b_printf(file,
                  "!! Don't know how to handle column type=%d meta=%d (%s)",
                  type, meta, tmp);
    }
    break;
  }
  *typestr= 0;
  return 0;
}


/**
  Print a packed row into IO cache
  
  @param[in] file              IO cache
  @param[in] td                Table definition
  @param[in] print_event_into  Print parameters
  @param[in] cols_bitmap       Column bitmaps.
  @param[in] value             Pointer to packed row
  @param[in] prefix            Row's SQL clause ("SET", "WHERE", etc)
  
  @retval   - number of bytes scanned.
*/


size_t
Rows_log_event::print_verbose_one_row(IO_CACHE *file, table_def *td,
                                      PRINT_EVENT_INFO *print_event_info,
                                      MY_BITMAP *cols_bitmap,
                                      const uchar *value, const uchar *prefix)
{
  const uchar *value0= value;
  const uchar *null_bits= value;
1871
  uint null_bit_index= 0;
1872 1873 1874 1875 1876 1877 1878 1879
  char typestr[64]= "";
  
  value+= (m_width + 7) / 8;
  
  my_b_printf(file, "%s", prefix);
  
  for (size_t i= 0; i < td->size(); i ++)
  {
1880 1881
    int is_null= (null_bits[null_bit_index / 8] 
                  >> (null_bit_index % 8))  & 0x01;
1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917

    if (bitmap_is_set(cols_bitmap, i) == 0)
      continue;
    
    if (is_null)
    {
      my_b_printf(file, "###   @%d=NULL", i + 1);
    }
    else
    {
      my_b_printf(file, "###   @%d=", i + 1);
      size_t size= log_event_print_value(file, value,
                                         td->type(i), td->field_metadata(i),
                                         typestr, sizeof(typestr));
      if (!size)
        return 0;

      value+= size;
    }

    if (print_event_info->verbose > 1)
    {
      my_b_printf(file, " /* ");

      if (typestr[0])
        my_b_printf(file, "%s ", typestr);
      else
        my_b_printf(file, "type=%d ", td->type(i));
      
      my_b_printf(file, "meta=%d nullable=%d is_null=%d ",
                  td->field_metadata(i),
                  td->maybe_null(i), is_null);
      my_b_printf(file, "*/");
    }
    
    my_b_printf(file, "\n");
1918 1919
    
    null_bit_index++;
1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974
  }
  return value - value0;
}


/**
  Print a row event into IO cache in human readable form (in SQL format)
  
  @param[in] file              IO cache
  @param[in] print_event_into  Print parameters
*/
void Rows_log_event::print_verbose(IO_CACHE *file,
                                   PRINT_EVENT_INFO *print_event_info)
{
  Table_map_log_event *map;
  table_def *td;
  const char *sql_command, *sql_clause1, *sql_clause2;
  Log_event_type type_code= get_type_code();
  
  switch (type_code) {
  case WRITE_ROWS_EVENT:
    sql_command= "INSERT INTO";
    sql_clause1= "### SET\n";
    sql_clause2= NULL;
    break;
  case DELETE_ROWS_EVENT:
    sql_command= "DELETE FROM";
    sql_clause1= "### WHERE\n";
    sql_clause2= NULL;
    break;
  case UPDATE_ROWS_EVENT:
    sql_command= "UPDATE";
    sql_clause1= "### WHERE\n";
    sql_clause2= "### SET\n";
    break;
  default:
    sql_command= sql_clause1= sql_clause2= NULL;
    DBUG_ASSERT(0); /* Not possible */
  }
  
  if (!(map= print_event_info->m_table_map.get_table(m_table_id)) ||
      !(td= map->create_table_def()))
  {
    my_b_printf(file, "### Row event for unknown table #%d", m_table_id);
    return;
  }

  for (const uchar *value= m_rows_buf; value < m_rows_end; )
  {
    size_t length;
    my_b_printf(file, "### %s %s.%s\n",
                      sql_command,
                      map->get_db_name(), map->get_table_name());
    /* Print the first image */
    if (!(length= print_verbose_one_row(file, td, print_event_info,
1975
                                  &m_cols, value,
1976 1977 1978 1979 1980 1981 1982 1983
                                  (const uchar*) sql_clause1)))
      goto end;
    value+= length;

    /* Print the second image (for UPDATE only) */
    if (sql_clause2)
    {
      if (!(length= print_verbose_one_row(file, td, print_event_info,
1984
                                      &m_cols_ai, value,
1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001
                                      (const uchar*) sql_clause2)))
        goto end;
      value+= length;
    }
  }

end:
  delete td;
}

#ifdef MYSQL_CLIENT
void free_table_map_log_event(Table_map_log_event *event)
{
  delete event;
}
#endif

2002 2003 2004
void Log_event::print_base64(IO_CACHE* file,
                             PRINT_EVENT_INFO* print_event_info,
                             bool more)
2005
{
2006
  const uchar *ptr= (const uchar *)temp_buf;
2007
  uint32 size= uint4korr(ptr + EVENT_LEN_OFFSET);
2008 2009
  DBUG_ENTER("Log_event::print_base64");

2010
  size_t const tmp_str_sz= base64_needed_encoded_length((int) size);
2011
  char *const tmp_str= (char *) my_malloc(tmp_str_sz, MYF(MY_WME));
2012 2013 2014
  if (!tmp_str) {
    fprintf(stderr, "\nError: Out of memory. "
            "Could not print correct binlog event.\n");
2015
    DBUG_VOID_RETURN;
2016
  }
2017

unknown's avatar
unknown committed
2018 2019 2020 2021
  if (base64_encode(ptr, (size_t) size, tmp_str))
  {
    DBUG_ASSERT(0);
  }
2022

2023 2024 2025 2026
  if (print_event_info->base64_output_mode != BASE64_OUTPUT_DECODE_ROWS)
  {
    if (my_b_tell(file) == 0)
      my_b_printf(file, "\nBINLOG '\n");
2027

2028
    my_b_printf(file, "%s\n", tmp_str);
2029

2030 2031 2032 2033
    if (!more)
      my_b_printf(file, "'%s\n", print_event_info->delimiter);
  }
  
2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067
  if (print_event_info->verbose)
  {
    Rows_log_event *ev= NULL;
    
    if (ptr[4] == TABLE_MAP_EVENT)
    {
      Table_map_log_event *map; 
      map= new Table_map_log_event((const char*) ptr, size, 
                                   glob_description_event);
      print_event_info->m_table_map.set_table(map->get_table_id(), map);
    }
    else if (ptr[4] == WRITE_ROWS_EVENT)
    {
      ev= new Write_rows_log_event((const char*) ptr, size,
                                   glob_description_event);
    }
    else if (ptr[4] == DELETE_ROWS_EVENT)
    {
      ev= new Delete_rows_log_event((const char*) ptr, size,
                                    glob_description_event);
    }
    else if (ptr[4] == UPDATE_ROWS_EVENT)
    {
      ev= new Update_rows_log_event((const char*) ptr, size,
                                    glob_description_event);
    }
    
    if (ev)
    {
      ev->print_verbose(file, print_event_info);
      delete ev;
    }
  }
    
2068
  my_free(tmp_str, MYF(0));
2069
  DBUG_VOID_RETURN;
2070 2071 2072
}


unknown's avatar
unknown committed
2073
/*
2074
  Log_event::print_timestamp()
unknown's avatar
unknown committed
2075
*/
2076

2077
void Log_event::print_timestamp(IO_CACHE* file, time_t* ts)
unknown's avatar
unknown committed
2078
{
unknown's avatar
unknown committed
2079
  struct tm *res;
2080
  DBUG_ENTER("Log_event::print_timestamp");
2081 2082
  if (!ts)
    ts = &when;
2083 2084
#ifdef MYSQL_SERVER				// This is always false
  struct tm tm_tmp;
unknown's avatar
unknown committed
2085
  localtime_r(ts,(res= &tm_tmp));
unknown's avatar
unknown committed
2086
#else
2087
  res=localtime(ts);
unknown's avatar
unknown committed
2088
#endif
2089

2090 2091 2092 2093 2094 2095 2096 2097
  my_b_printf(file,"%02d%02d%02d %2d:%02d:%02d",
              res->tm_year % 100,
              res->tm_mon+1,
              res->tm_mday,
              res->tm_hour,
              res->tm_min,
              res->tm_sec);
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
2098 2099
}

unknown's avatar
unknown committed
2100
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
2101 2102


2103 2104 2105 2106 2107 2108 2109 2110 2111 2112
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
inline Log_event::enum_skip_reason
Log_event::continue_group(Relay_log_info *rli)
{
  if (rli->slave_skip_counter == 1)
    return Log_event::EVENT_SKIP_IGNORE;
  return Log_event::do_shall_skip(rli);
}
#endif

unknown's avatar
unknown committed
2113
/**************************************************************************
unknown's avatar
unknown committed
2114
	Query_log_event methods
unknown's avatar
unknown committed
2115
**************************************************************************/
2116

unknown's avatar
SCRUM  
unknown committed
2117
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2118

unknown's avatar
unknown committed
2119
/**
2120 2121 2122 2123
  This (which is used only for SHOW BINLOG EVENTS) could be updated to
  print SET @@session_var=. But this is not urgent, as SHOW BINLOG EVENTS is
  only an information, it does not produce suitable queries to replay (for
  example it does not print LOAD DATA INFILE).
unknown's avatar
unknown committed
2124 2125
  @todo
    show the catalog ??
unknown's avatar
unknown committed
2126
*/
2127

2128
void Query_log_event::pack_info(Protocol *protocol)
unknown's avatar
unknown committed
2129
{
2130
  // TODO: show the catalog ??
2131
  char *buf, *pos;
2132
  if (!(buf= (char*) my_malloc(9 + db_len + q_len, MYF(MY_WME))))
2133
    return;
2134 2135
  pos= buf;
  if (!(flags & LOG_EVENT_SUPPRESS_USE_F)
2136
      && db && db_len)
2137
  {
2138 2139
    pos= strmov(buf, "use `");
    memcpy(pos, db, db_len);
unknown's avatar
unknown committed
2140
    pos= strmov(pos+db_len, "`; ");
2141
  }
2142
  if (query && q_len)
2143 2144 2145 2146
  {
    memcpy(pos, query, q_len);
    pos+= q_len;
  }
2147
  protocol->store(buf, pos-buf, &my_charset_bin);
2148
  my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
2149
}
unknown's avatar
SCRUM  
unknown committed
2150
#endif
2151

2152
#ifndef MYSQL_CLIENT
2153

unknown's avatar
unknown committed
2154 2155 2156
/**
  Utility function for the next method (Query_log_event::write()) .
*/
2157 2158
static void write_str_with_code_and_len(uchar **dst, const char *src,
                                        uint len, uint code)
2159
{
2160 2161 2162 2163 2164
  /*
    only 1 byte to store the length of catalog, so it should not
    surpass 255
  */
  DBUG_ASSERT(len <= 255);
2165 2166 2167 2168 2169 2170 2171 2172
  DBUG_ASSERT(src);
  *((*dst)++)= code;
  *((*dst)++)= (uchar) len;
  bmove(*dst, src, len);
  (*dst)+= len;
}


unknown's avatar
unknown committed
2173 2174
/**
  Query_log_event::write().
unknown's avatar
unknown committed
2175

unknown's avatar
unknown committed
2176
  @note
2177 2178 2179
    In this event we have to modify the header to have the correct
    EVENT_LEN_OFFSET as we don't yet know how many status variables we
    will print!
unknown's avatar
unknown committed
2180
*/
2181

2182
bool Query_log_event::write(IO_CACHE* file)
unknown's avatar
unknown committed
2183
{
2184 2185
  uchar buf[QUERY_HEADER_LEN + MAX_SIZE_LOG_EVENT_STATUS];
  uchar *start, *start_of_status;
2186
  ulong event_length;
unknown's avatar
unknown committed
2187

2188
  if (!query)
2189 2190
    return 1;                                   // Something wrong with event

unknown's avatar
unknown committed
2191 2192 2193 2194 2195
  /*
    We want to store the thread id:
    (- as an information for the user when he reads the binlog)
    - if the query uses temporary table: for the slave SQL thread to know to
    which master connection the temp table belongs.
2196
    Now imagine we (write()) are called by the slave SQL thread (we are
unknown's avatar
unknown committed
2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228
    logging a query executed by this thread; the slave runs with
    --log-slave-updates). Then this query will be logged with
    thread_id=the_thread_id_of_the_SQL_thread. Imagine that 2 temp tables of
    the same name were created simultaneously on the master (in the master
    binlog you have
    CREATE TEMPORARY TABLE t; (thread 1)
    CREATE TEMPORARY TABLE t; (thread 2)
    ...)
    then in the slave's binlog there will be
    CREATE TEMPORARY TABLE t; (thread_id_of_the_slave_SQL_thread)
    CREATE TEMPORARY TABLE t; (thread_id_of_the_slave_SQL_thread)
    which is bad (same thread id!).

    To avoid this, we log the thread's thread id EXCEPT for the SQL
    slave thread for which we log the original (master's) thread id.
    Now this moves the bug: what happens if the thread id on the
    master was 10 and when the slave replicates the query, a
    connection number 10 is opened by a normal client on the slave,
    and updates a temp table of the same name? We get a problem
    again. To avoid this, in the handling of temp tables (sql_base.cc)
    we use thread_id AND server_id.  TODO when this is merged into
    4.1: in 4.1, slave_proxy_id has been renamed to pseudo_thread_id
    and is a session variable: that's to make mysqlbinlog work with
    temp tables. We probably need to introduce

    SET PSEUDO_SERVER_ID
    for mysqlbinlog in 4.1. mysqlbinlog would print:
    SET PSEUDO_SERVER_ID=
    SET PSEUDO_THREAD_ID=
    for each query using temp tables.
  */
  int4store(buf + Q_THREAD_ID_OFFSET, slave_proxy_id);
2229 2230 2231 2232
  int4store(buf + Q_EXEC_TIME_OFFSET, exec_time);
  buf[Q_DB_LEN_OFFSET] = (char) db_len;
  int2store(buf + Q_ERR_CODE_OFFSET, error_code);

2233 2234 2235 2236 2237 2238 2239 2240
  /*
    You MUST always write status vars in increasing order of code. This
    guarantees that a slightly older slave will be able to parse those he
    knows.
  */
  start_of_status= start= buf+QUERY_HEADER_LEN;
  if (flags2_inited)
  {
2241
    *start++= Q_FLAGS2_CODE;
2242 2243 2244 2245 2246
    int4store(start, flags2);
    start+= 4;
  }
  if (sql_mode_inited)
  {
2247
    *start++= Q_SQL_MODE_CODE;
unknown's avatar
unknown committed
2248
    int8store(start, (ulonglong)sql_mode);
2249 2250
    start+= 8;
  }
2251
  if (catalog_len) // i.e. this var is inited (false for 4.0 events)
2252
  {
2253
    write_str_with_code_and_len(&start,
2254
                                catalog, catalog_len, Q_CATALOG_NZ_CODE);
2255
    /*
2256 2257 2258 2259 2260 2261
      In 5.0.x where x<4 masters we used to store the end zero here. This was
      a waste of one byte so we don't do it in x>=4 masters. We change code to
      Q_CATALOG_NZ_CODE, because re-using the old code would make x<4 slaves
      of this x>=4 master segfault (expecting a zero when there is
      none). Remaining compatibility problems are: the older slave will not
      find the catalog; but it is will not crash, and it's not an issue
2262 2263 2264 2265 2266
      that it does not find the catalog as catalogs were not used in these
      older MySQL versions (we store it in binlog and read it from relay log
      but do nothing useful with it). What is an issue is that the older slave
      will stop processing the Q_* blocks (and jumps to the db/query) as soon
      as it sees unknown Q_CATALOG_NZ_CODE; so it will not be able to read
2267 2268
      Q_AUTO_INCREMENT*, Q_CHARSET and so replication will fail silently in
      various ways. Documented that you should not mix alpha/beta versions if
2269 2270 2271
      they are not exactly the same version, with example of 5.0.3->5.0.2 and
      5.0.4->5.0.3. If replication is from older to new, the new will
      recognize Q_CATALOG_CODE and have no problem.
2272 2273
    */
  }
2274
  if (auto_increment_increment != 1 || auto_increment_offset != 1)
2275 2276 2277 2278 2279 2280
  {
    *start++= Q_AUTO_INCREMENT;
    int2store(start, auto_increment_increment);
    int2store(start+2, auto_increment_offset);
    start+= 4;
  }
2281 2282
  if (charset_inited)
  {
2283
    *start++= Q_CHARSET_CODE;
2284 2285 2286
    memcpy(start, charset, 6);
    start+= 6;
  }
2287 2288 2289 2290
  if (time_zone_len)
  {
    /* In the TZ sys table, column Name is of length 64 so this should be ok */
    DBUG_ASSERT(time_zone_len <= MAX_TIME_ZONE_NAME_LENGTH);
2291
    write_str_with_code_and_len(&start,
2292
                                time_zone_str, time_zone_len, Q_TIME_ZONE_CODE);
2293
  }
2294 2295 2296 2297 2298 2299 2300
  if (lc_time_names_number)
  {
    DBUG_ASSERT(lc_time_names_number <= 0xFFFF);
    *start++= Q_LC_TIME_NAMES_CODE;
    int2store(start, lc_time_names_number);
    start+= 2;
  }
2301 2302 2303 2304 2305 2306 2307
  if (charset_database_number)
  {
    DBUG_ASSERT(charset_database_number <= 0xFFFF);
    *start++= Q_CHARSET_DATABASE_CODE;
    int2store(start, charset_database_number);
    start+= 2;
  }
2308 2309 2310 2311 2312 2313
  if (table_map_for_update)
  {
    *start++= Q_TABLE_MAP_FOR_UPDATE_CODE;
    int8store(start, table_map_for_update);
    start+= 8;
  }
2314 2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325
  if (master_data_written != 0)
  {
    /*
      Q_MASTER_DATA_WRITTEN_CODE only exists in relay logs where the master
      has binlog_version<4 and the slave has binlog_version=4. See comment
      for master_data_written in log_event.h for details.
    */
    *start++= Q_MASTER_DATA_WRITTEN_CODE;
    int4store(start, master_data_written);
    start+= 4;
  }

2326
  /*
2327
    NOTE: When adding new status vars, please don't forget to update
2328 2329
    the MAX_SIZE_LOG_EVENT_STATUS in log_event.h and update the function
    code_name() in this file.
2330
   
2331
    Here there could be code like
2332
    if (command-line-option-which-says-"log_this_variable" && inited)
2333
    {
2334
    *start++= Q_THIS_VARIABLE_CODE;
2335 2336 2337 2338 2339 2340 2341
    int4store(start, this_variable);
    start+= 4;
    }
  */
  
  /* Store length of status variables */
  status_vars_len= (uint) (start-start_of_status);
2342
  DBUG_ASSERT(status_vars_len <= MAX_SIZE_LOG_EVENT_STATUS);
2343 2344 2345 2346 2347 2348
  int2store(buf + Q_STATUS_VARS_LEN_OFFSET, status_vars_len);

  /*
    Calculate length of whole event
    The "1" below is the \0 in the db's length
  */
unknown's avatar
unknown committed
2349
  event_length= (uint) (start-buf) + get_post_header_size_for_derived() + db_len + 1 + q_len;
2350 2351

  return (write_header(file, event_length) ||
2352
          my_b_safe_write(file, (uchar*) buf, QUERY_HEADER_LEN) ||
unknown's avatar
unknown committed
2353
          write_post_header_for_derived(file) ||
2354
          my_b_safe_write(file, (uchar*) start_of_status,
unknown's avatar
unknown committed
2355
                          (uint) (start-start_of_status)) ||
2356 2357
          my_b_safe_write(file, (db) ? (uchar*) db : (uchar*)"", db_len + 1) ||
          my_b_safe_write(file, (uchar*) query, q_len)) ? 1 : 0;
unknown's avatar
unknown committed
2358 2359
}

unknown's avatar
unknown committed
2360
/**
2361 2362 2363 2364 2365 2366 2367 2368 2369
  The simplest constructor that could possibly work.  This is used for
  creating static objects that have a special meaning and are invisible
  to the log.  
*/
Query_log_event::Query_log_event()
  :Log_event(), data_buf(0)
{
}

2370

unknown's avatar
unknown committed
2371
/*
2372 2373
  SYNOPSIS
    Query_log_event::Query_log_event()
2374
      thd_arg           - thread handle
2375 2376 2377 2378
      query_arg         - array of char representing the query
      query_length      - size of the  `query_arg' array
      using_trans       - there is a modified transactional table
      suppress_use      - suppress the generation of 'USE' statements
2379 2380
      errcode           - the error code of the query
      
2381 2382
  DESCRIPTION
  Creates an event for binlogging
2383
  The value for `errcode' should be supplied by caller.
unknown's avatar
unknown committed
2384
*/
2385
Query_log_event::Query_log_event(THD* thd_arg, const char* query_arg,
2386
				 ulong query_length, bool using_trans,
2387
				 bool direct, bool suppress_use, int errcode)
2388

2389
  :Log_event(thd_arg,
2390 2391 2392
             (thd_arg->thread_specific_used ? LOG_EVENT_THREAD_SPECIFIC_F :
              0) |
             (suppress_use ? LOG_EVENT_SUPPRESS_USE_F : 0),
2393
	     using_trans),
2394
   data_buf(0), query(query_arg), catalog(thd_arg->catalog),
2395
   db(thd_arg->db), q_len((uint32) query_length),
unknown's avatar
unknown committed
2396 2397
   thread_id(thd_arg->thread_id),
   /* save the original thread id; we already know the server id */
2398
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
2399
   flags2_inited(1), sql_mode_inited(1), charset_inited(1),
2400 2401
   sql_mode(thd_arg->variables.sql_mode),
   auto_increment_increment(thd_arg->variables.auto_increment_increment),
2402
   auto_increment_offset(thd_arg->variables.auto_increment_offset),
2403
   lc_time_names_number(thd_arg->variables.lc_time_names->number),
2404
   charset_database_number(0),
Davi Arnaut's avatar
Davi Arnaut committed
2405 2406
   table_map_for_update((ulonglong)thd_arg->table_map_for_update),
   master_data_written(0)
2407 2408
{
  time_t end_time;
2409

2410
  error_code= errcode;
He Zhenxing's avatar
He Zhenxing committed
2411

2412
  time(&end_time);
2413
  exec_time = (ulong) (end_time  - thd_arg->start_time);
2414 2415 2416 2417
  /**
    @todo this means that if we have no catalog, then it is replicated
    as an existing catalog of length zero. is that safe? /sven
  */
2418
  catalog_len = (catalog) ? (uint32) strlen(catalog) : 0;
2419
  /* status_vars_len is set just before writing the event */
2420
  db_len = (db) ? (uint32) strlen(db) : 0;
2421 2422 2423
  if (thd_arg->variables.collation_database != thd_arg->db_charset)
    charset_database_number= thd_arg->variables.collation_database->number;
  
2424
  /*
2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444
    We only replicate over the bits of flags2 that we need: the rest
    are masked out by "& OPTIONS_WRITTEN_TO_BINLOG".

    We also force AUTOCOMMIT=1.  Rationale (cf. BUG#29288): After
    fixing BUG#26395, we always write BEGIN and COMMIT around all
    transactions (even single statements in autocommit mode).  This is
    so that replication from non-transactional to transactional table
    and error recovery from XA to non-XA table should work as
    expected.  The BEGIN/COMMIT are added in log.cc. However, there is
    one exception: MyISAM bypasses log.cc and writes directly to the
    binlog.  So if autocommit is off, master has MyISAM, and slave has
    a transactional engine, then the slave will just see one long
    never-ending transaction.  The only way to bypass explicit
    BEGIN/COMMIT in the binlog is by using a non-transactional table.
    So setting AUTOCOMMIT=1 will make this work as expected.

    Note: explicitly replicate AUTOCOMMIT=1 from master. We do not
    assume AUTOCOMMIT=1 on slave; the slave still reads the state of
    the autocommit flag as written by the master to the binlog. This
    behavior may change after WL#4162 has been implemented.
2445
  */
2446
  flags2= (uint32) (thd_arg->variables.option_bits &
2447
                    (OPTIONS_WRITTEN_TO_BIN_LOG & ~OPTION_NOT_AUTOCOMMIT));
2448 2449 2450
  DBUG_ASSERT(thd_arg->variables.character_set_client->number < 256*256);
  DBUG_ASSERT(thd_arg->variables.collation_connection->number < 256*256);
  DBUG_ASSERT(thd_arg->variables.collation_server->number < 256*256);
2451
  DBUG_ASSERT(thd_arg->variables.character_set_client->mbminlen == 1);
2452 2453 2454
  int2store(charset, thd_arg->variables.character_set_client->number);
  int2store(charset+2, thd_arg->variables.collation_connection->number);
  int2store(charset+4, thd_arg->variables.collation_server->number);
2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466
  if (thd_arg->time_zone_used)
  {
    /*
      Note that our event becomes dependent on the Time_zone object
      representing the time zone. Fortunately such objects are never deleted
      or changed during mysqld's lifetime.
    */
    time_zone_len= thd_arg->variables.time_zone->get_name()->length();
    time_zone_str= thd_arg->variables.time_zone->get_name()->ptr();
  }
  else
    time_zone_len= 0;
2467 2468 2469 2470 2471 2472 2473

  /*
    In what follows, we decide whether to write to the binary log or to use a
    cache.
  */
  LEX *lex= thd->lex;
  bool implicit_commit= FALSE;
2474
  bool force_trans= FALSE;
2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487
  cache_type= Log_event::EVENT_INVALID_CACHE;
  switch (lex->sql_command)
  {
    case SQLCOM_ALTER_DB:
    case SQLCOM_CREATE_FUNCTION:
    case SQLCOM_DROP_FUNCTION:
    case SQLCOM_DROP_PROCEDURE:
    case SQLCOM_INSTALL_PLUGIN:
    case SQLCOM_UNINSTALL_PLUGIN:
    case SQLCOM_ALTER_TABLESPACE:
      implicit_commit= TRUE;
      break;
    case SQLCOM_DROP_TABLE:
2488 2489
      force_trans= lex->drop_temporary && thd->in_multi_stmt_transaction();
      implicit_commit= !force_trans;
2490 2491 2492
      break;
    case SQLCOM_ALTER_TABLE:
    case SQLCOM_CREATE_TABLE:
2493 2494 2495 2496 2497
      force_trans= (lex->create_info.options & HA_LEX_CREATE_TMP_TABLE) &&
                    thd->in_multi_stmt_transaction();
      implicit_commit= !force_trans &&
                       !(lex->select_lex.item_list.elements &&
                         thd->is_current_stmt_binlog_format_row());
2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539
      break;
    case SQLCOM_SET_OPTION:
      implicit_commit= (lex->autocommit ? TRUE : FALSE);
      break;
    /*
      Replace what follows after CF_AUTO_COMMIT_TRANS is backported by:

      default:
        implicit_commit= ((sql_command_flags[lex->sql_command] &
                      CF_AUTO_COMMIT_TRANS));
      break;
    */
    case SQLCOM_CREATE_INDEX:
    case SQLCOM_TRUNCATE:
    case SQLCOM_CREATE_DB:
    case SQLCOM_DROP_DB:
    case SQLCOM_ALTER_DB_UPGRADE:
    case SQLCOM_RENAME_TABLE:
    case SQLCOM_DROP_INDEX:
    case SQLCOM_CREATE_VIEW:
    case SQLCOM_DROP_VIEW:
    case SQLCOM_CREATE_TRIGGER:
    case SQLCOM_DROP_TRIGGER:
    case SQLCOM_CREATE_EVENT:
    case SQLCOM_ALTER_EVENT:
    case SQLCOM_DROP_EVENT:
    case SQLCOM_REPAIR:
    case SQLCOM_OPTIMIZE:
    case SQLCOM_ANALYZE:
    case SQLCOM_CREATE_USER:
    case SQLCOM_DROP_USER:
    case SQLCOM_RENAME_USER:
    case SQLCOM_REVOKE_ALL:
    case SQLCOM_REVOKE:
    case SQLCOM_GRANT:
    case SQLCOM_CREATE_PROCEDURE:
    case SQLCOM_CREATE_SPFUNCTION:
    case SQLCOM_ALTER_PROCEDURE:
    case SQLCOM_ALTER_FUNCTION:
    case SQLCOM_ASSIGN_TO_KEYCACHE:
    case SQLCOM_PRELOAD_KEYS:
    case SQLCOM_FLUSH:
2540
    case SQLCOM_RESET:
2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554
    case SQLCOM_CHECK:
      implicit_commit= TRUE;
      break;
    default:
      implicit_commit= FALSE;
      break;
  }

  if (implicit_commit || direct)
  {
    cache_type= Log_event::EVENT_NO_CACHE;
  }
  else
  {
2555
    cache_type= ((using_trans || stmt_has_updated_trans_table(thd) ||
2556
                 force_trans || thd->thread_temporary_used)
2557 2558 2559 2560
                 ? Log_event::EVENT_TRANSACTIONAL_CACHE :
                 Log_event::EVENT_STMT_CACHE);
  }
  DBUG_ASSERT(cache_type != Log_event::EVENT_INVALID_CACHE);
unknown's avatar
unknown committed
2561 2562
  DBUG_PRINT("info",("Query_log_event has flags2: %lu  sql_mode: %lu",
                     (ulong) flags2, sql_mode));
2563
}
unknown's avatar
unknown committed
2564
#endif /* MYSQL_CLIENT */
2565

unknown's avatar
unknown committed
2566

2567 2568
/* 2 utility functions for the next method */

2569 2570 2571 2572 2573 2574 2575 2576 2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591
/**
   Read a string with length from memory.

   This function reads the string-with-length stored at
   <code>src</code> and extract the length into <code>*len</code> and
   a pointer to the start of the string into <code>*dst</code>. The
   string can then be copied using <code>memcpy()</code> with the
   number of bytes given in <code>*len</code>.

   @param src Pointer to variable holding a pointer to the memory to
              read the string from.
   @param dst Pointer to variable holding a pointer where the actual
              string starts. Starting from this position, the string
              can be copied using @c memcpy().
   @param len Pointer to variable where the length will be stored.
   @param end One-past-the-end of the memory where the string is
              stored.

   @return    Zero if the entire string can be copied successfully,
              @c UINT_MAX if the length could not be read from memory
              (that is, if <code>*src >= end</code>), otherwise the
              number of bytes that are missing to read the full
              string, which happends <code>*dst + *len >= end</code>.
2592
*/
2593 2594 2595 2596 2597
static int
get_str_len_and_pointer(const Log_event::Byte **src,
                        const char **dst,
                        uint *len,
                        const Log_event::Byte *end)
2598
{
2599 2600 2601 2602 2603 2604
  if (*src >= end)
    return -1;       // Will be UINT_MAX in two-complement arithmetics
  uint length= **src;
  if (length > 0)
  {
    if (*src + length >= end)
2605
      return *src + length - end + 1;       // Number of bytes missing
2606 2607 2608
    *dst= (char *)*src + 1;                    // Will be copied later
  }
  *len= length;
2609 2610
  *src+= length + 1;
  return 0;
2611 2612
}

2613 2614 2615
static void copy_str_and_move(const char **src, 
                              Log_event::Byte **dst, 
                              uint len)
2616 2617
{
  memcpy(*dst, *src, len);
2618
  *src= (const char *)*dst;
2619 2620 2621 2622
  (*dst)+= len;
  *(*dst)++= 0;
}

2623

2624
#ifndef DBUG_OFF
unknown's avatar
unknown committed
2625 2626 2627 2628
static char const *
code_name(int code)
{
  static char buf[255];
2629 2630 2631 2632 2633 2634 2635 2636 2637 2638
  switch (code) {
  case Q_FLAGS2_CODE: return "Q_FLAGS2_CODE";
  case Q_SQL_MODE_CODE: return "Q_SQL_MODE_CODE";
  case Q_CATALOG_CODE: return "Q_CATALOG_CODE";
  case Q_AUTO_INCREMENT: return "Q_AUTO_INCREMENT";
  case Q_CHARSET_CODE: return "Q_CHARSET_CODE";
  case Q_TIME_ZONE_CODE: return "Q_TIME_ZONE_CODE";
  case Q_CATALOG_NZ_CODE: return "Q_CATALOG_NZ_CODE";
  case Q_LC_TIME_NAMES_CODE: return "Q_LC_TIME_NAMES_CODE";
  case Q_CHARSET_DATABASE_CODE: return "Q_CHARSET_DATABASE_CODE";
2639
  case Q_TABLE_MAP_FOR_UPDATE_CODE: return "Q_TABLE_MAP_FOR_UPDATE_CODE";
2640
  case Q_MASTER_DATA_WRITTEN_CODE: return "Q_MASTER_DATA_WRITTEN_CODE";
2641 2642 2643 2644
  }
  sprintf(buf, "CODE#%d", code);
  return buf;
}
2645
#endif
2646

2647 2648 2649 2650 2651 2652 2653
/**
   Macro to check that there is enough space to read from memory.

   @param PTR Pointer to memory
   @param END End of memory
   @param CNT Number of bytes that should be read.
 */
2654 2655 2656 2657 2658 2659 2660 2661 2662
#define CHECK_SPACE(PTR,END,CNT)                      \
  do {                                                \
    DBUG_PRINT("info", ("Read %s", code_name(pos[-1]))); \
    DBUG_ASSERT((PTR) + (CNT) <= (END));              \
    if ((PTR) + (CNT) > (END)) {                      \
      DBUG_PRINT("info", ("query= 0"));               \
      query= 0;                                       \
      DBUG_VOID_RETURN;                               \
    }                                                 \
2663 2664
  } while (0)

2665

unknown's avatar
unknown committed
2666
/**
2667
  This is used by the SQL slave thread to prepare the event before execution.
unknown's avatar
unknown committed
2668
*/
2669
Query_log_event::Query_log_event(const char* buf, uint event_len,
2670 2671
                                 const Format_description_log_event
                                 *description_event,
unknown's avatar
unknown committed
2672
                                 Log_event_type event_type)
2673
  :Log_event(buf, description_event), data_buf(0), query(NullS),
2674
   db(NullS), catalog_len(0), status_vars_len(0),
2675
   flags2_inited(0), sql_mode_inited(0), charset_inited(0),
2676
   auto_increment_increment(1), auto_increment_offset(1),
2677
   time_zone_len(0), lc_time_names_number(0), charset_database_number(0),
2678
   table_map_for_update(0), master_data_written(0)
unknown's avatar
unknown committed
2679 2680
{
  ulong data_len;
2681 2682
  uint32 tmp;
  uint8 common_header_len, post_header_len;
2683 2684
  Log_event::Byte *start;
  const Log_event::Byte *end;
2685
  bool catalog_nz= 1;
2686 2687 2688
  DBUG_ENTER("Query_log_event::Query_log_event(char*,...)");

  common_header_len= description_event->common_header_len;
unknown's avatar
unknown committed
2689
  post_header_len= description_event->post_header_len[event_type-1];
unknown's avatar
unknown committed
2690
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704
                     event_len, common_header_len, post_header_len));
  
  /*
    We test if the event's length is sensible, and if so we compute data_len.
    We cannot rely on QUERY_HEADER_LEN here as it would not be format-tolerant.
    We use QUERY_HEADER_MINIMAL_LEN which is the same for 3.23, 4.0 & 5.0.
  */
  if (event_len < (uint)(common_header_len + post_header_len))
    DBUG_VOID_RETURN;				
  data_len = event_len - (common_header_len + post_header_len);
  buf+= common_header_len;
  
  slave_proxy_id= thread_id = uint4korr(buf + Q_THREAD_ID_OFFSET);
  exec_time = uint4korr(buf + Q_EXEC_TIME_OFFSET);
2705
  db_len = (uint)buf[Q_DB_LEN_OFFSET]; // TODO: add a check of all *_len vars
2706 2707 2708 2709 2710 2711 2712 2713 2714
  error_code = uint2korr(buf + Q_ERR_CODE_OFFSET);

  /*
    5.0 format starts here.
    Depending on the format, we may or not have affected/warnings etc
    The remnent post-header to be parsed has length:
  */
  tmp= post_header_len - QUERY_HEADER_MINIMAL_LEN; 
  if (tmp)
2715
  {
2716
    status_vars_len= uint2korr(buf + Q_STATUS_VARS_LEN_OFFSET);
2717 2718 2719 2720 2721 2722
    /*
      Check if status variable length is corrupt and will lead to very
      wrong data. We could be even more strict and require data_len to
      be even bigger, but this will suffice to catch most corruption
      errors that can lead to a crash.
    */
2723
    if (status_vars_len > min(data_len, MAX_SIZE_LOG_EVENT_STATUS))
2724
    {
unknown's avatar
unknown committed
2725
      DBUG_PRINT("info", ("status_vars_len (%u) > data_len (%lu); query= 0",
2726
                          status_vars_len, data_len));
2727 2728 2729
      query= 0;
      DBUG_VOID_RETURN;
    }
2730 2731 2732 2733
    data_len-= status_vars_len;
    DBUG_PRINT("info", ("Query_log_event has status_vars_len: %u",
                        (uint) status_vars_len));
    tmp-= 2;
2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745
  } 
  else
  {
    /*
      server version < 5.0 / binlog_version < 4 master's event is 
      relay-logged with storing the original size of the event in
      Q_MASTER_DATA_WRITTEN_CODE status variable.
      The size is to be restored at reading Q_MASTER_DATA_WRITTEN_CODE-marked
      event from the relay log.
    */
    DBUG_ASSERT(description_event->binlog_version < 4);
    master_data_written= data_written;
2746
  }
unknown's avatar
unknown committed
2747 2748 2749 2750 2751 2752
  /*
    We have parsed everything we know in the post header for QUERY_EVENT,
    the rest of post header is either comes from older version MySQL or
    dedicated to derived events (e.g. Execute_load_query...)
  */

2753 2754
  /* variable-part: the status vars; only in MySQL 5.0  */
  
2755 2756 2757
  start= (Log_event::Byte*) (buf+post_header_len);
  end= (const Log_event::Byte*) (start+status_vars_len);
  for (const Log_event::Byte* pos= start; pos < end;)
2758
  {
2759 2760
    switch (*pos++) {
    case Q_FLAGS2_CODE:
2761
      CHECK_SPACE(pos, end, 4);
2762 2763
      flags2_inited= 1;
      flags2= uint4korr(pos);
unknown's avatar
unknown committed
2764
      DBUG_PRINT("info",("In Query_log_event, read flags2: %lu", (ulong) flags2));
2765 2766 2767 2768 2769 2770 2771
      pos+= 4;
      break;
    case Q_SQL_MODE_CODE:
    {
#ifndef DBUG_OFF
      char buff[22];
#endif
2772
      CHECK_SPACE(pos, end, 8);
2773 2774 2775 2776 2777 2778 2779
      sql_mode_inited= 1;
      sql_mode= (ulong) uint8korr(pos); // QQ: Fix when sql_mode is ulonglong
      DBUG_PRINT("info",("In Query_log_event, read sql_mode: %s",
			 llstr(sql_mode, buff)));
      pos+= 8;
      break;
    }
2780
    case Q_CATALOG_NZ_CODE:
2781
      DBUG_PRINT("info", ("case Q_CATALOG_NZ_CODE; pos: 0x%lx; end: 0x%lx",
unknown's avatar
unknown committed
2782
                          (ulong) pos, (ulong) end));
2783 2784
      if (get_str_len_and_pointer(&pos, &catalog, &catalog_len, end))
      {
2785
        DBUG_PRINT("info", ("query= 0"));
2786 2787 2788
        query= 0;
        DBUG_VOID_RETURN;
      }
2789 2790
      break;
    case Q_AUTO_INCREMENT:
2791
      CHECK_SPACE(pos, end, 4);
2792 2793 2794 2795
      auto_increment_increment= uint2korr(pos);
      auto_increment_offset=    uint2korr(pos+2);
      pos+= 4;
      break;
2796 2797
    case Q_CHARSET_CODE:
    {
2798
      CHECK_SPACE(pos, end, 6);
2799 2800 2801 2802 2803
      charset_inited= 1;
      memcpy(charset, pos, 6);
      pos+= 6;
      break;
    }
2804 2805
    case Q_TIME_ZONE_CODE:
    {
2806 2807
      if (get_str_len_and_pointer(&pos, &time_zone_str, &time_zone_len, end))
      {
2808
        DBUG_PRINT("info", ("Q_TIME_ZONE_CODE: query= 0"));
2809 2810 2811
        query= 0;
        DBUG_VOID_RETURN;
      }
2812 2813
      break;
    }
2814
    case Q_CATALOG_CODE: /* for 5.0.x where 0<=x<=3 masters */
2815
      CHECK_SPACE(pos, end, 1);
2816 2817
      if ((catalog_len= *pos))
        catalog= (char*) pos+1;                           // Will be copied later
2818
      CHECK_SPACE(pos, end, catalog_len + 2);
2819 2820 2821
      pos+= catalog_len+2; // leap over end 0
      catalog_nz= 0; // catalog has end 0 in event
      break;
2822
    case Q_LC_TIME_NAMES_CODE:
2823
      CHECK_SPACE(pos, end, 2);
2824 2825 2826
      lc_time_names_number= uint2korr(pos);
      pos+= 2;
      break;
2827
    case Q_CHARSET_DATABASE_CODE:
2828
      CHECK_SPACE(pos, end, 2);
2829 2830 2831
      charset_database_number= uint2korr(pos);
      pos+= 2;
      break;
2832 2833 2834 2835 2836
    case Q_TABLE_MAP_FOR_UPDATE_CODE:
      CHECK_SPACE(pos, end, 8);
      table_map_for_update= uint8korr(pos);
      pos+= 8;
      break;
2837 2838 2839 2840 2841
    case Q_MASTER_DATA_WRITTEN_CODE:
      CHECK_SPACE(pos, end, 4);
      data_written= master_data_written= uint4korr(pos);
      pos+= 4;
      break;
2842 2843 2844 2845
    default:
      /* That's why you must write status vars in growing order of code */
      DBUG_PRINT("info",("Query_log_event has unknown status vars (first has\
 code: %u), skipping the rest of them", (uint) *(pos-1)));
2846
      pos= (const uchar*) end;                         // Break loop
2847
    }
2848
  }
2849
  
2850
#if !defined(MYSQL_CLIENT) && defined(HAVE_QUERY_CACHE)
2851 2852 2853 2854 2855 2856
  if (!(start= data_buf = (Log_event::Byte*) my_malloc(catalog_len + 1 +
                                              time_zone_len + 1 +
                                              data_len + 1 +
                                              QUERY_CACHE_FLAGS_SIZE +
                                              db_len + 1,
                                              MYF(MY_WME))))
2857
#else
2858 2859 2860 2861
  if (!(start= data_buf = (Log_event::Byte*) my_malloc(catalog_len + 1 +
                                             time_zone_len + 1 +
                                             data_len + 1,
                                             MYF(MY_WME))))
2862
#endif
unknown's avatar
unknown committed
2863
      DBUG_VOID_RETURN;
2864
  if (catalog_len)                                  // If catalog is given
2865
  {
2866 2867 2868 2869 2870
    /**
      @todo we should clean up and do only copy_str_and_move; it
      works for both cases.  Then we can remove the catalog_nz
      flag. /sven
    */
2871
    if (likely(catalog_nz)) // true except if event comes from 5.0.0|1|2|3.
2872
      copy_str_and_move(&catalog, &start, catalog_len);
2873 2874 2875
    else
    {
      memcpy(start, catalog, catalog_len+1); // copy end 0
2876
      catalog= (const char *)start;
2877 2878
      start+= catalog_len+1;
    }
2879
  }
2880
  if (time_zone_len)
2881
    copy_str_and_move(&time_zone_str, &start, time_zone_len);
2882

2883 2884 2885 2886 2887 2888 2889
  /**
    if time_zone_len or catalog_len are 0, then time_zone and catalog
    are uninitialized at this point.  shouldn't they point to the
    zero-length null-terminated strings we allocated space for in the
    my_alloc call above? /sven
  */

2890
  /* A 2nd variable part; this is common to all versions */ 
2891
  memcpy((char*) start, end, data_len);          // Copy db and query
2892
  start[data_len]= '\0';              // End query with \0 (For safetly)
2893 2894
  db= (char *)start;
  query= (char *)(start + db_len + 1);
2895 2896
  q_len= data_len - db_len -1;
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
2897 2898
}

2899

2900
#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
2901 2902 2903 2904 2905 2906
/**
  Query_log_event::print().

  @todo
    print the catalog ??
*/
2907
void Query_log_event::print_query_header(IO_CACHE* file,
unknown's avatar
unknown committed
2908
					 PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
2909
{
2910
  // TODO: print the catalog ??
2911
  char buff[40],*end;				// Enough for SET TIMESTAMP
2912 2913 2914
  bool different_db= 1;
  uint32 tmp;

unknown's avatar
unknown committed
2915
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
2916
  {
2917 2918 2919 2920
    print_header(file, print_event_info, FALSE);
    my_b_printf(file, "\t%s\tthread_id=%lu\texec_time=%lu\terror_code=%d\n",
                get_type_str(), (ulong) thread_id, (ulong) exec_time,
                error_code);
unknown's avatar
unknown committed
2921 2922
  }

unknown's avatar
unknown committed
2923
  if (!(flags & LOG_EVENT_SUPPRESS_USE_F) && db)
2924
  {
2925 2926
    different_db= memcmp(print_event_info->db, db, db_len + 1);
    if (different_db)
unknown's avatar
unknown committed
2927
      memcpy(print_event_info->db, db, db_len + 1);
unknown's avatar
unknown committed
2928
    if (db[0] && different_db) 
unknown's avatar
unknown committed
2929
      my_b_printf(file, "use %s%s\n", db, print_event_info->delimiter);
2930
  }
2931

2932
  end=int10_to_str((long) when, strmov(buff,"SET TIMESTAMP="),10);
2933
  end= strmov(end, print_event_info->delimiter);
2934
  *end++='\n';
2935
  my_b_write(file, (uchar*) buff, (uint) (end-buff));
2936 2937 2938 2939 2940
  if ((!print_event_info->thread_id_printed ||
       ((flags & LOG_EVENT_THREAD_SPECIFIC_F) &&
        thread_id != print_event_info->thread_id)))
  {
    // If --short-form, print deterministic value instead of pseudo_thread_id.
unknown's avatar
unknown committed
2941
    my_b_printf(file,"SET @@session.pseudo_thread_id=%lu%s\n",
2942 2943 2944 2945 2946
                short_form ? 999999999 : (ulong)thread_id,
                print_event_info->delimiter);
    print_event_info->thread_id= thread_id;
    print_event_info->thread_id_printed= 1;
  }
2947

2948
  /*
2949 2950 2951
    If flags2_inited==0, this is an event from 3.23 or 4.0; nothing to
    print (remember we don't produce mixed relay logs so there cannot be
    5.0 events before that one so there is nothing to reset).
2952 2953 2954 2955
  */
  if (likely(flags2_inited)) /* likely as this will mainly read 5.0 logs */
  {
    /* tmp is a bitmask of bits which have changed. */
unknown's avatar
unknown committed
2956
    if (likely(print_event_info->flags2_inited)) 
2957
      /* All bits which have changed */
unknown's avatar
unknown committed
2958
      tmp= (print_event_info->flags2) ^ flags2;
2959 2960
    else /* that's the first Query event we read */
    {
unknown's avatar
unknown committed
2961
      print_event_info->flags2_inited= 1;
2962 2963 2964 2965 2966 2967
      tmp= ~((uint32)0); /* all bits have changed */
    }

    if (unlikely(tmp)) /* some bits have changed */
    {
      bool need_comma= 0;
2968
      my_b_printf(file, "SET ");
2969
      print_set_option(file, tmp, OPTION_NO_FOREIGN_KEY_CHECKS, ~flags2,
2970
                       "@@session.foreign_key_checks", &need_comma);
2971
      print_set_option(file, tmp, OPTION_AUTO_IS_NULL, flags2,
2972
                       "@@session.sql_auto_is_null", &need_comma);
2973
      print_set_option(file, tmp, OPTION_RELAXED_UNIQUE_CHECKS, ~flags2,
2974 2975 2976
                       "@@session.unique_checks", &need_comma);
      print_set_option(file, tmp, OPTION_NOT_AUTOCOMMIT, ~flags2,
                       "@@session.autocommit", &need_comma);
unknown's avatar
unknown committed
2977
      my_b_printf(file,"%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
2978
      print_event_info->flags2= flags2;
2979 2980 2981 2982
    }
  }

  /*
2983 2984 2985 2986 2987 2988 2989 2990 2991 2992
    Now the session variables;
    it's more efficient to pass SQL_MODE as a number instead of a
    comma-separated list.
    FOREIGN_KEY_CHECKS, SQL_AUTO_IS_NULL, UNIQUE_CHECKS are session-only
    variables (they have no global version; they're not listed in
    sql_class.h), The tests below work for pure binlogs or pure relay
    logs. Won't work for mixed relay logs but we don't create mixed
    relay logs (that is, there is no relay log with a format change
    except within the 3 first events, which mysqlbinlog handles
    gracefully). So this code should always be good.
2993 2994
  */

2995 2996 2997
  if (likely(sql_mode_inited) &&
      (unlikely(print_event_info->sql_mode != sql_mode ||
                !print_event_info->sql_mode_inited)))
2998
  {
2999 3000 3001 3002
    my_b_printf(file,"SET @@session.sql_mode=%lu%s\n",
                (ulong)sql_mode, print_event_info->delimiter);
    print_event_info->sql_mode= sql_mode;
    print_event_info->sql_mode_inited= 1;
3003
  }
unknown's avatar
unknown committed
3004 3005
  if (print_event_info->auto_increment_increment != auto_increment_increment ||
      print_event_info->auto_increment_offset != auto_increment_offset)
3006
  {
unknown's avatar
unknown committed
3007 3008 3009
    my_b_printf(file,"SET @@session.auto_increment_increment=%lu, @@session.auto_increment_offset=%lu%s\n",
                auto_increment_increment,auto_increment_offset,
                print_event_info->delimiter);
unknown's avatar
unknown committed
3010 3011
    print_event_info->auto_increment_increment= auto_increment_increment;
    print_event_info->auto_increment_offset=    auto_increment_offset;
3012 3013
  }

3014 3015
  /* TODO: print the catalog when we feature SET CATALOG */

3016 3017 3018
  if (likely(charset_inited) &&
      (unlikely(!print_event_info->charset_inited ||
                bcmp((uchar*) print_event_info->charset, (uchar*) charset, 6))))
3019
  {
3020 3021
    CHARSET_INFO *cs_info= get_charset(uint2korr(charset), MYF(MY_WME));
    if (cs_info)
3022
    {
3023 3024 3025
      /* for mysql client */
      my_b_printf(file, "/*!\\C %s */%s\n",
                  cs_info->csname, print_event_info->delimiter);
3026
    }
3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037
    my_b_printf(file,"SET "
                "@@session.character_set_client=%d,"
                "@@session.collation_connection=%d,"
                "@@session.collation_server=%d"
                "%s\n",
                uint2korr(charset),
                uint2korr(charset+2),
                uint2korr(charset+4),
                print_event_info->delimiter);
    memcpy(print_event_info->charset, charset, 6);
    print_event_info->charset_inited= 1;
3038
  }
3039 3040
  if (time_zone_len)
  {
3041 3042
    if (bcmp((uchar*) print_event_info->time_zone_str,
             (uchar*) time_zone_str, time_zone_len+1))
3043
    {
unknown's avatar
unknown committed
3044 3045
      my_b_printf(file,"SET @@session.time_zone='%s'%s\n",
                  time_zone_str, print_event_info->delimiter);
unknown's avatar
unknown committed
3046
      memcpy(print_event_info->time_zone_str, time_zone_str, time_zone_len+1);
3047 3048
    }
  }
3049 3050
  if (lc_time_names_number != print_event_info->lc_time_names_number)
  {
unknown's avatar
unknown committed
3051 3052
    my_b_printf(file, "SET @@session.lc_time_names=%d%s\n",
                lc_time_names_number, print_event_info->delimiter);
3053 3054
    print_event_info->lc_time_names_number= lc_time_names_number;
  }
3055 3056 3057
  if (charset_database_number != print_event_info->charset_database_number)
  {
    if (charset_database_number)
unknown's avatar
unknown committed
3058 3059
      my_b_printf(file, "SET @@session.collation_database=%d%s\n",
                  charset_database_number, print_event_info->delimiter);
3060
    else
unknown's avatar
unknown committed
3061 3062
      my_b_printf(file, "SET @@session.collation_database=DEFAULT%s\n",
                  print_event_info->delimiter);
3063 3064
    print_event_info->charset_database_number= charset_database_number;
  }
unknown's avatar
unknown committed
3065 3066
}

3067

unknown's avatar
unknown committed
3068
void Query_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
3069
{
3070 3071 3072
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
3073
  my_b_write(&cache, (uchar*) query, q_len);
3074
  my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
3075
}
unknown's avatar
unknown committed
3076
#endif /* MYSQL_CLIENT */
3077

unknown's avatar
unknown committed
3078

unknown's avatar
unknown committed
3079
/*
3080
  Query_log_event::do_apply_event()
unknown's avatar
unknown committed
3081
*/
unknown's avatar
unknown committed
3082

unknown's avatar
SCRUM  
unknown committed
3083
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3084

3085
int Query_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
3086
{
3087
  return do_apply_event(rli, query, q_len);
unknown's avatar
unknown committed
3088 3089 3090
}


unknown's avatar
unknown committed
3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103 3104 3105 3106 3107
/**
  @todo
  Compare the values of "affected rows" around here. Something
  like:
  @code
     if ((uint32) affected_in_event != (uint32) affected_on_slave)
     {
     sql_print_error("Slave: did not get the expected number of affected \
     rows running query from master - expected %d, got %d (this numbers \
     should have matched modulo 4294967296).", 0, ...);
     thd->query_error = 1;
     }
  @endcode
  We may also want an option to tell the slave to ignore "affected"
  mismatch. This mismatch could be implemented with a new ER_ code, and
  to ignore it you would use --slave-skip-errors...
*/
3108
int Query_log_event::do_apply_event(Relay_log_info const *rli,
3109
                                      const char *query_arg, uint32 q_len_arg)
unknown's avatar
unknown committed
3110
{
3111
  LEX_STRING new_db;
unknown's avatar
unknown committed
3112
  int expected_error,actual_error= 0;
3113 3114
  HA_CREATE_INFO db_options;

3115
  /*
3116 3117 3118
    Colleagues: please never free(thd->catalog) in MySQL. This would
    lead to bugs as here thd->catalog is a part of an alloced block,
    not an entire alloced block (see
3119
    Query_log_event::do_apply_event()). Same for thd->db.  Thank
3120
    you.
3121
  */
3122
  thd->catalog= catalog_len ? (char *) catalog : (char *)"";
3123 3124 3125
  new_db.length= db_len;
  new_db.str= (char *) rpl_filter->get_rewrite_db(db, &new_db.length);
  thd->set_db(new_db.str, new_db.length);       /* allocates a copy of 'db' */
3126 3127 3128 3129 3130 3131 3132

  /*
    Setting the character set and collation of the current database thd->db.
   */
  load_db_opt_by_name(thd, thd->db, &db_options);
  if (db_options.default_table_charset)
    thd->db_charset= db_options.default_table_charset;
3133 3134
  thd->variables.auto_increment_increment= auto_increment_increment;
  thd->variables.auto_increment_offset=    auto_increment_offset;
unknown's avatar
unknown committed
3135

3136
  /*
3137 3138 3139 3140 3141 3142 3143 3144
    InnoDB internally stores the master log position it has executed so far,
    i.e. the position just after the COMMIT event.
    When InnoDB will want to store, the positions in rli won't have
    been updated yet, so group_master_log_* will point to old BEGIN
    and event_master_log* will point to the beginning of current COMMIT.
    But log_pos of the COMMIT Query event is what we want, i.e. the pos of the
    END of the current log event (COMMIT). We save it in rli so that InnoDB can
    access it.
3145
  */
3146
  const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
3147 3148
  DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));

3149
  clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
3150 3151 3152 3153 3154 3155 3156 3157 3158 3159 3160 3161 3162 3163 3164 3165 3166 3167 3168 3169 3170 3171 3172 3173 3174 3175 3176 3177 3178
  if (strcmp("COMMIT", query) == 0 && rli->tables_to_lock)
  {
    /*
      Cleaning-up the last statement context:
      the terminal event of the current statement flagged with
      STMT_END_F got filtered out in ndb circular replication.
    */
    int error;
    char llbuff[22];
    if ((error= rows_event_stmt_cleanup(const_cast<Relay_log_info*>(rli), thd)))
    {
      const_cast<Relay_log_info*>(rli)->report(ERROR_LEVEL, error,
                  "Error in cleaning up after an event preceeding the commit; "
                  "the group log file/position: %s %s",
                  const_cast<Relay_log_info*>(rli)->group_master_log_name,
                  llstr(const_cast<Relay_log_info*>(rli)->group_master_log_pos,
                        llbuff));
    }
    /*
      Executing a part of rli->stmt_done() logics that does not deal
      with group position change. The part is redundant now but is 
      future-change-proof addon, e.g if COMMIT handling will start checking
      invariants like IN_STMT flag must be off at committing the transaction.
    */
    const_cast<Relay_log_info*>(rli)->inc_event_relay_log_pos();
    const_cast<Relay_log_info*>(rli)->clear_flag(Relay_log_info::IN_STMT);
  }
  else
  {
3179
    const_cast<Relay_log_info*>(rli)->slave_close_thread_tables(thd);
3180
  }
3181

unknown's avatar
unknown committed
3182 3183 3184 3185 3186 3187 3188
  /*
    Note:   We do not need to execute reset_one_shot_variables() if this
            db_ok() test fails.
    Reason: The db stored in binlog events is the same for SET and for
            its companion query.  If the SET is ignored because of
            db_ok(), the companion query will also be ignored, and if
            the companion query is ignored in the db_ok() test of
3189
            ::do_apply_event(), then the companion SET also have so
3190
            we don't need to reset_one_shot_variables().
unknown's avatar
unknown committed
3191
  */
3192
  if (is_trans_keyword() || rpl_filter->db_ok(thd->db))
3193 3194
  {
    thd->set_time((time_t)when);
3195
    thd->set_query_and_id((char*)query_arg, q_len_arg, next_query_id());
unknown's avatar
unknown committed
3196
    thd->variables.pseudo_thread_id= thread_id;		// for temp tables
3197
    DBUG_PRINT("query",("%s", thd->query()));
3198

unknown's avatar
unknown committed
3199
    if (ignored_error_code((expected_error= error_code)) ||
3200
	!unexpected_error_code(expected_error))
3201 3202 3203
    {
      if (flags2_inited)
        /*
3204
          all bits of thd->variables.option_bits which are 1 in OPTIONS_WRITTEN_TO_BIN_LOG
3205
          must take their value from flags2.
3206
        */
3207
        thd->variables.option_bits= flags2|(thd->variables.option_bits & ~OPTIONS_WRITTEN_TO_BIN_LOG);
3208 3209
      /*
        else, we are in a 3.23/4.0 binlog; we previously received a
3210
        Rotate_log_event which reset thd->variables.option_bits and sql_mode etc, so
3211
        nothing to do.
3212 3213 3214 3215 3216
      */
      /*
        We do not replicate IGNORE_DIR_IN_CREATE. That is, if the master is a
        slave which runs with SQL_MODE=IGNORE_DIR_IN_CREATE, this should not
        force us to ignore the dir too. Imagine you are a ring of machines, and
3217 3218 3219
        one has a disk problem so that you temporarily need
        IGNORE_DIR_IN_CREATE on this machine; you don't want it to propagate
        elsewhere (you don't want all slaves to start ignoring the dirs).
3220 3221 3222 3223 3224 3225 3226 3227 3228 3229 3230 3231 3232 3233 3234 3235 3236 3237
      */
      if (sql_mode_inited)
        thd->variables.sql_mode=
          (ulong) ((thd->variables.sql_mode & MODE_NO_DIR_IN_CREATE) |
                   (sql_mode & ~(ulong) MODE_NO_DIR_IN_CREATE));
      if (charset_inited)
      {
        if (rli->cached_charset_compare(charset))
        {
          /* Verify that we support the charsets found in the event. */
          if (!(thd->variables.character_set_client=
                get_charset(uint2korr(charset), MYF(MY_WME))) ||
              !(thd->variables.collation_connection=
                get_charset(uint2korr(charset+2), MYF(MY_WME))) ||
              !(thd->variables.collation_server=
                get_charset(uint2korr(charset+4), MYF(MY_WME))))
          {
            /*
3238 3239 3240 3241
              We updated the thd->variables with nonsensical values (0). Let's
              set them to something safe (i.e. which avoids crash), and we'll
              stop with EE_UNKNOWN_CHARSET in compare_errors (unless set to
              ignore this error).
3242
            */
3243
            set_slave_thread_default_charset(thd, rli);
3244 3245 3246 3247 3248
            goto compare_errors;
          }
          thd->update_charset(); // for the charset change to take effect
        }
      }
3249 3250 3251
      if (time_zone_len)
      {
        String tmp(time_zone_str, time_zone_len, &my_charset_bin);
3252
        if (!(thd->variables.time_zone= my_tz_find(thd, &tmp)))
3253 3254 3255 3256 3257 3258
        {
          my_error(ER_UNKNOWN_TIME_ZONE, MYF(0), tmp.c_ptr());
          thd->variables.time_zone= global_system_variables.time_zone;
          goto compare_errors;
        }
      }
3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271
      if (lc_time_names_number)
      {
        if (!(thd->variables.lc_time_names=
              my_locale_by_number(lc_time_names_number)))
        {
          my_printf_error(ER_UNKNOWN_ERROR,
                      "Unknown locale: '%d'", MYF(0), lc_time_names_number);
          thd->variables.lc_time_names= &my_locale_en_US;
          goto compare_errors;
        }
      }
      else
        thd->variables.lc_time_names= &my_locale_en_US;
3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286
      if (charset_database_number)
      {
        CHARSET_INFO *cs;
        if (!(cs= get_charset(charset_database_number, MYF(0))))
        {
          char buf[20];
          int10_to_str((int) charset_database_number, buf, -10);
          my_error(ER_UNKNOWN_COLLATION, MYF(0), buf);
          goto compare_errors;
        }
        thd->variables.collation_database= cs;
      }
      else
        thd->variables.collation_database= thd->db_charset;
      
3287 3288
      thd->table_map_for_update= (table_map)table_map_for_update;
      
3289
      /* Execute the query (note that we bypass dispatch_command()) */
3290
      const char* found_semicolon= NULL;
3291
      mysql_parse(thd, thd->query(), thd->query_length(), &found_semicolon);
3292
      log_slow_statement(thd);
3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303 3304

      /*
        Resetting the enable_slow_log thd variable.

        We need to reset it back to the opt_log_slow_slave_statements
        value after the statement execution (and slow logging
        is done). It might have changed if the statement was an
        admin statement (in which case, down in mysql_parse execution
        thd->enable_slow_log is set to the value of
        opt_log_slow_admin_statements).
      */
      thd->enable_slow_log= opt_log_slow_slave_statements;
3305
    }
unknown's avatar
unknown committed
3306 3307
    else
    {
unknown's avatar
unknown committed
3308
      /*
unknown's avatar
unknown committed
3309 3310 3311 3312 3313
        The query got a really bad error on the master (thread killed etc),
        which could be inconsistent. Parse it to test the table names: if the
        replicate-*-do|ignore-table rules say "this query must be ignored" then
        we exit gracefully; otherwise we warn about the bad error and tell DBA
        to check/fix it.
unknown's avatar
unknown committed
3314
      */
3315
      if (mysql_test_parse_for_slave(thd, thd->query(), thd->query_length()))
3316
        clear_all_errors(thd, const_cast<Relay_log_info*>(rli)); /* Can ignore query */
unknown's avatar
unknown committed
3317
      else
3318
      {
3319
        rli->report(ERROR_LEVEL, expected_error, 
unknown's avatar
unknown committed
3320
                          "\
unknown's avatar
unknown committed
3321
Query partially completed on the master (error on master: %d) \
unknown's avatar
unknown committed
3322 3323 3324
and was aborted. There is a chance that your master is inconsistent at this \
point. If you are sure that your master is ok, run this query manually on the \
slave and then restart the slave with SET GLOBAL SQL_SLAVE_SKIP_COUNTER=1; \
3325
START SLAVE; . Query: '%s'", expected_error, thd->query());
3326
        thd->is_slave_error= 1;
unknown's avatar
unknown committed
3327 3328 3329
      }
      goto end;
    }
3330

3331
    /* If the query was not ignored, it is printed to the general log */
Marc Alff's avatar
Marc Alff committed
3332
    if (!thd->is_error() || thd->stmt_da->sql_errno() != ER_SLAVE_IGNORED_TABLE)
3333
      general_log_write(thd, COM_QUERY, thd->query(), thd->query_length());
3334

3335
compare_errors:
unknown's avatar
unknown committed
3336

3337 3338 3339 3340 3341 3342 3343
    /*
      In the slave thread, we may sometimes execute some DROP / * 40005
      TEMPORARY * / TABLE that come from parts of binlogs (likely if we
      use RESET SLAVE or CHANGE MASTER TO), while the temporary table
      has already been dropped. To ignore such irrelevant "table does
      not exist errors", we silently clear the error if TEMPORARY was used.
    */
3344
    if (thd->lex->sql_command == SQLCOM_DROP_TABLE && thd->lex->drop_temporary &&
3345
        thd->is_error() && thd->stmt_da->sql_errno() == ER_BAD_TABLE_ERROR &&
3346
        !expected_error)
3347
      thd->stmt_da->reset_diagnostics_area();
3348
    /*
unknown's avatar
unknown committed
3349
      If we expected a non-zero error code, and we don't get the same error
3350
      code, and it should be ignored or is related to a concurrency issue.
unknown's avatar
unknown committed
3351
    */
Marc Alff's avatar
Marc Alff committed
3352
    actual_error= thd->is_error() ? thd->stmt_da->sql_errno() : 0;
3353 3354
    DBUG_PRINT("info",("expected_error: %d  sql_errno: %d",
 		       expected_error, actual_error));
3355 3356
    if ((expected_error && expected_error != actual_error &&
         !concurrency_error_code(expected_error)) &&
3357 3358
 	!ignored_error_code(actual_error) &&
 	!ignored_error_code(expected_error))
unknown's avatar
unknown committed
3359
    {
3360
      rli->report(ERROR_LEVEL, 0,
3361 3362
                      "\
Query caused different errors on master and slave.     \
unknown's avatar
unknown committed
3363
Error on master: '%s' (%d), Error on slave: '%s' (%d). \
unknown's avatar
unknown committed
3364
Default database: '%s'. Query: '%s'",
3365 3366
                      ER_SAFE(expected_error),
                      expected_error,
Marc Alff's avatar
Marc Alff committed
3367
                      actual_error ? thd->stmt_da->message() : "no error",
3368 3369
                      actual_error,
                      print_slave_db_safe(db), query_arg);
3370
      thd->is_slave_error= 1;
unknown's avatar
unknown committed
3371 3372
    }
    /*
3373 3374
      If we get the same error code as expected and it is not a concurrency
      issue, or should be ignored.
unknown's avatar
unknown committed
3375
    */
3376 3377
    else if ((expected_error == actual_error && 
              !concurrency_error_code(expected_error)) ||
3378
 	     ignored_error_code(actual_error))
unknown's avatar
unknown committed
3379 3380
    {
      DBUG_PRINT("info",("error ignored"));
3381
      clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
3382
      thd->killed= THD::NOT_KILLED;
3383 3384 3385 3386 3387 3388 3389 3390
      /*
        When an error is expected and matches the actual error the
        slave does not report any error and by consequence changes
        on transactional tables are not rolled back in the function
        close_thread_tables(). For that reason, we explicitly roll
        them back here.
      */
      if (expected_error && expected_error == actual_error)
Konstantin Osipov's avatar
Konstantin Osipov committed
3391
        trans_rollback_stmt(thd);
unknown's avatar
unknown committed
3392
    }
3393 3394 3395 3396 3397 3398 3399
    /*
      If we expected a non-zero error code and get nothing and, it is a concurrency
      issue or should be ignored.
    */
    else if (expected_error && !actual_error && 
             (concurrency_error_code(expected_error) ||
              ignored_error_code(expected_error)))
Konstantin Osipov's avatar
Konstantin Osipov committed
3400 3401
      trans_rollback_stmt(thd);

unknown's avatar
unknown committed
3402 3403
    /*
      Other cases: mostly we expected no error and get one.
unknown's avatar
unknown committed
3404
    */
3405
    else if (thd->is_slave_error || thd->is_fatal_error)
unknown's avatar
unknown committed
3406
    {
3407
      rli->report(ERROR_LEVEL, actual_error,
3408
                      "Error '%s' on query. Default database: '%s'. Query: '%s'",
Marc Alff's avatar
Marc Alff committed
3409
                      (actual_error ? thd->stmt_da->message() :
3410 3411
                       "unexpected success or fatal error"),
                      print_slave_db_safe(thd->db), query_arg);
3412
      thd->is_slave_error= 1;
unknown's avatar
unknown committed
3413
    }
3414 3415 3416 3417 3418 3419 3420 3421 3422

    /*
      TODO: compare the values of "affected rows" around here. Something
      like:
      if ((uint32) affected_in_event != (uint32) affected_on_slave)
      {
      sql_print_error("Slave: did not get the expected number of affected \
      rows running query from master - expected %d, got %d (this numbers \
      should have matched modulo 4294967296).", 0, ...);
3423
      thd->is_slave_error = 1;
3424 3425 3426 3427
      }
      We may also want an option to tell the slave to ignore "affected"
      mismatch. This mismatch could be implemented with a new ER_ code, and
      to ignore it you would use --slave-skip-errors...
3428

3429 3430 3431 3432 3433 3434 3435
      To do the comparison we need to know the value of "affected" which the
      above mysql_parse() computed. And we need to know the value of
      "affected" in the master's binlog. Both will be implemented later. The
      important thing is that we now have the format ready to log the values
      of "affected" in the binlog. So we can release 5.0.0 before effectively
      logging "affected" and effectively comparing it.
    */
unknown's avatar
unknown committed
3436 3437
  } /* End of if (db_ok(... */

3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450 3451 3452
  {/**
      The following failure injecion works in cooperation with tests 
      setting @@global.debug= 'd,stop_slave_middle_group'.
      The sql thread receives the killed status and will proceed 
      to shutdown trying to finish incomplete events group.
   */
    DBUG_EXECUTE_IF("stop_slave_middle_group",
                    if (strcmp("COMMIT", query) != 0 &&
                        strcmp("BEGIN", query) != 0)
                    {
                      if (thd->transaction.all.modified_non_trans_table)
                        const_cast<Relay_log_info*>(rli)->abort_slave= 1;
                    };);
  }

unknown's avatar
unknown committed
3453
end:
3454 3455 3456 3457 3458 3459
  /*
    Probably we have set thd->query, thd->db, thd->catalog to point to places
    in the data_buf of this event. Now the event is going to be deleted
    probably, so data_buf will be freed, so the thd->... listed above will be
    pointers to freed memory. 
    So we must set them to 0, so that those bad pointers values are not later
3460 3461 3462
    used. Note that "cleanup" queries like automatic DROP TEMPORARY TABLE
    don't suffer from these assignments to 0 as DROP TEMPORARY
    TABLE uses the db.table syntax.
3463
  */
unknown's avatar
unknown committed
3464
  thd->catalog= 0;
3465
  thd->set_db(NULL, 0);                 /* will free the current database */
3466
  thd->set_query(NULL, 0);
3467
  DBUG_PRINT("info", ("end: query= 0"));
unknown's avatar
unknown committed
3468
  close_thread_tables(thd);      
3469 3470 3471 3472 3473 3474 3475 3476 3477 3478
  /*
    As a disk space optimization, future masters will not log an event for
    LAST_INSERT_ID() if that function returned 0 (and thus they will be able
    to replace the THD::stmt_depends_on_first_successful_insert_id_in_prev_stmt
    variable by (THD->first_successful_insert_id_in_prev_stmt > 0) ; with the
    resetting below we are ready to support that.
  */
  thd->first_successful_insert_id_in_prev_stmt_for_binlog= 0;
  thd->first_successful_insert_id_in_prev_stmt= 0;
  thd->stmt_depends_on_first_successful_insert_id_in_prev_stmt= 0;
unknown's avatar
unknown committed
3479
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
3480
  return thd->is_slave_error;
3481 3482
}

3483
int Query_log_event::do_update_pos(Relay_log_info *rli)
3484
{
3485
  /*
3486 3487 3488
    Note that we will not increment group* positions if we are just
    after a SET ONE_SHOT, because SET ONE_SHOT should not be separated
    from its following updating query.
3489
  */
3490 3491 3492 3493 3494 3495 3496
  if (thd->one_shot_set)
  {
    rli->inc_event_relay_log_pos();
    return 0;
  }
  else
    return Log_event::do_update_pos(rli);
unknown's avatar
unknown committed
3497
}
3498 3499


3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510
Log_event::enum_skip_reason
Query_log_event::do_shall_skip(Relay_log_info *rli)
{
  DBUG_ENTER("Query_log_event::do_shall_skip");
  DBUG_PRINT("debug", ("query: %s; q_len: %d", query, q_len));
  DBUG_ASSERT(query && q_len > 0);

  if (rli->slave_skip_counter > 0)
  {
    if (strcmp("BEGIN", query) == 0)
    {
3511
      thd->variables.option_bits|= OPTION_BEGIN;
3512 3513 3514 3515 3516
      DBUG_RETURN(Log_event::continue_group(rli));
    }

    if (strcmp("COMMIT", query) == 0 || strcmp("ROLLBACK", query) == 0)
    {
3517
      thd->variables.option_bits&= ~OPTION_BEGIN;
3518 3519 3520 3521 3522 3523
      DBUG_RETURN(Log_event::EVENT_SKIP_COUNT);
    }
  }
  DBUG_RETURN(Log_event::do_shall_skip(rli));
}

unknown's avatar
SCRUM  
unknown committed
3524
#endif
unknown's avatar
unknown committed
3525

unknown's avatar
unknown committed
3526

unknown's avatar
unknown committed
3527
/**************************************************************************
3528
	Start_log_event_v3 methods
unknown's avatar
unknown committed
3529
**************************************************************************/
3530

3531
#ifndef MYSQL_CLIENT
3532 3533
Start_log_event_v3::Start_log_event_v3()
  :Log_event(), created(0), binlog_version(BINLOG_VERSION),
3534
   dont_set_created(0)
3535 3536 3537 3538 3539
{
  memcpy(server_version, ::server_version, ST_SERVER_VER_LEN);
}
#endif

unknown's avatar
unknown committed
3540
/*
3541
  Start_log_event_v3::pack_info()
unknown's avatar
unknown committed
3542
*/
3543

unknown's avatar
SCRUM  
unknown committed
3544
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3545
void Start_log_event_v3::pack_info(Protocol *protocol)
unknown's avatar
unknown committed
3546
{
3547 3548 3549 3550
  char buf[12 + ST_SERVER_VER_LEN + 14 + 22], *pos;
  pos= strmov(buf, "Server ver: ");
  pos= strmov(pos, server_version);
  pos= strmov(pos, ", Binlog ver: ");
unknown's avatar
unknown committed
3551 3552
  pos= int10_to_str(binlog_version, pos, 10);
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
unknown's avatar
unknown committed
3553
}
unknown's avatar
SCRUM  
unknown committed
3554
#endif
3555 3556


unknown's avatar
unknown committed
3557
/*
3558
  Start_log_event_v3::print()
unknown's avatar
unknown committed
3559
*/
unknown's avatar
unknown committed
3560 3561

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
3562
void Start_log_event_v3::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
3563
{
3564 3565 3566 3567 3568
  DBUG_ENTER("Start_log_event_v3::print");

  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
3569
  if (!print_event_info->short_form)
3570
  {
3571 3572 3573 3574
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tStart: binlog v %d, server v %s created ",
                binlog_version, server_version);
    print_timestamp(&cache);
3575
    if (created)
3576 3577
      my_b_printf(&cache," at startup");
    my_b_printf(&cache, "\n");
3578
    if (flags & LOG_EVENT_BINLOG_IN_USE_F)
3579 3580
      my_b_printf(&cache, "# Warning: this binlog is either in use or was not "
                  "closed properly.\n");
3581
  }
3582
  if (!is_artificial_event() && created)
3583
  {
3584
#ifdef WHEN_WE_HAVE_THE_RESET_CONNECTION_SQL_COMMAND
3585 3586 3587 3588 3589 3590
    /*
      This is for mysqlbinlog: like in replication, we want to delete the stale
      tmp files left by an unclean shutdown of mysqld (temporary tables)
      and rollback unfinished transaction.
      Probably this can be done with RESET CONNECTION (syntax to be defined).
    */
unknown's avatar
unknown committed
3591
    my_b_printf(&cache,"RESET CONNECTION%s\n", print_event_info->delimiter);
3592
#else
unknown's avatar
unknown committed
3593
    my_b_printf(&cache,"ROLLBACK%s\n", print_event_info->delimiter);
3594
#endif
3595
  }
3596 3597 3598 3599
  if (temp_buf &&
      print_event_info->base64_output_mode != BASE64_OUTPUT_NEVER &&
      !print_event_info->short_form)
  {
3600 3601
    if (print_event_info->base64_output_mode != BASE64_OUTPUT_DECODE_ROWS)
      my_b_printf(&cache, "BINLOG '\n");
3602 3603 3604
    print_base64(&cache, print_event_info, FALSE);
    print_event_info->printed_fd_event= TRUE;
  }
3605
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
3606
}
unknown's avatar
unknown committed
3607
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
3608

unknown's avatar
unknown committed
3609
/*
3610
  Start_log_event_v3::Start_log_event_v3()
unknown's avatar
unknown committed
3611
*/
3612

3613
Start_log_event_v3::Start_log_event_v3(const char* buf,
3614 3615
                                       const Format_description_log_event
                                       *description_event)
3616
  :Log_event(buf, description_event)
3617
{
3618 3619
  buf+= description_event->common_header_len;
  binlog_version= uint2korr(buf+ST_BINLOG_VER_OFFSET);
3620 3621
  memcpy(server_version, buf+ST_SERVER_VER_OFFSET,
	 ST_SERVER_VER_LEN);
unknown's avatar
unknown committed
3622 3623
  // prevent overrun if log is corrupted on disk
  server_version[ST_SERVER_VER_LEN-1]= 0;
3624
  created= uint4korr(buf+ST_CREATED_OFFSET);
3625
  dont_set_created= 1;
unknown's avatar
unknown committed
3626 3627
}

3628

unknown's avatar
unknown committed
3629
/*
3630
  Start_log_event_v3::write()
unknown's avatar
unknown committed
3631
*/
3632

3633
#ifndef MYSQL_CLIENT
3634
bool Start_log_event_v3::write(IO_CACHE* file)
3635
{
3636
  char buff[START_V3_HEADER_LEN];
3637 3638
  int2store(buff + ST_BINLOG_VER_OFFSET,binlog_version);
  memcpy(buff + ST_SERVER_VER_OFFSET,server_version,ST_SERVER_VER_LEN);
3639 3640
  if (!dont_set_created)
    created= when= get_time();
3641
  int4store(buff + ST_CREATED_OFFSET,created);
3642
  return (write_header(file, sizeof(buff)) ||
3643
          my_b_safe_write(file, (uchar*) buff, sizeof(buff)));
3644
}
3645
#endif
3646

3647

unknown's avatar
unknown committed
3648
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3649

unknown's avatar
unknown committed
3650 3651
/**
  Start_log_event_v3::do_apply_event() .
3652 3653
  The master started

unknown's avatar
unknown committed
3654
    IMPLEMENTATION
unknown's avatar
unknown committed
3655
    - To handle the case where the master died without having time to write
unknown's avatar
unknown committed
3656 3657 3658
    DROP TEMPORARY TABLE, DO RELEASE_LOCK (prepared statements' deletion is
    TODO), we clean up all temporary tables that we got, if we are sure we
    can (see below).
3659

unknown's avatar
unknown committed
3660
  @todo
3661
    - Remove all active user locks.
unknown's avatar
unknown committed
3662 3663 3664 3665
    Guilhem 2003-06: this is true but not urgent: the worst it can cause is
    the use of a bit of memory for a user lock which will not be used
    anymore. If the user lock is later used, the old one will be released. In
    other words, no deadlock problem.
unknown's avatar
unknown committed
3666 3667
*/

3668
int Start_log_event_v3::do_apply_event(Relay_log_info const *rli)
3669
{
3670
  DBUG_ENTER("Start_log_event_v3::do_apply_event");
unknown's avatar
unknown committed
3671 3672
  switch (binlog_version)
  {
3673 3674 3675 3676 3677 3678 3679
  case 3:
  case 4:
    /*
      This can either be 4.x (then a Start_log_event_v3 is only at master
      startup so we are sure the master has restarted and cleared his temp
      tables; the event always has 'created'>0) or 5.0 (then we have to test
      'created').
unknown's avatar
unknown committed
3680
    */
3681 3682 3683 3684 3685
    if (created)
    {
      close_temporary_tables(thd);
      cleanup_load_tmpdir();
    }
3686 3687 3688 3689 3690 3691 3692 3693 3694 3695 3696
    else
    {
      /*
        Set all temporary tables thread references to the current thread
        as they may point to the "old" SQL slave thread in case of its
        restart.
      */
      TABLE *table;
      for (table= thd->temporary_tables; table; table= table->next)
        table->in_use= thd;
    }
unknown's avatar
unknown committed
3697 3698
    break;

3699
    /*
unknown's avatar
unknown committed
3700 3701
       Now the older formats; in that case load_tmpdir is cleaned up by the I/O
       thread.
unknown's avatar
unknown committed
3702
    */
3703
  case 1:
3704
    if (strncmp(rli->relay_log.description_event_for_exec->server_version,
3705 3706 3707 3708 3709 3710 3711 3712
                "3.23.57",7) >= 0 && created)
    {
      /*
        Can distinguish, based on the value of 'created': this event was
        generated at master startup.
      */
      close_temporary_tables(thd);
    }
unknown's avatar
unknown committed
3713
    /*
3714 3715 3716
      Otherwise, can't distinguish a Start_log_event generated at
      master startup and one generated by master FLUSH LOGS, so cannot
      be sure temp tables have to be dropped. So do nothing.
unknown's avatar
unknown committed
3717 3718 3719 3720
    */
    break;
  default:
    /* this case is impossible */
3721
    DBUG_RETURN(1);
unknown's avatar
unknown committed
3722
  }
3723
  DBUG_RETURN(0);
3724
}
unknown's avatar
unknown committed
3725
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
3726

3727 3728 3729 3730
/***************************************************************************
       Format_description_log_event methods
****************************************************************************/

unknown's avatar
unknown committed
3731
/**
3732 3733 3734 3735 3736 3737
  Format_description_log_event 1st ctor.

    Ctor. Can be used to create the event to write to the binary log (when the
    server starts or when FLUSH LOGS), or to create artificial events to parse
    binlogs from MySQL 3.23 or 4.x.
    When in a client, only the 2nd use is possible.
unknown's avatar
unknown committed
3738 3739 3740 3741 3742 3743 3744

  @param binlog_version         the binlog version for which we want to build
                                an event. Can be 1 (=MySQL 3.23), 3 (=4.0.x
                                x>=2 and 4.1) or 4 (MySQL 5.0). Note that the
                                old 4.0 (binlog version 2) is not supported;
                                it should not be used for replication with
                                5.0.
3745 3746 3747
*/

Format_description_log_event::
3748
Format_description_log_event(uint8 binlog_ver, const char* server_ver)
3749
  :Start_log_event_v3(), event_type_permutation(0)
3750 3751 3752 3753 3754
{
  binlog_version= binlog_ver;
  switch (binlog_ver) {
  case 4: /* MySQL 5.0 */
    memcpy(server_version, ::server_version, ST_SERVER_VER_LEN);
unknown's avatar
unknown committed
3755 3756
    DBUG_EXECUTE_IF("pretend_version_50034_in_binlog",
                    strmov(server_version, "5.0.34"););
3757 3758 3759 3760
    common_header_len= LOG_EVENT_HEADER_LEN;
    number_of_event_types= LOG_EVENT_TYPES;
    /* we'll catch my_malloc() error in is_valid() */
    post_header_len=(uint8*) my_malloc(number_of_event_types*sizeof(uint8),
3761 3762
                                       MYF(0));

3763 3764 3765 3766 3767 3768 3769
    /*
      This long list of assignments is not beautiful, but I see no way to
      make it nicer, as the right members are #defines, not array members, so
      it's impossible to write a loop.
    */
    if (post_header_len)
    {
3770
#ifndef DBUG_OFF      
3771 3772
      // Allows us to sanity-check that all events initialized their
      // events (see the end of this 'if' block).
3773
      memset(post_header_len, 255, number_of_event_types*sizeof(uint8));
3774
#endif
3775 3776

      /* Note: all event types must explicitly fill in their lengths here. */
3777 3778
      post_header_len[START_EVENT_V3-1]= START_V3_HEADER_LEN;
      post_header_len[QUERY_EVENT-1]= QUERY_HEADER_LEN;
3779
      post_header_len[STOP_EVENT-1]= STOP_HEADER_LEN;
3780
      post_header_len[ROTATE_EVENT-1]= ROTATE_HEADER_LEN;
3781
      post_header_len[INTVAR_EVENT-1]= INTVAR_HEADER_LEN;
3782
      post_header_len[LOAD_EVENT-1]= LOAD_HEADER_LEN;
3783
      post_header_len[SLAVE_EVENT-1]= SLAVE_HEADER_LEN;
3784 3785 3786 3787
      post_header_len[CREATE_FILE_EVENT-1]= CREATE_FILE_HEADER_LEN;
      post_header_len[APPEND_BLOCK_EVENT-1]= APPEND_BLOCK_HEADER_LEN;
      post_header_len[EXEC_LOAD_EVENT-1]= EXEC_LOAD_HEADER_LEN;
      post_header_len[DELETE_FILE_EVENT-1]= DELETE_FILE_HEADER_LEN;
3788 3789 3790
      post_header_len[NEW_LOAD_EVENT-1]= NEW_LOAD_HEADER_LEN;
      post_header_len[RAND_EVENT-1]= RAND_HEADER_LEN;
      post_header_len[USER_VAR_EVENT-1]= USER_VAR_HEADER_LEN;
3791
      post_header_len[FORMAT_DESCRIPTION_EVENT-1]= FORMAT_DESCRIPTION_HEADER_LEN;
3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802 3803 3804
      post_header_len[XID_EVENT-1]= XID_HEADER_LEN;
      post_header_len[BEGIN_LOAD_QUERY_EVENT-1]= BEGIN_LOAD_QUERY_HEADER_LEN;
      post_header_len[EXECUTE_LOAD_QUERY_EVENT-1]= EXECUTE_LOAD_QUERY_HEADER_LEN;
      /*
        The PRE_GA events are never be written to any binlog, but
        their lengths are included in Format_description_log_event.
        Hence, we need to be assign some value here, to avoid reading
        uninitialized memory when the array is written to disk.
      */
      post_header_len[PRE_GA_WRITE_ROWS_EVENT-1] = 0;
      post_header_len[PRE_GA_UPDATE_ROWS_EVENT-1] = 0;
      post_header_len[PRE_GA_DELETE_ROWS_EVENT-1] = 0;

3805 3806 3807 3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 3822 3823
      post_header_len[TABLE_MAP_EVENT-1]=    TABLE_MAP_HEADER_LEN;
      post_header_len[WRITE_ROWS_EVENT-1]=   ROWS_HEADER_LEN;
      post_header_len[UPDATE_ROWS_EVENT-1]=  ROWS_HEADER_LEN;
      post_header_len[DELETE_ROWS_EVENT-1]=  ROWS_HEADER_LEN;
      /*
        We here have the possibility to simulate a master of before we changed
        the table map id to be stored in 6 bytes: when it was stored in 4
        bytes (=> post_header_len was 6). This is used to test backward
        compatibility.
        This code can be removed after a few months (today is Dec 21st 2005),
        when we know that the 4-byte masters are not deployed anymore (check
        with Tomas Ulin first!), and the accompanying test (rpl_row_4_bytes)
        too.
      */
      DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master",
                      post_header_len[TABLE_MAP_EVENT-1]=
                      post_header_len[WRITE_ROWS_EVENT-1]=
                      post_header_len[UPDATE_ROWS_EVENT-1]=
                      post_header_len[DELETE_ROWS_EVENT-1]= 6;);
3824
      post_header_len[INCIDENT_EVENT-1]= INCIDENT_HEADER_LEN;
Andrei Elkin's avatar
Andrei Elkin committed
3825
      post_header_len[HEARTBEAT_LOG_EVENT-1]= 0;
3826 3827

      // Sanity-check that all post header lengths are initialized.
3828 3829 3830
      int i;
      for (i=0; i<number_of_event_types; i++)
        DBUG_ASSERT(post_header_len[i] != 255);
3831 3832 3833 3834 3835 3836 3837 3838 3839 3840 3841 3842 3843 3844
    }
    break;

  case 1: /* 3.23 */
  case 3: /* 4.0.x x>=2 */
    /*
      We build an artificial (i.e. not sent by the master) event, which
      describes what those old master versions send.
    */
    if (binlog_ver==1)
      strmov(server_version, server_ver ? server_ver : "3.23");
    else
      strmov(server_version, server_ver ? server_ver : "4.0");
    common_header_len= binlog_ver==1 ? OLD_HEADER_LEN :
3845
      LOG_EVENT_MINIMAL_HEADER_LEN;
3846 3847 3848 3849 3850 3851 3852 3853 3854
    /*
      The first new event in binlog version 4 is Format_desc. So any event type
      after that does not exist in older versions. We use the events known by
      version 3, even if version 1 had only a subset of them (this is not a
      problem: it uses a few bytes for nothing but unifies code; it does not
      make the slave detect less corruptions).
    */
    number_of_event_types= FORMAT_DESCRIPTION_EVENT - 1;
    post_header_len=(uint8*) my_malloc(number_of_event_types*sizeof(uint8),
3855
                                       MYF(0));
3856 3857 3858 3859 3860 3861 3862 3863 3864 3865 3866 3867 3868 3869 3870 3871 3872 3873 3874 3875 3876 3877
    if (post_header_len)
    {
      post_header_len[START_EVENT_V3-1]= START_V3_HEADER_LEN;
      post_header_len[QUERY_EVENT-1]= QUERY_HEADER_MINIMAL_LEN;
      post_header_len[STOP_EVENT-1]= 0;
      post_header_len[ROTATE_EVENT-1]= (binlog_ver==1) ? 0 : ROTATE_HEADER_LEN;
      post_header_len[INTVAR_EVENT-1]= 0;
      post_header_len[LOAD_EVENT-1]= LOAD_HEADER_LEN;
      post_header_len[SLAVE_EVENT-1]= 0;
      post_header_len[CREATE_FILE_EVENT-1]= CREATE_FILE_HEADER_LEN;
      post_header_len[APPEND_BLOCK_EVENT-1]= APPEND_BLOCK_HEADER_LEN;
      post_header_len[EXEC_LOAD_EVENT-1]= EXEC_LOAD_HEADER_LEN;
      post_header_len[DELETE_FILE_EVENT-1]= DELETE_FILE_HEADER_LEN;
      post_header_len[NEW_LOAD_EVENT-1]= post_header_len[LOAD_EVENT-1];
      post_header_len[RAND_EVENT-1]= 0;
      post_header_len[USER_VAR_EVENT-1]= 0;
    }
    break;
  default: /* Includes binlog version 2 i.e. 4.0.x x<=1 */
    post_header_len= 0; /* will make is_valid() fail */
    break;
  }
unknown's avatar
unknown committed
3878
  calc_server_version_split();
3879 3880 3881
}


unknown's avatar
unknown committed
3882
/**
3883 3884 3885 3886
  The problem with this constructor is that the fixed header may have a
  length different from this version, but we don't know this length as we
  have not read the Format_description_log_event which says it, yet. This
  length is in the post-header of the event, but we don't know where the
3887
  post-header starts.
unknown's avatar
unknown committed
3888

3889 3890 3891 3892 3893 3894
  So this type of event HAS to:
  - either have the header's length at the beginning (in the header, at a
  fixed position which will never be changed), not in the post-header. That
  would make the header be "shifted" compared to other events.
  - or have a header of size LOG_EVENT_MINIMAL_HEADER_LEN (19), in all future
  versions, so that we know for sure.
unknown's avatar
unknown committed
3895

3896 3897 3898 3899 3900 3901 3902 3903 3904
  I (Guilhem) chose the 2nd solution. Rotate has the same constraint (because
  it is sent before Format_description_log_event).
*/

Format_description_log_event::
Format_description_log_event(const char* buf,
                             uint event_len,
                             const
                             Format_description_log_event*
3905
                             description_event)
3906
  :Start_log_event_v3(buf, description_event), event_type_permutation(0)
3907 3908 3909 3910 3911 3912 3913 3914
{
  DBUG_ENTER("Format_description_log_event::Format_description_log_event(char*,...)");
  buf+= LOG_EVENT_MINIMAL_HEADER_LEN;
  if ((common_header_len=buf[ST_COMMON_HEADER_LEN_OFFSET]) < OLD_HEADER_LEN)
    DBUG_VOID_RETURN; /* sanity check */
  number_of_event_types=
    event_len-(LOG_EVENT_MINIMAL_HEADER_LEN+ST_COMMON_HEADER_LEN_OFFSET+1);
  DBUG_PRINT("info", ("common_header_len=%d number_of_event_types=%d",
3915
                      common_header_len, number_of_event_types));
3916
  /* If alloc fails, we'll detect it in is_valid() */
3917
  post_header_len= (uint8*) my_memdup((uchar*)buf+ST_COMMON_HEADER_LEN_OFFSET+1,
3918
                                      number_of_event_types*
3919
                                      sizeof(*post_header_len), MYF(0));
unknown's avatar
unknown committed
3920
  calc_server_version_split();
3921 3922 3923 3924 3925 3926 3927 3928 3929 3930

  /*
    In some previous versions, the events were given other event type
    id numbers than in the present version. When replicating from such
    a version, we therefore set up an array that maps those id numbers
    to the id numbers of the present server.

    If post_header_len is null, it means malloc failed, and is_valid
    will fail, so there is no need to do anything.

3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941 3942 3943 3944 3945 3946 3947 3948 3949 3950 3951 3952 3953 3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964 3965 3966 3967 3968 3969 3970 3971 3972 3973
    The trees in which events have wrong id's are:

    mysql-5.1-wl1012.old mysql-5.1-wl2325-5.0-drop6p13-alpha
    mysql-5.1-wl2325-5.0-drop6 mysql-5.1-wl2325-5.0
    mysql-5.1-wl2325-no-dd

    (this was found by grepping for two lines in sequence where the
    first matches "FORMAT_DESCRIPTION_EVENT," and the second matches
    "TABLE_MAP_EVENT," in log_event.h in all trees)

    In these trees, the following server_versions existed since
    TABLE_MAP_EVENT was introduced:

    5.1.1-a_drop5p3   5.1.1-a_drop5p4        5.1.1-alpha
    5.1.2-a_drop5p10  5.1.2-a_drop5p11       5.1.2-a_drop5p12
    5.1.2-a_drop5p13  5.1.2-a_drop5p14       5.1.2-a_drop5p15
    5.1.2-a_drop5p16  5.1.2-a_drop5p16b      5.1.2-a_drop5p16c
    5.1.2-a_drop5p17  5.1.2-a_drop5p4        5.1.2-a_drop5p5
    5.1.2-a_drop5p6   5.1.2-a_drop5p7        5.1.2-a_drop5p8
    5.1.2-a_drop5p9   5.1.3-a_drop5p17       5.1.3-a_drop5p17b
    5.1.3-a_drop5p17c 5.1.4-a_drop5p18       5.1.4-a_drop5p19
    5.1.4-a_drop5p20  5.1.4-a_drop6p0        5.1.4-a_drop6p1
    5.1.4-a_drop6p2   5.1.5-a_drop5p20       5.2.0-a_drop6p3
    5.2.0-a_drop6p4   5.2.0-a_drop6p5        5.2.0-a_drop6p6
    5.2.1-a_drop6p10  5.2.1-a_drop6p11       5.2.1-a_drop6p12
    5.2.1-a_drop6p6   5.2.1-a_drop6p7        5.2.1-a_drop6p8
    5.2.2-a_drop6p13  5.2.2-a_drop6p13-alpha 5.2.2-a_drop6p13b
    5.2.2-a_drop6p13c

    (this was found by grepping for "mysql," in all historical
    versions of configure.in in the trees listed above).

    There are 5.1.1-alpha versions that use the new event id's, so we
    do not test that version string.  So replication from 5.1.1-alpha
    with the other event id's to a new version does not work.
    Moreover, we can safely ignore the part after drop[56].  This
    allows us to simplify the big list above to the following regexes:

    5\.1\.[1-5]-a_drop5.*
    5\.1\.4-a_drop6.*
    5\.2\.[0-2]-a_drop6.*

    This is what we test for in the 'if' below.
3974 3975
  */
  if (post_header_len &&
3976 3977 3978 3979 3980 3981 3982 3983 3984 3985 3986 3987
      server_version[0] == '5' && server_version[1] == '.' &&
      server_version[3] == '.' &&
      strncmp(server_version + 5, "-a_drop", 7) == 0 &&
      ((server_version[2] == '1' &&
        server_version[4] >= '1' && server_version[4] <= '5' &&
        server_version[12] == '5') ||
       (server_version[2] == '1' &&
        server_version[4] == '4' &&
        server_version[12] == '6') ||
       (server_version[2] == '2' &&
        server_version[4] >= '0' && server_version[4] <= '2' &&
        server_version[12] == '6')))
3988 3989 3990 3991 3992 3993 3994 3995 3996 3997 3998 3999 4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024
  {
    if (number_of_event_types != 22)
    {
      DBUG_PRINT("info", (" number_of_event_types=%d",
                          number_of_event_types));
      /* this makes is_valid() return false. */
      my_free(post_header_len, MYF(MY_ALLOW_ZERO_PTR));
      post_header_len= NULL;
      DBUG_VOID_RETURN;
    }
    static const uint8 perm[23]=
      {
        UNKNOWN_EVENT, START_EVENT_V3, QUERY_EVENT, STOP_EVENT, ROTATE_EVENT,
        INTVAR_EVENT, LOAD_EVENT, SLAVE_EVENT, CREATE_FILE_EVENT,
        APPEND_BLOCK_EVENT, EXEC_LOAD_EVENT, DELETE_FILE_EVENT,
        NEW_LOAD_EVENT,
        RAND_EVENT, USER_VAR_EVENT,
        FORMAT_DESCRIPTION_EVENT,
        TABLE_MAP_EVENT,
        PRE_GA_WRITE_ROWS_EVENT,
        PRE_GA_UPDATE_ROWS_EVENT,
        PRE_GA_DELETE_ROWS_EVENT,
        XID_EVENT,
        BEGIN_LOAD_QUERY_EVENT,
        EXECUTE_LOAD_QUERY_EVENT,
      };
    event_type_permutation= perm;
    /*
      Since we use (permuted) event id's to index the post_header_len
      array, we need to permute the post_header_len array too.
    */
    uint8 post_header_len_temp[23];
    for (int i= 1; i < 23; i++)
      post_header_len_temp[perm[i] - 1]= post_header_len[i - 1];
    for (int i= 0; i < 22; i++)
      post_header_len[i] = post_header_len_temp[i];
  }
4025 4026 4027
  DBUG_VOID_RETURN;
}

4028
#ifndef MYSQL_CLIENT
4029 4030 4031 4032 4033 4034
bool Format_description_log_event::write(IO_CACHE* file)
{
  /*
    We don't call Start_log_event_v3::write() because this would make 2
    my_b_safe_write().
  */
4035
  uchar buff[FORMAT_DESCRIPTION_HEADER_LEN];
4036 4037
  int2store(buff + ST_BINLOG_VER_OFFSET,binlog_version);
  memcpy((char*) buff + ST_SERVER_VER_OFFSET,server_version,ST_SERVER_VER_LEN);
4038 4039
  if (!dont_set_created)
    created= when= get_time();
4040
  int4store(buff + ST_CREATED_OFFSET,created);
4041
  buff[ST_COMMON_HEADER_LEN_OFFSET]= LOG_EVENT_HEADER_LEN;
4042
  memcpy((char*) buff+ST_COMMON_HEADER_LEN_OFFSET+1, (uchar*) post_header_len,
4043 4044 4045 4046
         LOG_EVENT_TYPES);
  return (write_header(file, sizeof(buff)) ||
          my_b_safe_write(file, buff, sizeof(buff)));
}
4047
#endif
4048

4049
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4050
int Format_description_log_event::do_apply_event(Relay_log_info const *rli)
4051
{
4052
  int ret= 0;
4053
  DBUG_ENTER("Format_description_log_event::do_apply_event");
4054

4055 4056 4057 4058
  /*
    As a transaction NEVER spans on 2 or more binlogs:
    if we have an active transaction at this point, the master died
    while writing the transaction to the binary log, i.e. while
4059 4060
    flushing the binlog cache to the binlog. XA guarantees that master has
    rolled back. So we roll back.
4061 4062 4063 4064 4065
    Note: this event could be sent by the master to inform us of the
    format of its binlog; in other words maybe it is not at its
    original place when it comes to us; we'll know this by checking
    log_pos ("artificial" events have log_pos == 0).
  */
4066
  if (!is_artificial_event() && created && thd->transaction.all.ha_list)
4067
  {
4068
    /* This is not an error (XA is safe), just an information */
4069 4070 4071 4072 4073
    rli->report(INFORMATION_LEVEL, 0,
                "Rolling back unfinished transaction (no COMMIT "
                "or ROLLBACK in relay log). A probable cause is that "
                "the master died while writing the transaction to "
                "its binary log, thus rolled back too."); 
4074
    const_cast<Relay_log_info*>(rli)->cleanup_context(thd, 1);
4075
  }
Konstantin Osipov's avatar
Konstantin Osipov committed
4076

4077
  /*
4078
    If this event comes from ourselves, there is no cleaning task to
4079
    perform, we don't call Start_log_event_v3::do_apply_event()
4080
    (this was just to update the log's description event).
4081
  */
4082 4083 4084 4085 4086 4087 4088 4089 4090 4091 4092
  if (server_id != (uint32) ::server_id)
  {
    /*
      If the event was not requested by the slave i.e. the master sent
      it while the slave asked for a position >4, the event will make
      rli->group_master_log_pos advance. Say that the slave asked for
      position 1000, and the Format_desc event's end is 96. Then in
      the beginning of replication rli->group_master_log_pos will be
      0, then 96, then jump to first really asked event (which is
      >96). So this is ok.
    */
4093
    ret= Start_log_event_v3::do_apply_event(rli);
4094
  }
4095 4096 4097 4098 4099 4100 4101 4102 4103

  if (!ret)
  {
    /* Save the information describing this binlog */
    delete rli->relay_log.description_event_for_exec;
    const_cast<Relay_log_info *>(rli)->relay_log.description_event_for_exec= this;
  }

  DBUG_RETURN(ret);
4104 4105
}

4106
int Format_description_log_event::do_update_pos(Relay_log_info *rli)
4107
{
4108 4109 4110
  if (server_id == (uint32) ::server_id)
  {
    /*
4111 4112 4113 4114 4115 4116 4117 4118 4119 4120 4121 4122 4123
      We only increase the relay log position if we are skipping
      events and do not touch any group_* variables, nor flush the
      relay log info.  If there is a crash, we will have to re-skip
      the events again, but that is a minor issue.

      If we do not skip stepping the group log position (and the
      server id was changed when restarting the server), it might well
      be that we start executing at a position that is invalid, e.g.,
      at a Rows_log_event or a Query_log_event preceeded by a
      Intvar_log_event instead of starting at a Table_map_log_event or
      the Intvar_log_event respectively.
     */
    rli->inc_event_relay_log_pos();
4124
    return 0;
4125
  }
4126 4127 4128
  else
  {
    return Log_event::do_update_pos(rli);
4129 4130 4131
  }
}

4132
Log_event::enum_skip_reason
4133
Format_description_log_event::do_shall_skip(Relay_log_info *rli)
4134
{
4135
  return Log_event::EVENT_SKIP_NOT;
4136
}
4137

4138 4139
#endif

unknown's avatar
unknown committed
4140 4141 4142 4143 4144 4145 4146 4147 4148 4149 4150 4151 4152 4153 4154 4155 4156 4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167 4168 4169 4170

/**
   Splits the event's 'server_version' string into three numeric pieces stored
   into 'server_version_split':
   X.Y.Zabc (X,Y,Z numbers, a not a digit) -> {X,Y,Z}
   X.Yabc -> {X,Y,0}
   Xabc -> {X,0,0}
   'server_version_split' is then used for lookups to find if the server which
   created this event has some known bug.
*/
void Format_description_log_event::calc_server_version_split()
{
  char *p= server_version, *r;
  ulong number;
  for (uint i= 0; i<=2; i++)
  {
    number= strtoul(p, &r, 10);
    server_version_split[i]= (uchar)number;
    DBUG_ASSERT(number < 256); // fit in uchar
    p= r;
    DBUG_ASSERT(!((i == 0) && (*r != '.'))); // should be true in practice
    if (*r == '.')
      p++; // skip the dot
  }
  DBUG_PRINT("info",("Format_description_log_event::server_version_split:"
                     " '%s' %d %d %d", server_version,
                     server_version_split[0],
                     server_version_split[1], server_version_split[2]));
}


4171
  /**************************************************************************
4172
        Load_log_event methods
4173
   General note about Load_log_event: the binlogging of LOAD DATA INFILE is
4174
   going to be changed in 5.0 (or maybe in 5.1; not decided yet).
4175 4176 4177 4178 4179 4180 4181 4182 4183 4184 4185 4186
   However, the 5.0 slave could still have to read such events (from a 4.x
   master), convert them (which just means maybe expand the header, when 5.0
   servers have a UID in events) (remember that whatever is after the header
   will be like in 4.x, as this event's format is not modified in 5.0 as we
   will use new types of events to log the new LOAD DATA INFILE features).
   To be able to read/convert, we just need to not assume that the common
   header is of length LOG_EVENT_HEADER_LEN (we must use the description
   event).
   Note that I (Guilhem) manually tested replication of a big LOAD DATA INFILE
   between 3.23 and 5.0, and between 4.0 and 5.0, and it works fine (and the
   positions displayed in SHOW SLAVE STATUS then are fine too).
  **************************************************************************/
4187

unknown's avatar
unknown committed
4188
/*
4189
  Load_log_event::pack_info()
unknown's avatar
unknown committed
4190
*/
4191

unknown's avatar
SCRUM  
unknown committed
4192
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
4193
uint Load_log_event::get_query_buffer_length()
4194
{
unknown's avatar
unknown committed
4195
  return
4196 4197
    5 + db_len + 3 +                        // "use DB; "
    18 + fname_len + 2 +                    // "LOAD DATA INFILE 'file''"
4198
    11 +                                    // "CONCURRENT "
unknown's avatar
unknown committed
4199
    7 +					    // LOCAL
4200
    9 +                                     // " REPLACE or IGNORE "
4201
    13 + table_name_len*2 +                 // "INTO TABLE `table`"
4202 4203 4204
    21 + sql_ex.field_term_len*4 + 2 +      // " FIELDS TERMINATED BY 'str'"
    23 + sql_ex.enclosed_len*4 + 2 +        // " OPTIONALLY ENCLOSED BY 'str'"
    12 + sql_ex.escaped_len*4 + 2 +         // " ESCAPED BY 'str'"
4205
    21 + sql_ex.line_term_len*4 + 2 +       // " LINES TERMINATED BY 'str'"
4206 4207
    19 + sql_ex.line_start_len*4 + 2 +      // " LINES STARTING BY 'str'"
    15 + 22 +                               // " IGNORE xxx  LINES"
4208
    3 + (num_fields-1)*2 + field_block_len; // " (field1, field2, ...)"
unknown's avatar
unknown committed
4209
}
4210

unknown's avatar
unknown committed
4211

4212
void Load_log_event::print_query(bool need_db, const char *cs, char *buf,
unknown's avatar
unknown committed
4213 4214 4215 4216 4217
                                 char **end, char **fn_start, char **fn_end)
{
  char *pos= buf;

  if (need_db && db && db_len)
4218
  {
4219 4220
    pos= strmov(pos, "use `");
    memcpy(pos, db, db_len);
unknown's avatar
unknown committed
4221
    pos= strmov(pos+db_len, "`; ");
4222
  }
4223

unknown's avatar
unknown committed
4224
  pos= strmov(pos, "LOAD DATA ");
unknown's avatar
unknown committed
4225

4226 4227 4228
  if (thd->lex->lock_option == TL_WRITE_CONCURRENT_INSERT)
    pos= strmov(pos, "CONCURRENT ");

unknown's avatar
unknown committed
4229 4230 4231
  if (fn_start)
    *fn_start= pos;

unknown's avatar
unknown committed
4232 4233 4234
  if (check_fname_outside_temp_buf())
    pos= strmov(pos, "LOCAL ");
  pos= strmov(pos, "INFILE '");
4235
  memcpy(pos, fname, fname_len);
unknown's avatar
unknown committed
4236
  pos= strmov(pos+fname_len, "' ");
4237

unknown's avatar
unknown committed
4238
  if (sql_ex.opt_flags & REPLACE_FLAG)
4239
    pos= strmov(pos, "REPLACE ");
unknown's avatar
unknown committed
4240
  else if (sql_ex.opt_flags & IGNORE_FLAG)
4241
    pos= strmov(pos, "IGNORE ");
4242

unknown's avatar
unknown committed
4243 4244 4245 4246 4247 4248
  pos= strmov(pos ,"INTO");

  if (fn_end)
    *fn_end= pos;

  pos= strmov(pos ," TABLE `");
4249 4250 4251
  memcpy(pos, table_name, table_name_len);
  pos+= table_name_len;

4252 4253 4254 4255 4256 4257 4258 4259 4260 4261
  if (cs != NULL)
  {
    pos= strmov(pos ,"` CHARACTER SET ");
    pos= strmov(pos ,  cs);
  }
  else
    pos= strmov(pos, "`");

  /* We have to create all optional fields as the default is not empty */
  pos= strmov(pos, " FIELDS TERMINATED BY ");
unknown's avatar
unknown committed
4262 4263 4264 4265 4266
  pos= pretty_print_str(pos, sql_ex.field_term, sql_ex.field_term_len);
  if (sql_ex.opt_flags & OPT_ENCLOSED_FLAG)
    pos= strmov(pos, " OPTIONALLY ");
  pos= strmov(pos, " ENCLOSED BY ");
  pos= pretty_print_str(pos, sql_ex.enclosed, sql_ex.enclosed_len);
4267

unknown's avatar
unknown committed
4268 4269
  pos= strmov(pos, " ESCAPED BY ");
  pos= pretty_print_str(pos, sql_ex.escaped, sql_ex.escaped_len);
4270

unknown's avatar
unknown committed
4271 4272
  pos= strmov(pos, " LINES TERMINATED BY ");
  pos= pretty_print_str(pos, sql_ex.line_term, sql_ex.line_term_len);
4273 4274
  if (sql_ex.line_start_len)
  {
4275
    pos= strmov(pos, " STARTING BY ");
4276
    pos= pretty_print_str(pos, sql_ex.line_start, sql_ex.line_start_len);
4277
  }
4278

unknown's avatar
unknown committed
4279
  if ((long) skip_lines > 0)
4280 4281
  {
    pos= strmov(pos, " IGNORE ");
unknown's avatar
unknown committed
4282
    pos= longlong10_to_str((longlong) skip_lines, pos, 10);
4283 4284
    pos= strmov(pos," LINES ");    
  }
4285 4286 4287 4288

  if (num_fields)
  {
    uint i;
unknown's avatar
unknown committed
4289
    const char *field= fields;
4290
    pos= strmov(pos, " (");
4291 4292 4293
    for (i = 0; i < num_fields; i++)
    {
      if (i)
unknown's avatar
unknown committed
4294 4295 4296 4297
      {
        *pos++= ' ';
        *pos++= ',';
      }
4298
      memcpy(pos, field, field_lens[i]);
unknown's avatar
unknown committed
4299 4300
      pos+=   field_lens[i];
      field+= field_lens[i]  + 1;
4301
    }
4302
    *pos++= ')';
4303
  }
4304

unknown's avatar
unknown committed
4305 4306 4307 4308 4309 4310 4311 4312
  *end= pos;
}


void Load_log_event::pack_info(Protocol *protocol)
{
  char *buf, *end;

4313
  if (!(buf= (char*) my_malloc(get_query_buffer_length(), MYF(MY_WME))))
unknown's avatar
unknown committed
4314
    return;
4315
  print_query(TRUE, NULL, buf, &end, 0, 0);
unknown's avatar
unknown committed
4316
  protocol->store(buf, end-buf, &my_charset_bin);
unknown's avatar
unknown committed
4317
  my_free(buf, MYF(0));
4318
}
unknown's avatar
unknown committed
4319
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
4320

4321

4322 4323
#ifndef MYSQL_CLIENT

unknown's avatar
unknown committed
4324
/*
4325
  Load_log_event::write_data_header()
unknown's avatar
unknown committed
4326
*/
4327

4328
bool Load_log_event::write_data_header(IO_CACHE* file)
4329
{
4330
  char buf[LOAD_HEADER_LEN];
unknown's avatar
unknown committed
4331
  int4store(buf + L_THREAD_ID_OFFSET, slave_proxy_id);
4332 4333 4334 4335 4336
  int4store(buf + L_EXEC_TIME_OFFSET, exec_time);
  int4store(buf + L_SKIP_LINES_OFFSET, skip_lines);
  buf[L_TBL_LEN_OFFSET] = (char)table_name_len;
  buf[L_DB_LEN_OFFSET] = (char)db_len;
  int4store(buf + L_NUM_FIELDS_OFFSET, num_fields);
4337
  return my_b_safe_write(file, (uchar*)buf, LOAD_HEADER_LEN) != 0;
4338
}
4339

4340

unknown's avatar
unknown committed
4341
/*
4342
  Load_log_event::write_data_body()
unknown's avatar
unknown committed
4343
*/
4344

4345
bool Load_log_event::write_data_body(IO_CACHE* file)
4346
{
4347 4348 4349
  if (sql_ex.write_data(file))
    return 1;
  if (num_fields && fields && field_lens)
4350
  {
4351 4352
    if (my_b_safe_write(file, (uchar*)field_lens, num_fields) ||
	my_b_safe_write(file, (uchar*)fields, field_block_len))
4353
      return 1;
4354
  }
4355 4356 4357
  return (my_b_safe_write(file, (uchar*)table_name, table_name_len + 1) ||
	  my_b_safe_write(file, (uchar*)db, db_len + 1) ||
	  my_b_safe_write(file, (uchar*)fname, fname_len));
4358 4359
}

4360

unknown's avatar
unknown committed
4361
/*
4362
  Load_log_event::Load_log_event()
unknown's avatar
unknown committed
4363
*/
4364

unknown's avatar
unknown committed
4365 4366 4367
Load_log_event::Load_log_event(THD *thd_arg, sql_exchange *ex,
			       const char *db_arg, const char *table_name_arg,
			       List<Item> &fields_arg,
unknown's avatar
unknown committed
4368
			       enum enum_duplicates handle_dup,
4369
			       bool ignore, bool using_trans)
4370
  :Log_event(thd_arg,
unknown's avatar
unknown committed
4371
             thd_arg->thread_specific_used ? LOG_EVENT_THREAD_SPECIFIC_F : 0,
4372
             using_trans),
4373
   thread_id(thd_arg->thread_id),
4374
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
unknown's avatar
unknown committed
4375 4376
   num_fields(0),fields(0),
   field_lens(0),field_block_len(0),
unknown's avatar
unknown committed
4377
   table_name(table_name_arg ? table_name_arg : ""),
4378
   db(db_arg), fname(ex->file_name), local_fname(FALSE)
unknown's avatar
unknown committed
4379 4380 4381
{
  time_t end_time;
  time(&end_time);
4382
  exec_time = (ulong) (end_time  - thd_arg->start_time);
4383 4384 4385
  /* db can never be a zero pointer in 4.0 */
  db_len = (uint32) strlen(db);
  table_name_len = (uint32) strlen(table_name);
unknown's avatar
unknown committed
4386 4387 4388 4389 4390 4391 4392 4393 4394 4395 4396 4397 4398
  fname_len = (fname) ? (uint) strlen(fname) : 0;
  sql_ex.field_term = (char*) ex->field_term->ptr();
  sql_ex.field_term_len = (uint8) ex->field_term->length();
  sql_ex.enclosed = (char*) ex->enclosed->ptr();
  sql_ex.enclosed_len = (uint8) ex->enclosed->length();
  sql_ex.line_term = (char*) ex->line_term->ptr();
  sql_ex.line_term_len = (uint8) ex->line_term->length();
  sql_ex.line_start = (char*) ex->line_start->ptr();
  sql_ex.line_start_len = (uint8) ex->line_start->length();
  sql_ex.escaped = (char*) ex->escaped->ptr();
  sql_ex.escaped_len = (uint8) ex->escaped->length();
  sql_ex.opt_flags = 0;
  sql_ex.cached_new_format = -1;
4399
    
unknown's avatar
unknown committed
4400
  if (ex->dumpfile)
unknown's avatar
unknown committed
4401
    sql_ex.opt_flags|= DUMPFILE_FLAG;
unknown's avatar
unknown committed
4402
  if (ex->opt_enclosed)
unknown's avatar
unknown committed
4403
    sql_ex.opt_flags|= OPT_ENCLOSED_FLAG;
4404

unknown's avatar
unknown committed
4405
  sql_ex.empty_flags= 0;
4406

4407
  switch (handle_dup) {
unknown's avatar
unknown committed
4408
  case DUP_REPLACE:
unknown's avatar
unknown committed
4409
    sql_ex.opt_flags|= REPLACE_FLAG;
unknown's avatar
unknown committed
4410 4411 4412 4413
    break;
  case DUP_UPDATE:				// Impossible here
  case DUP_ERROR:
    break;	
unknown's avatar
unknown committed
4414
  }
4415 4416
  if (ignore)
    sql_ex.opt_flags|= IGNORE_FLAG;
4417

unknown's avatar
unknown committed
4418 4419 4420 4421 4422 4423 4424 4425 4426 4427
  if (!ex->field_term->length())
    sql_ex.empty_flags |= FIELD_TERM_EMPTY;
  if (!ex->enclosed->length())
    sql_ex.empty_flags |= ENCLOSED_EMPTY;
  if (!ex->line_term->length())
    sql_ex.empty_flags |= LINE_TERM_EMPTY;
  if (!ex->line_start->length())
    sql_ex.empty_flags |= LINE_START_EMPTY;
  if (!ex->escaped->length())
    sql_ex.empty_flags |= ESCAPED_EMPTY;
4428
    
unknown's avatar
unknown committed
4429
  skip_lines = ex->skip_lines;
4430

unknown's avatar
unknown committed
4431 4432 4433 4434 4435 4436 4437 4438 4439 4440 4441
  List_iterator<Item> li(fields_arg);
  field_lens_buf.length(0);
  fields_buf.length(0);
  Item* item;
  while ((item = li++))
  {
    num_fields++;
    uchar len = (uchar) strlen(item->name);
    field_block_len += len + 1;
    fields_buf.append(item->name, len + 1);
    field_lens_buf.append((char*)&len, 1);
4442 4443
  }

unknown's avatar
unknown committed
4444 4445 4446
  field_lens = (const uchar*)field_lens_buf.ptr();
  fields = fields_buf.ptr();
}
unknown's avatar
unknown committed
4447
#endif /* !MYSQL_CLIENT */
4448

4449

unknown's avatar
unknown committed
4450 4451
/**
  @note
unknown's avatar
unknown committed
4452 4453
    The caller must do buf[event_len] = 0 before he starts using the
    constructed event.
4454
*/
4455 4456 4457 4458
Load_log_event::Load_log_event(const char *buf, uint event_len,
                               const Format_description_log_event *description_event)
  :Log_event(buf, description_event), num_fields(0), fields(0),
   field_lens(0),field_block_len(0),
unknown's avatar
unknown committed
4459
   table_name(0), db(0), fname(0), local_fname(FALSE)
unknown's avatar
unknown committed
4460
{
unknown's avatar
unknown committed
4461
  DBUG_ENTER("Load_log_event");
4462 4463 4464 4465 4466 4467 4468 4469 4470 4471 4472 4473
  /*
    I (Guilhem) manually tested replication of LOAD DATA INFILE for 3.23->5.0,
    4.0->5.0 and 5.0->5.0 and it works.
  */
  if (event_len)
    copy_log_event(buf, event_len,
                   ((buf[EVENT_TYPE_OFFSET] == LOAD_EVENT) ?
                    LOAD_HEADER_LEN + 
                    description_event->common_header_len :
                    LOAD_HEADER_LEN + LOG_EVENT_HEADER_LEN),
                   description_event);
  /* otherwise it's a derived class, will call copy_log_event() itself */
unknown's avatar
unknown committed
4474
  DBUG_VOID_RETURN;
4475 4476
}

4477

unknown's avatar
unknown committed
4478
/*
4479
  Load_log_event::copy_log_event()
unknown's avatar
unknown committed
4480
*/
4481

4482
int Load_log_event::copy_log_event(const char *buf, ulong event_len,
4483 4484
                                   int body_offset,
                                   const Format_description_log_event *description_event)
4485
{
4486
  DBUG_ENTER("Load_log_event::copy_log_event");
4487
  uint data_len;
4488
  char* buf_end = (char*)buf + event_len;
4489 4490
  /* this is the beginning of the post-header */
  const char* data_head = buf + description_event->common_header_len;
unknown's avatar
unknown committed
4491
  slave_proxy_id= thread_id= uint4korr(data_head + L_THREAD_ID_OFFSET);
4492 4493 4494 4495 4496
  exec_time = uint4korr(data_head + L_EXEC_TIME_OFFSET);
  skip_lines = uint4korr(data_head + L_SKIP_LINES_OFFSET);
  table_name_len = (uint)data_head[L_TBL_LEN_OFFSET];
  db_len = (uint)data_head[L_DB_LEN_OFFSET];
  num_fields = uint4korr(data_head + L_NUM_FIELDS_OFFSET);
unknown's avatar
unknown committed
4497
	  
unknown's avatar
unknown committed
4498
  if ((int) event_len < body_offset)
unknown's avatar
unknown committed
4499
    DBUG_RETURN(1);
4500 4501 4502 4503
  /*
    Sql_ex.init() on success returns the pointer to the first byte after
    the sql_ex structure, which is the start of field lengths array.
  */
4504 4505 4506
  if (!(field_lens= (uchar*)sql_ex.init((char*)buf + body_offset,
                                        buf_end,
                                        buf[EVENT_TYPE_OFFSET] != LOAD_EVENT)))
unknown's avatar
unknown committed
4507
    DBUG_RETURN(1);
4508
  
4509
  data_len = event_len - body_offset;
4510
  if (num_fields > data_len) // simple sanity check against corruption
unknown's avatar
unknown committed
4511
    DBUG_RETURN(1);
4512
  for (uint i = 0; i < num_fields; i++)
4513
    field_block_len += (uint)field_lens[i] + 1;
4514

unknown's avatar
unknown committed
4515 4516 4517 4518
  fields = (char*)field_lens + num_fields;
  table_name  = fields + field_block_len;
  db = table_name + table_name_len + 1;
  fname = db + db_len + 1;
4519
  fname_len = (uint) strlen(fname);
4520
  // null termination is accomplished by the caller doing buf[event_len]=0
4521

unknown's avatar
unknown committed
4522
  DBUG_RETURN(0);
unknown's avatar
unknown committed
4523 4524 4525
}


unknown's avatar
unknown committed
4526
/*
4527
  Load_log_event::print()
unknown's avatar
unknown committed
4528
*/
4529 4530

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
4531
void Load_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
4532
{
unknown's avatar
unknown committed
4533
  print(file, print_event_info, 0);
unknown's avatar
unknown committed
4534 4535
}

unknown's avatar
unknown committed
4536

4537
void Load_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
4538
			   bool commented)
unknown's avatar
unknown committed
4539
{
4540 4541
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

unknown's avatar
unknown committed
4542
  DBUG_ENTER("Load_log_event::print");
unknown's avatar
unknown committed
4543
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
4544
  {
4545 4546 4547
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tQuery\tthread_id=%ld\texec_time=%ld\n",
                thread_id, exec_time);
unknown's avatar
unknown committed
4548 4549
  }

4550
  bool different_db= 1;
4551
  if (db)
unknown's avatar
unknown committed
4552
  {
4553 4554 4555 4556 4557 4558
    /*
      If the database is different from the one of the previous statement, we
      need to print the "use" command, and we update the last_db.
      But if commented, the "use" is going to be commented so we should not
      update the last_db.
    */
unknown's avatar
unknown committed
4559
    if ((different_db= memcmp(print_event_info->db, db, db_len + 1)) &&
4560
        !commented)
unknown's avatar
unknown committed
4561
      memcpy(print_event_info->db, db, db_len + 1);
unknown's avatar
unknown committed
4562
  }
4563
  
4564
  if (db && db[0] && different_db)
unknown's avatar
unknown committed
4565
    my_b_printf(&cache, "%suse %s%s\n", 
unknown's avatar
unknown committed
4566
            commented ? "# " : "",
4567
            db, print_event_info->delimiter);
unknown's avatar
unknown committed
4568

4569
  if (flags & LOG_EVENT_THREAD_SPECIFIC_F)
unknown's avatar
unknown committed
4570
    my_b_printf(&cache,"%sSET @@session.pseudo_thread_id=%lu%s\n",
4571 4572
            commented ? "# " : "", (ulong)thread_id,
            print_event_info->delimiter);
4573
  my_b_printf(&cache, "%sLOAD DATA ",
unknown's avatar
unknown committed
4574
              commented ? "# " : "");
4575
  if (check_fname_outside_temp_buf())
4576 4577
    my_b_printf(&cache, "LOCAL ");
  my_b_printf(&cache, "INFILE '%-*s' ", fname_len, fname);
unknown's avatar
unknown committed
4578

unknown's avatar
unknown committed
4579
  if (sql_ex.opt_flags & REPLACE_FLAG)
4580
    my_b_printf(&cache,"REPLACE ");
unknown's avatar
unknown committed
4581
  else if (sql_ex.opt_flags & IGNORE_FLAG)
4582
    my_b_printf(&cache,"IGNORE ");
unknown's avatar
unknown committed
4583
  
4584 4585 4586
  my_b_printf(&cache, "INTO TABLE `%s`", table_name);
  my_b_printf(&cache, " FIELDS TERMINATED BY ");
  pretty_print_str(&cache, sql_ex.field_term, sql_ex.field_term_len);
unknown's avatar
unknown committed
4587

unknown's avatar
unknown committed
4588
  if (sql_ex.opt_flags & OPT_ENCLOSED_FLAG)
4589 4590 4591
    my_b_printf(&cache," OPTIONALLY ");
  my_b_printf(&cache, " ENCLOSED BY ");
  pretty_print_str(&cache, sql_ex.enclosed, sql_ex.enclosed_len);
unknown's avatar
unknown committed
4592
     
4593 4594
  my_b_printf(&cache, " ESCAPED BY ");
  pretty_print_str(&cache, sql_ex.escaped, sql_ex.escaped_len);
unknown's avatar
unknown committed
4595
     
4596 4597
  my_b_printf(&cache," LINES TERMINATED BY ");
  pretty_print_str(&cache, sql_ex.line_term, sql_ex.line_term_len);
unknown's avatar
unknown committed
4598

unknown's avatar
unknown committed
4599

4600
  if (sql_ex.line_start)
unknown's avatar
unknown committed
4601
  {
4602 4603
    my_b_printf(&cache," STARTING BY ");
    pretty_print_str(&cache, sql_ex.line_start, sql_ex.line_start_len);
unknown's avatar
unknown committed
4604
  }
4605
  if ((long) skip_lines > 0)
4606
    my_b_printf(&cache, " IGNORE %ld LINES", (long) skip_lines);
unknown's avatar
unknown committed
4607

4608 4609 4610 4611
  if (num_fields)
  {
    uint i;
    const char* field = fields;
4612
    my_b_printf(&cache, " (");
4613
    for (i = 0; i < num_fields; i++)
unknown's avatar
unknown committed
4614
    {
unknown's avatar
unknown committed
4615
      if (i)
4616
	my_b_printf(&cache, ",");
Staale Smedseng's avatar
Staale Smedseng committed
4617
      my_b_printf(&cache, "%s", field);
unknown's avatar
unknown committed
4618
	  
4619
      field += field_lens[i]  + 1;
unknown's avatar
unknown committed
4620
    }
4621
    my_b_printf(&cache, ")");
4622
  }
unknown's avatar
unknown committed
4623

unknown's avatar
unknown committed
4624
  my_b_printf(&cache, "%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
4625
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
4626
}
unknown's avatar
unknown committed
4627
#endif /* MYSQL_CLIENT */
4628

unknown's avatar
unknown committed
4629
#ifndef MYSQL_CLIENT
4630

unknown's avatar
unknown committed
4631
/**
4632
  Load_log_event::set_fields()
unknown's avatar
unknown committed
4633

unknown's avatar
unknown committed
4634 4635 4636 4637 4638
  @note
    This function can not use the member variable 
    for the database, since LOAD DATA INFILE on the slave
    can be for a different database than the current one.
    This is the reason for the affected_db argument to this method.
unknown's avatar
unknown committed
4639
*/
4640

unknown's avatar
unknown committed
4641
void Load_log_event::set_fields(const char* affected_db, 
4642 4643
				List<Item> &field_list,
                                Name_resolution_context *context)
unknown's avatar
unknown committed
4644 4645
{
  uint i;
unknown's avatar
unknown committed
4646
  const char* field = fields;
4647
  for (i= 0; i < num_fields; i++)
unknown's avatar
unknown committed
4648
  {
4649 4650
    field_list.push_back(new Item_field(context,
                                        affected_db, table_name, field));
4651
    field+= field_lens[i]  + 1;
unknown's avatar
unknown committed
4652
  }
unknown's avatar
unknown committed
4653
}
unknown's avatar
unknown committed
4654
#endif /* !MYSQL_CLIENT */
unknown's avatar
unknown committed
4655 4656


unknown's avatar
SCRUM  
unknown committed
4657
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
4658 4659 4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673 4674 4675 4676 4677 4678 4679 4680 4681
/**
  Does the data loading job when executing a LOAD DATA on the slave.

  @param net
  @param rli
  @param use_rli_only_for_errors     If set to 1, rli is provided to
                                     Load_log_event::exec_event only for this
                                     function to have RPL_LOG_NAME and
                                     rli->last_slave_error, both being used by
                                     error reports. rli's position advancing
                                     is skipped (done by the caller which is
                                     Execute_load_log_event::exec_event).
                                     If set to 0, rli is provided for full use,
                                     i.e. for error reports and position
                                     advancing.

  @todo
    fix this; this can be done by testing rules in
    Create_file_log_event::exec_event() and then discarding Append_block and
    al.
  @todo
    this is a bug - this needs to be moved to the I/O thread

  @retval
4682
    0           Success
unknown's avatar
unknown committed
4683 4684
  @retval
    1           Failure
unknown's avatar
unknown committed
4685
*/
4686

4687
int Load_log_event::do_apply_event(NET* net, Relay_log_info const *rli,
4688
                                   bool use_rli_only_for_errors)
4689
{
4690 4691 4692 4693
  LEX_STRING new_db;
  new_db.length= db_len;
  new_db.str= (char *) rpl_filter->get_rewrite_db(db, &new_db.length);
  thd->set_db(new_db.str, new_db.length);
4694 4695
  DBUG_ASSERT(thd->query() == 0);
  thd->set_query_inner(NULL, 0);               // Should not be needed
4696
  thd->is_slave_error= 0;
4697
  clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
4698

4699
  /* see Query_log_event::do_apply_event() and BUG#13360 */
4700
  DBUG_ASSERT(!rli->m_table_map.count());
4701
  /*
4702
    Usually lex_start() is called by mysql_parse(), but we need it here
4703 4704
    as the present method does not call mysql_parse().
  */
4705
  lex_start(thd);
4706
  thd->lex->local_file= local_fname;
4707 4708
  mysql_reset_thd_for_next_command(thd);

unknown's avatar
unknown committed
4709
  if (!use_rli_only_for_errors)
4710
  {
4711 4712
    /*
      Saved for InnoDB, see comment in
4713
      Query_log_event::do_apply_event()
4714
    */
4715
    const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
4716
    DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));
4717
  }
4718 4719
 
   /*
4720 4721 4722 4723 4724 4725 4726
    We test replicate_*_db rules. Note that we have already prepared
    the file to load, even if we are going to ignore and delete it
    now. So it is possible that we did a lot of disk writes for
    nothing. In other words, a big LOAD DATA INFILE on the master will
    still consume a lot of space on the slave (space in the relay log
    + space of temp files: twice the space of the file to load...)
    even if it will finally be ignored.  TODO: fix this; this can be
4727
    done by testing rules in Create_file_log_event::do_apply_event()
4728 4729 4730
    and then discarding Append_block and al. Another way is do the
    filtering in the I/O thread (more efficient: no disk writes at
    all).
unknown's avatar
unknown committed
4731 4732 4733 4734 4735 4736 4737 4738


    Note:   We do not need to execute reset_one_shot_variables() if this
            db_ok() test fails.
    Reason: The db stored in binlog events is the same for SET and for
            its companion query.  If the SET is ignored because of
            db_ok(), the companion query will also be ignored, and if
            the companion query is ignored in the db_ok() test of
4739
            ::do_apply_event(), then the companion SET also have so
4740
            we don't need to reset_one_shot_variables().
unknown's avatar
unknown committed
4741
  */
4742
  if (rpl_filter->db_ok(thd->db))
4743
  {
4744
    thd->set_time((time_t)when);
4745
    thd->set_query_id(next_query_id());
Marc Alff's avatar
Marc Alff committed
4746
    thd->warning_info->opt_clear_warning_info(thd->query_id);
4747 4748

    TABLE_LIST tables;
4749 4750 4751 4752
    tables.init_one_table(thd->strmake(thd->db, thd->db_length),
                          thd->db_length,
                          table_name, strlen(table_name),
                          table_name, TL_WRITE);
unknown's avatar
unknown committed
4753
    tables.updating= 1;
unknown's avatar
unknown committed
4754

4755
    // the table will be opened in mysql_load    
4756
    if (rpl_filter->is_on() && !rpl_filter->tables_ok(thd->db, &tables))
4757 4758 4759 4760 4761 4762 4763 4764
    {
      // TODO: this is a bug - this needs to be moved to the I/O thread
      if (net)
        skip_load_data_infile(net);
    }
    else
    {
      char llbuff[22];
unknown's avatar
unknown committed
4765
      char *end;
unknown's avatar
unknown committed
4766
      enum enum_duplicates handle_dup;
4767
      bool ignore= 0;
unknown's avatar
unknown committed
4768 4769
      char *load_data_query;

unknown's avatar
unknown committed
4770
      /*
unknown's avatar
unknown committed
4771 4772
        Forge LOAD DATA INFILE query which will be used in SHOW PROCESS LIST
        and written to slave's binlog if binlogging is on.
unknown's avatar
unknown committed
4773
      */
unknown's avatar
unknown committed
4774
      if (!(load_data_query= (char *)thd->alloc(get_query_buffer_length() + 1)))
unknown's avatar
unknown committed
4775
      {
unknown's avatar
unknown committed
4776 4777 4778 4779 4780
        /*
          This will set thd->fatal_error in case of OOM. So we surely will notice
          that something is wrong.
        */
        goto error;
unknown's avatar
unknown committed
4781
      }
unknown's avatar
unknown committed
4782

4783
      print_query(FALSE, NULL, load_data_query, &end, NULL, NULL);
unknown's avatar
unknown committed
4784
      *end= 0;
4785
      thd->set_query(load_data_query, (uint) (end - load_data_query));
unknown's avatar
unknown committed
4786

unknown's avatar
unknown committed
4787
      if (sql_ex.opt_flags & REPLACE_FLAG)
4788
      {
unknown's avatar
unknown committed
4789
	handle_dup= DUP_REPLACE;
4790
      }
unknown's avatar
unknown committed
4791
      else if (sql_ex.opt_flags & IGNORE_FLAG)
4792 4793 4794 4795
      {
        ignore= 1;
        handle_dup= DUP_ERROR;
      }
unknown's avatar
unknown committed
4796
      else
unknown's avatar
unknown committed
4797
      {
unknown's avatar
unknown committed
4798
        /*
unknown's avatar
unknown committed
4799
	  When replication is running fine, if it was DUP_ERROR on the
4800
          master then we could choose IGNORE here, because if DUP_ERROR
unknown's avatar
unknown committed
4801
          suceeded on master, and data is identical on the master and slave,
4802
          then there should be no uniqueness errors on slave, so IGNORE is
unknown's avatar
unknown committed
4803
          the same as DUP_ERROR. But in the unlikely case of uniqueness errors
unknown's avatar
unknown committed
4804 4805 4806
          (because the data on the master and slave happen to be different
	  (user error or bug), we want LOAD DATA to print an error message on
	  the slave to discover the problem.
unknown's avatar
unknown committed
4807 4808

          If reading from net (a 3.23 master), mysql_load() will change this
4809
          to IGNORE.
unknown's avatar
unknown committed
4810 4811
        */
        handle_dup= DUP_ERROR;
unknown's avatar
unknown committed
4812
      }
4813 4814 4815 4816 4817 4818 4819 4820 4821 4822
      /*
        We need to set thd->lex->sql_command and thd->lex->duplicates
        since InnoDB tests these variables to decide if this is a LOAD
        DATA ... REPLACE INTO ... statement even though mysql_parse()
        is not called.  This is not needed in 5.0 since there the LOAD
        DATA ... statement is replicated using mysql_parse(), which
        sets the thd->lex fields correctly.
      */
      thd->lex->sql_command= SQLCOM_LOAD;
      thd->lex->duplicates= handle_dup;
unknown's avatar
unknown committed
4823

unknown's avatar
unknown committed
4824
      sql_exchange ex((char*)fname, sql_ex.opt_flags & DUMPFILE_FLAG);
4825 4826 4827 4828 4829
      String field_term(sql_ex.field_term,sql_ex.field_term_len,log_cs);
      String enclosed(sql_ex.enclosed,sql_ex.enclosed_len,log_cs);
      String line_term(sql_ex.line_term,sql_ex.line_term_len,log_cs);
      String line_start(sql_ex.line_start,sql_ex.line_start_len,log_cs);
      String escaped(sql_ex.escaped,sql_ex.escaped_len, log_cs);
unknown's avatar
unknown committed
4830 4831 4832 4833 4834
      ex.field_term= &field_term;
      ex.enclosed= &enclosed;
      ex.line_term= &line_term;
      ex.line_start= &line_start;
      ex.escaped= &escaped;
4835 4836 4837 4838 4839 4840

      ex.opt_enclosed = (sql_ex.opt_flags & OPT_ENCLOSED_FLAG);
      if (sql_ex.empty_flags & FIELD_TERM_EMPTY)
	ex.field_term->length(0);

      ex.skip_lines = skip_lines;
unknown's avatar
unknown committed
4841
      List<Item> field_list;
4842 4843
      thd->lex->select_lex.context.resolve_in_table_list_only(&tables);
      set_fields(tables.db, field_list, &thd->lex->select_lex.context);
unknown's avatar
unknown committed
4844
      thd->variables.pseudo_thread_id= thread_id;
4845 4846 4847 4848 4849 4850 4851 4852 4853
      if (net)
      {
	// mysql_load will use thd->net to read the file
	thd->net.vio = net->vio;
	/*
	  Make sure the client does not get confused about the packet sequence
	*/
	thd->net.pkt_nr = net->pkt_nr;
      }
unknown's avatar
unknown committed
4854
      /*
4855
        It is safe to use tmp_list twice because we are not going to
unknown's avatar
unknown committed
4856 4857
        update it inside mysql_load().
      */
4858 4859
      List<Item> tmp_list;
      if (mysql_load(thd, &ex, &tables, field_list, tmp_list, tmp_list,
4860
                     handle_dup, ignore, net != 0))
4861
        thd->is_slave_error= 1;
4862
      if (thd->cuted_fields)
unknown's avatar
unknown committed
4863
      {
unknown's avatar
unknown committed
4864
	/* log_pos is the position of the LOAD event in the master log */
unknown's avatar
unknown committed
4865 4866 4867 4868 4869 4870 4871
        sql_print_warning("Slave: load data infile on table '%s' at "
                          "log position %s in log '%s' produced %ld "
                          "warning(s). Default database: '%s'",
                          (char*) table_name,
                          llstr(log_pos,llbuff), RPL_LOG_NAME, 
                          (ulong) thd->cuted_fields,
                          print_slave_db_safe(thd->db));
unknown's avatar
unknown committed
4872
      }
4873 4874 4875
      if (net)
        net->pkt_nr= thd->net.pkt_nr;
    }
4876 4877
  }
  else
4878 4879 4880 4881 4882 4883 4884 4885 4886
  {
    /*
      We will just ask the master to send us /dev/null if we do not
      want to load the data.
      TODO: this a bug - needs to be done in I/O thread
    */
    if (net)
      skip_load_data_infile(net);
  }
unknown's avatar
unknown committed
4887 4888

error:
4889
  thd->net.vio = 0; 
unknown's avatar
unknown committed
4890 4891
  const char *remember_db= thd->db;
  thd->catalog= 0;
4892
  thd->set_db(NULL, 0);                   /* will free the current database */
4893
  thd->set_query(NULL, 0);
4894
  close_thread_tables(thd);
4895 4896

  DBUG_EXECUTE_IF("LOAD_DATA_INFILE_has_fatal_error",
4897
                  thd->is_slave_error= 0; thd->is_fatal_error= 1;);
4898

4899
  if (thd->is_slave_error)
4900
  {
4901
    /* this err/sql_errno code is copy-paste from net_send_error() */
unknown's avatar
unknown committed
4902 4903
    const char *err;
    int sql_errno;
4904 4905
    if (thd->is_error())
    {
Marc Alff's avatar
Marc Alff committed
4906 4907
      err= thd->stmt_da->message();
      sql_errno= thd->stmt_da->sql_errno();
4908
    }
unknown's avatar
unknown committed
4909 4910 4911 4912 4913
    else
    {
      sql_errno=ER_UNKNOWN_ERROR;
      err=ER(sql_errno);       
    }
4914
    rli->report(ERROR_LEVEL, sql_errno,"\
unknown's avatar
unknown committed
4915
Error '%s' running LOAD DATA INFILE on table '%s'. Default database: '%s'",
4916
                    err, (char*)table_name, print_slave_db_safe(remember_db));
unknown's avatar
unknown committed
4917
    free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
4918 4919
    return 1;
  }
unknown's avatar
unknown committed
4920
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
4921

4922
  if (thd->is_fatal_error)
4923
  {
4924 4925 4926 4927 4928 4929 4930 4931 4932
    char buf[256];
    my_snprintf(buf, sizeof(buf),
                "Running LOAD DATA INFILE on table '%-.64s'."
                " Default database: '%-.64s'",
                (char*)table_name,
                print_slave_db_safe(remember_db));

    rli->report(ERROR_LEVEL, ER_SLAVE_FATAL_ERROR,
                ER(ER_SLAVE_FATAL_ERROR), buf);
4933 4934 4935
    return 1;
  }

4936
  return ( use_rli_only_for_errors ? 0 : Log_event::do_apply_event(rli) ); 
4937
}
unknown's avatar
SCRUM  
unknown committed
4938
#endif
4939 4940


unknown's avatar
unknown committed
4941
/**************************************************************************
unknown's avatar
unknown committed
4942
  Rotate_log_event methods
unknown's avatar
unknown committed
4943
**************************************************************************/
4944

unknown's avatar
unknown committed
4945
/*
4946
  Rotate_log_event::pack_info()
unknown's avatar
unknown committed
4947
*/
4948

unknown's avatar
SCRUM  
unknown committed
4949
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4950
void Rotate_log_event::pack_info(Protocol *protocol)
4951
{
unknown's avatar
unknown committed
4952
  char buf1[256], buf[22];
unknown's avatar
unknown committed
4953
  String tmp(buf1, sizeof(buf1), log_cs);
4954
  tmp.length(0);
unknown's avatar
unknown committed
4955
  tmp.append(new_log_ident, ident_len);
4956
  tmp.append(STRING_WITH_LEN(";pos="));
unknown's avatar
unknown committed
4957 4958
  tmp.append(llstr(pos,buf));
  protocol->store(tmp.ptr(), tmp.length(), &my_charset_bin);
4959
}
unknown's avatar
SCRUM  
unknown committed
4960
#endif
4961

4962

unknown's avatar
unknown committed
4963
/*
4964
  Rotate_log_event::print()
unknown's avatar
unknown committed
4965
*/
4966 4967

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
4968
void Rotate_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4969
{
4970
  char buf[22];
4971 4972
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
4973

unknown's avatar
unknown committed
4974
  if (print_event_info->short_form)
4975
    return;
4976 4977
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tRotate to ");
4978
  if (new_log_ident)
4979
    my_b_write(&cache, (uchar*) new_log_ident, (uint)ident_len);
4980
  my_b_printf(&cache, "  pos: %s\n", llstr(pos, buf));
4981
}
unknown's avatar
unknown committed
4982
#endif /* MYSQL_CLIENT */
4983 4984


4985

unknown's avatar
unknown committed
4986
/*
4987
  Rotate_log_event::Rotate_log_event() (2 constructors)
unknown's avatar
unknown committed
4988
*/
4989

4990 4991

#ifndef MYSQL_CLIENT
4992
Rotate_log_event::Rotate_log_event(const char* new_log_ident_arg,
4993 4994 4995 4996 4997 4998 4999 5000
                                   uint ident_len_arg, ulonglong pos_arg,
                                   uint flags_arg)
  :Log_event(), new_log_ident(new_log_ident_arg),
   pos(pos_arg),ident_len(ident_len_arg ? ident_len_arg :
                          (uint) strlen(new_log_ident_arg)), flags(flags_arg)
{
#ifndef DBUG_OFF
  char buff[22];
5001
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(...,flags)");
unknown's avatar
unknown committed
5002 5003
  DBUG_PRINT("enter",("new_log_ident: %s  pos: %s  flags: %lu", new_log_ident_arg,
                      llstr(pos_arg, buff), (ulong) flags));
5004 5005
#endif
  if (flags & DUP_NAME)
5006
    new_log_ident= my_strndup(new_log_ident_arg, ident_len, MYF(MY_WME));
5007 5008
  if (flags & RELAY_LOG)
    set_relay_log_event();
5009 5010 5011 5012 5013
  DBUG_VOID_RETURN;
}
#endif


5014 5015
Rotate_log_event::Rotate_log_event(const char* buf, uint event_len,
                                   const Format_description_log_event* description_event)
unknown's avatar
unknown committed
5016
  :Log_event(buf, description_event) ,new_log_ident(0), flags(DUP_NAME)
5017
{
5018
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(char*,...)");
5019
  // The caller will ensure that event_len is what we have at EVENT_LEN_OFFSET
5020 5021
  uint8 header_size= description_event->common_header_len;
  uint8 post_header_len= description_event->post_header_len[ROTATE_EVENT-1];
5022 5023
  uint ident_offset;
  if (event_len < header_size)
unknown's avatar
unknown committed
5024
    DBUG_VOID_RETURN;
5025
  buf += header_size;
5026 5027 5028 5029
  pos = post_header_len ? uint8korr(buf + R_POS_OFFSET) : 4;
  ident_len = (uint)(event_len -
                     (header_size+post_header_len)); 
  ident_offset = post_header_len; 
5030
  set_if_smaller(ident_len,FN_REFLEN-1);
5031
  new_log_ident= my_strndup(buf + ident_offset, (uint) ident_len, MYF(MY_WME));
5032
  DBUG_PRINT("debug", ("new_log_ident: '%s'", new_log_ident));
unknown's avatar
unknown committed
5033
  DBUG_VOID_RETURN;
5034
}
5035 5036


unknown's avatar
unknown committed
5037
/*
5038
  Rotate_log_event::write()
unknown's avatar
unknown committed
5039
*/
5040

5041
#ifndef MYSQL_CLIENT
5042
bool Rotate_log_event::write(IO_CACHE* file)
5043
{
5044
  char buf[ROTATE_HEADER_LEN];
unknown's avatar
unknown committed
5045
  int8store(buf + R_POS_OFFSET, pos);
5046
  return (write_header(file, ROTATE_HEADER_LEN + ident_len) ||
5047 5048
          my_b_safe_write(file, (uchar*)buf, ROTATE_HEADER_LEN) ||
          my_b_safe_write(file, (uchar*)new_log_ident, (uint) ident_len));
5049
}
5050
#endif
5051

5052

unknown's avatar
unknown committed
5053
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5054

unknown's avatar
unknown committed
5055 5056
/*
  Got a rotate log event from the master.
5057

unknown's avatar
unknown committed
5058 5059
  This is mainly used so that we can later figure out the logname and
  position for the master.
5060

unknown's avatar
unknown committed
5061 5062 5063
  We can't rotate the slave's BINlog as this will cause infinitive rotations
  in a A -> B -> A setup.
  The NOTES below is a wrong comment which will disappear when 4.1 is merged.
5064

unknown's avatar
unknown committed
5065
  @retval
5066
    0	ok
unknown's avatar
unknown committed
5067
*/
5068
int Rotate_log_event::do_update_pos(Relay_log_info *rli)
5069
{
5070
  DBUG_ENTER("Rotate_log_event::do_update_pos");
5071 5072 5073 5074
#ifndef DBUG_OFF
  char buf[32];
#endif

5075 5076
  DBUG_PRINT("info", ("server_id=%lu; ::server_id=%lu",
                      (ulong) this->server_id, (ulong) ::server_id));
5077 5078
  DBUG_PRINT("info", ("new_log_ident: %s", this->new_log_ident));
  DBUG_PRINT("info", ("pos: %s", llstr(this->pos, buf)));
5079

unknown's avatar
unknown committed
5080
  /*
5081 5082 5083 5084
    If we are in a transaction or in a group: the only normal case is
    when the I/O thread was copying a big transaction, then it was
    stopped and restarted: we have this in the relay log:

unknown's avatar
unknown committed
5085 5086 5087 5088 5089
    BEGIN
    ...
    ROTATE (a fake one)
    ...
    COMMIT or ROLLBACK
5090 5091 5092 5093

    In that case, we don't want to touch the coordinates which
    correspond to the beginning of the transaction.  Starting from
    5.0.0, there also are some rotates from the slave itself, in the
5094
    relay log, which shall not change the group positions.
unknown's avatar
unknown committed
5095
  */
5096
  if ((server_id != ::server_id || rli->replicate_same_server_id) &&
5097
      !is_relay_log_event() &&
5098
      !rli->is_in_group())
unknown's avatar
unknown committed
5099
  {
Marc Alff's avatar
Marc Alff committed
5100
    mysql_mutex_lock(&rli->data_lock);
5101 5102 5103 5104
    DBUG_PRINT("info", ("old group_master_log_name: '%s'  "
                        "old group_master_log_pos: %lu",
                        rli->group_master_log_name,
                        (ulong) rli->group_master_log_pos));
unknown's avatar
unknown committed
5105 5106
    memcpy(rli->group_master_log_name, new_log_ident, ident_len+1);
    rli->notify_group_master_log_name_update();
5107
    rli->inc_group_relay_log_pos(pos, TRUE /* skip_lock */);
5108 5109
    DBUG_PRINT("info", ("new group_master_log_name: '%s'  "
                        "new group_master_log_pos: %lu",
5110
                        rli->group_master_log_name,
unknown's avatar
unknown committed
5111
                        (ulong) rli->group_master_log_pos));
Marc Alff's avatar
Marc Alff committed
5112
    mysql_mutex_unlock(&rli->data_lock);
5113 5114
    flush_relay_log_info(rli);
    
5115
    /*
5116
      Reset thd->variables.option_bits and sql_mode etc, because this could be the signal of
5117
      a master's downgrade from 5.0 to 4.0.
5118 5119 5120 5121 5122
      However, no need to reset description_event_for_exec: indeed, if the next
      master is 5.0 (even 5.0.1) we will soon get a Format_desc; if the next
      master is 4.0 then the events are in the slave's format (conversion).
    */
    set_slave_thread_options(thd);
5123
    set_slave_thread_default_charset(thd, rli);
5124
    thd->variables.sql_mode= global_system_variables.sql_mode;
5125 5126
    thd->variables.auto_increment_increment=
      thd->variables.auto_increment_offset= 1;
unknown's avatar
unknown committed
5127
  }
5128 5129 5130
  else
    rli->inc_event_relay_log_pos();

5131

5132
  DBUG_RETURN(0);
5133
}
5134

5135 5136

Log_event::enum_skip_reason
5137
Rotate_log_event::do_shall_skip(Relay_log_info *rli)
5138
{
5139
  enum_skip_reason reason= Log_event::do_shall_skip(rli);
5140 5141

  switch (reason) {
5142
  case Log_event::EVENT_SKIP_NOT:
5143
  case Log_event::EVENT_SKIP_COUNT:
5144
    return Log_event::EVENT_SKIP_NOT;
5145

5146 5147
  case Log_event::EVENT_SKIP_IGNORE:
    return Log_event::EVENT_SKIP_IGNORE;
5148 5149
  }
  DBUG_ASSERT(0);
5150
  return Log_event::EVENT_SKIP_NOT;             // To keep compiler happy
5151 5152
}

unknown's avatar
SCRUM  
unknown committed
5153
#endif
5154 5155


unknown's avatar
unknown committed
5156
/**************************************************************************
unknown's avatar
unknown committed
5157
	Intvar_log_event methods
unknown's avatar
unknown committed
5158
**************************************************************************/
5159

unknown's avatar
unknown committed
5160
/*
5161
  Intvar_log_event::pack_info()
unknown's avatar
unknown committed
5162
*/
5163

unknown's avatar
SCRUM  
unknown committed
5164
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5165
void Intvar_log_event::pack_info(Protocol *protocol)
5166
{
unknown's avatar
unknown committed
5167 5168
  char buf[256], *pos;
  pos= strmake(buf, get_var_type_name(), sizeof(buf)-23);
unknown's avatar
unknown committed
5169
  *pos++= '=';
unknown's avatar
unknown committed
5170
  pos= longlong10_to_str(val, pos, -10);
unknown's avatar
unknown committed
5171
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
5172
}
unknown's avatar
SCRUM  
unknown committed
5173
#endif
5174

unknown's avatar
unknown committed
5175

unknown's avatar
unknown committed
5176
/*
5177
  Intvar_log_event::Intvar_log_event()
unknown's avatar
unknown committed
5178
*/
5179

5180 5181 5182
Intvar_log_event::Intvar_log_event(const char* buf,
                                   const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
5183
{
5184 5185 5186
  /* The Post-Header is empty. The Varible Data part begins immediately. */
  buf+= description_event->common_header_len +
    description_event->post_header_len[INTVAR_EVENT-1];
5187 5188
  type= buf[I_TYPE_OFFSET];
  val= uint8korr(buf+I_VAL_OFFSET);
5189 5190
}

5191

unknown's avatar
unknown committed
5192
/*
5193
  Intvar_log_event::get_var_type_name()
unknown's avatar
unknown committed
5194
*/
5195 5196

const char* Intvar_log_event::get_var_type_name()
5197
{
5198 5199 5200 5201 5202
  switch(type) {
  case LAST_INSERT_ID_EVENT: return "LAST_INSERT_ID";
  case INSERT_ID_EVENT: return "INSERT_ID";
  default: /* impossible */ return "UNKNOWN";
  }
5203 5204
}

unknown's avatar
unknown committed
5205

unknown's avatar
unknown committed
5206
/*
5207
  Intvar_log_event::write()
unknown's avatar
unknown committed
5208
*/
5209

5210
#ifndef MYSQL_CLIENT
5211
bool Intvar_log_event::write(IO_CACHE* file)
5212
{
5213 5214
  uchar buf[9];
  buf[I_TYPE_OFFSET]= (uchar) type;
5215
  int8store(buf + I_VAL_OFFSET, val);
5216 5217
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
5218
}
5219
#endif
5220

5221

unknown's avatar
unknown committed
5222
/*
5223
  Intvar_log_event::print()
unknown's avatar
unknown committed
5224
*/
5225 5226

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5227
void Intvar_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5228
{
5229 5230 5231
  char llbuff[22];
  const char *msg;
  LINT_INIT(msg);
5232 5233
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
5234

unknown's avatar
unknown committed
5235
  if (!print_event_info->short_form)
5236
  {
5237 5238
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tIntvar\n");
5239
  }
5240

5241
  my_b_printf(&cache, "SET ");
5242 5243 5244 5245 5246 5247 5248
  switch (type) {
  case LAST_INSERT_ID_EVENT:
    msg="LAST_INSERT_ID";
    break;
  case INSERT_ID_EVENT:
    msg="INSERT_ID";
    break;
5249 5250 5251 5252
  case INVALID_INT_EVENT:
  default: // cannot happen
    msg="INVALID_INT";
    break;
5253
  }
unknown's avatar
unknown committed
5254 5255
  my_b_printf(&cache, "%s=%s%s\n",
              msg, llstr(val,llbuff), print_event_info->delimiter);
5256
}
5257
#endif
5258

5259

unknown's avatar
unknown committed
5260
/*
5261
  Intvar_log_event::do_apply_event()
unknown's avatar
unknown committed
5262
*/
5263

unknown's avatar
SCRUM  
unknown committed
5264
#if defined(HAVE_REPLICATION)&& !defined(MYSQL_CLIENT)
5265
int Intvar_log_event::do_apply_event(Relay_log_info const *rli)
5266
{
5267 5268 5269 5270
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5271
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5272

5273 5274
  switch (type) {
  case LAST_INSERT_ID_EVENT:
5275 5276
    thd->stmt_depends_on_first_successful_insert_id_in_prev_stmt= 1;
    thd->first_successful_insert_id_in_prev_stmt= val;
5277 5278
    break;
  case INSERT_ID_EVENT:
5279
    thd->force_one_auto_inc_interval(val);
5280 5281
    break;
  }
5282 5283 5284
  return 0;
}

5285
int Intvar_log_event::do_update_pos(Relay_log_info *rli)
5286
{
5287
  rli->inc_event_relay_log_pos();
5288
  return 0;
5289
}
5290 5291 5292


Log_event::enum_skip_reason
5293
Intvar_log_event::do_shall_skip(Relay_log_info *rli)
5294 5295
{
  /*
5296 5297 5298 5299 5300 5301
    It is a common error to set the slave skip counter to 1 instead of
    2 when recovering from an insert which used a auto increment,
    rand, or user var.  Therefore, if the slave skip counter is 1, we
    just say that this event should be skipped by ignoring it, meaning
    that we do not change the value of the slave skip counter since it
    will be decreased by the following insert event.
5302
  */
5303
  return continue_group(rli);
5304 5305
}

unknown's avatar
SCRUM  
unknown committed
5306
#endif
5307

5308

unknown's avatar
unknown committed
5309
/**************************************************************************
5310
  Rand_log_event methods
unknown's avatar
unknown committed
5311
**************************************************************************/
5312

unknown's avatar
SCRUM  
unknown committed
5313
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5314
void Rand_log_event::pack_info(Protocol *protocol)
5315
{
unknown's avatar
unknown committed
5316 5317 5318 5319 5320
  char buf1[256], *pos;
  pos= strmov(buf1,"rand_seed1=");
  pos= int10_to_str((long) seed1, pos, 10);
  pos= strmov(pos, ",rand_seed2=");
  pos= int10_to_str((long) seed2, pos, 10);
5321
  protocol->store(buf1, (uint) (pos-buf1), &my_charset_bin);
5322
}
unknown's avatar
SCRUM  
unknown committed
5323
#endif
5324 5325


5326 5327 5328
Rand_log_event::Rand_log_event(const char* buf,
                               const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
5329
{
5330 5331 5332
  /* The Post-Header is empty. The Variable Data part begins immediately. */
  buf+= description_event->common_header_len +
    description_event->post_header_len[RAND_EVENT-1];
5333 5334
  seed1= uint8korr(buf+RAND_SEED1_OFFSET);
  seed2= uint8korr(buf+RAND_SEED2_OFFSET);
5335 5336
}

5337

5338
#ifndef MYSQL_CLIENT
5339
bool Rand_log_event::write(IO_CACHE* file)
5340
{
5341
  uchar buf[16];
5342 5343
  int8store(buf + RAND_SEED1_OFFSET, seed1);
  int8store(buf + RAND_SEED2_OFFSET, seed2);
5344 5345
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
5346
}
5347
#endif
5348

5349 5350

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5351
void Rand_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5352
{
5353 5354 5355
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5356
  char llbuff[22],llbuff2[22];
unknown's avatar
unknown committed
5357
  if (!print_event_info->short_form)
5358
  {
5359 5360
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tRand\n");
5361
  }
unknown's avatar
unknown committed
5362 5363 5364
  my_b_printf(&cache, "SET @@RAND_SEED1=%s, @@RAND_SEED2=%s%s\n",
              llstr(seed1, llbuff),llstr(seed2, llbuff2),
              print_event_info->delimiter);
5365
}
unknown's avatar
unknown committed
5366
#endif /* MYSQL_CLIENT */
5367

5368

unknown's avatar
SCRUM  
unknown committed
5369
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5370
int Rand_log_event::do_apply_event(Relay_log_info const *rli)
5371
{
5372 5373 5374 5375
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5376
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5377

unknown's avatar
unknown committed
5378 5379
  thd->rand.seed1= (ulong) seed1;
  thd->rand.seed2= (ulong) seed2;
5380 5381 5382
  return 0;
}

5383
int Rand_log_event::do_update_pos(Relay_log_info *rli)
5384
{
5385
  rli->inc_event_relay_log_pos();
5386 5387
  return 0;
}
5388

5389 5390

Log_event::enum_skip_reason
5391
Rand_log_event::do_shall_skip(Relay_log_info *rli)
5392 5393
{
  /*
5394 5395 5396 5397 5398 5399
    It is a common error to set the slave skip counter to 1 instead of
    2 when recovering from an insert which used a auto increment,
    rand, or user var.  Therefore, if the slave skip counter is 1, we
    just say that this event should be skipped by ignoring it, meaning
    that we do not change the value of the slave skip counter since it
    will be decreased by the following insert event.
5400
  */
5401
  return continue_group(rli);
5402 5403
}

unknown's avatar
unknown committed
5404
#endif /* !MYSQL_CLIENT */
5405

unknown's avatar
unknown committed
5406

5407 5408 5409 5410 5411 5412 5413
/**************************************************************************
  Xid_log_event methods
**************************************************************************/

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Xid_log_event::pack_info(Protocol *protocol)
{
5414 5415
  char buf[128], *pos;
  pos= strmov(buf, "COMMIT /* xid=");
5416
  pos= longlong10_to_str(xid, pos, 10);
5417
  pos= strmov(pos, " */");
5418 5419 5420 5421
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
}
#endif

unknown's avatar
unknown committed
5422 5423 5424
/**
  @note
  It's ok not to use int8store here,
unknown's avatar
unknown committed
5425
  as long as xid_t::set(ulonglong) and
unknown's avatar
unknown committed
5426 5427
  xid_t::get_my_xid doesn't do it either.
  We don't care about actual values of xids as long as
unknown's avatar
unknown committed
5428 5429
  identical numbers compare identically
*/
5430 5431 5432 5433

Xid_log_event::
Xid_log_event(const char* buf,
              const Format_description_log_event *description_event)
5434 5435
  :Log_event(buf, description_event)
{
5436 5437 5438
  /* The Post-Header is empty. The Variable Data part begins immediately. */
  buf+= description_event->common_header_len +
    description_event->post_header_len[XID_EVENT-1];
5439
  memcpy((char*) &xid, buf, sizeof(xid));
5440 5441 5442
}


5443
#ifndef MYSQL_CLIENT
5444 5445
bool Xid_log_event::write(IO_CACHE* file)
{
5446
  DBUG_EXECUTE_IF("do_not_write_xid", return 0;);
5447
  return write_header(file, sizeof(xid)) ||
5448
         my_b_safe_write(file, (uchar*) &xid, sizeof(xid));
5449
}
5450
#endif
5451 5452 5453


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5454
void Xid_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5455
{
5456 5457 5458
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5459
  if (!print_event_info->short_form)
5460
  {
unknown's avatar
unknown committed
5461 5462 5463
    char buf[64];
    longlong10_to_str(xid, buf, 10);

5464 5465
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tXid = %s\n", buf);
5466
  }
unknown's avatar
unknown committed
5467
  my_b_printf(&cache, "COMMIT%s\n", print_event_info->delimiter);
5468 5469 5470 5471 5472
}
#endif /* MYSQL_CLIENT */


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5473
int Xid_log_event::do_apply_event(Relay_log_info const *rli)
5474
{
5475
  bool res;
5476
  /* For a slave Xid_log_event is COMMIT */
5477 5478
  general_log_print(thd, COM_QUERY,
                    "COMMIT /* implicit, from Xid_log_event */");
5479 5480 5481
  if (!(res= trans_commit(thd)))
  {
    close_thread_tables(thd);
5482
    thd->mdl_context.release_transactional_locks();
5483 5484
  }
  return res;
5485
}
5486 5487 5488 5489 5490 5491

Log_event::enum_skip_reason
Xid_log_event::do_shall_skip(Relay_log_info *rli)
{
  DBUG_ENTER("Xid_log_event::do_shall_skip");
  if (rli->slave_skip_counter > 0) {
5492
    thd->variables.option_bits&= ~OPTION_BEGIN;
5493 5494 5495 5496
    DBUG_RETURN(Log_event::EVENT_SKIP_COUNT);
  }
  DBUG_RETURN(Log_event::do_shall_skip(rli));
}
5497 5498 5499
#endif /* !MYSQL_CLIENT */


unknown's avatar
unknown committed
5500
/**************************************************************************
5501
  User_var_log_event methods
unknown's avatar
unknown committed
5502
**************************************************************************/
unknown's avatar
unknown committed
5503

unknown's avatar
unknown committed
5504
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
5505 5506 5507
void User_var_log_event::pack_info(Protocol* protocol)
{
  char *buf= 0;
5508
  uint val_offset= 4 + name_len;
unknown's avatar
unknown committed
5509 5510 5511 5512
  uint event_len= val_offset;

  if (is_null)
  {
5513 5514
    if (!(buf= (char*) my_malloc(val_offset + 5, MYF(MY_WME))))
      return;
unknown's avatar
unknown committed
5515 5516 5517 5518 5519 5520 5521 5522 5523
    strmov(buf + val_offset, "NULL");
    event_len= val_offset + 4;
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
      float8get(real_val, val);
5524
      if (!(buf= (char*) my_malloc(val_offset + MY_GCVT_MAX_FIELD_WIDTH + 1,
5525 5526
                                   MYF(MY_WME))))
        return;
5527 5528
      event_len+= my_gcvt(real_val, MY_GCVT_ARG_DOUBLE, MY_GCVT_MAX_FIELD_WIDTH,
                          buf + val_offset, NULL);
unknown's avatar
unknown committed
5529 5530
      break;
    case INT_RESULT:
5531 5532
      if (!(buf= (char*) my_malloc(val_offset + 22, MYF(MY_WME))))
        return;
5533 5534 5535
      event_len= longlong10_to_str(uint8korr(val), buf + val_offset, 
                                   ((flags & User_var_log_event::UNSIGNED_F) ? 
                                    10 : -10))-buf;
unknown's avatar
unknown committed
5536
      break;
unknown's avatar
unknown committed
5537 5538
    case DECIMAL_RESULT:
    {
5539 5540 5541
      if (!(buf= (char*) my_malloc(val_offset + DECIMAL_MAX_STR_LENGTH,
                                   MYF(MY_WME))))
        return;
unknown's avatar
unknown committed
5542 5543
      String str(buf+val_offset, DECIMAL_MAX_STR_LENGTH, &my_charset_bin);
      my_decimal dec;
5544 5545
      binary2my_decimal(E_DEC_FATAL_ERROR, (uchar*) (val+2), &dec, val[0],
                        val[1]);
unknown's avatar
unknown committed
5546 5547 5548 5549
      my_decimal2string(E_DEC_FATAL_ERROR, &dec, 0, 0, 0, &str);
      event_len= str.length() + val_offset;
      break;
    } 
unknown's avatar
unknown committed
5550
    case STRING_RESULT:
5551
      /* 15 is for 'COLLATE' and other chars */
5552 5553
      buf= (char*) my_malloc(event_len+val_len*2+1+2*MY_CS_NAME_SIZE+15,
                             MYF(MY_WME));
5554
      CHARSET_INFO *cs;
5555 5556
      if (!buf)
        return;
5557 5558 5559 5560 5561 5562 5563
      if (!(cs= get_charset(charset_number, MYF(0))))
      {
        strmov(buf+val_offset, "???");
        event_len+= 3;
      }
      else
      {
5564 5565 5566
        char *p= strxmov(buf + val_offset, "_", cs->csname, " ", NullS);
        p= str_to_hex(p, val, val_len);
        p= strxmov(p, " COLLATE ", cs->name, NullS);
5567 5568
        event_len= p-buf;
      }
unknown's avatar
unknown committed
5569
      break;
5570
    case ROW_RESULT:
unknown's avatar
unknown committed
5571
    default:
unknown's avatar
unknown committed
5572 5573 5574 5575 5576
      DBUG_ASSERT(1);
      return;
    }
  }
  buf[0]= '@';
5577
  buf[1]= '`';
5578
  memcpy(buf+2, name, name_len);
5579 5580
  buf[2+name_len]= '`';
  buf[3+name_len]= '=';
5581
  protocol->store(buf, event_len, &my_charset_bin);
5582
  my_free(buf, MYF(0));
unknown's avatar
unknown committed
5583
}
unknown's avatar
unknown committed
5584
#endif /* !MYSQL_CLIENT */
unknown's avatar
unknown committed
5585 5586


5587 5588 5589 5590
User_var_log_event::
User_var_log_event(const char* buf,
                   const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
unknown's avatar
unknown committed
5591
{
5592
  /* The Post-Header is empty. The Variable Data part begins immediately. */
5593
  const char *start= buf;
5594 5595
  buf+= description_event->common_header_len +
    description_event->post_header_len[USER_VAR_EVENT-1];
unknown's avatar
unknown committed
5596 5597
  name_len= uint4korr(buf);
  name= (char *) buf + UV_NAME_LEN_SIZE;
5598 5599
  buf+= UV_NAME_LEN_SIZE + name_len;
  is_null= (bool) *buf;
5600
  flags= User_var_log_event::UNDEF_F;    // defaults to UNDEF_F
unknown's avatar
unknown committed
5601 5602 5603
  if (is_null)
  {
    type= STRING_RESULT;
5604
    charset_number= my_charset_bin.number;
unknown's avatar
unknown committed
5605 5606 5607 5608 5609
    val_len= 0;
    val= 0;  
  }
  else
  {
5610 5611 5612
    type= (Item_result) buf[UV_VAL_IS_NULL];
    charset_number= uint4korr(buf + UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE);
    val_len= uint4korr(buf + UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE + 
unknown's avatar
unknown committed
5613
		       UV_CHARSET_NUMBER_SIZE);
5614 5615
    val= (char *) (buf + UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE +
		   UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE);
5616 5617 5618 5619 5620 5621 5622 5623 5624 5625 5626 5627 5628 5629 5630 5631 5632 5633 5634 5635 5636

    /**
      We need to check if this is from an old server
      that did not pack information for flags.
      We do this by checking if there are extra bytes
      after the packed value. If there are we take the
      extra byte and it's value is assumed to contain
      the flags value.

      Old events will not have this extra byte, thence,
      we keep the flags set to UNDEF_F.
    */
    uint bytes_read= ((val + val_len) - start);
    DBUG_ASSERT(bytes_read==data_written || 
                bytes_read==(data_written-1));
    if ((data_written - bytes_read) > 0)
    {
      flags= (uint) *(buf + UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE +
                    UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE +
                    val_len);
    }
unknown's avatar
unknown committed
5637 5638 5639 5640
  }
}


5641
#ifndef MYSQL_CLIENT
5642
bool User_var_log_event::write(IO_CACHE* file)
unknown's avatar
unknown committed
5643 5644 5645 5646
{
  char buf[UV_NAME_LEN_SIZE];
  char buf1[UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE + 
	    UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE];
5647
  uchar buf2[max(8, DECIMAL_MAX_FIELD_SIZE + 2)], *pos= buf2;
5648
  uint unsigned_len= 0;
5649
  uint buf1_length;
5650
  ulong event_length;
5651

unknown's avatar
unknown committed
5652
  int4store(buf, name_len);
5653 5654 5655 5656
  
  if ((buf1[0]= is_null))
  {
    buf1_length= 1;
5657
    val_len= 0;                                 // Length of 'pos'
5658 5659
  }    
  else
unknown's avatar
unknown committed
5660 5661 5662 5663 5664 5665 5666 5667 5668 5669
  {
    buf1[1]= type;
    int4store(buf1 + 2, charset_number);

    switch (type) {
    case REAL_RESULT:
      float8store(buf2, *(double*) val);
      break;
    case INT_RESULT:
      int8store(buf2, *(longlong*) val);
5670
      unsigned_len= 1;
unknown's avatar
unknown committed
5671
      break;
unknown's avatar
unknown committed
5672 5673 5674 5675 5676 5677
    case DECIMAL_RESULT:
    {
      my_decimal *dec= (my_decimal *)val;
      dec->fix_buffer_pointer();
      buf2[0]= (char)(dec->intg + dec->frac);
      buf2[1]= (char)dec->frac;
5678
      decimal2bin((decimal_t*)val, buf2+2, buf2[0], buf2[1]);
unknown's avatar
unknown committed
5679 5680 5681
      val_len= decimal_bin_size(buf2[0], buf2[1]) + 2;
      break;
    }
unknown's avatar
unknown committed
5682
    case STRING_RESULT:
5683
      pos= (uchar*) val;
unknown's avatar
unknown committed
5684
      break;
5685
    case ROW_RESULT:
unknown's avatar
unknown committed
5686
    default:
unknown's avatar
unknown committed
5687 5688 5689
      DBUG_ASSERT(1);
      return 0;
    }
unknown's avatar
unknown committed
5690 5691
    int4store(buf1 + 2 + UV_CHARSET_NUMBER_SIZE, val_len);
    buf1_length= 10;
unknown's avatar
unknown committed
5692
  }
5693 5694

  /* Length of the whole event */
5695
  event_length= sizeof(buf)+ name_len + buf1_length + val_len + unsigned_len;
5696 5697

  return (write_header(file, event_length) ||
5698 5699 5700
          my_b_safe_write(file, (uchar*) buf, sizeof(buf))   ||
	  my_b_safe_write(file, (uchar*) name, name_len)     ||
	  my_b_safe_write(file, (uchar*) buf1, buf1_length) ||
5701
	  my_b_safe_write(file, pos, val_len) ||
5702
          my_b_safe_write(file, &flags, unsigned_len));
unknown's avatar
unknown committed
5703
}
5704
#endif
unknown's avatar
unknown committed
5705

5706

unknown's avatar
unknown committed
5707
/*
unknown's avatar
unknown committed
5708
  User_var_log_event::print()
unknown's avatar
unknown committed
5709
*/
unknown's avatar
unknown committed
5710 5711

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5712
void User_var_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
5713
{
5714 5715 5716
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5717
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
5718
  {
5719 5720
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tUser_var\n");
unknown's avatar
unknown committed
5721 5722
  }

5723
  my_b_printf(&cache, "SET @`");
5724
  my_b_write(&cache, (uchar*) name, (uint) (name_len));
5725
  my_b_printf(&cache, "`");
unknown's avatar
unknown committed
5726 5727 5728

  if (is_null)
  {
unknown's avatar
unknown committed
5729
    my_b_printf(&cache, ":=NULL%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
5730 5731 5732 5733 5734 5735
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
5736
      char real_buf[FMT_G_BUFSIZE(14)];
unknown's avatar
unknown committed
5737
      float8get(real_val, val);
5738 5739
      my_sprintf(real_buf, (real_buf, "%.14g", real_val));
      my_b_printf(&cache, ":=%s%s\n", real_buf, print_event_info->delimiter);
unknown's avatar
unknown committed
5740 5741 5742
      break;
    case INT_RESULT:
      char int_buf[22];
5743 5744
      longlong10_to_str(uint8korr(val), int_buf, 
                        ((flags & User_var_log_event::UNSIGNED_F) ? 10 : -10));
unknown's avatar
unknown committed
5745
      my_b_printf(&cache, ":=%s%s\n", int_buf, print_event_info->delimiter);
unknown's avatar
unknown committed
5746
      break;
unknown's avatar
unknown committed
5747 5748 5749 5750 5751 5752
    case DECIMAL_RESULT:
    {
      char str_buf[200];
      int str_len= sizeof(str_buf) - 1;
      int precision= (int)val[0];
      int scale= (int)val[1];
5753 5754
      decimal_digit_t dec_buf[10];
      decimal_t dec;
unknown's avatar
unknown committed
5755 5756 5757
      dec.len= 10;
      dec.buf= dec_buf;

5758
      bin2decimal((uchar*) val+2, &dec, precision, scale);
unknown's avatar
unknown committed
5759 5760
      decimal2string(&dec, str_buf, &str_len, 0, 0, 0);
      str_buf[str_len]= 0;
unknown's avatar
unknown committed
5761
      my_b_printf(&cache, ":=%s%s\n", str_buf, print_event_info->delimiter);
unknown's avatar
unknown committed
5762 5763
      break;
    }
unknown's avatar
unknown committed
5764
    case STRING_RESULT:
5765
    {
5766 5767 5768 5769 5770 5771 5772 5773 5774 5775 5776 5777 5778 5779
      /*
        Let's express the string in hex. That's the most robust way. If we
        print it in character form instead, we need to escape it with
        character_set_client which we don't know (we will know it in 5.0, but
        in 4.1 we don't know it easily when we are printing
        User_var_log_event). Explanation why we would need to bother with
        character_set_client (quoting Bar):
        > Note, the parser doesn't switch to another unescaping mode after
        > it has met a character set introducer.
        > For example, if an SJIS client says something like:
        > SET @a= _ucs2 \0a\0b'
        > the string constant is still unescaped according to SJIS, not
        > according to UCS2.
      */
5780 5781 5782 5783
      char *hex_str;
      CHARSET_INFO *cs;

      if (!(hex_str= (char *)my_alloca(2*val_len+1+2))) // 2 hex digits / byte
5784
        break; // no error, as we are 'void'
5785
      str_to_hex(hex_str, val, val_len);
5786 5787 5788 5789 5790 5791 5792 5793 5794 5795 5796
      /*
        For proper behaviour when mysqlbinlog|mysql, we need to explicitely
        specify the variable's collation. It will however cause problems when
        people want to mysqlbinlog|mysql into another server not supporting the
        character set. But there's not much to do about this and it's unlikely.
      */
      if (!(cs= get_charset(charset_number, MYF(0))))
        /*
          Generate an unusable command (=> syntax error) is probably the best
          thing we can do here.
        */
unknown's avatar
unknown committed
5797
        my_b_printf(&cache, ":=???%s\n", print_event_info->delimiter);
5798
      else
unknown's avatar
unknown committed
5799 5800 5801
        my_b_printf(&cache, ":=_%s %s COLLATE `%s`%s\n",
                    cs->csname, hex_str, cs->name,
                    print_event_info->delimiter);
5802
      my_afree(hex_str);
5803
    }
unknown's avatar
unknown committed
5804
      break;
5805
    case ROW_RESULT:
unknown's avatar
unknown committed
5806
    default:
unknown's avatar
unknown committed
5807
      DBUG_ASSERT(1);
unknown's avatar
unknown committed
5808 5809 5810 5811
      return;
    }
  }
}
unknown's avatar
SCRUM  
unknown committed
5812
#endif
5813

unknown's avatar
unknown committed
5814

unknown's avatar
unknown committed
5815
/*
5816
  User_var_log_event::do_apply_event()
unknown's avatar
unknown committed
5817
*/
unknown's avatar
unknown committed
5818

unknown's avatar
unknown committed
5819
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5820
int User_var_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
5821 5822
{
  Item *it= 0;
5823 5824 5825
  CHARSET_INFO *charset;
  if (!(charset= get_charset(charset_number, MYF(MY_WME))))
    return 1;
unknown's avatar
unknown committed
5826 5827 5828
  LEX_STRING user_var_name;
  user_var_name.str= name;
  user_var_name.length= name_len;
5829 5830
  double real_val;
  longlong int_val;
unknown's avatar
unknown committed
5831

5832 5833 5834 5835
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5836
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5837

unknown's avatar
unknown committed
5838 5839 5840 5841 5842 5843 5844 5845 5846
  if (is_null)
  {
    it= new Item_null();
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      float8get(real_val, val);
5847
      it= new Item_float(real_val, 0);
5848
      val= (char*) &real_val;		// Pointer to value in native format
5849
      val_len= 8;
unknown's avatar
unknown committed
5850 5851
      break;
    case INT_RESULT:
5852 5853 5854
      int_val= (longlong) uint8korr(val);
      it= new Item_int(int_val);
      val= (char*) &int_val;		// Pointer to value in native format
5855
      val_len= 8;
unknown's avatar
unknown committed
5856
      break;
unknown's avatar
unknown committed
5857 5858
    case DECIMAL_RESULT:
    {
5859
      Item_decimal *dec= new Item_decimal((uchar*) val+2, val[0], val[1]);
unknown's avatar
unknown committed
5860 5861 5862 5863 5864
      it= dec;
      val= (char *)dec->val_decimal(NULL);
      val_len= sizeof(my_decimal);
      break;
    }
unknown's avatar
unknown committed
5865 5866 5867
    case STRING_RESULT:
      it= new Item_string(val, val_len, charset);
      break;
5868
    case ROW_RESULT:
unknown's avatar
unknown committed
5869
    default:
unknown's avatar
unknown committed
5870 5871 5872 5873 5874
      DBUG_ASSERT(1);
      return 0;
    }
  }
  Item_func_set_user_var e(user_var_name, it);
5875 5876 5877
  /*
    Item_func_set_user_var can't substitute something else on its place =>
    0 can be passed as last argument (reference on item)
5878 5879 5880 5881

    Fix_fields() can fail, in which case a call of update_hash() might
    crash the server, so if fix fields fails, we just return with an
    error.
5882
  */
5883 5884 5885
  if (e.fix_fields(thd, 0))
    return 1;

5886 5887 5888 5889 5890
  /*
    A variable can just be considered as a table with
    a single record and with a single column. Thus, like
    a column value, it could always have IMPLICIT derivation.
   */
5891 5892
  e.update_hash(val, val_len, type, charset, DERIVATION_IMPLICIT,
                (flags & User_var_log_event::UNSIGNED_F));
unknown's avatar
unknown committed
5893
  free_root(thd->mem_root,0);
unknown's avatar
unknown committed
5894

5895 5896 5897
  return 0;
}

5898
int User_var_log_event::do_update_pos(Relay_log_info *rli)
5899
{
5900
  rli->inc_event_relay_log_pos();
unknown's avatar
unknown committed
5901 5902
  return 0;
}
5903

5904
Log_event::enum_skip_reason
5905
User_var_log_event::do_shall_skip(Relay_log_info *rli)
5906 5907 5908 5909 5910 5911 5912 5913 5914
{
  /*
    It is a common error to set the slave skip counter to 1 instead
    of 2 when recovering from an insert which used a auto increment,
    rand, or user var.  Therefore, if the slave skip counter is 1, we
    just say that this event should be skipped by ignoring it, meaning
    that we do not change the value of the slave skip counter since it
    will be decreased by the following insert event.
  */
5915
  return continue_group(rli);
5916
}
unknown's avatar
unknown committed
5917
#endif /* !MYSQL_CLIENT */
5918 5919


unknown's avatar
unknown committed
5920
/**************************************************************************
5921
  Slave_log_event methods
unknown's avatar
unknown committed
5922
**************************************************************************/
unknown's avatar
unknown committed
5923

unknown's avatar
SCRUM  
unknown committed
5924
#ifdef HAVE_REPLICATION
5925
#ifdef MYSQL_CLIENT
5926
void Unknown_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info)
5927
{
5928 5929
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

unknown's avatar
unknown committed
5930
  if (print_event_info->short_form)
5931
    return;
5932 5933
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n# %s", "Unknown event\n");
5934 5935
}
#endif  
5936

5937
#ifndef MYSQL_CLIENT
5938
void Slave_log_event::pack_info(Protocol *protocol)
5939
{
unknown's avatar
unknown committed
5940
  char buf[256+HOSTNAME_LENGTH], *pos;
5941 5942 5943 5944 5945 5946 5947
  pos= strmov(buf, "host=");
  pos= strnmov(pos, master_host, HOSTNAME_LENGTH);
  pos= strmov(pos, ",port=");
  pos= int10_to_str((long) master_port, pos, 10);
  pos= strmov(pos, ",log=");
  pos= strmov(pos, master_log);
  pos= strmov(pos, ",pos=");
unknown's avatar
unknown committed
5948
  pos= longlong10_to_str(master_pos, pos, 10);
5949
  protocol->store(buf, pos-buf, &my_charset_bin);
5950
}
unknown's avatar
unknown committed
5951
#endif /* !MYSQL_CLIENT */
5952 5953 5954


#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
5955 5956 5957 5958
/**
  @todo
  re-write this better without holding both locks at the same time
*/
5959
Slave_log_event::Slave_log_event(THD* thd_arg,
5960
				 Relay_log_info* rli)
5961
  :Log_event(thd_arg, 0, 0) , mem_pool(0), master_host(0)
5962 5963 5964 5965
{
  DBUG_ENTER("Slave_log_event");
  if (!rli->inited)				// QQ When can this happen ?
    DBUG_VOID_RETURN;
5966

5967
  Master_info* mi = rli->mi;
5968
  // TODO: re-write this better without holding both locks at the same time
Marc Alff's avatar
Marc Alff committed
5969 5970
  mysql_mutex_lock(&mi->data_lock);
  mysql_mutex_lock(&rli->data_lock);
5971
  master_host_len = strlen(mi->host);
5972
  master_log_len = strlen(rli->group_master_log_name);
5973 5974 5975
  // on OOM, just do not initialize the structure and print the error
  if ((mem_pool = (char*)my_malloc(get_data_size() + 1,
				   MYF(MY_WME))))
5976
  {
5977 5978 5979
    master_host = mem_pool + SL_MASTER_HOST_OFFSET ;
    memcpy(master_host, mi->host, master_host_len + 1);
    master_log = master_host + master_host_len + 1;
5980
    memcpy(master_log, rli->group_master_log_name, master_log_len + 1);
5981
    master_port = mi->port;
5982
    master_pos = rli->group_master_log_pos;
unknown's avatar
unknown committed
5983
    DBUG_PRINT("info", ("master_log: %s  pos: %lu", master_log,
5984
			(ulong) master_pos));
5985
  }
5986 5987
  else
    sql_print_error("Out of memory while recording slave event");
Marc Alff's avatar
Marc Alff committed
5988 5989
  mysql_mutex_unlock(&rli->data_lock);
  mysql_mutex_unlock(&mi->data_lock);
5990 5991
  DBUG_VOID_RETURN;
}
unknown's avatar
unknown committed
5992
#endif /* !MYSQL_CLIENT */
5993 5994 5995 5996 5997 5998 5999 6000 6001


Slave_log_event::~Slave_log_event()
{
  my_free(mem_pool, MYF(MY_ALLOW_ZERO_PTR));
}


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
6002
void Slave_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
6003
{
6004 6005
  Write_on_release_cache cache(&print_event_info->head_cache, file);

6006
  char llbuff[22];
unknown's avatar
unknown committed
6007
  if (print_event_info->short_form)
6008
    return;
6009 6010
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n\
unknown's avatar
unknown committed
6011
Slave: master_host: '%s'  master_port: %d  master_log: '%s'  master_pos: %s\n",
6012 6013
	  master_host, master_port, master_log, llstr(master_pos, llbuff));
}
unknown's avatar
unknown committed
6014
#endif /* MYSQL_CLIENT */
6015 6016 6017 6018 6019 6020 6021 6022


int Slave_log_event::get_data_size()
{
  return master_host_len + master_log_len + 1 + SL_MASTER_HOST_OFFSET;
}


6023
#ifndef MYSQL_CLIENT
6024
bool Slave_log_event::write(IO_CACHE* file)
6025
{
6026
  ulong event_length= get_data_size();
6027 6028 6029
  int8store(mem_pool + SL_MASTER_POS_OFFSET, master_pos);
  int2store(mem_pool + SL_MASTER_PORT_OFFSET, master_port);
  // log and host are already there
6030 6031

  return (write_header(file, event_length) ||
6032
          my_b_safe_write(file, (uchar*) mem_pool, event_length));
6033
}
6034
#endif
6035 6036 6037 6038 6039 6040 6041


void Slave_log_event::init_from_mem_pool(int data_size)
{
  master_pos = uint8korr(mem_pool + SL_MASTER_POS_OFFSET);
  master_port = uint2korr(mem_pool + SL_MASTER_PORT_OFFSET);
  master_host = mem_pool + SL_MASTER_HOST_OFFSET;
6042
  master_host_len = (uint) strlen(master_host);
6043 6044 6045
  // safety
  master_log = master_host + master_host_len + 1;
  if (master_log > mem_pool + data_size)
6046
  {
6047 6048
    master_host = 0;
    return;
6049
  }
6050
  master_log_len = (uint) strlen(master_log);
6051
}
6052

6053

unknown's avatar
unknown committed
6054
/** This code is not used, so has not been updated to be format-tolerant. */
6055 6056
Slave_log_event::Slave_log_event(const char* buf, uint event_len)
  :Log_event(buf,0) /*unused event*/ ,mem_pool(0),master_host(0)
6057
{
6058
  if (event_len < LOG_EVENT_HEADER_LEN)
6059
    return;
6060
  event_len -= LOG_EVENT_HEADER_LEN;
6061 6062 6063 6064 6065
  if (!(mem_pool = (char*) my_malloc(event_len + 1, MYF(MY_WME))))
    return;
  memcpy(mem_pool, buf + LOG_EVENT_HEADER_LEN, event_len);
  mem_pool[event_len] = 0;
  init_from_mem_pool(event_len);
6066 6067
}

6068

6069
#ifndef MYSQL_CLIENT
6070
int Slave_log_event::do_apply_event(Relay_log_info const *rli)
6071 6072
{
  if (mysql_bin_log.is_open())
He Zhenxing's avatar
He Zhenxing committed
6073
    return mysql_bin_log.write(this);
6074
  return 0;
6075
}
unknown's avatar
unknown committed
6076
#endif /* !MYSQL_CLIENT */
6077 6078


unknown's avatar
unknown committed
6079
/**************************************************************************
unknown's avatar
unknown committed
6080
	Stop_log_event methods
unknown's avatar
unknown committed
6081
**************************************************************************/
6082

unknown's avatar
unknown committed
6083
/*
6084
  Stop_log_event::print()
6085
*/
6086 6087

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
6088
void Stop_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
6089
{
6090 6091 6092
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
6093
  if (print_event_info->short_form)
6094 6095
    return;

6096 6097
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tStop\n");
6098
}
unknown's avatar
unknown committed
6099
#endif /* MYSQL_CLIENT */
6100

6101

unknown's avatar
unknown committed
6102
#ifndef MYSQL_CLIENT
6103
/*
6104 6105 6106 6107 6108 6109 6110
  The master stopped.  We used to clean up all temporary tables but
  this is useless as, as the master has shut down properly, it has
  written all DROP TEMPORARY TABLE (prepared statements' deletion is
  TODO only when we binlog prep stmts).  We used to clean up
  slave_load_tmpdir, but this is useless as it has been cleared at the
  end of LOAD DATA INFILE.  So we have nothing to do here.  The place
  were we must do this cleaning is in
6111
  Start_log_event_v3::do_apply_event(), not here. Because if we come
6112
  here, the master was sane.
6113
*/
6114
int Stop_log_event::do_update_pos(Relay_log_info *rli)
6115
{
unknown's avatar
unknown committed
6116 6117
  /*
    We do not want to update master_log pos because we get a rotate event
6118
    before stop, so by now group_master_log_name is set to the next log.
6119
    If we updated it, we will have incorrect master coordinates and this
unknown's avatar
unknown committed
6120
    could give false triggers in MASTER_POS_WAIT() that we have reached
6121
    the target position when in fact we have not.
unknown's avatar
unknown committed
6122
  */
6123
  if (thd->variables.option_bits & OPTION_BEGIN)
6124 6125 6126 6127 6128 6129
    rli->inc_event_relay_log_pos();
  else
  {
    rli->inc_group_relay_log_pos(0);
    flush_relay_log_info(rli);
  }
6130 6131
  return 0;
}
6132

unknown's avatar
unknown committed
6133
#endif /* !MYSQL_CLIENT */
unknown's avatar
SCRUM  
unknown committed
6134
#endif /* HAVE_REPLICATION */
6135

6136

unknown's avatar
unknown committed
6137
/**************************************************************************
unknown's avatar
unknown committed
6138
	Create_file_log_event methods
unknown's avatar
unknown committed
6139
**************************************************************************/
6140 6141

/*
6142
  Create_file_log_event ctor
unknown's avatar
unknown committed
6143
*/
6144 6145

#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
6146 6147 6148 6149
Create_file_log_event::
Create_file_log_event(THD* thd_arg, sql_exchange* ex,
		      const char* db_arg, const char* table_name_arg,
		      List<Item>& fields_arg, enum enum_duplicates handle_dup,
6150
                      bool ignore,
unknown's avatar
unknown committed
6151
		      uchar* block_arg, uint block_len_arg, bool using_trans)
6152
  :Load_log_event(thd_arg,ex,db_arg,table_name_arg,fields_arg,handle_dup, ignore,
unknown's avatar
unknown committed
6153
		  using_trans),
6154
   fake_base(0), block(block_arg), event_buf(0), block_len(block_len_arg),
6155
   file_id(thd_arg->file_id = mysql_bin_log.next_file_id())
6156
{
unknown's avatar
unknown committed
6157
  DBUG_ENTER("Create_file_log_event");
6158
  sql_ex.force_new_format();
unknown's avatar
unknown committed
6159
  DBUG_VOID_RETURN;
6160
}
6161

6162

unknown's avatar
unknown committed
6163
/*
6164
  Create_file_log_event::write_data_body()
unknown's avatar
unknown committed
6165
*/
6166

6167
bool Create_file_log_event::write_data_body(IO_CACHE* file)
6168
{
6169 6170
  bool res;
  if ((res= Load_log_event::write_data_body(file)) || fake_base)
6171
    return res;
6172 6173
  return (my_b_safe_write(file, (uchar*) "", 1) ||
          my_b_safe_write(file, (uchar*) block, block_len));
6174 6175
}

6176

unknown's avatar
unknown committed
6177
/*
6178
  Create_file_log_event::write_data_header()
unknown's avatar
unknown committed
6179
*/
unknown's avatar
unknown committed
6180

6181
bool Create_file_log_event::write_data_header(IO_CACHE* file)
6182
{
6183
  bool res;
6184
  uchar buf[CREATE_FILE_HEADER_LEN];
6185 6186
  if ((res= Load_log_event::write_data_header(file)) || fake_base)
    return res;
6187
  int4store(buf + CF_FILE_ID_OFFSET, file_id);
6188
  return my_b_safe_write(file, buf, CREATE_FILE_HEADER_LEN) != 0;
6189 6190 6191
}


unknown's avatar
unknown committed
6192
/*
6193
  Create_file_log_event::write_base()
unknown's avatar
unknown committed
6194
*/
6195

6196
bool Create_file_log_event::write_base(IO_CACHE* file)
6197
{
6198 6199 6200 6201
  bool res;
  fake_base= 1;                                 // pretend we are Load event
  res= write(file);
  fake_base= 0;
6202 6203 6204
  return res;
}

6205
#endif /* !MYSQL_CLIENT */
6206

unknown's avatar
unknown committed
6207
/*
6208
  Create_file_log_event ctor
unknown's avatar
unknown committed
6209
*/
6210

6211 6212 6213
Create_file_log_event::Create_file_log_event(const char* buf, uint len,
                                             const Format_description_log_event* description_event)
  :Load_log_event(buf,0,description_event),fake_base(0),block(0),inited_from_old(0)
6214
{
6215 6216 6217 6218 6219
  DBUG_ENTER("Create_file_log_event::Create_file_log_event(char*,...)");
  uint block_offset;
  uint header_len= description_event->common_header_len;
  uint8 load_header_len= description_event->post_header_len[LOAD_EVENT-1];
  uint8 create_file_header_len= description_event->post_header_len[CREATE_FILE_EVENT-1];
6220
  if (!(event_buf= (char*) my_memdup(buf, len, MYF(MY_WME))) ||
6221 6222 6223 6224 6225 6226 6227
      copy_log_event(event_buf,len,
                     ((buf[EVENT_TYPE_OFFSET] == LOAD_EVENT) ?
                      load_header_len + header_len :
                      (fake_base ? (header_len+load_header_len) :
                       (header_len+load_header_len) +
                       create_file_header_len)),
                     description_event))
unknown's avatar
unknown committed
6228
    DBUG_VOID_RETURN;
6229
  if (description_event->binlog_version!=1)
6230
  {
6231 6232 6233 6234 6235 6236 6237 6238 6239 6240 6241 6242 6243 6244 6245 6246 6247
    file_id= uint4korr(buf + 
                       header_len +
		       load_header_len + CF_FILE_ID_OFFSET);
    /*
      Note that it's ok to use get_data_size() below, because it is computed
      with values we have already read from this event (because we called
      copy_log_event()); we are not using slave's format info to decode
      master's format, we are really using master's format info.
      Anyway, both formats should be identical (except the common_header_len)
      as these Load events are not changed between 4.0 and 5.0 (as logging of
      LOAD DATA INFILE does not use Load_log_event in 5.0).

      The + 1 is for \0 terminating fname  
    */
    block_offset= (description_event->common_header_len +
                   Load_log_event::get_data_size() +
                   create_file_header_len + 1);
6248
    if (len < block_offset)
6249
      DBUG_VOID_RETURN;
unknown's avatar
unknown committed
6250
    block = (uchar*)buf + block_offset;
6251 6252 6253 6254 6255 6256
    block_len = len - block_offset;
  }
  else
  {
    sql_ex.force_new_format();
    inited_from_old = 1;
6257
  }
unknown's avatar
unknown committed
6258
  DBUG_VOID_RETURN;
6259 6260
}

6261

unknown's avatar
unknown committed
6262
/*
6263
  Create_file_log_event::print()
unknown's avatar
unknown committed
6264
*/
6265 6266

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
6267
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
6268
				  bool enable_local)
unknown's avatar
unknown committed
6269
{
6270 6271
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6272
  if (print_event_info->short_form)
6273 6274
  {
    if (enable_local && check_fname_outside_temp_buf())
unknown's avatar
unknown committed
6275
      Load_log_event::print(file, print_event_info);
6276
    return;
6277 6278 6279 6280
  }

  if (enable_local)
  {
unknown's avatar
unknown committed
6281
    Load_log_event::print(file, print_event_info,
6282
			  !check_fname_outside_temp_buf());
unknown's avatar
unknown committed
6283 6284 6285 6286
    /* 
       That one is for "file_id: etc" below: in mysqlbinlog we want the #, in
       SHOW BINLOG EVENTS we don't.
    */
6287
    my_b_printf(&cache, "#"); 
6288 6289
  }

6290
  my_b_printf(&cache, " file_id: %d  block_len: %d\n", file_id, block_len);
unknown's avatar
unknown committed
6291
}
6292

unknown's avatar
unknown committed
6293

unknown's avatar
unknown committed
6294
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
6295
{
unknown's avatar
unknown committed
6296
  print(file, print_event_info, 0);
6297
}
unknown's avatar
unknown committed
6298
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
6299

6300

unknown's avatar
unknown committed
6301
/*
6302
  Create_file_log_event::pack_info()
unknown's avatar
unknown committed
6303
*/
6304

unknown's avatar
SCRUM  
unknown committed
6305
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6306
void Create_file_log_event::pack_info(Protocol *protocol)
6307
{
6308 6309 6310
  char buf[NAME_LEN*2 + 30 + 21*2], *pos;
  pos= strmov(buf, "db=");
  memcpy(pos, db, db_len);
unknown's avatar
unknown committed
6311
  pos= strmov(pos + db_len, ";table=");
6312
  memcpy(pos, table_name, table_name_len);
unknown's avatar
unknown committed
6313
  pos= strmov(pos + table_name_len, ";file_id=");
6314 6315 6316
  pos= int10_to_str((long) file_id, pos, 10);
  pos= strmov(pos, ";block_len=");
  pos= int10_to_str((long) block_len, pos, 10);
unknown's avatar
unknown committed
6317
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
6318
}
unknown's avatar
unknown committed
6319
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6320 6321


6322
/**
6323
  Create_file_log_event::do_apply_event()
6324 6325 6326 6327 6328 6329 6330
  Constructor for Create_file_log_event to intantiate an event
  from the relay log on the slave.

  @retval
    0           Success
  @retval
    1           Failure
unknown's avatar
unknown committed
6331
*/
6332

unknown's avatar
SCRUM  
unknown committed
6333
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6334
int Create_file_log_event::do_apply_event(Relay_log_info const *rli)
6335
{
unknown's avatar
unknown committed
6336 6337
  char proc_info[17+FN_REFLEN+10], *fname_buf;
  char *ext;
6338 6339 6340
  int fd = -1;
  IO_CACHE file;
  int error = 1;
unknown's avatar
unknown committed
6341

6342
  bzero((char*)&file, sizeof(file));
unknown's avatar
unknown committed
6343 6344
  fname_buf= strmov(proc_info, "Making temp file ");
  ext= slave_load_file_stem(fname_buf, file_id, server_id, ".info");
6345
  thd_proc_info(thd, proc_info);
Marc Alff's avatar
Marc Alff committed
6346 6347 6348 6349 6350 6351
  /* old copy may exist already */
  mysql_file_delete(key_file_log_event_info, fname_buf, MYF(0));
  if ((fd= mysql_file_create(key_file_log_event_info,
                             fname_buf, CREATE_MODE,
                             O_WRONLY | O_BINARY | O_EXCL | O_NOFOLLOW,
                             MYF(MY_WME))) < 0 ||
6352 6353 6354
      init_io_cache(&file, fd, IO_SIZE, WRITE_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
6355 6356 6357
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not open file '%s'",
                fname_buf);
6358 6359 6360 6361
    goto err;
  }
  
  // a trick to avoid allocating another buffer
unknown's avatar
unknown committed
6362 6363
  fname= fname_buf;
  fname_len= (uint) (strmov(ext, ".data") - fname);
6364 6365
  if (write_base(&file))
  {
unknown's avatar
unknown committed
6366
    strmov(ext, ".info"); // to have it right in the error message
6367 6368 6369
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not write to file '%s'",
                fname_buf);
6370 6371 6372
    goto err;
  }
  end_io_cache(&file);
Marc Alff's avatar
Marc Alff committed
6373
  mysql_file_close(fd, MYF(0));
6374 6375
  
  // fname_buf now already has .data, not .info, because we did our trick
Marc Alff's avatar
Marc Alff committed
6376 6377 6378 6379 6380 6381
  /* old copy may exist already */
  mysql_file_delete(key_file_log_event_data, fname_buf, MYF(0));
  if ((fd= mysql_file_create(key_file_log_event_data,
                             fname_buf, CREATE_MODE,
                             O_WRONLY | O_BINARY | O_EXCL | O_NOFOLLOW,
                             MYF(MY_WME))) < 0)
6382
  {
6383 6384 6385
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not open file '%s'",
                fname_buf);
6386 6387
    goto err;
  }
Marc Alff's avatar
Marc Alff committed
6388
  if (mysql_file_write(fd, (uchar*) block, block_len, MYF(MY_WME+MY_NABP)))
6389
  {
6390 6391 6392
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: write to '%s' failed",
                fname_buf);
6393 6394
    goto err;
  }
6395 6396
  error=0;					// Everything is ok

6397 6398 6399 6400
err:
  if (error)
    end_io_cache(&file);
  if (fd >= 0)
Marc Alff's avatar
Marc Alff committed
6401
    mysql_file_close(fd, MYF(0));
6402
  thd_proc_info(thd, 0);
6403
  return error != 0;
6404
}
unknown's avatar
unknown committed
6405
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6406

6407

unknown's avatar
unknown committed
6408
/**************************************************************************
unknown's avatar
unknown committed
6409
	Append_block_log_event methods
unknown's avatar
unknown committed
6410
**************************************************************************/
6411

unknown's avatar
unknown committed
6412
/*
6413
  Append_block_log_event ctor
unknown's avatar
unknown committed
6414
*/
6415 6416

#ifndef MYSQL_CLIENT  
6417 6418
Append_block_log_event::Append_block_log_event(THD *thd_arg,
                                               const char *db_arg,
unknown's avatar
unknown committed
6419
					       uchar *block_arg,
unknown's avatar
unknown committed
6420 6421 6422
					       uint block_len_arg,
					       bool using_trans)
  :Log_event(thd_arg,0, using_trans), block(block_arg),
unknown's avatar
unknown committed
6423
   block_len(block_len_arg), file_id(thd_arg->file_id), db(db_arg)
6424 6425
{
}
unknown's avatar
unknown committed
6426
#endif
6427 6428


unknown's avatar
unknown committed
6429
/*
6430
  Append_block_log_event ctor
unknown's avatar
unknown committed
6431
*/
6432

6433 6434 6435
Append_block_log_event::Append_block_log_event(const char* buf, uint len,
                                               const Format_description_log_event* description_event)
  :Log_event(buf, description_event),block(0)
6436
{
6437 6438 6439 6440 6441 6442
  DBUG_ENTER("Append_block_log_event::Append_block_log_event(char*,...)");
  uint8 common_header_len= description_event->common_header_len; 
  uint8 append_block_header_len=
    description_event->post_header_len[APPEND_BLOCK_EVENT-1];
  uint total_header_len= common_header_len+append_block_header_len;
  if (len < total_header_len)
unknown's avatar
unknown committed
6443
    DBUG_VOID_RETURN;
6444
  file_id= uint4korr(buf + common_header_len + AB_FILE_ID_OFFSET);
unknown's avatar
unknown committed
6445
  block= (uchar*)buf + total_header_len;
6446
  block_len= len - total_header_len;
unknown's avatar
unknown committed
6447
  DBUG_VOID_RETURN;
6448 6449 6450
}


unknown's avatar
unknown committed
6451
/*
6452
  Append_block_log_event::write()
unknown's avatar
unknown committed
6453
*/
6454

6455
#ifndef MYSQL_CLIENT
6456
bool Append_block_log_event::write(IO_CACHE* file)
6457
{
6458
  uchar buf[APPEND_BLOCK_HEADER_LEN];
6459
  int4store(buf + AB_FILE_ID_OFFSET, file_id);
6460 6461
  return (write_header(file, APPEND_BLOCK_HEADER_LEN + block_len) ||
          my_b_safe_write(file, buf, APPEND_BLOCK_HEADER_LEN) ||
6462
	  my_b_safe_write(file, (uchar*) block, block_len));
6463
}
6464
#endif
6465 6466


unknown's avatar
unknown committed
6467
/*
6468
  Append_block_log_event::print()
unknown's avatar
unknown committed
6469
*/
6470 6471

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6472
void Append_block_log_event::print(FILE* file,
unknown's avatar
unknown committed
6473
				   PRINT_EVENT_INFO* print_event_info)
6474
{
6475 6476
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6477
  if (print_event_info->short_form)
6478
    return;
6479 6480 6481
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#%s: file_id: %d  block_len: %d\n",
              get_type_str(), file_id, block_len);
6482
}
unknown's avatar
unknown committed
6483
#endif /* MYSQL_CLIENT */
6484 6485


unknown's avatar
unknown committed
6486
/*
6487
  Append_block_log_event::pack_info()
unknown's avatar
unknown committed
6488
*/
6489

unknown's avatar
SCRUM  
unknown committed
6490
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6491
void Append_block_log_event::pack_info(Protocol *protocol)
6492 6493 6494 6495 6496 6497
{
  char buf[256];
  uint length;
  length= (uint) my_sprintf(buf,
			    (buf, ";file_id=%u;block_len=%u", file_id,
			     block_len));
unknown's avatar
unknown committed
6498
  protocol->store(buf, length, &my_charset_bin);
6499 6500 6501
}


unknown's avatar
unknown committed
6502
/*
6503
  Append_block_log_event::get_create_or_append()
unknown's avatar
unknown committed
6504 6505
*/

6506
int Append_block_log_event::get_create_or_append() const
unknown's avatar
unknown committed
6507
{
6508
  return 0; /* append to the file, fail if not exists */
unknown's avatar
unknown committed
6509 6510
}

unknown's avatar
unknown committed
6511
/*
6512
  Append_block_log_event::do_apply_event()
unknown's avatar
unknown committed
6513
*/
6514

6515
int Append_block_log_event::do_apply_event(Relay_log_info const *rli)
6516
{
6517
  char proc_info[17+FN_REFLEN+10], *fname= proc_info+17;
6518
  int fd;
6519
  int error = 1;
6520
  DBUG_ENTER("Append_block_log_event::do_apply_event");
6521

unknown's avatar
unknown committed
6522 6523
  fname= strmov(proc_info, "Making temp file ");
  slave_load_file_stem(fname, file_id, server_id, ".data");
6524
  thd_proc_info(thd, proc_info);
6525 6526
  if (get_create_or_append())
  {
6527 6528 6529 6530 6531 6532
    /*
      Usually lex_start() is called by mysql_parse(), but we need it here
      as the present method does not call mysql_parse().
    */
    lex_start(thd);
    mysql_reset_thd_for_next_command(thd);
Marc Alff's avatar
Marc Alff committed
6533 6534 6535 6536 6537 6538
    /* old copy may exist already */
    mysql_file_delete(key_file_log_event_data, fname, MYF(0));
    if ((fd= mysql_file_create(key_file_log_event_data,
                               fname, CREATE_MODE,
                               O_WRONLY | O_BINARY | O_EXCL | O_NOFOLLOW,
                               MYF(MY_WME))) < 0)
6539
    {
6540 6541 6542
      rli->report(ERROR_LEVEL, my_errno,
                  "Error in %s event: could not create file '%s'",
                  get_type_str(), fname);
6543 6544 6545
      goto err;
    }
  }
Marc Alff's avatar
Marc Alff committed
6546 6547 6548 6549
  else if ((fd= mysql_file_open(key_file_log_event_data,
                                fname,
                                O_WRONLY | O_APPEND | O_BINARY | O_NOFOLLOW,
                                MYF(MY_WME))) < 0)
6550
  {
6551 6552 6553
    rli->report(ERROR_LEVEL, my_errno,
                "Error in %s event: could not open file '%s'",
                get_type_str(), fname);
6554 6555
    goto err;
  }
6556

Marc Alff's avatar
Marc Alff committed
6557 6558
  DBUG_EXECUTE_IF("remove_slave_load_file_before_write",
                  {
6559
                    my_delete_allow_opened(fname, MYF(0));
Marc Alff's avatar
Marc Alff committed
6560
                  });
6561

Marc Alff's avatar
Marc Alff committed
6562
  if (mysql_file_write(fd, (uchar*) block, block_len, MYF(MY_WME+MY_NABP)))
6563
  {
6564 6565 6566
    rli->report(ERROR_LEVEL, my_errno,
                "Error in %s event: write to '%s' failed",
                get_type_str(), fname);
6567 6568 6569
    goto err;
  }
  error=0;
6570

6571 6572
err:
  if (fd >= 0)
Marc Alff's avatar
Marc Alff committed
6573
    mysql_file_close(fd, MYF(0));
6574
  thd_proc_info(thd, 0);
6575
  DBUG_RETURN(error);
6576
}
unknown's avatar
SCRUM  
unknown committed
6577
#endif
6578 6579


unknown's avatar
unknown committed
6580
/**************************************************************************
unknown's avatar
unknown committed
6581
	Delete_file_log_event methods
unknown's avatar
unknown committed
6582
**************************************************************************/
6583

unknown's avatar
unknown committed
6584
/*
6585
  Delete_file_log_event ctor
unknown's avatar
unknown committed
6586
*/
6587 6588

#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
6589 6590 6591
Delete_file_log_event::Delete_file_log_event(THD *thd_arg, const char* db_arg,
					     bool using_trans)
  :Log_event(thd_arg, 0, using_trans), file_id(thd_arg->file_id), db(db_arg)
6592 6593
{
}
unknown's avatar
unknown committed
6594
#endif
6595

unknown's avatar
unknown committed
6596
/*
6597
  Delete_file_log_event ctor
unknown's avatar
unknown committed
6598
*/
6599

6600 6601 6602
Delete_file_log_event::Delete_file_log_event(const char* buf, uint len,
                                             const Format_description_log_event* description_event)
  :Log_event(buf, description_event),file_id(0)
6603
{
6604 6605 6606
  uint8 common_header_len= description_event->common_header_len;
  uint8 delete_file_header_len= description_event->post_header_len[DELETE_FILE_EVENT-1];
  if (len < (uint)(common_header_len + delete_file_header_len))
6607
    return;
6608
  file_id= uint4korr(buf + common_header_len + DF_FILE_ID_OFFSET);
6609 6610 6611
}


unknown's avatar
unknown committed
6612
/*
6613
  Delete_file_log_event::write()
unknown's avatar
unknown committed
6614
*/
6615

6616
#ifndef MYSQL_CLIENT
6617
bool Delete_file_log_event::write(IO_CACHE* file)
6618
{
6619
 uchar buf[DELETE_FILE_HEADER_LEN];
6620
 int4store(buf + DF_FILE_ID_OFFSET, file_id);
6621 6622
 return (write_header(file, sizeof(buf)) ||
         my_b_safe_write(file, buf, sizeof(buf)));
6623
}
6624
#endif
6625 6626


unknown's avatar
unknown committed
6627
/*
6628
  Delete_file_log_event::print()
unknown's avatar
unknown committed
6629
*/
6630 6631

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6632
void Delete_file_log_event::print(FILE* file,
unknown's avatar
unknown committed
6633
				  PRINT_EVENT_INFO* print_event_info)
6634
{
6635 6636
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6637
  if (print_event_info->short_form)
6638
    return;
6639 6640
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Delete_file: file_id=%u\n", file_id);
6641
}
unknown's avatar
unknown committed
6642
#endif /* MYSQL_CLIENT */
6643

unknown's avatar
unknown committed
6644
/*
6645
  Delete_file_log_event::pack_info()
unknown's avatar
unknown committed
6646
*/
6647

unknown's avatar
SCRUM  
unknown committed
6648
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6649
void Delete_file_log_event::pack_info(Protocol *protocol)
6650 6651 6652 6653
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
6654
  protocol->store(buf, (int32) length, &my_charset_bin);
6655
}
unknown's avatar
SCRUM  
unknown committed
6656
#endif
6657

unknown's avatar
unknown committed
6658
/*
6659
  Delete_file_log_event::do_apply_event()
unknown's avatar
unknown committed
6660
*/
6661

unknown's avatar
SCRUM  
unknown committed
6662
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6663
int Delete_file_log_event::do_apply_event(Relay_log_info const *rli)
6664 6665
{
  char fname[FN_REFLEN+10];
unknown's avatar
unknown committed
6666
  char *ext= slave_load_file_stem(fname, file_id, server_id, ".data");
Marc Alff's avatar
Marc Alff committed
6667
  mysql_file_delete(key_file_log_event_data, fname, MYF(MY_WME));
unknown's avatar
unknown committed
6668
  strmov(ext, ".info");
Marc Alff's avatar
Marc Alff committed
6669
  mysql_file_delete(key_file_log_event_info, fname, MYF(MY_WME));
6670
  return 0;
6671
}
unknown's avatar
unknown committed
6672
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6673 6674


unknown's avatar
unknown committed
6675
/**************************************************************************
unknown's avatar
unknown committed
6676
	Execute_load_log_event methods
unknown's avatar
unknown committed
6677
**************************************************************************/
6678

unknown's avatar
unknown committed
6679
/*
6680
  Execute_load_log_event ctor
unknown's avatar
unknown committed
6681
*/
6682 6683

#ifndef MYSQL_CLIENT  
6684 6685
Execute_load_log_event::Execute_load_log_event(THD *thd_arg,
                                               const char* db_arg,
unknown's avatar
unknown committed
6686 6687
					       bool using_trans)
  :Log_event(thd_arg, 0, using_trans), file_id(thd_arg->file_id), db(db_arg)
6688 6689
{
}
unknown's avatar
unknown committed
6690
#endif
6691 6692
  

unknown's avatar
unknown committed
6693
/*
6694
  Execute_load_log_event ctor
unknown's avatar
unknown committed
6695
*/
6696

6697 6698 6699
Execute_load_log_event::Execute_load_log_event(const char* buf, uint len,
                                               const Format_description_log_event* description_event)
  :Log_event(buf, description_event), file_id(0)
6700
{
6701 6702 6703
  uint8 common_header_len= description_event->common_header_len;
  uint8 exec_load_header_len= description_event->post_header_len[EXEC_LOAD_EVENT-1];
  if (len < (uint)(common_header_len+exec_load_header_len))
6704
    return;
6705
  file_id= uint4korr(buf + common_header_len + EL_FILE_ID_OFFSET);
6706 6707 6708
}


unknown's avatar
unknown committed
6709
/*
6710
  Execute_load_log_event::write()
unknown's avatar
unknown committed
6711
*/
6712

6713
#ifndef MYSQL_CLIENT
6714
bool Execute_load_log_event::write(IO_CACHE* file)
6715
{
6716
  uchar buf[EXEC_LOAD_HEADER_LEN];
6717
  int4store(buf + EL_FILE_ID_OFFSET, file_id);
6718 6719
  return (write_header(file, sizeof(buf)) || 
          my_b_safe_write(file, buf, sizeof(buf)));
6720
}
6721
#endif
6722 6723


unknown's avatar
unknown committed
6724
/*
6725
  Execute_load_log_event::print()
unknown's avatar
unknown committed
6726
*/
6727 6728

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6729
void Execute_load_log_event::print(FILE* file,
unknown's avatar
unknown committed
6730
				   PRINT_EVENT_INFO* print_event_info)
6731
{
6732 6733
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6734
  if (print_event_info->short_form)
6735
    return;
6736 6737 6738
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Exec_load: file_id=%d\n",
              file_id);
6739
}
unknown's avatar
unknown committed
6740
#endif
6741

unknown's avatar
unknown committed
6742
/*
6743
  Execute_load_log_event::pack_info()
unknown's avatar
unknown committed
6744
*/
6745

unknown's avatar
SCRUM  
unknown committed
6746
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6747
void Execute_load_log_event::pack_info(Protocol *protocol)
6748 6749 6750 6751
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
6752
  protocol->store(buf, (int32) length, &my_charset_bin);
6753 6754 6755
}


unknown's avatar
unknown committed
6756
/*
6757
  Execute_load_log_event::do_apply_event()
unknown's avatar
unknown committed
6758
*/
unknown's avatar
SCRUM  
unknown committed
6759

6760
int Execute_load_log_event::do_apply_event(Relay_log_info const *rli)
6761 6762
{
  char fname[FN_REFLEN+10];
unknown's avatar
unknown committed
6763
  char *ext;
6764
  int fd;
unknown's avatar
unknown committed
6765
  int error= 1;
6766
  IO_CACHE file;
unknown's avatar
unknown committed
6767
  Load_log_event *lev= 0;
6768

unknown's avatar
unknown committed
6769
  ext= slave_load_file_stem(fname, file_id, server_id, ".info");
Marc Alff's avatar
Marc Alff committed
6770 6771 6772
  if ((fd= mysql_file_open(key_file_log_event_info,
                           fname, O_RDONLY | O_BINARY | O_NOFOLLOW,
                           MYF(MY_WME))) < 0 ||
6773 6774 6775
      init_io_cache(&file, fd, IO_SIZE, READ_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
6776 6777 6778
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Exec_load event: could not open file '%s'",
                fname);
6779 6780
    goto err;
  }
6781
  if (!(lev = (Load_log_event*)Log_event::read_log_event(&file,
Marc Alff's avatar
Marc Alff committed
6782
                                                         (mysql_mutex_t*)0,
6783
                                                         rli->relay_log.description_event_for_exec)) ||
6784
      lev->get_type_code() != NEW_LOAD_EVENT)
6785
  {
6786
    rli->report(ERROR_LEVEL, 0, "Error in Exec_load event: "
6787
                    "file '%s' appears corrupted", fname);
6788 6789
    goto err;
  }
unknown's avatar
unknown committed
6790

6791
  lev->thd = thd;
6792
  /*
6793
    lev->do_apply_event should use rli only for errors i.e. should
6794 6795
    not advance rli's position.

6796
    lev->do_apply_event is the place where the table is loaded (it
6797
    calls mysql_load()).
6798
  */
unknown's avatar
unknown committed
6799

6800
  const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
6801
  if (lev->do_apply_event(0,rli,1)) 
6802
  {
6803 6804 6805 6806 6807 6808 6809 6810
    /*
      We want to indicate the name of the file that could not be loaded
      (SQL_LOADxxx).
      But as we are here we are sure the error is in rli->last_slave_error and
      rli->last_slave_errno (example of error: duplicate entry for key), so we
      don't want to overwrite it with the filename.
      What we want instead is add the filename to the current error message.
    */
6811
    char *tmp= my_strdup(rli->last_error().message, MYF(MY_WME));
6812 6813
    if (tmp)
    {
6814
      rli->report(ERROR_LEVEL, rli->last_error().number,
6815
                  "%s. Failed executing load from '%s'", tmp, fname);
6816 6817
      my_free(tmp,MYF(0));
    }
6818 6819
    goto err;
  }
unknown's avatar
unknown committed
6820 6821
  /*
    We have an open file descriptor to the .info file; we need to close it
Marc Alff's avatar
Marc Alff committed
6822
    or Windows will refuse to delete the file in mysql_file_delete().
unknown's avatar
unknown committed
6823 6824 6825
  */
  if (fd >= 0)
  {
Marc Alff's avatar
Marc Alff committed
6826
    mysql_file_close(fd, MYF(0));
unknown's avatar
unknown committed
6827 6828 6829
    end_io_cache(&file);
    fd= -1;
  }
Marc Alff's avatar
Marc Alff committed
6830
  mysql_file_delete(key_file_log_event_info, fname, MYF(MY_WME));
unknown's avatar
unknown committed
6831
  memcpy(ext, ".data", 6);
Marc Alff's avatar
Marc Alff committed
6832
  mysql_file_delete(key_file_log_event_data, fname, MYF(MY_WME));
6833
  error = 0;
6834

6835 6836 6837
err:
  delete lev;
  if (fd >= 0)
6838
  {
Marc Alff's avatar
Marc Alff committed
6839
    mysql_file_close(fd, MYF(0));
6840 6841
    end_io_cache(&file);
  }
6842
  return error;
6843
}
unknown's avatar
SCRUM  
unknown committed
6844

unknown's avatar
unknown committed
6845
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6846 6847


unknown's avatar
unknown committed
6848 6849 6850 6851 6852 6853
/**************************************************************************
	Begin_load_query_log_event methods
**************************************************************************/

#ifndef MYSQL_CLIENT
Begin_load_query_log_event::
unknown's avatar
unknown committed
6854
Begin_load_query_log_event(THD* thd_arg, const char* db_arg, uchar* block_arg,
unknown's avatar
unknown committed
6855 6856 6857 6858 6859 6860 6861 6862 6863 6864 6865 6866 6867 6868 6869 6870 6871 6872
                           uint block_len_arg, bool using_trans)
  :Append_block_log_event(thd_arg, db_arg, block_arg, block_len_arg,
                          using_trans)
{
   file_id= thd_arg->file_id= mysql_bin_log.next_file_id();
}
#endif


Begin_load_query_log_event::
Begin_load_query_log_event(const char* buf, uint len,
                           const Format_description_log_event* desc_event)
  :Append_block_log_event(buf, len, desc_event)
{
}


#if defined( HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6873
int Begin_load_query_log_event::get_create_or_append() const
unknown's avatar
unknown committed
6874
{
6875
  return 1; /* create the file */
unknown's avatar
unknown committed
6876 6877 6878 6879
}
#endif /* defined( HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */


6880 6881 6882 6883 6884 6885 6886 6887 6888 6889 6890 6891 6892
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
Log_event::enum_skip_reason
Begin_load_query_log_event::do_shall_skip(Relay_log_info *rli)
{
  /*
    If the slave skip counter is 1, then we should not start executing
    on the next event.
  */
  return continue_group(rli);
}
#endif


unknown's avatar
unknown committed
6893 6894 6895 6896 6897 6898 6899
/**************************************************************************
	Execute_load_query_log_event methods
**************************************************************************/


#ifndef MYSQL_CLIENT
Execute_load_query_log_event::
6900
Execute_load_query_log_event(THD *thd_arg, const char* query_arg,
6901 6902 6903
                             ulong query_length_arg, uint fn_pos_start_arg,
                             uint fn_pos_end_arg,
                             enum_load_dup_handling dup_handling_arg,
6904
                             bool using_trans, bool direct, bool suppress_use,
6905
                             int errcode):
6906
  Query_log_event(thd_arg, query_arg, query_length_arg, using_trans, direct,
6907
                  suppress_use, errcode),
unknown's avatar
unknown committed
6908 6909 6910 6911 6912 6913 6914 6915 6916 6917 6918 6919 6920 6921 6922 6923 6924 6925 6926 6927 6928 6929 6930 6931 6932 6933 6934 6935 6936 6937 6938 6939 6940 6941 6942 6943
  file_id(thd_arg->file_id), fn_pos_start(fn_pos_start_arg),
  fn_pos_end(fn_pos_end_arg), dup_handling(dup_handling_arg)
{
}
#endif /* !MYSQL_CLIENT */


Execute_load_query_log_event::
Execute_load_query_log_event(const char* buf, uint event_len,
                             const Format_description_log_event* desc_event):
  Query_log_event(buf, event_len, desc_event, EXECUTE_LOAD_QUERY_EVENT),
  file_id(0), fn_pos_start(0), fn_pos_end(0)
{
  if (!Query_log_event::is_valid())
    return;

  buf+= desc_event->common_header_len;

  fn_pos_start= uint4korr(buf + ELQ_FN_POS_START_OFFSET);
  fn_pos_end= uint4korr(buf + ELQ_FN_POS_END_OFFSET);
  dup_handling= (enum_load_dup_handling)(*(buf + ELQ_DUP_HANDLING_OFFSET));

  if (fn_pos_start > q_len || fn_pos_end > q_len ||
      dup_handling > LOAD_DUP_REPLACE)
    return;

  file_id= uint4korr(buf + ELQ_FILE_ID_OFFSET);
}


ulong Execute_load_query_log_event::get_post_header_size_for_derived()
{
  return EXECUTE_LOAD_QUERY_EXTRA_HEADER_LEN;
}


6944
#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
6945 6946 6947
bool
Execute_load_query_log_event::write_post_header_for_derived(IO_CACHE* file)
{
6948
  uchar buf[EXECUTE_LOAD_QUERY_EXTRA_HEADER_LEN];
unknown's avatar
unknown committed
6949 6950 6951
  int4store(buf, file_id);
  int4store(buf + 4, fn_pos_start);
  int4store(buf + 4 + 4, fn_pos_end);
6952 6953
  *(buf + 4 + 4 + 4)= (uchar) dup_handling;
  return my_b_safe_write(file, buf, EXECUTE_LOAD_QUERY_EXTRA_HEADER_LEN);
unknown's avatar
unknown committed
6954
}
6955
#endif
unknown's avatar
unknown committed
6956 6957 6958


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
6959
void Execute_load_query_log_event::print(FILE* file,
unknown's avatar
unknown committed
6960
                                         PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
6961
{
unknown's avatar
unknown committed
6962
  print(file, print_event_info, 0);
unknown's avatar
unknown committed
6963 6964
}

unknown's avatar
unknown committed
6965 6966 6967
/**
  Prints the query as LOAD DATA LOCAL and with rewritten filename.
*/
unknown's avatar
unknown committed
6968
void Execute_load_query_log_event::print(FILE* file,
unknown's avatar
unknown committed
6969
                                         PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
6970 6971
                                         const char *local_fname)
{
6972 6973 6974
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
unknown's avatar
unknown committed
6975 6976 6977

  if (local_fname)
  {
6978
    my_b_write(&cache, (uchar*) query, fn_pos_start);
6979
    my_b_printf(&cache, " LOCAL INFILE \'");
Staale Smedseng's avatar
Staale Smedseng committed
6980
    my_b_printf(&cache, "%s", local_fname);
6981
    my_b_printf(&cache, "\'");
unknown's avatar
unknown committed
6982
    if (dup_handling == LOAD_DUP_REPLACE)
6983
      my_b_printf(&cache, " REPLACE");
6984
    my_b_printf(&cache, " INTO");
6985
    my_b_write(&cache, (uchar*) query + fn_pos_end, q_len-fn_pos_end);
6986
    my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
6987 6988 6989
  }
  else
  {
6990
    my_b_write(&cache, (uchar*) query, q_len);
6991
    my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
6992 6993
  }

unknown's avatar
unknown committed
6994
  if (!print_event_info->short_form)
6995
    my_b_printf(&cache, "# file_id: %d \n", file_id);
unknown's avatar
unknown committed
6996 6997 6998 6999 7000 7001 7002 7003
}
#endif


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Execute_load_query_log_event::pack_info(Protocol *protocol)
{
  char *buf, *pos;
7004
  if (!(buf= (char*) my_malloc(9 + db_len + q_len + 10 + 21, MYF(MY_WME))))
unknown's avatar
unknown committed
7005 7006 7007 7008 7009 7010 7011 7012 7013 7014 7015 7016 7017 7018 7019 7020 7021 7022 7023 7024 7025
    return;
  pos= buf;
  if (db && db_len)
  {
    pos= strmov(buf, "use `");
    memcpy(pos, db, db_len);
    pos= strmov(pos+db_len, "`; ");
  }
  if (query && q_len)
  {
    memcpy(pos, query, q_len);
    pos+= q_len;
  }
  pos= strmov(pos, " ;file_id=");
  pos= int10_to_str((long) file_id, pos, 10);
  protocol->store(buf, pos-buf, &my_charset_bin);
  my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
}


int
7026
Execute_load_query_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
7027 7028 7029 7030 7031 7032 7033
{
  char *p;
  char *buf;
  char *fname;
  char *fname_end;
  int error;

7034 7035
  buf= (char*) my_malloc(q_len + 1 - (fn_pos_end - fn_pos_start) +
                         (FN_REFLEN + 10) + 10 + 8 + 5, MYF(MY_WME));
7036

unknown's avatar
unknown committed
7037
  DBUG_EXECUTE_IF("LOAD_DATA_INFILE_has_fatal_error", my_free(buf, MYF(0)); buf= NULL;);
7038

unknown's avatar
unknown committed
7039
  /* Replace filename and LOCAL keyword in query before executing it */
7040
  if (buf == NULL)
unknown's avatar
unknown committed
7041
  {
7042 7043
    rli->report(ERROR_LEVEL, ER_SLAVE_FATAL_ERROR,
                ER(ER_SLAVE_FATAL_ERROR), "Not enough memory");
unknown's avatar
unknown committed
7044 7045 7046 7047 7048 7049
    return 1;
  }

  p= buf;
  memcpy(p, query, fn_pos_start);
  p+= fn_pos_start;
7050
  fname= (p= strmake(p, STRING_WITH_LEN(" INFILE \'")));
unknown's avatar
unknown committed
7051 7052
  p= slave_load_file_stem(p, file_id, server_id, ".data");
  fname_end= p= strend(p);                      // Safer than p=p+5
unknown's avatar
unknown committed
7053
  *(p++)='\'';
unknown's avatar
unknown committed
7054
  switch (dup_handling) {
unknown's avatar
unknown committed
7055
  case LOAD_DUP_IGNORE:
7056
    p= strmake(p, STRING_WITH_LEN(" IGNORE"));
unknown's avatar
unknown committed
7057 7058
    break;
  case LOAD_DUP_REPLACE:
7059
    p= strmake(p, STRING_WITH_LEN(" REPLACE"));
unknown's avatar
unknown committed
7060 7061 7062 7063 7064
    break;
  default:
    /* Ordinary load data */
    break;
  }
7065
  p= strmake(p, STRING_WITH_LEN(" INTO "));
unknown's avatar
unknown committed
7066 7067
  p= strmake(p, query+fn_pos_end, q_len-fn_pos_end);

7068
  error= Query_log_event::do_apply_event(rli, buf, p-buf);
unknown's avatar
unknown committed
7069 7070 7071 7072

  /* Forging file name for deletion in same buffer */
  *fname_end= 0;

7073 7074 7075 7076 7077
  /*
    If there was an error the slave is going to stop, leave the
    file so that we can re-execute this event at START SLAVE.
  */
  if (!error)
Marc Alff's avatar
Marc Alff committed
7078
    mysql_file_delete(key_file_log_event_data, fname, MYF(MY_WME));
unknown's avatar
unknown committed
7079 7080 7081 7082 7083 7084 7085

  my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
  return error;
}
#endif


unknown's avatar
unknown committed
7086
/**************************************************************************
unknown's avatar
unknown committed
7087
	sql_ex_info methods
unknown's avatar
unknown committed
7088
**************************************************************************/
7089

unknown's avatar
unknown committed
7090
/*
7091
  sql_ex_info::write_data()
unknown's avatar
unknown committed
7092
*/
7093

7094
bool sql_ex_info::write_data(IO_CACHE* file)
7095 7096 7097
{
  if (new_format())
  {
7098 7099 7100 7101 7102
    return (write_str(file, field_term, (uint) field_term_len) ||
	    write_str(file, enclosed,   (uint) enclosed_len) ||
	    write_str(file, line_term,  (uint) line_term_len) ||
	    write_str(file, line_start, (uint) line_start_len) ||
	    write_str(file, escaped,    (uint) escaped_len) ||
7103
	    my_b_safe_write(file,(uchar*) &opt_flags,1));
7104 7105 7106
  }
  else
  {
7107 7108 7109 7110
    /**
      @todo This is sensitive to field padding. We should write a
      char[7], not an old_sql_ex. /sven
    */
7111 7112 7113 7114 7115 7116 7117 7118
    old_sql_ex old_ex;
    old_ex.field_term= *field_term;
    old_ex.enclosed=   *enclosed;
    old_ex.line_term=  *line_term;
    old_ex.line_start= *line_start;
    old_ex.escaped=    *escaped;
    old_ex.opt_flags=  opt_flags;
    old_ex.empty_flags=empty_flags;
7119
    return my_b_safe_write(file, (uchar*) &old_ex, sizeof(old_ex)) != 0;
7120 7121 7122 7123
  }
}


unknown's avatar
unknown committed
7124
/*
7125
  sql_ex_info::init()
unknown's avatar
unknown committed
7126
*/
7127

7128 7129
const char *sql_ex_info::init(const char *buf, const char *buf_end,
                              bool use_new_format)
7130 7131 7132 7133 7134 7135 7136 7137 7138 7139 7140 7141
{
  cached_new_format = use_new_format;
  if (use_new_format)
  {
    empty_flags=0;
    /*
      The code below assumes that buf will not disappear from
      under our feet during the lifetime of the event. This assumption
      holds true in the slave thread if the log is in new format, but is not
      the case when we have old format because we will be reusing net buffer
      to read the actual file before we write out the Create_file event.
    */
7142 7143 7144 7145 7146
    if (read_str(&buf, buf_end, &field_term, &field_term_len) ||
        read_str(&buf, buf_end, &enclosed,   &enclosed_len) ||
        read_str(&buf, buf_end, &line_term,  &line_term_len) ||
        read_str(&buf, buf_end, &line_start, &line_start_len) ||
        read_str(&buf, buf_end, &escaped,    &escaped_len))
7147 7148 7149 7150 7151 7152 7153 7154 7155 7156 7157 7158 7159 7160 7161 7162 7163 7164 7165 7166 7167 7168 7169 7170 7171 7172
      return 0;
    opt_flags = *buf++;
  }
  else
  {
    field_term_len= enclosed_len= line_term_len= line_start_len= escaped_len=1;
    field_term = buf++;			// Use first byte in string
    enclosed=	 buf++;
    line_term=   buf++;
    line_start=  buf++;
    escaped=     buf++;
    opt_flags =  *buf++;
    empty_flags= *buf++;
    if (empty_flags & FIELD_TERM_EMPTY)
      field_term_len=0;
    if (empty_flags & ENCLOSED_EMPTY)
      enclosed_len=0;
    if (empty_flags & LINE_TERM_EMPTY)
      line_term_len=0;
    if (empty_flags & LINE_START_EMPTY)
      line_start_len=0;
    if (empty_flags & ESCAPED_EMPTY)
      escaped_len=0;
  }
  return buf;
}
7173 7174 7175 7176 7177 7178 7179 7180 7181 7182


/**************************************************************************
	Rows_log_event member functions
**************************************************************************/

#ifndef MYSQL_CLIENT
Rows_log_event::Rows_log_event(THD *thd_arg, TABLE *tbl_arg, ulong tid,
                               MY_BITMAP const *cols, bool is_transactional)
  : Log_event(thd_arg, 0, is_transactional),
7183
    m_row_count(0),
7184 7185
    m_table(tbl_arg),
    m_table_id(tid),
7186
    m_width(tbl_arg ? tbl_arg->s->fields : 1),
7187 7188
    m_rows_buf(0), m_rows_cur(0), m_rows_end(0), m_flags(0) 
#ifdef HAVE_REPLICATION
7189
    , m_curr_row(NULL), m_curr_row_end(NULL), m_key(NULL)
7190
#endif
7191
{
7192 7193
  /*
    We allow a special form of dummy event when the table, and cols
7194
    are null and the table id is ~0UL.  This is a temporary
7195
    solution, to be able to terminate a started statement in the
7196
    binary log: the extraneous events will be removed in the future.
7197
   */
7198 7199
  DBUG_ASSERT((tbl_arg && tbl_arg->s && tid != ~0UL) ||
              (!tbl_arg && !cols && tid == ~0UL));
7200

7201
  if (thd_arg->variables.option_bits & OPTION_NO_FOREIGN_KEY_CHECKS)
7202
      set_flags(NO_FOREIGN_KEY_CHECKS_F);
7203
  if (thd_arg->variables.option_bits & OPTION_RELAXED_UNIQUE_CHECKS)
7204
      set_flags(RELAXED_UNIQUE_CHECKS_F);
7205
  /* if bitmap_init fails, caught in is_valid() */
7206 7207
  if (likely(!bitmap_init(&m_cols,
                          m_width <= sizeof(m_bitbuf)*8 ? m_bitbuf : NULL,
7208
                          m_width,
7209
                          false)))
7210 7211 7212
  {
    /* Cols can be zero if this is a dummy binrows event */
    if (likely(cols != NULL))
7213
    {
7214
      memcpy(m_cols.bitmap, cols->bitmap, no_bytes_in_map(cols));
7215 7216
      create_last_word_mask(&m_cols);
    }
7217
  }
7218
  else
7219 7220 7221 7222
  {
    // Needed because bitmap_init() does not set it to null on failure
    m_cols.bitmap= 0;
  }
7223 7224 7225 7226 7227 7228 7229 7230
}
#endif

Rows_log_event::Rows_log_event(const char *buf, uint event_len,
                               Log_event_type event_type,
                               const Format_description_log_event
                               *description_event)
  : Log_event(buf, description_event),
7231
    m_row_count(0),
7232
#ifndef MYSQL_CLIENT
7233
    m_table(NULL),
7234 7235 7236
#endif
    m_table_id(0), m_rows_buf(0), m_rows_cur(0), m_rows_end(0)
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7237
    , m_curr_row(NULL), m_curr_row_end(NULL), m_key(NULL)
7238
#endif
7239 7240 7241 7242 7243
{
  DBUG_ENTER("Rows_log_event::Rows_log_event(const char*,...)");
  uint8 const common_header_len= description_event->common_header_len;
  uint8 const post_header_len= description_event->post_header_len[event_type-1];

unknown's avatar
unknown committed
7244 7245
  DBUG_PRINT("enter",("event_len: %u  common_header_len: %d  "
		      "post_header_len: %d",
7246 7247 7248 7249 7250 7251 7252 7253 7254 7255 7256 7257 7258
		      event_len, common_header_len,
		      post_header_len));

  const char *post_start= buf + common_header_len;
  post_start+= RW_MAPID_OFFSET;
  if (post_header_len == 6)
  {
    /* Master is of an intermediate source tree before 5.1.4. Id is 4 bytes */
    m_table_id= uint4korr(post_start);
    post_start+= 4;
  }
  else
  {
7259
    m_table_id= (ulong) uint6korr(post_start);
7260 7261 7262 7263 7264
    post_start+= RW_FLAGS_OFFSET;
  }

  m_flags= uint2korr(post_start);

7265 7266 7267
  uchar const *const var_start=
    (const uchar *)buf + common_header_len + post_header_len;
  uchar const *const ptr_width= var_start;
7268
  uchar *ptr_after_width= (uchar*) ptr_width;
7269
  DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
7270
  m_width = net_field_length(&ptr_after_width);
7271 7272 7273 7274
  DBUG_PRINT("debug", ("m_width=%lu", m_width));
  /* if bitmap_init fails, catched in is_valid() */
  if (likely(!bitmap_init(&m_cols,
                          m_width <= sizeof(m_bitbuf)*8 ? m_bitbuf : NULL,
7275
                          m_width,
7276 7277 7278 7279
                          false)))
  {
    DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
    memcpy(m_cols.bitmap, ptr_after_width, (m_width + 7) / 8);
7280
    create_last_word_mask(&m_cols);
7281
    ptr_after_width+= (m_width + 7) / 8;
7282
    DBUG_DUMP("m_cols", (uchar*) m_cols.bitmap, no_bytes_in_map(&m_cols));
7283 7284 7285 7286 7287 7288 7289
  }
  else
  {
    // Needed because bitmap_init() does not set it to null on failure
    m_cols.bitmap= NULL;
    DBUG_VOID_RETURN;
  }
7290

7291 7292 7293 7294 7295 7296
  m_cols_ai.bitmap= m_cols.bitmap; /* See explanation in is_valid() */

  if (event_type == UPDATE_ROWS_EVENT)
  {
    DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));

7297
    /* if bitmap_init fails, caught in is_valid() */
7298 7299
    if (likely(!bitmap_init(&m_cols_ai,
                            m_width <= sizeof(m_bitbuf_ai)*8 ? m_bitbuf_ai : NULL,
7300
                            m_width,
7301 7302 7303 7304
                            false)))
    {
      DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
      memcpy(m_cols_ai.bitmap, ptr_after_width, (m_width + 7) / 8);
7305
      create_last_word_mask(&m_cols_ai);
7306
      ptr_after_width+= (m_width + 7) / 8;
7307 7308
      DBUG_DUMP("m_cols_ai", (uchar*) m_cols_ai.bitmap,
                no_bytes_in_map(&m_cols_ai));
7309 7310 7311 7312 7313 7314 7315 7316 7317
    }
    else
    {
      // Needed because bitmap_init() does not set it to null on failure
      m_cols_ai.bitmap= 0;
      DBUG_VOID_RETURN;
    }
  }

7318
  const uchar* const ptr_rows_data= (const uchar*) ptr_after_width;
7319

7320
  size_t const data_size= event_len - (ptr_rows_data - (const uchar *) buf);
unknown's avatar
unknown committed
7321
  DBUG_PRINT("info",("m_table_id: %lu  m_flags: %d  m_width: %lu  data_size: %lu",
7322
                     m_table_id, m_flags, m_width, (ulong) data_size));
7323

7324
  m_rows_buf= (uchar*) my_malloc(data_size, MYF(MY_WME));
7325 7326
  if (likely((bool)m_rows_buf))
  {
7327
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7328
    m_curr_row= m_rows_buf;
7329
#endif
7330 7331 7332 7333 7334 7335 7336 7337 7338 7339 7340 7341 7342 7343 7344
    m_rows_end= m_rows_buf + data_size;
    m_rows_cur= m_rows_end;
    memcpy(m_rows_buf, ptr_rows_data, data_size);
  }
  else
    m_cols.bitmap= 0; // to not free it

  DBUG_VOID_RETURN;
}

Rows_log_event::~Rows_log_event()
{
  if (m_cols.bitmap == m_bitbuf) // no my_malloc happened
    m_cols.bitmap= 0; // so no my_free in bitmap_free
  bitmap_free(&m_cols); // To pair with bitmap_init().
7345
  my_free((uchar*)m_rows_buf, MYF(MY_ALLOW_ZERO_PTR));
7346 7347
}

7348 7349 7350 7351
int Rows_log_event::get_data_size()
{
  int const type_code= get_type_code();

7352 7353
  uchar buf[sizeof(m_width) + 1];
  uchar *end= net_store_length(buf, m_width);
7354 7355 7356 7357 7358 7359 7360

  DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master",
                  return 6 + no_bytes_in_map(&m_cols) + (end - buf) +
                  (type_code == UPDATE_ROWS_EVENT ? no_bytes_in_map(&m_cols_ai) : 0) +
                  (m_rows_cur - m_rows_buf););
  int data_size= ROWS_HEADER_LEN;
  data_size+= no_bytes_in_map(&m_cols);
7361
  data_size+= (uint) (end - buf);
7362 7363 7364 7365

  if (type_code == UPDATE_ROWS_EVENT)
    data_size+= no_bytes_in_map(&m_cols_ai);

7366
  data_size+= (uint) (m_rows_cur - m_rows_buf);
7367 7368 7369 7370
  return data_size; 
}


7371
#ifndef MYSQL_CLIENT
7372
int Rows_log_event::do_add_row_data(uchar *row_data, size_t length)
7373 7374 7375 7376 7377 7378
{
  /*
    When the table has a primary key, we would probably want, by default, to
    log only the primary key value instead of the entire "before image". This
    would save binlog space. TODO
  */
7379
  DBUG_ENTER("Rows_log_event::do_add_row_data");
unknown's avatar
unknown committed
7380 7381
  DBUG_PRINT("enter", ("row_data: 0x%lx  length: %lu", (ulong) row_data,
                       (ulong) length));
7382 7383 7384 7385 7386
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
7387
  DBUG_DUMP("row_data", row_data, min(length, 32));
7388
#endif
7389 7390

  DBUG_ASSERT(m_rows_buf <= m_rows_cur);
7391
  DBUG_ASSERT(!m_rows_buf || (m_rows_end && m_rows_buf < m_rows_end));
7392 7393 7394
  DBUG_ASSERT(m_rows_cur <= m_rows_end);

  /* The cast will always work since m_rows_cur <= m_rows_end */
7395
  if (static_cast<size_t>(m_rows_end - m_rows_cur) <= length)
7396
  {
7397
    size_t const block_size= 1024;
7398
    my_ptrdiff_t const cur_size= m_rows_cur - m_rows_buf;
7399
    my_ptrdiff_t const new_alloc= 
7400
        block_size * ((cur_size + length + block_size - 1) / block_size);
7401

7402
    uchar* const new_buf= (uchar*)my_realloc((uchar*)m_rows_buf, (uint) new_alloc,
7403
                                           MYF(MY_ALLOW_ZERO_PTR|MY_WME));
7404 7405 7406 7407 7408 7409 7410 7411 7412 7413 7414 7415 7416 7417 7418 7419 7420
    if (unlikely(!new_buf))
      DBUG_RETURN(HA_ERR_OUT_OF_MEM);

    /* If the memory moved, we need to move the pointers */
    if (new_buf != m_rows_buf)
    {
      m_rows_buf= new_buf;
      m_rows_cur= m_rows_buf + cur_size;
    }

    /*
       The end pointer should always be changed to point to the end of
       the allocated memory.
    */
    m_rows_end= m_rows_buf + new_alloc;
  }

7421
  DBUG_ASSERT(m_rows_cur + length <= m_rows_end);
7422 7423
  memcpy(m_rows_cur, row_data, length);
  m_rows_cur+= length;
7424
  m_row_count++;
7425 7426 7427 7428 7429
  DBUG_RETURN(0);
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7430
int Rows_log_event::do_apply_event(Relay_log_info const *rli)
7431
{
7432
  DBUG_ENTER("Rows_log_event::do_apply_event(Relay_log_info*)");
7433
  int error= 0;
7434
  /*
7435 7436 7437
    If m_table_id == ~0UL, then we have a dummy event that does not
    contain any data.  In that case, we just remove all tables in the
    tables_to_lock list, close the thread tables, and return with
7438
    success.
7439
   */
7440
  if (m_table_id == ~0UL)
7441 7442 7443 7444 7445 7446 7447
  {
    /*
       This one is supposed to be set: just an extra check so that
       nothing strange has happened.
     */
    DBUG_ASSERT(get_flags(STMT_END_F));

7448
    const_cast<Relay_log_info*>(rli)->slave_close_thread_tables(thd);
7449 7450 7451
    thd->clear_error();
    DBUG_RETURN(0);
  }
7452 7453 7454

  /*
    'thd' has been set by exec_relay_log_event(), just before calling
7455
    do_apply_event(). We still check here to prevent future coding
7456
    errors.
7457 7458 7459 7460
  */
  DBUG_ASSERT(rli->sql_thd == thd);

  /*
7461 7462 7463 7464
    If there is no locks taken, this is the first binrow event seen
    after the table map events.  We should then lock all the tables
    used in the transaction and proceed with execution of the actual
    event.
7465
  */
7466
  if (!thd->lock)
7467 7468
  {
    /*
7469 7470 7471 7472 7473
      Lock_tables() reads the contents of thd->lex, so they must be
      initialized.

      We also call the mysql_reset_thd_for_next_command(), since this
      is the logical start of the next "statement". Note that this
7474
      call might reset the value of current_stmt_binlog_format, so
7475
      we need to do any changes to that value after this function.
7476
    */
7477
    lex_start(thd);
7478
    mysql_reset_thd_for_next_command(thd);
7479 7480 7481 7482 7483 7484
    /*
      The current statement is just about to begin and 
      has not yet modified anything. Note, all.modified is reset
      by mysql_reset_thd_for_next_command.
    */
    thd->transaction.stmt.modified_non_trans_table= FALSE;
7485
    /*
7486 7487 7488 7489
      This is a row injection, so we flag the "statement" as
      such. Note that this code is called both when the slave does row
      injections and when the BINLOG statement is used to do row
      injections.
7490
    */
7491
    thd->lex->set_stmt_row_injection();
7492

7493 7494 7495 7496 7497 7498
    /*
      There are a few flags that are replicated with each row event.
      Make sure to set/clear them before executing the main body of
      the event.
    */
    if (get_flags(NO_FOREIGN_KEY_CHECKS_F))
7499
        thd->variables.option_bits|= OPTION_NO_FOREIGN_KEY_CHECKS;
7500
    else
7501
        thd->variables.option_bits&= ~OPTION_NO_FOREIGN_KEY_CHECKS;
7502 7503

    if (get_flags(RELAXED_UNIQUE_CHECKS_F))
7504
        thd->variables.option_bits|= OPTION_RELAXED_UNIQUE_CHECKS;
7505
    else
7506
        thd->variables.option_bits&= ~OPTION_RELAXED_UNIQUE_CHECKS;
7507
    /* A small test to verify that objects have consistent types */
7508
    DBUG_ASSERT(sizeof(thd->variables.option_bits) == sizeof(OPTION_RELAXED_UNIQUE_CHECKS));
7509

7510
    if (open_and_lock_tables(thd, rli->tables_to_lock, FALSE, 0))
7511
    {
Marc Alff's avatar
Marc Alff committed
7512
      uint actual_error= thd->stmt_da->sql_errno();
7513
      if (thd->is_slave_error || thd->is_fatal_error)
7514
      {
7515 7516
        /*
          Error reporting borrowed from Query_log_event with many excessive
7517 7518 7519
          simplifications. 
          We should not honour --slave-skip-errors at this point as we are
          having severe errors which should not be skiped.
7520 7521
        */
        rli->report(ERROR_LEVEL, actual_error,
7522
                    "Error executing row event: '%s'",
Marc Alff's avatar
Marc Alff committed
7523
                    (actual_error ? thd->stmt_da->message() :
7524 7525
                     "unexpected success or fatal error"));
        thd->is_slave_error= 1;
7526
      }
7527
      const_cast<Relay_log_info*>(rli)->slave_close_thread_tables(thd);
7528
      DBUG_RETURN(actual_error);
7529
    }
7530 7531 7532 7533 7534 7535 7536 7537 7538 7539

    /*
      When the open and locking succeeded, we check all tables to
      ensure that they still have the correct type.

      We can use a down cast here since we know that every table added
      to the tables_to_lock is a RPL_TABLE_LIST.
    */

    {
7540 7541
      DBUG_PRINT("debug", ("Checking compability of tables to lock - tables_to_lock: %p",
                           rli->tables_to_lock));
7542
      RPL_TABLE_LIST *ptr= rli->tables_to_lock;
7543 7544
      for ( ; ptr ; ptr= static_cast<RPL_TABLE_LIST*>(ptr->next_global))
      {
7545 7546 7547
        TABLE *conv_table;
        if (!ptr->m_tabledef.compatible_with(thd, const_cast<Relay_log_info*>(rli),
                                             ptr->table, &conv_table))
7548
        {
7549 7550 7551
          DBUG_PRINT("debug", ("Table: %s.%s is not compatible with master",
                               ptr->table->s->db.str,
                               ptr->table->s->table_name.str));
7552 7553 7554 7555
          /*
            We should not honour --slave-skip-errors at this point as we are
            having severe errors which should not be skiped.
          */
7556 7557
          mysql_unlock_tables(thd, thd->lock);
          thd->lock= 0;
7558
          thd->is_slave_error= 1;
7559
          const_cast<Relay_log_info*>(rli)->slave_close_thread_tables(thd);
7560 7561
          DBUG_RETURN(ERR_BAD_TABLE_DEF);
        }
7562 7563 7564 7565 7566
        DBUG_PRINT("debug", ("Table: %s.%s is compatible with master"
                             " - conv_table: %p",
                             ptr->table->s->db.str,
                             ptr->table->s->table_name.str, conv_table));
        ptr->m_conv_table= conv_table;
7567 7568 7569
      }
    }

7570
    /*
7571 7572
      ... and then we add all the tables to the table map and but keep
      them in the tables to lock list.
7573 7574 7575

      We also invalidate the query cache for all the tables, since
      they will now be changed.
7576 7577 7578 7579 7580 7581 7582

      TODO [/Matz]: Maybe the query cache should not be invalidated
      here? It might be that a table is not changed, even though it
      was locked for the statement.  We do know that each
      Rows_log_event contain at least one row, so after processing one
      Rows_log_event, we can invalidate the query cache for the
      associated table.
7583
     */
7584
    for (TABLE_LIST *ptr= rli->tables_to_lock ; ptr ; ptr= ptr->next_global)
7585
    {
7586
      const_cast<Relay_log_info*>(rli)->m_table_map.set_table(ptr->table_id, ptr->table);
7587
    }
7588 7589 7590
#ifdef HAVE_QUERY_CACHE
    query_cache.invalidate_locked_for_write(rli->tables_to_lock);
#endif
7591 7592
  }

7593 7594
  TABLE* 
    table= 
7595
    m_table= const_cast<Relay_log_info*>(rli)->m_table_map.get_table(m_table_id);
7596

7597 7598
  DBUG_PRINT("debug", ("m_table: 0x%lx, m_table_id: %lu", (ulong) m_table, m_table_id));

7599 7600
  if (table)
  {
7601
    bool transactional_table= table->file->has_transactions();
7602 7603
    /*
      table == NULL means that this table should not be replicated
7604
      (this was set up by Table_map_log_event::do_apply_event()
7605
      which tested replicate-* rules).
7606
    */
7607 7608 7609 7610 7611 7612 7613 7614 7615 7616 7617

    /*
      It's not needed to set_time() but
      1) it continues the property that "Time" in SHOW PROCESSLIST shows how
      much slave is behind
      2) it will be needed when we allow replication from a table with no
      TIMESTAMP column to a table with one.
      So we call set_time(), like in SBR. Presently it changes nothing.
    */
    thd->set_time((time_t)when);

7618 7619 7620 7621 7622 7623 7624 7625 7626
    /*
      Now we are in a statement and will stay in a statement until we
      see a STMT_END_F.

      We set this flag here, before actually applying any rows, in
      case the SQL thread is stopped and we need to detect that we're
      inside a statement and halting abruptly might cause problems
      when restarting.
     */
7627
    const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
7628

7629 7630
     if ( m_width == table->s->fields && bitmap_is_set_all(&m_cols))
      set_flags(COMPLETE_ROWS_F);
7631

7632 7633 7634 7635 7636 7637 7638 7639 7640 7641 7642 7643 7644 7645 7646 7647
    /* 
      Set tables write and read sets.
      
      Read_set contains all slave columns (in case we are going to fetch
      a complete record from slave)
      
      Write_set equals the m_cols bitmap sent from master but it can be 
      longer if slave has extra columns. 
     */ 

    DBUG_PRINT_BITSET("debug", "Setting table's write_set from: %s", &m_cols);
    
    bitmap_set_all(table->read_set);
    bitmap_set_all(table->write_set);
    if (!get_flags(COMPLETE_ROWS_F))
      bitmap_intersect(table->write_set,&m_cols);
7648

7649 7650
    this->slave_exec_mode= slave_exec_mode_options; // fix the mode

7651 7652
    // Do event specific preparations 
    error= do_before_row_operations(rli);
7653

7654
    // row processing loop
7655

7656 7657
    while (error == 0 && m_curr_row < m_rows_end)
    {
7658 7659 7660 7661
      /* in_use can have been set to NULL in close_tables_for_reopen */
      THD* old_thd= table->in_use;
      if (!table->in_use)
        table->in_use= thd;
7662 7663 7664

      error= do_exec_row(rli);

7665 7666 7667
      DBUG_PRINT("info", ("error: %s", HA_ERR(error)));
      DBUG_ASSERT(error != HA_ERR_RECORD_DELETED);

7668
      table->in_use = old_thd;
7669

7670 7671 7672 7673
      if (error)
      {
        int actual_error= convert_handler_error(error, thd, table);
        bool idempotent_error= (idempotent_error_code(error) &&
7674
                               (slave_exec_mode == SLAVE_EXEC_MODE_IDEMPOTENT));
7675 7676 7677 7678
        bool ignored_error= (idempotent_error == 0 ?
                             ignored_error_code(actual_error) : 0);

        if (idempotent_error || ignored_error)
7679 7680 7681 7682 7683
        {
          if (global_system_variables.log_warnings)
            slave_rows_error_report(WARNING_LEVEL, error, rli, thd, table,
                                    get_type_str(),
                                    RPL_LOG_NAME, (ulong) log_pos);
7684
          clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
7685
          error= 0;
7686 7687
          if (idempotent_error == 0)
            break;
7688
        }
7689 7690
      }

7691 7692 7693 7694 7695 7696 7697
      /*
       If m_curr_row_end  was not set during event execution (e.g., because
       of errors) we can't proceed to the next row. If the error is transient
       (i.e., error==0 at this point) we must call unpack_current_row() to set 
       m_curr_row_end.
      */ 
   
7698 7699 7700
      DBUG_PRINT("info", ("curr_row: 0x%lu; curr_row_end: 0x%lu; rows_end: 0x%lu",
                          (ulong) m_curr_row, (ulong) m_curr_row_end, (ulong) m_rows_end));

7701
      if (!m_curr_row_end && !error)
7702
        error= unpack_current_row(rli);
7703 7704 7705 7706 7707 7708 7709 7710
  
      // at this moment m_curr_row_end should be set
      DBUG_ASSERT(error || m_curr_row_end != NULL); 
      DBUG_ASSERT(error || m_curr_row < m_curr_row_end);
      DBUG_ASSERT(error || m_curr_row_end <= m_rows_end);
  
      m_curr_row= m_curr_row_end;
 
7711 7712 7713
      if (error == 0 && !transactional_table)
        thd->transaction.all.modified_non_trans_table=
          thd->transaction.stmt.modified_non_trans_table= TRUE;
7714 7715
    } // row processing loop

7716 7717 7718 7719 7720 7721 7722 7723 7724 7725
    {/**
         The following failure injecion works in cooperation with tests 
         setting @@global.debug= 'd,stop_slave_middle_group'.
         The sql thread receives the killed status and will proceed 
         to shutdown trying to finish incomplete events group.
     */
      DBUG_EXECUTE_IF("stop_slave_middle_group",
                      if (thd->transaction.all.modified_non_trans_table)
                        const_cast<Relay_log_info*>(rli)->abort_slave= 1;);
    }
7726 7727 7728 7729 7730 7731 7732 7733 7734 7735 7736 7737

    if ((error= do_after_row_operations(rli, error)) &&
        ignored_error_code(convert_handler_error(error, thd, table)))
    {

      if (global_system_variables.log_warnings)
        slave_rows_error_report(WARNING_LEVEL, error, rli, thd, table,
                                get_type_str(),
                                RPL_LOG_NAME, (ulong) log_pos);
      clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
      error= 0;
    }
7738
  } // if (table)
7739

7740 7741 7742
  
  if (error)
  {
7743 7744 7745
    slave_rows_error_report(ERROR_LEVEL, error, rli, thd, table,
                             get_type_str(),
                             RPL_LOG_NAME, (ulong) log_pos);
7746 7747
    /*
      @todo We should probably not call
7748
      reset_current_stmt_binlog_format_row() from here.
7749 7750 7751 7752

      Note: this applies to log_event_old.cc too.
      /Sven
    */
7753
    thd->reset_current_stmt_binlog_format_row();
7754
    const_cast<Relay_log_info*>(rli)->cleanup_context(thd, error);
7755
    thd->is_slave_error= 1;
7756
    DBUG_RETURN(error);
7757
  }
7758

7759
  if (get_flags(STMT_END_F))
7760
    if ((error= rows_event_stmt_cleanup(rli, thd)))
7761 7762 7763 7764 7765 7766
      rli->report(ERROR_LEVEL, error,
                  "Error in %s event: commit of row events failed, "
                  "table `%s`.`%s`",
                  get_type_str(), m_table->s->db.str,
                  m_table->s->table_name.str);

7767
  DBUG_RETURN(error);
7768 7769
}

7770
Log_event::enum_skip_reason
7771
Rows_log_event::do_shall_skip(Relay_log_info *rli)
7772 7773 7774 7775 7776 7777 7778 7779 7780 7781 7782 7783
{
  /*
    If the slave skip counter is 1 and this event does not end a
    statement, then we should not start executing on the next event.
    Otherwise, we defer the decision to the normal skipping logic.
  */
  if (rli->slave_skip_counter == 1 && !get_flags(STMT_END_F))
    return Log_event::EVENT_SKIP_IGNORE;
  else
    return Log_event::do_shall_skip(rli);
}

7784 7785 7786 7787 7788 7789 7790 7791 7792 7793
/**
   The function is called at Rows_log_event statement commit time,
   normally from Rows_log_event::do_update_pos() and possibly from
   Query_log_event::do_apply_event() of the COMMIT.
   The function commits the last statement for engines, binlog and
   releases resources have been allocated for the statement.
  
   @retval  0         Ok.
   @retval  non-zero  Error at the commit.
 */
7794

7795 7796 7797
static int rows_event_stmt_cleanup(Relay_log_info const *rli, THD * thd)
{
  int error;
7798 7799 7800 7801 7802 7803 7804 7805 7806 7807 7808 7809 7810 7811 7812 7813
  {
    /*
      This is the end of a statement or transaction, so close (and
      unlock) the tables we opened when processing the
      Table_map_log_event starting the statement.

      OBSERVER.  This will clear *all* mappings, not only those that
      are open for the table. There is not good handle for on-close
      actions for tables.

      NOTE. Even if we have no table ('table' == 0) we still need to be
      here, so that we increase the group relay log position. If we didn't, we
      could have a group relay log position which lags behind "forever"
      (assume the last master's transaction is ignored by the slave because of
      replicate-ignore rules).
    */
7814
    error= thd->binlog_flush_pending_rows_event(TRUE);
7815

7816 7817 7818 7819 7820 7821 7822 7823 7824
    /*
      If this event is not in a transaction, the call below will, if some
      transactional storage engines are involved, commit the statement into
      them and flush the pending event to binlog.
      If this event is in a transaction, the call will do nothing, but a
      Xid_log_event will come next which will, if some transactional engines
      are involved, commit the transaction and flush the pending event to the
      binlog.
    */
7825
    error|= (error ? trans_rollback_stmt(thd) : trans_commit_stmt(thd));
7826

7827 7828 7829 7830 7831 7832 7833 7834 7835 7836
    /*
      Now what if this is not a transactional engine? we still need to
      flush the pending event to the binlog; we did it with
      thd->binlog_flush_pending_rows_event(). Note that we imitate
      what is done for real queries: a call to
      ha_autocommit_or_rollback() (sometimes only if involves a
      transactional engine), and a call to be sure to have the pending
      event flushed.
    */

7837 7838
    /*
      @todo We should probably not call
7839
      reset_current_stmt_binlog_format_row() from here.
7840 7841 7842 7843 7844 7845 7846

      Note: this applies to log_event_old.cc too

      Btw, the previous comment about transactional engines does not
      seem related to anything that happens here.
      /Sven
    */
7847
    thd->reset_current_stmt_binlog_format_row();
7848

7849 7850 7851 7852 7853 7854 7855 7856 7857 7858 7859 7860 7861 7862 7863 7864 7865 7866 7867 7868 7869 7870 7871 7872 7873 7874
    const_cast<Relay_log_info*>(rli)->cleanup_context(thd, 0);
  }
  return error;
}

/**
   The method either increments the relay log position or
   commits the current statement and increments the master group 
   possition if the event is STMT_END_F flagged and
   the statement corresponds to the autocommit query (i.e replicated
   without wrapping in BEGIN/COMMIT)

   @retval 0         Success
   @retval non-zero  Error in the statement commit
 */
int
Rows_log_event::do_update_pos(Relay_log_info *rli)
{
  DBUG_ENTER("Rows_log_event::do_update_pos");
  int error= 0;

  DBUG_PRINT("info", ("flags: %s",
                      get_flags(STMT_END_F) ? "STMT_END_F " : ""));

  if (get_flags(STMT_END_F))
  {
7875 7876 7877 7878 7879 7880 7881 7882 7883 7884 7885 7886 7887
    /*
      Indicate that a statement is finished.
      Step the group log position if we are not in a transaction,
      otherwise increase the event log position.
    */
    rli->stmt_done(log_pos, when);
    /*
      Clear any errors in thd->net.last_err*. It is not known if this is
      needed or not. It is believed that any errors that may exist in
      thd->net.last_err* are allowed. Examples of errors are "key not
      found", which is produced in the test case rpl_row_conflicts.test
    */
    thd->clear_error();
7888
  }
7889
  else
7890
  {
7891
    rli->inc_event_relay_log_pos();
7892 7893
  }

7894
  DBUG_RETURN(error);
7895
}
7896

7897 7898 7899 7900 7901
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Rows_log_event::write_data_header(IO_CACHE *file)
{
7902
  uchar buf[ROWS_HEADER_LEN];	// No need to init the buffer
7903
  DBUG_ASSERT(m_table_id != ~0UL);
7904 7905 7906 7907 7908 7909 7910 7911 7912 7913 7914 7915 7916 7917 7918 7919 7920
  DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master",
                  {
                    int4store(buf + 0, m_table_id);
                    int2store(buf + 4, m_flags);
                    return (my_b_safe_write(file, buf, 6));
                  });
  int6store(buf + RW_MAPID_OFFSET, (ulonglong)m_table_id);
  int2store(buf + RW_FLAGS_OFFSET, m_flags);
  return (my_b_safe_write(file, buf, ROWS_HEADER_LEN));
}

bool Rows_log_event::write_data_body(IO_CACHE*file)
{
  /*
     Note that this should be the number of *bits*, not the number of
     bytes.
  */
7921
  uchar sbuf[sizeof(m_width) + 1];
7922
  my_ptrdiff_t const data_size= m_rows_cur - m_rows_buf;
7923
  bool res= false;
7924 7925
  uchar *const sbuf_end= net_store_length(sbuf, (size_t) m_width);
  DBUG_ASSERT(static_cast<size_t>(sbuf_end - sbuf) <= sizeof(sbuf));
7926

7927 7928
  DBUG_DUMP("m_width", sbuf, (size_t) (sbuf_end - sbuf));
  res= res || my_b_safe_write(file, sbuf, (size_t) (sbuf_end - sbuf));
7929

7930 7931
  DBUG_DUMP("m_cols", (uchar*) m_cols.bitmap, no_bytes_in_map(&m_cols));
  res= res || my_b_safe_write(file, (uchar*) m_cols.bitmap,
7932 7933 7934 7935 7936 7937
                              no_bytes_in_map(&m_cols));
  /*
    TODO[refactor write]: Remove the "down cast" here (and elsewhere).
   */
  if (get_type_code() == UPDATE_ROWS_EVENT)
  {
7938 7939 7940
    DBUG_DUMP("m_cols_ai", (uchar*) m_cols_ai.bitmap,
              no_bytes_in_map(&m_cols_ai));
    res= res || my_b_safe_write(file, (uchar*) m_cols_ai.bitmap,
7941 7942
                                no_bytes_in_map(&m_cols_ai));
  }
7943 7944
  DBUG_DUMP("rows", m_rows_buf, data_size);
  res= res || my_b_safe_write(file, m_rows_buf, (size_t) data_size);
7945 7946 7947

  return res;

7948 7949 7950
}
#endif

7951
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
7952 7953
void Rows_log_event::pack_info(Protocol *protocol)
{
7954 7955 7956
  char buf[256];
  char const *const flagstr=
    get_flags(STMT_END_F) ? " flags: STMT_END_F" : "";
7957
  size_t bytes= my_snprintf(buf, sizeof(buf),
unknown's avatar
unknown committed
7958
                               "table_id: %lu%s", m_table_id, flagstr);
7959
  protocol->store(buf, bytes, &my_charset_bin);
7960 7961 7962
}
#endif

7963 7964 7965 7966 7967 7968 7969 7970 7971 7972 7973
#ifdef MYSQL_CLIENT
void Rows_log_event::print_helper(FILE *file,
                                  PRINT_EVENT_INFO *print_event_info,
                                  char const *const name)
{
  IO_CACHE *const head= &print_event_info->head_cache;
  IO_CACHE *const body= &print_event_info->body_cache;
  if (!print_event_info->short_form)
  {
    bool const last_stmt_event= get_flags(STMT_END_F);
    print_header(head, print_event_info, !last_stmt_event);
7974 7975 7976
    my_b_printf(head, "\t%s: table id %lu%s\n",
                name, m_table_id,
                last_stmt_event ? " flags: STMT_END_F" : "");
7977 7978 7979 7980 7981
    print_base64(body, print_event_info, !last_stmt_event);
  }

  if (get_flags(STMT_END_F))
  {
7982 7983
    copy_event_cache_to_file_and_reinit(head, file);
    copy_event_cache_to_file_and_reinit(body, file);
7984 7985 7986 7987
  }
}
#endif

7988
/**************************************************************************
7989
	Table_map_log_event member functions and support functions
7990 7991
**************************************************************************/

7992 7993 7994 7995
/**
  @page How replication of field metadata works.
  
  When a table map is created, the master first calls 
7996
  Table_map_log_event::save_field_metadata() which calculates how many 
7997
  values will be in the field metadata. Only those fields that require the 
7998 7999 8000 8001 8002 8003 8004
  extra data are added. The method also loops through all of the fields in 
  the table calling the method Field::save_field_metadata() which returns the
  values for the field that will be saved in the metadata and replicated to
  the slave. Once all fields have been processed, the table map is written to
  the binlog adding the size of the field metadata and the field metadata to
  the end of the body of the table map.

8005 8006 8007 8008 8009 8010 8011
  When a table map is read on the slave, the field metadata is read from the 
  table map and passed to the table_def class constructor which saves the 
  field metadata from the table map into an array based on the type of the 
  field. Field metadata values not present (those fields that do not use extra 
  data) in the table map are initialized as zero (0). The array size is the 
  same as the columns for the table on the slave.

8012 8013 8014 8015 8016 8017 8018 8019 8020 8021
  Additionally, values saved for field metadata on the master are saved as a 
  string of bytes (uchar) in the binlog. A field may require 1 or more bytes
  to store the information. In cases where values require multiple bytes 
  (e.g. values > 255), the endian-safe methods are used to properly encode 
  the values on the master and decode them on the slave. When the field
  metadata values are captured on the slave, they are stored in an array of
  type uint16. This allows the least number of casts to prevent casting bugs
  when the field metadata is used in comparisons of field attributes. When
  the field metadata is used for calculating addresses in pointer math, the
  type used is uint32. 
8022 8023
*/

unknown's avatar
unknown committed
8024
#if !defined(MYSQL_CLIENT)
8025 8026 8027 8028 8029 8030
/**
  Save the field metadata based on the real_type of the field.
  The metadata saved depends on the type of the field. Some fields
  store a single byte for pack_length() while others store two bytes
  for field_length (max length).
  
unknown's avatar
unknown committed
8031
  @retval  0  Ok.
8032

unknown's avatar
unknown committed
8033 8034
  @todo
  We may want to consider changing the encoding of the information.
8035 8036 8037 8038 8039 8040 8041 8042 8043 8044 8045 8046 8047 8048 8049 8050 8051 8052 8053
  Currently, the code attempts to minimize the number of bytes written to 
  the tablemap. There are at least two other alternatives; 1) using 
  net_store_length() to store the data allowing it to choose the number of
  bytes that are appropriate thereby making the code much easier to 
  maintain (only 1 place to change the encoding), or 2) use a fixed number
  of bytes for each field. The problem with option 1 is that net_store_length()
  will use one byte if the value < 251, but 3 bytes if it is > 250. Thus,
  for fields like CHAR which can be no larger than 255 characters, the method
  will use 3 bytes when the value is > 250. Further, every value that is
  encoded using 2 parts (e.g., pack_length, field_length) will be numerically
  > 250 therefore will use 3 bytes for eah value. The problem with option 2
  is less wasteful for space but does waste 1 byte for every field that does
  not encode 2 parts. 
*/
int Table_map_log_event::save_field_metadata()
{
  DBUG_ENTER("Table_map_log_event::save_field_metadata");
  int index= 0;
  for (unsigned int i= 0 ; i < m_table->s->fields ; i++)
8054 8055
  {
    DBUG_PRINT("debug", ("field_type: %d", m_coltype[i]));
8056
    index+= m_table->s->field[i]->save_field_metadata(&m_field_metadata[index]);
8057
  }
8058
  DBUG_RETURN(index);
8059 8060 8061
}
#endif /* !defined(MYSQL_CLIENT) */

8062 8063 8064 8065 8066 8067 8068
/*
  Constructor used to build an event for writing to the binary log.
  Mats says tbl->s lives longer than this event so it's ok to copy pointers
  (tbl->s->db etc) and not pointer content.
 */
#if !defined(MYSQL_CLIENT)
Table_map_log_event::Table_map_log_event(THD *thd, TABLE *tbl, ulong tid,
8069
                                         bool is_transactional)
8070
  : Log_event(thd, 0, is_transactional),
8071 8072 8073 8074 8075
    m_table(tbl),
    m_dbnam(tbl->s->db.str),
    m_dblen(m_dbnam ? tbl->s->db.length : 0),
    m_tblnam(tbl->s->table_name.str),
    m_tbllen(tbl->s->table_name.length),
8076 8077 8078
    m_colcnt(tbl->s->fields),
    m_memory(NULL),
    m_table_id(tid),
8079
    m_flags(TM_BIT_LEN_EXACT_F),
8080 8081 8082 8083 8084
    m_data_size(0),
    m_field_metadata(0),
    m_field_metadata_size(0),
    m_null_bits(0),
    m_meta_memory(NULL)
8085
{
8086 8087
  uchar cbuf[sizeof(m_colcnt) + 1];
  uchar *cbuf_end;
8088
  DBUG_ASSERT(m_table_id != ~0UL);
8089 8090 8091 8092 8093 8094 8095 8096 8097 8098 8099 8100
  /*
    In TABLE_SHARE, "db" and "table_name" are 0-terminated (see this comment in
    table.cc / alloc_table_share():
      Use the fact the key is db/0/table_name/0
    As we rely on this let's assert it.
  */
  DBUG_ASSERT((tbl->s->db.str == 0) ||
              (tbl->s->db.str[tbl->s->db.length] == 0));
  DBUG_ASSERT(tbl->s->table_name.str[tbl->s->table_name.length] == 0);


  m_data_size=  TABLE_MAP_HEADER_LEN;
unknown's avatar
unknown committed
8101
  DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master", m_data_size= 6;);
8102 8103
  m_data_size+= m_dblen + 2;	// Include length and terminating \0
  m_data_size+= m_tbllen + 2;	// Include length and terminating \0
8104
  cbuf_end= net_store_length(cbuf, (size_t) m_colcnt);
Andrei Elkin's avatar
Andrei Elkin committed
8105
  DBUG_ASSERT(static_cast<size_t>(cbuf_end - cbuf) <= sizeof(cbuf));
8106
  m_data_size+= (cbuf_end - cbuf) + m_colcnt;	// COLCNT and column types
8107

8108
  /* If malloc fails, caught in is_valid() */
8109
  if ((m_memory= (uchar*) my_malloc(m_colcnt, MYF(MY_WME))))
8110
  {
unknown's avatar
unknown committed
8111
    m_coltype= reinterpret_cast<uchar*>(m_memory);
8112 8113 8114
    for (unsigned int i= 0 ; i < m_table->s->fields ; ++i)
      m_coltype[i]= m_table->field[i]->type();
  }
8115 8116 8117 8118 8119 8120 8121 8122 8123 8124 8125

  /*
    Calculate a bitmap for the results of maybe_null() for all columns.
    The bitmap is used to determine when there is a column from the master
    that is not on the slave and is null and thus not in the row data during
    replication.
  */
  uint num_null_bytes= (m_table->s->fields + 7) / 8;
  m_data_size+= num_null_bytes;
  m_meta_memory= (uchar *)my_multi_malloc(MYF(MY_WME),
                                 &m_null_bits, num_null_bytes,
8126
                                 &m_field_metadata, (m_colcnt * 2),
8127
                                 NULL);
8128 8129 8130 8131 8132 8133 8134 8135 8136 8137 8138

  bzero(m_field_metadata, (m_colcnt * 2));

  /*
    Create an array for the field metadata and store it.
  */
  m_field_metadata_size= save_field_metadata();
  DBUG_ASSERT(m_field_metadata_size <= (m_colcnt * 2));

  /*
    Now set the size of the data to the size of the field metadata array
8139 8140
    plus one or three bytes (see pack.c:net_store_length) for number of 
    elements in the field metadata array.
8141
  */
8142
  if (m_field_metadata_size < 251)
8143
    m_data_size+= m_field_metadata_size + 1; 
8144 8145
  else
    m_data_size+= m_field_metadata_size + 3; 
8146

8147 8148 8149 8150 8151
  bzero(m_null_bits, num_null_bytes);
  for (unsigned int i= 0 ; i < m_table->s->fields ; ++i)
    if (m_table->field[i]->maybe_null())
      m_null_bits[(i / 8)]+= 1 << (i % 8);

8152 8153 8154 8155 8156 8157 8158 8159 8160 8161 8162 8163 8164
}
#endif /* !defined(MYSQL_CLIENT) */

/*
  Constructor used by slave to read the event from the binary log.
 */
#if defined(HAVE_REPLICATION)
Table_map_log_event::Table_map_log_event(const char *buf, uint event_len,
                                         const Format_description_log_event
                                         *description_event)

  : Log_event(buf, description_event),
#ifndef MYSQL_CLIENT
8165
    m_table(NULL),
8166
#endif
8167 8168 8169 8170 8171
    m_dbnam(NULL), m_dblen(0), m_tblnam(NULL), m_tbllen(0),
    m_colcnt(0), m_coltype(0),
    m_memory(NULL), m_table_id(ULONG_MAX), m_flags(0),
    m_data_size(0), m_field_metadata(0), m_field_metadata_size(0),
    m_null_bits(0), m_meta_memory(NULL)
8172
{
8173
  unsigned int bytes_read= 0;
8174 8175 8176 8177
  DBUG_ENTER("Table_map_log_event::Table_map_log_event(const char*,uint,...)");

  uint8 common_header_len= description_event->common_header_len;
  uint8 post_header_len= description_event->post_header_len[TABLE_MAP_EVENT-1];
unknown's avatar
unknown committed
8178
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
8179 8180
                     event_len, common_header_len, post_header_len));

8181 8182 8183 8184 8185
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
8186
  DBUG_DUMP("event buffer", (uchar*) buf, event_len);
8187
#endif
8188 8189 8190 8191 8192 8193 8194 8195 8196 8197 8198 8199 8200 8201

  /* Read the post-header */
  const char *post_start= buf + common_header_len;

  post_start+= TM_MAPID_OFFSET;
  if (post_header_len == 6)
  {
    /* Master is of an intermediate source tree before 5.1.4. Id is 4 bytes */
    m_table_id= uint4korr(post_start);
    post_start+= 4;
  }
  else
  {
    DBUG_ASSERT(post_header_len == TABLE_MAP_HEADER_LEN);
8202
    m_table_id= (ulong) uint6korr(post_start);
8203 8204 8205
    post_start+= TM_FLAGS_OFFSET;
  }

8206
  DBUG_ASSERT(m_table_id != ~0UL);
8207 8208 8209 8210 8211 8212 8213

  m_flags= uint2korr(post_start);

  /* Read the variable part of the event */
  const char *const vpart= buf + common_header_len + post_header_len;

  /* Extract the length of the various parts from the buffer */
8214
  uchar const *const ptr_dblen= (uchar const*)vpart + 0;
unknown's avatar
unknown committed
8215
  m_dblen= *(uchar*) ptr_dblen;
8216 8217

  /* Length of database name + counter + terminating null */
8218
  uchar const *const ptr_tbllen= ptr_dblen + m_dblen + 2;
unknown's avatar
unknown committed
8219
  m_tbllen= *(uchar*) ptr_tbllen;
8220 8221

  /* Length of table name + counter + terminating null */
8222
  uchar const *const ptr_colcnt= ptr_tbllen + m_tbllen + 2;
8223 8224
  uchar *ptr_after_colcnt= (uchar*) ptr_colcnt;
  m_colcnt= net_field_length(&ptr_after_colcnt);
8225

unknown's avatar
unknown committed
8226
  DBUG_PRINT("info",("m_dblen: %lu  off: %ld  m_tbllen: %lu  off: %ld  m_colcnt: %lu  off: %ld",
8227 8228
                     (ulong) m_dblen, (long) (ptr_dblen-(const uchar*)vpart), 
                     (ulong) m_tbllen, (long) (ptr_tbllen-(const uchar*)vpart),
8229
                     m_colcnt, (long) (ptr_colcnt-(const uchar*)vpart)));
8230

8231
  /* Allocate mem for all fields in one go. If fails, caught in is_valid() */
8232 8233 8234 8235 8236
  m_memory= (uchar*) my_multi_malloc(MYF(MY_WME),
                                     &m_dbnam, (uint) m_dblen + 1,
                                     &m_tblnam, (uint) m_tbllen + 1,
                                     &m_coltype, (uint) m_colcnt,
                                     NullS);
8237 8238 8239 8240

  if (m_memory)
  {
    /* Copy the different parts into their memory */
8241 8242
    strncpy(const_cast<char*>(m_dbnam), (const char*)ptr_dblen  + 1, m_dblen + 1);
    strncpy(const_cast<char*>(m_tblnam), (const char*)ptr_tbllen + 1, m_tbllen + 1);
8243
    memcpy(m_coltype, ptr_after_colcnt, m_colcnt);
8244 8245

    ptr_after_colcnt= ptr_after_colcnt + m_colcnt;
8246
    bytes_read= (uint) (ptr_after_colcnt - (uchar *)buf);
8247 8248 8249 8250
    DBUG_PRINT("info", ("Bytes read: %d.\n", bytes_read));
    if (bytes_read < event_len)
    {
      m_field_metadata_size= net_field_length(&ptr_after_colcnt);
8251
      DBUG_ASSERT(m_field_metadata_size <= (m_colcnt * 2));
8252 8253 8254 8255 8256 8257 8258 8259 8260
      uint num_null_bytes= (m_colcnt + 7) / 8;
      m_meta_memory= (uchar *)my_multi_malloc(MYF(MY_WME),
                                     &m_null_bits, num_null_bytes,
                                     &m_field_metadata, m_field_metadata_size,
                                     NULL);
      memcpy(m_field_metadata, ptr_after_colcnt, m_field_metadata_size);
      ptr_after_colcnt= (uchar*)ptr_after_colcnt + m_field_metadata_size;
      memcpy(m_null_bits, ptr_after_colcnt, num_null_bytes);
    }
8261 8262 8263 8264 8265 8266 8267 8268
  }

  DBUG_VOID_RETURN;
}
#endif

Table_map_log_event::~Table_map_log_event()
{
8269
  my_free(m_meta_memory, MYF(MY_ALLOW_ZERO_PTR));
8270 8271 8272 8273 8274 8275 8276 8277 8278 8279 8280 8281 8282 8283 8284
  my_free(m_memory, MYF(MY_ALLOW_ZERO_PTR));
}

/*
  Return value is an error code, one of:

      -1     Failure to open table   [from open_tables()]
       0     Success
       1     No room for more tables [from set_table()]
       2     Out of memory           [from set_table()]
       3     Wrong table definition
       4     Daisy-chaining RBR with SBR not possible
 */

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
8285
int Table_map_log_event::do_apply_event(Relay_log_info const *rli)
8286
{
8287 8288 8289 8290
  RPL_TABLE_LIST *table_list;
  char *db_mem, *tname_mem;
  size_t dummy_len;
  void *memory;
8291
  DBUG_ENTER("Table_map_log_event::do_apply_event(Relay_log_info*)");
8292 8293 8294
  DBUG_ASSERT(rli->sql_thd == thd);

  /* Step the query id to mark what columns that are actually used. */
8295
  thd->set_query_id(next_query_id());
8296

8297 8298 8299 8300 8301
  if (!(memory= my_multi_malloc(MYF(MY_WME),
                                &table_list, (uint) sizeof(RPL_TABLE_LIST),
                                &db_mem, (uint) NAME_LEN + 1,
                                &tname_mem, (uint) NAME_LEN + 1,
                                NullS)))
8302
    DBUG_RETURN(HA_ERR_OUT_OF_MEM);
8303

Konstantin Osipov's avatar
Konstantin Osipov committed
8304 8305 8306 8307 8308 8309 8310
  strmov(db_mem, rpl_filter->get_rewrite_db(m_dbnam, &dummy_len));
  strmov(tname_mem, m_tblnam);

  table_list->init_one_table(db_mem, strlen(db_mem),
                             tname_mem, strlen(tname_mem),
                             tname_mem, TL_WRITE);

8311 8312
  table_list->table_id= m_table_id;
  table_list->updating= 1;
8313 8314 8315

  int error= 0;

8316 8317 8318
  if (rli->sql_thd->slave_thread /* filtering is for slave only */ &&
      (!rpl_filter->db_ok(table_list->db) ||
       (rpl_filter->is_on() && !rpl_filter->tables_ok("", table_list))))
8319
  {
8320
    my_free(memory, MYF(MY_WME));
8321 8322
  }
  else
8323
  {
8324
    DBUG_ASSERT(thd->lex->query_tables != table_list);
8325

8326 8327 8328
    /*
      Use placement new to construct the table_def instance in the
      memory allocated for it inside table_list.
8329 8330 8331

      The memory allocated by the table_def structure (i.e., not the
      memory allocated *for* the table_def structure) is released
8332
      inside Relay_log_info::clear_tables_to_lock() by calling the
8333
      table_def destructor explicitly.
8334
    */
8335 8336 8337 8338
    new (&table_list->m_tabledef)
      table_def(m_coltype, m_colcnt,
                m_field_metadata, m_field_metadata_size,
                m_null_bits, m_flags);
8339
    table_list->m_tabledef_valid= TRUE;
8340 8341

    /*
8342
      We record in the slave's information that the table should be
unknown's avatar
unknown committed
8343
      locked by linking the table into the list of tables to lock.
8344
    */
8345
    table_list->next_global= table_list->next_local= rli->tables_to_lock;
8346 8347
    const_cast<Relay_log_info*>(rli)->tables_to_lock= table_list;
    const_cast<Relay_log_info*>(rli)->tables_to_lock_count++;
8348
    /* 'memory' is freed in clear_tables_to_lock */
8349 8350
  }

8351
  DBUG_RETURN(error);
8352
}
8353

8354
Log_event::enum_skip_reason
8355
Table_map_log_event::do_shall_skip(Relay_log_info *rli)
8356 8357 8358 8359 8360
{
  /*
    If the slave skip counter is 1, then we should not start executing
    on the next event.
  */
8361
  return continue_group(rli);
8362 8363
}

8364
int Table_map_log_event::do_update_pos(Relay_log_info *rli)
8365 8366 8367 8368 8369
{
  rli->inc_event_relay_log_pos();
  return 0;
}

8370 8371 8372 8373 8374
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Table_map_log_event::write_data_header(IO_CACHE *file)
{
8375
  DBUG_ASSERT(m_table_id != ~0UL);
8376
  uchar buf[TABLE_MAP_HEADER_LEN];
8377 8378 8379 8380 8381 8382 8383 8384 8385 8386 8387 8388 8389 8390 8391 8392 8393 8394 8395
  DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master",
                  {
                    int4store(buf + 0, m_table_id);
                    int2store(buf + 4, m_flags);
                    return (my_b_safe_write(file, buf, 6));
                  });
  int6store(buf + TM_MAPID_OFFSET, (ulonglong)m_table_id);
  int2store(buf + TM_FLAGS_OFFSET, m_flags);
  return (my_b_safe_write(file, buf, TABLE_MAP_HEADER_LEN));
}

bool Table_map_log_event::write_data_body(IO_CACHE *file)
{
  DBUG_ASSERT(m_dbnam != NULL);
  DBUG_ASSERT(m_tblnam != NULL);
  /* We use only one byte per length for storage in event: */
  DBUG_ASSERT(m_dblen < 128);
  DBUG_ASSERT(m_tbllen < 128);

8396 8397
  uchar const dbuf[]= { (uchar) m_dblen };
  uchar const tbuf[]= { (uchar) m_tbllen };
8398

8399
  uchar cbuf[sizeof(m_colcnt) + 1];
8400 8401
  uchar *const cbuf_end= net_store_length(cbuf, (size_t) m_colcnt);
  DBUG_ASSERT(static_cast<size_t>(cbuf_end - cbuf) <= sizeof(cbuf));
8402

8403 8404 8405 8406
  /*
    Store the size of the field metadata.
  */
  uchar mbuf[sizeof(m_field_metadata_size)];
8407
  uchar *const mbuf_end= net_store_length(mbuf, m_field_metadata_size);
8408

8409
  return (my_b_safe_write(file, dbuf,      sizeof(dbuf)) ||
8410
          my_b_safe_write(file, (const uchar*)m_dbnam,   m_dblen+1) ||
8411
          my_b_safe_write(file, tbuf,      sizeof(tbuf)) ||
8412 8413
          my_b_safe_write(file, (const uchar*)m_tblnam,  m_tbllen+1) ||
          my_b_safe_write(file, cbuf, (size_t) (cbuf_end - cbuf)) ||
8414 8415 8416 8417
          my_b_safe_write(file, m_coltype, m_colcnt) ||
          my_b_safe_write(file, mbuf, (size_t) (mbuf_end - mbuf)) ||
          my_b_safe_write(file, m_field_metadata, m_field_metadata_size),
          my_b_safe_write(file, m_null_bits, (m_colcnt + 7) / 8));
8418 8419 8420 8421 8422 8423 8424 8425 8426 8427
 }
#endif

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)

/*
  Print some useful information for the SHOW BINARY LOG information
  field.
 */

8428
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
8429 8430 8431
void Table_map_log_event::pack_info(Protocol *protocol)
{
    char buf[256];
8432
    size_t bytes= my_snprintf(buf, sizeof(buf),
unknown's avatar
unknown committed
8433
                                 "table_id: %lu (%s.%s)",
8434
                              m_table_id, m_dbnam, m_tblnam);
8435 8436
    protocol->store(buf, bytes, &my_charset_bin);
}
8437 8438
#endif

8439 8440 8441 8442 8443 8444 8445 8446 8447

#endif


#ifdef MYSQL_CLIENT
void Table_map_log_event::print(FILE *file, PRINT_EVENT_INFO *print_event_info)
{
  if (!print_event_info->short_form)
  {
8448 8449 8450 8451 8452
    print_header(&print_event_info->head_cache, print_event_info, TRUE);
    my_b_printf(&print_event_info->head_cache,
                "\tTable_map: `%s`.`%s` mapped to number %lu\n",
                m_dbnam, m_tblnam, m_table_id);
    print_base64(&print_event_info->body_cache, print_event_info, TRUE);
8453 8454 8455 8456 8457 8458 8459 8460 8461 8462 8463 8464 8465 8466 8467 8468 8469 8470 8471 8472 8473 8474 8475 8476 8477 8478 8479 8480 8481 8482 8483 8484 8485 8486
  }
}
#endif

/**************************************************************************
	Write_rows_log_event member functions
**************************************************************************/

/*
  Constructor used to build an event for writing to the binary log.
 */
#if !defined(MYSQL_CLIENT)
Write_rows_log_event::Write_rows_log_event(THD *thd_arg, TABLE *tbl_arg,
                                           ulong tid_arg,
                                           MY_BITMAP const *cols,
                                           bool is_transactional)
  : Rows_log_event(thd_arg, tbl_arg, tid_arg, cols, is_transactional)
{
}
#endif

/*
  Constructor used by slave to read the event from the binary log.
 */
#ifdef HAVE_REPLICATION
Write_rows_log_event::Write_rows_log_event(const char *buf, uint event_len,
                                           const Format_description_log_event
                                           *description_event)
: Rows_log_event(buf, event_len, WRITE_ROWS_EVENT, description_event)
{
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
8487 8488
int 
Write_rows_log_event::do_before_row_operations(const Slave_reporting_capability *const)
8489 8490 8491
{
  int error= 0;

8492 8493 8494
  /**
     todo: to introduce a property for the event (handler?) which forces
     applying the event in the replace (idempotent) fashion.
8495
  */
8496 8497
  if ((slave_exec_mode == SLAVE_EXEC_MODE_IDEMPOTENT) ||
      (m_table->s->db_type()->db_type == DB_TYPE_NDBCLUSTER))
8498 8499 8500 8501 8502 8503 8504 8505 8506 8507 8508 8509 8510 8511 8512 8513 8514 8515 8516 8517 8518 8519 8520 8521 8522 8523 8524 8525 8526 8527 8528 8529 8530 8531 8532 8533 8534
  {
    /*
      We are using REPLACE semantics and not INSERT IGNORE semantics
      when writing rows, that is: new rows replace old rows.  We need to
      inform the storage engine that it should use this behaviour.
    */
    
    /* Tell the storage engine that we are using REPLACE semantics. */
    thd->lex->duplicates= DUP_REPLACE;
    
    /*
      Pretend we're executing a REPLACE command: this is needed for
      InnoDB and NDB Cluster since they are not (properly) checking the
      lex->duplicates flag.
    */
    thd->lex->sql_command= SQLCOM_REPLACE;
    /* 
       Do not raise the error flag in case of hitting to an unique attribute
    */
    m_table->file->extra(HA_EXTRA_IGNORE_DUP_KEY);
    /* 
       NDB specific: update from ndb master wrapped as Write_rows
       so that the event should be applied to replace slave's row
    */
    m_table->file->extra(HA_EXTRA_WRITE_CAN_REPLACE);
    /* 
       NDB specific: if update from ndb master wrapped as Write_rows
       does not find the row it's assumed idempotent binlog applying
       is taking place; don't raise the error.
    */
    m_table->file->extra(HA_EXTRA_IGNORE_NO_KEY);
    /*
      TODO: the cluster team (Tomas?) says that it's better if the engine knows
      how many rows are going to be inserted, then it can allocate needed memory
      from the start.
    */
  }
8535 8536 8537 8538 8539 8540 8541 8542 8543 8544 8545 8546 8547 8548 8549 8550

  /*
    We need TIMESTAMP_NO_AUTO_SET otherwise ha_write_row() will not use fill
    any TIMESTAMP column with data from the row but instead will use
    the event's current time.
    As we replicate from TIMESTAMP to TIMESTAMP and slave has no extra
    columns, we know that all TIMESTAMP columns on slave will receive explicit
    data from the row, so TIMESTAMP_NO_AUTO_SET is ok.
    When we allow a table without TIMESTAMP to be replicated to a table having
    more columns including a TIMESTAMP column, or when we allow a TIMESTAMP
    column to be replicated into a BIGINT column and the slave's table has a
    TIMESTAMP column, then the slave's TIMESTAMP column will take its value
    from set_time() which we called earlier (consistent with SBR). And then in
    some cases we won't want TIMESTAMP_NO_AUTO_SET (will require some code to
    analyze if explicit data is provided for slave's TIMESTAMP columns).
  */
8551
  m_table->timestamp_field_type= TIMESTAMP_NO_AUTO_SET;
8552 8553 8554
  
  /* Honor next number column if present */
  m_table->next_number_field= m_table->found_next_number_field;
8555 8556 8557 8558 8559 8560 8561 8562 8563 8564
  /*
   * Fixed Bug#45999, In RBR, Store engine of Slave auto-generates new
   * sequence numbers for auto_increment fields if the values of them are 0.
   * If generateing a sequence number is decided by the values of
   * table->auto_increment_field_not_null and SQL_MODE(if includes
   * MODE_NO_AUTO_VALUE_ON_ZERO) in update_auto_increment function.
   * SQL_MODE of slave sql thread is always consistency with master's.
   * In RBR, auto_increment fields never are NULL.
   */
  m_table->auto_increment_field_not_null= TRUE;
8565 8566 8567
  return error;
}

8568
int 
8569
Write_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const,
8570
                                              int error)
8571
{
8572
  int local_error= 0;
8573
  m_table->next_number_field=0;
8574
  m_table->auto_increment_field_not_null= FALSE;
8575
  if ((slave_exec_mode == SLAVE_EXEC_MODE_IDEMPOTENT) ||
8576 8577 8578 8579 8580 8581 8582 8583 8584 8585 8586 8587
      m_table->s->db_type()->db_type == DB_TYPE_NDBCLUSTER)
  {
    m_table->file->extra(HA_EXTRA_NO_IGNORE_DUP_KEY);
    m_table->file->extra(HA_EXTRA_WRITE_CANNOT_REPLACE);
    /*
      resetting the extra with 
      table->file->extra(HA_EXTRA_NO_IGNORE_NO_KEY); 
      fires bug#27077
      explanation: file->reset() performs this duty
      ultimately. Still todo: fix
    */
  }
8588
  if ((local_error= m_table->file->ha_end_bulk_insert()))
8589
  {
8590
    m_table->file->print_error(local_error, MYF(0));
8591 8592
  }
  return error? error : local_error;
8593 8594
}

8595
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
8596 8597 8598 8599 8600 8601 8602 8603 8604 8605 8606 8607 8608

/*
  Check if there are more UNIQUE keys after the given key.
*/
static int
last_uniq_key(TABLE *table, uint keyno)
{
  while (++keyno < table->s->keys)
    if (table->key_info[keyno].flags & HA_NOSAME)
      return 0;
  return 1;
}

8609 8610 8611 8612 8613 8614 8615 8616 8617 8618 8619 8620 8621 8622 8623 8624 8625 8626 8627 8628 8629 8630 8631 8632 8633
/**
   Check if an error is a duplicate key error.

   This function is used to check if an error code is one of the
   duplicate key error, i.e., and error code for which it is sensible
   to do a <code>get_dup_key()</code> to retrieve the duplicate key.

   @param errcode The error code to check.

   @return <code>true</code> if the error code is such that
   <code>get_dup_key()</code> will return true, <code>false</code>
   otherwise.
 */
bool
is_duplicate_key_error(int errcode)
{
  switch (errcode)
  {
  case HA_ERR_FOUND_DUPP_KEY:
  case HA_ERR_FOUND_DUPP_UNIQUE:
    return true;
  }
  return false;
}

8634 8635
/**
  Write the current row into event's table.
8636

8637 8638 8639 8640 8641
  The row is located in the row buffer, pointed by @c m_curr_row member.
  Number of columns of the row is stored in @c m_width member (it can be 
  different from the number of columns in the table to which we insert). 
  Bitmap @c m_cols indicates which columns are present in the row. It is assumed 
  that event's table is already open and pointed by @c m_table.
8642

8643 8644 8645 8646 8647
  If the same record already exists in the table it can be either overwritten 
  or an error is reported depending on the value of @c overwrite flag 
  (error reporting not yet implemented). Note that the matching record can be
  different from the row we insert if we use primary keys to identify records in
  the table.
8648

8649 8650 8651 8652
  The row to be inserted can contain values only for selected columns. The 
  missing columns are filled with default values using @c prepare_record() 
  function. If a matching record is found in the table and @c overwritte is
  true, the missing columns are taken from it.
8653

8654 8655 8656 8657 8658 8659 8660 8661 8662 8663 8664 8665 8666 8667 8668 8669
  @param  rli   Relay log info (needed for row unpacking).
  @param  overwrite  
                Shall we overwrite if the row already exists or signal 
                error (currently ignored).

  @returns Error code on failure, 0 on success.

  This method, if successful, sets @c m_curr_row_end pointer to point at the
  next row in the rows buffer. This is done when unpacking the row to be 
  inserted.

  @note If a matching record is found, it is either updated using 
  @c ha_update_row() or first deleted and then new record written.
*/ 

int
8670
Rows_log_event::write_row(const Relay_log_info *const rli,
8671
                          const bool overwrite)
8672
{
8673 8674
  DBUG_ENTER("write_row");
  DBUG_ASSERT(m_table != NULL && thd != NULL);
8675

8676
  TABLE *table= m_table;  // pointer to event's table
8677 8678 8679 8680
  int error;
  int keynum;
  auto_afree_ptr<char> key(NULL);

8681
  /* fill table->record[0] with default values */
8682 8683
  bool abort_on_warnings= (rli->sql_thd->variables.sql_mode &
                           (MODE_STRICT_TRANS_TABLES | MODE_STRICT_ALL_TABLES));
8684
  if ((error= prepare_record(table, m_width,
8685
                             table->file->ht->db_type != DB_TYPE_NDBCLUSTER,
8686
                             abort_on_warnings, m_curr_row == m_rows_buf)))
8687 8688 8689
    DBUG_RETURN(error);
  
  /* unpack row into table->record[0] */
8690 8691 8692
  if ((error= unpack_current_row(rli, abort_on_warnings)))
    DBUG_RETURN(error);

8693 8694 8695 8696 8697 8698 8699 8700 8701 8702
  if (m_curr_row == m_rows_buf)
  {
    /* this is the first row to be inserted, we estimate the rows with
       the size of the first row and use that value to initialize
       storage engine for bulk insertion */
    ulong estimated_rows= (m_rows_end - m_curr_row) / (m_curr_row_end - m_curr_row);
    m_table->file->ha_start_bulk_insert(estimated_rows);
  }
  
  
8703
#ifndef DBUG_OFF
8704
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
8705 8706 8707 8708
  DBUG_PRINT_BITSET("debug", "write_set = %s", table->write_set);
  DBUG_PRINT_BITSET("debug", "read_set = %s", table->read_set);
#endif

8709 8710 8711 8712 8713 8714 8715 8716
  /* 
    Try to write record. If a corresponding record already exists in the table,
    we try to change it using ha_update_row() if possible. Otherwise we delete
    it and repeat the whole process again. 

    TODO: Add safety measures against infinite looping. 
   */

8717 8718
  while ((error= table->file->ha_write_row(table->record[0])))
  {
8719 8720 8721 8722
    if (error == HA_ERR_LOCK_DEADLOCK ||
        error == HA_ERR_LOCK_WAIT_TIMEOUT ||
        (keynum= table->file->get_dup_key(error)) < 0 ||
        !overwrite)
8723
    {
8724
      DBUG_PRINT("info",("get_dup_key returns %d)", keynum));
8725
      /*
8726 8727 8728
        Deadlock, waiting for lock or just an error from the handler
        such as HA_ERR_FOUND_DUPP_KEY when overwrite is false.
        Retrieval of the duplicate key number may fail
8729 8730 8731
        - either because the error was not "duplicate key" error
        - or because the information which key is not available
      */
8732
      table->file->print_error(error, MYF(0));
8733
      DBUG_RETURN(error);
8734 8735 8736 8737 8738 8739 8740 8741 8742 8743 8744
    }
    /*
       We need to retrieve the old row into record[1] to be able to
       either update or delete the offending record.  We either:

       - use rnd_pos() with a row-id (available as dupp_row) to the
         offending row, if that is possible (MyISAM and Blackhole), or else

       - use index_read_idx() with the key that is duplicated, to
         retrieve the offending row.
     */
8745
    if (table->file->ha_table_flags() & HA_DUPLICATE_POS)
8746
    {
8747
      DBUG_PRINT("info",("Locating offending record using rnd_pos()"));
8748
      error= table->file->rnd_pos(table->record[1], table->file->dup_ref);
8749
      if (error)
8750
      {
8751
        DBUG_PRINT("info",("rnd_pos() returns error %d",error));
8752 8753
        if (error == HA_ERR_RECORD_DELETED)
          error= HA_ERR_KEY_NOT_FOUND;
8754
        table->file->print_error(error, MYF(0));
8755
        DBUG_RETURN(error);
8756
      }
8757 8758 8759
    }
    else
    {
8760 8761
      DBUG_PRINT("info",("Locating offending record using index_read_idx()"));

8762 8763
      if (table->file->extra(HA_EXTRA_FLUSH_CACHE))
      {
8764
        DBUG_PRINT("info",("Error when setting HA_EXTRA_FLUSH_CACHE"));
8765
        DBUG_RETURN(my_errno);
8766 8767 8768 8769 8770 8771
      }

      if (key.get() == NULL)
      {
        key.assign(static_cast<char*>(my_alloca(table->s->max_unique_length)));
        if (key.get() == NULL)
8772 8773
        {
          DBUG_PRINT("info",("Can't allocate key buffer"));
8774
          DBUG_RETURN(ENOMEM);
8775
        }
8776 8777
      }

8778 8779
      key_copy((uchar*)key.get(), table->record[0], table->key_info + keynum,
               0);
8780 8781 8782 8783
      error= table->file->index_read_idx_map(table->record[1], keynum,
                                             (const uchar*)key.get(),
                                             HA_WHOLE_KEY,
                                             HA_READ_KEY_EXACT);
8784
      if (error)
8785
      {
8786 8787 8788
        DBUG_PRINT("info",("index_read_idx() returns %s", HA_ERR(error)));
        if (error == HA_ERR_RECORD_DELETED)
          error= HA_ERR_KEY_NOT_FOUND;
8789
        table->file->print_error(error, MYF(0));
8790
        DBUG_RETURN(error);
8791
      }
8792 8793 8794
    }

    /*
8795
       Now, record[1] should contain the offending row.  That
8796 8797
       will enable us to update it or, alternatively, delete it (so
       that we can insert the new row afterwards).
8798
     */
8799

8800 8801 8802
    /*
      If row is incomplete we will use the record found to fill 
      missing columns.  
8803
    */
8804 8805 8806 8807 8808 8809 8810 8811 8812 8813 8814
    if (!get_flags(COMPLETE_ROWS_F))
    {
      restore_record(table,record[1]);
      error= unpack_current_row(rli);
    }

#ifndef DBUG_OFF
    DBUG_PRINT("debug",("preparing for update: before and after image"));
    DBUG_DUMP("record[1] (before)", table->record[1], table->s->reclength);
    DBUG_DUMP("record[0] (after)", table->record[0], table->s->reclength);
#endif
8815

8816
    /*
8817 8818 8819 8820 8821 8822 8823 8824 8825 8826 8827 8828 8829 8830 8831 8832 8833
       REPLACE is defined as either INSERT or DELETE + INSERT.  If
       possible, we can replace it with an UPDATE, but that will not
       work on InnoDB if FOREIGN KEY checks are necessary.

       I (Matz) am not sure of the reason for the last_uniq_key()
       check as, but I'm guessing that it's something along the
       following lines.

       Suppose that we got the duplicate key to be a key that is not
       the last unique key for the table and we perform an update:
       then there might be another key for which the unique check will
       fail, so we're better off just deleting the row and inserting
       the correct row.
     */
    if (last_uniq_key(table, keynum) &&
        !table->file->referenced_by_foreign_key())
    {
8834
      DBUG_PRINT("info",("Updating row using ha_update_row()"));
8835 8836
      error=table->file->ha_update_row(table->record[1],
                                       table->record[0]);
8837 8838 8839 8840 8841
      switch (error) {
                
      case HA_ERR_RECORD_IS_THE_SAME:
        DBUG_PRINT("info",("ignoring HA_ERR_RECORD_IS_THE_SAME error from"
                           " ha_update_row()"));
8842
        error= 0;
8843 8844 8845 8846 8847 8848
      
      case 0:
        break;
        
      default:    
        DBUG_PRINT("info",("ha_update_row() returns error %d",error));
8849
        table->file->print_error(error, MYF(0));
8850 8851
      }
      
8852
      DBUG_RETURN(error);
8853 8854 8855
    }
    else
    {
8856
      DBUG_PRINT("info",("Deleting offending row and trying to write new one again"));
8857
      if ((error= table->file->ha_delete_row(table->record[1])))
8858
      {
8859
        DBUG_PRINT("info",("ha_delete_row() returns error %d",error));
8860
        table->file->print_error(error, MYF(0));
8861
        DBUG_RETURN(error);
8862
      }
8863 8864 8865
      /* Will retry ha_write_row() with the offending row removed. */
    }
  }
8866

8867
  DBUG_RETURN(error);
8868 8869
}

8870 8871 8872
#endif

int 
8873
Write_rows_log_event::do_exec_row(const Relay_log_info *const rli)
8874
{
8875
  DBUG_ASSERT(m_table != NULL);
8876
  int error= write_row(rli, slave_exec_mode == SLAVE_EXEC_MODE_IDEMPOTENT);
8877
    
8878 8879 8880 8881 8882
  if (error && !thd->is_error())
  {
    DBUG_ASSERT(0);
    my_error(ER_UNKNOWN_ERROR, MYF(0));
  }
8883
  
8884
  return error; 
8885
}
8886

8887 8888 8889 8890 8891
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Write_rows_log_event::print(FILE *file, PRINT_EVENT_INFO* print_event_info)
{
8892
  Rows_log_event::print_helper(file, print_event_info, "Write_rows");
8893 8894 8895 8896 8897 8898 8899 8900
}
#endif

/**************************************************************************
	Delete_rows_log_event member functions
**************************************************************************/

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
8901 8902 8903 8904 8905 8906
/*
  Compares table->record[0] and table->record[1]

  Returns TRUE if different.
*/
static bool record_compare(TABLE *table)
8907
{
8908 8909 8910 8911 8912 8913 8914 8915 8916 8917 8918 8919
  /*
    Need to set the X bit and the filler bits in both records since
    there are engines that do not set it correctly.

    In addition, since MyISAM checks that one hasn't tampered with the
    record, it is necessary to restore the old bytes into the record
    after doing the comparison.

    TODO[record format ndb]: Remove it once NDB returns correct
    records. Check that the other engines also return correct records.
   */

8920 8921 8922
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
  DBUG_DUMP("record[1]", table->record[1], table->s->reclength);

8923
  bool result= FALSE;
8924
  uchar saved_x[2]= {0, 0}, saved_filler[2]= {0, 0};
8925 8926 8927 8928 8929 8930 8931 8932 8933 8934 8935 8936 8937

  if (table->s->null_bytes > 0)
  {
    for (int i = 0 ; i < 2 ; ++i)
    {
      saved_x[i]= table->record[i][0];
      saved_filler[i]= table->record[i][table->s->null_bytes - 1];
      table->record[i][0]|= 1U;
      table->record[i][table->s->null_bytes - 1]|=
        256U - (1U << table->s->last_null_bit_pos);
    }
  }

8938
  if (table->s->blob_fields + table->s->varchar_fields == 0)
8939 8940 8941 8942 8943
  {
    result= cmp_record(table,record[1]);
    goto record_compare_exit;
  }

8944 8945 8946 8947
  /* Compare null bits */
  if (memcmp(table->null_flags,
	     table->null_flags+table->s->rec_buff_length,
	     table->s->null_bytes))
8948 8949 8950 8951 8952
  {
    result= TRUE;				// Diff in NULL value
    goto record_compare_exit;
  }

8953 8954
  /* Compare updated fields */
  for (Field **ptr=table->field ; *ptr ; ptr++)
8955
  {
8956
    if ((*ptr)->cmp_binary_offset(table->s->rec_buff_length))
8957 8958 8959 8960
    {
      result= TRUE;
      goto record_compare_exit;
    }
8961
  }
8962 8963 8964 8965 8966 8967 8968 8969 8970 8971 8972 8973 8974 8975 8976

record_compare_exit:
  /*
    Restore the saved bytes.

    TODO[record format ndb]: Remove this code once NDB returns the
    correct record format.
  */
  if (table->s->null_bytes > 0)
  {
    for (int i = 0 ; i < 2 ; ++i)
    {
      table->record[i][0]= saved_x[i];
      table->record[i][table->s->null_bytes - 1]= saved_filler[i];
    }
8977
  }
8978 8979

  return result;
8980 8981
}

8982 8983
/**
  Locate the current row in event's table.
8984

8985 8986 8987 8988
  The current row is pointed by @c m_curr_row. Member @c m_width tells how many 
  columns are there in the row (this can be differnet from the number of columns 
  in the table). It is assumed that event's table is already open and pointed 
  by @c m_table.
8989

8990 8991 8992
  If a corresponding record is found in the table it is stored in 
  @c m_table->record[0]. Note that when record is located based on a primary 
  key, it is possible that the record found differs from the row being located.
8993

8994 8995 8996 8997 8998
  If no key is specified or table does not have keys, a table scan is used to 
  find the row. In that case the row should be complete and contain values for
  all columns. However, it can still be shorter than the table, i.e. the table 
  can contain extra columns not present in the row. It is also possible that 
  the table has fewer columns than the row being located. 
8999

9000 9001 9002 9003
  @returns Error code on failure, 0 on success. 
  
  @post In case of success @c m_table->record[0] contains the record found. 
  Also, the internal "cursor" of the table is positioned at the record found.
9004

9005 9006
  @note If the engine allows random access of the records, a combination of
  @c position() and @c rnd_pos() will be used. 
9007
 */
9008

9009
int Rows_log_event::find_row(const Relay_log_info *rli)
9010
{
9011
  DBUG_ENTER("Rows_log_event::find_row");
9012 9013

  DBUG_ASSERT(m_table && m_table->in_use != NULL);
9014

9015
  TABLE *table= m_table;
9016
  int error= 0;
9017

9018 9019 9020 9021 9022 9023 9024 9025 9026
  /*
    rpl_row_tabledefs.test specifies that
    if the extra field on the slave does not have a default value
    and this is okay with Delete or Update events.
    Todo: fix wl3228 hld that requires defauls for all types of events
  */
  
  prepare_record(table, m_width, FALSE);
  error= unpack_current_row(rli);
9027

9028 9029
#ifndef DBUG_OFF
  DBUG_PRINT("info",("looking for the following record"));
9030
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
9031
#endif
9032

9033 9034
  if ((table->file->ha_table_flags() & HA_PRIMARY_KEY_REQUIRED_FOR_POSITION) &&
      table->s->primary_key < MAX_KEY)
9035 9036 9037 9038 9039 9040
  {
    /*
      Use a more efficient method to fetch the record given by
      table->record[0] if the engine allows it.  We first compute a
      row reference using the position() member function (it will be
      stored in table->file->ref) and the use rnd_pos() to position
9041
      the "cursor" (i.e., record[0] in this case) at the correct row.
9042 9043 9044 9045 9046 9047 9048 9049 9050 9051 9052

      TODO: Add a check that the correct record has been fetched by
      comparing with the original record. Take into account that the
      record on the master and slave can be of different
      length. Something along these lines should work:

      ADD>>>  store_record(table,record[1]);
              int error= table->file->rnd_pos(table->record[0], table->file->ref);
      ADD>>>  DBUG_ASSERT(memcmp(table->record[1], table->record[0],
                                 table->s->reclength) == 0);

9053
    */
9054
    DBUG_PRINT("info",("locating record using primary key (position)"));
9055
    int error= table->file->rnd_pos_by_record(table->record[0]);
9056 9057 9058
    if (error)
    {
      DBUG_PRINT("info",("rnd_pos returns error %d",error));
9059 9060
      if (error == HA_ERR_RECORD_DELETED)
        error= HA_ERR_KEY_NOT_FOUND;
9061 9062
      table->file->print_error(error, MYF(0));
    }
9063
    DBUG_RETURN(error);
9064 9065
  }

9066
  // We can't use position() - try other methods.
9067 9068 9069 9070 9071
  
  /* 
    We need to retrieve all fields
    TODO: Move this out from this function to main loop 
   */
9072
  table->use_all_columns();
unknown's avatar
unknown committed
9073

9074 9075 9076 9077 9078 9079
  /*
    Save copy of the record in table->record[1]. It might be needed 
    later if linear search is used to find exact match.
   */ 
  store_record(table,record[1]);    

9080
  if (table->s->keys > 0 && table->s->keys_in_use.is_set(0))
9081
  {
9082 9083
    DBUG_PRINT("info",("locating record using primary key (index_read)"));

9084
    /* The 0th key is active: search the table using the index */
9085
    if (!table->file->inited && (error= table->file->ha_index_init(0, FALSE)))
9086 9087 9088
    {
      DBUG_PRINT("info",("ha_index_init returns error %d",error));
      table->file->print_error(error, MYF(0));
9089
      goto err;
9090
    }
9091

9092 9093 9094 9095 9096 9097 9098 9099 9100
    /* Fill key data for the row */

    DBUG_ASSERT(m_key);
    key_copy(m_key, table->record[0], table->key_info, 0);

    /*
      Don't print debug messages when running valgrind since they can
      trigger false warnings.
     */
9101
#ifndef HAVE_purify
9102
    DBUG_DUMP("key data", m_key, table->key_info->key_length);
9103 9104
#endif

9105 9106 9107 9108 9109 9110
    /*
      We need to set the null bytes to ensure that the filler bit are
      all set when returning.  There are storage engines that just set
      the necessary bits on the bytes and don't set the filler bits
      correctly.
    */
9111 9112 9113 9114
    if (table->s->null_bytes > 0)
      table->record[0][table->s->null_bytes - 1]|=
        256U - (1U << table->s->last_null_bit_pos);

9115
    if ((error= table->file->index_read_map(table->record[0], m_key, 
9116
                                            HA_WHOLE_KEY,
9117
                                            HA_READ_KEY_EXACT)))
9118
    {
9119
      DBUG_PRINT("info",("no record matching the key found in the table"));
9120 9121
      if (error == HA_ERR_RECORD_DELETED)
        error= HA_ERR_KEY_NOT_FOUND;
9122
      table->file->print_error(error, MYF(0));
9123
      table->file->ha_index_end();
9124
      goto err;
9125 9126
    }

9127 9128 9129 9130 9131
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
9132 9133
    DBUG_PRINT("info",("found first matching record")); 
    DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
9134
#endif
9135 9136 9137 9138 9139 9140 9141 9142 9143 9144 9145 9146 9147
    /*
      Below is a minor "optimization".  If the key (i.e., key number
      0) has the HA_NOSAME flag set, we know that we have found the
      correct record (since there can be no duplicates); otherwise, we
      have to compare the record with the one found to see if it is
      the correct one.

      CAVEAT! This behaviour is essential for the replication of,
      e.g., the mysql.proc table since the correct record *shall* be
      found using the primary key *only*.  There shall be no
      comparison of non-PK columns to decide if the correct record is
      found.  I can see no scenario where it would be incorrect to
      chose the row to change only using a PK or an UNNI.
9148
    */
9149
    if (table->key_info->flags & HA_NOSAME)
9150 9151
    {
      table->file->ha_index_end();
9152
      goto ok;
9153
    }
9154

9155 9156
    /*
      In case key is not unique, we still have to iterate over records found
9157 9158
      and find the one which is identical to the row given. A copy of the 
      record we are looking for is stored in record[1].
9159 9160 9161
     */ 
    DBUG_PRINT("info",("non-unique index, scanning it to find matching record")); 

9162
    while (record_compare(table))
9163
    {
9164 9165 9166 9167 9168
      /*
        We need to set the null bytes to ensure that the filler bit
        are all set when returning.  There are storage engines that
        just set the necessary bits on the bytes and don't set the
        filler bits correctly.
9169 9170 9171

        TODO[record format ndb]: Remove this code once NDB returns the
        correct record format.
9172
      */
9173 9174
      if (table->s->null_bytes > 0)
      {
9175
        table->record[0][table->s->null_bytes - 1]|=
9176 9177 9178
          256U - (1U << table->s->last_null_bit_pos);
      }

9179
      while ((error= table->file->index_next(table->record[0])))
9180
      {
9181 9182 9183
        /* We just skip records that has already been deleted */
        if (error == HA_ERR_RECORD_DELETED)
          continue;
9184 9185
        DBUG_PRINT("info",("no record matching the given row found"));
        table->file->print_error(error, MYF(0));
9186
        table->file->ha_index_end();
9187
        goto err;
9188 9189
      }
    }
9190 9191 9192 9193 9194

    /*
      Have to restart the scan to be able to fetch the next row.
    */
    table->file->ha_index_end();
9195 9196 9197
  }
  else
  {
9198 9199
    DBUG_PRINT("info",("locating record using table scan (rnd_next)"));

9200
    int restart_count= 0; // Number of times scanning has restarted from top
9201 9202 9203

    /* We don't have a key: search the table using rnd_next() */
    if ((error= table->file->ha_rnd_init(1)))
9204 9205 9206 9207
    {
      DBUG_PRINT("info",("error initializing table scan"
                         " (ha_rnd_init returns %d)",error));
      table->file->print_error(error, MYF(0));
9208
      goto err;
9209
    }
9210 9211

    /* Continue until we find the right record or have made a full loop */
9212 9213
    do
    {
9214
  restart_rnd_next:
9215
      error= table->file->rnd_next(table->record[0]);
9216

9217
      DBUG_PRINT("info", ("error: %s", HA_ERR(error)));
9218
      switch (error) {
9219

9220
      case 0:
9221
        break;
9222

9223 9224 9225 9226 9227 9228 9229
      /*
        If the record was deleted, we pick the next one without doing
        any comparisons.
      */
      case HA_ERR_RECORD_DELETED:
        goto restart_rnd_next;

9230
      case HA_ERR_END_OF_FILE:
9231 9232 9233
        if (++restart_count < 2)
          table->file->ha_rnd_init(1);
        break;
9234 9235

      default:
9236 9237 9238
        DBUG_PRINT("info", ("Failed to get next record"
                            " (rnd_next returns %d)",error));
        table->file->print_error(error, MYF(0));
9239
        table->file->ha_rnd_end();
9240
        goto err;
9241 9242
      }
    }
9243
    while (restart_count < 2 && record_compare(table));
9244 9245 9246 9247 9248
    
    /* 
      Note: above record_compare will take into accout all record fields 
      which might be incorrect in case a partial row was given in the event
     */
9249

9250 9251 9252
    /*
      Have to restart the scan to be able to fetch the next row.
    */
9253 9254
    if (restart_count == 2)
      DBUG_PRINT("info", ("Record not found"));
9255 9256
    else
      DBUG_DUMP("record found", table->record[0], table->s->reclength);
9257 9258
    table->file->ha_rnd_end();

9259
    DBUG_ASSERT(error == HA_ERR_END_OF_FILE || error == 0);
9260
    goto err;
9261
  }
9262 9263
ok:
  table->default_column_bitmaps();
9264
  DBUG_RETURN(0);
9265 9266 9267 9268

err:
  table->default_column_bitmaps();
  DBUG_RETURN(error);
9269
}
9270

9271 9272 9273 9274 9275 9276 9277 9278 9279 9280 9281 9282 9283 9284 9285 9286 9287 9288 9289 9290 9291 9292 9293 9294 9295 9296 9297 9298 9299
#endif

/*
  Constructor used to build an event for writing to the binary log.
 */

#ifndef MYSQL_CLIENT
Delete_rows_log_event::Delete_rows_log_event(THD *thd_arg, TABLE *tbl_arg,
                                             ulong tid, MY_BITMAP const *cols,
                                             bool is_transactional)
  : Rows_log_event(thd_arg, tbl_arg, tid, cols, is_transactional)
{
}
#endif /* #if !defined(MYSQL_CLIENT) */

/*
  Constructor used by slave to read the event from the binary log.
 */
#ifdef HAVE_REPLICATION
Delete_rows_log_event::Delete_rows_log_event(const char *buf, uint event_len,
                                             const Format_description_log_event
                                             *description_event)
  : Rows_log_event(buf, event_len, DELETE_ROWS_EVENT, description_event)
{
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)

9300 9301 9302 9303 9304
int 
Delete_rows_log_event::do_before_row_operations(const Slave_reporting_capability *const)
{
  if ((m_table->file->ha_table_flags() & HA_PRIMARY_KEY_REQUIRED_FOR_POSITION) &&
      m_table->s->primary_key < MAX_KEY)
9305 9306
  {
    /*
9307
      We don't need to allocate any memory for m_key since it is not used.
9308 9309 9310 9311
    */
    return 0;
  }

9312
  if (m_table->s->keys > 0)
9313
  {
9314 9315 9316 9317
    // Allocate buffer for key searches
    m_key= (uchar*)my_malloc(m_table->key_info->key_length, MYF(MY_WME));
    if (!m_key)
      return HA_ERR_OUT_OF_MEM;
9318
  }
9319
  return 0;
9320 9321
}

9322 9323 9324
int 
Delete_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const, 
                                               int error)
9325 9326
{
  /*error= ToDo:find out what this should really be, this triggers close_scan in nbd, returning error?*/
9327 9328
  m_table->file->ha_index_or_rnd_end();
  my_free(m_key, MYF(MY_ALLOW_ZERO_PTR));
9329
  m_key= NULL;
9330 9331 9332 9333

  return error;
}

9334
int Delete_rows_log_event::do_exec_row(const Relay_log_info *const rli)
9335
{
9336
  int error;
9337
  DBUG_ASSERT(m_table != NULL);
9338

9339
  if (!(error= find_row(rli))) 
9340 9341
  { 
    /*
9342
      Delete the record found, located in record[0]
9343
    */
9344
    error= m_table->file->ha_delete_row(m_table->record[0]);
9345
  }
9346 9347 9348 9349 9350 9351 9352 9353 9354
  return error;
}

#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Delete_rows_log_event::print(FILE *file,
                                  PRINT_EVENT_INFO* print_event_info)
{
9355
  Rows_log_event::print_helper(file, print_event_info, "Delete_rows");
9356 9357 9358 9359 9360 9361 9362 9363 9364 9365 9366 9367 9368
}
#endif


/**************************************************************************
	Update_rows_log_event member functions
**************************************************************************/

/*
  Constructor used to build an event for writing to the binary log.
 */
#if !defined(MYSQL_CLIENT)
Update_rows_log_event::Update_rows_log_event(THD *thd_arg, TABLE *tbl_arg,
9369 9370 9371 9372 9373 9374 9375 9376 9377 9378 9379 9380
                                             ulong tid,
                                             MY_BITMAP const *cols_bi,
                                             MY_BITMAP const *cols_ai,
                                             bool is_transactional)
: Rows_log_event(thd_arg, tbl_arg, tid, cols_bi, is_transactional)
{
  init(cols_ai);
}

Update_rows_log_event::Update_rows_log_event(THD *thd_arg, TABLE *tbl_arg,
                                             ulong tid,
                                             MY_BITMAP const *cols,
9381 9382 9383
                                             bool is_transactional)
: Rows_log_event(thd_arg, tbl_arg, tid, cols, is_transactional)
{
9384 9385 9386 9387 9388
  init(cols);
}

void Update_rows_log_event::init(MY_BITMAP const *cols)
{
9389
  /* if bitmap_init fails, caught in is_valid() */
9390 9391
  if (likely(!bitmap_init(&m_cols_ai,
                          m_width <= sizeof(m_bitbuf_ai)*8 ? m_bitbuf_ai : NULL,
9392
                          m_width,
9393 9394 9395 9396
                          false)))
  {
    /* Cols can be zero if this is a dummy binrows event */
    if (likely(cols != NULL))
9397
    {
9398
      memcpy(m_cols_ai.bitmap, cols->bitmap, no_bytes_in_map(cols));
9399 9400
      create_last_word_mask(&m_cols_ai);
    }
9401
  }
9402 9403 9404
}
#endif /* !defined(MYSQL_CLIENT) */

9405 9406 9407 9408 9409 9410 9411 9412 9413

Update_rows_log_event::~Update_rows_log_event()
{
  if (m_cols_ai.bitmap == m_bitbuf_ai) // no my_malloc happened
    m_cols_ai.bitmap= 0; // so no my_free in bitmap_free
  bitmap_free(&m_cols_ai); // To pair with bitmap_init().
}


9414 9415 9416 9417 9418 9419 9420 9421 9422 9423 9424 9425 9426 9427 9428
/*
  Constructor used by slave to read the event from the binary log.
 */
#ifdef HAVE_REPLICATION
Update_rows_log_event::Update_rows_log_event(const char *buf, uint event_len,
                                             const
                                             Format_description_log_event
                                             *description_event)
  : Rows_log_event(buf, event_len, UPDATE_ROWS_EVENT, description_event)
{
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)

9429 9430 9431 9432
int 
Update_rows_log_event::do_before_row_operations(const Slave_reporting_capability *const)
{
  if (m_table->s->keys > 0)
9433
  {
9434 9435 9436 9437
    // Allocate buffer for key searches
    m_key= (uchar*)my_malloc(m_table->key_info->key_length, MYF(MY_WME));
    if (!m_key)
      return HA_ERR_OUT_OF_MEM;
9438 9439
  }

9440
  m_table->timestamp_field_type= TIMESTAMP_NO_AUTO_SET;
9441

9442
  return 0;
9443 9444
}

9445 9446 9447
int 
Update_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const, 
                                               int error)
9448 9449
{
  /*error= ToDo:find out what this should really be, this triggers close_scan in nbd, returning error?*/
9450 9451
  m_table->file->ha_index_or_rnd_end();
  my_free(m_key, MYF(MY_ALLOW_ZERO_PTR)); // Free for multi_malloc
9452
  m_key= NULL;
9453 9454 9455 9456

  return error;
}

9457
int 
9458
Update_rows_log_event::do_exec_row(const Relay_log_info *const rli)
9459
{
9460
  DBUG_ASSERT(m_table != NULL);
9461

9462 9463
  int error= find_row(rli); 
  if (error)
9464 9465 9466 9467 9468 9469 9470
  {
    /*
      We need to read the second image in the event of error to be
      able to skip to the next pair of updates
    */
    m_curr_row= m_curr_row_end;
    unpack_current_row(rli);
9471
    return error;
9472
  }
9473

9474
  /*
9475
    This is the situation after locating BI:
9476

9477 9478 9479
    ===|=== before image ====|=== after image ===|===
       ^                     ^
       m_curr_row            m_curr_row_end
9480

9481 9482 9483
    BI found in the table is stored in record[0]. We copy it to record[1]
    and unpack AI to record[0].
   */
9484

9485
  store_record(m_table,record[1]);
9486

9487 9488
  bool abort_on_warnings= (rli->sql_thd->variables.sql_mode &
                           (MODE_STRICT_TRANS_TABLES | MODE_STRICT_ALL_TABLES));
9489
  m_curr_row= m_curr_row_end;
9490 9491 9492
  /* this also updates m_curr_row_end */
  if ((error= unpack_current_row(rli, abort_on_warnings)))
    return error;
9493

9494
  /*
9495
    Now we have the right row to update.  The old row (the one we're
9496
    looking for) is in record[1] and the new row is in record[0].
9497
  */
9498 9499 9500 9501 9502 9503 9504 9505 9506 9507 9508
#ifndef HAVE_purify
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
  DBUG_PRINT("info",("Updating row in table"));
  DBUG_DUMP("old record", m_table->record[1], m_table->s->reclength);
  DBUG_DUMP("new values", m_table->record[0], m_table->s->reclength);
#endif

  error= m_table->file->ha_update_row(m_table->record[1], m_table->record[0]);
9509 9510
  if (error == HA_ERR_RECORD_IS_THE_SAME)
    error= 0;
9511 9512 9513

  return error;
}
9514

9515 9516 9517 9518 9519 9520
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Update_rows_log_event::print(FILE *file,
				  PRINT_EVENT_INFO* print_event_info)
{
9521
  Rows_log_event::print_helper(file, print_event_info, "Update_rows");
9522 9523 9524
}
#endif

9525 9526 9527 9528 9529 9530 9531 9532 9533 9534 9535 9536 9537 9538

Incident_log_event::Incident_log_event(const char *buf, uint event_len,
                                       const Format_description_log_event *descr_event)
  : Log_event(buf, descr_event)
{
  DBUG_ENTER("Incident_log_event::Incident_log_event");
  uint8 const common_header_len=
    descr_event->common_header_len;
  uint8 const post_header_len=
    descr_event->post_header_len[INCIDENT_EVENT-1];

  DBUG_PRINT("info",("event_len: %u; common_header_len: %d; post_header_len: %d",
                     event_len, common_header_len, post_header_len));

9539 9540 9541 9542 9543 9544 9545
  int incident_number= uint2korr(buf + common_header_len);
  if (incident_number >= INCIDENT_COUNT ||
      incident_number <= INCIDENT_NONE)
  {
    // If the incident is not recognized, this binlog event is
    // invalid.  If we set incident_number to INCIDENT_NONE, the
    // invalidity will be detected by is_valid().
9546
    m_incident= INCIDENT_NONE;
9547 9548 9549
    DBUG_VOID_RETURN;
  }
  m_incident= static_cast<Incident>(incident_number);
9550 9551
  char const *ptr= buf + common_header_len + post_header_len;
  char const *const str_end= buf + event_len;
unknown's avatar
unknown committed
9552 9553
  uint8 len= 0;                   // Assignment to keep compiler happy
  const char *str= NULL;          // Assignment to keep compiler happy
9554 9555 9556 9557 9558 9559 9560 9561 9562 9563 9564 9565 9566 9567 9568 9569 9570 9571 9572 9573 9574 9575 9576 9577 9578 9579 9580 9581 9582 9583 9584
  read_str(&ptr, str_end, &str, &len);
  m_message.str= const_cast<char*>(str);
  m_message.length= len;
  DBUG_PRINT("info", ("m_incident: %d", m_incident));
  DBUG_VOID_RETURN;
}


Incident_log_event::~Incident_log_event()
{
}


const char *
Incident_log_event::description() const
{
  static const char *const description[]= {
    "NOTHING",                                  // Not used
    "LOST_EVENTS"
  };

  DBUG_PRINT("info", ("m_incident: %d", m_incident));

  return description[m_incident];
}


#ifndef MYSQL_CLIENT
void Incident_log_event::pack_info(Protocol *protocol)
{
  char buf[256];
9585
  size_t bytes;
9586 9587 9588 9589 9590 9591 9592 9593 9594 9595 9596 9597 9598 9599 9600 9601 9602 9603 9604 9605 9606
  if (m_message.length > 0)
    bytes= my_snprintf(buf, sizeof(buf), "#%d (%s)",
                       m_incident, description());
  else
    bytes= my_snprintf(buf, sizeof(buf), "#%d (%s): %s",
                       m_incident, description(), m_message.str);
  protocol->store(buf, bytes, &my_charset_bin);
}
#endif


#ifdef MYSQL_CLIENT
void
Incident_log_event::print(FILE *file,
                          PRINT_EVENT_INFO *print_event_info)
{
  if (print_event_info->short_form)
    return;

  Write_on_release_cache cache(&print_event_info->head_cache, file);
  print_header(&cache, print_event_info, FALSE);
9607
  my_b_printf(&cache, "\n# Incident: %s\nRELOAD DATABASE; # Shall generate syntax error\n", description());
9608 9609 9610 9611 9612
}
#endif

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
int
9613
Incident_log_event::do_apply_event(Relay_log_info const *rli)
9614
{
9615
  DBUG_ENTER("Incident_log_event::do_apply_event");
9616 9617 9618 9619
  rli->report(ERROR_LEVEL, ER_SLAVE_INCIDENT,
              ER(ER_SLAVE_INCIDENT),
              description(),
              m_message.length > 0 ? m_message.str : "<none>");
9620 9621 9622 9623 9624 9625 9626 9627 9628
  DBUG_RETURN(1);
}
#endif

bool
Incident_log_event::write_data_header(IO_CACHE *file)
{
  DBUG_ENTER("Incident_log_event::write_data_header");
  DBUG_PRINT("enter", ("m_incident: %d", m_incident));
9629
  uchar buf[sizeof(int16)];
9630 9631 9632 9633 9634 9635 9636 9637
  int2store(buf, (int16) m_incident);
  DBUG_RETURN(my_b_safe_write(file, buf, sizeof(buf)));
}

bool
Incident_log_event::write_data_body(IO_CACHE *file)
{
  DBUG_ENTER("Incident_log_event::write_data_body");
9638
  DBUG_RETURN(write_str(file, m_message.str, (uint) m_message.length));
9639
}
9640 9641 9642 9643 9644 9645 9646 9647 9648


#ifdef MYSQL_CLIENT
/**
  The default values for these variables should be values that are
  *incorrect*, i.e., values that cannot occur in an event.  This way,
  they will always be printed for the first event.
*/
st_print_event_info::st_print_event_info()
9649
  :flags2_inited(0), sql_mode_inited(0), sql_mode(0),
9650 9651 9652 9653 9654 9655 9656 9657 9658 9659 9660 9661 9662 9663 9664 9665 9666 9667 9668 9669 9670
   auto_increment_increment(0),auto_increment_offset(0), charset_inited(0),
   lc_time_names_number(~0),
   charset_database_number(ILLEGAL_CHARSET_INFO_NUMBER),
   thread_id(0), thread_id_printed(false),
   base64_output_mode(BASE64_OUTPUT_UNSPEC), printed_fd_event(FALSE)
{
  /*
    Currently we only use static PRINT_EVENT_INFO objects, so zeroed at
    program's startup, but these explicit bzero() is for the day someone
    creates dynamic instances.
  */
  bzero(db, sizeof(db));
  bzero(charset, sizeof(charset));
  bzero(time_zone_str, sizeof(time_zone_str));
  delimiter[0]= ';';
  delimiter[1]= 0;
  myf const flags = MYF(MY_WME | MY_NABP);
  open_cached_file(&head_cache, NULL, NULL, 0, flags);
  open_cached_file(&body_cache, NULL, NULL, 0, flags);
}
#endif
Andrei Elkin's avatar
Andrei Elkin committed
9671 9672 9673 9674 9675 9676 9677 9678 9679 9680 9681 9682 9683


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
Heartbeat_log_event::Heartbeat_log_event(const char* buf, uint event_len,
                    const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
{
  uint8 header_size= description_event->common_header_len;
  ident_len = event_len - header_size;
  set_if_smaller(ident_len,FN_REFLEN-1);
  log_ident= buf + header_size;
}
#endif