log_event.cc 300 KB
Newer Older
1
/* Copyright 2000-2008 MySQL AB, 2008 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 19 20 21
#ifdef MYSQL_CLIENT

#include "mysql_priv.h"

#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
#include "mysql_priv.h"
28
#include "slave.h"
29 30
#include "rpl_rli.h"
#include "rpl_mi.h"
unknown's avatar
unknown committed
31
#include "rpl_filter.h"
32
#include "rpl_utility.h"
unknown's avatar
unknown committed
33
#include "rpl_record.h"
34
#include <my_dir.h>
35

unknown's avatar
unknown committed
36
#endif /* MYSQL_CLIENT */
37

38 39
#include <base64.h>
#include <my_bitmap.h>
unknown's avatar
unknown committed
40

unknown's avatar
unknown committed
41
#define log_cs	&my_charset_latin1
42

43 44
#define FLAGSTR(V,F) ((V)&(F)?#F" ":"")

45 46 47 48 49 50 51 52 53 54

/*
  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)


55
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
56 57
static int rows_event_stmt_cleanup(Relay_log_info const *rli, THD* thd);

58 59 60 61 62 63 64 65 66 67 68 69 70 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
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";
110
  case HA_ERR_ROWS_EVENT_APPLY : return "HA_ERR_ROWS_EVENT_APPLY";
111
  }
112 113 114 115
  return 0;
}

/**
116 117 118 119 120 121 122 123 124 125 126
   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)

127 128 129 130 131 132
*/
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)
{
133 134 135 136
  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
137
  List_iterator_fast<MYSQL_ERROR> it(thd->warning_info->warn_list());
138 139 140 141 142 143 144
  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
145 146
                     " %s, Error_code: %d;", err->get_message_text(),
                     err->get_sql_errno());
147 148
  }
  
Marc Alff's avatar
Marc Alff committed
149
  rli->report(level, thd->is_error()? thd->stmt_da->sql_errno() : 0,
150
              "Could not execute %s event on table %s.%s;"
151
              "%s handler error %s; "
152 153 154
              "the event's master log %s, end_log_pos %lu",
              type, table->s->db.str,
              table->s->table_name.str,
155
              buff,
156 157
              handler_error == NULL? "<unknown>" : handler_error,
              log_name, pos);
158 159 160
}
#endif

161 162 163 164 165 166 167 168 169 170 171 172 173 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
/*
  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()
  {
205
    copy_event_cache_to_file_and_reinit(m_cache, m_file);
206 207 208 209 210 211 212 213 214 215 216
    if (m_flags | FLUSH_F)
      fflush(m_file);
  }

  /*
    Return a pointer to the internal IO_CACHE.

    SYNOPSIS
      operator&()

    DESCRIPTION
217 218 219 220

      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
221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238

    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;
};

239 240 241
#ifndef DBUG_OFF
uint debug_not_change_ts_if_art_event= 1; // bug#29309 simulation
#endif
242

unknown's avatar
unknown committed
243
/*
244
  pretty_print_str()
unknown's avatar
unknown committed
245
*/
246

247
#ifdef MYSQL_CLIENT
248
static void pretty_print_str(IO_CACHE* cache, const char* str, int len)
unknown's avatar
unknown committed
249
{
250
  const char* end = str + len;
251
  my_b_printf(cache, "\'");
252 253
  while (str < end)
  {
unknown's avatar
unknown committed
254
    char c;
255
    switch ((c=*str++)) {
256 257 258 259 260 261 262
    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;
263
    default:
264
      my_b_printf(cache, "%c", c);
265 266
      break;
    }
267
  }
268
  my_b_printf(cache, "\'");
unknown's avatar
unknown committed
269
}
unknown's avatar
unknown committed
270
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
271

unknown's avatar
unknown committed
272
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
273

274
static void clear_all_errors(THD *thd, Relay_log_info *rli)
275
{
276
  thd->is_slave_error = 0;
277
  thd->clear_error();
278
  rli->clear_error();
279 280
}

281 282 283 284 285 286 287 288 289 290 291 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
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
322

unknown's avatar
unknown committed
323 324
/**
  Ignore error code specified on command line.
unknown's avatar
unknown committed
325
*/
326

327 328
inline int ignored_error_code(int err_code)
{
unknown's avatar
unknown committed
329 330 331 332 333 334 335 336 337 338 339 340 341 342
#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
343 344
  return ((err_code == ER_SLAVE_IGNORED_TABLE) ||
          (use_slave_mask && bitmap_is_set(&slave_error_mask, err_code)));
345
}
346

347 348 349 350 351 352 353 354 355 356
/*
  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
357
  uint actual_error= (thd->is_error() ? thd->stmt_da->sql_errno() :
358 359 360 361 362
                           0);

  if (actual_error == 0)
  {
    table->file->print_error(error, MYF(0));
Marc Alff's avatar
Marc Alff committed
363
    actual_error= (thd->is_error() ? thd->stmt_da->sql_errno() :
364 365 366 367 368 369 370 371
                        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
372

373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400
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
401
/*
402
  pretty_print_str()
unknown's avatar
unknown committed
403
*/
unknown's avatar
unknown committed
404

405
static char *pretty_print_str(char *packet, const char *str, int len)
unknown's avatar
unknown committed
406
{
407
  const char *end= str + len;
unknown's avatar
unknown committed
408
  char *pos= packet;
409
  *pos++= '\'';
410 411 412
  while (str < end)
  {
    char c;
413
    switch ((c=*str++)) {
unknown's avatar
unknown committed
414 415 416 417 418 419 420
    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;
421
    default:
unknown's avatar
unknown committed
422
      *pos++= c;
423 424
      break;
    }
unknown's avatar
unknown committed
425
  }
426 427
  *pos++= '\'';
  return pos;
unknown's avatar
unknown committed
428
}
unknown's avatar
unknown committed
429
#endif /* !MYSQL_CLIENT */
430

unknown's avatar
unknown committed
431

unknown's avatar
unknown committed
432
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
433

unknown's avatar
unknown committed
434 435
/**
  Creates a temporary name for load data infile:.
unknown's avatar
unknown committed
436

unknown's avatar
unknown committed
437 438 439 440
  @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
441

unknown's avatar
unknown committed
442
  @return
unknown's avatar
unknown committed
443
    Pointer to start of extension
unknown's avatar
unknown committed
444
*/
unknown's avatar
unknown committed
445

unknown's avatar
unknown committed
446 447
static char *slave_load_file_stem(char *buf, uint file_id,
                                  int event_server_id, const char *ext)
448
{
unknown's avatar
unknown committed
449
  char *res;
450
  fn_format(buf,PREFIX_SQL_LOAD,slave_load_tmpdir, "", MY_UNPACK_FILENAME);
451 452
  to_unix_path(buf);

453 454 455 456 457
  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
458 459 460
  res= int10_to_str(file_id, buf, 10);
  strmov(res, ext);                             // Add extension last
  return res;                                   // Pointer to extension
461
}
unknown's avatar
SCRUM  
unknown committed
462
#endif
463

unknown's avatar
unknown committed
464

unknown's avatar
unknown committed
465
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
466

unknown's avatar
unknown committed
467 468
/**
  Delete all temporary files used for SQL_LOAD.
unknown's avatar
unknown committed
469
*/
470 471 472 473 474 475

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

478
  if (!(dirp=my_dir(slave_load_tmpdir,MYF(0))))
479 480
    return;

481 482 483 484 485 486 487 488
  /* 
     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.
  */
489
  p= strmake(prefbuf, STRING_WITH_LEN(PREFIX_SQL_LOAD));
490 491 492 493
  p= int10_to_str(::server_id, p, 10);
  *(p++)= '-';
  *p= 0;

494 495 496
  for (i=0 ; i < (uint)dirp->number_off_files; i++)
  {
    file=dirp->dir_entry+i;
497
    if (is_prefix(file->name, prefbuf))
unknown's avatar
unknown committed
498 499 500 501
    {
      fn_format(fname,file->name,slave_load_tmpdir,"",MY_UNPACK_FILENAME);
      my_delete(fname, MYF(0));
    }
502 503 504 505
  }

  my_dirend(dirp);
}
unknown's avatar
SCRUM  
unknown committed
506
#endif
507 508


unknown's avatar
unknown committed
509
/*
510
  write_str()
unknown's avatar
unknown committed
511
*/
512

513
static bool write_str(IO_CACHE *file, const char *str, uint length)
514
{
515 516
  uchar tmp[1];
  tmp[0]= (uchar) length;
517
  return (my_b_safe_write(file, tmp, sizeof(tmp)) ||
518
	  my_b_safe_write(file, (uchar*) str, length));
519 520 521
}


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

526 527
static inline int read_str(const char **buf, const char *buf_end,
                           const char **str, uint8 *len)
528
{
529
  if (*buf + ((uint) (uchar) **buf) >= buf_end)
530
    return 1;
531 532 533
  *len= (uint8) **buf;
  *str= (*buf)+1;
  (*buf)+= (uint) *len+1;
534 535 536
  return 0;
}

537

unknown's avatar
unknown committed
538
/**
539 540
  Transforms a string into "" or its expression in 0x... form.
*/
unknown's avatar
unknown committed
541

542
char *str_to_hex(char *to, const char *from, uint len)
543 544 545
{
  if (len)
  {
unknown's avatar
unknown committed
546 547 548
    *to++= '0';
    *to++= 'x';
    to= octet2hex(to, from, len);
549 550
  }
  else
unknown's avatar
unknown committed
551 552
    to= strmov(to, "\"\"");
  return to;                               // pointer to end 0 of 'to'
553 554
}

unknown's avatar
unknown committed
555 556 557
#ifndef MYSQL_CLIENT

/**
558 559 560
  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
561 562
*/

563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578
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++= '\'';
579
    ptr+= escape_string_for_mysql(csinfo, ptr, 0,
580 581 582 583 584 585 586 587
                                  from->ptr(), from->length());
    *ptr++='\'';
  }
  to->length(orig_len + ptr - beg);
  return 0;
}
#endif

588

unknown's avatar
unknown committed
589
/**
590 591 592 593
  Prints a "session_var=value" string. Used by mysqlbinlog to print some SET
  commands just before it prints a query.
*/

594
#ifdef MYSQL_CLIENT
595

596 597 598
static void print_set_option(IO_CACHE* file, uint32 bits_changed,
                             uint32 option, uint32 flags, const char* name,
                             bool* need_comma)
599 600 601 602
{
  if (bits_changed & option)
  {
    if (*need_comma)
603 604
      my_b_printf(file,", ");
    my_b_printf(file,"%s=%d", name, test(flags & option));
605 606 607
    *need_comma= 1;
  }
}
608
#endif
609

unknown's avatar
unknown committed
610
/**************************************************************************
611
	Log_event methods (= the parent class of all events)
unknown's avatar
unknown committed
612
**************************************************************************/
613

unknown's avatar
unknown committed
614 615 616
/**
  @return
  returns the human readable name of the event's type
unknown's avatar
unknown committed
617
*/
618

619
const char* Log_event::get_type_str(Log_event_type type)
unknown's avatar
unknown committed
620
{
621
  switch(type) {
622
  case START_EVENT_V3:  return "Start_v3";
unknown's avatar
unknown committed
623 624 625 626 627
  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";
628
  case NEW_LOAD_EVENT:   return "New_load";
unknown's avatar
unknown committed
629
  case SLAVE_EVENT:  return "Slave";
630 631 632 633
  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";
634
  case RAND_EVENT: return "RAND";
635
  case XID_EVENT: return "Xid";
unknown's avatar
unknown committed
636
  case USER_VAR_EVENT: return "User var";
637
  case FORMAT_DESCRIPTION_EVENT: return "Format_desc";
638
  case TABLE_MAP_EVENT: return "Table_map";
639 640 641
  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";
642 643 644
  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
645 646
  case BEGIN_LOAD_QUERY_EVENT: return "Begin_load_query";
  case EXECUTE_LOAD_QUERY_EVENT: return "Execute_load_query";
647
  case INCIDENT_EVENT: return "Incident";
648
  default: return "Unknown";				/* impossible */
unknown's avatar
unknown committed
649 650 651
  }
}

652 653 654 655 656
const char* Log_event::get_type_str()
{
  return get_type_str(get_type_code());
}

657

unknown's avatar
unknown committed
658
/*
659
  Log_event::Log_event()
unknown's avatar
unknown committed
660
*/
661

unknown's avatar
unknown committed
662
#ifndef MYSQL_CLIENT
663
Log_event::Log_event(THD* thd_arg, uint16 flags_arg, bool using_trans)
664
  :log_pos(0), temp_buf(0), exec_time(0), flags(flags_arg), thd(thd_arg)
665
{
unknown's avatar
unknown committed
666 667
  server_id=	thd->server_id;
  when=		thd->start_time;
668
  cache_stmt=	using_trans;
669 670 671
}


unknown's avatar
unknown committed
672
/**
673 674 675 676
  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
677 678
*/

679
Log_event::Log_event()
680
  :temp_buf(0), exec_time(0), flags(0), cache_stmt(0),
681 682
   thd(0)
{
unknown's avatar
unknown committed
683
  server_id=	::server_id;
684 685 686 687 688
  /*
    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
689
  log_pos=	0;
690
}
unknown's avatar
unknown committed
691
#endif /* !MYSQL_CLIENT */
692 693


unknown's avatar
unknown committed
694
/*
695
  Log_event::Log_event()
696
*/
697

698
Log_event::Log_event(const char* buf,
unknown's avatar
unknown committed
699
                     const Format_description_log_event* description_event)
700
  :temp_buf(0), cache_stmt(0)
701
{
702 703
#ifndef MYSQL_CLIENT
  thd = 0;
unknown's avatar
unknown committed
704
#endif
705 706
  when = uint4korr(buf);
  server_id = uint4korr(buf + SERVER_ID_OFFSET);
707
  data_written= uint4korr(buf + EVENT_LEN_OFFSET);
708
  if (description_event->binlog_version==1)
709
  {
710 711 712
    log_pos= 0;
    flags= 0;
    return;
713
  }
714 715 716
  /* 4.0 or newer */
  log_pos= uint4korr(buf + LOG_POS_OFFSET);
  /*
717 718 719 720 721 722 723 724
    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).
725 726 727
  */
  if (description_event->binlog_version==3 &&
      buf[EVENT_TYPE_OFFSET]<FORMAT_DESCRIPTION_EVENT && log_pos)
728
  {
729 730 731
      /*
        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
732 733
        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
734
        not have its log_pos (which is 0) changed or it will modify
735 736 737 738
        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).
739
      */
unknown's avatar
unknown committed
740
    log_pos+= data_written; /* purecov: inspected */
741
  }
742 743 744 745 746 747 748
  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))
  {
    /*
749 750
      These events always have a header which stops here (i.e. their
      header is FROZEN).
751 752
    */
    /*
753 754 755 756 757 758 759
      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.
760 761 762 763
    */
    return;
  }
  /* otherwise, go on with reading the header from buf (nothing now) */
764 765 766
}

#ifndef MYSQL_CLIENT
unknown's avatar
SCRUM  
unknown committed
767
#ifdef HAVE_REPLICATION
768

769
int Log_event::do_update_pos(Relay_log_info *rli)
770
{
771
  /*
772
    rli is null when (as far as I (Guilhem) know) the caller is
773 774 775 776
    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.
777 778 779
    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.
780 781

    Matz: I don't think we will need this check with this refactoring.
782
  */
783
  if (rli)
784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809
  {
    /*
      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;
                    });
  }
810 811
  return 0;                                   // Cannot fail currently
}
812

813 814

Log_event::enum_skip_reason
815
Log_event::do_shall_skip(Relay_log_info *rli)
816 817 818 819 820 821 822
{
  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));
823 824
  if ((server_id == ::server_id && !rli->replicate_same_server_id) ||
      (rli->slave_skip_counter == 1 && rli->is_in_group()))
825
    return EVENT_SKIP_IGNORE;
826 827 828
  else if (rli->slave_skip_counter > 0)
    return EVENT_SKIP_COUNT;
  else
829
    return EVENT_SKIP_NOT;
830
}
unknown's avatar
unknown committed
831

832

unknown's avatar
unknown committed
833
/*
834
  Log_event::pack_info()
unknown's avatar
unknown committed
835
*/
836

837
void Log_event::pack_info(Protocol *protocol)
unknown's avatar
unknown committed
838
{
839
  protocol->store("", &my_charset_bin);
unknown's avatar
unknown committed
840 841 842
}


unknown's avatar
unknown committed
843
/**
844
  Only called by SHOW BINLOG EVENTS
unknown's avatar
unknown committed
845
*/
846
int Log_event::net_send(Protocol *protocol, const char* log_name, my_off_t pos)
847
{
unknown's avatar
unknown committed
848 849
  const char *p= strrchr(log_name, FN_LIBCHAR);
  const char *event_type;
850 851
  if (p)
    log_name = p + 1;
852

853
  protocol->prepare_for_resend();
854
  protocol->store(log_name, &my_charset_bin);
855
  protocol->store((ulonglong) pos);
856
  event_type = get_type_str();
857
  protocol->store(event_type, strlen(event_type), &my_charset_bin);
858 859 860 861
  protocol->store((uint32) server_id);
  protocol->store((ulonglong) log_pos);
  pack_info(protocol);
  return protocol->write();
862
}
unknown's avatar
SCRUM  
unknown committed
863 864 865
#endif /* HAVE_REPLICATION */


unknown's avatar
unknown committed
866 867 868 869
/**
  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
870
*/
unknown's avatar
SCRUM  
unknown committed
871 872 873 874

void Log_event::init_show_field_list(List<Item>* field_list)
{
  field_list->push_back(new Item_empty_string("Log_name", 20));
875
  field_list->push_back(new Item_return_int("Pos", MY_INT32_NUM_DECIMAL_DIGITS,
unknown's avatar
SCRUM  
unknown committed
876 877 878 879
					    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));
880 881
  field_list->push_back(new Item_return_int("End_log_pos",
                                            MY_INT32_NUM_DECIMAL_DIGITS,
unknown's avatar
SCRUM  
unknown committed
882 883 884 885
					    MYSQL_TYPE_LONGLONG));
  field_list->push_back(new Item_empty_string("Info", 20));
}

886

unknown's avatar
unknown committed
887
/*
888
  Log_event::write()
unknown's avatar
unknown committed
889
*/
890

891
bool Log_event::write_header(IO_CACHE* file, ulong event_data_length)
unknown's avatar
unknown committed
892
{
893
  uchar header[LOG_EVENT_HEADER_LEN];
894
  ulong now;
895
  DBUG_ENTER("Log_event::write_header");
unknown's avatar
unknown committed
896

897 898
  /* Store number of bytes that will be written by this event */
  data_written= event_data_length + sizeof(header);
899

900 901 902 903
  /*
    log_pos != 0 if this is relay-log event. In this case we should not
    change the position
  */
904

905 906 907
  if (is_artificial_event())
  {
    /*
908 909
      Artificial events are automatically generated and do not exist
      in master's binary log, so log_pos should be set to 0.
910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943
    */
    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
944
  now= (ulong) get_time();                              // Query start time
945

946 947 948 949 950 951 952
  /*
    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).
  */

953
  int4store(header, now);              // timestamp
954 955 956 957 958 959 960
  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
961 962 963
}


unknown's avatar
unknown committed
964
/**
965 966
  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
967
*/
968

969
int Log_event::read_log_event(IO_CACHE* file, String* packet,
970
			      pthread_mutex_t* log_lock)
unknown's avatar
unknown committed
971 972
{
  ulong data_len;
973
  int result=0;
974
  char buf[LOG_EVENT_MINIMAL_HEADER_LEN];
975
  DBUG_ENTER("Log_event::read_log_event");
976

977
  if (log_lock)
978
    pthread_mutex_lock(log_lock);
979
  if (my_b_read(file, (uchar*) buf, sizeof(buf)))
980
  {
981 982 983 984 985
    /*
      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.
    */
986
    DBUG_PRINT("error",("file->error: %d", file->error));
987 988 989
    if (!file->error)
      result= LOG_READ_EOF;
    else
990
      result= (file->error > 0 ? LOG_READ_TRUNC : LOG_READ_IO);
991
    goto end;
992
  }
993
  data_len= uint4korr(buf + EVENT_LEN_OFFSET);
994
  if (data_len < LOG_EVENT_MINIMAL_HEADER_LEN ||
unknown's avatar
unknown committed
995
      data_len > current_thd->variables.max_allowed_packet)
996
  {
997
    DBUG_PRINT("error",("data_len: %ld", data_len));
998
    result= ((data_len < LOG_EVENT_MINIMAL_HEADER_LEN) ? LOG_READ_BOGUS :
999 1000
	     LOG_READ_TOO_LARGE);
    goto end;
1001
  }
1002 1003 1004 1005 1006 1007 1008 1009

  /* Append the log event header to packet */
  if (packet->append(buf, sizeof(buf)))
  {
    /* Failed to allocate packet */
    result= LOG_READ_MEM;
    goto end;
  }
1010
  data_len-= LOG_EVENT_MINIMAL_HEADER_LEN;
1011 1012
  if (data_len)
  {
1013
    /* Append rest of event, read directly from file into packet */
1014
    if (packet->append(file, data_len))
1015
    {
1016
      /*
1017 1018 1019 1020 1021 1022 1023 1024 1025 1026
        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)
1027
      */
1028 1029
      result= (my_errno == ENOMEM ? LOG_READ_MEM :
               (file->error >= 0 ? LOG_READ_TRUNC: LOG_READ_IO));
1030
      /* Implicit goto end; */
1031
    }
1032
  }
1033 1034 1035 1036

end:
  if (log_lock)
    pthread_mutex_unlock(log_lock);
1037
  DBUG_RETURN(result);
unknown's avatar
unknown committed
1038
}
unknown's avatar
unknown committed
1039
#endif /* !MYSQL_CLIENT */
unknown's avatar
unknown committed
1040

unknown's avatar
unknown committed
1041
#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
1042 1043
#define UNLOCK_MUTEX if (log_lock) pthread_mutex_unlock(log_lock);
#define LOCK_MUTEX if (log_lock) pthread_mutex_lock(log_lock);
1044
#else
1045
#define UNLOCK_MUTEX
1046 1047 1048
#define LOCK_MUTEX
#endif

unknown's avatar
unknown committed
1049 1050 1051
#ifndef MYSQL_CLIENT
/**
  @note
1052
    Allocates memory;  The caller is responsible for clean-up.
unknown's avatar
unknown committed
1053
*/
1054 1055
Log_event* Log_event::read_log_event(IO_CACHE* file,
				     pthread_mutex_t* log_lock,
1056 1057
                                     const Format_description_log_event
                                     *description_event)
unknown's avatar
unknown committed
1058
#else
1059
Log_event* Log_event::read_log_event(IO_CACHE* file,
1060 1061
                                     const Format_description_log_event
                                     *description_event)
1062
#endif
unknown's avatar
unknown committed
1063
{
1064
  DBUG_ENTER("Log_event::read_log_event");
1065
  DBUG_ASSERT(description_event != 0);
1066 1067 1068 1069 1070
  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
1071 1072
    of 13 bytes, whereas LOG_EVENT_MINIMAL_HEADER_LEN is 19 bytes (it's
    "minimal" over the set {MySQL >=4.0}).
1073 1074 1075
  */
  uint header_size= min(description_event->common_header_len,
                        LOG_EVENT_MINIMAL_HEADER_LEN);
1076

1077
  LOCK_MUTEX;
unknown's avatar
unknown committed
1078
  DBUG_PRINT("info", ("my_b_tell: %lu", (ulong) my_b_tell(file)));
1079
  if (my_b_read(file, (uchar *) head, header_size))
1080
  {
1081 1082
    DBUG_PRINT("info", ("Log_event::read_log_event(IO_CACHE*,Format_desc*) \
failed my_b_read"));
unknown's avatar
unknown committed
1083
    UNLOCK_MUTEX;
1084
    /*
1085 1086 1087
      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.
1088
    */
1089
    DBUG_RETURN(0);
1090
  }
1091
  uint data_len = uint4korr(head + EVENT_LEN_OFFSET);
1092 1093 1094
  char *buf= 0;
  const char *error= 0;
  Log_event *res=  0;
1095 1096
#ifndef max_allowed_packet
  THD *thd=current_thd;
unknown's avatar
unknown committed
1097
  uint max_allowed_packet= thd ? thd->variables.max_allowed_packet : ~(ulong)0;
1098
#endif
unknown's avatar
unknown committed
1099

1100
  if (data_len > max_allowed_packet)
unknown's avatar
unknown committed
1101
  {
1102 1103
    error = "Event too big";
    goto err;
unknown's avatar
unknown committed
1104 1105
  }

1106
  if (data_len < header_size)
unknown's avatar
unknown committed
1107
  {
1108 1109
    error = "Event too small";
    goto err;
unknown's avatar
unknown committed
1110
  }
1111 1112

  // some events use the extra byte to null-terminate strings
1113
  if (!(buf = (char*) my_malloc(data_len+1, MYF(MY_WME))))
1114 1115 1116
  {
    error = "Out of memory";
    goto err;
unknown's avatar
unknown committed
1117
  }
1118
  buf[data_len] = 0;
1119
  memcpy(buf, head, header_size);
1120
  if (my_b_read(file, (uchar*) buf + header_size, data_len - header_size))
1121 1122 1123 1124
  {
    error = "read error";
    goto err;
  }
1125
  if ((res= read_log_event(buf, data_len, &error, description_event)))
1126
    res->register_temp_buf(buf);
1127

1128
err:
unknown's avatar
unknown committed
1129
  UNLOCK_MUTEX;
1130
  if (!res)
1131
  {
1132
    DBUG_ASSERT(error != 0);
1133 1134
    sql_print_error("Error in Log_event::read_log_event(): "
                    "'%s', data_len: %d, event_type: %d",
1135
		    error,data_len,head[EVENT_TYPE_OFFSET]);
1136
    my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
1137 1138 1139 1140 1141 1142 1143 1144 1145
    /*
      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;
1146
  }
1147
  DBUG_RETURN(res);
unknown's avatar
unknown committed
1148 1149
}

1150

unknown's avatar
unknown committed
1151
/**
1152 1153
  Binlog format tolerance is in (buf, event_len, description_event)
  constructors.
unknown's avatar
unknown committed
1154
*/
1155

1156 1157 1158
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
1159
{
1160 1161
  Log_event* ev;
  DBUG_ENTER("Log_event::read_log_event(char*,...)");
1162
  DBUG_ASSERT(description_event != 0);
1163
  DBUG_PRINT("info", ("binlog_version: %d", description_event->binlog_version));
1164 1165
  DBUG_DUMP("data", (unsigned char*) buf, event_len);

1166
  /* Check the integrity */
1167
  if (event_len < EVENT_LEN_OFFSET ||
1168
      buf[EVENT_TYPE_OFFSET] >= ENUM_END_EVENT ||
1169 1170 1171
      (uint) event_len != uint4korr(buf+EVENT_LEN_OFFSET))
  {
    *error="Sanity check failed";		// Needed to free buffer
unknown's avatar
unknown committed
1172
    DBUG_RETURN(NULL); // general sanity check - will fail on a partial read
1173
  }
1174

1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190
  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
  {
1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202
    /*
      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)
    {
1203 1204 1205 1206 1207 1208 1209 1210
#ifndef DBUG_OFF
      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)));
#endif
1211 1212 1213
      event_type= description_event->event_type_permutation[event_type];
    }

1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226
    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
1227
#ifdef HAVE_REPLICATION
1228 1229 1230
    case SLAVE_EVENT: /* can never happen (unused event) */
      ev = new Slave_log_event(buf, event_len);
      break;
unknown's avatar
SCRUM  
unknown committed
1231
#endif /* HAVE_REPLICATION */
1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251 1252 1253 1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264
    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;
1265
#if defined(HAVE_REPLICATION) 
1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286
    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;
1287
#endif
1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302
    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
1303
  }
1304

1305 1306 1307 1308
  DBUG_PRINT("read_event", ("%s(type_code: %d; event_len: %d)",
                            ev ? ev->get_type_str() : "<unknown>",
                            buf[EVENT_TYPE_OFFSET],
                            event_len));
1309
  /*
1310 1311 1312 1313 1314 1315 1316
    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'.
1317
  */
1318
  if (!ev || !ev->is_valid())
1319
  {
1320 1321
    DBUG_PRINT("error",("Found invalid event in binary log"));

1322
    delete ev;
1323
#ifdef MYSQL_CLIENT
1324
    if (!force_opt) /* then mysqlbinlog dies */
1325 1326
    {
      *error= "Found invalid event in binary log";
unknown's avatar
unknown committed
1327
      DBUG_RETURN(0);
1328
    }
1329
    ev= new Unknown_log_event(buf, description_event);
1330 1331
#else
    *error= "Found invalid event in binary log";
unknown's avatar
unknown committed
1332
    DBUG_RETURN(0);
1333
#endif
1334
  }
unknown's avatar
unknown committed
1335
  DBUG_RETURN(ev);  
unknown's avatar
unknown committed
1336 1337
}

1338
#ifdef MYSQL_CLIENT
1339

unknown's avatar
unknown committed
1340
/*
1341
  Log_event::print_header()
unknown's avatar
unknown committed
1342
*/
1343

1344 1345 1346
void Log_event::print_header(IO_CACHE* file,
                             PRINT_EVENT_INFO* print_event_info,
                             bool is_more __attribute__((unused)))
1347
{
1348
  char llbuff[22];
unknown's avatar
unknown committed
1349
  my_off_t hexdump_from= print_event_info->hexdump_from;
1350
  DBUG_ENTER("Log_event::print_header");
unknown's avatar
unknown committed
1351

1352
  my_b_printf(file, "#");
1353
  print_timestamp(file);
1354
  my_b_printf(file, " server id %lu  end_log_pos %s ", (ulong) server_id,
1355
              llstr(log_pos,llbuff));
1356

1357
  /* mysqlbinlog --hexdump */
unknown's avatar
unknown committed
1358
  if (print_event_info->hexdump_from)
1359
  {
1360
    my_b_printf(file, "\n");
1361 1362 1363
    uchar *ptr= (uchar*)temp_buf;
    my_off_t size=
      uint4korr(ptr + EVENT_LEN_OFFSET) - LOG_EVENT_MINIMAL_HEADER_LEN;
1364 1365
    my_off_t i;

1366 1367 1368 1369
    /* 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
1370
    /* Pretty-print event common header if header is exactly 19 bytes */
unknown's avatar
unknown committed
1371
    if (print_event_info->common_header_len == LOG_EVENT_MINIMAL_HEADER_LEN)
unknown's avatar
unknown committed
1372
    {
1373 1374 1375
      char emit_buf[256];               // Enough for storing one line
      my_b_printf(file, "# Position  Timestamp   Type   Master ID        "
                  "Size      Master Pos    Flags \n");
1376
      size_t const bytes_written=
1377 1378 1379 1380 1381 1382 1383 1384
        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]);
1385 1386
      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
1387 1388 1389
      ptr += LOG_EVENT_MINIMAL_HEADER_LEN;
      hexdump_from += LOG_EVENT_MINIMAL_HEADER_LEN;
    }
1390 1391 1392 1393 1394

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

1399
      *c++= my_isalnum(&my_charset_bin, *ptr) ? *ptr : '.';
1400 1401 1402

      if (i % 16 == 15)
      {
1403 1404 1405 1406 1407 1408 1409
        /*
          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];
1410
        size_t const bytes_written=
1411 1412 1413 1414
          my_snprintf(emit_buf, sizeof(emit_buf),
                      "# %8.8lx %-48.48s |%16s|\n",
                      (unsigned long) (hexdump_from + (i & 0xfffffff0)),
                      hex_string, char_string);
1415 1416
        DBUG_ASSERT(static_cast<size_t>(bytes_written) < sizeof(emit_buf));
	my_b_write(file, (uchar*) emit_buf, bytes_written);
1417 1418 1419 1420
	hex_string[0]= 0;
	char_string[0]= 0;
	c= char_string;
	h= hex_string;
1421
      }
1422
      else if (i % 8 == 7) *h++ = ' ';
1423
    }
1424
    *c= '\0';
1425

unknown's avatar
unknown committed
1426
    if (hex_string[0])
1427 1428
    {
      char emit_buf[256];
1429
      size_t const bytes_written=
1430
        my_snprintf(emit_buf, sizeof(emit_buf),
1431
                    "# %8.8lx %-48.48s |%s|\n",
1432 1433
                    (unsigned long) (hexdump_from + (i & 0xfffffff0)),
                    hex_string, char_string);
1434 1435
      DBUG_ASSERT(static_cast<size_t>(bytes_written) < sizeof(emit_buf));
      my_b_write(file, (uchar*) emit_buf, bytes_written);
1436
    }
1437 1438 1439 1440
    /*
      need a # to prefix the rest of printouts for example those of
      Rows_log_event::print_helper().
    */
1441
    my_b_write(file, reinterpret_cast<const uchar*>("# "), 2);
1442
  }
1443
  DBUG_VOID_RETURN;
1444 1445
}

1446

1447 1448 1449 1450 1451 1452 1453 1454 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 1586 1587 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 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692
/**
  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;
        goto beg;
      }

      switch (byte0)
      {
        case MYSQL_TYPE_SET:
        case MYSQL_TYPE_ENUM:
        case MYSQL_TYPE_STRING:
          type= byte0;
          length= byte1;
          break;

        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);
          return 0;
        }
      }
    }
    else
      length= meta;
  }


beg:
  
  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;
1693
      float8get(dbl, ptr);
1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720
      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:
    {
1721
      size_t d, t;
1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 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
      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;
    }
    
  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:
    switch (length) { 
    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:
      my_b_printf(file, "!! Unknown ENUM packlen=%d", length); 
      return 0;
    }
    break;
    
  case MYSQL_TYPE_SET:
    my_b_write_bit(file, ptr , length * 8);
    my_snprintf(typestr, typestr_length, "SET(%d bytes)", length);
    return length;
  
  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;
1856
  uint null_bit_index= 0;
1857 1858 1859 1860 1861 1862 1863 1864
  char typestr[64]= "";
  
  value+= (m_width + 7) / 8;
  
  my_b_printf(file, "%s", prefix);
  
  for (size_t i= 0; i < td->size(); i ++)
  {
1865 1866
    int is_null= (null_bits[null_bit_index / 8] 
                  >> (null_bit_index % 8))  & 0x01;
1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902

    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");
1903 1904
    
    null_bit_index++;
1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 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
  }
  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,
1960
                                  &m_cols, value,
1961 1962 1963 1964 1965 1966 1967 1968
                                  (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,
1969
                                      &m_cols_ai, value,
1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986
                                      (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

1987 1988 1989
void Log_event::print_base64(IO_CACHE* file,
                             PRINT_EVENT_INFO* print_event_info,
                             bool more)
1990
{
1991
  const uchar *ptr= (const uchar *)temp_buf;
1992
  uint32 size= uint4korr(ptr + EVENT_LEN_OFFSET);
1993 1994
  DBUG_ENTER("Log_event::print_base64");

1995
  size_t const tmp_str_sz= base64_needed_encoded_length((int) size);
1996
  char *const tmp_str= (char *) my_malloc(tmp_str_sz, MYF(MY_WME));
1997 1998 1999
  if (!tmp_str) {
    fprintf(stderr, "\nError: Out of memory. "
            "Could not print correct binlog event.\n");
2000
    DBUG_VOID_RETURN;
2001
  }
2002

unknown's avatar
unknown committed
2003 2004 2005 2006
  if (base64_encode(ptr, (size_t) size, tmp_str))
  {
    DBUG_ASSERT(0);
  }
2007

2008 2009 2010 2011
  if (print_event_info->base64_output_mode != BASE64_OUTPUT_DECODE_ROWS)
  {
    if (my_b_tell(file) == 0)
      my_b_printf(file, "\nBINLOG '\n");
2012

2013
    my_b_printf(file, "%s\n", tmp_str);
2014

2015 2016 2017 2018
    if (!more)
      my_b_printf(file, "'%s\n", print_event_info->delimiter);
  }
  
2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052
  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;
    }
  }
    
2053
  my_free(tmp_str, MYF(0));
2054
  DBUG_VOID_RETURN;
2055 2056 2057
}


unknown's avatar
unknown committed
2058
/*
2059
  Log_event::print_timestamp()
unknown's avatar
unknown committed
2060
*/
2061

2062
void Log_event::print_timestamp(IO_CACHE* file, time_t* ts)
unknown's avatar
unknown committed
2063
{
unknown's avatar
unknown committed
2064
  struct tm *res;
2065
  DBUG_ENTER("Log_event::print_timestamp");
2066 2067
  if (!ts)
    ts = &when;
2068 2069
#ifdef MYSQL_SERVER				// This is always false
  struct tm tm_tmp;
unknown's avatar
unknown committed
2070
  localtime_r(ts,(res= &tm_tmp));
unknown's avatar
unknown committed
2071
#else
2072
  res=localtime(ts);
unknown's avatar
unknown committed
2073
#endif
2074

2075 2076 2077 2078 2079 2080 2081 2082
  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
2083 2084
}

unknown's avatar
unknown committed
2085
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
2086 2087


2088 2089 2090 2091 2092 2093 2094 2095 2096 2097
#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
2098
/**************************************************************************
unknown's avatar
unknown committed
2099
	Query_log_event methods
unknown's avatar
unknown committed
2100
**************************************************************************/
2101

unknown's avatar
SCRUM  
unknown committed
2102
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2103

unknown's avatar
unknown committed
2104
/**
2105 2106 2107 2108
  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
2109 2110
  @todo
    show the catalog ??
unknown's avatar
unknown committed
2111
*/
2112

2113
void Query_log_event::pack_info(Protocol *protocol)
unknown's avatar
unknown committed
2114
{
2115
  // TODO: show the catalog ??
2116
  char *buf, *pos;
2117
  if (!(buf= (char*) my_malloc(9 + db_len + q_len, MYF(MY_WME))))
2118
    return;
2119 2120
  pos= buf;
  if (!(flags & LOG_EVENT_SUPPRESS_USE_F)
2121
      && db && db_len)
2122
  {
2123 2124
    pos= strmov(buf, "use `");
    memcpy(pos, db, db_len);
unknown's avatar
unknown committed
2125
    pos= strmov(pos+db_len, "`; ");
2126
  }
2127
  if (query && q_len)
2128 2129 2130 2131
  {
    memcpy(pos, query, q_len);
    pos+= q_len;
  }
2132
  protocol->store(buf, pos-buf, &my_charset_bin);
2133
  my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
2134
}
unknown's avatar
SCRUM  
unknown committed
2135
#endif
2136

2137
#ifndef MYSQL_CLIENT
2138

unknown's avatar
unknown committed
2139 2140 2141
/**
  Utility function for the next method (Query_log_event::write()) .
*/
2142 2143 2144
static void write_str_with_code_and_len(char **dst, const char *src,
                                        int len, uint code)
{
2145 2146 2147 2148 2149
  /*
    only 1 byte to store the length of catalog, so it should not
    surpass 255
  */
  DBUG_ASSERT(len <= 255);
2150 2151 2152 2153 2154 2155 2156 2157
  DBUG_ASSERT(src);
  *((*dst)++)= code;
  *((*dst)++)= (uchar) len;
  bmove(*dst, src, len);
  (*dst)+= len;
}


unknown's avatar
unknown committed
2158 2159
/**
  Query_log_event::write().
unknown's avatar
unknown committed
2160

unknown's avatar
unknown committed
2161
  @note
2162 2163 2164
    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
2165
*/
2166

2167
bool Query_log_event::write(IO_CACHE* file)
unknown's avatar
unknown committed
2168
{
2169 2170
  uchar buf[QUERY_HEADER_LEN + MAX_SIZE_LOG_EVENT_STATUS];
  uchar *start, *start_of_status;
2171
  ulong event_length;
unknown's avatar
unknown committed
2172

2173
  if (!query)
2174 2175
    return 1;                                   // Something wrong with event

unknown's avatar
unknown committed
2176 2177 2178 2179 2180
  /*
    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.
2181
    Now imagine we (write()) are called by the slave SQL thread (we are
unknown's avatar
unknown committed
2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213
    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);
2214 2215 2216 2217
  int4store(buf + Q_EXEC_TIME_OFFSET, exec_time);
  buf[Q_DB_LEN_OFFSET] = (char) db_len;
  int2store(buf + Q_ERR_CODE_OFFSET, error_code);

2218 2219 2220 2221 2222 2223 2224 2225
  /*
    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)
  {
2226
    *start++= Q_FLAGS2_CODE;
2227 2228 2229 2230 2231
    int4store(start, flags2);
    start+= 4;
  }
  if (sql_mode_inited)
  {
2232
    *start++= Q_SQL_MODE_CODE;
unknown's avatar
unknown committed
2233
    int8store(start, (ulonglong)sql_mode);
2234 2235
    start+= 8;
  }
2236
  if (catalog_len) // i.e. this var is inited (false for 4.0 events)
2237
  {
2238 2239
    write_str_with_code_and_len((char **)(&start),
                                catalog, catalog_len, Q_CATALOG_NZ_CODE);
2240
    /*
2241 2242 2243 2244 2245 2246
      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
2247 2248 2249 2250 2251
      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
2252 2253
      Q_AUTO_INCREMENT*, Q_CHARSET and so replication will fail silently in
      various ways. Documented that you should not mix alpha/beta versions if
2254 2255 2256
      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.
2257 2258
    */
  }
2259
  if (auto_increment_increment != 1 || auto_increment_offset != 1)
2260 2261 2262 2263 2264 2265
  {
    *start++= Q_AUTO_INCREMENT;
    int2store(start, auto_increment_increment);
    int2store(start+2, auto_increment_offset);
    start+= 4;
  }
2266 2267
  if (charset_inited)
  {
2268
    *start++= Q_CHARSET_CODE;
2269 2270 2271
    memcpy(start, charset, 6);
    start+= 6;
  }
2272 2273 2274 2275
  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);
2276 2277
    write_str_with_code_and_len((char **)(&start),
                                time_zone_str, time_zone_len, Q_TIME_ZONE_CODE);
2278
  }
2279 2280 2281 2282 2283 2284 2285
  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;
  }
2286 2287 2288 2289 2290 2291 2292
  if (charset_database_number)
  {
    DBUG_ASSERT(charset_database_number <= 0xFFFF);
    *start++= Q_CHARSET_DATABASE_CODE;
    int2store(start, charset_database_number);
    start+= 2;
  }
2293 2294 2295 2296 2297 2298
  if (table_map_for_update)
  {
    *start++= Q_TABLE_MAP_FOR_UPDATE_CODE;
    int8store(start, table_map_for_update);
    start+= 8;
  }
2299
  /*
2300 2301 2302 2303
    NOTE: When adding new status vars, please don't forget to update
    the MAX_SIZE_LOG_EVENT_STATUS in log_event.h and update function
    code_name in this file.
   
2304
    Here there could be code like
2305
    if (command-line-option-which-says-"log_this_variable" && inited)
2306
    {
2307
    *start++= Q_THIS_VARIABLE_CODE;
2308 2309 2310 2311 2312 2313 2314
    int4store(start, this_variable);
    start+= 4;
    }
  */
  
  /* Store length of status variables */
  status_vars_len= (uint) (start-start_of_status);
2315
  DBUG_ASSERT(status_vars_len <= MAX_SIZE_LOG_EVENT_STATUS);
2316 2317 2318 2319 2320 2321
  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
2322
  event_length= (uint) (start-buf) + get_post_header_size_for_derived() + db_len + 1 + q_len;
2323 2324

  return (write_header(file, event_length) ||
2325
          my_b_safe_write(file, (uchar*) buf, QUERY_HEADER_LEN) ||
unknown's avatar
unknown committed
2326
          write_post_header_for_derived(file) ||
2327
          my_b_safe_write(file, (uchar*) start_of_status,
unknown's avatar
unknown committed
2328
                          (uint) (start-start_of_status)) ||
2329 2330
          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
2331 2332
}

unknown's avatar
unknown committed
2333
/**
2334 2335 2336 2337 2338 2339 2340 2341 2342
  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)
{
}

2343

unknown's avatar
unknown committed
2344
/*
2345 2346
  SYNOPSIS
    Query_log_event::Query_log_event()
2347
      thd_arg           - thread handle
2348 2349 2350 2351
      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
2352 2353
      errcode           - the error code of the query
      
2354 2355
  DESCRIPTION
  Creates an event for binlogging
2356
  The value for `errcode' should be supplied by caller.
unknown's avatar
unknown committed
2357
*/
2358
Query_log_event::Query_log_event(THD* thd_arg, const char* query_arg,
2359
				 ulong query_length, bool using_trans,
2360 2361
				 bool suppress_use, int errcode)

2362
  :Log_event(thd_arg,
2363 2364 2365
             (thd_arg->thread_specific_used ? LOG_EVENT_THREAD_SPECIFIC_F :
              0) |
             (suppress_use ? LOG_EVENT_SUPPRESS_USE_F : 0),
2366
	     using_trans),
2367
   data_buf(0), query(query_arg), catalog(thd_arg->catalog),
2368
   db(thd_arg->db), q_len((uint32) query_length),
unknown's avatar
unknown committed
2369 2370
   thread_id(thd_arg->thread_id),
   /* save the original thread id; we already know the server id */
2371
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
2372
   flags2_inited(1), sql_mode_inited(1), charset_inited(1),
2373 2374
   sql_mode(thd_arg->variables.sql_mode),
   auto_increment_increment(thd_arg->variables.auto_increment_increment),
2375
   auto_increment_offset(thd_arg->variables.auto_increment_offset),
2376
   lc_time_names_number(thd_arg->variables.lc_time_names->number),
2377 2378
   charset_database_number(0),
   table_map_for_update((ulonglong)thd_arg->table_map_for_update)
2379 2380
{
  time_t end_time;
2381

2382
  error_code= errcode;
He Zhenxing's avatar
He Zhenxing committed
2383

2384
  time(&end_time);
2385
  exec_time = (ulong) (end_time  - thd_arg->start_time);
2386 2387 2388 2389
  /**
    @todo this means that if we have no catalog, then it is replicated
    as an existing catalog of length zero. is that safe? /sven
  */
2390
  catalog_len = (catalog) ? (uint32) strlen(catalog) : 0;
2391
  /* status_vars_len is set just before writing the event */
2392
  db_len = (db) ? (uint32) strlen(db) : 0;
2393 2394 2395
  if (thd_arg->variables.collation_database != thd_arg->db_charset)
    charset_database_number= thd_arg->variables.collation_database->number;
  
2396
  /*
2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414 2415 2416
    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.
2417
  */
2418 2419
  flags2= (uint32) (thd_arg->options &
                    (OPTIONS_WRITTEN_TO_BIN_LOG & ~OPTION_NOT_AUTOCOMMIT));
2420 2421 2422
  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);
2423
  DBUG_ASSERT(thd_arg->variables.character_set_client->mbminlen == 1);
2424 2425 2426
  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);
2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438
  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;
unknown's avatar
unknown committed
2439 2440
  DBUG_PRINT("info",("Query_log_event has flags2: %lu  sql_mode: %lu",
                     (ulong) flags2, sql_mode));
2441
}
unknown's avatar
unknown committed
2442
#endif /* MYSQL_CLIENT */
2443

unknown's avatar
unknown committed
2444

2445 2446
/* 2 utility functions for the next method */

2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469
/**
   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>.
2470
*/
2471 2472 2473 2474 2475
static int
get_str_len_and_pointer(const Log_event::Byte **src,
                        const char **dst,
                        uint *len,
                        const Log_event::Byte *end)
2476
{
2477 2478 2479 2480 2481 2482
  if (*src >= end)
    return -1;       // Will be UINT_MAX in two-complement arithmetics
  uint length= **src;
  if (length > 0)
  {
    if (*src + length >= end)
2483
      return *src + length - end + 1;       // Number of bytes missing
2484 2485 2486
    *dst= (char *)*src + 1;                    // Will be copied later
  }
  *len= length;
2487 2488
  *src+= length + 1;
  return 0;
2489 2490
}

2491 2492 2493
static void copy_str_and_move(const char **src, 
                              Log_event::Byte **dst, 
                              uint len)
2494 2495
{
  memcpy(*dst, *src, len);
2496
  *src= (const char *)*dst;
2497 2498 2499 2500
  (*dst)+= len;
  *(*dst)++= 0;
}

2501

2502
#ifndef DBUG_OFF
unknown's avatar
unknown committed
2503 2504 2505 2506
static char const *
code_name(int code)
{
  static char buf[255];
2507 2508 2509 2510 2511 2512 2513 2514 2515 2516
  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";
2517
  case Q_TABLE_MAP_FOR_UPDATE_CODE: return "Q_TABLE_MAP_FOR_UPDATE_CODE";
2518 2519 2520 2521
  }
  sprintf(buf, "CODE#%d", code);
  return buf;
}
2522
#endif
2523

2524 2525 2526 2527 2528 2529 2530
/**
   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.
 */
2531 2532 2533 2534 2535 2536 2537 2538 2539
#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;                               \
    }                                                 \
2540 2541
  } while (0)

2542

unknown's avatar
unknown committed
2543
/**
2544
  This is used by the SQL slave thread to prepare the event before execution.
unknown's avatar
unknown committed
2545
*/
2546
Query_log_event::Query_log_event(const char* buf, uint event_len,
2547 2548
                                 const Format_description_log_event
                                 *description_event,
unknown's avatar
unknown committed
2549
                                 Log_event_type event_type)
2550
  :Log_event(buf, description_event), data_buf(0), query(NullS),
2551
   db(NullS), catalog_len(0), status_vars_len(0),
2552
   flags2_inited(0), sql_mode_inited(0), charset_inited(0),
2553
   auto_increment_increment(1), auto_increment_offset(1),
2554 2555
   time_zone_len(0), lc_time_names_number(0), charset_database_number(0),
   table_map_for_update(0)
unknown's avatar
unknown committed
2556 2557
{
  ulong data_len;
2558 2559
  uint32 tmp;
  uint8 common_header_len, post_header_len;
2560 2561
  Log_event::Byte *start;
  const Log_event::Byte *end;
2562
  bool catalog_nz= 1;
2563 2564 2565
  DBUG_ENTER("Query_log_event::Query_log_event(char*,...)");

  common_header_len= description_event->common_header_len;
unknown's avatar
unknown committed
2566
  post_header_len= description_event->post_header_len[event_type-1];
unknown's avatar
unknown committed
2567
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
2568 2569 2570 2571 2572 2573 2574 2575 2576 2577 2578 2579 2580 2581
                     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);
2582
  db_len = (uint)buf[Q_DB_LEN_OFFSET]; // TODO: add a check of all *_len vars
2583 2584 2585 2586 2587 2588 2589 2590 2591
  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)
2592
  {
2593
    status_vars_len= uint2korr(buf + Q_STATUS_VARS_LEN_OFFSET);
2594 2595 2596 2597 2598 2599
    /*
      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.
    */
2600
    if (status_vars_len > min(data_len, MAX_SIZE_LOG_EVENT_STATUS))
2601
    {
unknown's avatar
unknown committed
2602
      DBUG_PRINT("info", ("status_vars_len (%u) > data_len (%lu); query= 0",
2603
                          status_vars_len, data_len));
2604 2605 2606
      query= 0;
      DBUG_VOID_RETURN;
    }
2607 2608 2609 2610
    data_len-= status_vars_len;
    DBUG_PRINT("info", ("Query_log_event has status_vars_len: %u",
                        (uint) status_vars_len));
    tmp-= 2;
2611
  }
unknown's avatar
unknown committed
2612 2613 2614 2615 2616 2617
  /*
    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...)
  */

2618 2619
  /* variable-part: the status vars; only in MySQL 5.0  */
  
2620 2621 2622
  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;)
2623
  {
2624 2625
    switch (*pos++) {
    case Q_FLAGS2_CODE:
2626
      CHECK_SPACE(pos, end, 4);
2627 2628
      flags2_inited= 1;
      flags2= uint4korr(pos);
unknown's avatar
unknown committed
2629
      DBUG_PRINT("info",("In Query_log_event, read flags2: %lu", (ulong) flags2));
2630 2631 2632 2633 2634 2635 2636
      pos+= 4;
      break;
    case Q_SQL_MODE_CODE:
    {
#ifndef DBUG_OFF
      char buff[22];
#endif
2637
      CHECK_SPACE(pos, end, 8);
2638 2639 2640 2641 2642 2643 2644
      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;
    }
2645
    case Q_CATALOG_NZ_CODE:
2646
      DBUG_PRINT("info", ("case Q_CATALOG_NZ_CODE; pos: 0x%lx; end: 0x%lx",
unknown's avatar
unknown committed
2647
                          (ulong) pos, (ulong) end));
2648 2649
      if (get_str_len_and_pointer(&pos, &catalog, &catalog_len, end))
      {
2650
        DBUG_PRINT("info", ("query= 0"));
2651 2652 2653
        query= 0;
        DBUG_VOID_RETURN;
      }
2654 2655
      break;
    case Q_AUTO_INCREMENT:
2656
      CHECK_SPACE(pos, end, 4);
2657 2658 2659 2660
      auto_increment_increment= uint2korr(pos);
      auto_increment_offset=    uint2korr(pos+2);
      pos+= 4;
      break;
2661 2662
    case Q_CHARSET_CODE:
    {
2663
      CHECK_SPACE(pos, end, 6);
2664 2665 2666 2667 2668
      charset_inited= 1;
      memcpy(charset, pos, 6);
      pos+= 6;
      break;
    }
2669 2670
    case Q_TIME_ZONE_CODE:
    {
2671 2672
      if (get_str_len_and_pointer(&pos, &time_zone_str, &time_zone_len, end))
      {
2673
        DBUG_PRINT("info", ("Q_TIME_ZONE_CODE: query= 0"));
2674 2675 2676
        query= 0;
        DBUG_VOID_RETURN;
      }
2677 2678
      break;
    }
2679
    case Q_CATALOG_CODE: /* for 5.0.x where 0<=x<=3 masters */
2680
      CHECK_SPACE(pos, end, 1);
2681 2682
      if ((catalog_len= *pos))
        catalog= (char*) pos+1;                           // Will be copied later
2683
      CHECK_SPACE(pos, end, catalog_len + 2);
2684 2685 2686
      pos+= catalog_len+2; // leap over end 0
      catalog_nz= 0; // catalog has end 0 in event
      break;
2687
    case Q_LC_TIME_NAMES_CODE:
2688
      CHECK_SPACE(pos, end, 2);
2689 2690 2691
      lc_time_names_number= uint2korr(pos);
      pos+= 2;
      break;
2692
    case Q_CHARSET_DATABASE_CODE:
2693
      CHECK_SPACE(pos, end, 2);
2694 2695 2696
      charset_database_number= uint2korr(pos);
      pos+= 2;
      break;
2697 2698 2699 2700 2701
    case Q_TABLE_MAP_FOR_UPDATE_CODE:
      CHECK_SPACE(pos, end, 8);
      table_map_for_update= uint8korr(pos);
      pos+= 8;
      break;
2702 2703 2704 2705
    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)));
2706
      pos= (const uchar*) end;                         // Break loop
2707
    }
2708
  }
2709
  
2710
#if !defined(MYSQL_CLIENT) && defined(HAVE_QUERY_CACHE)
2711 2712 2713 2714 2715 2716
  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))))
2717
#else
2718 2719 2720 2721
  if (!(start= data_buf = (Log_event::Byte*) my_malloc(catalog_len + 1 +
                                             time_zone_len + 1 +
                                             data_len + 1,
                                             MYF(MY_WME))))
2722
#endif
unknown's avatar
unknown committed
2723
      DBUG_VOID_RETURN;
2724
  if (catalog_len)                                  // If catalog is given
2725
  {
2726 2727 2728 2729 2730
    /**
      @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
    */
2731
    if (likely(catalog_nz)) // true except if event comes from 5.0.0|1|2|3.
2732
      copy_str_and_move(&catalog, &start, catalog_len);
2733 2734 2735
    else
    {
      memcpy(start, catalog, catalog_len+1); // copy end 0
2736
      catalog= (const char *)start;
2737 2738
      start+= catalog_len+1;
    }
2739
  }
2740
  if (time_zone_len)
2741
    copy_str_and_move(&time_zone_str, &start, time_zone_len);
2742

2743 2744 2745 2746 2747 2748 2749
  /**
    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
  */

2750
  /* A 2nd variable part; this is common to all versions */ 
2751
  memcpy((char*) start, end, data_len);          // Copy db and query
2752
  start[data_len]= '\0';              // End query with \0 (For safetly)
2753 2754
  db= (char *)start;
  query= (char *)(start + db_len + 1);
2755 2756
  q_len= data_len - db_len -1;
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
2757 2758
}

2759

2760
#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
2761 2762 2763 2764 2765 2766
/**
  Query_log_event::print().

  @todo
    print the catalog ??
*/
2767
void Query_log_event::print_query_header(IO_CACHE* file,
unknown's avatar
unknown committed
2768
					 PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
2769
{
2770
  // TODO: print the catalog ??
2771
  char buff[40],*end;				// Enough for SET TIMESTAMP
2772 2773 2774
  bool different_db= 1;
  uint32 tmp;

unknown's avatar
unknown committed
2775
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
2776
  {
2777 2778 2779 2780
    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
2781 2782
  }

unknown's avatar
unknown committed
2783
  if (!(flags & LOG_EVENT_SUPPRESS_USE_F) && db)
2784
  {
2785 2786
    different_db= memcmp(print_event_info->db, db, db_len + 1);
    if (different_db)
unknown's avatar
unknown committed
2787
      memcpy(print_event_info->db, db, db_len + 1);
unknown's avatar
unknown committed
2788
    if (db[0] && different_db) 
unknown's avatar
unknown committed
2789
      my_b_printf(file, "use %s%s\n", db, print_event_info->delimiter);
2790
  }
2791

2792
  end=int10_to_str((long) when, strmov(buff,"SET TIMESTAMP="),10);
2793
  end= strmov(end, print_event_info->delimiter);
2794
  *end++='\n';
2795
  my_b_write(file, (uchar*) buff, (uint) (end-buff));
2796 2797 2798 2799 2800
  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
2801
    my_b_printf(file,"SET @@session.pseudo_thread_id=%lu%s\n",
2802 2803 2804 2805 2806
                short_form ? 999999999 : (ulong)thread_id,
                print_event_info->delimiter);
    print_event_info->thread_id= thread_id;
    print_event_info->thread_id_printed= 1;
  }
2807

2808
  /*
2809 2810 2811
    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).
2812 2813 2814 2815
  */
  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
2816
    if (likely(print_event_info->flags2_inited)) 
2817
      /* All bits which have changed */
unknown's avatar
unknown committed
2818
      tmp= (print_event_info->flags2) ^ flags2;
2819 2820
    else /* that's the first Query event we read */
    {
unknown's avatar
unknown committed
2821
      print_event_info->flags2_inited= 1;
2822 2823 2824 2825 2826 2827
      tmp= ~((uint32)0); /* all bits have changed */
    }

    if (unlikely(tmp)) /* some bits have changed */
    {
      bool need_comma= 0;
2828
      my_b_printf(file, "SET ");
2829
      print_set_option(file, tmp, OPTION_NO_FOREIGN_KEY_CHECKS, ~flags2,
2830
                       "@@session.foreign_key_checks", &need_comma);
2831
      print_set_option(file, tmp, OPTION_AUTO_IS_NULL, flags2,
2832
                       "@@session.sql_auto_is_null", &need_comma);
2833
      print_set_option(file, tmp, OPTION_RELAXED_UNIQUE_CHECKS, ~flags2,
2834 2835 2836
                       "@@session.unique_checks", &need_comma);
      print_set_option(file, tmp, OPTION_NOT_AUTOCOMMIT, ~flags2,
                       "@@session.autocommit", &need_comma);
unknown's avatar
unknown committed
2837
      my_b_printf(file,"%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
2838
      print_event_info->flags2= flags2;
2839 2840 2841 2842
    }
  }

  /*
2843 2844 2845 2846 2847 2848 2849 2850 2851 2852
    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.
2853 2854
  */

2855 2856 2857
  if (likely(sql_mode_inited) &&
      (unlikely(print_event_info->sql_mode != sql_mode ||
                !print_event_info->sql_mode_inited)))
2858
  {
2859 2860 2861 2862
    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;
2863
  }
unknown's avatar
unknown committed
2864 2865
  if (print_event_info->auto_increment_increment != auto_increment_increment ||
      print_event_info->auto_increment_offset != auto_increment_offset)
2866
  {
unknown's avatar
unknown committed
2867 2868 2869
    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
2870 2871
    print_event_info->auto_increment_increment= auto_increment_increment;
    print_event_info->auto_increment_offset=    auto_increment_offset;
2872 2873
  }

2874 2875
  /* TODO: print the catalog when we feature SET CATALOG */

2876 2877 2878
  if (likely(charset_inited) &&
      (unlikely(!print_event_info->charset_inited ||
                bcmp((uchar*) print_event_info->charset, (uchar*) charset, 6))))
2879
  {
2880 2881
    CHARSET_INFO *cs_info= get_charset(uint2korr(charset), MYF(MY_WME));
    if (cs_info)
2882
    {
2883 2884 2885
      /* for mysql client */
      my_b_printf(file, "/*!\\C %s */%s\n",
                  cs_info->csname, print_event_info->delimiter);
2886
    }
2887 2888 2889 2890 2891 2892 2893 2894 2895 2896 2897
    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;
2898
  }
2899 2900
  if (time_zone_len)
  {
2901 2902
    if (bcmp((uchar*) print_event_info->time_zone_str,
             (uchar*) time_zone_str, time_zone_len+1))
2903
    {
unknown's avatar
unknown committed
2904 2905
      my_b_printf(file,"SET @@session.time_zone='%s'%s\n",
                  time_zone_str, print_event_info->delimiter);
unknown's avatar
unknown committed
2906
      memcpy(print_event_info->time_zone_str, time_zone_str, time_zone_len+1);
2907 2908
    }
  }
2909 2910
  if (lc_time_names_number != print_event_info->lc_time_names_number)
  {
unknown's avatar
unknown committed
2911 2912
    my_b_printf(file, "SET @@session.lc_time_names=%d%s\n",
                lc_time_names_number, print_event_info->delimiter);
2913 2914
    print_event_info->lc_time_names_number= lc_time_names_number;
  }
2915 2916 2917
  if (charset_database_number != print_event_info->charset_database_number)
  {
    if (charset_database_number)
unknown's avatar
unknown committed
2918 2919
      my_b_printf(file, "SET @@session.collation_database=%d%s\n",
                  charset_database_number, print_event_info->delimiter);
2920
    else
unknown's avatar
unknown committed
2921 2922
      my_b_printf(file, "SET @@session.collation_database=DEFAULT%s\n",
                  print_event_info->delimiter);
2923 2924
    print_event_info->charset_database_number= charset_database_number;
  }
unknown's avatar
unknown committed
2925 2926
}

2927

unknown's avatar
unknown committed
2928
void Query_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
2929
{
2930 2931 2932
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
2933
  my_b_write(&cache, (uchar*) query, q_len);
2934
  my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
2935
}
unknown's avatar
unknown committed
2936
#endif /* MYSQL_CLIENT */
2937

unknown's avatar
unknown committed
2938

unknown's avatar
unknown committed
2939
/*
2940
  Query_log_event::do_apply_event()
unknown's avatar
unknown committed
2941
*/
unknown's avatar
unknown committed
2942

unknown's avatar
SCRUM  
unknown committed
2943
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2944

2945
int Query_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
2946
{
2947
  return do_apply_event(rli, query, q_len);
unknown's avatar
unknown committed
2948 2949 2950
}


unknown's avatar
unknown committed
2951 2952 2953 2954 2955 2956 2957 2958 2959 2960 2961 2962 2963 2964 2965 2966 2967
/**
  @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...
*/
2968
int Query_log_event::do_apply_event(Relay_log_info const *rli,
2969
                                      const char *query_arg, uint32 q_len_arg)
unknown's avatar
unknown committed
2970
{
2971
  LEX_STRING new_db;
unknown's avatar
unknown committed
2972
  int expected_error,actual_error= 0;
2973 2974
  HA_CREATE_INFO db_options;

2975
  /*
2976 2977 2978
    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
2979
    Query_log_event::do_apply_event()). Same for thd->db.  Thank
2980
    you.
2981
  */
2982
  thd->catalog= catalog_len ? (char *) catalog : (char *)"";
2983 2984 2985
  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' */
2986 2987 2988 2989 2990 2991 2992

  /*
    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;
2993 2994
  thd->variables.auto_increment_increment= auto_increment_increment;
  thd->variables.auto_increment_offset=    auto_increment_offset;
unknown's avatar
unknown committed
2995

2996
  /*
2997 2998 2999 3000 3001 3002 3003 3004
    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.
3005
  */
3006
  const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
3007 3008
  DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));

3009
  clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037 3038
  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
  {
3039
    const_cast<Relay_log_info*>(rli)->slave_close_thread_tables(thd);
3040
  }
3041

unknown's avatar
unknown committed
3042 3043 3044 3045 3046 3047 3048
  /*
    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
3049
            ::do_apply_event(), then the companion SET also have so
3050
            we don't need to reset_one_shot_variables().
unknown's avatar
unknown committed
3051
  */
3052 3053 3054
  if (!strncmp(query_arg, "BEGIN", q_len_arg) ||
      !strncmp(query_arg, "COMMIT", q_len_arg) ||
      !strncmp(query_arg, "ROLLBACK", q_len_arg) ||
3055
      rpl_filter->db_ok(thd->db))
3056 3057
  {
    thd->set_time((time_t)when);
3058
    thd->set_query((char*)query_arg, q_len_arg);
Konstantin Osipov's avatar
Konstantin Osipov committed
3059
    pthread_mutex_lock(&LOCK_thread_count);
3060
    thd->query_id = next_query_id();
Konstantin Osipov's avatar
Konstantin Osipov committed
3061
    pthread_mutex_unlock(&LOCK_thread_count);
unknown's avatar
unknown committed
3062
    thd->variables.pseudo_thread_id= thread_id;		// for temp tables
3063
    DBUG_PRINT("query",("%s", thd->query()));
3064

unknown's avatar
unknown committed
3065
    if (ignored_error_code((expected_error= error_code)) ||
3066
	!unexpected_error_code(expected_error))
3067 3068 3069
    {
      if (flags2_inited)
        /*
3070 3071
          all bits of thd->options which are 1 in OPTIONS_WRITTEN_TO_BIN_LOG
          must take their value from flags2.
3072
        */
3073
        thd->options= flags2|(thd->options & ~OPTIONS_WRITTEN_TO_BIN_LOG);
3074 3075
      /*
        else, we are in a 3.23/4.0 binlog; we previously received a
3076 3077
        Rotate_log_event which reset thd->options and sql_mode etc, so
        nothing to do.
3078 3079 3080 3081 3082
      */
      /*
        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
3083 3084 3085
        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).
3086 3087 3088 3089 3090 3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103
      */
      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))))
          {
            /*
3104 3105 3106 3107
              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).
3108
            */
3109
            set_slave_thread_default_charset(thd, rli);
3110 3111 3112 3113 3114
            goto compare_errors;
          }
          thd->update_charset(); // for the charset change to take effect
        }
      }
3115 3116 3117
      if (time_zone_len)
      {
        String tmp(time_zone_str, time_zone_len, &my_charset_bin);
3118
        if (!(thd->variables.time_zone= my_tz_find(thd, &tmp)))
3119 3120 3121 3122 3123 3124
        {
          my_error(ER_UNKNOWN_TIME_ZONE, MYF(0), tmp.c_ptr());
          thd->variables.time_zone= global_system_variables.time_zone;
          goto compare_errors;
        }
      }
3125 3126 3127 3128 3129 3130 3131 3132 3133 3134 3135 3136 3137
      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;
3138 3139 3140 3141 3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152
      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;
      
3153 3154
      thd->table_map_for_update= (table_map)table_map_for_update;
      
3155
      /* Execute the query (note that we bypass dispatch_command()) */
3156
      const char* found_semicolon= NULL;
3157
      mysql_parse(thd, thd->query(), thd->query_length(), &found_semicolon);
3158
      log_slow_statement(thd);
3159
    }
unknown's avatar
unknown committed
3160 3161
    else
    {
unknown's avatar
unknown committed
3162
      /*
unknown's avatar
unknown committed
3163 3164 3165 3166 3167
        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
3168
      */
3169
      if (mysql_test_parse_for_slave(thd, thd->query(), thd->query_length()))
3170
        clear_all_errors(thd, const_cast<Relay_log_info*>(rli)); /* Can ignore query */
unknown's avatar
unknown committed
3171
      else
3172
      {
3173
        rli->report(ERROR_LEVEL, expected_error, 
unknown's avatar
unknown committed
3174
                          "\
unknown's avatar
unknown committed
3175
Query partially completed on the master (error on master: %d) \
unknown's avatar
unknown committed
3176 3177 3178
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; \
3179
START SLAVE; . Query: '%s'", expected_error, thd->query());
3180
        thd->is_slave_error= 1;
unknown's avatar
unknown committed
3181 3182 3183
      }
      goto end;
    }
3184

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

3189
compare_errors:
unknown's avatar
unknown committed
3190 3191

     /*
unknown's avatar
unknown committed
3192
      If we expected a non-zero error code, and we don't get the same error
3193
      code, and it should be ignored or is related to a concurrency issue.
unknown's avatar
unknown committed
3194
    */
Marc Alff's avatar
Marc Alff committed
3195
    actual_error= thd->is_error() ? thd->stmt_da->sql_errno() : 0;
3196 3197
    DBUG_PRINT("info",("expected_error: %d  sql_errno: %d",
 		       expected_error, actual_error));
3198 3199
    if ((expected_error && expected_error != actual_error &&
         !concurrency_error_code(expected_error)) &&
3200 3201
 	!ignored_error_code(actual_error) &&
 	!ignored_error_code(expected_error))
unknown's avatar
unknown committed
3202
    {
3203
      rli->report(ERROR_LEVEL, 0,
3204 3205
                      "\
Query caused different errors on master and slave.     \
unknown's avatar
unknown committed
3206
Error on master: '%s' (%d), Error on slave: '%s' (%d). \
unknown's avatar
unknown committed
3207
Default database: '%s'. Query: '%s'",
3208 3209
                      ER_SAFE(expected_error),
                      expected_error,
Marc Alff's avatar
Marc Alff committed
3210
                      actual_error ? thd->stmt_da->message() : "no error",
3211 3212
                      actual_error,
                      print_slave_db_safe(db), query_arg);
3213
      thd->is_slave_error= 1;
unknown's avatar
unknown committed
3214 3215
    }
    /*
3216 3217
      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
3218
    */
3219 3220
    else if ((expected_error == actual_error && 
              !concurrency_error_code(expected_error)) ||
3221
 	     ignored_error_code(actual_error))
unknown's avatar
unknown committed
3222 3223
    {
      DBUG_PRINT("info",("error ignored"));
3224
      clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
3225
      thd->killed= THD::NOT_KILLED;
3226 3227 3228 3229 3230 3231 3232 3233 3234
      /*
        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)
        ha_autocommit_or_rollback(thd, TRUE);
unknown's avatar
unknown committed
3235
    }
3236 3237 3238 3239 3240 3241 3242 3243
    /*
      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)))
      ha_autocommit_or_rollback(thd, TRUE);
unknown's avatar
unknown committed
3244 3245
    /*
      Other cases: mostly we expected no error and get one.
unknown's avatar
unknown committed
3246
    */
3247
    else if (thd->is_slave_error || thd->is_fatal_error)
unknown's avatar
unknown committed
3248
    {
3249
      rli->report(ERROR_LEVEL, actual_error,
3250
                      "Error '%s' on query. Default database: '%s'. Query: '%s'",
Marc Alff's avatar
Marc Alff committed
3251
                      (actual_error ? thd->stmt_da->message() :
3252 3253
                       "unexpected success or fatal error"),
                      print_slave_db_safe(thd->db), query_arg);
3254
      thd->is_slave_error= 1;
unknown's avatar
unknown committed
3255
    }
3256 3257 3258 3259 3260 3261 3262 3263 3264

    /*
      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, ...);
3265
      thd->is_slave_error = 1;
3266 3267 3268 3269
      }
      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...
3270

3271 3272 3273 3274 3275 3276 3277
      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
3278 3279
  } /* End of if (db_ok(... */

3280 3281 3282 3283 3284 3285 3286 3287 3288 3289 3290 3291 3292 3293 3294
  {/**
      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
3295
end:
3296 3297 3298 3299 3300 3301
  /*
    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
3302 3303 3304
    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.
3305
  */
unknown's avatar
unknown committed
3306
  thd->catalog= 0;
3307
  thd->set_db(NULL, 0);                 /* will free the current database */
3308
  thd->set_query(NULL, 0);
3309
  DBUG_PRINT("info", ("end: query= 0"));
unknown's avatar
unknown committed
3310
  close_thread_tables(thd);      
3311 3312 3313 3314 3315 3316 3317 3318 3319 3320
  /*
    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
3321
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
3322
  return thd->is_slave_error;
3323 3324
}

3325
int Query_log_event::do_update_pos(Relay_log_info *rli)
3326
{
3327
  /*
3328 3329 3330
    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.
3331
  */
3332 3333 3334 3335 3336 3337 3338
  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
3339
}
3340 3341


3342 3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 3360 3361 3362 3363 3364 3365
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)
    {
      thd->options|= OPTION_BEGIN;
      DBUG_RETURN(Log_event::continue_group(rli));
    }

    if (strcmp("COMMIT", query) == 0 || strcmp("ROLLBACK", query) == 0)
    {
      thd->options&= ~OPTION_BEGIN;
      DBUG_RETURN(Log_event::EVENT_SKIP_COUNT);
    }
  }
  DBUG_RETURN(Log_event::do_shall_skip(rli));
}

unknown's avatar
SCRUM  
unknown committed
3366
#endif
unknown's avatar
unknown committed
3367

unknown's avatar
unknown committed
3368

unknown's avatar
unknown committed
3369
/**************************************************************************
3370
	Start_log_event_v3 methods
unknown's avatar
unknown committed
3371
**************************************************************************/
3372

3373
#ifndef MYSQL_CLIENT
3374 3375
Start_log_event_v3::Start_log_event_v3()
  :Log_event(), created(0), binlog_version(BINLOG_VERSION),
3376
   dont_set_created(0)
3377 3378 3379 3380 3381
{
  memcpy(server_version, ::server_version, ST_SERVER_VER_LEN);
}
#endif

unknown's avatar
unknown committed
3382
/*
3383
  Start_log_event_v3::pack_info()
unknown's avatar
unknown committed
3384
*/
3385

unknown's avatar
SCRUM  
unknown committed
3386
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3387
void Start_log_event_v3::pack_info(Protocol *protocol)
unknown's avatar
unknown committed
3388
{
3389 3390 3391 3392
  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
3393 3394
  pos= int10_to_str(binlog_version, pos, 10);
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
unknown's avatar
unknown committed
3395
}
unknown's avatar
SCRUM  
unknown committed
3396
#endif
3397 3398


unknown's avatar
unknown committed
3399
/*
3400
  Start_log_event_v3::print()
unknown's avatar
unknown committed
3401
*/
unknown's avatar
unknown committed
3402 3403

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
3404
void Start_log_event_v3::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
3405
{
3406 3407 3408 3409 3410
  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
3411
  if (!print_event_info->short_form)
3412
  {
3413 3414 3415 3416
    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);
3417
    if (created)
3418 3419
      my_b_printf(&cache," at startup");
    my_b_printf(&cache, "\n");
3420
    if (flags & LOG_EVENT_BINLOG_IN_USE_F)
3421 3422
      my_b_printf(&cache, "# Warning: this binlog is either in use or was not "
                  "closed properly.\n");
3423
  }
3424
  if (!is_artificial_event() && created)
3425
  {
3426
#ifdef WHEN_WE_HAVE_THE_RESET_CONNECTION_SQL_COMMAND
3427 3428 3429 3430 3431 3432
    /*
      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
3433
    my_b_printf(&cache,"RESET CONNECTION%s\n", print_event_info->delimiter);
3434
#else
unknown's avatar
unknown committed
3435
    my_b_printf(&cache,"ROLLBACK%s\n", print_event_info->delimiter);
3436
#endif
3437
  }
3438 3439 3440 3441
  if (temp_buf &&
      print_event_info->base64_output_mode != BASE64_OUTPUT_NEVER &&
      !print_event_info->short_form)
  {
3442 3443
    if (print_event_info->base64_output_mode != BASE64_OUTPUT_DECODE_ROWS)
      my_b_printf(&cache, "BINLOG '\n");
3444 3445 3446
    print_base64(&cache, print_event_info, FALSE);
    print_event_info->printed_fd_event= TRUE;
  }
3447
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
3448
}
unknown's avatar
unknown committed
3449
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
3450

unknown's avatar
unknown committed
3451
/*
3452
  Start_log_event_v3::Start_log_event_v3()
unknown's avatar
unknown committed
3453
*/
3454

3455
Start_log_event_v3::Start_log_event_v3(const char* buf,
3456 3457
                                       const Format_description_log_event
                                       *description_event)
3458
  :Log_event(buf, description_event)
3459
{
3460 3461
  buf+= description_event->common_header_len;
  binlog_version= uint2korr(buf+ST_BINLOG_VER_OFFSET);
3462 3463
  memcpy(server_version, buf+ST_SERVER_VER_OFFSET,
	 ST_SERVER_VER_LEN);
unknown's avatar
unknown committed
3464 3465
  // prevent overrun if log is corrupted on disk
  server_version[ST_SERVER_VER_LEN-1]= 0;
3466
  created= uint4korr(buf+ST_CREATED_OFFSET);
3467
  dont_set_created= 1;
unknown's avatar
unknown committed
3468 3469
}

3470

unknown's avatar
unknown committed
3471
/*
3472
  Start_log_event_v3::write()
unknown's avatar
unknown committed
3473
*/
3474

3475
#ifndef MYSQL_CLIENT
3476
bool Start_log_event_v3::write(IO_CACHE* file)
3477
{
3478
  char buff[START_V3_HEADER_LEN];
3479 3480
  int2store(buff + ST_BINLOG_VER_OFFSET,binlog_version);
  memcpy(buff + ST_SERVER_VER_OFFSET,server_version,ST_SERVER_VER_LEN);
3481 3482
  if (!dont_set_created)
    created= when= get_time();
3483
  int4store(buff + ST_CREATED_OFFSET,created);
3484
  return (write_header(file, sizeof(buff)) ||
3485
          my_b_safe_write(file, (uchar*) buff, sizeof(buff)));
3486
}
3487
#endif
3488

3489

unknown's avatar
unknown committed
3490
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3491

unknown's avatar
unknown committed
3492 3493
/**
  Start_log_event_v3::do_apply_event() .
3494 3495
  The master started

unknown's avatar
unknown committed
3496
    IMPLEMENTATION
unknown's avatar
unknown committed
3497
    - To handle the case where the master died without having time to write
unknown's avatar
unknown committed
3498 3499 3500
    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).
3501

unknown's avatar
unknown committed
3502
  @todo
3503
    - Remove all active user locks.
unknown's avatar
unknown committed
3504 3505 3506 3507
    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
3508 3509
*/

3510
int Start_log_event_v3::do_apply_event(Relay_log_info const *rli)
3511
{
3512
  DBUG_ENTER("Start_log_event_v3::do_apply_event");
unknown's avatar
unknown committed
3513 3514
  switch (binlog_version)
  {
3515 3516 3517 3518 3519 3520 3521
  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
3522
    */
3523 3524 3525 3526 3527
    if (created)
    {
      close_temporary_tables(thd);
      cleanup_load_tmpdir();
    }
3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538
    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
3539 3540
    break;

3541
    /*
unknown's avatar
unknown committed
3542 3543
       Now the older formats; in that case load_tmpdir is cleaned up by the I/O
       thread.
unknown's avatar
unknown committed
3544
    */
3545
  case 1:
3546
    if (strncmp(rli->relay_log.description_event_for_exec->server_version,
3547 3548 3549 3550 3551 3552 3553 3554
                "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
3555
    /*
3556 3557 3558
      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
3559 3560 3561 3562
    */
    break;
  default:
    /* this case is impossible */
3563
    DBUG_RETURN(1);
unknown's avatar
unknown committed
3564
  }
3565
  DBUG_RETURN(0);
3566
}
unknown's avatar
unknown committed
3567
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
3568

3569 3570 3571 3572
/***************************************************************************
       Format_description_log_event methods
****************************************************************************/

unknown's avatar
unknown committed
3573
/**
3574 3575 3576 3577 3578 3579
  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
3580 3581 3582 3583 3584 3585 3586

  @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.
3587 3588 3589
*/

Format_description_log_event::
3590
Format_description_log_event(uint8 binlog_ver, const char* server_ver)
3591
  :Start_log_event_v3(), event_type_permutation(0)
3592 3593 3594 3595 3596
{
  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
3597 3598
    DBUG_EXECUTE_IF("pretend_version_50034_in_binlog",
                    strmov(server_version, "5.0.34"););
3599 3600 3601 3602
    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),
3603 3604
                                       MYF(0));

3605 3606 3607 3608 3609 3610 3611
    /*
      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)
    {
3612
#ifndef DBUG_OFF      
3613 3614
      // Allows us to sanity-check that all events initialized their
      // events (see the end of this 'if' block).
3615 3616 3617
      memset(post_header_len, 255,
                     number_of_event_types*sizeof(uint8));
#endif
3618 3619

      /* Note: all event types must explicitly fill in their lengths here. */
3620 3621
      post_header_len[START_EVENT_V3-1]= START_V3_HEADER_LEN;
      post_header_len[QUERY_EVENT-1]= QUERY_HEADER_LEN;
3622
      post_header_len[STOP_EVENT-1]= STOP_HEADER_LEN;
3623
      post_header_len[ROTATE_EVENT-1]= ROTATE_HEADER_LEN;
3624
      post_header_len[INTVAR_EVENT-1]= INTVAR_HEADER_LEN;
3625
      post_header_len[LOAD_EVENT-1]= LOAD_HEADER_LEN;
3626
      post_header_len[SLAVE_EVENT-1]= SLAVE_HEADER_LEN;
3627 3628 3629 3630
      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;
3631 3632 3633
      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;
3634
      post_header_len[FORMAT_DESCRIPTION_EVENT-1]= FORMAT_DESCRIPTION_HEADER_LEN;
3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647
      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;

3648 3649 3650 3651 3652 3653 3654 3655 3656 3657 3658 3659 3660 3661 3662 3663 3664 3665 3666
      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;);
3667
      post_header_len[INCIDENT_EVENT-1]= INCIDENT_HEADER_LEN;
Andrei Elkin's avatar
Andrei Elkin committed
3668
      post_header_len[HEARTBEAT_LOG_EVENT-1]= 0;
3669 3670

      // Sanity-check that all post header lengths are initialized.
3671 3672 3673
      int i;
      for (i=0; i<number_of_event_types; i++)
        DBUG_ASSERT(post_header_len[i] != 255);
3674 3675 3676 3677 3678 3679 3680 3681 3682 3683 3684 3685 3686 3687
    }
    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 :
3688
      LOG_EVENT_MINIMAL_HEADER_LEN;
3689 3690 3691 3692 3693 3694 3695 3696 3697
    /*
      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),
3698
                                       MYF(0));
3699 3700 3701 3702 3703 3704 3705 3706 3707 3708 3709 3710 3711 3712 3713 3714 3715 3716 3717 3718 3719 3720
    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
3721
  calc_server_version_split();
3722 3723 3724
}


unknown's avatar
unknown committed
3725
/**
3726 3727 3728 3729
  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
3730
  post-header starts.
unknown's avatar
unknown committed
3731

3732 3733 3734 3735 3736 3737
  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
3738

3739 3740 3741 3742 3743 3744 3745 3746 3747
  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*
3748
                             description_event)
3749
  :Start_log_event_v3(buf, description_event), event_type_permutation(0)
3750 3751 3752 3753 3754 3755 3756 3757
{
  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",
3758
                      common_header_len, number_of_event_types));
3759
  /* If alloc fails, we'll detect it in is_valid() */
3760
  post_header_len= (uint8*) my_memdup((uchar*)buf+ST_COMMON_HEADER_LEN_OFFSET+1,
3761
                                      number_of_event_types*
3762
                                      sizeof(*post_header_len), MYF(0));
unknown's avatar
unknown committed
3763
  calc_server_version_split();
3764 3765 3766 3767 3768 3769 3770 3771 3772 3773

  /*
    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.

3774 3775 3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802 3803 3804 3805 3806 3807 3808 3809 3810 3811 3812 3813 3814 3815 3816
    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.
3817 3818
  */
  if (post_header_len &&
3819 3820 3821 3822 3823 3824 3825 3826 3827 3828 3829 3830
      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')))
3831 3832 3833 3834 3835 3836 3837 3838 3839 3840 3841 3842 3843 3844 3845 3846 3847 3848 3849 3850 3851 3852 3853 3854 3855 3856 3857 3858 3859 3860 3861 3862 3863 3864 3865 3866 3867
  {
    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];
  }
3868 3869 3870
  DBUG_VOID_RETURN;
}

3871
#ifndef MYSQL_CLIENT
3872 3873 3874 3875 3876 3877
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().
  */
3878
  uchar buff[FORMAT_DESCRIPTION_HEADER_LEN];
3879 3880
  int2store(buff + ST_BINLOG_VER_OFFSET,binlog_version);
  memcpy((char*) buff + ST_SERVER_VER_OFFSET,server_version,ST_SERVER_VER_LEN);
3881 3882
  if (!dont_set_created)
    created= when= get_time();
3883
  int4store(buff + ST_CREATED_OFFSET,created);
3884
  buff[ST_COMMON_HEADER_LEN_OFFSET]= LOG_EVENT_HEADER_LEN;
3885
  memcpy((char*) buff+ST_COMMON_HEADER_LEN_OFFSET+1, (uchar*) post_header_len,
3886 3887 3888 3889
         LOG_EVENT_TYPES);
  return (write_header(file, sizeof(buff)) ||
          my_b_safe_write(file, buff, sizeof(buff)));
}
3890
#endif
3891

3892
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3893
int Format_description_log_event::do_apply_event(Relay_log_info const *rli)
3894
{
3895
  int ret= 0;
3896
  DBUG_ENTER("Format_description_log_event::do_apply_event");
3897

3898 3899 3900 3901
  /*
    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
3902 3903
    flushing the binlog cache to the binlog. XA guarantees that master has
    rolled back. So we roll back.
3904 3905 3906 3907 3908
    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).
  */
3909
  if (!is_artificial_event() && created && thd->transaction.all.ha_list)
3910
  {
3911
    /* This is not an error (XA is safe), just an information */
3912 3913 3914 3915 3916
    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."); 
3917
    const_cast<Relay_log_info*>(rli)->cleanup_context(thd, 1);
3918
  }
Konstantin Osipov's avatar
Konstantin Osipov committed
3919

3920
  /*
3921
    If this event comes from ourselves, there is no cleaning task to
3922
    perform, we don't call Start_log_event_v3::do_apply_event()
3923
    (this was just to update the log's description event).
3924
  */
3925 3926 3927 3928 3929 3930 3931 3932 3933 3934 3935
  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.
    */
3936
    ret= Start_log_event_v3::do_apply_event(rli);
3937
  }
3938 3939 3940 3941 3942 3943 3944 3945 3946

  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);
3947 3948
}

3949
int Format_description_log_event::do_update_pos(Relay_log_info *rli)
3950
{
3951 3952 3953
  if (server_id == (uint32) ::server_id)
  {
    /*
3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964 3965 3966
      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();
3967
    return 0;
3968
  }
3969 3970 3971
  else
  {
    return Log_event::do_update_pos(rli);
3972 3973 3974
  }
}

3975
Log_event::enum_skip_reason
3976
Format_description_log_event::do_shall_skip(Relay_log_info *rli)
3977
{
3978
  return Log_event::EVENT_SKIP_NOT;
3979
}
3980

3981 3982
#endif

unknown's avatar
unknown committed
3983 3984 3985 3986 3987 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

/**
   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]));
}


4014
  /**************************************************************************
4015
        Load_log_event methods
4016
   General note about Load_log_event: the binlogging of LOAD DATA INFILE is
4017
   going to be changed in 5.0 (or maybe in 5.1; not decided yet).
4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029
   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).
  **************************************************************************/
4030

unknown's avatar
unknown committed
4031
/*
4032
  Load_log_event::pack_info()
unknown's avatar
unknown committed
4033
*/
4034

unknown's avatar
SCRUM  
unknown committed
4035
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
4036
uint Load_log_event::get_query_buffer_length()
4037
{
unknown's avatar
unknown committed
4038
  return
4039 4040
    5 + db_len + 3 +                        // "use DB; "
    18 + fname_len + 2 +                    // "LOAD DATA INFILE 'file''"
unknown's avatar
unknown committed
4041
    7 +					    // LOCAL
4042
    9 +                                     // " REPLACE or IGNORE "
4043
    13 + table_name_len*2 +                 // "INTO TABLE `table`"
4044 4045 4046
    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'"
4047
    21 + sql_ex.line_term_len*4 + 2 +       // " LINES TERMINATED BY 'str'"
4048 4049
    19 + sql_ex.line_start_len*4 + 2 +      // " LINES STARTING BY 'str'"
    15 + 22 +                               // " IGNORE xxx  LINES"
4050
    3 + (num_fields-1)*2 + field_block_len; // " (field1, field2, ...)"
unknown's avatar
unknown committed
4051
}
4052

unknown's avatar
unknown committed
4053

4054
void Load_log_event::print_query(bool need_db, const char *cs, char *buf,
unknown's avatar
unknown committed
4055 4056 4057 4058 4059
                                 char **end, char **fn_start, char **fn_end)
{
  char *pos= buf;

  if (need_db && db && db_len)
4060
  {
4061 4062
    pos= strmov(pos, "use `");
    memcpy(pos, db, db_len);
unknown's avatar
unknown committed
4063
    pos= strmov(pos+db_len, "`; ");
4064
  }
4065

unknown's avatar
unknown committed
4066
  pos= strmov(pos, "LOAD DATA ");
unknown's avatar
unknown committed
4067 4068 4069 4070

  if (fn_start)
    *fn_start= pos;

unknown's avatar
unknown committed
4071 4072 4073
  if (check_fname_outside_temp_buf())
    pos= strmov(pos, "LOCAL ");
  pos= strmov(pos, "INFILE '");
4074
  memcpy(pos, fname, fname_len);
unknown's avatar
unknown committed
4075
  pos= strmov(pos+fname_len, "' ");
4076

unknown's avatar
unknown committed
4077
  if (sql_ex.opt_flags & REPLACE_FLAG)
4078
    pos= strmov(pos, "REPLACE ");
unknown's avatar
unknown committed
4079
  else if (sql_ex.opt_flags & IGNORE_FLAG)
4080
    pos= strmov(pos, "IGNORE ");
4081

unknown's avatar
unknown committed
4082 4083 4084 4085 4086 4087
  pos= strmov(pos ,"INTO");

  if (fn_end)
    *fn_end= pos;

  pos= strmov(pos ," TABLE `");
4088 4089 4090
  memcpy(pos, table_name, table_name_len);
  pos+= table_name_len;

4091 4092 4093 4094 4095 4096 4097 4098 4099 4100
  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
4101 4102 4103 4104 4105
  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);
4106

unknown's avatar
unknown committed
4107 4108
  pos= strmov(pos, " ESCAPED BY ");
  pos= pretty_print_str(pos, sql_ex.escaped, sql_ex.escaped_len);
4109

unknown's avatar
unknown committed
4110 4111
  pos= strmov(pos, " LINES TERMINATED BY ");
  pos= pretty_print_str(pos, sql_ex.line_term, sql_ex.line_term_len);
4112 4113
  if (sql_ex.line_start_len)
  {
4114
    pos= strmov(pos, " STARTING BY ");
4115
    pos= pretty_print_str(pos, sql_ex.line_start, sql_ex.line_start_len);
4116
  }
4117

unknown's avatar
unknown committed
4118
  if ((long) skip_lines > 0)
4119 4120
  {
    pos= strmov(pos, " IGNORE ");
unknown's avatar
unknown committed
4121
    pos= longlong10_to_str((longlong) skip_lines, pos, 10);
4122 4123
    pos= strmov(pos," LINES ");    
  }
4124 4125 4126 4127

  if (num_fields)
  {
    uint i;
unknown's avatar
unknown committed
4128
    const char *field= fields;
4129
    pos= strmov(pos, " (");
4130 4131 4132
    for (i = 0; i < num_fields; i++)
    {
      if (i)
unknown's avatar
unknown committed
4133 4134 4135 4136
      {
        *pos++= ' ';
        *pos++= ',';
      }
4137
      memcpy(pos, field, field_lens[i]);
unknown's avatar
unknown committed
4138 4139
      pos+=   field_lens[i];
      field+= field_lens[i]  + 1;
4140
    }
4141
    *pos++= ')';
4142
  }
4143

unknown's avatar
unknown committed
4144 4145 4146 4147 4148 4149 4150 4151
  *end= pos;
}


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

4152
  if (!(buf= (char*) my_malloc(get_query_buffer_length(), MYF(MY_WME))))
unknown's avatar
unknown committed
4153
    return;
4154
  print_query(TRUE, NULL, buf, &end, 0, 0);
unknown's avatar
unknown committed
4155
  protocol->store(buf, end-buf, &my_charset_bin);
unknown's avatar
unknown committed
4156
  my_free(buf, MYF(0));
4157
}
unknown's avatar
unknown committed
4158
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
4159

4160

4161 4162
#ifndef MYSQL_CLIENT

unknown's avatar
unknown committed
4163
/*
4164
  Load_log_event::write_data_header()
unknown's avatar
unknown committed
4165
*/
4166

4167
bool Load_log_event::write_data_header(IO_CACHE* file)
4168
{
4169
  char buf[LOAD_HEADER_LEN];
unknown's avatar
unknown committed
4170
  int4store(buf + L_THREAD_ID_OFFSET, slave_proxy_id);
4171 4172 4173 4174 4175
  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);
4176
  return my_b_safe_write(file, (uchar*)buf, LOAD_HEADER_LEN) != 0;
4177
}
4178

4179

unknown's avatar
unknown committed
4180
/*
4181
  Load_log_event::write_data_body()
unknown's avatar
unknown committed
4182
*/
4183

4184
bool Load_log_event::write_data_body(IO_CACHE* file)
4185
{
4186 4187 4188
  if (sql_ex.write_data(file))
    return 1;
  if (num_fields && fields && field_lens)
4189
  {
4190 4191
    if (my_b_safe_write(file, (uchar*)field_lens, num_fields) ||
	my_b_safe_write(file, (uchar*)fields, field_block_len))
4192
      return 1;
4193
  }
4194 4195 4196
  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));
4197 4198
}

4199

unknown's avatar
unknown committed
4200
/*
4201
  Load_log_event::Load_log_event()
unknown's avatar
unknown committed
4202
*/
4203

unknown's avatar
unknown committed
4204 4205 4206
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
4207
			       enum enum_duplicates handle_dup,
4208
			       bool ignore, bool using_trans)
4209
  :Log_event(thd_arg,
unknown's avatar
unknown committed
4210
             thd_arg->thread_specific_used ? LOG_EVENT_THREAD_SPECIFIC_F : 0,
4211
             using_trans),
4212
   thread_id(thd_arg->thread_id),
4213
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
unknown's avatar
unknown committed
4214 4215
   num_fields(0),fields(0),
   field_lens(0),field_block_len(0),
unknown's avatar
unknown committed
4216
   table_name(table_name_arg ? table_name_arg : ""),
4217
   db(db_arg), fname(ex->file_name), local_fname(FALSE)
unknown's avatar
unknown committed
4218 4219 4220
{
  time_t end_time;
  time(&end_time);
4221
  exec_time = (ulong) (end_time  - thd_arg->start_time);
4222 4223 4224
  /* 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
4225 4226 4227 4228 4229 4230 4231 4232 4233 4234 4235 4236 4237
  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;
4238
    
unknown's avatar
unknown committed
4239
  if (ex->dumpfile)
unknown's avatar
unknown committed
4240
    sql_ex.opt_flags|= DUMPFILE_FLAG;
unknown's avatar
unknown committed
4241
  if (ex->opt_enclosed)
unknown's avatar
unknown committed
4242
    sql_ex.opt_flags|= OPT_ENCLOSED_FLAG;
4243

unknown's avatar
unknown committed
4244
  sql_ex.empty_flags= 0;
4245

4246
  switch (handle_dup) {
unknown's avatar
unknown committed
4247
  case DUP_REPLACE:
unknown's avatar
unknown committed
4248
    sql_ex.opt_flags|= REPLACE_FLAG;
unknown's avatar
unknown committed
4249 4250 4251 4252
    break;
  case DUP_UPDATE:				// Impossible here
  case DUP_ERROR:
    break;	
unknown's avatar
unknown committed
4253
  }
4254 4255
  if (ignore)
    sql_ex.opt_flags|= IGNORE_FLAG;
4256

unknown's avatar
unknown committed
4257 4258 4259 4260 4261 4262 4263 4264 4265 4266
  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;
4267
    
unknown's avatar
unknown committed
4268
  skip_lines = ex->skip_lines;
4269

unknown's avatar
unknown committed
4270 4271 4272 4273 4274 4275 4276 4277 4278 4279 4280
  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);
4281 4282
  }

unknown's avatar
unknown committed
4283 4284 4285
  field_lens = (const uchar*)field_lens_buf.ptr();
  fields = fields_buf.ptr();
}
unknown's avatar
unknown committed
4286
#endif /* !MYSQL_CLIENT */
4287

4288

unknown's avatar
unknown committed
4289 4290
/**
  @note
unknown's avatar
unknown committed
4291 4292
    The caller must do buf[event_len] = 0 before he starts using the
    constructed event.
4293
*/
4294 4295 4296 4297
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
4298
   table_name(0), db(0), fname(0), local_fname(FALSE)
unknown's avatar
unknown committed
4299
{
unknown's avatar
unknown committed
4300
  DBUG_ENTER("Load_log_event");
4301 4302 4303 4304 4305 4306 4307 4308 4309 4310 4311 4312
  /*
    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
4313
  DBUG_VOID_RETURN;
4314 4315
}

4316

unknown's avatar
unknown committed
4317
/*
4318
  Load_log_event::copy_log_event()
unknown's avatar
unknown committed
4319
*/
4320

4321
int Load_log_event::copy_log_event(const char *buf, ulong event_len,
4322 4323
                                   int body_offset,
                                   const Format_description_log_event *description_event)
4324
{
4325
  DBUG_ENTER("Load_log_event::copy_log_event");
4326
  uint data_len;
4327
  char* buf_end = (char*)buf + event_len;
4328 4329
  /* this is the beginning of the post-header */
  const char* data_head = buf + description_event->common_header_len;
unknown's avatar
unknown committed
4330
  slave_proxy_id= thread_id= uint4korr(data_head + L_THREAD_ID_OFFSET);
4331 4332 4333 4334 4335
  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
4336
	  
unknown's avatar
unknown committed
4337
  if ((int) event_len < body_offset)
unknown's avatar
unknown committed
4338
    DBUG_RETURN(1);
4339 4340 4341 4342
  /*
    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.
  */
4343 4344 4345
  if (!(field_lens= (uchar*)sql_ex.init((char*)buf + body_offset,
                                        buf_end,
                                        buf[EVENT_TYPE_OFFSET] != LOAD_EVENT)))
unknown's avatar
unknown committed
4346
    DBUG_RETURN(1);
4347
  
4348
  data_len = event_len - body_offset;
4349
  if (num_fields > data_len) // simple sanity check against corruption
unknown's avatar
unknown committed
4350
    DBUG_RETURN(1);
4351
  for (uint i = 0; i < num_fields; i++)
4352
    field_block_len += (uint)field_lens[i] + 1;
4353

unknown's avatar
unknown committed
4354 4355 4356 4357
  fields = (char*)field_lens + num_fields;
  table_name  = fields + field_block_len;
  db = table_name + table_name_len + 1;
  fname = db + db_len + 1;
4358
  fname_len = (uint) strlen(fname);
4359
  // null termination is accomplished by the caller doing buf[event_len]=0
4360

unknown's avatar
unknown committed
4361
  DBUG_RETURN(0);
unknown's avatar
unknown committed
4362 4363 4364
}


unknown's avatar
unknown committed
4365
/*
4366
  Load_log_event::print()
unknown's avatar
unknown committed
4367
*/
4368 4369

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
4370
void Load_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
4371
{
unknown's avatar
unknown committed
4372
  print(file, print_event_info, 0);
unknown's avatar
unknown committed
4373 4374
}

unknown's avatar
unknown committed
4375

4376
void Load_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
4377
			   bool commented)
unknown's avatar
unknown committed
4378
{
4379 4380
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

unknown's avatar
unknown committed
4381
  DBUG_ENTER("Load_log_event::print");
unknown's avatar
unknown committed
4382
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
4383
  {
4384 4385 4386
    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
4387 4388
  }

4389
  bool different_db= 1;
4390
  if (db)
unknown's avatar
unknown committed
4391
  {
4392 4393 4394 4395 4396 4397
    /*
      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
4398
    if ((different_db= memcmp(print_event_info->db, db, db_len + 1)) &&
4399
        !commented)
unknown's avatar
unknown committed
4400
      memcpy(print_event_info->db, db, db_len + 1);
unknown's avatar
unknown committed
4401
  }
4402
  
4403
  if (db && db[0] && different_db)
unknown's avatar
unknown committed
4404
    my_b_printf(&cache, "%suse %s%s\n", 
unknown's avatar
unknown committed
4405
            commented ? "# " : "",
4406
            db, print_event_info->delimiter);
unknown's avatar
unknown committed
4407

4408
  if (flags & LOG_EVENT_THREAD_SPECIFIC_F)
unknown's avatar
unknown committed
4409
    my_b_printf(&cache,"%sSET @@session.pseudo_thread_id=%lu%s\n",
4410 4411
            commented ? "# " : "", (ulong)thread_id,
            print_event_info->delimiter);
4412
  my_b_printf(&cache, "%sLOAD DATA ",
unknown's avatar
unknown committed
4413
              commented ? "# " : "");
4414
  if (check_fname_outside_temp_buf())
4415 4416
    my_b_printf(&cache, "LOCAL ");
  my_b_printf(&cache, "INFILE '%-*s' ", fname_len, fname);
unknown's avatar
unknown committed
4417

unknown's avatar
unknown committed
4418
  if (sql_ex.opt_flags & REPLACE_FLAG)
4419
    my_b_printf(&cache,"REPLACE ");
unknown's avatar
unknown committed
4420
  else if (sql_ex.opt_flags & IGNORE_FLAG)
4421
    my_b_printf(&cache,"IGNORE ");
unknown's avatar
unknown committed
4422
  
4423 4424 4425
  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
4426

unknown's avatar
unknown committed
4427
  if (sql_ex.opt_flags & OPT_ENCLOSED_FLAG)
4428 4429 4430
    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
4431
     
4432 4433
  my_b_printf(&cache, " ESCAPED BY ");
  pretty_print_str(&cache, sql_ex.escaped, sql_ex.escaped_len);
unknown's avatar
unknown committed
4434
     
4435 4436
  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
4437

unknown's avatar
unknown committed
4438

4439
  if (sql_ex.line_start)
unknown's avatar
unknown committed
4440
  {
4441 4442
    my_b_printf(&cache," STARTING BY ");
    pretty_print_str(&cache, sql_ex.line_start, sql_ex.line_start_len);
unknown's avatar
unknown committed
4443
  }
4444
  if ((long) skip_lines > 0)
4445
    my_b_printf(&cache, " IGNORE %ld LINES", (long) skip_lines);
unknown's avatar
unknown committed
4446

4447 4448 4449 4450
  if (num_fields)
  {
    uint i;
    const char* field = fields;
4451
    my_b_printf(&cache, " (");
4452
    for (i = 0; i < num_fields; i++)
unknown's avatar
unknown committed
4453
    {
unknown's avatar
unknown committed
4454
      if (i)
4455
	my_b_printf(&cache, ",");
Staale Smedseng's avatar
Staale Smedseng committed
4456
      my_b_printf(&cache, "%s", field);
unknown's avatar
unknown committed
4457
	  
4458
      field += field_lens[i]  + 1;
unknown's avatar
unknown committed
4459
    }
4460
    my_b_printf(&cache, ")");
4461
  }
unknown's avatar
unknown committed
4462

unknown's avatar
unknown committed
4463
  my_b_printf(&cache, "%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
4464
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
4465
}
unknown's avatar
unknown committed
4466
#endif /* MYSQL_CLIENT */
4467

unknown's avatar
unknown committed
4468
#ifndef MYSQL_CLIENT
4469

unknown's avatar
unknown committed
4470
/**
4471
  Load_log_event::set_fields()
unknown's avatar
unknown committed
4472

unknown's avatar
unknown committed
4473 4474 4475 4476 4477
  @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
4478
*/
4479

unknown's avatar
unknown committed
4480
void Load_log_event::set_fields(const char* affected_db, 
4481 4482
				List<Item> &field_list,
                                Name_resolution_context *context)
unknown's avatar
unknown committed
4483 4484
{
  uint i;
unknown's avatar
unknown committed
4485
  const char* field = fields;
4486
  for (i= 0; i < num_fields; i++)
unknown's avatar
unknown committed
4487
  {
4488 4489
    field_list.push_back(new Item_field(context,
                                        affected_db, table_name, field));
4490
    field+= field_lens[i]  + 1;
unknown's avatar
unknown committed
4491
  }
unknown's avatar
unknown committed
4492
}
unknown's avatar
unknown committed
4493
#endif /* !MYSQL_CLIENT */
unknown's avatar
unknown committed
4494 4495


unknown's avatar
SCRUM  
unknown committed
4496
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
4497 4498 4499 4500 4501 4502 4503 4504 4505 4506 4507 4508 4509 4510 4511 4512 4513 4514 4515 4516 4517 4518 4519 4520
/**
  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
4521
    0           Success
unknown's avatar
unknown committed
4522 4523
  @retval
    1           Failure
unknown's avatar
unknown committed
4524
*/
4525

4526
int Load_log_event::do_apply_event(NET* net, Relay_log_info const *rli,
4527
                                   bool use_rli_only_for_errors)
4528
{
4529 4530 4531 4532
  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);
4533 4534
  DBUG_ASSERT(thd->query() == 0);
  thd->set_query_inner(NULL, 0);               // Should not be needed
4535
  thd->is_slave_error= 0;
4536
  clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
4537

4538
  /* see Query_log_event::do_apply_event() and BUG#13360 */
4539
  DBUG_ASSERT(!rli->m_table_map.count());
4540
  /*
4541
    Usually lex_start() is called by mysql_parse(), but we need it here
4542 4543
    as the present method does not call mysql_parse().
  */
4544 4545 4546
  lex_start(thd);
  mysql_reset_thd_for_next_command(thd);

unknown's avatar
unknown committed
4547
  if (!use_rli_only_for_errors)
4548
  {
4549 4550
    /*
      Saved for InnoDB, see comment in
4551
      Query_log_event::do_apply_event()
4552
    */
4553
    const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
4554
    DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));
4555
  }
4556 4557
 
   /*
4558 4559 4560 4561 4562 4563 4564
    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
4565
    done by testing rules in Create_file_log_event::do_apply_event()
4566 4567 4568
    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
4569 4570 4571 4572 4573 4574 4575 4576


    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
4577
            ::do_apply_event(), then the companion SET also have so
4578
            we don't need to reset_one_shot_variables().
unknown's avatar
unknown committed
4579
  */
4580
  if (rpl_filter->db_ok(thd->db))
4581
  {
4582
    thd->set_time((time_t)when);
Konstantin Osipov's avatar
Konstantin Osipov committed
4583
    pthread_mutex_lock(&LOCK_thread_count);
4584
    thd->query_id = next_query_id();
Konstantin Osipov's avatar
Konstantin Osipov committed
4585
    pthread_mutex_unlock(&LOCK_thread_count);
Marc Alff's avatar
Marc Alff committed
4586
    thd->warning_info->opt_clear_warning_info(thd->query_id);
4587 4588 4589

    TABLE_LIST tables;
    bzero((char*) &tables,sizeof(tables));
unknown's avatar
unknown committed
4590
    tables.db= thd->strmake(thd->db, thd->db_length);
4591
    tables.alias = tables.table_name = (char*) table_name;
4592
    tables.lock_type = TL_WRITE;
unknown's avatar
unknown committed
4593
    tables.updating= 1;
unknown's avatar
unknown committed
4594

4595
    // the table will be opened in mysql_load    
4596
    if (rpl_filter->is_on() && !rpl_filter->tables_ok(thd->db, &tables))
4597 4598 4599 4600 4601 4602 4603 4604
    {
      // 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
4605
      char *end;
unknown's avatar
unknown committed
4606
      enum enum_duplicates handle_dup;
4607
      bool ignore= 0;
unknown's avatar
unknown committed
4608 4609
      char *load_data_query;

unknown's avatar
unknown committed
4610
      /*
unknown's avatar
unknown committed
4611 4612
        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
4613
      */
unknown's avatar
unknown committed
4614
      if (!(load_data_query= (char *)thd->alloc(get_query_buffer_length() + 1)))
unknown's avatar
unknown committed
4615
      {
unknown's avatar
unknown committed
4616 4617 4618 4619 4620
        /*
          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
4621
      }
unknown's avatar
unknown committed
4622

4623
      print_query(FALSE, NULL, load_data_query, &end, NULL, NULL);
unknown's avatar
unknown committed
4624
      *end= 0;
4625
      thd->set_query(load_data_query, (uint) (end - load_data_query));
unknown's avatar
unknown committed
4626

unknown's avatar
unknown committed
4627
      if (sql_ex.opt_flags & REPLACE_FLAG)
4628
      {
unknown's avatar
unknown committed
4629
	handle_dup= DUP_REPLACE;
4630
      }
unknown's avatar
unknown committed
4631
      else if (sql_ex.opt_flags & IGNORE_FLAG)
4632 4633 4634 4635
      {
        ignore= 1;
        handle_dup= DUP_ERROR;
      }
unknown's avatar
unknown committed
4636
      else
unknown's avatar
unknown committed
4637
      {
unknown's avatar
unknown committed
4638
        /*
unknown's avatar
unknown committed
4639
	  When replication is running fine, if it was DUP_ERROR on the
4640
          master then we could choose IGNORE here, because if DUP_ERROR
unknown's avatar
unknown committed
4641
          suceeded on master, and data is identical on the master and slave,
4642
          then there should be no uniqueness errors on slave, so IGNORE is
unknown's avatar
unknown committed
4643
          the same as DUP_ERROR. But in the unlikely case of uniqueness errors
unknown's avatar
unknown committed
4644 4645 4646
          (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
4647 4648

          If reading from net (a 3.23 master), mysql_load() will change this
4649
          to IGNORE.
unknown's avatar
unknown committed
4650 4651
        */
        handle_dup= DUP_ERROR;
unknown's avatar
unknown committed
4652
      }
4653 4654 4655 4656 4657 4658 4659 4660 4661 4662
      /*
        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
4663

unknown's avatar
unknown committed
4664
      sql_exchange ex((char*)fname, sql_ex.opt_flags & DUMPFILE_FLAG);
4665 4666 4667 4668 4669
      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
4670 4671 4672 4673 4674
      ex.field_term= &field_term;
      ex.enclosed= &enclosed;
      ex.line_term= &line_term;
      ex.line_start= &line_start;
      ex.escaped= &escaped;
4675 4676 4677 4678 4679 4680

      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
4681
      List<Item> field_list;
4682 4683
      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
4684
      thd->variables.pseudo_thread_id= thread_id;
4685 4686 4687 4688 4689 4690 4691 4692 4693
      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
4694
      /*
4695
        It is safe to use tmp_list twice because we are not going to
unknown's avatar
unknown committed
4696 4697
        update it inside mysql_load().
      */
4698 4699
      List<Item> tmp_list;
      if (mysql_load(thd, &ex, &tables, field_list, tmp_list, tmp_list,
4700
                     handle_dup, ignore, net != 0))
4701
        thd->is_slave_error= 1;
4702
      if (thd->cuted_fields)
unknown's avatar
unknown committed
4703
      {
unknown's avatar
unknown committed
4704
	/* log_pos is the position of the LOAD event in the master log */
unknown's avatar
unknown committed
4705 4706 4707 4708 4709 4710 4711
        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
4712
      }
4713 4714 4715
      if (net)
        net->pkt_nr= thd->net.pkt_nr;
    }
4716 4717
  }
  else
4718 4719 4720 4721 4722 4723 4724 4725 4726
  {
    /*
      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
4727 4728

error:
4729
  thd->net.vio = 0; 
unknown's avatar
unknown committed
4730 4731
  const char *remember_db= thd->db;
  thd->catalog= 0;
4732
  thd->set_db(NULL, 0);                   /* will free the current database */
4733
  thd->set_query(NULL, 0);
4734
  close_thread_tables(thd);
4735 4736

  DBUG_EXECUTE_IF("LOAD_DATA_INFILE_has_fatal_error",
4737
                  thd->is_slave_error= 0; thd->is_fatal_error= 1;);
4738

4739
  if (thd->is_slave_error)
4740
  {
4741
    /* this err/sql_errno code is copy-paste from net_send_error() */
unknown's avatar
unknown committed
4742 4743
    const char *err;
    int sql_errno;
4744 4745
    if (thd->is_error())
    {
Marc Alff's avatar
Marc Alff committed
4746 4747
      err= thd->stmt_da->message();
      sql_errno= thd->stmt_da->sql_errno();
4748
    }
unknown's avatar
unknown committed
4749 4750 4751 4752 4753
    else
    {
      sql_errno=ER_UNKNOWN_ERROR;
      err=ER(sql_errno);       
    }
4754
    rli->report(ERROR_LEVEL, sql_errno,"\
unknown's avatar
unknown committed
4755
Error '%s' running LOAD DATA INFILE on table '%s'. Default database: '%s'",
4756
                    err, (char*)table_name, print_slave_db_safe(remember_db));
unknown's avatar
unknown committed
4757
    free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
4758 4759
    return 1;
  }
unknown's avatar
unknown committed
4760
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
4761

4762
  if (thd->is_fatal_error)
4763
  {
4764 4765 4766 4767 4768 4769 4770 4771 4772
    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);
4773 4774 4775
    return 1;
  }

4776
  return ( use_rli_only_for_errors ? 0 : Log_event::do_apply_event(rli) ); 
4777
}
unknown's avatar
SCRUM  
unknown committed
4778
#endif
4779 4780


unknown's avatar
unknown committed
4781
/**************************************************************************
unknown's avatar
unknown committed
4782
  Rotate_log_event methods
unknown's avatar
unknown committed
4783
**************************************************************************/
4784

unknown's avatar
unknown committed
4785
/*
4786
  Rotate_log_event::pack_info()
unknown's avatar
unknown committed
4787
*/
4788

unknown's avatar
SCRUM  
unknown committed
4789
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4790
void Rotate_log_event::pack_info(Protocol *protocol)
4791
{
unknown's avatar
unknown committed
4792
  char buf1[256], buf[22];
unknown's avatar
unknown committed
4793
  String tmp(buf1, sizeof(buf1), log_cs);
4794
  tmp.length(0);
unknown's avatar
unknown committed
4795
  tmp.append(new_log_ident, ident_len);
4796
  tmp.append(STRING_WITH_LEN(";pos="));
unknown's avatar
unknown committed
4797 4798
  tmp.append(llstr(pos,buf));
  protocol->store(tmp.ptr(), tmp.length(), &my_charset_bin);
4799
}
unknown's avatar
SCRUM  
unknown committed
4800
#endif
4801

4802

unknown's avatar
unknown committed
4803
/*
4804
  Rotate_log_event::print()
unknown's avatar
unknown committed
4805
*/
4806 4807

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
4808
void Rotate_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4809
{
4810
  char buf[22];
4811 4812
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
4813

unknown's avatar
unknown committed
4814
  if (print_event_info->short_form)
4815
    return;
4816 4817
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tRotate to ");
4818
  if (new_log_ident)
4819
    my_b_write(&cache, (uchar*) new_log_ident, (uint)ident_len);
4820
  my_b_printf(&cache, "  pos: %s\n", llstr(pos, buf));
4821
}
unknown's avatar
unknown committed
4822
#endif /* MYSQL_CLIENT */
4823 4824


4825

unknown's avatar
unknown committed
4826
/*
4827
  Rotate_log_event::Rotate_log_event() (2 constructors)
unknown's avatar
unknown committed
4828
*/
4829

4830 4831

#ifndef MYSQL_CLIENT
4832
Rotate_log_event::Rotate_log_event(const char* new_log_ident_arg,
4833 4834 4835 4836 4837 4838 4839 4840
                                   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];
4841
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(...,flags)");
unknown's avatar
unknown committed
4842 4843
  DBUG_PRINT("enter",("new_log_ident: %s  pos: %s  flags: %lu", new_log_ident_arg,
                      llstr(pos_arg, buff), (ulong) flags));
4844 4845
#endif
  if (flags & DUP_NAME)
4846
    new_log_ident= my_strndup(new_log_ident_arg, ident_len, MYF(MY_WME));
4847 4848
  if (flags & RELAY_LOG)
    set_relay_log_event();
4849 4850 4851 4852 4853
  DBUG_VOID_RETURN;
}
#endif


4854 4855
Rotate_log_event::Rotate_log_event(const char* buf, uint event_len,
                                   const Format_description_log_event* description_event)
unknown's avatar
unknown committed
4856
  :Log_event(buf, description_event) ,new_log_ident(0), flags(DUP_NAME)
4857
{
4858
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(char*,...)");
4859
  // The caller will ensure that event_len is what we have at EVENT_LEN_OFFSET
4860 4861
  uint8 header_size= description_event->common_header_len;
  uint8 post_header_len= description_event->post_header_len[ROTATE_EVENT-1];
4862 4863
  uint ident_offset;
  if (event_len < header_size)
unknown's avatar
unknown committed
4864
    DBUG_VOID_RETURN;
4865
  buf += header_size;
4866 4867 4868 4869
  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; 
4870
  set_if_smaller(ident_len,FN_REFLEN-1);
4871
  new_log_ident= my_strndup(buf + ident_offset, (uint) ident_len, MYF(MY_WME));
4872
  DBUG_PRINT("debug", ("new_log_ident: '%s'", new_log_ident));
unknown's avatar
unknown committed
4873
  DBUG_VOID_RETURN;
4874
}
4875 4876


unknown's avatar
unknown committed
4877
/*
4878
  Rotate_log_event::write()
unknown's avatar
unknown committed
4879
*/
4880

4881
#ifndef MYSQL_CLIENT
4882
bool Rotate_log_event::write(IO_CACHE* file)
4883
{
4884
  char buf[ROTATE_HEADER_LEN];
unknown's avatar
unknown committed
4885
  int8store(buf + R_POS_OFFSET, pos);
4886
  return (write_header(file, ROTATE_HEADER_LEN + ident_len) ||
4887 4888
          my_b_safe_write(file, (uchar*)buf, ROTATE_HEADER_LEN) ||
          my_b_safe_write(file, (uchar*)new_log_ident, (uint) ident_len));
4889
}
4890
#endif
4891

4892

unknown's avatar
unknown committed
4893
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4894

unknown's avatar
unknown committed
4895 4896
/*
  Got a rotate log event from the master.
4897

unknown's avatar
unknown committed
4898 4899
  This is mainly used so that we can later figure out the logname and
  position for the master.
4900

unknown's avatar
unknown committed
4901 4902 4903
  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.
4904

unknown's avatar
unknown committed
4905
  @retval
4906
    0	ok
unknown's avatar
unknown committed
4907
*/
4908
int Rotate_log_event::do_update_pos(Relay_log_info *rli)
4909
{
4910
  DBUG_ENTER("Rotate_log_event::do_update_pos");
4911 4912 4913 4914
#ifndef DBUG_OFF
  char buf[32];
#endif

4915 4916
  DBUG_PRINT("info", ("server_id=%lu; ::server_id=%lu",
                      (ulong) this->server_id, (ulong) ::server_id));
4917 4918
  DBUG_PRINT("info", ("new_log_ident: %s", this->new_log_ident));
  DBUG_PRINT("info", ("pos: %s", llstr(this->pos, buf)));
4919

unknown's avatar
unknown committed
4920
  /*
4921 4922 4923 4924
    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
4925 4926 4927 4928 4929
    BEGIN
    ...
    ROTATE (a fake one)
    ...
    COMMIT or ROLLBACK
4930 4931 4932 4933

    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
4934
    relay log, which shall not change the group positions.
unknown's avatar
unknown committed
4935
  */
4936
  if ((server_id != ::server_id || rli->replicate_same_server_id) &&
4937
      !is_relay_log_event() &&
4938
      !rli->is_in_group())
unknown's avatar
unknown committed
4939
  {
4940
    pthread_mutex_lock(&rli->data_lock);
4941 4942 4943 4944
    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
4945 4946
    memcpy(rli->group_master_log_name, new_log_ident, ident_len+1);
    rli->notify_group_master_log_name_update();
4947
    rli->inc_group_relay_log_pos(pos, TRUE /* skip_lock */);
4948 4949
    DBUG_PRINT("info", ("new group_master_log_name: '%s'  "
                        "new group_master_log_pos: %lu",
4950
                        rli->group_master_log_name,
unknown's avatar
unknown committed
4951
                        (ulong) rli->group_master_log_pos));
4952 4953 4954
    pthread_mutex_unlock(&rli->data_lock);
    flush_relay_log_info(rli);
    
4955
    /*
4956 4957
      Reset thd->options and sql_mode etc, because this could be the signal of
      a master's downgrade from 5.0 to 4.0.
4958 4959 4960 4961 4962
      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);
4963
    set_slave_thread_default_charset(thd, rli);
4964
    thd->variables.sql_mode= global_system_variables.sql_mode;
4965 4966
    thd->variables.auto_increment_increment=
      thd->variables.auto_increment_offset= 1;
unknown's avatar
unknown committed
4967
  }
4968 4969 4970
  else
    rli->inc_event_relay_log_pos();

4971

4972
  DBUG_RETURN(0);
4973
}
4974

4975 4976

Log_event::enum_skip_reason
4977
Rotate_log_event::do_shall_skip(Relay_log_info *rli)
4978
{
4979
  enum_skip_reason reason= Log_event::do_shall_skip(rli);
4980 4981

  switch (reason) {
4982
  case Log_event::EVENT_SKIP_NOT:
4983
  case Log_event::EVENT_SKIP_COUNT:
4984
    return Log_event::EVENT_SKIP_NOT;
4985

4986 4987
  case Log_event::EVENT_SKIP_IGNORE:
    return Log_event::EVENT_SKIP_IGNORE;
4988 4989
  }
  DBUG_ASSERT(0);
4990
  return Log_event::EVENT_SKIP_NOT;             // To keep compiler happy
4991 4992
}

unknown's avatar
SCRUM  
unknown committed
4993
#endif
4994 4995


unknown's avatar
unknown committed
4996
/**************************************************************************
unknown's avatar
unknown committed
4997
	Intvar_log_event methods
unknown's avatar
unknown committed
4998
**************************************************************************/
4999

unknown's avatar
unknown committed
5000
/*
5001
  Intvar_log_event::pack_info()
unknown's avatar
unknown committed
5002
*/
5003

unknown's avatar
SCRUM  
unknown committed
5004
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5005
void Intvar_log_event::pack_info(Protocol *protocol)
5006
{
unknown's avatar
unknown committed
5007 5008
  char buf[256], *pos;
  pos= strmake(buf, get_var_type_name(), sizeof(buf)-23);
unknown's avatar
unknown committed
5009
  *pos++= '=';
unknown's avatar
unknown committed
5010
  pos= longlong10_to_str(val, pos, -10);
unknown's avatar
unknown committed
5011
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
5012
}
unknown's avatar
SCRUM  
unknown committed
5013
#endif
5014

unknown's avatar
unknown committed
5015

unknown's avatar
unknown committed
5016
/*
5017
  Intvar_log_event::Intvar_log_event()
unknown's avatar
unknown committed
5018
*/
5019

5020 5021 5022
Intvar_log_event::Intvar_log_event(const char* buf,
                                   const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
5023
{
5024 5025 5026
  /* 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];
5027 5028
  type= buf[I_TYPE_OFFSET];
  val= uint8korr(buf+I_VAL_OFFSET);
5029 5030
}

5031

unknown's avatar
unknown committed
5032
/*
5033
  Intvar_log_event::get_var_type_name()
unknown's avatar
unknown committed
5034
*/
5035 5036

const char* Intvar_log_event::get_var_type_name()
5037
{
5038 5039 5040 5041 5042
  switch(type) {
  case LAST_INSERT_ID_EVENT: return "LAST_INSERT_ID";
  case INSERT_ID_EVENT: return "INSERT_ID";
  default: /* impossible */ return "UNKNOWN";
  }
5043 5044
}

unknown's avatar
unknown committed
5045

unknown's avatar
unknown committed
5046
/*
5047
  Intvar_log_event::write()
unknown's avatar
unknown committed
5048
*/
5049

5050
#ifndef MYSQL_CLIENT
5051
bool Intvar_log_event::write(IO_CACHE* file)
5052
{
5053 5054
  uchar buf[9];
  buf[I_TYPE_OFFSET]= (uchar) type;
5055
  int8store(buf + I_VAL_OFFSET, val);
5056 5057
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
5058
}
5059
#endif
5060

5061

unknown's avatar
unknown committed
5062
/*
5063
  Intvar_log_event::print()
unknown's avatar
unknown committed
5064
*/
5065 5066

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5067
void Intvar_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5068
{
5069 5070 5071
  char llbuff[22];
  const char *msg;
  LINT_INIT(msg);
5072 5073
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
5074

unknown's avatar
unknown committed
5075
  if (!print_event_info->short_form)
5076
  {
5077 5078
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tIntvar\n");
5079
  }
5080

5081
  my_b_printf(&cache, "SET ");
5082 5083 5084 5085 5086 5087 5088
  switch (type) {
  case LAST_INSERT_ID_EVENT:
    msg="LAST_INSERT_ID";
    break;
  case INSERT_ID_EVENT:
    msg="INSERT_ID";
    break;
5089 5090 5091 5092
  case INVALID_INT_EVENT:
  default: // cannot happen
    msg="INVALID_INT";
    break;
5093
  }
unknown's avatar
unknown committed
5094 5095
  my_b_printf(&cache, "%s=%s%s\n",
              msg, llstr(val,llbuff), print_event_info->delimiter);
5096
}
5097
#endif
5098

5099

unknown's avatar
unknown committed
5100
/*
5101
  Intvar_log_event::do_apply_event()
unknown's avatar
unknown committed
5102
*/
5103

unknown's avatar
SCRUM  
unknown committed
5104
#if defined(HAVE_REPLICATION)&& !defined(MYSQL_CLIENT)
5105
int Intvar_log_event::do_apply_event(Relay_log_info const *rli)
5106
{
5107 5108 5109 5110
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5111
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5112

5113 5114
  switch (type) {
  case LAST_INSERT_ID_EVENT:
5115 5116
    thd->stmt_depends_on_first_successful_insert_id_in_prev_stmt= 1;
    thd->first_successful_insert_id_in_prev_stmt= val;
5117 5118
    break;
  case INSERT_ID_EVENT:
5119
    thd->force_one_auto_inc_interval(val);
5120 5121
    break;
  }
5122 5123 5124
  return 0;
}

5125
int Intvar_log_event::do_update_pos(Relay_log_info *rli)
5126
{
5127
  rli->inc_event_relay_log_pos();
5128
  return 0;
5129
}
5130 5131 5132


Log_event::enum_skip_reason
5133
Intvar_log_event::do_shall_skip(Relay_log_info *rli)
5134 5135
{
  /*
5136 5137 5138 5139 5140 5141
    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.
5142
  */
5143
  return continue_group(rli);
5144 5145
}

unknown's avatar
SCRUM  
unknown committed
5146
#endif
5147

5148

unknown's avatar
unknown committed
5149
/**************************************************************************
5150
  Rand_log_event methods
unknown's avatar
unknown committed
5151
**************************************************************************/
5152

unknown's avatar
SCRUM  
unknown committed
5153
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5154
void Rand_log_event::pack_info(Protocol *protocol)
5155
{
unknown's avatar
unknown committed
5156 5157 5158 5159 5160
  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);
5161
  protocol->store(buf1, (uint) (pos-buf1), &my_charset_bin);
5162
}
unknown's avatar
SCRUM  
unknown committed
5163
#endif
5164 5165


5166 5167 5168
Rand_log_event::Rand_log_event(const char* buf,
                               const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
5169
{
5170 5171 5172
  /* 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];
5173 5174
  seed1= uint8korr(buf+RAND_SEED1_OFFSET);
  seed2= uint8korr(buf+RAND_SEED2_OFFSET);
5175 5176
}

5177

5178
#ifndef MYSQL_CLIENT
5179
bool Rand_log_event::write(IO_CACHE* file)
5180
{
5181
  uchar buf[16];
5182 5183
  int8store(buf + RAND_SEED1_OFFSET, seed1);
  int8store(buf + RAND_SEED2_OFFSET, seed2);
5184 5185
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
5186
}
5187
#endif
5188

5189 5190

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5191
void Rand_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5192
{
5193 5194 5195
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5196
  char llbuff[22],llbuff2[22];
unknown's avatar
unknown committed
5197
  if (!print_event_info->short_form)
5198
  {
5199 5200
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tRand\n");
5201
  }
unknown's avatar
unknown committed
5202 5203 5204
  my_b_printf(&cache, "SET @@RAND_SEED1=%s, @@RAND_SEED2=%s%s\n",
              llstr(seed1, llbuff),llstr(seed2, llbuff2),
              print_event_info->delimiter);
5205
}
unknown's avatar
unknown committed
5206
#endif /* MYSQL_CLIENT */
5207

5208

unknown's avatar
SCRUM  
unknown committed
5209
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5210
int Rand_log_event::do_apply_event(Relay_log_info const *rli)
5211
{
5212 5213 5214 5215
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5216
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5217

unknown's avatar
unknown committed
5218 5219
  thd->rand.seed1= (ulong) seed1;
  thd->rand.seed2= (ulong) seed2;
5220 5221 5222
  return 0;
}

5223
int Rand_log_event::do_update_pos(Relay_log_info *rli)
5224
{
5225
  rli->inc_event_relay_log_pos();
5226 5227
  return 0;
}
5228

5229 5230

Log_event::enum_skip_reason
5231
Rand_log_event::do_shall_skip(Relay_log_info *rli)
5232 5233
{
  /*
5234 5235 5236 5237 5238 5239
    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.
5240
  */
5241
  return continue_group(rli);
5242 5243
}

unknown's avatar
unknown committed
5244
#endif /* !MYSQL_CLIENT */
5245

unknown's avatar
unknown committed
5246

5247 5248 5249 5250 5251 5252 5253
/**************************************************************************
  Xid_log_event methods
**************************************************************************/

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Xid_log_event::pack_info(Protocol *protocol)
{
5254 5255
  char buf[128], *pos;
  pos= strmov(buf, "COMMIT /* xid=");
5256
  pos= longlong10_to_str(xid, pos, 10);
5257
  pos= strmov(pos, " */");
5258 5259 5260 5261
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
}
#endif

unknown's avatar
unknown committed
5262 5263 5264
/**
  @note
  It's ok not to use int8store here,
unknown's avatar
unknown committed
5265
  as long as xid_t::set(ulonglong) and
unknown's avatar
unknown committed
5266 5267
  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
5268 5269
  identical numbers compare identically
*/
5270 5271 5272 5273

Xid_log_event::
Xid_log_event(const char* buf,
              const Format_description_log_event *description_event)
5274 5275
  :Log_event(buf, description_event)
{
5276 5277 5278
  /* 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];
5279
  memcpy((char*) &xid, buf, sizeof(xid));
5280 5281 5282
}


5283
#ifndef MYSQL_CLIENT
5284 5285
bool Xid_log_event::write(IO_CACHE* file)
{
5286
  DBUG_EXECUTE_IF("do_not_write_xid", return 0;);
5287
  return write_header(file, sizeof(xid)) ||
5288
         my_b_safe_write(file, (uchar*) &xid, sizeof(xid));
5289
}
5290
#endif
5291 5292 5293


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5294
void Xid_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5295
{
5296 5297 5298
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5299
  if (!print_event_info->short_form)
5300
  {
unknown's avatar
unknown committed
5301 5302 5303
    char buf[64];
    longlong10_to_str(xid, buf, 10);

5304 5305
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tXid = %s\n", buf);
5306
  }
unknown's avatar
unknown committed
5307
  my_b_printf(&cache, "COMMIT%s\n", print_event_info->delimiter);
5308 5309 5310 5311 5312
}
#endif /* MYSQL_CLIENT */


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5313
int Xid_log_event::do_apply_event(Relay_log_info const *rli)
5314
{
5315
  /* For a slave Xid_log_event is COMMIT */
5316 5317
  general_log_print(thd, COM_QUERY,
                    "COMMIT /* implicit, from Xid_log_event */");
5318
  return end_trans(thd, COMMIT);
5319
}
5320 5321 5322 5323 5324 5325 5326 5327 5328 5329 5330

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) {
    thd->options&= ~OPTION_BEGIN;
    DBUG_RETURN(Log_event::EVENT_SKIP_COUNT);
  }
  DBUG_RETURN(Log_event::do_shall_skip(rli));
}
5331 5332 5333
#endif /* !MYSQL_CLIENT */


unknown's avatar
unknown committed
5334
/**************************************************************************
5335
  User_var_log_event methods
unknown's avatar
unknown committed
5336
**************************************************************************/
unknown's avatar
unknown committed
5337

unknown's avatar
unknown committed
5338
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
5339 5340 5341
void User_var_log_event::pack_info(Protocol* protocol)
{
  char *buf= 0;
5342
  uint val_offset= 4 + name_len;
unknown's avatar
unknown committed
5343 5344 5345 5346
  uint event_len= val_offset;

  if (is_null)
  {
5347 5348
    if (!(buf= (char*) my_malloc(val_offset + 5, MYF(MY_WME))))
      return;
unknown's avatar
unknown committed
5349 5350 5351 5352 5353 5354 5355 5356 5357
    strmov(buf + val_offset, "NULL");
    event_len= val_offset + 4;
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
      float8get(real_val, val);
5358 5359 5360
      if (!(buf= (char*) my_malloc(val_offset + FLOATING_POINT_BUFFER,
                                   MYF(MY_WME))))
        return;
5361 5362
      event_len+= my_sprintf(buf + val_offset,
			     (buf + val_offset, "%.14g", real_val));
unknown's avatar
unknown committed
5363 5364
      break;
    case INT_RESULT:
5365 5366
      if (!(buf= (char*) my_malloc(val_offset + 22, MYF(MY_WME))))
        return;
unknown's avatar
unknown committed
5367 5368
      event_len= longlong10_to_str(uint8korr(val), buf + val_offset,-10)-buf;
      break;
unknown's avatar
unknown committed
5369 5370
    case DECIMAL_RESULT:
    {
5371 5372 5373
      if (!(buf= (char*) my_malloc(val_offset + DECIMAL_MAX_STR_LENGTH,
                                   MYF(MY_WME))))
        return;
unknown's avatar
unknown committed
5374 5375
      String str(buf+val_offset, DECIMAL_MAX_STR_LENGTH, &my_charset_bin);
      my_decimal dec;
5376 5377
      binary2my_decimal(E_DEC_FATAL_ERROR, (uchar*) (val+2), &dec, val[0],
                        val[1]);
unknown's avatar
unknown committed
5378 5379 5380 5381
      my_decimal2string(E_DEC_FATAL_ERROR, &dec, 0, 0, 0, &str);
      event_len= str.length() + val_offset;
      break;
    } 
unknown's avatar
unknown committed
5382
    case STRING_RESULT:
5383
      /* 15 is for 'COLLATE' and other chars */
5384 5385
      buf= (char*) my_malloc(event_len+val_len*2+1+2*MY_CS_NAME_SIZE+15,
                             MYF(MY_WME));
5386
      CHARSET_INFO *cs;
5387 5388
      if (!buf)
        return;
5389 5390 5391 5392 5393 5394 5395
      if (!(cs= get_charset(charset_number, MYF(0))))
      {
        strmov(buf+val_offset, "???");
        event_len+= 3;
      }
      else
      {
5396 5397 5398
        char *p= strxmov(buf + val_offset, "_", cs->csname, " ", NullS);
        p= str_to_hex(p, val, val_len);
        p= strxmov(p, " COLLATE ", cs->name, NullS);
5399 5400
        event_len= p-buf;
      }
unknown's avatar
unknown committed
5401
      break;
5402
    case ROW_RESULT:
unknown's avatar
unknown committed
5403
    default:
unknown's avatar
unknown committed
5404 5405 5406 5407 5408
      DBUG_ASSERT(1);
      return;
    }
  }
  buf[0]= '@';
5409
  buf[1]= '`';
5410
  memcpy(buf+2, name, name_len);
5411 5412
  buf[2+name_len]= '`';
  buf[3+name_len]= '=';
5413
  protocol->store(buf, event_len, &my_charset_bin);
5414
  my_free(buf, MYF(0));
unknown's avatar
unknown committed
5415
}
unknown's avatar
unknown committed
5416
#endif /* !MYSQL_CLIENT */
unknown's avatar
unknown committed
5417 5418


5419 5420 5421 5422
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
5423
{
5424 5425 5426
  /* The Post-Header is empty. The Variable Data part begins immediately. */
  buf+= description_event->common_header_len +
    description_event->post_header_len[USER_VAR_EVENT-1];
unknown's avatar
unknown committed
5427 5428
  name_len= uint4korr(buf);
  name= (char *) buf + UV_NAME_LEN_SIZE;
5429 5430
  buf+= UV_NAME_LEN_SIZE + name_len;
  is_null= (bool) *buf;
unknown's avatar
unknown committed
5431 5432 5433
  if (is_null)
  {
    type= STRING_RESULT;
5434
    charset_number= my_charset_bin.number;
unknown's avatar
unknown committed
5435 5436 5437 5438 5439
    val_len= 0;
    val= 0;  
  }
  else
  {
5440 5441 5442
    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
5443
		       UV_CHARSET_NUMBER_SIZE);
5444 5445
    val= (char *) (buf + UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE +
		   UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE);
unknown's avatar
unknown committed
5446 5447 5448 5449
  }
}


5450
#ifndef MYSQL_CLIENT
5451
bool User_var_log_event::write(IO_CACHE* file)
unknown's avatar
unknown committed
5452 5453 5454 5455
{
  char buf[UV_NAME_LEN_SIZE];
  char buf1[UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE + 
	    UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE];
5456
  uchar buf2[max(8, DECIMAL_MAX_FIELD_SIZE + 2)], *pos= buf2;
5457
  uint buf1_length;
5458
  ulong event_length;
5459

unknown's avatar
unknown committed
5460
  int4store(buf, name_len);
5461 5462 5463 5464
  
  if ((buf1[0]= is_null))
  {
    buf1_length= 1;
5465
    val_len= 0;                                 // Length of 'pos'
5466 5467
  }    
  else
unknown's avatar
unknown committed
5468 5469 5470 5471 5472 5473 5474 5475 5476 5477 5478
  {
    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);
      break;
unknown's avatar
unknown committed
5479 5480 5481 5482 5483 5484
    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;
5485
      decimal2bin((decimal_t*)val, buf2+2, buf2[0], buf2[1]);
unknown's avatar
unknown committed
5486 5487 5488
      val_len= decimal_bin_size(buf2[0], buf2[1]) + 2;
      break;
    }
unknown's avatar
unknown committed
5489
    case STRING_RESULT:
5490
      pos= (uchar*) val;
unknown's avatar
unknown committed
5491
      break;
5492
    case ROW_RESULT:
unknown's avatar
unknown committed
5493
    default:
unknown's avatar
unknown committed
5494 5495 5496
      DBUG_ASSERT(1);
      return 0;
    }
unknown's avatar
unknown committed
5497 5498
    int4store(buf1 + 2 + UV_CHARSET_NUMBER_SIZE, val_len);
    buf1_length= 10;
unknown's avatar
unknown committed
5499
  }
5500 5501 5502 5503 5504

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

  return (write_header(file, event_length) ||
5505 5506 5507 5508
          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) ||
	  my_b_safe_write(file, pos, val_len));
unknown's avatar
unknown committed
5509
}
5510
#endif
unknown's avatar
unknown committed
5511

5512

unknown's avatar
unknown committed
5513
/*
unknown's avatar
unknown committed
5514
  User_var_log_event::print()
unknown's avatar
unknown committed
5515
*/
unknown's avatar
unknown committed
5516 5517

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5518
void User_var_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
5519
{
5520 5521 5522
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5523
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
5524
  {
5525 5526
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tUser_var\n");
unknown's avatar
unknown committed
5527 5528
  }

5529
  my_b_printf(&cache, "SET @`");
5530
  my_b_write(&cache, (uchar*) name, (uint) (name_len));
5531
  my_b_printf(&cache, "`");
unknown's avatar
unknown committed
5532 5533 5534

  if (is_null)
  {
unknown's avatar
unknown committed
5535
    my_b_printf(&cache, ":=NULL%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
5536 5537 5538 5539 5540 5541
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
5542
      char real_buf[FMT_G_BUFSIZE(14)];
unknown's avatar
unknown committed
5543
      float8get(real_val, val);
5544 5545
      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
5546 5547 5548 5549
      break;
    case INT_RESULT:
      char int_buf[22];
      longlong10_to_str(uint8korr(val), int_buf, -10);
unknown's avatar
unknown committed
5550
      my_b_printf(&cache, ":=%s%s\n", int_buf, print_event_info->delimiter);
unknown's avatar
unknown committed
5551
      break;
unknown's avatar
unknown committed
5552 5553 5554 5555 5556 5557
    case DECIMAL_RESULT:
    {
      char str_buf[200];
      int str_len= sizeof(str_buf) - 1;
      int precision= (int)val[0];
      int scale= (int)val[1];
5558 5559
      decimal_digit_t dec_buf[10];
      decimal_t dec;
unknown's avatar
unknown committed
5560 5561 5562
      dec.len= 10;
      dec.buf= dec_buf;

5563
      bin2decimal((uchar*) val+2, &dec, precision, scale);
unknown's avatar
unknown committed
5564 5565
      decimal2string(&dec, str_buf, &str_len, 0, 0, 0);
      str_buf[str_len]= 0;
unknown's avatar
unknown committed
5566
      my_b_printf(&cache, ":=%s%s\n", str_buf, print_event_info->delimiter);
unknown's avatar
unknown committed
5567 5568
      break;
    }
unknown's avatar
unknown committed
5569
    case STRING_RESULT:
5570
    {
5571 5572 5573 5574 5575 5576 5577 5578 5579 5580 5581 5582 5583 5584
      /*
        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.
      */
5585 5586 5587 5588
      char *hex_str;
      CHARSET_INFO *cs;

      if (!(hex_str= (char *)my_alloca(2*val_len+1+2))) // 2 hex digits / byte
5589
        break; // no error, as we are 'void'
5590
      str_to_hex(hex_str, val, val_len);
5591 5592 5593 5594 5595 5596 5597 5598 5599 5600 5601
      /*
        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
5602
        my_b_printf(&cache, ":=???%s\n", print_event_info->delimiter);
5603
      else
unknown's avatar
unknown committed
5604 5605 5606
        my_b_printf(&cache, ":=_%s %s COLLATE `%s`%s\n",
                    cs->csname, hex_str, cs->name,
                    print_event_info->delimiter);
5607
      my_afree(hex_str);
5608
    }
unknown's avatar
unknown committed
5609
      break;
5610
    case ROW_RESULT:
unknown's avatar
unknown committed
5611
    default:
unknown's avatar
unknown committed
5612
      DBUG_ASSERT(1);
unknown's avatar
unknown committed
5613 5614 5615 5616
      return;
    }
  }
}
unknown's avatar
SCRUM  
unknown committed
5617
#endif
5618

unknown's avatar
unknown committed
5619

unknown's avatar
unknown committed
5620
/*
5621
  User_var_log_event::do_apply_event()
unknown's avatar
unknown committed
5622
*/
unknown's avatar
unknown committed
5623

unknown's avatar
unknown committed
5624
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5625
int User_var_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
5626 5627
{
  Item *it= 0;
5628 5629 5630
  CHARSET_INFO *charset;
  if (!(charset= get_charset(charset_number, MYF(MY_WME))))
    return 1;
unknown's avatar
unknown committed
5631 5632 5633
  LEX_STRING user_var_name;
  user_var_name.str= name;
  user_var_name.length= name_len;
5634 5635
  double real_val;
  longlong int_val;
unknown's avatar
unknown committed
5636

5637 5638 5639 5640
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5641
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5642

unknown's avatar
unknown committed
5643 5644 5645 5646 5647 5648 5649 5650 5651
  if (is_null)
  {
    it= new Item_null();
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      float8get(real_val, val);
5652
      it= new Item_float(real_val, 0);
5653
      val= (char*) &real_val;		// Pointer to value in native format
5654
      val_len= 8;
unknown's avatar
unknown committed
5655 5656
      break;
    case INT_RESULT:
5657 5658 5659
      int_val= (longlong) uint8korr(val);
      it= new Item_int(int_val);
      val= (char*) &int_val;		// Pointer to value in native format
5660
      val_len= 8;
unknown's avatar
unknown committed
5661
      break;
unknown's avatar
unknown committed
5662 5663
    case DECIMAL_RESULT:
    {
5664
      Item_decimal *dec= new Item_decimal((uchar*) val+2, val[0], val[1]);
unknown's avatar
unknown committed
5665 5666 5667 5668 5669
      it= dec;
      val= (char *)dec->val_decimal(NULL);
      val_len= sizeof(my_decimal);
      break;
    }
unknown's avatar
unknown committed
5670 5671 5672
    case STRING_RESULT:
      it= new Item_string(val, val_len, charset);
      break;
5673
    case ROW_RESULT:
unknown's avatar
unknown committed
5674
    default:
unknown's avatar
unknown committed
5675 5676 5677 5678 5679
      DBUG_ASSERT(1);
      return 0;
    }
  }
  Item_func_set_user_var e(user_var_name, it);
5680 5681 5682
  /*
    Item_func_set_user_var can't substitute something else on its place =>
    0 can be passed as last argument (reference on item)
5683 5684 5685 5686

    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.
5687
  */
5688 5689 5690
  if (e.fix_fields(thd, 0))
    return 1;

5691 5692 5693 5694 5695
  /*
    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.
   */
unknown's avatar
unknown committed
5696
  e.update_hash(val, val_len, type, charset, DERIVATION_IMPLICIT, 0);
unknown's avatar
unknown committed
5697
  free_root(thd->mem_root,0);
unknown's avatar
unknown committed
5698

5699 5700 5701
  return 0;
}

5702
int User_var_log_event::do_update_pos(Relay_log_info *rli)
5703
{
5704
  rli->inc_event_relay_log_pos();
unknown's avatar
unknown committed
5705 5706
  return 0;
}
5707

5708
Log_event::enum_skip_reason
5709
User_var_log_event::do_shall_skip(Relay_log_info *rli)
5710 5711 5712 5713 5714 5715 5716 5717 5718
{
  /*
    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.
  */
5719
  return continue_group(rli);
5720
}
unknown's avatar
unknown committed
5721
#endif /* !MYSQL_CLIENT */
5722 5723


unknown's avatar
unknown committed
5724
/**************************************************************************
5725
  Slave_log_event methods
unknown's avatar
unknown committed
5726
**************************************************************************/
unknown's avatar
unknown committed
5727

unknown's avatar
SCRUM  
unknown committed
5728
#ifdef HAVE_REPLICATION
5729
#ifdef MYSQL_CLIENT
5730
void Unknown_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info)
5731
{
5732 5733
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

unknown's avatar
unknown committed
5734
  if (print_event_info->short_form)
5735
    return;
5736 5737
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n# %s", "Unknown event\n");
5738 5739
}
#endif  
5740

5741
#ifndef MYSQL_CLIENT
5742
void Slave_log_event::pack_info(Protocol *protocol)
5743
{
unknown's avatar
unknown committed
5744
  char buf[256+HOSTNAME_LENGTH], *pos;
5745 5746 5747 5748 5749 5750 5751
  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
5752
  pos= longlong10_to_str(master_pos, pos, 10);
5753
  protocol->store(buf, pos-buf, &my_charset_bin);
5754
}
unknown's avatar
unknown committed
5755
#endif /* !MYSQL_CLIENT */
5756 5757 5758


#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
5759 5760 5761 5762
/**
  @todo
  re-write this better without holding both locks at the same time
*/
5763
Slave_log_event::Slave_log_event(THD* thd_arg,
5764
				 Relay_log_info* rli)
5765
  :Log_event(thd_arg, 0, 0) , mem_pool(0), master_host(0)
5766 5767 5768 5769
{
  DBUG_ENTER("Slave_log_event");
  if (!rli->inited)				// QQ When can this happen ?
    DBUG_VOID_RETURN;
5770

5771
  Master_info* mi = rli->mi;
5772 5773 5774 5775
  // TODO: re-write this better without holding both locks at the same time
  pthread_mutex_lock(&mi->data_lock);
  pthread_mutex_lock(&rli->data_lock);
  master_host_len = strlen(mi->host);
5776
  master_log_len = strlen(rli->group_master_log_name);
5777 5778 5779
  // 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))))
5780
  {
5781 5782 5783
    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;
5784
    memcpy(master_log, rli->group_master_log_name, master_log_len + 1);
5785
    master_port = mi->port;
5786
    master_pos = rli->group_master_log_pos;
unknown's avatar
unknown committed
5787
    DBUG_PRINT("info", ("master_log: %s  pos: %lu", master_log,
5788
			(ulong) master_pos));
5789
  }
5790 5791 5792 5793 5794 5795
  else
    sql_print_error("Out of memory while recording slave event");
  pthread_mutex_unlock(&rli->data_lock);
  pthread_mutex_unlock(&mi->data_lock);
  DBUG_VOID_RETURN;
}
unknown's avatar
unknown committed
5796
#endif /* !MYSQL_CLIENT */
5797 5798 5799 5800 5801 5802 5803 5804 5805


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


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5806
void Slave_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5807
{
5808 5809
  Write_on_release_cache cache(&print_event_info->head_cache, file);

5810
  char llbuff[22];
unknown's avatar
unknown committed
5811
  if (print_event_info->short_form)
5812
    return;
5813 5814
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n\
unknown's avatar
unknown committed
5815
Slave: master_host: '%s'  master_port: %d  master_log: '%s'  master_pos: %s\n",
5816 5817
	  master_host, master_port, master_log, llstr(master_pos, llbuff));
}
unknown's avatar
unknown committed
5818
#endif /* MYSQL_CLIENT */
5819 5820 5821 5822 5823 5824 5825 5826


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


5827
#ifndef MYSQL_CLIENT
5828
bool Slave_log_event::write(IO_CACHE* file)
5829
{
5830
  ulong event_length= get_data_size();
5831 5832 5833
  int8store(mem_pool + SL_MASTER_POS_OFFSET, master_pos);
  int2store(mem_pool + SL_MASTER_PORT_OFFSET, master_port);
  // log and host are already there
5834 5835

  return (write_header(file, event_length) ||
5836
          my_b_safe_write(file, (uchar*) mem_pool, event_length));
5837
}
5838
#endif
5839 5840 5841 5842 5843 5844 5845


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;
5846
  master_host_len = (uint) strlen(master_host);
5847 5848 5849
  // safety
  master_log = master_host + master_host_len + 1;
  if (master_log > mem_pool + data_size)
5850
  {
5851 5852
    master_host = 0;
    return;
5853
  }
5854
  master_log_len = (uint) strlen(master_log);
5855
}
5856

5857

unknown's avatar
unknown committed
5858
/** This code is not used, so has not been updated to be format-tolerant. */
5859 5860
Slave_log_event::Slave_log_event(const char* buf, uint event_len)
  :Log_event(buf,0) /*unused event*/ ,mem_pool(0),master_host(0)
5861
{
5862
  if (event_len < LOG_EVENT_HEADER_LEN)
5863
    return;
5864
  event_len -= LOG_EVENT_HEADER_LEN;
5865 5866 5867 5868 5869
  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);
5870 5871
}

5872

5873
#ifndef MYSQL_CLIENT
5874
int Slave_log_event::do_apply_event(Relay_log_info const *rli)
5875 5876 5877
{
  if (mysql_bin_log.is_open())
    mysql_bin_log.write(this);
5878
  return 0;
5879
}
unknown's avatar
unknown committed
5880
#endif /* !MYSQL_CLIENT */
5881 5882


unknown's avatar
unknown committed
5883
/**************************************************************************
unknown's avatar
unknown committed
5884
	Stop_log_event methods
unknown's avatar
unknown committed
5885
**************************************************************************/
5886

unknown's avatar
unknown committed
5887
/*
5888
  Stop_log_event::print()
5889
*/
5890 5891

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5892
void Stop_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5893
{
5894 5895 5896
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5897
  if (print_event_info->short_form)
5898 5899
    return;

5900 5901
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tStop\n");
5902
}
unknown's avatar
unknown committed
5903
#endif /* MYSQL_CLIENT */
5904

5905

unknown's avatar
unknown committed
5906
#ifndef MYSQL_CLIENT
5907
/*
5908 5909 5910 5911 5912 5913 5914
  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
5915
  Start_log_event_v3::do_apply_event(), not here. Because if we come
5916
  here, the master was sane.
5917
*/
5918
int Stop_log_event::do_update_pos(Relay_log_info *rli)
5919
{
unknown's avatar
unknown committed
5920 5921
  /*
    We do not want to update master_log pos because we get a rotate event
5922
    before stop, so by now group_master_log_name is set to the next log.
5923
    If we updated it, we will have incorrect master coordinates and this
unknown's avatar
unknown committed
5924
    could give false triggers in MASTER_POS_WAIT() that we have reached
5925
    the target position when in fact we have not.
unknown's avatar
unknown committed
5926
  */
5927 5928 5929 5930 5931 5932 5933
  if (thd->options & OPTION_BEGIN)
    rli->inc_event_relay_log_pos();
  else
  {
    rli->inc_group_relay_log_pos(0);
    flush_relay_log_info(rli);
  }
5934 5935
  return 0;
}
5936

unknown's avatar
unknown committed
5937
#endif /* !MYSQL_CLIENT */
unknown's avatar
SCRUM  
unknown committed
5938
#endif /* HAVE_REPLICATION */
5939

5940

unknown's avatar
unknown committed
5941
/**************************************************************************
unknown's avatar
unknown committed
5942
	Create_file_log_event methods
unknown's avatar
unknown committed
5943
**************************************************************************/
5944 5945

/*
5946
  Create_file_log_event ctor
unknown's avatar
unknown committed
5947
*/
5948 5949

#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
5950 5951 5952 5953
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,
5954
                      bool ignore,
unknown's avatar
unknown committed
5955
		      uchar* block_arg, uint block_len_arg, bool using_trans)
5956
  :Load_log_event(thd_arg,ex,db_arg,table_name_arg,fields_arg,handle_dup, ignore,
unknown's avatar
unknown committed
5957
		  using_trans),
5958
   fake_base(0), block(block_arg), event_buf(0), block_len(block_len_arg),
5959
   file_id(thd_arg->file_id = mysql_bin_log.next_file_id())
5960
{
unknown's avatar
unknown committed
5961
  DBUG_ENTER("Create_file_log_event");
5962
  sql_ex.force_new_format();
unknown's avatar
unknown committed
5963
  DBUG_VOID_RETURN;
5964
}
5965

5966

unknown's avatar
unknown committed
5967
/*
5968
  Create_file_log_event::write_data_body()
unknown's avatar
unknown committed
5969
*/
5970

5971
bool Create_file_log_event::write_data_body(IO_CACHE* file)
5972
{
5973 5974
  bool res;
  if ((res= Load_log_event::write_data_body(file)) || fake_base)
5975
    return res;
5976 5977
  return (my_b_safe_write(file, (uchar*) "", 1) ||
          my_b_safe_write(file, (uchar*) block, block_len));
5978 5979
}

5980

unknown's avatar
unknown committed
5981
/*
5982
  Create_file_log_event::write_data_header()
unknown's avatar
unknown committed
5983
*/
unknown's avatar
unknown committed
5984

5985
bool Create_file_log_event::write_data_header(IO_CACHE* file)
5986
{
5987
  bool res;
5988
  uchar buf[CREATE_FILE_HEADER_LEN];
5989 5990
  if ((res= Load_log_event::write_data_header(file)) || fake_base)
    return res;
5991
  int4store(buf + CF_FILE_ID_OFFSET, file_id);
5992
  return my_b_safe_write(file, buf, CREATE_FILE_HEADER_LEN) != 0;
5993 5994 5995
}


unknown's avatar
unknown committed
5996
/*
5997
  Create_file_log_event::write_base()
unknown's avatar
unknown committed
5998
*/
5999

6000
bool Create_file_log_event::write_base(IO_CACHE* file)
6001
{
6002 6003 6004 6005
  bool res;
  fake_base= 1;                                 // pretend we are Load event
  res= write(file);
  fake_base= 0;
6006 6007 6008
  return res;
}

6009
#endif /* !MYSQL_CLIENT */
6010

unknown's avatar
unknown committed
6011
/*
6012
  Create_file_log_event ctor
unknown's avatar
unknown committed
6013
*/
6014

6015 6016 6017
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)
6018
{
6019 6020 6021 6022 6023
  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];
6024
  if (!(event_buf= (char*) my_memdup(buf, len, MYF(MY_WME))) ||
6025 6026 6027 6028 6029 6030 6031
      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
6032
    DBUG_VOID_RETURN;
6033
  if (description_event->binlog_version!=1)
6034
  {
6035 6036 6037 6038 6039 6040 6041 6042 6043 6044 6045 6046 6047 6048 6049 6050 6051
    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);
6052
    if (len < block_offset)
6053
      DBUG_VOID_RETURN;
unknown's avatar
unknown committed
6054
    block = (uchar*)buf + block_offset;
6055 6056 6057 6058 6059 6060
    block_len = len - block_offset;
  }
  else
  {
    sql_ex.force_new_format();
    inited_from_old = 1;
6061
  }
unknown's avatar
unknown committed
6062
  DBUG_VOID_RETURN;
6063 6064
}

6065

unknown's avatar
unknown committed
6066
/*
6067
  Create_file_log_event::print()
unknown's avatar
unknown committed
6068
*/
6069 6070

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
6071
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
6072
				  bool enable_local)
unknown's avatar
unknown committed
6073
{
6074 6075
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6076
  if (print_event_info->short_form)
6077 6078
  {
    if (enable_local && check_fname_outside_temp_buf())
unknown's avatar
unknown committed
6079
      Load_log_event::print(file, print_event_info);
6080
    return;
6081 6082 6083 6084
  }

  if (enable_local)
  {
unknown's avatar
unknown committed
6085
    Load_log_event::print(file, print_event_info,
6086
			  !check_fname_outside_temp_buf());
unknown's avatar
unknown committed
6087 6088 6089 6090
    /* 
       That one is for "file_id: etc" below: in mysqlbinlog we want the #, in
       SHOW BINLOG EVENTS we don't.
    */
6091
    my_b_printf(&cache, "#"); 
6092 6093
  }

6094
  my_b_printf(&cache, " file_id: %d  block_len: %d\n", file_id, block_len);
unknown's avatar
unknown committed
6095
}
6096

unknown's avatar
unknown committed
6097

unknown's avatar
unknown committed
6098
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
6099
{
unknown's avatar
unknown committed
6100
  print(file, print_event_info, 0);
6101
}
unknown's avatar
unknown committed
6102
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
6103

6104

unknown's avatar
unknown committed
6105
/*
6106
  Create_file_log_event::pack_info()
unknown's avatar
unknown committed
6107
*/
6108

unknown's avatar
SCRUM  
unknown committed
6109
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6110
void Create_file_log_event::pack_info(Protocol *protocol)
6111
{
6112 6113 6114
  char buf[NAME_LEN*2 + 30 + 21*2], *pos;
  pos= strmov(buf, "db=");
  memcpy(pos, db, db_len);
unknown's avatar
unknown committed
6115
  pos= strmov(pos + db_len, ";table=");
6116
  memcpy(pos, table_name, table_name_len);
unknown's avatar
unknown committed
6117
  pos= strmov(pos + table_name_len, ";file_id=");
6118 6119 6120
  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
6121
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
6122
}
unknown's avatar
unknown committed
6123
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6124 6125


6126
/**
6127
  Create_file_log_event::do_apply_event()
6128 6129 6130 6131 6132 6133 6134
  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
6135
*/
6136

unknown's avatar
SCRUM  
unknown committed
6137
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6138
int Create_file_log_event::do_apply_event(Relay_log_info const *rli)
6139
{
unknown's avatar
unknown committed
6140 6141
  char proc_info[17+FN_REFLEN+10], *fname_buf;
  char *ext;
6142 6143 6144
  int fd = -1;
  IO_CACHE file;
  int error = 1;
unknown's avatar
unknown committed
6145

6146
  bzero((char*)&file, sizeof(file));
unknown's avatar
unknown committed
6147 6148
  fname_buf= strmov(proc_info, "Making temp file ");
  ext= slave_load_file_stem(fname_buf, file_id, server_id, ".info");
6149
  thd_proc_info(thd, proc_info);
6150 6151 6152 6153
  my_delete(fname_buf, MYF(0)); // old copy may exist already
  if ((fd= my_create(fname_buf, CREATE_MODE,
		     O_WRONLY | O_BINARY | O_EXCL | O_NOFOLLOW,
		     MYF(MY_WME))) < 0 ||
6154 6155 6156
      init_io_cache(&file, fd, IO_SIZE, WRITE_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
6157 6158 6159
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not open file '%s'",
                fname_buf);
6160 6161 6162 6163
    goto err;
  }
  
  // a trick to avoid allocating another buffer
unknown's avatar
unknown committed
6164 6165
  fname= fname_buf;
  fname_len= (uint) (strmov(ext, ".data") - fname);
6166 6167
  if (write_base(&file))
  {
unknown's avatar
unknown committed
6168
    strmov(ext, ".info"); // to have it right in the error message
6169 6170 6171
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not write to file '%s'",
                fname_buf);
6172 6173 6174 6175 6176 6177
    goto err;
  }
  end_io_cache(&file);
  my_close(fd, MYF(0));
  
  // fname_buf now already has .data, not .info, because we did our trick
6178 6179 6180 6181
  my_delete(fname_buf, MYF(0)); // old copy may exist already
  if ((fd= my_create(fname_buf, CREATE_MODE,
		     O_WRONLY | O_BINARY | O_EXCL | O_NOFOLLOW,
		     MYF(MY_WME))) < 0)
6182
  {
6183 6184 6185
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not open file '%s'",
                fname_buf);
6186 6187
    goto err;
  }
6188
  if (my_write(fd, (uchar*) block, block_len, MYF(MY_WME+MY_NABP)))
6189
  {
6190 6191 6192
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: write to '%s' failed",
                fname_buf);
6193 6194
    goto err;
  }
6195 6196
  error=0;					// Everything is ok

6197 6198 6199 6200 6201
err:
  if (error)
    end_io_cache(&file);
  if (fd >= 0)
    my_close(fd, MYF(0));
6202
  thd_proc_info(thd, 0);
6203
  return error != 0;
6204
}
unknown's avatar
unknown committed
6205
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6206

6207

unknown's avatar
unknown committed
6208
/**************************************************************************
unknown's avatar
unknown committed
6209
	Append_block_log_event methods
unknown's avatar
unknown committed
6210
**************************************************************************/
6211

unknown's avatar
unknown committed
6212
/*
6213
  Append_block_log_event ctor
unknown's avatar
unknown committed
6214
*/
6215 6216

#ifndef MYSQL_CLIENT  
6217 6218
Append_block_log_event::Append_block_log_event(THD *thd_arg,
                                               const char *db_arg,
unknown's avatar
unknown committed
6219
					       uchar *block_arg,
unknown's avatar
unknown committed
6220 6221 6222
					       uint block_len_arg,
					       bool using_trans)
  :Log_event(thd_arg,0, using_trans), block(block_arg),
unknown's avatar
unknown committed
6223
   block_len(block_len_arg), file_id(thd_arg->file_id), db(db_arg)
6224 6225
{
}
unknown's avatar
unknown committed
6226
#endif
6227 6228


unknown's avatar
unknown committed
6229
/*
6230
  Append_block_log_event ctor
unknown's avatar
unknown committed
6231
*/
6232

6233 6234 6235
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)
6236
{
6237 6238 6239 6240 6241 6242
  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
6243
    DBUG_VOID_RETURN;
6244
  file_id= uint4korr(buf + common_header_len + AB_FILE_ID_OFFSET);
unknown's avatar
unknown committed
6245
  block= (uchar*)buf + total_header_len;
6246
  block_len= len - total_header_len;
unknown's avatar
unknown committed
6247
  DBUG_VOID_RETURN;
6248 6249 6250
}


unknown's avatar
unknown committed
6251
/*
6252
  Append_block_log_event::write()
unknown's avatar
unknown committed
6253
*/
6254

6255
#ifndef MYSQL_CLIENT
6256
bool Append_block_log_event::write(IO_CACHE* file)
6257
{
6258
  uchar buf[APPEND_BLOCK_HEADER_LEN];
6259
  int4store(buf + AB_FILE_ID_OFFSET, file_id);
6260 6261
  return (write_header(file, APPEND_BLOCK_HEADER_LEN + block_len) ||
          my_b_safe_write(file, buf, APPEND_BLOCK_HEADER_LEN) ||
6262
	  my_b_safe_write(file, (uchar*) block, block_len));
6263
}
6264
#endif
6265 6266


unknown's avatar
unknown committed
6267
/*
6268
  Append_block_log_event::print()
unknown's avatar
unknown committed
6269
*/
6270 6271

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6272
void Append_block_log_event::print(FILE* file,
unknown's avatar
unknown committed
6273
				   PRINT_EVENT_INFO* print_event_info)
6274
{
6275 6276
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6277
  if (print_event_info->short_form)
6278
    return;
6279 6280 6281
  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);
6282
}
unknown's avatar
unknown committed
6283
#endif /* MYSQL_CLIENT */
6284 6285


unknown's avatar
unknown committed
6286
/*
6287
  Append_block_log_event::pack_info()
unknown's avatar
unknown committed
6288
*/
6289

unknown's avatar
SCRUM  
unknown committed
6290
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6291
void Append_block_log_event::pack_info(Protocol *protocol)
6292 6293 6294 6295 6296 6297
{
  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
6298
  protocol->store(buf, length, &my_charset_bin);
6299 6300 6301
}


unknown's avatar
unknown committed
6302
/*
6303
  Append_block_log_event::get_create_or_append()
unknown's avatar
unknown committed
6304 6305
*/

6306
int Append_block_log_event::get_create_or_append() const
unknown's avatar
unknown committed
6307
{
6308
  return 0; /* append to the file, fail if not exists */
unknown's avatar
unknown committed
6309 6310
}

unknown's avatar
unknown committed
6311
/*
6312
  Append_block_log_event::do_apply_event()
unknown's avatar
unknown committed
6313
*/
6314

6315
int Append_block_log_event::do_apply_event(Relay_log_info const *rli)
6316
{
6317
  char proc_info[17+FN_REFLEN+10], *fname= proc_info+17;
6318
  int fd;
6319
  int error = 1;
6320
  DBUG_ENTER("Append_block_log_event::do_apply_event");
6321

unknown's avatar
unknown committed
6322 6323
  fname= strmov(proc_info, "Making temp file ");
  slave_load_file_stem(fname, file_id, server_id, ".data");
6324
  thd_proc_info(thd, proc_info);
6325 6326
  if (get_create_or_append())
  {
6327 6328 6329 6330 6331 6332
    /*
      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);
6333 6334 6335 6336 6337
    my_delete(fname, MYF(0)); // old copy may exist already
    if ((fd= my_create(fname, CREATE_MODE,
		       O_WRONLY | O_BINARY | O_EXCL | O_NOFOLLOW,
		       MYF(MY_WME))) < 0)
    {
6338 6339 6340
      rli->report(ERROR_LEVEL, my_errno,
                  "Error in %s event: could not create file '%s'",
                  get_type_str(), fname);
6341 6342 6343
      goto err;
    }
  }
6344 6345
  else if ((fd = my_open(fname, O_WRONLY | O_APPEND | O_BINARY | O_NOFOLLOW,
                         MYF(MY_WME))) < 0)
6346
  {
6347 6348 6349
    rli->report(ERROR_LEVEL, my_errno,
                "Error in %s event: could not open file '%s'",
                get_type_str(), fname);
6350 6351
    goto err;
  }
6352 6353 6354 6355

  DBUG_EXECUTE_IF("remove_slave_load_file_before_write", 
                  my_close(fd,MYF(0)); fd= -1; my_delete(fname, MYF(0)););

6356
  if (my_write(fd, (uchar*) block, block_len, MYF(MY_WME+MY_NABP)))
6357
  {
6358 6359 6360
    rli->report(ERROR_LEVEL, my_errno,
                "Error in %s event: write to '%s' failed",
                get_type_str(), fname);
6361 6362 6363
    goto err;
  }
  error=0;
6364

6365 6366 6367
err:
  if (fd >= 0)
    my_close(fd, MYF(0));
6368
  thd_proc_info(thd, 0);
6369
  DBUG_RETURN(error);
6370
}
unknown's avatar
SCRUM  
unknown committed
6371
#endif
6372 6373


unknown's avatar
unknown committed
6374
/**************************************************************************
unknown's avatar
unknown committed
6375
	Delete_file_log_event methods
unknown's avatar
unknown committed
6376
**************************************************************************/
6377

unknown's avatar
unknown committed
6378
/*
6379
  Delete_file_log_event ctor
unknown's avatar
unknown committed
6380
*/
6381 6382

#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
6383 6384 6385
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)
6386 6387
{
}
unknown's avatar
unknown committed
6388
#endif
6389

unknown's avatar
unknown committed
6390
/*
6391
  Delete_file_log_event ctor
unknown's avatar
unknown committed
6392
*/
6393

6394 6395 6396
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)
6397
{
6398 6399 6400
  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))
6401
    return;
6402
  file_id= uint4korr(buf + common_header_len + DF_FILE_ID_OFFSET);
6403 6404 6405
}


unknown's avatar
unknown committed
6406
/*
6407
  Delete_file_log_event::write()
unknown's avatar
unknown committed
6408
*/
6409

6410
#ifndef MYSQL_CLIENT
6411
bool Delete_file_log_event::write(IO_CACHE* file)
6412
{
6413
 uchar buf[DELETE_FILE_HEADER_LEN];
6414
 int4store(buf + DF_FILE_ID_OFFSET, file_id);
6415 6416
 return (write_header(file, sizeof(buf)) ||
         my_b_safe_write(file, buf, sizeof(buf)));
6417
}
6418
#endif
6419 6420


unknown's avatar
unknown committed
6421
/*
6422
  Delete_file_log_event::print()
unknown's avatar
unknown committed
6423
*/
6424 6425

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6426
void Delete_file_log_event::print(FILE* file,
unknown's avatar
unknown committed
6427
				  PRINT_EVENT_INFO* print_event_info)
6428
{
6429 6430
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6431
  if (print_event_info->short_form)
6432
    return;
6433 6434
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Delete_file: file_id=%u\n", file_id);
6435
}
unknown's avatar
unknown committed
6436
#endif /* MYSQL_CLIENT */
6437

unknown's avatar
unknown committed
6438
/*
6439
  Delete_file_log_event::pack_info()
unknown's avatar
unknown committed
6440
*/
6441

unknown's avatar
SCRUM  
unknown committed
6442
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6443
void Delete_file_log_event::pack_info(Protocol *protocol)
6444 6445 6446 6447
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
6448
  protocol->store(buf, (int32) length, &my_charset_bin);
6449
}
unknown's avatar
SCRUM  
unknown committed
6450
#endif
6451

unknown's avatar
unknown committed
6452
/*
6453
  Delete_file_log_event::do_apply_event()
unknown's avatar
unknown committed
6454
*/
6455

unknown's avatar
SCRUM  
unknown committed
6456
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6457
int Delete_file_log_event::do_apply_event(Relay_log_info const *rli)
6458 6459
{
  char fname[FN_REFLEN+10];
unknown's avatar
unknown committed
6460
  char *ext= slave_load_file_stem(fname, file_id, server_id, ".data");
6461
  (void) my_delete(fname, MYF(MY_WME));
unknown's avatar
unknown committed
6462
  strmov(ext, ".info");
6463
  (void) my_delete(fname, MYF(MY_WME));
6464
  return 0;
6465
}
unknown's avatar
unknown committed
6466
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6467 6468


unknown's avatar
unknown committed
6469
/**************************************************************************
unknown's avatar
unknown committed
6470
	Execute_load_log_event methods
unknown's avatar
unknown committed
6471
**************************************************************************/
6472

unknown's avatar
unknown committed
6473
/*
6474
  Execute_load_log_event ctor
unknown's avatar
unknown committed
6475
*/
6476 6477

#ifndef MYSQL_CLIENT  
6478 6479
Execute_load_log_event::Execute_load_log_event(THD *thd_arg,
                                               const char* db_arg,
unknown's avatar
unknown committed
6480 6481
					       bool using_trans)
  :Log_event(thd_arg, 0, using_trans), file_id(thd_arg->file_id), db(db_arg)
6482 6483
{
}
unknown's avatar
unknown committed
6484
#endif
6485 6486
  

unknown's avatar
unknown committed
6487
/*
6488
  Execute_load_log_event ctor
unknown's avatar
unknown committed
6489
*/
6490

6491 6492 6493
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)
6494
{
6495 6496 6497
  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))
6498
    return;
6499
  file_id= uint4korr(buf + common_header_len + EL_FILE_ID_OFFSET);
6500 6501 6502
}


unknown's avatar
unknown committed
6503
/*
6504
  Execute_load_log_event::write()
unknown's avatar
unknown committed
6505
*/
6506

6507
#ifndef MYSQL_CLIENT
6508
bool Execute_load_log_event::write(IO_CACHE* file)
6509
{
6510
  uchar buf[EXEC_LOAD_HEADER_LEN];
6511
  int4store(buf + EL_FILE_ID_OFFSET, file_id);
6512 6513
  return (write_header(file, sizeof(buf)) || 
          my_b_safe_write(file, buf, sizeof(buf)));
6514
}
6515
#endif
6516 6517


unknown's avatar
unknown committed
6518
/*
6519
  Execute_load_log_event::print()
unknown's avatar
unknown committed
6520
*/
6521 6522

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6523
void Execute_load_log_event::print(FILE* file,
unknown's avatar
unknown committed
6524
				   PRINT_EVENT_INFO* print_event_info)
6525
{
6526 6527
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6528
  if (print_event_info->short_form)
6529
    return;
6530 6531 6532
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Exec_load: file_id=%d\n",
              file_id);
6533
}
unknown's avatar
unknown committed
6534
#endif
6535

unknown's avatar
unknown committed
6536
/*
6537
  Execute_load_log_event::pack_info()
unknown's avatar
unknown committed
6538
*/
6539

unknown's avatar
SCRUM  
unknown committed
6540
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6541
void Execute_load_log_event::pack_info(Protocol *protocol)
6542 6543 6544 6545
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
6546
  protocol->store(buf, (int32) length, &my_charset_bin);
6547 6548 6549
}


unknown's avatar
unknown committed
6550
/*
6551
  Execute_load_log_event::do_apply_event()
unknown's avatar
unknown committed
6552
*/
unknown's avatar
SCRUM  
unknown committed
6553

6554
int Execute_load_log_event::do_apply_event(Relay_log_info const *rli)
6555 6556
{
  char fname[FN_REFLEN+10];
unknown's avatar
unknown committed
6557
  char *ext;
6558
  int fd;
unknown's avatar
unknown committed
6559
  int error= 1;
6560
  IO_CACHE file;
unknown's avatar
unknown committed
6561
  Load_log_event *lev= 0;
6562

unknown's avatar
unknown committed
6563
  ext= slave_load_file_stem(fname, file_id, server_id, ".info");
6564 6565
  if ((fd = my_open(fname, O_RDONLY | O_BINARY | O_NOFOLLOW,
                    MYF(MY_WME))) < 0 ||
6566 6567 6568
      init_io_cache(&file, fd, IO_SIZE, READ_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
6569 6570 6571
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Exec_load event: could not open file '%s'",
                fname);
6572 6573
    goto err;
  }
6574
  if (!(lev = (Load_log_event*)Log_event::read_log_event(&file,
6575 6576
                                                         (pthread_mutex_t*)0,
                                                         rli->relay_log.description_event_for_exec)) ||
6577
      lev->get_type_code() != NEW_LOAD_EVENT)
6578
  {
6579
    rli->report(ERROR_LEVEL, 0, "Error in Exec_load event: "
6580
                    "file '%s' appears corrupted", fname);
6581 6582
    goto err;
  }
unknown's avatar
unknown committed
6583

6584
  lev->thd = thd;
6585
  /*
6586
    lev->do_apply_event should use rli only for errors i.e. should
6587 6588
    not advance rli's position.

6589
    lev->do_apply_event is the place where the table is loaded (it
6590
    calls mysql_load()).
6591
  */
unknown's avatar
unknown committed
6592

6593
  const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
6594
  if (lev->do_apply_event(0,rli,1)) 
6595
  {
6596 6597 6598 6599 6600 6601 6602 6603
    /*
      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.
    */
6604
    char *tmp= my_strdup(rli->last_error().message, MYF(MY_WME));
6605 6606
    if (tmp)
    {
6607
      rli->report(ERROR_LEVEL, rli->last_error().number,
6608
                  "%s. Failed executing load from '%s'", tmp, fname);
6609 6610
      my_free(tmp,MYF(0));
    }
6611 6612
    goto err;
  }
unknown's avatar
unknown committed
6613 6614 6615 6616 6617 6618 6619 6620 6621 6622
  /*
    We have an open file descriptor to the .info file; we need to close it
    or Windows will refuse to delete the file in my_delete().
  */
  if (fd >= 0)
  {
    my_close(fd, MYF(0));
    end_io_cache(&file);
    fd= -1;
  }
6623
  (void) my_delete(fname, MYF(MY_WME));
unknown's avatar
unknown committed
6624
  memcpy(ext, ".data", 6);
6625
  (void) my_delete(fname, MYF(MY_WME));
6626
  error = 0;
6627

6628 6629 6630
err:
  delete lev;
  if (fd >= 0)
6631
  {
6632
    my_close(fd, MYF(0));
6633 6634
    end_io_cache(&file);
  }
6635
  return error;
6636
}
unknown's avatar
SCRUM  
unknown committed
6637

unknown's avatar
unknown committed
6638
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6639 6640


unknown's avatar
unknown committed
6641 6642 6643 6644 6645 6646
/**************************************************************************
	Begin_load_query_log_event methods
**************************************************************************/

#ifndef MYSQL_CLIENT
Begin_load_query_log_event::
unknown's avatar
unknown committed
6647
Begin_load_query_log_event(THD* thd_arg, const char* db_arg, uchar* block_arg,
unknown's avatar
unknown committed
6648 6649 6650 6651 6652 6653 6654 6655 6656 6657 6658 6659 6660 6661 6662 6663 6664 6665
                           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)
6666
int Begin_load_query_log_event::get_create_or_append() const
unknown's avatar
unknown committed
6667
{
6668
  return 1; /* create the file */
unknown's avatar
unknown committed
6669 6670 6671 6672
}
#endif /* defined( HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */


6673 6674 6675 6676 6677 6678 6679 6680 6681 6682 6683 6684 6685
#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
6686 6687 6688 6689 6690 6691 6692
/**************************************************************************
	Execute_load_query_log_event methods
**************************************************************************/


#ifndef MYSQL_CLIENT
Execute_load_query_log_event::
6693
Execute_load_query_log_event(THD *thd_arg, const char* query_arg,
6694 6695 6696 6697
                             ulong query_length_arg, uint fn_pos_start_arg,
                             uint fn_pos_end_arg,
                             enum_load_dup_handling dup_handling_arg,
                             bool using_trans, bool suppress_use,
6698
                             int errcode):
unknown's avatar
unknown committed
6699
  Query_log_event(thd_arg, query_arg, query_length_arg, using_trans,
6700
                  suppress_use, errcode),
unknown's avatar
unknown committed
6701 6702 6703 6704 6705 6706 6707 6708 6709 6710 6711 6712 6713 6714 6715 6716 6717 6718 6719 6720 6721 6722 6723 6724 6725 6726 6727 6728 6729 6730 6731 6732 6733 6734 6735 6736
  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;
}


6737
#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
6738 6739 6740
bool
Execute_load_query_log_event::write_post_header_for_derived(IO_CACHE* file)
{
6741
  uchar buf[EXECUTE_LOAD_QUERY_EXTRA_HEADER_LEN];
unknown's avatar
unknown committed
6742 6743 6744
  int4store(buf, file_id);
  int4store(buf + 4, fn_pos_start);
  int4store(buf + 4 + 4, fn_pos_end);
6745 6746
  *(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
6747
}
6748
#endif
unknown's avatar
unknown committed
6749 6750 6751


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
6752
void Execute_load_query_log_event::print(FILE* file,
unknown's avatar
unknown committed
6753
                                         PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
6754
{
unknown's avatar
unknown committed
6755
  print(file, print_event_info, 0);
unknown's avatar
unknown committed
6756 6757
}

unknown's avatar
unknown committed
6758 6759 6760
/**
  Prints the query as LOAD DATA LOCAL and with rewritten filename.
*/
unknown's avatar
unknown committed
6761
void Execute_load_query_log_event::print(FILE* file,
unknown's avatar
unknown committed
6762
                                         PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
6763 6764
                                         const char *local_fname)
{
6765 6766 6767
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
unknown's avatar
unknown committed
6768 6769 6770

  if (local_fname)
  {
6771
    my_b_write(&cache, (uchar*) query, fn_pos_start);
6772
    my_b_printf(&cache, " LOCAL INFILE \'");
Staale Smedseng's avatar
Staale Smedseng committed
6773
    my_b_printf(&cache, "%s", local_fname);
6774
    my_b_printf(&cache, "\'");
unknown's avatar
unknown committed
6775
    if (dup_handling == LOAD_DUP_REPLACE)
6776
      my_b_printf(&cache, " REPLACE");
6777
    my_b_printf(&cache, " INTO");
6778
    my_b_write(&cache, (uchar*) query + fn_pos_end, q_len-fn_pos_end);
6779
    my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
6780 6781 6782
  }
  else
  {
6783
    my_b_write(&cache, (uchar*) query, q_len);
6784
    my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
6785 6786
  }

unknown's avatar
unknown committed
6787
  if (!print_event_info->short_form)
6788
    my_b_printf(&cache, "# file_id: %d \n", file_id);
unknown's avatar
unknown committed
6789 6790 6791 6792 6793 6794 6795 6796
}
#endif


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Execute_load_query_log_event::pack_info(Protocol *protocol)
{
  char *buf, *pos;
6797
  if (!(buf= (char*) my_malloc(9 + db_len + q_len + 10 + 21, MYF(MY_WME))))
unknown's avatar
unknown committed
6798 6799 6800 6801 6802 6803 6804 6805 6806 6807 6808 6809 6810 6811 6812 6813 6814 6815 6816 6817 6818
    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
6819
Execute_load_query_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
6820 6821 6822 6823 6824 6825 6826
{
  char *p;
  char *buf;
  char *fname;
  char *fname_end;
  int error;

6827 6828
  buf= (char*) my_malloc(q_len + 1 - (fn_pos_end - fn_pos_start) +
                         (FN_REFLEN + 10) + 10 + 8 + 5, MYF(MY_WME));
6829

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

unknown's avatar
unknown committed
6832
  /* Replace filename and LOCAL keyword in query before executing it */
6833
  if (buf == NULL)
unknown's avatar
unknown committed
6834
  {
6835 6836
    rli->report(ERROR_LEVEL, ER_SLAVE_FATAL_ERROR,
                ER(ER_SLAVE_FATAL_ERROR), "Not enough memory");
unknown's avatar
unknown committed
6837 6838 6839 6840 6841 6842
    return 1;
  }

  p= buf;
  memcpy(p, query, fn_pos_start);
  p+= fn_pos_start;
6843
  fname= (p= strmake(p, STRING_WITH_LEN(" INFILE \'")));
unknown's avatar
unknown committed
6844 6845
  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
6846
  *(p++)='\'';
unknown's avatar
unknown committed
6847
  switch (dup_handling) {
unknown's avatar
unknown committed
6848
  case LOAD_DUP_IGNORE:
6849
    p= strmake(p, STRING_WITH_LEN(" IGNORE"));
unknown's avatar
unknown committed
6850 6851
    break;
  case LOAD_DUP_REPLACE:
6852
    p= strmake(p, STRING_WITH_LEN(" REPLACE"));
unknown's avatar
unknown committed
6853 6854 6855 6856 6857
    break;
  default:
    /* Ordinary load data */
    break;
  }
6858
  p= strmake(p, STRING_WITH_LEN(" INTO "));
unknown's avatar
unknown committed
6859 6860
  p= strmake(p, query+fn_pos_end, q_len-fn_pos_end);

6861
  error= Query_log_event::do_apply_event(rli, buf, p-buf);
unknown's avatar
unknown committed
6862 6863 6864 6865

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

6866 6867 6868 6869 6870 6871
  /*
    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)
    (void) my_delete(fname, MYF(MY_WME));
unknown's avatar
unknown committed
6872 6873 6874 6875 6876 6877 6878

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


unknown's avatar
unknown committed
6879
/**************************************************************************
unknown's avatar
unknown committed
6880
	sql_ex_info methods
unknown's avatar
unknown committed
6881
**************************************************************************/
6882

unknown's avatar
unknown committed
6883
/*
6884
  sql_ex_info::write_data()
unknown's avatar
unknown committed
6885
*/
6886

6887
bool sql_ex_info::write_data(IO_CACHE* file)
6888 6889 6890
{
  if (new_format())
  {
6891 6892 6893 6894 6895
    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) ||
6896
	    my_b_safe_write(file,(uchar*) &opt_flags,1));
6897 6898 6899
  }
  else
  {
6900 6901 6902 6903
    /**
      @todo This is sensitive to field padding. We should write a
      char[7], not an old_sql_ex. /sven
    */
6904 6905 6906 6907 6908 6909 6910 6911
    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;
6912
    return my_b_safe_write(file, (uchar*) &old_ex, sizeof(old_ex)) != 0;
6913 6914 6915 6916
  }
}


unknown's avatar
unknown committed
6917
/*
6918
  sql_ex_info::init()
unknown's avatar
unknown committed
6919
*/
6920

6921 6922
const char *sql_ex_info::init(const char *buf, const char *buf_end,
                              bool use_new_format)
6923 6924 6925 6926 6927 6928 6929 6930 6931 6932 6933 6934
{
  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.
    */
6935 6936 6937 6938 6939
    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))
6940 6941 6942 6943 6944 6945 6946 6947 6948 6949 6950 6951 6952 6953 6954 6955 6956 6957 6958 6959 6960 6961 6962 6963 6964 6965
      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;
}
6966 6967 6968 6969 6970 6971 6972 6973 6974 6975


/**************************************************************************
	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),
6976
    m_row_count(0),
6977 6978
    m_table(tbl_arg),
    m_table_id(tid),
6979
    m_width(tbl_arg ? tbl_arg->s->fields : 1),
6980 6981
    m_rows_buf(0), m_rows_cur(0), m_rows_end(0), m_flags(0) 
#ifdef HAVE_REPLICATION
6982
    , m_curr_row(NULL), m_curr_row_end(NULL), m_key(NULL)
6983
#endif
6984
{
6985 6986
  /*
    We allow a special form of dummy event when the table, and cols
6987
    are null and the table id is ~0UL.  This is a temporary
6988
    solution, to be able to terminate a started statement in the
6989
    binary log: the extraneous events will be removed in the future.
6990
   */
6991 6992
  DBUG_ASSERT((tbl_arg && tbl_arg->s && tid != ~0UL) ||
              (!tbl_arg && !cols && tid == ~0UL));
6993 6994 6995 6996 6997

  if (thd_arg->options & OPTION_NO_FOREIGN_KEY_CHECKS)
      set_flags(NO_FOREIGN_KEY_CHECKS_F);
  if (thd_arg->options & OPTION_RELAXED_UNIQUE_CHECKS)
      set_flags(RELAXED_UNIQUE_CHECKS_F);
6998
  /* if bitmap_init fails, caught in is_valid() */
6999 7000
  if (likely(!bitmap_init(&m_cols,
                          m_width <= sizeof(m_bitbuf)*8 ? m_bitbuf : NULL,
7001
                          m_width,
7002
                          false)))
7003 7004 7005
  {
    /* Cols can be zero if this is a dummy binrows event */
    if (likely(cols != NULL))
7006
    {
7007
      memcpy(m_cols.bitmap, cols->bitmap, no_bytes_in_map(cols));
7008 7009
      create_last_word_mask(&m_cols);
    }
7010
  }
7011
  else
7012 7013 7014 7015
  {
    // Needed because bitmap_init() does not set it to null on failure
    m_cols.bitmap= 0;
  }
7016 7017 7018 7019 7020 7021 7022 7023
}
#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),
7024
    m_row_count(0),
7025
#ifndef MYSQL_CLIENT
7026
    m_table(NULL),
7027 7028 7029
#endif
    m_table_id(0), m_rows_buf(0), m_rows_cur(0), m_rows_end(0)
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7030
    , m_curr_row(NULL), m_curr_row_end(NULL), m_key(NULL)
7031
#endif
7032 7033 7034 7035 7036
{
  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
7037 7038
  DBUG_PRINT("enter",("event_len: %u  common_header_len: %d  "
		      "post_header_len: %d",
7039 7040 7041 7042 7043 7044 7045 7046 7047 7048 7049 7050 7051
		      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
  {
7052
    m_table_id= (ulong) uint6korr(post_start);
7053 7054 7055 7056 7057
    post_start+= RW_FLAGS_OFFSET;
  }

  m_flags= uint2korr(post_start);

7058 7059 7060
  uchar const *const var_start=
    (const uchar *)buf + common_header_len + post_header_len;
  uchar const *const ptr_width= var_start;
7061
  uchar *ptr_after_width= (uchar*) ptr_width;
7062
  DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
7063
  m_width = net_field_length(&ptr_after_width);
7064 7065 7066 7067
  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,
7068
                          m_width,
7069 7070 7071 7072
                          false)))
  {
    DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
    memcpy(m_cols.bitmap, ptr_after_width, (m_width + 7) / 8);
7073
    create_last_word_mask(&m_cols);
7074
    ptr_after_width+= (m_width + 7) / 8;
7075
    DBUG_DUMP("m_cols", (uchar*) m_cols.bitmap, no_bytes_in_map(&m_cols));
7076 7077 7078 7079 7080 7081 7082
  }
  else
  {
    // Needed because bitmap_init() does not set it to null on failure
    m_cols.bitmap= NULL;
    DBUG_VOID_RETURN;
  }
7083

7084 7085 7086 7087 7088 7089
  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));

7090
    /* if bitmap_init fails, caught in is_valid() */
7091 7092
    if (likely(!bitmap_init(&m_cols_ai,
                            m_width <= sizeof(m_bitbuf_ai)*8 ? m_bitbuf_ai : NULL,
7093
                            m_width,
7094 7095 7096 7097
                            false)))
    {
      DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
      memcpy(m_cols_ai.bitmap, ptr_after_width, (m_width + 7) / 8);
7098
      create_last_word_mask(&m_cols_ai);
7099
      ptr_after_width+= (m_width + 7) / 8;
7100 7101
      DBUG_DUMP("m_cols_ai", (uchar*) m_cols_ai.bitmap,
                no_bytes_in_map(&m_cols_ai));
7102 7103 7104 7105 7106 7107 7108 7109 7110
    }
    else
    {
      // Needed because bitmap_init() does not set it to null on failure
      m_cols_ai.bitmap= 0;
      DBUG_VOID_RETURN;
    }
  }

7111
  const uchar* const ptr_rows_data= (const uchar*) ptr_after_width;
7112

7113
  size_t const data_size= event_len - (ptr_rows_data - (const uchar *) buf);
unknown's avatar
unknown committed
7114
  DBUG_PRINT("info",("m_table_id: %lu  m_flags: %d  m_width: %lu  data_size: %lu",
7115
                     m_table_id, m_flags, m_width, (ulong) data_size));
7116

7117
  m_rows_buf= (uchar*) my_malloc(data_size, MYF(MY_WME));
7118 7119
  if (likely((bool)m_rows_buf))
  {
7120
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7121
    m_curr_row= m_rows_buf;
7122
#endif
7123 7124 7125 7126 7127 7128 7129 7130 7131 7132 7133 7134 7135 7136 7137
    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().
7138
  my_free((uchar*)m_rows_buf, MYF(MY_ALLOW_ZERO_PTR));
7139 7140
}

7141 7142 7143 7144
int Rows_log_event::get_data_size()
{
  int const type_code= get_type_code();

7145 7146
  uchar buf[sizeof(m_width) + 1];
  uchar *end= net_store_length(buf, m_width);
7147 7148 7149 7150 7151 7152 7153

  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);
7154
  data_size+= (uint) (end - buf);
7155 7156 7157 7158

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

7159
  data_size+= (uint) (m_rows_cur - m_rows_buf);
7160 7161 7162 7163
  return data_size; 
}


7164
#ifndef MYSQL_CLIENT
7165
int Rows_log_event::do_add_row_data(uchar *row_data, size_t length)
7166 7167 7168 7169 7170 7171
{
  /*
    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
  */
7172
  DBUG_ENTER("Rows_log_event::do_add_row_data");
unknown's avatar
unknown committed
7173 7174
  DBUG_PRINT("enter", ("row_data: 0x%lx  length: %lu", (ulong) row_data,
                       (ulong) length));
7175 7176 7177 7178 7179
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
7180
  DBUG_DUMP("row_data", row_data, min(length, 32));
7181
#endif
7182 7183

  DBUG_ASSERT(m_rows_buf <= m_rows_cur);
7184
  DBUG_ASSERT(!m_rows_buf || (m_rows_end && m_rows_buf < m_rows_end));
7185 7186 7187
  DBUG_ASSERT(m_rows_cur <= m_rows_end);

  /* The cast will always work since m_rows_cur <= m_rows_end */
7188
  if (static_cast<size_t>(m_rows_end - m_rows_cur) <= length)
7189
  {
7190
    size_t const block_size= 1024;
7191
    my_ptrdiff_t const cur_size= m_rows_cur - m_rows_buf;
7192
    my_ptrdiff_t const new_alloc= 
7193
        block_size * ((cur_size + length + block_size - 1) / block_size);
7194

7195
    uchar* const new_buf= (uchar*)my_realloc((uchar*)m_rows_buf, (uint) new_alloc,
7196
                                           MYF(MY_ALLOW_ZERO_PTR|MY_WME));
7197 7198 7199 7200 7201 7202 7203 7204 7205 7206 7207 7208 7209 7210 7211 7212 7213
    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;
  }

7214
  DBUG_ASSERT(m_rows_cur + length <= m_rows_end);
7215 7216
  memcpy(m_rows_cur, row_data, length);
  m_rows_cur+= length;
7217
  m_row_count++;
7218 7219 7220 7221 7222
  DBUG_RETURN(0);
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7223
int Rows_log_event::do_apply_event(Relay_log_info const *rli)
7224
{
7225
  DBUG_ENTER("Rows_log_event::do_apply_event(Relay_log_info*)");
7226
  int error= 0;
7227
  /*
7228 7229 7230
    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
7231
    success.
7232
   */
7233
  if (m_table_id == ~0UL)
7234 7235 7236 7237 7238 7239 7240
  {
    /*
       This one is supposed to be set: just an extra check so that
       nothing strange has happened.
     */
    DBUG_ASSERT(get_flags(STMT_END_F));

7241
    const_cast<Relay_log_info*>(rli)->slave_close_thread_tables(thd);
7242 7243 7244
    thd->clear_error();
    DBUG_RETURN(0);
  }
7245 7246 7247

  /*
    'thd' has been set by exec_relay_log_event(), just before calling
7248
    do_apply_event(). We still check here to prevent future coding
7249
    errors.
7250 7251 7252 7253
  */
  DBUG_ASSERT(rli->sql_thd == thd);

  /*
7254 7255 7256 7257
    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.
7258
  */
7259
  if (!thd->lock)
7260 7261
  {
    /*
7262 7263 7264 7265 7266 7267 7268
      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
      call might reset the value of current_stmt_binlog_row_based, so
      we need to do any changes to that value after this function.
7269
    */
7270
    lex_start(thd);
7271
    mysql_reset_thd_for_next_command(thd);
7272 7273 7274 7275 7276 7277
    /*
      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;
7278 7279 7280 7281 7282 7283 7284 7285 7286 7287 7288
    /*
      Check if the slave is set to use SBR.  If so, it should switch
      to using RBR until the end of the "statement", i.e., next
      STMT_END_F or next error.
    */
    if (!thd->current_stmt_binlog_row_based &&
        mysql_bin_log.is_open() && (thd->options & OPTION_BIN_LOG))
    {
      thd->set_current_stmt_binlog_row_based();
    }

7289

7290 7291 7292 7293 7294 7295 7296 7297 7298 7299 7300 7301 7302 7303 7304 7305 7306
    /*
      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))
        thd->options|= OPTION_NO_FOREIGN_KEY_CHECKS;
    else
        thd->options&= ~OPTION_NO_FOREIGN_KEY_CHECKS;

    if (get_flags(RELAXED_UNIQUE_CHECKS_F))
        thd->options|= OPTION_RELAXED_UNIQUE_CHECKS;
    else
        thd->options&= ~OPTION_RELAXED_UNIQUE_CHECKS;
    /* A small test to verify that objects have consistent types */
    DBUG_ASSERT(sizeof(thd->options) == sizeof(OPTION_RELAXED_UNIQUE_CHECKS));

7307
    if (simple_open_n_lock_tables(thd, rli->tables_to_lock))
7308
    {
Marc Alff's avatar
Marc Alff committed
7309
      uint actual_error= thd->stmt_da->sql_errno();
7310
      if (thd->is_slave_error || thd->is_fatal_error)
7311
      {
7312 7313
        /*
          Error reporting borrowed from Query_log_event with many excessive
7314 7315 7316
          simplifications. 
          We should not honour --slave-skip-errors at this point as we are
          having severe errors which should not be skiped.
7317 7318 7319
        */
        rli->report(ERROR_LEVEL, actual_error,
                    "Error '%s' on opening tables",
Marc Alff's avatar
Marc Alff committed
7320
                    (actual_error ? thd->stmt_da->message() :
7321 7322
                     "unexpected success or fatal error"));
        thd->is_slave_error= 1;
7323
      }
7324
      const_cast<Relay_log_info*>(rli)->slave_close_thread_tables(thd);
7325
      DBUG_RETURN(actual_error);
7326
    }
7327 7328 7329 7330 7331 7332 7333 7334 7335 7336

    /*
      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.
    */

    {
7337
      RPL_TABLE_LIST *ptr= rli->tables_to_lock;
7338 7339 7340 7341
      for ( ; ptr ; ptr= static_cast<RPL_TABLE_LIST*>(ptr->next_global))
      {
        if (ptr->m_tabledef.compatible_with(rli, ptr->table))
        {
7342 7343 7344 7345
          /*
            We should not honour --slave-skip-errors at this point as we are
            having severe errors which should not be skiped.
          */
7346 7347
          mysql_unlock_tables(thd, thd->lock);
          thd->lock= 0;
7348
          thd->is_slave_error= 1;
7349
          const_cast<Relay_log_info*>(rli)->slave_close_thread_tables(thd);
7350 7351 7352 7353 7354
          DBUG_RETURN(ERR_BAD_TABLE_DEF);
        }
      }
    }

7355
    /*
7356 7357
      ... and then we add all the tables to the table map and remove
      them from tables to lock.
7358 7359 7360

      We also invalidate the query cache for all the tables, since
      they will now be changed.
7361 7362 7363 7364 7365 7366 7367

      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.
7368
     */
7369
    for (TABLE_LIST *ptr= rli->tables_to_lock ; ptr ; ptr= ptr->next_global)
7370
    {
7371
      const_cast<Relay_log_info*>(rli)->m_table_map.set_table(ptr->table_id, ptr->table);
7372
    }
7373 7374 7375
#ifdef HAVE_QUERY_CACHE
    query_cache.invalidate_locked_for_write(rli->tables_to_lock);
#endif
7376 7377
  }

7378 7379
  TABLE* 
    table= 
7380
    m_table= const_cast<Relay_log_info*>(rli)->m_table_map.get_table(m_table_id);
7381

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

7384 7385
  if (table)
  {
7386
    bool transactional_table= table->file->has_transactions();
7387 7388
    /*
      table == NULL means that this table should not be replicated
7389
      (this was set up by Table_map_log_event::do_apply_event()
7390
      which tested replicate-* rules).
7391
    */
7392 7393 7394 7395 7396 7397 7398 7399 7400 7401 7402

    /*
      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);

7403 7404 7405 7406 7407 7408 7409 7410 7411
    /*
      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.
     */
7412
    const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
7413

7414 7415
     if ( m_width == table->s->fields && bitmap_is_set_all(&m_cols))
      set_flags(COMPLETE_ROWS_F);
7416

7417 7418 7419 7420 7421 7422 7423 7424 7425 7426 7427 7428 7429 7430 7431 7432
    /* 
      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);
7433

7434 7435
    this->slave_exec_mode= slave_exec_mode_options; // fix the mode

7436 7437
    // Do event specific preparations 
    error= do_before_row_operations(rli);
7438

7439
    // row processing loop
7440

7441 7442
    while (error == 0 && m_curr_row < m_rows_end)
    {
7443 7444 7445 7446
      /* 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;
7447 7448 7449

      error= do_exec_row(rli);

7450 7451 7452
      DBUG_PRINT("info", ("error: %s", HA_ERR(error)));
      DBUG_ASSERT(error != HA_ERR_RECORD_DELETED);

7453
      table->in_use = old_thd;
7454

7455 7456 7457 7458 7459 7460 7461 7462 7463 7464
      if (error)
      {
        int actual_error= convert_handler_error(error, thd, table);
        bool idempotent_error= (idempotent_error_code(error) &&
                                ((bit_is_set(slave_exec_mode, 
                                SLAVE_EXEC_MODE_IDEMPOTENT)) == 1));
        bool ignored_error= (idempotent_error == 0 ?
                             ignored_error_code(actual_error) : 0);

        if (idempotent_error || ignored_error)
7465 7466 7467 7468 7469
        {
          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);
7470
          clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
7471
          error= 0;
7472 7473
          if (idempotent_error == 0)
            break;
7474
        }
7475 7476
      }

7477 7478 7479 7480 7481 7482 7483
      /*
       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.
      */ 
   
7484 7485 7486
      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));

7487
      if (!m_curr_row_end && !error)
7488
        error= unpack_current_row(rli);
7489 7490 7491 7492 7493 7494 7495 7496
  
      // 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;
 
7497 7498 7499
      if (error == 0 && !transactional_table)
        thd->transaction.all.modified_non_trans_table=
          thd->transaction.stmt.modified_non_trans_table= TRUE;
7500 7501
    } // row processing loop

7502 7503 7504 7505 7506 7507 7508 7509 7510 7511
    {/**
         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;);
    }
7512 7513 7514 7515 7516 7517 7518 7519 7520 7521 7522 7523 7524

    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;
    }

7525
    if (!cache_stmt)
7526 7527 7528 7529
    {
      DBUG_PRINT("info", ("Marked that we need to keep log"));
      thd->options|= OPTION_KEEP_LOG;
    }
7530
  } // if (table)
7531

7532 7533 7534
  
  if (error)
  {
7535 7536 7537
    slave_rows_error_report(ERROR_LEVEL, error, rli, thd, table,
                             get_type_str(),
                             RPL_LOG_NAME, (ulong) log_pos);
unknown's avatar
unknown committed
7538
    thd->reset_current_stmt_binlog_row_based();
7539
    const_cast<Relay_log_info*>(rli)->cleanup_context(thd, error);
7540
    thd->is_slave_error= 1;
7541
    DBUG_RETURN(error);
7542
  }
7543

7544
  if (get_flags(STMT_END_F))
7545
    if ((error= rows_event_stmt_cleanup(rli, thd)))
7546 7547 7548 7549 7550 7551
      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);

7552
  DBUG_RETURN(error);
7553 7554
}

7555
Log_event::enum_skip_reason
7556
Rows_log_event::do_shall_skip(Relay_log_info *rli)
7557 7558 7559 7560 7561 7562 7563 7564 7565 7566 7567 7568
{
  /*
    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);
}

7569 7570 7571 7572 7573 7574 7575 7576 7577 7578
/**
   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.
 */
7579

7580 7581 7582
static int rows_event_stmt_cleanup(Relay_log_info const *rli, THD * thd)
{
  int error;
7583 7584 7585 7586 7587 7588 7589 7590 7591 7592 7593 7594 7595 7596 7597 7598 7599
  {
    /*
      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).
    */
    thd->binlog_flush_pending_rows_event(true);
7600

7601 7602 7603 7604 7605 7606 7607 7608 7609 7610
    /*
      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.
    */
    error= ha_autocommit_or_rollback(thd, 0);
7611

7612 7613 7614 7615 7616 7617 7618 7619 7620 7621
    /*
      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.
    */

unknown's avatar
unknown committed
7622
    thd->reset_current_stmt_binlog_row_based();
7623

7624 7625 7626 7627 7628 7629 7630 7631 7632 7633 7634 7635 7636 7637 7638 7639 7640 7641 7642 7643 7644 7645 7646 7647 7648 7649
    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))
  {
7650 7651 7652 7653 7654 7655 7656 7657 7658 7659 7660 7661 7662
    /*
      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();
7663
  }
7664
  else
7665
  {
7666
    rli->inc_event_relay_log_pos();
7667 7668
  }

7669
  DBUG_RETURN(error);
7670
}
7671

7672 7673 7674 7675 7676
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Rows_log_event::write_data_header(IO_CACHE *file)
{
7677
  uchar buf[ROWS_HEADER_LEN];	// No need to init the buffer
7678
  DBUG_ASSERT(m_table_id != ~0UL);
7679 7680 7681 7682 7683 7684 7685 7686 7687 7688 7689 7690 7691 7692 7693 7694 7695
  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.
  */
7696
  uchar sbuf[sizeof(m_width) + 1];
7697
  my_ptrdiff_t const data_size= m_rows_cur - m_rows_buf;
7698
  bool res= false;
7699 7700
  uchar *const sbuf_end= net_store_length(sbuf, (size_t) m_width);
  DBUG_ASSERT(static_cast<size_t>(sbuf_end - sbuf) <= sizeof(sbuf));
7701

7702 7703
  DBUG_DUMP("m_width", sbuf, (size_t) (sbuf_end - sbuf));
  res= res || my_b_safe_write(file, sbuf, (size_t) (sbuf_end - sbuf));
7704

7705 7706
  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,
7707 7708 7709 7710 7711 7712
                              no_bytes_in_map(&m_cols));
  /*
    TODO[refactor write]: Remove the "down cast" here (and elsewhere).
   */
  if (get_type_code() == UPDATE_ROWS_EVENT)
  {
7713 7714 7715
    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,
7716 7717
                                no_bytes_in_map(&m_cols_ai));
  }
7718 7719
  DBUG_DUMP("rows", m_rows_buf, data_size);
  res= res || my_b_safe_write(file, m_rows_buf, (size_t) data_size);
7720 7721 7722

  return res;

7723 7724 7725
}
#endif

7726
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
7727 7728
void Rows_log_event::pack_info(Protocol *protocol)
{
7729 7730 7731
  char buf[256];
  char const *const flagstr=
    get_flags(STMT_END_F) ? " flags: STMT_END_F" : "";
7732
  size_t bytes= my_snprintf(buf, sizeof(buf),
unknown's avatar
unknown committed
7733
                               "table_id: %lu%s", m_table_id, flagstr);
7734
  protocol->store(buf, bytes, &my_charset_bin);
7735 7736 7737
}
#endif

7738 7739 7740 7741 7742 7743 7744 7745 7746 7747 7748
#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);
7749 7750 7751
    my_b_printf(head, "\t%s: table id %lu%s\n",
                name, m_table_id,
                last_stmt_event ? " flags: STMT_END_F" : "");
7752 7753 7754 7755 7756
    print_base64(body, print_event_info, !last_stmt_event);
  }

  if (get_flags(STMT_END_F))
  {
7757 7758
    copy_event_cache_to_file_and_reinit(head, file);
    copy_event_cache_to_file_and_reinit(body, file);
7759 7760 7761 7762
  }
}
#endif

7763
/**************************************************************************
7764
	Table_map_log_event member functions and support functions
7765 7766
**************************************************************************/

7767 7768 7769 7770
/**
  @page How replication of field metadata works.
  
  When a table map is created, the master first calls 
7771
  Table_map_log_event::save_field_metadata() which calculates how many 
7772
  values will be in the field metadata. Only those fields that require the 
7773 7774 7775 7776 7777 7778 7779
  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.

7780 7781 7782 7783 7784 7785 7786
  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.

7787 7788 7789 7790 7791 7792 7793 7794 7795 7796
  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. 
7797 7798
*/

unknown's avatar
unknown committed
7799
#if !defined(MYSQL_CLIENT)
7800 7801 7802 7803 7804 7805
/**
  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
7806
  @retval  0  Ok.
7807

unknown's avatar
unknown committed
7808 7809
  @todo
  We may want to consider changing the encoding of the information.
7810 7811 7812 7813 7814 7815 7816 7817 7818 7819 7820 7821 7822 7823 7824 7825 7826 7827 7828
  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++)
7829 7830
    index+= m_table->s->field[i]->save_field_metadata(&m_field_metadata[index]);
  DBUG_RETURN(index);
7831 7832 7833
}
#endif /* !defined(MYSQL_CLIENT) */

7834 7835 7836 7837 7838 7839 7840 7841
/*
  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,
                                         bool is_transactional, uint16 flags)
7842
  : Log_event(thd, 0, true),
7843 7844 7845 7846 7847
    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),
7848 7849 7850 7851 7852 7853 7854 7855 7856
    m_colcnt(tbl->s->fields),
    m_memory(NULL),
    m_table_id(tid),
    m_flags(flags),
    m_data_size(0),
    m_field_metadata(0),
    m_field_metadata_size(0),
    m_null_bits(0),
    m_meta_memory(NULL)
7857
{
7858 7859
  uchar cbuf[sizeof(m_colcnt) + 1];
  uchar *cbuf_end;
7860
  DBUG_ASSERT(m_table_id != ~0UL);
7861 7862 7863 7864 7865 7866 7867 7868 7869 7870 7871 7872
  /*
    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
7873
  DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master", m_data_size= 6;);
7874 7875
  m_data_size+= m_dblen + 2;	// Include length and terminating \0
  m_data_size+= m_tbllen + 2;	// Include length and terminating \0
7876
  cbuf_end= net_store_length(cbuf, (size_t) m_colcnt);
Andrei Elkin's avatar
Andrei Elkin committed
7877
  DBUG_ASSERT(static_cast<size_t>(cbuf_end - cbuf) <= sizeof(cbuf));
7878
  m_data_size+= (cbuf_end - cbuf) + m_colcnt;	// COLCNT and column types
7879

7880
  /* If malloc fails, caught in is_valid() */
7881
  if ((m_memory= (uchar*) my_malloc(m_colcnt, MYF(MY_WME))))
7882
  {
unknown's avatar
unknown committed
7883
    m_coltype= reinterpret_cast<uchar*>(m_memory);
7884 7885 7886
    for (unsigned int i= 0 ; i < m_table->s->fields ; ++i)
      m_coltype[i]= m_table->field[i]->type();
  }
7887 7888 7889 7890 7891 7892 7893 7894 7895 7896 7897

  /*
    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,
7898
                                 &m_field_metadata, (m_colcnt * 2),
7899
                                 NULL);
7900 7901 7902 7903 7904 7905 7906 7907 7908 7909 7910

  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
7911 7912
    plus one or three bytes (see pack.c:net_store_length) for number of 
    elements in the field metadata array.
7913 7914
  */
  if (m_field_metadata_size > 255)
7915
    m_data_size+= m_field_metadata_size + 3; 
7916 7917 7918
  else
    m_data_size+= m_field_metadata_size + 1; 

7919 7920 7921 7922 7923
  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);

7924 7925 7926 7927 7928 7929 7930 7931 7932 7933 7934 7935 7936
}
#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
7937
    m_table(NULL),
7938
#endif
7939 7940 7941 7942 7943
    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)
7944
{
7945
  unsigned int bytes_read= 0;
7946 7947 7948 7949
  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
7950
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
7951 7952
                     event_len, common_header_len, post_header_len));

7953 7954 7955 7956 7957
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
7958
  DBUG_DUMP("event buffer", (uchar*) buf, event_len);
7959
#endif
7960 7961 7962 7963 7964 7965 7966 7967 7968 7969 7970 7971 7972 7973

  /* 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);
7974
    m_table_id= (ulong) uint6korr(post_start);
7975 7976 7977
    post_start+= TM_FLAGS_OFFSET;
  }

7978
  DBUG_ASSERT(m_table_id != ~0UL);
7979 7980 7981 7982 7983 7984 7985

  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 */
7986
  uchar const *const ptr_dblen= (uchar const*)vpart + 0;
unknown's avatar
unknown committed
7987
  m_dblen= *(uchar*) ptr_dblen;
7988 7989

  /* Length of database name + counter + terminating null */
7990
  uchar const *const ptr_tbllen= ptr_dblen + m_dblen + 2;
unknown's avatar
unknown committed
7991
  m_tbllen= *(uchar*) ptr_tbllen;
7992 7993

  /* Length of table name + counter + terminating null */
7994
  uchar const *const ptr_colcnt= ptr_tbllen + m_tbllen + 2;
7995 7996
  uchar *ptr_after_colcnt= (uchar*) ptr_colcnt;
  m_colcnt= net_field_length(&ptr_after_colcnt);
7997

unknown's avatar
unknown committed
7998
  DBUG_PRINT("info",("m_dblen: %lu  off: %ld  m_tbllen: %lu  off: %ld  m_colcnt: %lu  off: %ld",
7999 8000
                     (ulong) m_dblen, (long) (ptr_dblen-(const uchar*)vpart), 
                     (ulong) m_tbllen, (long) (ptr_tbllen-(const uchar*)vpart),
8001
                     m_colcnt, (long) (ptr_colcnt-(const uchar*)vpart)));
8002

8003
  /* Allocate mem for all fields in one go. If fails, caught in is_valid() */
8004 8005 8006 8007 8008
  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);
8009 8010 8011 8012

  if (m_memory)
  {
    /* Copy the different parts into their memory */
8013 8014
    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);
8015
    memcpy(m_coltype, ptr_after_colcnt, m_colcnt);
8016 8017

    ptr_after_colcnt= ptr_after_colcnt + m_colcnt;
8018
    bytes_read= (uint) (ptr_after_colcnt - (uchar *)buf);
8019 8020 8021 8022
    DBUG_PRINT("info", ("Bytes read: %d.\n", bytes_read));
    if (bytes_read < event_len)
    {
      m_field_metadata_size= net_field_length(&ptr_after_colcnt);
8023
      DBUG_ASSERT(m_field_metadata_size <= (m_colcnt * 2));
8024 8025 8026 8027 8028 8029 8030 8031 8032
      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);
    }
8033 8034 8035 8036 8037 8038 8039 8040
  }

  DBUG_VOID_RETURN;
}
#endif

Table_map_log_event::~Table_map_log_event()
{
8041
  my_free(m_meta_memory, MYF(MY_ALLOW_ZERO_PTR));
8042 8043 8044 8045 8046 8047 8048 8049 8050 8051 8052 8053 8054 8055 8056
  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)
8057
int Table_map_log_event::do_apply_event(Relay_log_info const *rli)
8058
{
8059
  RPL_TABLE_LIST *table_list;
8060
  char *db_mem, *tname_mem, *mdlkey;
Konstantin Osipov's avatar
Konstantin Osipov committed
8061
  MDL_LOCK_DATA *mdl_lock_data;
8062 8063
  size_t dummy_len;
  void *memory;
8064
  DBUG_ENTER("Table_map_log_event::do_apply_event(Relay_log_info*)");
8065 8066 8067 8068 8069 8070 8071
  DBUG_ASSERT(rli->sql_thd == thd);

  /* Step the query id to mark what columns that are actually used. */
  pthread_mutex_lock(&LOCK_thread_count);
  thd->query_id= next_query_id();
  pthread_mutex_unlock(&LOCK_thread_count);

8072 8073 8074 8075
  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,
Konstantin Osipov's avatar
Konstantin Osipov committed
8076
                                &mdl_lock_data, sizeof(MDL_LOCK_DATA),
Konstantin Osipov's avatar
Konstantin Osipov committed
8077
                                &mdlkey, MAX_MDLKEY_LENGTH,
8078
                                NullS)))
8079
    DBUG_RETURN(HA_ERR_OUT_OF_MEM);
8080 8081 8082 8083 8084 8085 8086 8087 8088 8089

  bzero(table_list, sizeof(*table_list));
  table_list->db = db_mem;
  table_list->alias= table_list->table_name = tname_mem;
  table_list->lock_type= TL_WRITE;
  table_list->next_global= table_list->next_local= 0;
  table_list->table_id= m_table_id;
  table_list->updating= 1;
  strmov(table_list->db, rpl_filter->get_rewrite_db(m_dbnam, &dummy_len));
  strmov(table_list->table_name, m_tblnam);
Konstantin Osipov's avatar
Konstantin Osipov committed
8090 8091 8092
  mdl_init_lock(mdl_lock_data, mdlkey, 0, table_list->db,
                table_list->table_name);
  table_list->mdl_lock_data= mdl_lock_data;
8093 8094 8095

  int error= 0;

8096 8097 8098
  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))))
8099
  {
8100
    my_free(memory, MYF(MY_WME));
8101 8102
  }
  else
8103
  {
8104
    DBUG_ASSERT(thd->lex->query_tables != table_list);
8105

8106 8107 8108
    /*
      Use placement new to construct the table_def instance in the
      memory allocated for it inside table_list.
8109 8110 8111

      The memory allocated by the table_def structure (i.e., not the
      memory allocated *for* the table_def structure) is released
8112
      inside Relay_log_info::clear_tables_to_lock() by calling the
8113
      table_def destructor explicitly.
8114
    */
8115 8116
    new (&table_list->m_tabledef) table_def(m_coltype, m_colcnt, 
         m_field_metadata, m_field_metadata_size, m_null_bits);
8117
    table_list->m_tabledef_valid= TRUE;
8118 8119

    /*
8120
      We record in the slave's information that the table should be
unknown's avatar
unknown committed
8121
      locked by linking the table into the list of tables to lock.
8122
    */
8123
    table_list->next_global= table_list->next_local= rli->tables_to_lock;
8124 8125
    const_cast<Relay_log_info*>(rli)->tables_to_lock= table_list;
    const_cast<Relay_log_info*>(rli)->tables_to_lock_count++;
8126
    /* 'memory' is freed in clear_tables_to_lock */
8127 8128
  }

8129
  DBUG_RETURN(error);
8130
}
8131

8132
Log_event::enum_skip_reason
8133
Table_map_log_event::do_shall_skip(Relay_log_info *rli)
8134 8135 8136 8137 8138
{
  /*
    If the slave skip counter is 1, then we should not start executing
    on the next event.
  */
8139
  return continue_group(rli);
8140 8141
}

8142
int Table_map_log_event::do_update_pos(Relay_log_info *rli)
8143 8144 8145 8146 8147
{
  rli->inc_event_relay_log_pos();
  return 0;
}

8148 8149 8150 8151 8152
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Table_map_log_event::write_data_header(IO_CACHE *file)
{
8153
  DBUG_ASSERT(m_table_id != ~0UL);
8154
  uchar buf[TABLE_MAP_HEADER_LEN];
8155 8156 8157 8158 8159 8160 8161 8162 8163 8164 8165 8166 8167 8168 8169 8170 8171 8172 8173
  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);

8174 8175
  uchar const dbuf[]= { (uchar) m_dblen };
  uchar const tbuf[]= { (uchar) m_tbllen };
8176

8177
  uchar cbuf[sizeof(m_colcnt) + 1];
8178 8179
  uchar *const cbuf_end= net_store_length(cbuf, (size_t) m_colcnt);
  DBUG_ASSERT(static_cast<size_t>(cbuf_end - cbuf) <= sizeof(cbuf));
8180

8181 8182 8183 8184
  /*
    Store the size of the field metadata.
  */
  uchar mbuf[sizeof(m_field_metadata_size)];
8185
  uchar *const mbuf_end= net_store_length(mbuf, m_field_metadata_size);
8186

8187
  return (my_b_safe_write(file, dbuf,      sizeof(dbuf)) ||
8188
          my_b_safe_write(file, (const uchar*)m_dbnam,   m_dblen+1) ||
8189
          my_b_safe_write(file, tbuf,      sizeof(tbuf)) ||
8190 8191
          my_b_safe_write(file, (const uchar*)m_tblnam,  m_tbllen+1) ||
          my_b_safe_write(file, cbuf, (size_t) (cbuf_end - cbuf)) ||
8192 8193 8194 8195
          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));
8196 8197 8198 8199 8200 8201 8202 8203 8204 8205
 }
#endif

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

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

8206
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
8207 8208 8209
void Table_map_log_event::pack_info(Protocol *protocol)
{
    char buf[256];
8210
    size_t bytes= my_snprintf(buf, sizeof(buf),
unknown's avatar
unknown committed
8211
                                 "table_id: %lu (%s.%s)",
8212
                              m_table_id, m_dbnam, m_tblnam);
8213 8214
    protocol->store(buf, bytes, &my_charset_bin);
}
8215 8216
#endif

8217 8218 8219 8220 8221 8222 8223 8224 8225

#endif


#ifdef MYSQL_CLIENT
void Table_map_log_event::print(FILE *file, PRINT_EVENT_INFO *print_event_info)
{
  if (!print_event_info->short_form)
  {
8226 8227 8228 8229 8230
    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);
8231 8232 8233 8234 8235 8236 8237 8238 8239 8240 8241 8242 8243 8244 8245 8246 8247 8248 8249 8250 8251 8252 8253 8254 8255 8256 8257 8258 8259 8260 8261 8262 8263 8264
  }
}
#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)
8265 8266
int 
Write_rows_log_event::do_before_row_operations(const Slave_reporting_capability *const)
8267 8268 8269
{
  int error= 0;

8270 8271 8272
  /**
     todo: to introduce a property for the event (handler?) which forces
     applying the event in the replace (idempotent) fashion.
8273
  */
8274 8275 8276 8277 8278 8279 8280 8281 8282 8283 8284 8285 8286 8287 8288 8289 8290 8291 8292 8293 8294 8295 8296 8297 8298 8299 8300 8301 8302 8303 8304 8305 8306 8307 8308 8309 8310 8311 8312
  if (bit_is_set(slave_exec_mode, SLAVE_EXEC_MODE_IDEMPOTENT) == 1 ||
      m_table->s->db_type()->db_type == DB_TYPE_NDBCLUSTER)
  {
    /*
      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.
    */
  }
8313 8314 8315 8316 8317 8318 8319 8320 8321 8322 8323 8324 8325 8326 8327 8328

  /*
    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).
  */
8329
  m_table->timestamp_field_type= TIMESTAMP_NO_AUTO_SET;
8330 8331 8332
  
  /* Honor next number column if present */
  m_table->next_number_field= m_table->found_next_number_field;
8333 8334 8335 8336 8337 8338 8339 8340 8341 8342
  /*
   * 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;
8343 8344 8345
  return error;
}

8346
int 
8347
Write_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const,
8348
                                              int error)
8349
{
8350
  int local_error= 0;
8351
  m_table->next_number_field=0;
8352
  m_table->auto_increment_field_not_null= FALSE;
8353 8354 8355 8356 8357 8358 8359 8360 8361 8362 8363 8364 8365
  if (bit_is_set(slave_exec_mode, SLAVE_EXEC_MODE_IDEMPOTENT) == 1 ||
      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
    */
  }
8366
  if ((local_error= m_table->file->ha_end_bulk_insert()))
8367
  {
8368
    m_table->file->print_error(local_error, MYF(0));
8369 8370
  }
  return error? error : local_error;
8371 8372
}

8373
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
8374 8375 8376 8377 8378 8379 8380 8381 8382 8383 8384 8385 8386

/*
  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;
}

8387 8388 8389 8390 8391 8392 8393 8394 8395 8396 8397 8398 8399 8400 8401 8402 8403 8404 8405 8406 8407 8408 8409 8410 8411
/**
   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;
}

8412 8413
/**
  Write the current row into event's table.
8414

8415 8416 8417 8418 8419
  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.
8420

8421 8422 8423 8424 8425
  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.
8426

8427 8428 8429 8430
  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.
8431

8432 8433 8434 8435 8436 8437 8438 8439 8440 8441 8442 8443 8444 8445 8446 8447
  @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
8448
Rows_log_event::write_row(const Relay_log_info *const rli,
8449
                          const bool overwrite)
8450
{
8451 8452
  DBUG_ENTER("write_row");
  DBUG_ASSERT(m_table != NULL && thd != NULL);
8453

8454
  TABLE *table= m_table;  // pointer to event's table
8455 8456 8457 8458
  int error;
  int keynum;
  auto_afree_ptr<char> key(NULL);

8459
  /* fill table->record[0] with default values */
8460 8461
  bool abort_on_warnings= (rli->sql_thd->variables.sql_mode &
                           (MODE_STRICT_TRANS_TABLES | MODE_STRICT_ALL_TABLES));
8462
  if ((error= prepare_record(table, m_width,
8463
                             table->file->ht->db_type != DB_TYPE_NDBCLUSTER,
8464
                             abort_on_warnings, m_curr_row == m_rows_buf)))
8465 8466 8467
    DBUG_RETURN(error);
  
  /* unpack row into table->record[0] */
8468 8469 8470
  if ((error= unpack_current_row(rli, abort_on_warnings)))
    DBUG_RETURN(error);

8471 8472 8473 8474 8475 8476 8477 8478 8479 8480
  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);
  }
  
  
8481
#ifndef DBUG_OFF
8482
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
8483 8484 8485 8486
  DBUG_PRINT_BITSET("debug", "write_set = %s", table->write_set);
  DBUG_PRINT_BITSET("debug", "read_set = %s", table->read_set);
#endif

8487 8488 8489 8490 8491 8492 8493 8494
  /* 
    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. 
   */

8495 8496
  while ((error= table->file->ha_write_row(table->record[0])))
  {
8497 8498 8499 8500
    if (error == HA_ERR_LOCK_DEADLOCK ||
        error == HA_ERR_LOCK_WAIT_TIMEOUT ||
        (keynum= table->file->get_dup_key(error)) < 0 ||
        !overwrite)
8501
    {
8502
      DBUG_PRINT("info",("get_dup_key returns %d)", keynum));
8503
      /*
8504 8505 8506
        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
8507 8508 8509
        - either because the error was not "duplicate key" error
        - or because the information which key is not available
      */
8510
      table->file->print_error(error, MYF(0));
8511
      DBUG_RETURN(error);
8512 8513 8514 8515 8516 8517 8518 8519 8520 8521 8522
    }
    /*
       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.
     */
8523
    if (table->file->ha_table_flags() & HA_DUPLICATE_POS)
8524
    {
8525
      DBUG_PRINT("info",("Locating offending record using rnd_pos()"));
8526
      error= table->file->rnd_pos(table->record[1], table->file->dup_ref);
8527
      if (error)
8528
      {
8529
        DBUG_PRINT("info",("rnd_pos() returns error %d",error));
8530 8531
        if (error == HA_ERR_RECORD_DELETED)
          error= HA_ERR_KEY_NOT_FOUND;
8532
        table->file->print_error(error, MYF(0));
8533
        DBUG_RETURN(error);
8534
      }
8535 8536 8537
    }
    else
    {
8538 8539
      DBUG_PRINT("info",("Locating offending record using index_read_idx()"));

8540 8541
      if (table->file->extra(HA_EXTRA_FLUSH_CACHE))
      {
8542
        DBUG_PRINT("info",("Error when setting HA_EXTRA_FLUSH_CACHE"));
8543
        DBUG_RETURN(my_errno);
8544 8545 8546 8547 8548 8549
      }

      if (key.get() == NULL)
      {
        key.assign(static_cast<char*>(my_alloca(table->s->max_unique_length)));
        if (key.get() == NULL)
8550 8551
        {
          DBUG_PRINT("info",("Can't allocate key buffer"));
8552
          DBUG_RETURN(ENOMEM);
8553
        }
8554 8555
      }

8556 8557
      key_copy((uchar*)key.get(), table->record[0], table->key_info + keynum,
               0);
8558 8559 8560 8561
      error= table->file->index_read_idx_map(table->record[1], keynum,
                                             (const uchar*)key.get(),
                                             HA_WHOLE_KEY,
                                             HA_READ_KEY_EXACT);
8562
      if (error)
8563
      {
8564 8565 8566
        DBUG_PRINT("info",("index_read_idx() returns %s", HA_ERR(error)));
        if (error == HA_ERR_RECORD_DELETED)
          error= HA_ERR_KEY_NOT_FOUND;
8567
        table->file->print_error(error, MYF(0));
8568
        DBUG_RETURN(error);
8569
      }
8570 8571 8572
    }

    /*
8573
       Now, record[1] should contain the offending row.  That
8574 8575
       will enable us to update it or, alternatively, delete it (so
       that we can insert the new row afterwards).
8576
     */
8577

8578 8579 8580
    /*
      If row is incomplete we will use the record found to fill 
      missing columns.  
8581
    */
8582 8583 8584 8585 8586 8587 8588 8589 8590 8591 8592
    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
8593

8594
    /*
8595 8596 8597 8598 8599 8600 8601 8602 8603 8604 8605 8606 8607 8608 8609 8610 8611
       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())
    {
8612
      DBUG_PRINT("info",("Updating row using ha_update_row()"));
8613 8614
      error=table->file->ha_update_row(table->record[1],
                                       table->record[0]);
8615 8616 8617 8618 8619
      switch (error) {
                
      case HA_ERR_RECORD_IS_THE_SAME:
        DBUG_PRINT("info",("ignoring HA_ERR_RECORD_IS_THE_SAME error from"
                           " ha_update_row()"));
8620
        error= 0;
8621 8622 8623 8624 8625 8626
      
      case 0:
        break;
        
      default:    
        DBUG_PRINT("info",("ha_update_row() returns error %d",error));
8627
        table->file->print_error(error, MYF(0));
8628 8629
      }
      
8630
      DBUG_RETURN(error);
8631 8632 8633
    }
    else
    {
8634
      DBUG_PRINT("info",("Deleting offending row and trying to write new one again"));
8635
      if ((error= table->file->ha_delete_row(table->record[1])))
8636
      {
8637
        DBUG_PRINT("info",("ha_delete_row() returns error %d",error));
8638
        table->file->print_error(error, MYF(0));
8639
        DBUG_RETURN(error);
8640
      }
8641 8642 8643
      /* Will retry ha_write_row() with the offending row removed. */
    }
  }
8644

8645
  DBUG_RETURN(error);
8646 8647
}

8648 8649 8650
#endif

int 
8651
Write_rows_log_event::do_exec_row(const Relay_log_info *const rli)
8652
{
8653
  DBUG_ASSERT(m_table != NULL);
8654 8655 8656 8657
  int error=
    write_row(rli,        /* if 1 then overwrite */
              bit_is_set(slave_exec_mode, SLAVE_EXEC_MODE_IDEMPOTENT) == 1);
    
8658 8659 8660 8661 8662
  if (error && !thd->is_error())
  {
    DBUG_ASSERT(0);
    my_error(ER_UNKNOWN_ERROR, MYF(0));
  }
8663
  
8664
  return error; 
8665
}
8666

8667 8668 8669 8670 8671
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Write_rows_log_event::print(FILE *file, PRINT_EVENT_INFO* print_event_info)
{
8672
  Rows_log_event::print_helper(file, print_event_info, "Write_rows");
8673 8674 8675 8676 8677 8678 8679 8680
}
#endif

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

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
8681 8682 8683 8684 8685 8686
/*
  Compares table->record[0] and table->record[1]

  Returns TRUE if different.
*/
static bool record_compare(TABLE *table)
8687
{
8688 8689 8690 8691 8692 8693 8694 8695 8696 8697 8698 8699
  /*
    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.
   */

8700 8701 8702
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
  DBUG_DUMP("record[1]", table->record[1], table->s->reclength);

8703
  bool result= FALSE;
8704
  uchar saved_x[2], saved_filler[2];
8705 8706 8707 8708 8709 8710 8711 8712 8713 8714 8715 8716 8717

  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);
    }
  }

8718
  if (table->s->blob_fields + table->s->varchar_fields == 0)
8719 8720 8721 8722 8723
  {
    result= cmp_record(table,record[1]);
    goto record_compare_exit;
  }

8724 8725 8726 8727
  /* Compare null bits */
  if (memcmp(table->null_flags,
	     table->null_flags+table->s->rec_buff_length,
	     table->s->null_bytes))
8728 8729 8730 8731 8732
  {
    result= TRUE;				// Diff in NULL value
    goto record_compare_exit;
  }

8733 8734
  /* Compare updated fields */
  for (Field **ptr=table->field ; *ptr ; ptr++)
8735
  {
8736
    if ((*ptr)->cmp_binary_offset(table->s->rec_buff_length))
8737 8738 8739 8740
    {
      result= TRUE;
      goto record_compare_exit;
    }
8741
  }
8742 8743 8744 8745 8746 8747 8748 8749 8750 8751 8752 8753 8754 8755 8756

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];
    }
8757
  }
8758 8759

  return result;
8760 8761
}

8762 8763
/**
  Locate the current row in event's table.
8764

8765 8766 8767 8768
  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.
8769

8770 8771 8772
  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.
8773

8774 8775 8776 8777 8778
  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. 
8779

8780 8781 8782 8783
  @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.
8784

8785 8786
  @note If the engine allows random access of the records, a combination of
  @c position() and @c rnd_pos() will be used. 
8787
 */
8788

8789
int Rows_log_event::find_row(const Relay_log_info *rli)
8790
{
8791
  DBUG_ENTER("Rows_log_event::find_row");
8792 8793

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

8795
  TABLE *table= m_table;
8796
  int error= 0;
8797

8798 8799 8800 8801 8802 8803 8804 8805 8806
  /*
    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);
8807

8808 8809
#ifndef DBUG_OFF
  DBUG_PRINT("info",("looking for the following record"));
8810
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
8811
#endif
8812

8813 8814
  if ((table->file->ha_table_flags() & HA_PRIMARY_KEY_REQUIRED_FOR_POSITION) &&
      table->s->primary_key < MAX_KEY)
8815 8816 8817 8818 8819 8820
  {
    /*
      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
8821
      the "cursor" (i.e., record[0] in this case) at the correct row.
8822 8823 8824 8825 8826 8827 8828 8829 8830 8831 8832

      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);

8833
    */
8834
    DBUG_PRINT("info",("locating record using primary key (position)"));
8835
    int error= table->file->rnd_pos_by_record(table->record[0]);
8836 8837 8838
    if (error)
    {
      DBUG_PRINT("info",("rnd_pos returns error %d",error));
8839 8840
      if (error == HA_ERR_RECORD_DELETED)
        error= HA_ERR_KEY_NOT_FOUND;
8841 8842
      table->file->print_error(error, MYF(0));
    }
8843
    DBUG_RETURN(error);
8844 8845
  }

8846
  // We can't use position() - try other methods.
8847 8848 8849 8850 8851
  
  /* 
    We need to retrieve all fields
    TODO: Move this out from this function to main loop 
   */
8852
  table->use_all_columns();
unknown's avatar
unknown committed
8853

8854 8855 8856 8857 8858 8859
  /*
    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]);    

8860
  if (table->s->keys > 0 && table->s->keys_in_use.is_set(0))
8861
  {
8862 8863
    DBUG_PRINT("info",("locating record using primary key (index_read)"));

8864
    /* The 0th key is active: search the table using the index */
8865
    if (!table->file->inited && (error= table->file->ha_index_init(0, FALSE)))
8866 8867 8868
    {
      DBUG_PRINT("info",("ha_index_init returns error %d",error));
      table->file->print_error(error, MYF(0));
8869
      goto err;
8870
    }
8871

8872 8873 8874 8875 8876 8877 8878 8879 8880
    /* 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.
     */
8881
#ifndef HAVE_purify
8882
    DBUG_DUMP("key data", m_key, table->key_info->key_length);
8883 8884
#endif

8885 8886 8887 8888 8889 8890
    /*
      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.
    */
8891 8892 8893 8894
    if (table->s->null_bytes > 0)
      table->record[0][table->s->null_bytes - 1]|=
        256U - (1U << table->s->last_null_bit_pos);

8895
    if ((error= table->file->index_read_map(table->record[0], m_key, 
8896
                                            HA_WHOLE_KEY,
8897
                                            HA_READ_KEY_EXACT)))
8898
    {
8899
      DBUG_PRINT("info",("no record matching the key found in the table"));
8900 8901
      if (error == HA_ERR_RECORD_DELETED)
        error= HA_ERR_KEY_NOT_FOUND;
8902
      table->file->print_error(error, MYF(0));
8903
      table->file->ha_index_end();
8904
      goto err;
8905 8906
    }

8907 8908 8909 8910 8911
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
8912 8913
    DBUG_PRINT("info",("found first matching record")); 
    DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
8914
#endif
8915 8916 8917 8918 8919 8920 8921 8922 8923 8924 8925 8926 8927
    /*
      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.
8928
    */
8929
    if (table->key_info->flags & HA_NOSAME)
8930 8931
    {
      table->file->ha_index_end();
8932
      goto ok;
8933
    }
8934

8935 8936
    /*
      In case key is not unique, we still have to iterate over records found
8937 8938
      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].
8939 8940 8941
     */ 
    DBUG_PRINT("info",("non-unique index, scanning it to find matching record")); 

8942
    while (record_compare(table))
8943
    {
8944 8945 8946 8947 8948
      /*
        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.
8949 8950 8951

        TODO[record format ndb]: Remove this code once NDB returns the
        correct record format.
8952
      */
8953 8954
      if (table->s->null_bytes > 0)
      {
8955
        table->record[0][table->s->null_bytes - 1]|=
8956 8957 8958
          256U - (1U << table->s->last_null_bit_pos);
      }

8959
      while ((error= table->file->index_next(table->record[0])))
8960
      {
8961 8962 8963
        /* We just skip records that has already been deleted */
        if (error == HA_ERR_RECORD_DELETED)
          continue;
8964 8965
        DBUG_PRINT("info",("no record matching the given row found"));
        table->file->print_error(error, MYF(0));
8966
        table->file->ha_index_end();
8967
        goto err;
8968 8969
      }
    }
8970 8971 8972 8973 8974

    /*
      Have to restart the scan to be able to fetch the next row.
    */
    table->file->ha_index_end();
8975 8976 8977
  }
  else
  {
8978 8979
    DBUG_PRINT("info",("locating record using table scan (rnd_next)"));

8980
    int restart_count= 0; // Number of times scanning has restarted from top
8981 8982 8983

    /* We don't have a key: search the table using rnd_next() */
    if ((error= table->file->ha_rnd_init(1)))
8984 8985 8986 8987
    {
      DBUG_PRINT("info",("error initializing table scan"
                         " (ha_rnd_init returns %d)",error));
      table->file->print_error(error, MYF(0));
8988
      goto err;
8989
    }
8990 8991

    /* Continue until we find the right record or have made a full loop */
8992 8993
    do
    {
8994
  restart_rnd_next:
8995
      error= table->file->rnd_next(table->record[0]);
8996

8997
      DBUG_PRINT("info", ("error: %s", HA_ERR(error)));
8998
      switch (error) {
8999

9000
      case 0:
9001
        break;
9002

9003 9004 9005 9006 9007 9008 9009
      /*
        If the record was deleted, we pick the next one without doing
        any comparisons.
      */
      case HA_ERR_RECORD_DELETED:
        goto restart_rnd_next;

9010
      case HA_ERR_END_OF_FILE:
9011 9012 9013
        if (++restart_count < 2)
          table->file->ha_rnd_init(1);
        break;
9014 9015

      default:
9016 9017 9018
        DBUG_PRINT("info", ("Failed to get next record"
                            " (rnd_next returns %d)",error));
        table->file->print_error(error, MYF(0));
9019
        table->file->ha_rnd_end();
9020
        goto err;
9021 9022
      }
    }
9023
    while (restart_count < 2 && record_compare(table));
9024 9025 9026 9027 9028
    
    /* 
      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
     */
9029

9030 9031 9032
    /*
      Have to restart the scan to be able to fetch the next row.
    */
9033 9034
    if (restart_count == 2)
      DBUG_PRINT("info", ("Record not found"));
9035 9036
    else
      DBUG_DUMP("record found", table->record[0], table->s->reclength);
9037 9038
    table->file->ha_rnd_end();

9039
    DBUG_ASSERT(error == HA_ERR_END_OF_FILE || error == 0);
9040
    goto err;
9041
  }
9042 9043
ok:
  table->default_column_bitmaps();
9044
  DBUG_RETURN(0);
9045 9046 9047 9048

err:
  table->default_column_bitmaps();
  DBUG_RETURN(error);
9049
}
9050

9051 9052 9053 9054 9055 9056 9057 9058 9059 9060 9061 9062 9063 9064 9065 9066 9067 9068 9069 9070 9071 9072 9073 9074 9075 9076 9077 9078 9079
#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)

9080 9081 9082 9083 9084
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)
9085 9086
  {
    /*
9087
      We don't need to allocate any memory for m_key since it is not used.
9088 9089 9090 9091
    */
    return 0;
  }

9092
  if (m_table->s->keys > 0)
9093
  {
9094 9095 9096 9097
    // 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;
9098
  }
9099
  return 0;
9100 9101
}

9102 9103 9104
int 
Delete_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const, 
                                               int error)
9105 9106
{
  /*error= ToDo:find out what this should really be, this triggers close_scan in nbd, returning error?*/
9107 9108
  m_table->file->ha_index_or_rnd_end();
  my_free(m_key, MYF(MY_ALLOW_ZERO_PTR));
9109
  m_key= NULL;
9110 9111 9112 9113

  return error;
}

9114
int Delete_rows_log_event::do_exec_row(const Relay_log_info *const rli)
9115
{
9116
  int error;
9117
  DBUG_ASSERT(m_table != NULL);
9118

9119
  if (!(error= find_row(rli))) 
9120 9121
  { 
    /*
9122
      Delete the record found, located in record[0]
9123
    */
9124
    error= m_table->file->ha_delete_row(m_table->record[0]);
9125
  }
9126 9127 9128 9129 9130 9131 9132 9133 9134
  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)
{
9135
  Rows_log_event::print_helper(file, print_event_info, "Delete_rows");
9136 9137 9138 9139 9140 9141 9142 9143 9144 9145 9146 9147 9148
}
#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,
9149 9150 9151 9152 9153 9154 9155 9156 9157 9158 9159 9160
                                             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,
9161 9162 9163
                                             bool is_transactional)
: Rows_log_event(thd_arg, tbl_arg, tid, cols, is_transactional)
{
9164 9165 9166 9167 9168
  init(cols);
}

void Update_rows_log_event::init(MY_BITMAP const *cols)
{
9169
  /* if bitmap_init fails, caught in is_valid() */
9170 9171
  if (likely(!bitmap_init(&m_cols_ai,
                          m_width <= sizeof(m_bitbuf_ai)*8 ? m_bitbuf_ai : NULL,
9172
                          m_width,
9173 9174 9175 9176
                          false)))
  {
    /* Cols can be zero if this is a dummy binrows event */
    if (likely(cols != NULL))
9177
    {
9178
      memcpy(m_cols_ai.bitmap, cols->bitmap, no_bytes_in_map(cols));
9179 9180
      create_last_word_mask(&m_cols_ai);
    }
9181
  }
9182 9183 9184
}
#endif /* !defined(MYSQL_CLIENT) */

9185 9186 9187 9188 9189 9190 9191 9192 9193

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().
}


9194 9195 9196 9197 9198 9199 9200 9201 9202 9203 9204 9205 9206 9207 9208
/*
  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)

9209 9210 9211 9212
int 
Update_rows_log_event::do_before_row_operations(const Slave_reporting_capability *const)
{
  if (m_table->s->keys > 0)
9213
  {
9214 9215 9216 9217
    // 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;
9218 9219
  }

9220
  m_table->timestamp_field_type= TIMESTAMP_NO_AUTO_SET;
9221

9222
  return 0;
9223 9224
}

9225 9226 9227
int 
Update_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const, 
                                               int error)
9228 9229
{
  /*error= ToDo:find out what this should really be, this triggers close_scan in nbd, returning error?*/
9230 9231
  m_table->file->ha_index_or_rnd_end();
  my_free(m_key, MYF(MY_ALLOW_ZERO_PTR)); // Free for multi_malloc
9232
  m_key= NULL;
9233 9234 9235 9236

  return error;
}

9237
int 
9238
Update_rows_log_event::do_exec_row(const Relay_log_info *const rli)
9239
{
9240
  DBUG_ASSERT(m_table != NULL);
9241

9242 9243
  int error= find_row(rli); 
  if (error)
9244 9245 9246 9247 9248 9249 9250
  {
    /*
      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);
9251
    return error;
9252
  }
9253

9254
  /*
9255
    This is the situation after locating BI:
9256

9257 9258 9259
    ===|=== before image ====|=== after image ===|===
       ^                     ^
       m_curr_row            m_curr_row_end
9260

9261 9262 9263
    BI found in the table is stored in record[0]. We copy it to record[1]
    and unpack AI to record[0].
   */
9264

9265
  store_record(m_table,record[1]);
9266

9267 9268
  bool abort_on_warnings= (rli->sql_thd->variables.sql_mode &
                           (MODE_STRICT_TRANS_TABLES | MODE_STRICT_ALL_TABLES));
9269
  m_curr_row= m_curr_row_end;
9270 9271 9272
  /* this also updates m_curr_row_end */
  if ((error= unpack_current_row(rli, abort_on_warnings)))
    return error;
9273

9274
  /*
9275
    Now we have the right row to update.  The old row (the one we're
9276
    looking for) is in record[1] and the new row is in record[0].
9277
  */
9278 9279 9280 9281 9282 9283 9284 9285 9286 9287 9288
#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]);
9289 9290
  if (error == HA_ERR_RECORD_IS_THE_SAME)
    error= 0;
9291 9292 9293

  return error;
}
9294

9295 9296 9297 9298 9299 9300
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Update_rows_log_event::print(FILE *file,
				  PRINT_EVENT_INFO* print_event_info)
{
9301
  Rows_log_event::print_helper(file, print_event_info, "Update_rows");
9302 9303 9304
}
#endif

9305 9306 9307 9308 9309 9310 9311 9312 9313 9314 9315 9316 9317 9318

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));

9319 9320 9321 9322 9323 9324 9325
  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().
9326
    m_incident= INCIDENT_NONE;
9327 9328 9329
    DBUG_VOID_RETURN;
  }
  m_incident= static_cast<Incident>(incident_number);
9330 9331
  char const *ptr= buf + common_header_len + post_header_len;
  char const *const str_end= buf + event_len;
unknown's avatar
unknown committed
9332 9333
  uint8 len= 0;                   // Assignment to keep compiler happy
  const char *str= NULL;          // Assignment to keep compiler happy
9334 9335 9336 9337 9338 9339 9340 9341 9342 9343 9344 9345 9346 9347 9348 9349 9350 9351 9352 9353 9354 9355 9356 9357 9358 9359 9360 9361 9362 9363 9364
  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];
9365
  size_t bytes;
9366 9367 9368 9369 9370 9371 9372 9373 9374 9375 9376 9377 9378 9379 9380 9381 9382 9383 9384 9385 9386
  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);
9387
  my_b_printf(&cache, "\n# Incident: %s\nRELOAD DATABASE; # Shall generate syntax error\n", description());
9388 9389 9390 9391 9392
}
#endif

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
int
9393
Incident_log_event::do_apply_event(Relay_log_info const *rli)
9394
{
9395
  DBUG_ENTER("Incident_log_event::do_apply_event");
9396 9397 9398 9399
  rli->report(ERROR_LEVEL, ER_SLAVE_INCIDENT,
              ER(ER_SLAVE_INCIDENT),
              description(),
              m_message.length > 0 ? m_message.str : "<none>");
9400 9401 9402 9403 9404 9405 9406 9407 9408
  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));
9409
  uchar buf[sizeof(int16)];
9410 9411 9412 9413 9414 9415 9416 9417
  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");
9418
  DBUG_RETURN(write_str(file, m_message.str, (uint) m_message.length));
9419
}
9420 9421 9422 9423 9424 9425 9426 9427 9428 9429 9430 9431 9432 9433 9434 9435 9436 9437 9438 9439 9440 9441 9442 9443 9444 9445 9446 9447 9448 9449 9450


#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()
  :flags2_inited(0), sql_mode_inited(0),
   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
9451 9452 9453 9454 9455 9456 9457 9458 9459 9460 9461 9462 9463


#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