log_event.cc 298 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 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213
    /*
      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)
    {
      IF_DBUG({
          int new_event_type=
            description_event->event_type_permutation[event_type];
          DBUG_PRINT("info",
                     ("converting event type %d to %d (%s)",
                      event_type, new_event_type,
                      get_type_str((Log_event_type)new_event_type)));
        });
      event_type= 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 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 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 1903 1904 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
      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;
  char typestr[64]= "";
  
  value+= (m_width + 7) / 8;
  
  my_b_printf(file, "%s", prefix);
  
  for (size_t i= 0; i < td->size(); i ++)
  {
    int is_null= (null_bits[i / 8] >> (i % 8))  & 0x01;

    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");
  }
  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,
1956
                                  &m_cols, value,
1957 1958 1959 1960 1961 1962 1963 1964
                                  (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,
1965
                                      &m_cols_ai, value,
1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982
                                      (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

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

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

unknown's avatar
unknown committed
1999 2000 2001 2002
  if (base64_encode(ptr, (size_t) size, tmp_str))
  {
    DBUG_ASSERT(0);
  }
2003

2004 2005 2006 2007
  if (print_event_info->base64_output_mode != BASE64_OUTPUT_DECODE_ROWS)
  {
    if (my_b_tell(file) == 0)
      my_b_printf(file, "\nBINLOG '\n");
2008

2009
    my_b_printf(file, "%s\n", tmp_str);
2010

2011 2012 2013 2014
    if (!more)
      my_b_printf(file, "'%s\n", print_event_info->delimiter);
  }
  
2015 2016 2017 2018 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
  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;
    }
  }
    
2049
  my_free(tmp_str, MYF(0));
2050
  DBUG_VOID_RETURN;
2051 2052 2053
}


unknown's avatar
unknown committed
2054
/*
2055
  Log_event::print_timestamp()
unknown's avatar
unknown committed
2056
*/
2057

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

2071 2072 2073 2074 2075 2076 2077 2078
  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
2079 2080
}

unknown's avatar
unknown committed
2081
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
2082 2083


2084 2085 2086 2087 2088 2089 2090 2091 2092 2093
#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
2094
/**************************************************************************
unknown's avatar
unknown committed
2095
	Query_log_event methods
unknown's avatar
unknown committed
2096
**************************************************************************/
2097

unknown's avatar
SCRUM  
unknown committed
2098
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2099

unknown's avatar
unknown committed
2100
/**
2101 2102 2103 2104
  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
2105 2106
  @todo
    show the catalog ??
unknown's avatar
unknown committed
2107
*/
2108

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

2133
#ifndef MYSQL_CLIENT
2134

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


unknown's avatar
unknown committed
2154 2155
/**
  Query_log_event::write().
unknown's avatar
unknown committed
2156

unknown's avatar
unknown committed
2157
  @note
2158 2159 2160
    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
2161
*/
2162

2163
bool Query_log_event::write(IO_CACHE* file)
unknown's avatar
unknown committed
2164
{
2165 2166
  uchar buf[QUERY_HEADER_LEN + MAX_SIZE_LOG_EVENT_STATUS];
  uchar *start, *start_of_status;
2167
  ulong event_length;
unknown's avatar
unknown committed
2168

2169
  if (!query)
2170 2171
    return 1;                                   // Something wrong with event

unknown's avatar
unknown committed
2172 2173 2174 2175 2176
  /*
    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.
2177
    Now imagine we (write()) are called by the slave SQL thread (we are
unknown's avatar
unknown committed
2178 2179 2180 2181 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
    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);
2210 2211 2212 2213
  int4store(buf + Q_EXEC_TIME_OFFSET, exec_time);
  buf[Q_DB_LEN_OFFSET] = (char) db_len;
  int2store(buf + Q_ERR_CODE_OFFSET, error_code);

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

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

unknown's avatar
unknown committed
2329
/**
2330 2331 2332 2333 2334 2335 2336 2337 2338
  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)
{
}

2339

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

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

2378
  error_code= errcode;
He Zhenxing's avatar
He Zhenxing committed
2379

2380
  time(&end_time);
2381
  exec_time = (ulong) (end_time  - thd_arg->start_time);
2382 2383 2384 2385
  /**
    @todo this means that if we have no catalog, then it is replicated
    as an existing catalog of length zero. is that safe? /sven
  */
2386
  catalog_len = (catalog) ? (uint32) strlen(catalog) : 0;
2387
  /* status_vars_len is set just before writing the event */
2388
  db_len = (db) ? (uint32) strlen(db) : 0;
2389 2390 2391
  if (thd_arg->variables.collation_database != thd_arg->db_charset)
    charset_database_number= thd_arg->variables.collation_database->number;
  
2392 2393
  /*
    If we don't use flags2 for anything else than options contained in
2394
    thd_arg->options, it would be more efficient to flags2=thd_arg->options
2395
    (OPTIONS_WRITTEN_TO_BIN_LOG would be used only at reading time).
2396 2397 2398
    But it's likely that we don't want to use 32 bits for 3 bits; in the future
    we will probably want to reclaim the 29 bits. So we need the &.
  */
unknown's avatar
unknown committed
2399
  flags2= (uint32) (thd_arg->options & OPTIONS_WRITTEN_TO_BIN_LOG);
2400 2401 2402
  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);
2403
  DBUG_ASSERT(thd_arg->variables.character_set_client->mbminlen == 1);
2404 2405 2406
  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);
2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418
  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
2419 2420
  DBUG_PRINT("info",("Query_log_event has flags2: %lu  sql_mode: %lu",
                     (ulong) flags2, sql_mode));
2421
}
unknown's avatar
unknown committed
2422
#endif /* MYSQL_CLIENT */
2423

unknown's avatar
unknown committed
2424

2425 2426
/* 2 utility functions for the next method */

2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449
/**
   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>.
2450
*/
2451 2452 2453 2454 2455
static int
get_str_len_and_pointer(const Log_event::Byte **src,
                        const char **dst,
                        uint *len,
                        const Log_event::Byte *end)
2456
{
2457 2458 2459 2460 2461 2462
  if (*src >= end)
    return -1;       // Will be UINT_MAX in two-complement arithmetics
  uint length= **src;
  if (length > 0)
  {
    if (*src + length >= end)
2463
      return *src + length - end + 1;       // Number of bytes missing
2464 2465 2466
    *dst= (char *)*src + 1;                    // Will be copied later
  }
  *len= length;
2467 2468
  *src+= length + 1;
  return 0;
2469 2470
}

2471 2472 2473
static void copy_str_and_move(const char **src, 
                              Log_event::Byte **dst, 
                              uint len)
2474 2475
{
  memcpy(*dst, *src, len);
2476
  *src= (const char *)*dst;
2477 2478 2479 2480
  (*dst)+= len;
  *(*dst)++= 0;
}

2481

2482
#ifndef DBUG_OFF
unknown's avatar
unknown committed
2483 2484 2485 2486
static char const *
code_name(int code)
{
  static char buf[255];
2487 2488 2489 2490 2491 2492 2493 2494 2495 2496
  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";
2497
  case Q_TABLE_MAP_FOR_UPDATE_CODE: return "Q_TABLE_MAP_FOR_UPDATE_CODE";
2498 2499 2500 2501
  }
  sprintf(buf, "CODE#%d", code);
  return buf;
}
2502
#endif
2503

2504 2505 2506 2507 2508 2509 2510
/**
   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.
 */
2511 2512 2513 2514 2515 2516 2517 2518 2519
#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;                               \
    }                                                 \
2520 2521
  } while (0)

2522

unknown's avatar
unknown committed
2523
/**
2524
  This is used by the SQL slave thread to prepare the event before execution.
unknown's avatar
unknown committed
2525
*/
2526
Query_log_event::Query_log_event(const char* buf, uint event_len,
2527 2528
                                 const Format_description_log_event
                                 *description_event,
unknown's avatar
unknown committed
2529
                                 Log_event_type event_type)
2530
  :Log_event(buf, description_event), data_buf(0), query(NullS),
2531
   db(NullS), catalog_len(0), status_vars_len(0),
2532
   flags2_inited(0), sql_mode_inited(0), charset_inited(0),
2533
   auto_increment_increment(1), auto_increment_offset(1),
2534 2535
   time_zone_len(0), lc_time_names_number(0), charset_database_number(0),
   table_map_for_update(0)
unknown's avatar
unknown committed
2536 2537
{
  ulong data_len;
2538 2539
  uint32 tmp;
  uint8 common_header_len, post_header_len;
2540 2541
  Log_event::Byte *start;
  const Log_event::Byte *end;
2542
  bool catalog_nz= 1;
2543 2544 2545
  DBUG_ENTER("Query_log_event::Query_log_event(char*,...)");

  common_header_len= description_event->common_header_len;
unknown's avatar
unknown committed
2546
  post_header_len= description_event->post_header_len[event_type-1];
unknown's avatar
unknown committed
2547
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
2548 2549 2550 2551 2552 2553 2554 2555 2556 2557 2558 2559 2560 2561
                     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);
2562
  db_len = (uint)buf[Q_DB_LEN_OFFSET]; // TODO: add a check of all *_len vars
2563 2564 2565 2566 2567 2568 2569 2570 2571
  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)
2572
  {
2573
    status_vars_len= uint2korr(buf + Q_STATUS_VARS_LEN_OFFSET);
2574 2575 2576 2577 2578 2579
    /*
      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.
    */
2580
    if (status_vars_len > min(data_len, MAX_SIZE_LOG_EVENT_STATUS))
2581
    {
unknown's avatar
unknown committed
2582
      DBUG_PRINT("info", ("status_vars_len (%u) > data_len (%lu); query= 0",
2583
                          status_vars_len, data_len));
2584 2585 2586
      query= 0;
      DBUG_VOID_RETURN;
    }
2587 2588 2589 2590
    data_len-= status_vars_len;
    DBUG_PRINT("info", ("Query_log_event has status_vars_len: %u",
                        (uint) status_vars_len));
    tmp-= 2;
2591
  }
unknown's avatar
unknown committed
2592 2593 2594 2595 2596 2597
  /*
    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...)
  */

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

2723 2724 2725 2726 2727 2728 2729
  /**
    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
  */

2730
  /* A 2nd variable part; this is common to all versions */ 
2731
  memcpy((char*) start, end, data_len);          // Copy db and query
2732
  start[data_len]= '\0';              // End query with \0 (For safetly)
2733 2734
  db= (char *)start;
  query= (char *)(start + db_len + 1);
2735 2736
  q_len= data_len - db_len -1;
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
2737 2738
}

2739

2740
#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
2741 2742 2743 2744 2745 2746
/**
  Query_log_event::print().

  @todo
    print the catalog ??
*/
2747
void Query_log_event::print_query_header(IO_CACHE* file,
unknown's avatar
unknown committed
2748
					 PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
2749
{
2750
  // TODO: print the catalog ??
2751
  char buff[40],*end;				// Enough for SET TIMESTAMP
2752 2753 2754
  bool different_db= 1;
  uint32 tmp;

unknown's avatar
unknown committed
2755
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
2756
  {
2757 2758 2759 2760
    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
2761 2762
  }

unknown's avatar
unknown committed
2763
  if (!(flags & LOG_EVENT_SUPPRESS_USE_F) && db)
2764
  {
2765 2766
    different_db= memcmp(print_event_info->db, db, db_len + 1);
    if (different_db)
unknown's avatar
unknown committed
2767
      memcpy(print_event_info->db, db, db_len + 1);
unknown's avatar
unknown committed
2768
    if (db[0] && different_db) 
unknown's avatar
unknown committed
2769
      my_b_printf(file, "use %s%s\n", db, print_event_info->delimiter);
2770
  }
2771

2772
  end=int10_to_str((long) when, strmov(buff,"SET TIMESTAMP="),10);
2773
  end= strmov(end, print_event_info->delimiter);
2774
  *end++='\n';
2775
  my_b_write(file, (uchar*) buff, (uint) (end-buff));
2776 2777 2778 2779 2780
  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
2781
    my_b_printf(file,"SET @@session.pseudo_thread_id=%lu%s\n",
2782 2783 2784 2785 2786
                short_form ? 999999999 : (ulong)thread_id,
                print_event_info->delimiter);
    print_event_info->thread_id= thread_id;
    print_event_info->thread_id_printed= 1;
  }
2787

2788
  /*
2789 2790 2791
    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).
2792 2793 2794 2795
  */
  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
2796
    if (likely(print_event_info->flags2_inited)) 
2797
      /* All bits which have changed */
unknown's avatar
unknown committed
2798
      tmp= (print_event_info->flags2) ^ flags2;
2799 2800
    else /* that's the first Query event we read */
    {
unknown's avatar
unknown committed
2801
      print_event_info->flags2_inited= 1;
2802 2803 2804 2805 2806 2807
      tmp= ~((uint32)0); /* all bits have changed */
    }

    if (unlikely(tmp)) /* some bits have changed */
    {
      bool need_comma= 0;
2808
      my_b_printf(file, "SET ");
2809
      print_set_option(file, tmp, OPTION_NO_FOREIGN_KEY_CHECKS, ~flags2,
2810
                       "@@session.foreign_key_checks", &need_comma);
2811
      print_set_option(file, tmp, OPTION_AUTO_IS_NULL, flags2,
2812
                       "@@session.sql_auto_is_null", &need_comma);
2813
      print_set_option(file, tmp, OPTION_RELAXED_UNIQUE_CHECKS, ~flags2,
2814 2815 2816
                       "@@session.unique_checks", &need_comma);
      print_set_option(file, tmp, OPTION_NOT_AUTOCOMMIT, ~flags2,
                       "@@session.autocommit", &need_comma);
unknown's avatar
unknown committed
2817
      my_b_printf(file,"%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
2818
      print_event_info->flags2= flags2;
2819 2820 2821 2822
    }
  }

  /*
2823 2824 2825 2826 2827 2828 2829 2830 2831 2832
    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.
2833 2834
  */

2835 2836 2837
  if (likely(sql_mode_inited) &&
      (unlikely(print_event_info->sql_mode != sql_mode ||
                !print_event_info->sql_mode_inited)))
2838
  {
2839 2840 2841 2842
    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;
2843
  }
unknown's avatar
unknown committed
2844 2845
  if (print_event_info->auto_increment_increment != auto_increment_increment ||
      print_event_info->auto_increment_offset != auto_increment_offset)
2846
  {
unknown's avatar
unknown committed
2847 2848 2849
    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
2850 2851
    print_event_info->auto_increment_increment= auto_increment_increment;
    print_event_info->auto_increment_offset=    auto_increment_offset;
2852 2853
  }

2854 2855
  /* TODO: print the catalog when we feature SET CATALOG */

2856 2857 2858
  if (likely(charset_inited) &&
      (unlikely(!print_event_info->charset_inited ||
                bcmp((uchar*) print_event_info->charset, (uchar*) charset, 6))))
2859
  {
2860 2861
    CHARSET_INFO *cs_info= get_charset(uint2korr(charset), MYF(MY_WME));
    if (cs_info)
2862
    {
2863 2864 2865
      /* for mysql client */
      my_b_printf(file, "/*!\\C %s */%s\n",
                  cs_info->csname, print_event_info->delimiter);
2866
    }
2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877
    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;
2878
  }
2879 2880
  if (time_zone_len)
  {
2881 2882
    if (bcmp((uchar*) print_event_info->time_zone_str,
             (uchar*) time_zone_str, time_zone_len+1))
2883
    {
unknown's avatar
unknown committed
2884 2885
      my_b_printf(file,"SET @@session.time_zone='%s'%s\n",
                  time_zone_str, print_event_info->delimiter);
unknown's avatar
unknown committed
2886
      memcpy(print_event_info->time_zone_str, time_zone_str, time_zone_len+1);
2887 2888
    }
  }
2889 2890
  if (lc_time_names_number != print_event_info->lc_time_names_number)
  {
unknown's avatar
unknown committed
2891 2892
    my_b_printf(file, "SET @@session.lc_time_names=%d%s\n",
                lc_time_names_number, print_event_info->delimiter);
2893 2894
    print_event_info->lc_time_names_number= lc_time_names_number;
  }
2895 2896 2897
  if (charset_database_number != print_event_info->charset_database_number)
  {
    if (charset_database_number)
unknown's avatar
unknown committed
2898 2899
      my_b_printf(file, "SET @@session.collation_database=%d%s\n",
                  charset_database_number, print_event_info->delimiter);
2900
    else
unknown's avatar
unknown committed
2901 2902
      my_b_printf(file, "SET @@session.collation_database=DEFAULT%s\n",
                  print_event_info->delimiter);
2903 2904
    print_event_info->charset_database_number= charset_database_number;
  }
unknown's avatar
unknown committed
2905 2906
}

2907

unknown's avatar
unknown committed
2908
void Query_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
2909
{
2910 2911 2912
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
2913
  my_b_write(&cache, (uchar*) query, q_len);
2914
  my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
2915
}
unknown's avatar
unknown committed
2916
#endif /* MYSQL_CLIENT */
2917

unknown's avatar
unknown committed
2918

unknown's avatar
unknown committed
2919
/*
2920
  Query_log_event::do_apply_event()
unknown's avatar
unknown committed
2921
*/
unknown's avatar
unknown committed
2922

unknown's avatar
SCRUM  
unknown committed
2923
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2924

2925
int Query_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
2926
{
2927
  return do_apply_event(rli, query, q_len);
unknown's avatar
unknown committed
2928 2929 2930
}


unknown's avatar
unknown committed
2931 2932 2933 2934 2935 2936 2937 2938 2939 2940 2941 2942 2943 2944 2945 2946 2947
/**
  @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...
*/
2948
int Query_log_event::do_apply_event(Relay_log_info const *rli,
2949
                                      const char *query_arg, uint32 q_len_arg)
unknown's avatar
unknown committed
2950
{
2951
  LEX_STRING new_db;
unknown's avatar
unknown committed
2952
  int expected_error,actual_error= 0;
2953 2954
  HA_CREATE_INFO db_options;

2955
  /*
2956 2957 2958
    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
2959
    Query_log_event::do_apply_event()). Same for thd->db.  Thank
2960
    you.
2961
  */
2962
  thd->catalog= catalog_len ? (char *) catalog : (char *)"";
2963 2964 2965
  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' */
2966 2967 2968 2969 2970 2971 2972

  /*
    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;
2973 2974
  thd->variables.auto_increment_increment= auto_increment_increment;
  thd->variables.auto_increment_offset=    auto_increment_offset;
unknown's avatar
unknown committed
2975

2976
  /*
2977 2978 2979 2980 2981 2982 2983 2984
    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.
2985
  */
2986
  const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
2987 2988
  DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));

2989
  clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020
  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
  {
    const_cast<Relay_log_info*>(rli)->clear_tables_to_lock();
  }
3021

unknown's avatar
unknown committed
3022 3023 3024 3025 3026 3027 3028
  /*
    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
3029
            ::do_apply_event(), then the companion SET also have so
3030
            we don't need to reset_one_shot_variables().
unknown's avatar
unknown committed
3031
  */
3032 3033 3034
  if (!strncmp(query_arg, "BEGIN", q_len_arg) ||
      !strncmp(query_arg, "COMMIT", q_len_arg) ||
      !strncmp(query_arg, "ROLLBACK", q_len_arg) ||
3035
      rpl_filter->db_ok(thd->db))
3036 3037
  {
    thd->set_time((time_t)when);
3038
    thd->set_query((char*)query_arg, q_len_arg);
unknown's avatar
unknown committed
3039
    VOID(pthread_mutex_lock(&LOCK_thread_count));
3040
    thd->query_id = next_query_id();
3041
    VOID(pthread_mutex_unlock(&LOCK_thread_count));
unknown's avatar
unknown committed
3042
    thd->variables.pseudo_thread_id= thread_id;		// for temp tables
unknown's avatar
unknown committed
3043
    DBUG_PRINT("query",("%s",thd->query));
3044

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

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

3169
compare_errors:
unknown's avatar
unknown committed
3170 3171

     /*
unknown's avatar
unknown committed
3172
      If we expected a non-zero error code, and we don't get the same error
3173
      code, and it should be ignored or is related to a concurrency issue.
unknown's avatar
unknown committed
3174
    */
Marc Alff's avatar
Marc Alff committed
3175
    actual_error= thd->is_error() ? thd->stmt_da->sql_errno() : 0;
3176 3177
    DBUG_PRINT("info",("expected_error: %d  sql_errno: %d",
 		       expected_error, actual_error));
3178 3179
    if ((expected_error && expected_error != actual_error &&
         !concurrency_error_code(expected_error)) &&
3180 3181
 	!ignored_error_code(actual_error) &&
 	!ignored_error_code(expected_error))
unknown's avatar
unknown committed
3182
    {
3183
      rli->report(ERROR_LEVEL, 0,
3184 3185
                      "\
Query caused different errors on master and slave.     \
unknown's avatar
unknown committed
3186
Error on master: '%s' (%d), Error on slave: '%s' (%d). \
unknown's avatar
unknown committed
3187
Default database: '%s'. Query: '%s'",
3188 3189
                      ER_SAFE(expected_error),
                      expected_error,
Marc Alff's avatar
Marc Alff committed
3190
                      actual_error ? thd->stmt_da->message() : "no error",
3191 3192
                      actual_error,
                      print_slave_db_safe(db), query_arg);
3193
      thd->is_slave_error= 1;
unknown's avatar
unknown committed
3194 3195
    }
    /*
3196 3197
      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
3198
    */
3199 3200
    else if ((expected_error == actual_error && 
              !concurrency_error_code(expected_error)) ||
3201
 	     ignored_error_code(actual_error))
unknown's avatar
unknown committed
3202 3203
    {
      DBUG_PRINT("info",("error ignored"));
3204
      clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
3205
      thd->killed= THD::NOT_KILLED;
3206 3207 3208 3209 3210 3211 3212 3213 3214
      /*
        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
3215
    }
3216 3217 3218 3219 3220 3221 3222 3223
    /*
      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
3224 3225
    /*
      Other cases: mostly we expected no error and get one.
unknown's avatar
unknown committed
3226
    */
3227
    else if (thd->is_slave_error || thd->is_fatal_error)
unknown's avatar
unknown committed
3228
    {
3229
      rli->report(ERROR_LEVEL, actual_error,
3230
                      "Error '%s' on query. Default database: '%s'. Query: '%s'",
Marc Alff's avatar
Marc Alff committed
3231
                      (actual_error ? thd->stmt_da->message() :
3232 3233
                       "unexpected success or fatal error"),
                      print_slave_db_safe(thd->db), query_arg);
3234
      thd->is_slave_error= 1;
unknown's avatar
unknown committed
3235
    }
3236 3237 3238 3239 3240 3241 3242 3243 3244

    /*
      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, ...);
3245
      thd->is_slave_error = 1;
3246 3247 3248 3249
      }
      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...
3250

3251 3252 3253 3254 3255 3256 3257
      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
3258 3259
  } /* End of if (db_ok(... */

unknown's avatar
unknown committed
3260
end:
3261 3262 3263 3264 3265 3266
  /*
    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
3267 3268 3269
    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.
3270
  */
unknown's avatar
unknown committed
3271
  thd->catalog= 0;
3272
  thd->set_db(NULL, 0);                 /* will free the current database */
3273
  thd->set_query(NULL, 0);
3274
  DBUG_PRINT("info", ("end: query= 0"));
unknown's avatar
unknown committed
3275
  close_thread_tables(thd);      
3276 3277 3278 3279 3280 3281 3282 3283 3284 3285
  /*
    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
3286
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
3287
  return thd->is_slave_error;
3288 3289
}

3290
int Query_log_event::do_update_pos(Relay_log_info *rli)
3291
{
3292
  /*
3293 3294 3295
    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.
3296
  */
3297 3298 3299 3300 3301 3302 3303
  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
3304
}
3305 3306


3307 3308 3309 3310 3311 3312 3313 3314 3315 3316 3317 3318 3319 3320 3321 3322 3323 3324 3325 3326 3327 3328 3329 3330
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
3331
#endif
unknown's avatar
unknown committed
3332

unknown's avatar
unknown committed
3333

unknown's avatar
unknown committed
3334
/**************************************************************************
3335
	Start_log_event_v3 methods
unknown's avatar
unknown committed
3336
**************************************************************************/
3337

3338
#ifndef MYSQL_CLIENT
3339 3340
Start_log_event_v3::Start_log_event_v3()
  :Log_event(), created(0), binlog_version(BINLOG_VERSION),
3341
   dont_set_created(0)
3342 3343 3344 3345 3346
{
  memcpy(server_version, ::server_version, ST_SERVER_VER_LEN);
}
#endif

unknown's avatar
unknown committed
3347
/*
3348
  Start_log_event_v3::pack_info()
unknown's avatar
unknown committed
3349
*/
3350

unknown's avatar
SCRUM  
unknown committed
3351
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3352
void Start_log_event_v3::pack_info(Protocol *protocol)
unknown's avatar
unknown committed
3353
{
3354 3355 3356 3357
  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
3358 3359
  pos= int10_to_str(binlog_version, pos, 10);
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
unknown's avatar
unknown committed
3360
}
unknown's avatar
SCRUM  
unknown committed
3361
#endif
3362 3363


unknown's avatar
unknown committed
3364
/*
3365
  Start_log_event_v3::print()
unknown's avatar
unknown committed
3366
*/
unknown's avatar
unknown committed
3367 3368

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
3369
void Start_log_event_v3::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
3370
{
3371 3372 3373 3374 3375
  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
3376
  if (!print_event_info->short_form)
3377
  {
3378 3379 3380 3381
    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);
3382
    if (created)
3383 3384
      my_b_printf(&cache," at startup");
    my_b_printf(&cache, "\n");
3385
    if (flags & LOG_EVENT_BINLOG_IN_USE_F)
3386 3387
      my_b_printf(&cache, "# Warning: this binlog is either in use or was not "
                  "closed properly.\n");
3388
  }
3389
  if (!is_artificial_event() && created)
3390
  {
3391
#ifdef WHEN_WE_HAVE_THE_RESET_CONNECTION_SQL_COMMAND
3392 3393 3394 3395 3396 3397
    /*
      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
3398
    my_b_printf(&cache,"RESET CONNECTION%s\n", print_event_info->delimiter);
3399
#else
unknown's avatar
unknown committed
3400
    my_b_printf(&cache,"ROLLBACK%s\n", print_event_info->delimiter);
3401
#endif
3402
  }
3403 3404 3405 3406
  if (temp_buf &&
      print_event_info->base64_output_mode != BASE64_OUTPUT_NEVER &&
      !print_event_info->short_form)
  {
3407 3408
    if (print_event_info->base64_output_mode != BASE64_OUTPUT_DECODE_ROWS)
      my_b_printf(&cache, "BINLOG '\n");
3409 3410 3411
    print_base64(&cache, print_event_info, FALSE);
    print_event_info->printed_fd_event= TRUE;
  }
3412
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
3413
}
unknown's avatar
unknown committed
3414
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
3415

unknown's avatar
unknown committed
3416
/*
3417
  Start_log_event_v3::Start_log_event_v3()
unknown's avatar
unknown committed
3418
*/
3419

3420
Start_log_event_v3::Start_log_event_v3(const char* buf,
3421 3422
                                       const Format_description_log_event
                                       *description_event)
3423
  :Log_event(buf, description_event)
3424
{
3425 3426
  buf+= description_event->common_header_len;
  binlog_version= uint2korr(buf+ST_BINLOG_VER_OFFSET);
3427 3428
  memcpy(server_version, buf+ST_SERVER_VER_OFFSET,
	 ST_SERVER_VER_LEN);
unknown's avatar
unknown committed
3429 3430
  // prevent overrun if log is corrupted on disk
  server_version[ST_SERVER_VER_LEN-1]= 0;
3431
  created= uint4korr(buf+ST_CREATED_OFFSET);
3432
  dont_set_created= 1;
unknown's avatar
unknown committed
3433 3434
}

3435

unknown's avatar
unknown committed
3436
/*
3437
  Start_log_event_v3::write()
unknown's avatar
unknown committed
3438
*/
3439

3440
#ifndef MYSQL_CLIENT
3441
bool Start_log_event_v3::write(IO_CACHE* file)
3442
{
3443
  char buff[START_V3_HEADER_LEN];
3444 3445
  int2store(buff + ST_BINLOG_VER_OFFSET,binlog_version);
  memcpy(buff + ST_SERVER_VER_OFFSET,server_version,ST_SERVER_VER_LEN);
3446 3447
  if (!dont_set_created)
    created= when= get_time();
3448
  int4store(buff + ST_CREATED_OFFSET,created);
3449
  return (write_header(file, sizeof(buff)) ||
3450
          my_b_safe_write(file, (uchar*) buff, sizeof(buff)));
3451
}
3452
#endif
3453

3454

unknown's avatar
unknown committed
3455
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3456

unknown's avatar
unknown committed
3457 3458
/**
  Start_log_event_v3::do_apply_event() .
3459 3460
  The master started

unknown's avatar
unknown committed
3461
    IMPLEMENTATION
unknown's avatar
unknown committed
3462
    - To handle the case where the master died without having time to write
unknown's avatar
unknown committed
3463 3464 3465
    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).
3466

unknown's avatar
unknown committed
3467
  @todo
3468
    - Remove all active user locks.
unknown's avatar
unknown committed
3469 3470 3471 3472
    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
3473 3474
*/

3475
int Start_log_event_v3::do_apply_event(Relay_log_info const *rli)
3476
{
3477
  DBUG_ENTER("Start_log_event_v3::do_apply_event");
unknown's avatar
unknown committed
3478 3479
  switch (binlog_version)
  {
3480 3481 3482 3483 3484 3485 3486
  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
3487
    */
3488 3489 3490 3491 3492
    if (created)
    {
      close_temporary_tables(thd);
      cleanup_load_tmpdir();
    }
3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503
    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
3504 3505
    break;

3506
    /*
unknown's avatar
unknown committed
3507 3508
       Now the older formats; in that case load_tmpdir is cleaned up by the I/O
       thread.
unknown's avatar
unknown committed
3509
    */
3510
  case 1:
3511
    if (strncmp(rli->relay_log.description_event_for_exec->server_version,
3512 3513 3514 3515 3516 3517 3518 3519
                "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
3520
    /*
3521 3522 3523
      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
3524 3525 3526 3527
    */
    break;
  default:
    /* this case is impossible */
3528
    DBUG_RETURN(1);
unknown's avatar
unknown committed
3529
  }
3530
  DBUG_RETURN(0);
3531
}
unknown's avatar
unknown committed
3532
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
3533

3534 3535 3536 3537
/***************************************************************************
       Format_description_log_event methods
****************************************************************************/

unknown's avatar
unknown committed
3538
/**
3539 3540 3541 3542 3543 3544
  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
3545 3546 3547 3548 3549 3550 3551

  @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.
3552 3553 3554
*/

Format_description_log_event::
3555
Format_description_log_event(uint8 binlog_ver, const char* server_ver)
3556
  :Start_log_event_v3(), event_type_permutation(0)
3557 3558 3559 3560 3561
{
  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
3562 3563
    DBUG_EXECUTE_IF("pretend_version_50034_in_binlog",
                    strmov(server_version, "5.0.34"););
3564 3565 3566 3567
    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),
3568 3569
                                       MYF(0));

3570 3571 3572 3573 3574 3575 3576
    /*
      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)
    {
3577 3578 3579 3580 3581 3582
      // Allows us to sanity-check that all events initialized their
      // events (see the end of this 'if' block).
      IF_DBUG(memset(post_header_len, 255,
                     number_of_event_types*sizeof(uint8)););

      /* Note: all event types must explicitly fill in their lengths here. */
3583 3584
      post_header_len[START_EVENT_V3-1]= START_V3_HEADER_LEN;
      post_header_len[QUERY_EVENT-1]= QUERY_HEADER_LEN;
3585
      post_header_len[STOP_EVENT-1]= STOP_HEADER_LEN;
3586
      post_header_len[ROTATE_EVENT-1]= ROTATE_HEADER_LEN;
3587
      post_header_len[INTVAR_EVENT-1]= INTVAR_HEADER_LEN;
3588
      post_header_len[LOAD_EVENT-1]= LOAD_HEADER_LEN;
3589
      post_header_len[SLAVE_EVENT-1]= SLAVE_HEADER_LEN;
3590 3591 3592 3593
      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;
3594 3595 3596
      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;
3597
      post_header_len[FORMAT_DESCRIPTION_EVENT-1]= FORMAT_DESCRIPTION_HEADER_LEN;
3598 3599 3600 3601 3602 3603 3604 3605 3606 3607 3608 3609 3610
      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;

3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629
      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;);
3630
      post_header_len[INCIDENT_EVENT-1]= INCIDENT_HEADER_LEN;
3631 3632 3633 3634 3635 3636 3637

      // Sanity-check that all post header lengths are initialized.
      IF_DBUG({
          int i;
          for (i=0; i<number_of_event_types; i++)
            assert(post_header_len[i] != 255);
        });
3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651
    }
    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 :
3652
      LOG_EVENT_MINIMAL_HEADER_LEN;
3653 3654 3655 3656 3657 3658 3659 3660 3661
    /*
      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),
3662
                                       MYF(0));
3663 3664 3665 3666 3667 3668 3669 3670 3671 3672 3673 3674 3675 3676 3677 3678 3679 3680 3681 3682 3683 3684
    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
3685
  calc_server_version_split();
3686 3687 3688
}


unknown's avatar
unknown committed
3689
/**
3690 3691 3692 3693
  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
3694
  post-header starts.
unknown's avatar
unknown committed
3695

3696 3697 3698 3699 3700 3701
  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
3702

3703 3704 3705 3706 3707 3708 3709 3710 3711
  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*
3712
                             description_event)
3713
  :Start_log_event_v3(buf, description_event), event_type_permutation(0)
3714 3715 3716 3717 3718 3719 3720 3721
{
  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",
3722
                      common_header_len, number_of_event_types));
3723
  /* If alloc fails, we'll detect it in is_valid() */
3724
  post_header_len= (uint8*) my_memdup((uchar*)buf+ST_COMMON_HEADER_LEN_OFFSET+1,
3725
                                      number_of_event_types*
3726
                                      sizeof(*post_header_len), MYF(0));
unknown's avatar
unknown committed
3727
  calc_server_version_split();
3728 3729 3730 3731 3732 3733 3734 3735 3736 3737

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

3738 3739 3740 3741 3742 3743 3744 3745 3746 3747 3748 3749 3750 3751 3752 3753 3754 3755 3756 3757 3758 3759 3760 3761 3762 3763 3764 3765 3766 3767 3768 3769 3770 3771 3772 3773 3774 3775 3776 3777 3778 3779 3780
    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.
3781 3782
  */
  if (post_header_len &&
3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794
      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')))
3795 3796 3797 3798 3799 3800 3801 3802 3803 3804 3805 3806 3807 3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 3822 3823 3824 3825 3826 3827 3828 3829 3830 3831
  {
    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];
  }
3832 3833 3834
  DBUG_VOID_RETURN;
}

3835
#ifndef MYSQL_CLIENT
3836 3837 3838 3839 3840 3841
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().
  */
3842
  uchar buff[FORMAT_DESCRIPTION_HEADER_LEN];
3843 3844
  int2store(buff + ST_BINLOG_VER_OFFSET,binlog_version);
  memcpy((char*) buff + ST_SERVER_VER_OFFSET,server_version,ST_SERVER_VER_LEN);
3845 3846
  if (!dont_set_created)
    created= when= get_time();
3847
  int4store(buff + ST_CREATED_OFFSET,created);
3848
  buff[ST_COMMON_HEADER_LEN_OFFSET]= LOG_EVENT_HEADER_LEN;
3849
  memcpy((char*) buff+ST_COMMON_HEADER_LEN_OFFSET+1, (uchar*) post_header_len,
3850 3851 3852 3853
         LOG_EVENT_TYPES);
  return (write_header(file, sizeof(buff)) ||
          my_b_safe_write(file, buff, sizeof(buff)));
}
3854
#endif
3855

3856
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3857
int Format_description_log_event::do_apply_event(Relay_log_info const *rli)
3858
{
3859
  DBUG_ENTER("Format_description_log_event::do_apply_event");
3860

unknown's avatar
unknown committed
3861
#ifdef USING_TRANSACTIONS
3862 3863 3864 3865
  /*
    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
3866 3867
    flushing the binlog cache to the binlog. XA guarantees that master has
    rolled back. So we roll back.
3868 3869 3870 3871 3872
    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).
  */
3873
  if (!is_artificial_event() && created && thd->transaction.all.ha_list)
3874
  {
3875
    /* This is not an error (XA is safe), just an information */
3876 3877 3878 3879 3880
    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."); 
3881
    const_cast<Relay_log_info*>(rli)->cleanup_context(thd, 1);
3882
  }
unknown's avatar
unknown committed
3883
#endif
3884
  /*
3885
    If this event comes from ourselves, there is no cleaning task to
3886
    perform, we don't call Start_log_event_v3::do_apply_event()
3887
    (this was just to update the log's description event).
3888
  */
3889 3890 3891 3892 3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903 3904
  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.
    */
    DBUG_RETURN(Start_log_event_v3::do_apply_event(rli));
  }
  DBUG_RETURN(0);
}

3905
int Format_description_log_event::do_update_pos(Relay_log_info *rli)
3906 3907 3908 3909 3910
{
  /* save the information describing this binlog */
  delete rli->relay_log.description_event_for_exec;
  rli->relay_log.description_event_for_exec= this;

3911 3912 3913
  if (server_id == (uint32) ::server_id)
  {
    /*
3914 3915 3916 3917 3918 3919 3920 3921 3922 3923 3924 3925 3926
      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();
3927
    return 0;
3928
  }
3929 3930 3931
  else
  {
    return Log_event::do_update_pos(rli);
3932 3933 3934
  }
}

3935
Log_event::enum_skip_reason
3936
Format_description_log_event::do_shall_skip(Relay_log_info *rli)
3937
{
3938
  return Log_event::EVENT_SKIP_NOT;
3939
}
3940

3941 3942
#endif

unknown's avatar
unknown committed
3943 3944 3945 3946 3947 3948 3949 3950 3951 3952 3953 3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964 3965 3966 3967 3968 3969 3970 3971 3972 3973

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


3974
  /**************************************************************************
3975
        Load_log_event methods
3976
   General note about Load_log_event: the binlogging of LOAD DATA INFILE is
3977
   going to be changed in 5.0 (or maybe in 5.1; not decided yet).
3978 3979 3980 3981 3982 3983 3984 3985 3986 3987 3988 3989
   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).
  **************************************************************************/
3990

unknown's avatar
unknown committed
3991
/*
3992
  Load_log_event::pack_info()
unknown's avatar
unknown committed
3993
*/
3994

unknown's avatar
SCRUM  
unknown committed
3995
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
3996
uint Load_log_event::get_query_buffer_length()
3997
{
unknown's avatar
unknown committed
3998
  return
3999 4000
    5 + db_len + 3 +                        // "use DB; "
    18 + fname_len + 2 +                    // "LOAD DATA INFILE 'file''"
unknown's avatar
unknown committed
4001
    7 +					    // LOCAL
4002
    9 +                                     // " REPLACE or IGNORE "
4003
    13 + table_name_len*2 +                 // "INTO TABLE `table`"
4004 4005 4006
    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'"
4007
    21 + sql_ex.line_term_len*4 + 2 +       // " LINES TERMINATED BY 'str'"
4008 4009
    19 + sql_ex.line_start_len*4 + 2 +      // " LINES STARTING BY 'str'"
    15 + 22 +                               // " IGNORE xxx  LINES"
4010
    3 + (num_fields-1)*2 + field_block_len; // " (field1, field2, ...)"
unknown's avatar
unknown committed
4011
}
4012

unknown's avatar
unknown committed
4013 4014 4015 4016 4017 4018 4019

void Load_log_event::print_query(bool need_db, char *buf,
                                 char **end, char **fn_start, char **fn_end)
{
  char *pos= buf;

  if (need_db && db && db_len)
4020
  {
4021 4022
    pos= strmov(pos, "use `");
    memcpy(pos, db, db_len);
unknown's avatar
unknown committed
4023
    pos= strmov(pos+db_len, "`; ");
4024
  }
4025

unknown's avatar
unknown committed
4026
  pos= strmov(pos, "LOAD DATA ");
unknown's avatar
unknown committed
4027 4028 4029 4030

  if (fn_start)
    *fn_start= pos;

unknown's avatar
unknown committed
4031 4032 4033
  if (check_fname_outside_temp_buf())
    pos= strmov(pos, "LOCAL ");
  pos= strmov(pos, "INFILE '");
4034
  memcpy(pos, fname, fname_len);
unknown's avatar
unknown committed
4035
  pos= strmov(pos+fname_len, "' ");
4036

unknown's avatar
unknown committed
4037
  if (sql_ex.opt_flags & REPLACE_FLAG)
4038
    pos= strmov(pos, " REPLACE ");
unknown's avatar
unknown committed
4039
  else if (sql_ex.opt_flags & IGNORE_FLAG)
4040 4041
    pos= strmov(pos, " IGNORE ");

unknown's avatar
unknown committed
4042 4043 4044 4045 4046 4047
  pos= strmov(pos ,"INTO");

  if (fn_end)
    *fn_end= pos;

  pos= strmov(pos ," TABLE `");
4048 4049 4050
  memcpy(pos, table_name, table_name_len);
  pos+= table_name_len;

unknown's avatar
unknown committed
4051
  /* We have to create all optinal fields as the default is not empty */
4052
  pos= strmov(pos, "` FIELDS TERMINATED BY ");
unknown's avatar
unknown committed
4053 4054 4055 4056 4057
  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);
4058

unknown's avatar
unknown committed
4059 4060
  pos= strmov(pos, " ESCAPED BY ");
  pos= pretty_print_str(pos, sql_ex.escaped, sql_ex.escaped_len);
4061

unknown's avatar
unknown committed
4062 4063
  pos= strmov(pos, " LINES TERMINATED BY ");
  pos= pretty_print_str(pos, sql_ex.line_term, sql_ex.line_term_len);
4064 4065
  if (sql_ex.line_start_len)
  {
4066
    pos= strmov(pos, " STARTING BY ");
4067
    pos= pretty_print_str(pos, sql_ex.line_start, sql_ex.line_start_len);
4068
  }
4069

unknown's avatar
unknown committed
4070
  if ((long) skip_lines > 0)
4071 4072
  {
    pos= strmov(pos, " IGNORE ");
unknown's avatar
unknown committed
4073
    pos= longlong10_to_str((longlong) skip_lines, pos, 10);
4074 4075
    pos= strmov(pos," LINES ");    
  }
4076 4077 4078 4079

  if (num_fields)
  {
    uint i;
unknown's avatar
unknown committed
4080
    const char *field= fields;
4081
    pos= strmov(pos, " (");
4082 4083 4084
    for (i = 0; i < num_fields; i++)
    {
      if (i)
unknown's avatar
unknown committed
4085 4086 4087 4088
      {
        *pos++= ' ';
        *pos++= ',';
      }
4089
      memcpy(pos, field, field_lens[i]);
unknown's avatar
unknown committed
4090 4091
      pos+=   field_lens[i];
      field+= field_lens[i]  + 1;
4092
    }
4093
    *pos++= ')';
4094
  }
4095

unknown's avatar
unknown committed
4096 4097 4098 4099 4100 4101 4102 4103
  *end= pos;
}


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

4104
  if (!(buf= (char*) my_malloc(get_query_buffer_length(), MYF(MY_WME))))
unknown's avatar
unknown committed
4105 4106 4107
    return;
  print_query(TRUE, buf, &end, 0, 0);
  protocol->store(buf, end-buf, &my_charset_bin);
unknown's avatar
unknown committed
4108
  my_free(buf, MYF(0));
4109
}
unknown's avatar
unknown committed
4110
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
4111

4112

4113 4114
#ifndef MYSQL_CLIENT

unknown's avatar
unknown committed
4115
/*
4116
  Load_log_event::write_data_header()
unknown's avatar
unknown committed
4117
*/
4118

4119
bool Load_log_event::write_data_header(IO_CACHE* file)
4120
{
4121
  char buf[LOAD_HEADER_LEN];
unknown's avatar
unknown committed
4122
  int4store(buf + L_THREAD_ID_OFFSET, slave_proxy_id);
4123 4124 4125 4126 4127
  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);
4128
  return my_b_safe_write(file, (uchar*)buf, LOAD_HEADER_LEN) != 0;
4129
}
4130

4131

unknown's avatar
unknown committed
4132
/*
4133
  Load_log_event::write_data_body()
unknown's avatar
unknown committed
4134
*/
4135

4136
bool Load_log_event::write_data_body(IO_CACHE* file)
4137
{
4138 4139 4140
  if (sql_ex.write_data(file))
    return 1;
  if (num_fields && fields && field_lens)
4141
  {
4142 4143
    if (my_b_safe_write(file, (uchar*)field_lens, num_fields) ||
	my_b_safe_write(file, (uchar*)fields, field_block_len))
4144
      return 1;
4145
  }
4146 4147 4148
  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));
4149 4150
}

4151

unknown's avatar
unknown committed
4152
/*
4153
  Load_log_event::Load_log_event()
unknown's avatar
unknown committed
4154
*/
4155

unknown's avatar
unknown committed
4156 4157 4158
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
4159
			       enum enum_duplicates handle_dup,
4160
			       bool ignore, bool using_trans)
4161
  :Log_event(thd_arg,
unknown's avatar
unknown committed
4162
             thd_arg->thread_specific_used ? LOG_EVENT_THREAD_SPECIFIC_F : 0,
4163
             using_trans),
4164
   thread_id(thd_arg->thread_id),
4165
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
unknown's avatar
unknown committed
4166 4167
   num_fields(0),fields(0),
   field_lens(0),field_block_len(0),
unknown's avatar
unknown committed
4168
   table_name(table_name_arg ? table_name_arg : ""),
4169
   db(db_arg), fname(ex->file_name), local_fname(FALSE)
unknown's avatar
unknown committed
4170 4171 4172
{
  time_t end_time;
  time(&end_time);
4173
  exec_time = (ulong) (end_time  - thd_arg->start_time);
4174 4175 4176
  /* 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
4177 4178 4179 4180 4181 4182 4183 4184 4185 4186 4187 4188 4189
  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;
4190
    
unknown's avatar
unknown committed
4191
  if (ex->dumpfile)
unknown's avatar
unknown committed
4192
    sql_ex.opt_flags|= DUMPFILE_FLAG;
unknown's avatar
unknown committed
4193
  if (ex->opt_enclosed)
unknown's avatar
unknown committed
4194
    sql_ex.opt_flags|= OPT_ENCLOSED_FLAG;
4195

unknown's avatar
unknown committed
4196
  sql_ex.empty_flags= 0;
4197

4198
  switch (handle_dup) {
unknown's avatar
unknown committed
4199
  case DUP_REPLACE:
unknown's avatar
unknown committed
4200
    sql_ex.opt_flags|= REPLACE_FLAG;
unknown's avatar
unknown committed
4201 4202 4203 4204
    break;
  case DUP_UPDATE:				// Impossible here
  case DUP_ERROR:
    break;	
unknown's avatar
unknown committed
4205
  }
4206 4207
  if (ignore)
    sql_ex.opt_flags|= IGNORE_FLAG;
4208

unknown's avatar
unknown committed
4209 4210 4211 4212 4213 4214 4215 4216 4217 4218
  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;
4219
    
unknown's avatar
unknown committed
4220
  skip_lines = ex->skip_lines;
4221

unknown's avatar
unknown committed
4222 4223 4224 4225 4226 4227 4228 4229 4230 4231 4232
  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);
4233 4234
  }

unknown's avatar
unknown committed
4235 4236 4237
  field_lens = (const uchar*)field_lens_buf.ptr();
  fields = fields_buf.ptr();
}
unknown's avatar
unknown committed
4238
#endif /* !MYSQL_CLIENT */
4239

4240

unknown's avatar
unknown committed
4241 4242
/**
  @note
unknown's avatar
unknown committed
4243 4244
    The caller must do buf[event_len] = 0 before he starts using the
    constructed event.
4245
*/
4246 4247 4248 4249
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
4250
   table_name(0), db(0), fname(0), local_fname(FALSE)
unknown's avatar
unknown committed
4251
{
unknown's avatar
unknown committed
4252
  DBUG_ENTER("Load_log_event");
4253 4254 4255 4256 4257 4258 4259 4260 4261 4262 4263 4264
  /*
    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
4265
  DBUG_VOID_RETURN;
4266 4267
}

4268

unknown's avatar
unknown committed
4269
/*
4270
  Load_log_event::copy_log_event()
unknown's avatar
unknown committed
4271
*/
4272

4273
int Load_log_event::copy_log_event(const char *buf, ulong event_len,
4274 4275
                                   int body_offset,
                                   const Format_description_log_event *description_event)
4276
{
4277
  DBUG_ENTER("Load_log_event::copy_log_event");
4278
  uint data_len;
4279
  char* buf_end = (char*)buf + event_len;
4280 4281
  /* this is the beginning of the post-header */
  const char* data_head = buf + description_event->common_header_len;
unknown's avatar
unknown committed
4282
  slave_proxy_id= thread_id= uint4korr(data_head + L_THREAD_ID_OFFSET);
4283 4284 4285 4286 4287
  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
4288
	  
unknown's avatar
unknown committed
4289
  if ((int) event_len < body_offset)
unknown's avatar
unknown committed
4290
    DBUG_RETURN(1);
4291 4292 4293 4294
  /*
    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.
  */
4295 4296 4297
  if (!(field_lens= (uchar*)sql_ex.init((char*)buf + body_offset,
                                        buf_end,
                                        buf[EVENT_TYPE_OFFSET] != LOAD_EVENT)))
unknown's avatar
unknown committed
4298
    DBUG_RETURN(1);
4299
  
4300
  data_len = event_len - body_offset;
4301
  if (num_fields > data_len) // simple sanity check against corruption
unknown's avatar
unknown committed
4302
    DBUG_RETURN(1);
4303
  for (uint i = 0; i < num_fields; i++)
4304
    field_block_len += (uint)field_lens[i] + 1;
4305

unknown's avatar
unknown committed
4306 4307 4308 4309
  fields = (char*)field_lens + num_fields;
  table_name  = fields + field_block_len;
  db = table_name + table_name_len + 1;
  fname = db + db_len + 1;
4310
  fname_len = (uint) strlen(fname);
4311
  // null termination is accomplished by the caller doing buf[event_len]=0
4312

unknown's avatar
unknown committed
4313
  DBUG_RETURN(0);
unknown's avatar
unknown committed
4314 4315 4316
}


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

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
4322
void Load_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
4323
{
unknown's avatar
unknown committed
4324
  print(file, print_event_info, 0);
unknown's avatar
unknown committed
4325 4326
}

unknown's avatar
unknown committed
4327

4328
void Load_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
4329
			   bool commented)
unknown's avatar
unknown committed
4330
{
4331 4332
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

unknown's avatar
unknown committed
4333
  DBUG_ENTER("Load_log_event::print");
unknown's avatar
unknown committed
4334
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
4335
  {
4336 4337 4338
    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
4339 4340
  }

4341
  bool different_db= 1;
4342
  if (db)
unknown's avatar
unknown committed
4343
  {
4344 4345 4346 4347 4348 4349
    /*
      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
4350
    if ((different_db= memcmp(print_event_info->db, db, db_len + 1)) &&
4351
        !commented)
unknown's avatar
unknown committed
4352
      memcpy(print_event_info->db, db, db_len + 1);
unknown's avatar
unknown committed
4353
  }
4354
  
4355
  if (db && db[0] && different_db)
unknown's avatar
unknown committed
4356
    my_b_printf(&cache, "%suse %s%s\n", 
unknown's avatar
unknown committed
4357
            commented ? "# " : "",
4358
            db, print_event_info->delimiter);
unknown's avatar
unknown committed
4359

4360
  if (flags & LOG_EVENT_THREAD_SPECIFIC_F)
unknown's avatar
unknown committed
4361
    my_b_printf(&cache,"%sSET @@session.pseudo_thread_id=%lu%s\n",
4362 4363
            commented ? "# " : "", (ulong)thread_id,
            print_event_info->delimiter);
4364
  my_b_printf(&cache, "%sLOAD DATA ",
unknown's avatar
unknown committed
4365
              commented ? "# " : "");
4366
  if (check_fname_outside_temp_buf())
4367 4368
    my_b_printf(&cache, "LOCAL ");
  my_b_printf(&cache, "INFILE '%-*s' ", fname_len, fname);
unknown's avatar
unknown committed
4369

unknown's avatar
unknown committed
4370
  if (sql_ex.opt_flags & REPLACE_FLAG)
4371
    my_b_printf(&cache," REPLACE ");
unknown's avatar
unknown committed
4372
  else if (sql_ex.opt_flags & IGNORE_FLAG)
4373
    my_b_printf(&cache," IGNORE ");
unknown's avatar
unknown committed
4374
  
4375 4376 4377
  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
4378

unknown's avatar
unknown committed
4379
  if (sql_ex.opt_flags & OPT_ENCLOSED_FLAG)
4380 4381 4382
    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
4383
     
4384 4385
  my_b_printf(&cache, " ESCAPED BY ");
  pretty_print_str(&cache, sql_ex.escaped, sql_ex.escaped_len);
unknown's avatar
unknown committed
4386
     
4387 4388
  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
4389

unknown's avatar
unknown committed
4390

4391
  if (sql_ex.line_start)
unknown's avatar
unknown committed
4392
  {
4393 4394
    my_b_printf(&cache," STARTING BY ");
    pretty_print_str(&cache, sql_ex.line_start, sql_ex.line_start_len);
unknown's avatar
unknown committed
4395
  }
4396
  if ((long) skip_lines > 0)
4397
    my_b_printf(&cache, " IGNORE %ld LINES", (long) skip_lines);
unknown's avatar
unknown committed
4398

4399 4400 4401 4402
  if (num_fields)
  {
    uint i;
    const char* field = fields;
4403
    my_b_printf(&cache, " (");
4404
    for (i = 0; i < num_fields; i++)
unknown's avatar
unknown committed
4405
    {
unknown's avatar
unknown committed
4406
      if (i)
4407
	my_b_printf(&cache, ",");
Staale Smedseng's avatar
Staale Smedseng committed
4408
      my_b_printf(&cache, "%s", field);
unknown's avatar
unknown committed
4409
	  
4410
      field += field_lens[i]  + 1;
unknown's avatar
unknown committed
4411
    }
4412
    my_b_printf(&cache, ")");
4413
  }
unknown's avatar
unknown committed
4414

unknown's avatar
unknown committed
4415
  my_b_printf(&cache, "%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
4416
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
4417
}
unknown's avatar
unknown committed
4418
#endif /* MYSQL_CLIENT */
4419

unknown's avatar
unknown committed
4420
#ifndef MYSQL_CLIENT
4421

unknown's avatar
unknown committed
4422
/**
4423
  Load_log_event::set_fields()
unknown's avatar
unknown committed
4424

unknown's avatar
unknown committed
4425 4426 4427 4428 4429
  @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
4430
*/
4431

unknown's avatar
unknown committed
4432
void Load_log_event::set_fields(const char* affected_db, 
4433 4434
				List<Item> &field_list,
                                Name_resolution_context *context)
unknown's avatar
unknown committed
4435 4436
{
  uint i;
unknown's avatar
unknown committed
4437
  const char* field = fields;
4438
  for (i= 0; i < num_fields; i++)
unknown's avatar
unknown committed
4439
  {
4440 4441
    field_list.push_back(new Item_field(context,
                                        affected_db, table_name, field));
4442
    field+= field_lens[i]  + 1;
unknown's avatar
unknown committed
4443
  }
unknown's avatar
unknown committed
4444
}
unknown's avatar
unknown committed
4445
#endif /* !MYSQL_CLIENT */
unknown's avatar
unknown committed
4446 4447


unknown's avatar
SCRUM  
unknown committed
4448
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
4449 4450 4451 4452 4453 4454 4455 4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468 4469 4470 4471 4472
/**
  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
4473
    0           Success
unknown's avatar
unknown committed
4474 4475
  @retval
    1           Failure
unknown's avatar
unknown committed
4476
*/
4477

4478
int Load_log_event::do_apply_event(NET* net, Relay_log_info const *rli,
4479
                                   bool use_rli_only_for_errors)
4480
{
4481 4482 4483 4484
  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);
4485
  DBUG_ASSERT(thd->query == 0);
unknown's avatar
unknown committed
4486
  thd->query_length= 0;                         // Should not be needed
4487
  thd->is_slave_error= 0;
4488
  clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
4489

4490
  /* see Query_log_event::do_apply_event() and BUG#13360 */
4491
  DBUG_ASSERT(!rli->m_table_map.count());
4492
  /*
4493
    Usually lex_start() is called by mysql_parse(), but we need it here
4494 4495
    as the present method does not call mysql_parse().
  */
4496 4497 4498
  lex_start(thd);
  mysql_reset_thd_for_next_command(thd);

unknown's avatar
unknown committed
4499
  if (!use_rli_only_for_errors)
4500
  {
4501 4502
    /*
      Saved for InnoDB, see comment in
4503
      Query_log_event::do_apply_event()
4504
    */
4505
    const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
4506
    DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));
4507
  }
4508 4509
 
   /*
4510 4511 4512 4513 4514 4515 4516
    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
4517
    done by testing rules in Create_file_log_event::do_apply_event()
4518 4519 4520
    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
4521 4522 4523 4524 4525 4526 4527 4528


    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
4529
            ::do_apply_event(), then the companion SET also have so
4530
            we don't need to reset_one_shot_variables().
unknown's avatar
unknown committed
4531
  */
4532
  if (rpl_filter->db_ok(thd->db))
4533
  {
4534 4535
    thd->set_time((time_t)when);
    VOID(pthread_mutex_lock(&LOCK_thread_count));
4536
    thd->query_id = next_query_id();
4537
    VOID(pthread_mutex_unlock(&LOCK_thread_count));
Marc Alff's avatar
Marc Alff committed
4538
    thd->warning_info->opt_clear_warning_info(thd->query_id);
4539 4540 4541

    TABLE_LIST tables;
    bzero((char*) &tables,sizeof(tables));
unknown's avatar
unknown committed
4542
    tables.db= thd->strmake(thd->db, thd->db_length);
4543
    tables.alias = tables.table_name = (char*) table_name;
4544
    tables.lock_type = TL_WRITE;
unknown's avatar
unknown committed
4545
    tables.updating= 1;
unknown's avatar
unknown committed
4546

4547
    // the table will be opened in mysql_load    
4548
    if (rpl_filter->is_on() && !rpl_filter->tables_ok(thd->db, &tables))
4549 4550 4551 4552 4553 4554 4555 4556
    {
      // 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
4557
      char *end;
unknown's avatar
unknown committed
4558
      enum enum_duplicates handle_dup;
4559
      bool ignore= 0;
unknown's avatar
unknown committed
4560 4561
      char *load_data_query;

unknown's avatar
unknown committed
4562
      /*
unknown's avatar
unknown committed
4563 4564
        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
4565
      */
unknown's avatar
unknown committed
4566
      if (!(load_data_query= (char *)thd->alloc(get_query_buffer_length() + 1)))
unknown's avatar
unknown committed
4567
      {
unknown's avatar
unknown committed
4568 4569 4570 4571 4572
        /*
          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
4573
      }
unknown's avatar
unknown committed
4574 4575 4576 4577

      print_query(FALSE, load_data_query, &end, (char **)&thd->lex->fname_start,
                  (char **)&thd->lex->fname_end);
      *end= 0;
4578
      thd->set_query(load_data_query, (uint) (end - load_data_query));
unknown's avatar
unknown committed
4579

unknown's avatar
unknown committed
4580
      if (sql_ex.opt_flags & REPLACE_FLAG)
4581
      {
unknown's avatar
unknown committed
4582
	handle_dup= DUP_REPLACE;
4583
      }
unknown's avatar
unknown committed
4584
      else if (sql_ex.opt_flags & IGNORE_FLAG)
4585 4586 4587 4588
      {
        ignore= 1;
        handle_dup= DUP_ERROR;
      }
unknown's avatar
unknown committed
4589
      else
unknown's avatar
unknown committed
4590
      {
unknown's avatar
unknown committed
4591
        /*
unknown's avatar
unknown committed
4592
	  When replication is running fine, if it was DUP_ERROR on the
4593
          master then we could choose IGNORE here, because if DUP_ERROR
unknown's avatar
unknown committed
4594
          suceeded on master, and data is identical on the master and slave,
4595
          then there should be no uniqueness errors on slave, so IGNORE is
unknown's avatar
unknown committed
4596
          the same as DUP_ERROR. But in the unlikely case of uniqueness errors
unknown's avatar
unknown committed
4597 4598 4599
          (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
4600 4601

          If reading from net (a 3.23 master), mysql_load() will change this
4602
          to IGNORE.
unknown's avatar
unknown committed
4603 4604
        */
        handle_dup= DUP_ERROR;
unknown's avatar
unknown committed
4605
      }
4606 4607 4608 4609 4610 4611 4612 4613 4614 4615
      /*
        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
4616

unknown's avatar
unknown committed
4617
      sql_exchange ex((char*)fname, sql_ex.opt_flags & DUMPFILE_FLAG);
4618 4619 4620 4621 4622
      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
4623 4624 4625 4626 4627
      ex.field_term= &field_term;
      ex.enclosed= &enclosed;
      ex.line_term= &line_term;
      ex.line_start= &line_start;
      ex.escaped= &escaped;
4628 4629 4630 4631 4632 4633

      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
4634
      List<Item> field_list;
4635 4636
      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
4637
      thd->variables.pseudo_thread_id= thread_id;
4638 4639 4640 4641 4642 4643 4644 4645 4646
      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
4647
      /*
4648
        It is safe to use tmp_list twice because we are not going to
unknown's avatar
unknown committed
4649 4650
        update it inside mysql_load().
      */
4651 4652
      List<Item> tmp_list;
      if (mysql_load(thd, &ex, &tables, field_list, tmp_list, tmp_list,
4653
                     handle_dup, ignore, net != 0))
4654
        thd->is_slave_error= 1;
4655
      if (thd->cuted_fields)
unknown's avatar
unknown committed
4656
      {
unknown's avatar
unknown committed
4657
	/* log_pos is the position of the LOAD event in the master log */
unknown's avatar
unknown committed
4658 4659 4660 4661 4662 4663 4664
        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
4665
      }
4666 4667 4668
      if (net)
        net->pkt_nr= thd->net.pkt_nr;
    }
4669 4670
  }
  else
4671 4672 4673 4674 4675 4676 4677 4678 4679
  {
    /*
      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
4680 4681

error:
4682
  thd->net.vio = 0; 
unknown's avatar
unknown committed
4683 4684
  const char *remember_db= thd->db;
  thd->catalog= 0;
4685
  thd->set_db(NULL, 0);                   /* will free the current database */
4686
  thd->set_query(NULL, 0);
4687
  close_thread_tables(thd);
4688 4689

  DBUG_EXECUTE_IF("LOAD_DATA_INFILE_has_fatal_error",
4690
                  thd->is_slave_error= 0; thd->is_fatal_error= 1;);
4691

4692
  if (thd->is_slave_error)
4693
  {
4694
    /* this err/sql_errno code is copy-paste from net_send_error() */
unknown's avatar
unknown committed
4695 4696
    const char *err;
    int sql_errno;
4697 4698
    if (thd->is_error())
    {
Marc Alff's avatar
Marc Alff committed
4699 4700
      err= thd->stmt_da->message();
      sql_errno= thd->stmt_da->sql_errno();
4701
    }
unknown's avatar
unknown committed
4702 4703 4704 4705 4706
    else
    {
      sql_errno=ER_UNKNOWN_ERROR;
      err=ER(sql_errno);       
    }
4707
    rli->report(ERROR_LEVEL, sql_errno,"\
unknown's avatar
unknown committed
4708
Error '%s' running LOAD DATA INFILE on table '%s'. Default database: '%s'",
4709
                    err, (char*)table_name, print_slave_db_safe(remember_db));
unknown's avatar
unknown committed
4710
    free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
4711 4712
    return 1;
  }
unknown's avatar
unknown committed
4713
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
4714

4715
  if (thd->is_fatal_error)
4716
  {
4717 4718 4719 4720 4721 4722 4723 4724 4725
    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);
4726 4727 4728
    return 1;
  }

4729
  return ( use_rli_only_for_errors ? 0 : Log_event::do_apply_event(rli) ); 
4730
}
unknown's avatar
SCRUM  
unknown committed
4731
#endif
4732 4733


unknown's avatar
unknown committed
4734
/**************************************************************************
unknown's avatar
unknown committed
4735
  Rotate_log_event methods
unknown's avatar
unknown committed
4736
**************************************************************************/
4737

unknown's avatar
unknown committed
4738
/*
4739
  Rotate_log_event::pack_info()
unknown's avatar
unknown committed
4740
*/
4741

unknown's avatar
SCRUM  
unknown committed
4742
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4743
void Rotate_log_event::pack_info(Protocol *protocol)
4744
{
unknown's avatar
unknown committed
4745
  char buf1[256], buf[22];
unknown's avatar
unknown committed
4746
  String tmp(buf1, sizeof(buf1), log_cs);
4747
  tmp.length(0);
unknown's avatar
unknown committed
4748
  tmp.append(new_log_ident, ident_len);
4749
  tmp.append(STRING_WITH_LEN(";pos="));
unknown's avatar
unknown committed
4750 4751
  tmp.append(llstr(pos,buf));
  protocol->store(tmp.ptr(), tmp.length(), &my_charset_bin);
4752
}
unknown's avatar
SCRUM  
unknown committed
4753
#endif
4754

4755

unknown's avatar
unknown committed
4756
/*
4757
  Rotate_log_event::print()
unknown's avatar
unknown committed
4758
*/
4759 4760

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
4761
void Rotate_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4762
{
4763
  char buf[22];
4764 4765
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
4766

unknown's avatar
unknown committed
4767
  if (print_event_info->short_form)
4768
    return;
4769 4770
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tRotate to ");
4771
  if (new_log_ident)
4772
    my_b_write(&cache, (uchar*) new_log_ident, (uint)ident_len);
4773
  my_b_printf(&cache, "  pos: %s\n", llstr(pos, buf));
4774
}
unknown's avatar
unknown committed
4775
#endif /* MYSQL_CLIENT */
4776 4777


4778

unknown's avatar
unknown committed
4779
/*
4780
  Rotate_log_event::Rotate_log_event() (2 constructors)
unknown's avatar
unknown committed
4781
*/
4782

4783 4784

#ifndef MYSQL_CLIENT
4785
Rotate_log_event::Rotate_log_event(const char* new_log_ident_arg,
4786 4787 4788 4789 4790 4791 4792 4793
                                   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];
4794
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(...,flags)");
unknown's avatar
unknown committed
4795 4796
  DBUG_PRINT("enter",("new_log_ident: %s  pos: %s  flags: %lu", new_log_ident_arg,
                      llstr(pos_arg, buff), (ulong) flags));
4797 4798
#endif
  if (flags & DUP_NAME)
4799
    new_log_ident= my_strndup(new_log_ident_arg, ident_len, MYF(MY_WME));
4800 4801
  if (flags & RELAY_LOG)
    set_relay_log_event();
4802 4803 4804 4805 4806
  DBUG_VOID_RETURN;
}
#endif


4807 4808
Rotate_log_event::Rotate_log_event(const char* buf, uint event_len,
                                   const Format_description_log_event* description_event)
unknown's avatar
unknown committed
4809
  :Log_event(buf, description_event) ,new_log_ident(0), flags(DUP_NAME)
4810
{
4811
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(char*,...)");
4812
  // The caller will ensure that event_len is what we have at EVENT_LEN_OFFSET
4813 4814
  uint8 header_size= description_event->common_header_len;
  uint8 post_header_len= description_event->post_header_len[ROTATE_EVENT-1];
4815 4816
  uint ident_offset;
  if (event_len < header_size)
unknown's avatar
unknown committed
4817
    DBUG_VOID_RETURN;
4818
  buf += header_size;
4819 4820 4821 4822
  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; 
4823
  set_if_smaller(ident_len,FN_REFLEN-1);
4824
  new_log_ident= my_strndup(buf + ident_offset, (uint) ident_len, MYF(MY_WME));
4825
  DBUG_PRINT("debug", ("new_log_ident: '%s'", new_log_ident));
unknown's avatar
unknown committed
4826
  DBUG_VOID_RETURN;
4827
}
4828 4829


unknown's avatar
unknown committed
4830
/*
4831
  Rotate_log_event::write()
unknown's avatar
unknown committed
4832
*/
4833

4834
#ifndef MYSQL_CLIENT
4835
bool Rotate_log_event::write(IO_CACHE* file)
4836
{
4837
  char buf[ROTATE_HEADER_LEN];
unknown's avatar
unknown committed
4838
  int8store(buf + R_POS_OFFSET, pos);
4839
  return (write_header(file, ROTATE_HEADER_LEN + ident_len) ||
4840 4841
          my_b_safe_write(file, (uchar*)buf, ROTATE_HEADER_LEN) ||
          my_b_safe_write(file, (uchar*)new_log_ident, (uint) ident_len));
4842
}
4843
#endif
4844

4845

unknown's avatar
unknown committed
4846
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4847

unknown's avatar
unknown committed
4848 4849
/*
  Got a rotate log event from the master.
4850

unknown's avatar
unknown committed
4851 4852
  This is mainly used so that we can later figure out the logname and
  position for the master.
4853

unknown's avatar
unknown committed
4854 4855 4856
  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.
4857

unknown's avatar
unknown committed
4858
  @retval
4859
    0	ok
unknown's avatar
unknown committed
4860
*/
4861
int Rotate_log_event::do_update_pos(Relay_log_info *rli)
4862
{
4863
  DBUG_ENTER("Rotate_log_event::do_update_pos");
4864 4865 4866 4867
#ifndef DBUG_OFF
  char buf[32];
#endif

4868 4869
  DBUG_PRINT("info", ("server_id=%lu; ::server_id=%lu",
                      (ulong) this->server_id, (ulong) ::server_id));
4870 4871
  DBUG_PRINT("info", ("new_log_ident: %s", this->new_log_ident));
  DBUG_PRINT("info", ("pos: %s", llstr(this->pos, buf)));
4872

unknown's avatar
unknown committed
4873
  /*
4874 4875 4876 4877
    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
4878 4879 4880 4881 4882
    BEGIN
    ...
    ROTATE (a fake one)
    ...
    COMMIT or ROLLBACK
4883 4884 4885 4886

    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
4887
    relay log, which shall not change the group positions.
unknown's avatar
unknown committed
4888
  */
4889
  if ((server_id != ::server_id || rli->replicate_same_server_id) &&
4890
      !is_relay_log_event() &&
4891
      !rli->is_in_group())
unknown's avatar
unknown committed
4892
  {
4893
    pthread_mutex_lock(&rli->data_lock);
4894 4895 4896 4897
    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
4898 4899
    memcpy(rli->group_master_log_name, new_log_ident, ident_len+1);
    rli->notify_group_master_log_name_update();
4900
    rli->inc_group_relay_log_pos(pos, TRUE /* skip_lock */);
4901 4902
    DBUG_PRINT("info", ("new group_master_log_name: '%s'  "
                        "new group_master_log_pos: %lu",
4903
                        rli->group_master_log_name,
unknown's avatar
unknown committed
4904
                        (ulong) rli->group_master_log_pos));
4905 4906 4907
    pthread_mutex_unlock(&rli->data_lock);
    flush_relay_log_info(rli);
    
4908
    /*
4909 4910
      Reset thd->options and sql_mode etc, because this could be the signal of
      a master's downgrade from 5.0 to 4.0.
4911 4912 4913 4914 4915
      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);
4916
    set_slave_thread_default_charset(thd, rli);
4917
    thd->variables.sql_mode= global_system_variables.sql_mode;
4918 4919
    thd->variables.auto_increment_increment=
      thd->variables.auto_increment_offset= 1;
unknown's avatar
unknown committed
4920
  }
4921 4922 4923
  else
    rli->inc_event_relay_log_pos();

4924

4925
  DBUG_RETURN(0);
4926
}
4927

4928 4929

Log_event::enum_skip_reason
4930
Rotate_log_event::do_shall_skip(Relay_log_info *rli)
4931
{
4932
  enum_skip_reason reason= Log_event::do_shall_skip(rli);
4933 4934

  switch (reason) {
4935
  case Log_event::EVENT_SKIP_NOT:
4936
  case Log_event::EVENT_SKIP_COUNT:
4937
    return Log_event::EVENT_SKIP_NOT;
4938

4939 4940
  case Log_event::EVENT_SKIP_IGNORE:
    return Log_event::EVENT_SKIP_IGNORE;
4941 4942
  }
  DBUG_ASSERT(0);
4943
  return Log_event::EVENT_SKIP_NOT;             // To keep compiler happy
4944 4945
}

unknown's avatar
SCRUM  
unknown committed
4946
#endif
4947 4948


unknown's avatar
unknown committed
4949
/**************************************************************************
unknown's avatar
unknown committed
4950
	Intvar_log_event methods
unknown's avatar
unknown committed
4951
**************************************************************************/
4952

unknown's avatar
unknown committed
4953
/*
4954
  Intvar_log_event::pack_info()
unknown's avatar
unknown committed
4955
*/
4956

unknown's avatar
SCRUM  
unknown committed
4957
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4958
void Intvar_log_event::pack_info(Protocol *protocol)
4959
{
unknown's avatar
unknown committed
4960 4961
  char buf[256], *pos;
  pos= strmake(buf, get_var_type_name(), sizeof(buf)-23);
unknown's avatar
unknown committed
4962
  *pos++= '=';
unknown's avatar
unknown committed
4963
  pos= longlong10_to_str(val, pos, -10);
unknown's avatar
unknown committed
4964
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
4965
}
unknown's avatar
SCRUM  
unknown committed
4966
#endif
4967

unknown's avatar
unknown committed
4968

unknown's avatar
unknown committed
4969
/*
4970
  Intvar_log_event::Intvar_log_event()
unknown's avatar
unknown committed
4971
*/
4972

4973 4974 4975
Intvar_log_event::Intvar_log_event(const char* buf,
                                   const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
4976
{
4977 4978 4979
  /* 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];
4980 4981
  type= buf[I_TYPE_OFFSET];
  val= uint8korr(buf+I_VAL_OFFSET);
4982 4983
}

4984

unknown's avatar
unknown committed
4985
/*
4986
  Intvar_log_event::get_var_type_name()
unknown's avatar
unknown committed
4987
*/
4988 4989

const char* Intvar_log_event::get_var_type_name()
4990
{
4991 4992 4993 4994 4995
  switch(type) {
  case LAST_INSERT_ID_EVENT: return "LAST_INSERT_ID";
  case INSERT_ID_EVENT: return "INSERT_ID";
  default: /* impossible */ return "UNKNOWN";
  }
4996 4997
}

unknown's avatar
unknown committed
4998

unknown's avatar
unknown committed
4999
/*
5000
  Intvar_log_event::write()
unknown's avatar
unknown committed
5001
*/
5002

5003
#ifndef MYSQL_CLIENT
5004
bool Intvar_log_event::write(IO_CACHE* file)
5005
{
5006 5007
  uchar buf[9];
  buf[I_TYPE_OFFSET]= (uchar) type;
5008
  int8store(buf + I_VAL_OFFSET, val);
5009 5010
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
5011
}
5012
#endif
5013

5014

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

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5020
void Intvar_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5021
{
5022 5023 5024
  char llbuff[22];
  const char *msg;
  LINT_INIT(msg);
5025 5026
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
5027

unknown's avatar
unknown committed
5028
  if (!print_event_info->short_form)
5029
  {
5030 5031
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tIntvar\n");
5032
  }
5033

5034
  my_b_printf(&cache, "SET ");
5035 5036 5037 5038 5039 5040 5041
  switch (type) {
  case LAST_INSERT_ID_EVENT:
    msg="LAST_INSERT_ID";
    break;
  case INSERT_ID_EVENT:
    msg="INSERT_ID";
    break;
5042 5043 5044 5045
  case INVALID_INT_EVENT:
  default: // cannot happen
    msg="INVALID_INT";
    break;
5046
  }
unknown's avatar
unknown committed
5047 5048
  my_b_printf(&cache, "%s=%s%s\n",
              msg, llstr(val,llbuff), print_event_info->delimiter);
5049
}
5050
#endif
5051

5052

unknown's avatar
unknown committed
5053
/*
5054
  Intvar_log_event::do_apply_event()
unknown's avatar
unknown committed
5055
*/
5056

unknown's avatar
SCRUM  
unknown committed
5057
#if defined(HAVE_REPLICATION)&& !defined(MYSQL_CLIENT)
5058
int Intvar_log_event::do_apply_event(Relay_log_info const *rli)
5059
{
5060 5061 5062 5063
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5064
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5065

5066 5067
  switch (type) {
  case LAST_INSERT_ID_EVENT:
5068 5069
    thd->stmt_depends_on_first_successful_insert_id_in_prev_stmt= 1;
    thd->first_successful_insert_id_in_prev_stmt= val;
5070 5071
    break;
  case INSERT_ID_EVENT:
5072
    thd->force_one_auto_inc_interval(val);
5073 5074
    break;
  }
5075 5076 5077
  return 0;
}

5078
int Intvar_log_event::do_update_pos(Relay_log_info *rli)
5079
{
5080
  rli->inc_event_relay_log_pos();
5081
  return 0;
5082
}
5083 5084 5085


Log_event::enum_skip_reason
5086
Intvar_log_event::do_shall_skip(Relay_log_info *rli)
5087 5088
{
  /*
5089 5090 5091 5092 5093 5094
    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.
5095
  */
5096
  return continue_group(rli);
5097 5098
}

unknown's avatar
SCRUM  
unknown committed
5099
#endif
5100

5101

unknown's avatar
unknown committed
5102
/**************************************************************************
5103
  Rand_log_event methods
unknown's avatar
unknown committed
5104
**************************************************************************/
5105

unknown's avatar
SCRUM  
unknown committed
5106
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5107
void Rand_log_event::pack_info(Protocol *protocol)
5108
{
unknown's avatar
unknown committed
5109 5110 5111 5112 5113
  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);
5114
  protocol->store(buf1, (uint) (pos-buf1), &my_charset_bin);
5115
}
unknown's avatar
SCRUM  
unknown committed
5116
#endif
5117 5118


5119 5120 5121
Rand_log_event::Rand_log_event(const char* buf,
                               const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
5122
{
5123 5124 5125
  /* 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];
5126 5127
  seed1= uint8korr(buf+RAND_SEED1_OFFSET);
  seed2= uint8korr(buf+RAND_SEED2_OFFSET);
5128 5129
}

5130

5131
#ifndef MYSQL_CLIENT
5132
bool Rand_log_event::write(IO_CACHE* file)
5133
{
5134
  uchar buf[16];
5135 5136
  int8store(buf + RAND_SEED1_OFFSET, seed1);
  int8store(buf + RAND_SEED2_OFFSET, seed2);
5137 5138
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
5139
}
5140
#endif
5141

5142 5143

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5144
void Rand_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5145
{
5146 5147 5148
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5149
  char llbuff[22],llbuff2[22];
unknown's avatar
unknown committed
5150
  if (!print_event_info->short_form)
5151
  {
5152 5153
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tRand\n");
5154
  }
unknown's avatar
unknown committed
5155 5156 5157
  my_b_printf(&cache, "SET @@RAND_SEED1=%s, @@RAND_SEED2=%s%s\n",
              llstr(seed1, llbuff),llstr(seed2, llbuff2),
              print_event_info->delimiter);
5158
}
unknown's avatar
unknown committed
5159
#endif /* MYSQL_CLIENT */
5160

5161

unknown's avatar
SCRUM  
unknown committed
5162
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5163
int Rand_log_event::do_apply_event(Relay_log_info const *rli)
5164
{
5165 5166 5167 5168
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5169
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5170

unknown's avatar
unknown committed
5171 5172
  thd->rand.seed1= (ulong) seed1;
  thd->rand.seed2= (ulong) seed2;
5173 5174 5175
  return 0;
}

5176
int Rand_log_event::do_update_pos(Relay_log_info *rli)
5177
{
5178
  rli->inc_event_relay_log_pos();
5179 5180
  return 0;
}
5181

5182 5183

Log_event::enum_skip_reason
5184
Rand_log_event::do_shall_skip(Relay_log_info *rli)
5185 5186
{
  /*
5187 5188 5189 5190 5191 5192
    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.
5193
  */
5194
  return continue_group(rli);
5195 5196
}

unknown's avatar
unknown committed
5197
#endif /* !MYSQL_CLIENT */
5198

unknown's avatar
unknown committed
5199

5200 5201 5202 5203 5204 5205 5206
/**************************************************************************
  Xid_log_event methods
**************************************************************************/

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Xid_log_event::pack_info(Protocol *protocol)
{
5207 5208
  char buf[128], *pos;
  pos= strmov(buf, "COMMIT /* xid=");
5209
  pos= longlong10_to_str(xid, pos, 10);
5210
  pos= strmov(pos, " */");
5211 5212 5213 5214
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
}
#endif

unknown's avatar
unknown committed
5215 5216 5217
/**
  @note
  It's ok not to use int8store here,
unknown's avatar
unknown committed
5218
  as long as xid_t::set(ulonglong) and
unknown's avatar
unknown committed
5219 5220
  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
5221 5222
  identical numbers compare identically
*/
5223 5224 5225 5226

Xid_log_event::
Xid_log_event(const char* buf,
              const Format_description_log_event *description_event)
5227 5228
  :Log_event(buf, description_event)
{
5229 5230 5231
  /* 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];
5232
  memcpy((char*) &xid, buf, sizeof(xid));
5233 5234 5235
}


5236
#ifndef MYSQL_CLIENT
5237 5238
bool Xid_log_event::write(IO_CACHE* file)
{
5239
  DBUG_EXECUTE_IF("do_not_write_xid", return 0;);
5240
  return write_header(file, sizeof(xid)) ||
5241
         my_b_safe_write(file, (uchar*) &xid, sizeof(xid));
5242
}
5243
#endif
5244 5245 5246


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5247
void Xid_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5248
{
5249 5250 5251
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5252
  if (!print_event_info->short_form)
5253
  {
unknown's avatar
unknown committed
5254 5255 5256
    char buf[64];
    longlong10_to_str(xid, buf, 10);

5257 5258
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tXid = %s\n", buf);
5259
  }
unknown's avatar
unknown committed
5260
  my_b_printf(&cache, "COMMIT%s\n", print_event_info->delimiter);
5261 5262 5263 5264 5265
}
#endif /* MYSQL_CLIENT */


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5266
int Xid_log_event::do_apply_event(Relay_log_info const *rli)
5267
{
5268
  /* For a slave Xid_log_event is COMMIT */
5269 5270
  general_log_print(thd, COM_QUERY,
                    "COMMIT /* implicit, from Xid_log_event */");
5271
  return end_trans(thd, COMMIT);
5272
}
5273 5274 5275 5276 5277 5278 5279 5280 5281 5282 5283

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));
}
5284 5285 5286
#endif /* !MYSQL_CLIENT */


unknown's avatar
unknown committed
5287
/**************************************************************************
5288
  User_var_log_event methods
unknown's avatar
unknown committed
5289
**************************************************************************/
unknown's avatar
unknown committed
5290

unknown's avatar
unknown committed
5291
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
unknown's avatar
unknown committed
5292 5293 5294
void User_var_log_event::pack_info(Protocol* protocol)
{
  char *buf= 0;
5295
  uint val_offset= 4 + name_len;
unknown's avatar
unknown committed
5296 5297 5298 5299
  uint event_len= val_offset;

  if (is_null)
  {
5300 5301
    if (!(buf= (char*) my_malloc(val_offset + 5, MYF(MY_WME))))
      return;
unknown's avatar
unknown committed
5302 5303 5304 5305 5306 5307 5308 5309 5310
    strmov(buf + val_offset, "NULL");
    event_len= val_offset + 4;
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
      float8get(real_val, val);
5311 5312 5313
      if (!(buf= (char*) my_malloc(val_offset + FLOATING_POINT_BUFFER,
                                   MYF(MY_WME))))
        return;
5314 5315
      event_len+= my_sprintf(buf + val_offset,
			     (buf + val_offset, "%.14g", real_val));
unknown's avatar
unknown committed
5316 5317
      break;
    case INT_RESULT:
5318 5319
      if (!(buf= (char*) my_malloc(val_offset + 22, MYF(MY_WME))))
        return;
unknown's avatar
unknown committed
5320 5321
      event_len= longlong10_to_str(uint8korr(val), buf + val_offset,-10)-buf;
      break;
unknown's avatar
unknown committed
5322 5323
    case DECIMAL_RESULT:
    {
5324 5325 5326
      if (!(buf= (char*) my_malloc(val_offset + DECIMAL_MAX_STR_LENGTH,
                                   MYF(MY_WME))))
        return;
unknown's avatar
unknown committed
5327 5328
      String str(buf+val_offset, DECIMAL_MAX_STR_LENGTH, &my_charset_bin);
      my_decimal dec;
5329 5330
      binary2my_decimal(E_DEC_FATAL_ERROR, (uchar*) (val+2), &dec, val[0],
                        val[1]);
unknown's avatar
unknown committed
5331 5332 5333 5334
      my_decimal2string(E_DEC_FATAL_ERROR, &dec, 0, 0, 0, &str);
      event_len= str.length() + val_offset;
      break;
    } 
unknown's avatar
unknown committed
5335
    case STRING_RESULT:
5336
      /* 15 is for 'COLLATE' and other chars */
5337 5338
      buf= (char*) my_malloc(event_len+val_len*2+1+2*MY_CS_NAME_SIZE+15,
                             MYF(MY_WME));
5339
      CHARSET_INFO *cs;
5340 5341
      if (!buf)
        return;
5342 5343 5344 5345 5346 5347 5348
      if (!(cs= get_charset(charset_number, MYF(0))))
      {
        strmov(buf+val_offset, "???");
        event_len+= 3;
      }
      else
      {
5349 5350 5351
        char *p= strxmov(buf + val_offset, "_", cs->csname, " ", NullS);
        p= str_to_hex(p, val, val_len);
        p= strxmov(p, " COLLATE ", cs->name, NullS);
5352 5353
        event_len= p-buf;
      }
unknown's avatar
unknown committed
5354
      break;
5355
    case ROW_RESULT:
unknown's avatar
unknown committed
5356
    default:
unknown's avatar
unknown committed
5357 5358 5359 5360 5361
      DBUG_ASSERT(1);
      return;
    }
  }
  buf[0]= '@';
5362
  buf[1]= '`';
5363
  memcpy(buf+2, name, name_len);
5364 5365
  buf[2+name_len]= '`';
  buf[3+name_len]= '=';
5366
  protocol->store(buf, event_len, &my_charset_bin);
5367
  my_free(buf, MYF(0));
unknown's avatar
unknown committed
5368
}
unknown's avatar
unknown committed
5369
#endif /* !MYSQL_CLIENT */
unknown's avatar
unknown committed
5370 5371


5372 5373 5374 5375
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
5376
{
5377 5378 5379
  /* 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
5380 5381
  name_len= uint4korr(buf);
  name= (char *) buf + UV_NAME_LEN_SIZE;
5382 5383
  buf+= UV_NAME_LEN_SIZE + name_len;
  is_null= (bool) *buf;
unknown's avatar
unknown committed
5384 5385 5386
  if (is_null)
  {
    type= STRING_RESULT;
5387
    charset_number= my_charset_bin.number;
unknown's avatar
unknown committed
5388 5389 5390 5391 5392
    val_len= 0;
    val= 0;  
  }
  else
  {
5393 5394 5395
    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
5396
		       UV_CHARSET_NUMBER_SIZE);
5397 5398
    val= (char *) (buf + UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE +
		   UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE);
unknown's avatar
unknown committed
5399 5400 5401 5402
  }
}


5403
#ifndef MYSQL_CLIENT
5404
bool User_var_log_event::write(IO_CACHE* file)
unknown's avatar
unknown committed
5405 5406 5407 5408
{
  char buf[UV_NAME_LEN_SIZE];
  char buf1[UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE + 
	    UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE];
5409
  uchar buf2[max(8, DECIMAL_MAX_FIELD_SIZE + 2)], *pos= buf2;
5410
  uint buf1_length;
5411
  ulong event_length;
5412

unknown's avatar
unknown committed
5413
  int4store(buf, name_len);
5414 5415 5416 5417
  
  if ((buf1[0]= is_null))
  {
    buf1_length= 1;
5418
    val_len= 0;                                 // Length of 'pos'
5419 5420
  }    
  else
unknown's avatar
unknown committed
5421 5422 5423 5424 5425 5426 5427 5428 5429 5430 5431
  {
    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
5432 5433 5434 5435 5436 5437
    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;
5438
      decimal2bin((decimal_t*)val, buf2+2, buf2[0], buf2[1]);
unknown's avatar
unknown committed
5439 5440 5441
      val_len= decimal_bin_size(buf2[0], buf2[1]) + 2;
      break;
    }
unknown's avatar
unknown committed
5442
    case STRING_RESULT:
5443
      pos= (uchar*) val;
unknown's avatar
unknown committed
5444
      break;
5445
    case ROW_RESULT:
unknown's avatar
unknown committed
5446
    default:
unknown's avatar
unknown committed
5447 5448 5449
      DBUG_ASSERT(1);
      return 0;
    }
unknown's avatar
unknown committed
5450 5451
    int4store(buf1 + 2 + UV_CHARSET_NUMBER_SIZE, val_len);
    buf1_length= 10;
unknown's avatar
unknown committed
5452
  }
5453 5454 5455 5456 5457

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

  return (write_header(file, event_length) ||
5458 5459 5460 5461
          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
5462
}
5463
#endif
unknown's avatar
unknown committed
5464

5465

unknown's avatar
unknown committed
5466
/*
unknown's avatar
unknown committed
5467
  User_var_log_event::print()
unknown's avatar
unknown committed
5468
*/
unknown's avatar
unknown committed
5469 5470

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5471
void User_var_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
5472
{
5473 5474 5475
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5476
  if (!print_event_info->short_form)
unknown's avatar
unknown committed
5477
  {
5478 5479
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tUser_var\n");
unknown's avatar
unknown committed
5480 5481
  }

5482
  my_b_printf(&cache, "SET @`");
5483
  my_b_write(&cache, (uchar*) name, (uint) (name_len));
5484
  my_b_printf(&cache, "`");
unknown's avatar
unknown committed
5485 5486 5487

  if (is_null)
  {
unknown's avatar
unknown committed
5488
    my_b_printf(&cache, ":=NULL%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
5489 5490 5491 5492 5493 5494
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
5495
      char real_buf[FMT_G_BUFSIZE(14)];
unknown's avatar
unknown committed
5496
      float8get(real_val, val);
5497 5498
      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
5499 5500 5501 5502
      break;
    case INT_RESULT:
      char int_buf[22];
      longlong10_to_str(uint8korr(val), int_buf, -10);
unknown's avatar
unknown committed
5503
      my_b_printf(&cache, ":=%s%s\n", int_buf, print_event_info->delimiter);
unknown's avatar
unknown committed
5504
      break;
unknown's avatar
unknown committed
5505 5506 5507 5508 5509 5510
    case DECIMAL_RESULT:
    {
      char str_buf[200];
      int str_len= sizeof(str_buf) - 1;
      int precision= (int)val[0];
      int scale= (int)val[1];
5511 5512
      decimal_digit_t dec_buf[10];
      decimal_t dec;
unknown's avatar
unknown committed
5513 5514 5515
      dec.len= 10;
      dec.buf= dec_buf;

5516
      bin2decimal((uchar*) val+2, &dec, precision, scale);
unknown's avatar
unknown committed
5517 5518
      decimal2string(&dec, str_buf, &str_len, 0, 0, 0);
      str_buf[str_len]= 0;
unknown's avatar
unknown committed
5519
      my_b_printf(&cache, ":=%s%s\n", str_buf, print_event_info->delimiter);
unknown's avatar
unknown committed
5520 5521
      break;
    }
unknown's avatar
unknown committed
5522
    case STRING_RESULT:
5523
    {
5524 5525 5526 5527 5528 5529 5530 5531 5532 5533 5534 5535 5536 5537
      /*
        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.
      */
5538 5539 5540 5541
      char *hex_str;
      CHARSET_INFO *cs;

      if (!(hex_str= (char *)my_alloca(2*val_len+1+2))) // 2 hex digits / byte
5542
        break; // no error, as we are 'void'
5543
      str_to_hex(hex_str, val, val_len);
5544 5545 5546 5547 5548 5549 5550 5551 5552 5553 5554
      /*
        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
5555
        my_b_printf(&cache, ":=???%s\n", print_event_info->delimiter);
5556
      else
unknown's avatar
unknown committed
5557 5558 5559
        my_b_printf(&cache, ":=_%s %s COLLATE `%s`%s\n",
                    cs->csname, hex_str, cs->name,
                    print_event_info->delimiter);
5560
      my_afree(hex_str);
5561
    }
unknown's avatar
unknown committed
5562
      break;
5563
    case ROW_RESULT:
unknown's avatar
unknown committed
5564
    default:
unknown's avatar
unknown committed
5565
      DBUG_ASSERT(1);
unknown's avatar
unknown committed
5566 5567 5568 5569
      return;
    }
  }
}
unknown's avatar
SCRUM  
unknown committed
5570
#endif
5571

unknown's avatar
unknown committed
5572

unknown's avatar
unknown committed
5573
/*
5574
  User_var_log_event::do_apply_event()
unknown's avatar
unknown committed
5575
*/
unknown's avatar
unknown committed
5576

unknown's avatar
unknown committed
5577
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5578
int User_var_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
5579 5580
{
  Item *it= 0;
5581 5582 5583
  CHARSET_INFO *charset;
  if (!(charset= get_charset(charset_number, MYF(MY_WME))))
    return 1;
unknown's avatar
unknown committed
5584 5585 5586
  LEX_STRING user_var_name;
  user_var_name.str= name;
  user_var_name.length= name_len;
5587 5588
  double real_val;
  longlong int_val;
unknown's avatar
unknown committed
5589

5590 5591 5592 5593
  /*
    We are now in a statement until the associated query log event has
    been processed.
   */
5594
  const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
5595

unknown's avatar
unknown committed
5596 5597 5598 5599 5600 5601 5602 5603 5604
  if (is_null)
  {
    it= new Item_null();
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      float8get(real_val, val);
5605
      it= new Item_float(real_val, 0);
5606
      val= (char*) &real_val;		// Pointer to value in native format
5607
      val_len= 8;
unknown's avatar
unknown committed
5608 5609
      break;
    case INT_RESULT:
5610 5611 5612
      int_val= (longlong) uint8korr(val);
      it= new Item_int(int_val);
      val= (char*) &int_val;		// Pointer to value in native format
5613
      val_len= 8;
unknown's avatar
unknown committed
5614
      break;
unknown's avatar
unknown committed
5615 5616
    case DECIMAL_RESULT:
    {
5617
      Item_decimal *dec= new Item_decimal((uchar*) val+2, val[0], val[1]);
unknown's avatar
unknown committed
5618 5619 5620 5621 5622
      it= dec;
      val= (char *)dec->val_decimal(NULL);
      val_len= sizeof(my_decimal);
      break;
    }
unknown's avatar
unknown committed
5623 5624 5625
    case STRING_RESULT:
      it= new Item_string(val, val_len, charset);
      break;
5626
    case ROW_RESULT:
unknown's avatar
unknown committed
5627
    default:
unknown's avatar
unknown committed
5628 5629 5630 5631 5632
      DBUG_ASSERT(1);
      return 0;
    }
  }
  Item_func_set_user_var e(user_var_name, it);
5633 5634 5635
  /*
    Item_func_set_user_var can't substitute something else on its place =>
    0 can be passed as last argument (reference on item)
5636 5637 5638 5639

    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.
5640
  */
5641 5642 5643
  if (e.fix_fields(thd, 0))
    return 1;

5644 5645 5646 5647 5648
  /*
    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
5649
  e.update_hash(val, val_len, type, charset, DERIVATION_IMPLICIT, 0);
unknown's avatar
unknown committed
5650
  free_root(thd->mem_root,0);
unknown's avatar
unknown committed
5651

5652 5653 5654
  return 0;
}

5655
int User_var_log_event::do_update_pos(Relay_log_info *rli)
5656
{
5657
  rli->inc_event_relay_log_pos();
unknown's avatar
unknown committed
5658 5659
  return 0;
}
5660

5661
Log_event::enum_skip_reason
5662
User_var_log_event::do_shall_skip(Relay_log_info *rli)
5663 5664 5665 5666 5667 5668 5669 5670 5671
{
  /*
    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.
  */
5672
  return continue_group(rli);
5673
}
unknown's avatar
unknown committed
5674
#endif /* !MYSQL_CLIENT */
5675 5676


unknown's avatar
unknown committed
5677
/**************************************************************************
5678
  Slave_log_event methods
unknown's avatar
unknown committed
5679
**************************************************************************/
unknown's avatar
unknown committed
5680

unknown's avatar
SCRUM  
unknown committed
5681
#ifdef HAVE_REPLICATION
5682
#ifdef MYSQL_CLIENT
5683
void Unknown_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info)
5684
{
5685 5686
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

unknown's avatar
unknown committed
5687
  if (print_event_info->short_form)
5688
    return;
5689 5690
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n# %s", "Unknown event\n");
5691 5692
}
#endif  
5693

5694
#ifndef MYSQL_CLIENT
5695
void Slave_log_event::pack_info(Protocol *protocol)
5696
{
unknown's avatar
unknown committed
5697
  char buf[256+HOSTNAME_LENGTH], *pos;
5698 5699 5700 5701 5702 5703 5704
  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
5705
  pos= longlong10_to_str(master_pos, pos, 10);
5706
  protocol->store(buf, pos-buf, &my_charset_bin);
5707
}
unknown's avatar
unknown committed
5708
#endif /* !MYSQL_CLIENT */
5709 5710 5711


#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
5712 5713 5714 5715
/**
  @todo
  re-write this better without holding both locks at the same time
*/
5716
Slave_log_event::Slave_log_event(THD* thd_arg,
5717
				 Relay_log_info* rli)
5718
  :Log_event(thd_arg, 0, 0) , mem_pool(0), master_host(0)
5719 5720 5721 5722
{
  DBUG_ENTER("Slave_log_event");
  if (!rli->inited)				// QQ When can this happen ?
    DBUG_VOID_RETURN;
5723

5724
  Master_info* mi = rli->mi;
5725 5726 5727 5728
  // 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);
5729
  master_log_len = strlen(rli->group_master_log_name);
5730 5731 5732
  // 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))))
5733
  {
5734 5735 5736
    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;
5737
    memcpy(master_log, rli->group_master_log_name, master_log_len + 1);
5738
    master_port = mi->port;
5739
    master_pos = rli->group_master_log_pos;
unknown's avatar
unknown committed
5740
    DBUG_PRINT("info", ("master_log: %s  pos: %lu", master_log,
5741
			(ulong) master_pos));
5742
  }
5743 5744 5745 5746 5747 5748
  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
5749
#endif /* !MYSQL_CLIENT */
5750 5751 5752 5753 5754 5755 5756 5757 5758


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


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5759
void Slave_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5760
{
5761 5762
  Write_on_release_cache cache(&print_event_info->head_cache, file);

5763
  char llbuff[22];
unknown's avatar
unknown committed
5764
  if (print_event_info->short_form)
5765
    return;
5766 5767
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n\
unknown's avatar
unknown committed
5768
Slave: master_host: '%s'  master_port: %d  master_log: '%s'  master_pos: %s\n",
5769 5770
	  master_host, master_port, master_log, llstr(master_pos, llbuff));
}
unknown's avatar
unknown committed
5771
#endif /* MYSQL_CLIENT */
5772 5773 5774 5775 5776 5777 5778 5779


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


5780
#ifndef MYSQL_CLIENT
5781
bool Slave_log_event::write(IO_CACHE* file)
5782
{
5783
  ulong event_length= get_data_size();
5784 5785 5786
  int8store(mem_pool + SL_MASTER_POS_OFFSET, master_pos);
  int2store(mem_pool + SL_MASTER_PORT_OFFSET, master_port);
  // log and host are already there
5787 5788

  return (write_header(file, event_length) ||
5789
          my_b_safe_write(file, (uchar*) mem_pool, event_length));
5790
}
5791
#endif
5792 5793 5794 5795 5796 5797 5798


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;
5799
  master_host_len = (uint) strlen(master_host);
5800 5801 5802
  // safety
  master_log = master_host + master_host_len + 1;
  if (master_log > mem_pool + data_size)
5803
  {
5804 5805
    master_host = 0;
    return;
5806
  }
5807
  master_log_len = (uint) strlen(master_log);
5808
}
5809

5810

unknown's avatar
unknown committed
5811
/** This code is not used, so has not been updated to be format-tolerant. */
5812 5813
Slave_log_event::Slave_log_event(const char* buf, uint event_len)
  :Log_event(buf,0) /*unused event*/ ,mem_pool(0),master_host(0)
5814
{
5815
  if (event_len < LOG_EVENT_HEADER_LEN)
5816
    return;
5817
  event_len -= LOG_EVENT_HEADER_LEN;
5818 5819 5820 5821 5822
  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);
5823 5824
}

5825

5826
#ifndef MYSQL_CLIENT
5827
int Slave_log_event::do_apply_event(Relay_log_info const *rli)
5828 5829 5830
{
  if (mysql_bin_log.is_open())
    mysql_bin_log.write(this);
5831
  return 0;
5832
}
unknown's avatar
unknown committed
5833
#endif /* !MYSQL_CLIENT */
5834 5835


unknown's avatar
unknown committed
5836
/**************************************************************************
unknown's avatar
unknown committed
5837
	Stop_log_event methods
unknown's avatar
unknown committed
5838
**************************************************************************/
5839

unknown's avatar
unknown committed
5840
/*
5841
  Stop_log_event::print()
5842
*/
5843 5844

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
5845
void Stop_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
5846
{
5847 5848 5849
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

unknown's avatar
unknown committed
5850
  if (print_event_info->short_form)
5851 5852
    return;

5853 5854
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tStop\n");
5855
}
unknown's avatar
unknown committed
5856
#endif /* MYSQL_CLIENT */
5857

5858

unknown's avatar
unknown committed
5859
#ifndef MYSQL_CLIENT
5860
/*
5861 5862 5863 5864 5865 5866 5867
  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
5868
  Start_log_event_v3::do_apply_event(), not here. Because if we come
5869
  here, the master was sane.
5870
*/
5871
int Stop_log_event::do_update_pos(Relay_log_info *rli)
5872
{
unknown's avatar
unknown committed
5873 5874
  /*
    We do not want to update master_log pos because we get a rotate event
5875
    before stop, so by now group_master_log_name is set to the next log.
5876
    If we updated it, we will have incorrect master coordinates and this
unknown's avatar
unknown committed
5877
    could give false triggers in MASTER_POS_WAIT() that we have reached
5878
    the target position when in fact we have not.
unknown's avatar
unknown committed
5879
  */
5880 5881 5882 5883 5884 5885 5886
  if (thd->options & OPTION_BEGIN)
    rli->inc_event_relay_log_pos();
  else
  {
    rli->inc_group_relay_log_pos(0);
    flush_relay_log_info(rli);
  }
5887 5888
  return 0;
}
5889

unknown's avatar
unknown committed
5890
#endif /* !MYSQL_CLIENT */
unknown's avatar
SCRUM  
unknown committed
5891
#endif /* HAVE_REPLICATION */
5892

5893

unknown's avatar
unknown committed
5894
/**************************************************************************
unknown's avatar
unknown committed
5895
	Create_file_log_event methods
unknown's avatar
unknown committed
5896
**************************************************************************/
5897 5898

/*
5899
  Create_file_log_event ctor
unknown's avatar
unknown committed
5900
*/
5901 5902

#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
5903 5904 5905 5906
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,
5907
                      bool ignore,
unknown's avatar
unknown committed
5908
		      uchar* block_arg, uint block_len_arg, bool using_trans)
5909
  :Load_log_event(thd_arg,ex,db_arg,table_name_arg,fields_arg,handle_dup, ignore,
unknown's avatar
unknown committed
5910
		  using_trans),
5911
   fake_base(0), block(block_arg), event_buf(0), block_len(block_len_arg),
5912
   file_id(thd_arg->file_id = mysql_bin_log.next_file_id())
5913
{
unknown's avatar
unknown committed
5914
  DBUG_ENTER("Create_file_log_event");
5915
  sql_ex.force_new_format();
unknown's avatar
unknown committed
5916
  DBUG_VOID_RETURN;
5917
}
5918

5919

unknown's avatar
unknown committed
5920
/*
5921
  Create_file_log_event::write_data_body()
unknown's avatar
unknown committed
5922
*/
5923

5924
bool Create_file_log_event::write_data_body(IO_CACHE* file)
5925
{
5926 5927
  bool res;
  if ((res= Load_log_event::write_data_body(file)) || fake_base)
5928
    return res;
5929 5930
  return (my_b_safe_write(file, (uchar*) "", 1) ||
          my_b_safe_write(file, (uchar*) block, block_len));
5931 5932
}

5933

unknown's avatar
unknown committed
5934
/*
5935
  Create_file_log_event::write_data_header()
unknown's avatar
unknown committed
5936
*/
unknown's avatar
unknown committed
5937

5938
bool Create_file_log_event::write_data_header(IO_CACHE* file)
5939
{
5940
  bool res;
5941
  uchar buf[CREATE_FILE_HEADER_LEN];
5942 5943
  if ((res= Load_log_event::write_data_header(file)) || fake_base)
    return res;
5944
  int4store(buf + CF_FILE_ID_OFFSET, file_id);
5945
  return my_b_safe_write(file, buf, CREATE_FILE_HEADER_LEN) != 0;
5946 5947 5948
}


unknown's avatar
unknown committed
5949
/*
5950
  Create_file_log_event::write_base()
unknown's avatar
unknown committed
5951
*/
5952

5953
bool Create_file_log_event::write_base(IO_CACHE* file)
5954
{
5955 5956 5957 5958
  bool res;
  fake_base= 1;                                 // pretend we are Load event
  res= write(file);
  fake_base= 0;
5959 5960 5961
  return res;
}

5962
#endif /* !MYSQL_CLIENT */
5963

unknown's avatar
unknown committed
5964
/*
5965
  Create_file_log_event ctor
unknown's avatar
unknown committed
5966
*/
5967

5968 5969 5970
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)
5971
{
5972 5973 5974 5975 5976
  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];
5977
  if (!(event_buf= (char*) my_memdup(buf, len, MYF(MY_WME))) ||
5978 5979 5980 5981 5982 5983 5984
      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
5985
    DBUG_VOID_RETURN;
5986
  if (description_event->binlog_version!=1)
5987
  {
5988 5989 5990 5991 5992 5993 5994 5995 5996 5997 5998 5999 6000 6001 6002 6003 6004
    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);
6005
    if (len < block_offset)
6006
      DBUG_VOID_RETURN;
unknown's avatar
unknown committed
6007
    block = (uchar*)buf + block_offset;
6008 6009 6010 6011 6012 6013
    block_len = len - block_offset;
  }
  else
  {
    sql_ex.force_new_format();
    inited_from_old = 1;
6014
  }
unknown's avatar
unknown committed
6015
  DBUG_VOID_RETURN;
6016 6017
}

6018

unknown's avatar
unknown committed
6019
/*
6020
  Create_file_log_event::print()
unknown's avatar
unknown committed
6021
*/
6022 6023

#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
6024
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
6025
				  bool enable_local)
unknown's avatar
unknown committed
6026
{
6027 6028
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6029
  if (print_event_info->short_form)
6030 6031
  {
    if (enable_local && check_fname_outside_temp_buf())
unknown's avatar
unknown committed
6032
      Load_log_event::print(file, print_event_info);
6033
    return;
6034 6035 6036 6037
  }

  if (enable_local)
  {
unknown's avatar
unknown committed
6038
    Load_log_event::print(file, print_event_info,
6039
			  !check_fname_outside_temp_buf());
unknown's avatar
unknown committed
6040 6041 6042 6043
    /* 
       That one is for "file_id: etc" below: in mysqlbinlog we want the #, in
       SHOW BINLOG EVENTS we don't.
    */
6044
    my_b_printf(&cache, "#"); 
6045 6046
  }

6047
  my_b_printf(&cache, " file_id: %d  block_len: %d\n", file_id, block_len);
unknown's avatar
unknown committed
6048
}
6049

unknown's avatar
unknown committed
6050

unknown's avatar
unknown committed
6051
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
6052
{
unknown's avatar
unknown committed
6053
  print(file, print_event_info, 0);
6054
}
unknown's avatar
unknown committed
6055
#endif /* MYSQL_CLIENT */
unknown's avatar
unknown committed
6056

6057

unknown's avatar
unknown committed
6058
/*
6059
  Create_file_log_event::pack_info()
unknown's avatar
unknown committed
6060
*/
6061

unknown's avatar
SCRUM  
unknown committed
6062
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6063
void Create_file_log_event::pack_info(Protocol *protocol)
6064
{
6065 6066 6067
  char buf[NAME_LEN*2 + 30 + 21*2], *pos;
  pos= strmov(buf, "db=");
  memcpy(pos, db, db_len);
unknown's avatar
unknown committed
6068
  pos= strmov(pos + db_len, ";table=");
6069
  memcpy(pos, table_name, table_name_len);
unknown's avatar
unknown committed
6070
  pos= strmov(pos + table_name_len, ";file_id=");
6071 6072 6073
  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
6074
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
6075
}
unknown's avatar
unknown committed
6076
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6077 6078


6079
/**
6080
  Create_file_log_event::do_apply_event()
6081 6082 6083 6084 6085 6086 6087
  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
6088
*/
6089

unknown's avatar
SCRUM  
unknown committed
6090
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6091
int Create_file_log_event::do_apply_event(Relay_log_info const *rli)
6092
{
unknown's avatar
unknown committed
6093 6094
  char proc_info[17+FN_REFLEN+10], *fname_buf;
  char *ext;
6095 6096 6097
  int fd = -1;
  IO_CACHE file;
  int error = 1;
unknown's avatar
unknown committed
6098

6099
  bzero((char*)&file, sizeof(file));
unknown's avatar
unknown committed
6100 6101
  fname_buf= strmov(proc_info, "Making temp file ");
  ext= slave_load_file_stem(fname_buf, file_id, server_id, ".info");
6102
  thd_proc_info(thd, proc_info);
6103 6104 6105 6106
  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 ||
6107 6108 6109
      init_io_cache(&file, fd, IO_SIZE, WRITE_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
6110 6111 6112
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not open file '%s'",
                fname_buf);
6113 6114 6115 6116
    goto err;
  }
  
  // a trick to avoid allocating another buffer
unknown's avatar
unknown committed
6117 6118
  fname= fname_buf;
  fname_len= (uint) (strmov(ext, ".data") - fname);
6119 6120
  if (write_base(&file))
  {
unknown's avatar
unknown committed
6121
    strmov(ext, ".info"); // to have it right in the error message
6122 6123 6124
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not write to file '%s'",
                fname_buf);
6125 6126 6127 6128 6129 6130
    goto err;
  }
  end_io_cache(&file);
  my_close(fd, MYF(0));
  
  // fname_buf now already has .data, not .info, because we did our trick
6131 6132 6133 6134
  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)
6135
  {
6136 6137 6138
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: could not open file '%s'",
                fname_buf);
6139 6140
    goto err;
  }
6141
  if (my_write(fd, (uchar*) block, block_len, MYF(MY_WME+MY_NABP)))
6142
  {
6143 6144 6145
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Create_file event: write to '%s' failed",
                fname_buf);
6146 6147
    goto err;
  }
6148 6149
  error=0;					// Everything is ok

6150 6151 6152 6153 6154
err:
  if (error)
    end_io_cache(&file);
  if (fd >= 0)
    my_close(fd, MYF(0));
6155
  thd_proc_info(thd, 0);
6156
  return error != 0;
6157
}
unknown's avatar
unknown committed
6158
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6159

6160

unknown's avatar
unknown committed
6161
/**************************************************************************
unknown's avatar
unknown committed
6162
	Append_block_log_event methods
unknown's avatar
unknown committed
6163
**************************************************************************/
6164

unknown's avatar
unknown committed
6165
/*
6166
  Append_block_log_event ctor
unknown's avatar
unknown committed
6167
*/
6168 6169

#ifndef MYSQL_CLIENT  
6170 6171
Append_block_log_event::Append_block_log_event(THD *thd_arg,
                                               const char *db_arg,
unknown's avatar
unknown committed
6172
					       uchar *block_arg,
unknown's avatar
unknown committed
6173 6174 6175
					       uint block_len_arg,
					       bool using_trans)
  :Log_event(thd_arg,0, using_trans), block(block_arg),
unknown's avatar
unknown committed
6176
   block_len(block_len_arg), file_id(thd_arg->file_id), db(db_arg)
6177 6178
{
}
unknown's avatar
unknown committed
6179
#endif
6180 6181


unknown's avatar
unknown committed
6182
/*
6183
  Append_block_log_event ctor
unknown's avatar
unknown committed
6184
*/
6185

6186 6187 6188
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)
6189
{
6190 6191 6192 6193 6194 6195
  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
6196
    DBUG_VOID_RETURN;
6197
  file_id= uint4korr(buf + common_header_len + AB_FILE_ID_OFFSET);
unknown's avatar
unknown committed
6198
  block= (uchar*)buf + total_header_len;
6199
  block_len= len - total_header_len;
unknown's avatar
unknown committed
6200
  DBUG_VOID_RETURN;
6201 6202 6203
}


unknown's avatar
unknown committed
6204
/*
6205
  Append_block_log_event::write()
unknown's avatar
unknown committed
6206
*/
6207

6208
#ifndef MYSQL_CLIENT
6209
bool Append_block_log_event::write(IO_CACHE* file)
6210
{
6211
  uchar buf[APPEND_BLOCK_HEADER_LEN];
6212
  int4store(buf + AB_FILE_ID_OFFSET, file_id);
6213 6214
  return (write_header(file, APPEND_BLOCK_HEADER_LEN + block_len) ||
          my_b_safe_write(file, buf, APPEND_BLOCK_HEADER_LEN) ||
6215
	  my_b_safe_write(file, (uchar*) block, block_len));
6216
}
6217
#endif
6218 6219


unknown's avatar
unknown committed
6220
/*
6221
  Append_block_log_event::print()
unknown's avatar
unknown committed
6222
*/
6223 6224

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6225
void Append_block_log_event::print(FILE* file,
unknown's avatar
unknown committed
6226
				   PRINT_EVENT_INFO* print_event_info)
6227
{
6228 6229
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6230
  if (print_event_info->short_form)
6231
    return;
6232 6233 6234
  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);
6235
}
unknown's avatar
unknown committed
6236
#endif /* MYSQL_CLIENT */
6237 6238


unknown's avatar
unknown committed
6239
/*
6240
  Append_block_log_event::pack_info()
unknown's avatar
unknown committed
6241
*/
6242

unknown's avatar
SCRUM  
unknown committed
6243
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6244
void Append_block_log_event::pack_info(Protocol *protocol)
6245 6246 6247 6248 6249 6250
{
  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
6251
  protocol->store(buf, length, &my_charset_bin);
6252 6253 6254
}


unknown's avatar
unknown committed
6255
/*
6256
  Append_block_log_event::get_create_or_append()
unknown's avatar
unknown committed
6257 6258
*/

6259
int Append_block_log_event::get_create_or_append() const
unknown's avatar
unknown committed
6260
{
6261
  return 0; /* append to the file, fail if not exists */
unknown's avatar
unknown committed
6262 6263
}

unknown's avatar
unknown committed
6264
/*
6265
  Append_block_log_event::do_apply_event()
unknown's avatar
unknown committed
6266
*/
6267

6268
int Append_block_log_event::do_apply_event(Relay_log_info const *rli)
6269
{
6270
  char proc_info[17+FN_REFLEN+10], *fname= proc_info+17;
6271
  int fd;
6272
  int error = 1;
6273
  DBUG_ENTER("Append_block_log_event::do_apply_event");
6274

unknown's avatar
unknown committed
6275 6276
  fname= strmov(proc_info, "Making temp file ");
  slave_load_file_stem(fname, file_id, server_id, ".data");
6277
  thd_proc_info(thd, proc_info);
6278 6279
  if (get_create_or_append())
  {
6280 6281 6282 6283 6284 6285
    /*
      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);
6286 6287 6288 6289 6290
    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)
    {
6291 6292 6293
      rli->report(ERROR_LEVEL, my_errno,
                  "Error in %s event: could not create file '%s'",
                  get_type_str(), fname);
6294 6295 6296
      goto err;
    }
  }
6297 6298
  else if ((fd = my_open(fname, O_WRONLY | O_APPEND | O_BINARY | O_NOFOLLOW,
                         MYF(MY_WME))) < 0)
6299
  {
6300 6301 6302
    rli->report(ERROR_LEVEL, my_errno,
                "Error in %s event: could not open file '%s'",
                get_type_str(), fname);
6303 6304
    goto err;
  }
6305 6306 6307 6308

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

6309
  if (my_write(fd, (uchar*) block, block_len, MYF(MY_WME+MY_NABP)))
6310
  {
6311 6312 6313
    rli->report(ERROR_LEVEL, my_errno,
                "Error in %s event: write to '%s' failed",
                get_type_str(), fname);
6314 6315 6316
    goto err;
  }
  error=0;
6317

6318 6319 6320
err:
  if (fd >= 0)
    my_close(fd, MYF(0));
6321
  thd_proc_info(thd, 0);
6322
  DBUG_RETURN(error);
6323
}
unknown's avatar
SCRUM  
unknown committed
6324
#endif
6325 6326


unknown's avatar
unknown committed
6327
/**************************************************************************
unknown's avatar
unknown committed
6328
	Delete_file_log_event methods
unknown's avatar
unknown committed
6329
**************************************************************************/
6330

unknown's avatar
unknown committed
6331
/*
6332
  Delete_file_log_event ctor
unknown's avatar
unknown committed
6333
*/
6334 6335

#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
6336 6337 6338
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)
6339 6340
{
}
unknown's avatar
unknown committed
6341
#endif
6342

unknown's avatar
unknown committed
6343
/*
6344
  Delete_file_log_event ctor
unknown's avatar
unknown committed
6345
*/
6346

6347 6348 6349
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)
6350
{
6351 6352 6353
  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))
6354
    return;
6355
  file_id= uint4korr(buf + common_header_len + DF_FILE_ID_OFFSET);
6356 6357 6358
}


unknown's avatar
unknown committed
6359
/*
6360
  Delete_file_log_event::write()
unknown's avatar
unknown committed
6361
*/
6362

6363
#ifndef MYSQL_CLIENT
6364
bool Delete_file_log_event::write(IO_CACHE* file)
6365
{
6366
 uchar buf[DELETE_FILE_HEADER_LEN];
6367
 int4store(buf + DF_FILE_ID_OFFSET, file_id);
6368 6369
 return (write_header(file, sizeof(buf)) ||
         my_b_safe_write(file, buf, sizeof(buf)));
6370
}
6371
#endif
6372 6373


unknown's avatar
unknown committed
6374
/*
6375
  Delete_file_log_event::print()
unknown's avatar
unknown committed
6376
*/
6377 6378

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6379
void Delete_file_log_event::print(FILE* file,
unknown's avatar
unknown committed
6380
				  PRINT_EVENT_INFO* print_event_info)
6381
{
6382 6383
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6384
  if (print_event_info->short_form)
6385
    return;
6386 6387
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Delete_file: file_id=%u\n", file_id);
6388
}
unknown's avatar
unknown committed
6389
#endif /* MYSQL_CLIENT */
6390

unknown's avatar
unknown committed
6391
/*
6392
  Delete_file_log_event::pack_info()
unknown's avatar
unknown committed
6393
*/
6394

unknown's avatar
SCRUM  
unknown committed
6395
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6396
void Delete_file_log_event::pack_info(Protocol *protocol)
6397 6398 6399 6400
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
6401
  protocol->store(buf, (int32) length, &my_charset_bin);
6402
}
unknown's avatar
SCRUM  
unknown committed
6403
#endif
6404

unknown's avatar
unknown committed
6405
/*
6406
  Delete_file_log_event::do_apply_event()
unknown's avatar
unknown committed
6407
*/
6408

unknown's avatar
SCRUM  
unknown committed
6409
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6410
int Delete_file_log_event::do_apply_event(Relay_log_info const *rli)
6411 6412
{
  char fname[FN_REFLEN+10];
unknown's avatar
unknown committed
6413
  char *ext= slave_load_file_stem(fname, file_id, server_id, ".data");
6414
  (void) my_delete(fname, MYF(MY_WME));
unknown's avatar
unknown committed
6415
  strmov(ext, ".info");
6416
  (void) my_delete(fname, MYF(MY_WME));
6417
  return 0;
6418
}
unknown's avatar
unknown committed
6419
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6420 6421


unknown's avatar
unknown committed
6422
/**************************************************************************
unknown's avatar
unknown committed
6423
	Execute_load_log_event methods
unknown's avatar
unknown committed
6424
**************************************************************************/
6425

unknown's avatar
unknown committed
6426
/*
6427
  Execute_load_log_event ctor
unknown's avatar
unknown committed
6428
*/
6429 6430

#ifndef MYSQL_CLIENT  
6431 6432
Execute_load_log_event::Execute_load_log_event(THD *thd_arg,
                                               const char* db_arg,
unknown's avatar
unknown committed
6433 6434
					       bool using_trans)
  :Log_event(thd_arg, 0, using_trans), file_id(thd_arg->file_id), db(db_arg)
6435 6436
{
}
unknown's avatar
unknown committed
6437
#endif
6438 6439
  

unknown's avatar
unknown committed
6440
/*
6441
  Execute_load_log_event ctor
unknown's avatar
unknown committed
6442
*/
6443

6444 6445 6446
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)
6447
{
6448 6449 6450
  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))
6451
    return;
6452
  file_id= uint4korr(buf + common_header_len + EL_FILE_ID_OFFSET);
6453 6454 6455
}


unknown's avatar
unknown committed
6456
/*
6457
  Execute_load_log_event::write()
unknown's avatar
unknown committed
6458
*/
6459

6460
#ifndef MYSQL_CLIENT
6461
bool Execute_load_log_event::write(IO_CACHE* file)
6462
{
6463
  uchar buf[EXEC_LOAD_HEADER_LEN];
6464
  int4store(buf + EL_FILE_ID_OFFSET, file_id);
6465 6466
  return (write_header(file, sizeof(buf)) || 
          my_b_safe_write(file, buf, sizeof(buf)));
6467
}
6468
#endif
6469 6470


unknown's avatar
unknown committed
6471
/*
6472
  Execute_load_log_event::print()
unknown's avatar
unknown committed
6473
*/
6474 6475

#ifdef MYSQL_CLIENT  
unknown's avatar
unknown committed
6476
void Execute_load_log_event::print(FILE* file,
unknown's avatar
unknown committed
6477
				   PRINT_EVENT_INFO* print_event_info)
6478
{
6479 6480
  Write_on_release_cache cache(&print_event_info->head_cache, file);

unknown's avatar
unknown committed
6481
  if (print_event_info->short_form)
6482
    return;
6483 6484 6485
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Exec_load: file_id=%d\n",
              file_id);
6486
}
unknown's avatar
unknown committed
6487
#endif
6488

unknown's avatar
unknown committed
6489
/*
6490
  Execute_load_log_event::pack_info()
unknown's avatar
unknown committed
6491
*/
6492

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


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

6507
int Execute_load_log_event::do_apply_event(Relay_log_info const *rli)
6508 6509
{
  char fname[FN_REFLEN+10];
unknown's avatar
unknown committed
6510
  char *ext;
6511
  int fd;
unknown's avatar
unknown committed
6512
  int error= 1;
6513
  IO_CACHE file;
unknown's avatar
unknown committed
6514
  Load_log_event *lev= 0;
6515

unknown's avatar
unknown committed
6516
  ext= slave_load_file_stem(fname, file_id, server_id, ".info");
6517 6518
  if ((fd = my_open(fname, O_RDONLY | O_BINARY | O_NOFOLLOW,
                    MYF(MY_WME))) < 0 ||
6519 6520 6521
      init_io_cache(&file, fd, IO_SIZE, READ_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
6522 6523 6524
    rli->report(ERROR_LEVEL, my_errno,
                "Error in Exec_load event: could not open file '%s'",
                fname);
6525 6526
    goto err;
  }
6527
  if (!(lev = (Load_log_event*)Log_event::read_log_event(&file,
6528 6529
                                                         (pthread_mutex_t*)0,
                                                         rli->relay_log.description_event_for_exec)) ||
6530
      lev->get_type_code() != NEW_LOAD_EVENT)
6531
  {
6532
    rli->report(ERROR_LEVEL, 0, "Error in Exec_load event: "
6533
                    "file '%s' appears corrupted", fname);
6534 6535
    goto err;
  }
unknown's avatar
unknown committed
6536

6537
  lev->thd = thd;
6538
  /*
6539
    lev->do_apply_event should use rli only for errors i.e. should
6540 6541
    not advance rli's position.

6542
    lev->do_apply_event is the place where the table is loaded (it
6543
    calls mysql_load()).
6544
  */
unknown's avatar
unknown committed
6545

6546
  const_cast<Relay_log_info*>(rli)->future_group_master_log_pos= log_pos;
6547
  if (lev->do_apply_event(0,rli,1)) 
6548
  {
6549 6550 6551 6552 6553 6554 6555 6556
    /*
      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.
    */
6557
    char *tmp= my_strdup(rli->last_error().message, MYF(MY_WME));
6558 6559
    if (tmp)
    {
6560
      rli->report(ERROR_LEVEL, rli->last_error().number,
6561
                  "%s. Failed executing load from '%s'", tmp, fname);
6562 6563
      my_free(tmp,MYF(0));
    }
6564 6565
    goto err;
  }
unknown's avatar
unknown committed
6566 6567 6568 6569 6570 6571 6572 6573 6574 6575
  /*
    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;
  }
6576
  (void) my_delete(fname, MYF(MY_WME));
unknown's avatar
unknown committed
6577
  memcpy(ext, ".data", 6);
6578
  (void) my_delete(fname, MYF(MY_WME));
6579
  error = 0;
6580

6581 6582 6583
err:
  delete lev;
  if (fd >= 0)
6584
  {
6585
    my_close(fd, MYF(0));
6586 6587
    end_io_cache(&file);
  }
6588
  return error;
6589
}
unknown's avatar
SCRUM  
unknown committed
6590

unknown's avatar
unknown committed
6591
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
6592 6593


unknown's avatar
unknown committed
6594 6595 6596 6597 6598 6599
/**************************************************************************
	Begin_load_query_log_event methods
**************************************************************************/

#ifndef MYSQL_CLIENT
Begin_load_query_log_event::
unknown's avatar
unknown committed
6600
Begin_load_query_log_event(THD* thd_arg, const char* db_arg, uchar* block_arg,
unknown's avatar
unknown committed
6601 6602 6603 6604 6605 6606 6607 6608 6609 6610 6611 6612 6613 6614 6615 6616 6617 6618
                           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)
6619
int Begin_load_query_log_event::get_create_or_append() const
unknown's avatar
unknown committed
6620
{
6621
  return 1; /* create the file */
unknown's avatar
unknown committed
6622 6623 6624 6625
}
#endif /* defined( HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */


6626 6627 6628 6629 6630 6631 6632 6633 6634 6635 6636 6637 6638
#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
6639 6640 6641 6642 6643 6644 6645
/**************************************************************************
	Execute_load_query_log_event methods
**************************************************************************/


#ifndef MYSQL_CLIENT
Execute_load_query_log_event::
6646
Execute_load_query_log_event(THD *thd_arg, const char* query_arg,
6647 6648 6649 6650
                             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,
6651
                             int errcode):
unknown's avatar
unknown committed
6652
  Query_log_event(thd_arg, query_arg, query_length_arg, using_trans,
6653
                  suppress_use, errcode),
unknown's avatar
unknown committed
6654 6655 6656 6657 6658 6659 6660 6661 6662 6663 6664 6665 6666 6667 6668 6669 6670 6671 6672 6673 6674 6675 6676 6677 6678 6679 6680 6681 6682 6683 6684 6685 6686 6687 6688 6689
  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;
}


6690
#ifndef MYSQL_CLIENT
unknown's avatar
unknown committed
6691 6692 6693
bool
Execute_load_query_log_event::write_post_header_for_derived(IO_CACHE* file)
{
6694
  uchar buf[EXECUTE_LOAD_QUERY_EXTRA_HEADER_LEN];
unknown's avatar
unknown committed
6695 6696 6697
  int4store(buf, file_id);
  int4store(buf + 4, fn_pos_start);
  int4store(buf + 4 + 4, fn_pos_end);
6698 6699
  *(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
6700
}
6701
#endif
unknown's avatar
unknown committed
6702 6703 6704


#ifdef MYSQL_CLIENT
unknown's avatar
unknown committed
6705
void Execute_load_query_log_event::print(FILE* file,
unknown's avatar
unknown committed
6706
                                         PRINT_EVENT_INFO* print_event_info)
unknown's avatar
unknown committed
6707
{
unknown's avatar
unknown committed
6708
  print(file, print_event_info, 0);
unknown's avatar
unknown committed
6709 6710
}

unknown's avatar
unknown committed
6711 6712 6713
/**
  Prints the query as LOAD DATA LOCAL and with rewritten filename.
*/
unknown's avatar
unknown committed
6714
void Execute_load_query_log_event::print(FILE* file,
unknown's avatar
unknown committed
6715
                                         PRINT_EVENT_INFO* print_event_info,
unknown's avatar
unknown committed
6716 6717
                                         const char *local_fname)
{
6718 6719 6720
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
unknown's avatar
unknown committed
6721 6722 6723

  if (local_fname)
  {
6724
    my_b_write(&cache, (uchar*) query, fn_pos_start);
6725
    my_b_printf(&cache, " LOCAL INFILE \'");
Staale Smedseng's avatar
Staale Smedseng committed
6726
    my_b_printf(&cache, "%s", local_fname);
6727
    my_b_printf(&cache, "\'");
unknown's avatar
unknown committed
6728
    if (dup_handling == LOAD_DUP_REPLACE)
6729
      my_b_printf(&cache, " REPLACE");
6730
    my_b_printf(&cache, " INTO ");
6731
    my_b_write(&cache, (uchar*) query + fn_pos_end, q_len-fn_pos_end);
6732
    my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
6733 6734 6735
  }
  else
  {
6736
    my_b_write(&cache, (uchar*) query, q_len);
6737
    my_b_printf(&cache, "\n%s\n", print_event_info->delimiter);
unknown's avatar
unknown committed
6738 6739
  }

unknown's avatar
unknown committed
6740
  if (!print_event_info->short_form)
6741
    my_b_printf(&cache, "# file_id: %d \n", file_id);
unknown's avatar
unknown committed
6742 6743 6744 6745 6746 6747 6748 6749
}
#endif


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Execute_load_query_log_event::pack_info(Protocol *protocol)
{
  char *buf, *pos;
6750
  if (!(buf= (char*) my_malloc(9 + db_len + q_len + 10 + 21, MYF(MY_WME))))
unknown's avatar
unknown committed
6751 6752 6753 6754 6755 6756 6757 6758 6759 6760 6761 6762 6763 6764 6765 6766 6767 6768 6769 6770 6771
    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
6772
Execute_load_query_log_event::do_apply_event(Relay_log_info const *rli)
unknown's avatar
unknown committed
6773 6774 6775 6776 6777 6778 6779
{
  char *p;
  char *buf;
  char *fname;
  char *fname_end;
  int error;

6780 6781
  buf= (char*) my_malloc(q_len + 1 - (fn_pos_end - fn_pos_start) +
                         (FN_REFLEN + 10) + 10 + 8 + 5, MYF(MY_WME));
6782

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

unknown's avatar
unknown committed
6785
  /* Replace filename and LOCAL keyword in query before executing it */
6786
  if (buf == NULL)
unknown's avatar
unknown committed
6787
  {
6788 6789
    rli->report(ERROR_LEVEL, ER_SLAVE_FATAL_ERROR,
                ER(ER_SLAVE_FATAL_ERROR), "Not enough memory");
unknown's avatar
unknown committed
6790 6791 6792 6793 6794 6795
    return 1;
  }

  p= buf;
  memcpy(p, query, fn_pos_start);
  p+= fn_pos_start;
6796
  fname= (p= strmake(p, STRING_WITH_LEN(" INFILE \'")));
unknown's avatar
unknown committed
6797 6798
  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
6799
  *(p++)='\'';
unknown's avatar
unknown committed
6800
  switch (dup_handling) {
unknown's avatar
unknown committed
6801
  case LOAD_DUP_IGNORE:
6802
    p= strmake(p, STRING_WITH_LEN(" IGNORE"));
unknown's avatar
unknown committed
6803 6804
    break;
  case LOAD_DUP_REPLACE:
6805
    p= strmake(p, STRING_WITH_LEN(" REPLACE"));
unknown's avatar
unknown committed
6806 6807 6808 6809 6810
    break;
  default:
    /* Ordinary load data */
    break;
  }
6811
  p= strmake(p, STRING_WITH_LEN(" INTO "));
unknown's avatar
unknown committed
6812 6813
  p= strmake(p, query+fn_pos_end, q_len-fn_pos_end);

6814
  error= Query_log_event::do_apply_event(rli, buf, p-buf);
unknown's avatar
unknown committed
6815 6816 6817 6818

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

6819 6820 6821 6822 6823 6824
  /*
    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
6825 6826 6827 6828 6829 6830 6831

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


unknown's avatar
unknown committed
6832
/**************************************************************************
unknown's avatar
unknown committed
6833
	sql_ex_info methods
unknown's avatar
unknown committed
6834
**************************************************************************/
6835

unknown's avatar
unknown committed
6836
/*
6837
  sql_ex_info::write_data()
unknown's avatar
unknown committed
6838
*/
6839

6840
bool sql_ex_info::write_data(IO_CACHE* file)
6841 6842 6843
{
  if (new_format())
  {
6844 6845 6846 6847 6848
    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) ||
6849
	    my_b_safe_write(file,(uchar*) &opt_flags,1));
6850 6851 6852
  }
  else
  {
6853 6854 6855 6856
    /**
      @todo This is sensitive to field padding. We should write a
      char[7], not an old_sql_ex. /sven
    */
6857 6858 6859 6860 6861 6862 6863 6864
    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;
6865
    return my_b_safe_write(file, (uchar*) &old_ex, sizeof(old_ex)) != 0;
6866 6867 6868 6869
  }
}


unknown's avatar
unknown committed
6870
/*
6871
  sql_ex_info::init()
unknown's avatar
unknown committed
6872
*/
6873

6874 6875
const char *sql_ex_info::init(const char *buf, const char *buf_end,
                              bool use_new_format)
6876 6877 6878 6879 6880 6881 6882 6883 6884 6885 6886 6887
{
  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.
    */
6888 6889 6890 6891 6892
    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))
6893 6894 6895 6896 6897 6898 6899 6900 6901 6902 6903 6904 6905 6906 6907 6908 6909 6910 6911 6912 6913 6914 6915 6916 6917 6918
      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;
}
6919 6920 6921 6922 6923 6924 6925 6926 6927 6928


/**************************************************************************
	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),
6929
    m_row_count(0),
6930 6931
    m_table(tbl_arg),
    m_table_id(tid),
6932
    m_width(tbl_arg ? tbl_arg->s->fields : 1),
6933 6934
    m_rows_buf(0), m_rows_cur(0), m_rows_end(0), m_flags(0) 
#ifdef HAVE_REPLICATION
6935
    , m_curr_row(NULL), m_curr_row_end(NULL), m_key(NULL)
6936
#endif
6937
{
6938 6939
  /*
    We allow a special form of dummy event when the table, and cols
6940
    are null and the table id is ~0UL.  This is a temporary
6941
    solution, to be able to terminate a started statement in the
6942
    binary log: the extraneous events will be removed in the future.
6943
   */
6944 6945
  DBUG_ASSERT((tbl_arg && tbl_arg->s && tid != ~0UL) ||
              (!tbl_arg && !cols && tid == ~0UL));
6946 6947 6948 6949 6950

  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);
6951
  /* if bitmap_init fails, caught in is_valid() */
6952 6953
  if (likely(!bitmap_init(&m_cols,
                          m_width <= sizeof(m_bitbuf)*8 ? m_bitbuf : NULL,
6954
                          m_width,
6955
                          false)))
6956 6957 6958
  {
    /* Cols can be zero if this is a dummy binrows event */
    if (likely(cols != NULL))
6959
    {
6960
      memcpy(m_cols.bitmap, cols->bitmap, no_bytes_in_map(cols));
6961 6962
      create_last_word_mask(&m_cols);
    }
6963
  }
6964
  else
6965 6966 6967 6968
  {
    // Needed because bitmap_init() does not set it to null on failure
    m_cols.bitmap= 0;
  }
6969 6970 6971 6972 6973 6974 6975 6976
}
#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),
6977
    m_row_count(0),
6978
#ifndef MYSQL_CLIENT
6979
    m_table(NULL),
6980 6981 6982
#endif
    m_table_id(0), m_rows_buf(0), m_rows_cur(0), m_rows_end(0)
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
6983
    , m_curr_row(NULL), m_curr_row_end(NULL), m_key(NULL)
6984
#endif
6985 6986 6987 6988 6989
{
  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
6990 6991
  DBUG_PRINT("enter",("event_len: %u  common_header_len: %d  "
		      "post_header_len: %d",
6992 6993 6994 6995 6996 6997 6998 6999 7000 7001 7002 7003 7004
		      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
  {
7005
    m_table_id= (ulong) uint6korr(post_start);
7006 7007 7008 7009 7010
    post_start+= RW_FLAGS_OFFSET;
  }

  m_flags= uint2korr(post_start);

7011 7012 7013
  uchar const *const var_start=
    (const uchar *)buf + common_header_len + post_header_len;
  uchar const *const ptr_width= var_start;
7014
  uchar *ptr_after_width= (uchar*) ptr_width;
7015
  DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
7016
  m_width = net_field_length(&ptr_after_width);
7017 7018 7019 7020
  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,
7021
                          m_width,
7022 7023 7024 7025
                          false)))
  {
    DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
    memcpy(m_cols.bitmap, ptr_after_width, (m_width + 7) / 8);
7026
    create_last_word_mask(&m_cols);
7027
    ptr_after_width+= (m_width + 7) / 8;
7028
    DBUG_DUMP("m_cols", (uchar*) m_cols.bitmap, no_bytes_in_map(&m_cols));
7029 7030 7031 7032 7033 7034 7035
  }
  else
  {
    // Needed because bitmap_init() does not set it to null on failure
    m_cols.bitmap= NULL;
    DBUG_VOID_RETURN;
  }
7036

7037 7038 7039 7040 7041 7042
  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));

7043
    /* if bitmap_init fails, caught in is_valid() */
7044 7045
    if (likely(!bitmap_init(&m_cols_ai,
                            m_width <= sizeof(m_bitbuf_ai)*8 ? m_bitbuf_ai : NULL,
7046
                            m_width,
7047 7048 7049 7050
                            false)))
    {
      DBUG_PRINT("debug", ("Reading from %p", ptr_after_width));
      memcpy(m_cols_ai.bitmap, ptr_after_width, (m_width + 7) / 8);
7051
      create_last_word_mask(&m_cols_ai);
7052
      ptr_after_width+= (m_width + 7) / 8;
7053 7054
      DBUG_DUMP("m_cols_ai", (uchar*) m_cols_ai.bitmap,
                no_bytes_in_map(&m_cols_ai));
7055 7056 7057 7058 7059 7060 7061 7062 7063
    }
    else
    {
      // Needed because bitmap_init() does not set it to null on failure
      m_cols_ai.bitmap= 0;
      DBUG_VOID_RETURN;
    }
  }

7064
  const uchar* const ptr_rows_data= (const uchar*) ptr_after_width;
7065

7066
  size_t const data_size= event_len - (ptr_rows_data - (const uchar *) buf);
unknown's avatar
unknown committed
7067
  DBUG_PRINT("info",("m_table_id: %lu  m_flags: %d  m_width: %lu  data_size: %lu",
7068
                     m_table_id, m_flags, m_width, (ulong) data_size));
7069

7070
  m_rows_buf= (uchar*) my_malloc(data_size, MYF(MY_WME));
7071 7072
  if (likely((bool)m_rows_buf))
  {
7073
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7074
    m_curr_row= m_rows_buf;
7075
#endif
7076 7077 7078 7079 7080 7081 7082 7083 7084 7085 7086 7087 7088 7089 7090
    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().
7091
  my_free((uchar*)m_rows_buf, MYF(MY_ALLOW_ZERO_PTR));
7092 7093
}

7094 7095 7096 7097
int Rows_log_event::get_data_size()
{
  int const type_code= get_type_code();

7098 7099
  uchar buf[sizeof(m_width) + 1];
  uchar *end= net_store_length(buf, m_width);
7100 7101 7102 7103 7104 7105 7106

  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);
7107
  data_size+= (uint) (end - buf);
7108 7109 7110 7111

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

7112
  data_size+= (uint) (m_rows_cur - m_rows_buf);
7113 7114 7115 7116
  return data_size; 
}


7117
#ifndef MYSQL_CLIENT
7118
int Rows_log_event::do_add_row_data(uchar *row_data, size_t length)
7119 7120 7121 7122 7123 7124
{
  /*
    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
  */
7125
  DBUG_ENTER("Rows_log_event::do_add_row_data");
unknown's avatar
unknown committed
7126 7127
  DBUG_PRINT("enter", ("row_data: 0x%lx  length: %lu", (ulong) row_data,
                       (ulong) length));
7128 7129 7130 7131 7132
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
7133
  DBUG_DUMP("row_data", row_data, min(length, 32));
7134
#endif
7135 7136

  DBUG_ASSERT(m_rows_buf <= m_rows_cur);
7137
  DBUG_ASSERT(!m_rows_buf || (m_rows_end && m_rows_buf < m_rows_end));
7138 7139 7140
  DBUG_ASSERT(m_rows_cur <= m_rows_end);

  /* The cast will always work since m_rows_cur <= m_rows_end */
7141
  if (static_cast<size_t>(m_rows_end - m_rows_cur) <= length)
7142
  {
7143
    size_t const block_size= 1024;
7144
    my_ptrdiff_t const cur_size= m_rows_cur - m_rows_buf;
7145
    my_ptrdiff_t const new_alloc= 
7146
        block_size * ((cur_size + length + block_size - 1) / block_size);
7147

7148
    uchar* const new_buf= (uchar*)my_realloc((uchar*)m_rows_buf, (uint) new_alloc,
7149
                                           MYF(MY_ALLOW_ZERO_PTR|MY_WME));
7150 7151 7152 7153 7154 7155 7156 7157 7158 7159 7160 7161 7162 7163 7164 7165 7166
    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;
  }

7167
  DBUG_ASSERT(m_rows_cur + length <= m_rows_end);
7168 7169
  memcpy(m_rows_cur, row_data, length);
  m_rows_cur+= length;
7170
  m_row_count++;
7171 7172 7173 7174 7175
  DBUG_RETURN(0);
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7176
int Rows_log_event::do_apply_event(Relay_log_info const *rli)
7177
{
7178
  DBUG_ENTER("Rows_log_event::do_apply_event(Relay_log_info*)");
7179
  int error= 0;
7180
  /*
7181 7182 7183
    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
7184
    success.
7185
   */
7186
  if (m_table_id == ~0UL)
7187 7188 7189 7190 7191 7192 7193
  {
    /*
       This one is supposed to be set: just an extra check so that
       nothing strange has happened.
     */
    DBUG_ASSERT(get_flags(STMT_END_F));

7194
    const_cast<Relay_log_info*>(rli)->clear_tables_to_lock();
7195
    close_thread_tables(thd);
7196 7197 7198
    thd->clear_error();
    DBUG_RETURN(0);
  }
7199 7200 7201

  /*
    'thd' has been set by exec_relay_log_event(), just before calling
7202
    do_apply_event(). We still check here to prevent future coding
7203
    errors.
7204 7205 7206 7207
  */
  DBUG_ASSERT(rli->sql_thd == thd);

  /*
7208 7209 7210 7211
    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.
7212
  */
7213
  if (!thd->lock)
7214 7215
  {
    /*
7216 7217 7218 7219 7220 7221 7222
      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.
7223
    */
7224
    lex_start(thd);
7225
    mysql_reset_thd_for_next_command(thd);
7226 7227 7228 7229 7230 7231
    /*
      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;
7232 7233 7234 7235 7236 7237 7238 7239 7240 7241 7242
    /*
      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();
    }

7243

7244 7245 7246 7247 7248 7249 7250 7251 7252 7253 7254 7255 7256 7257 7258 7259 7260
    /*
      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));

7261
    if (simple_open_n_lock_tables(thd, rli->tables_to_lock))
7262
    {
Marc Alff's avatar
Marc Alff committed
7263
      uint actual_error= thd->stmt_da->sql_errno();
7264
      if (thd->is_slave_error || thd->is_fatal_error)
7265
      {
7266 7267
        /*
          Error reporting borrowed from Query_log_event with many excessive
7268 7269 7270
          simplifications. 
          We should not honour --slave-skip-errors at this point as we are
          having severe errors which should not be skiped.
7271 7272 7273
        */
        rli->report(ERROR_LEVEL, actual_error,
                    "Error '%s' on opening tables",
Marc Alff's avatar
Marc Alff committed
7274
                    (actual_error ? thd->stmt_da->message() :
7275 7276
                     "unexpected success or fatal error"));
        thd->is_slave_error= 1;
7277
      }
7278 7279
      const_cast<Relay_log_info*>(rli)->clear_tables_to_lock();
      DBUG_RETURN(actual_error);
7280
    }
7281 7282 7283 7284 7285 7286 7287 7288 7289 7290

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

    {
7291
      RPL_TABLE_LIST *ptr= rli->tables_to_lock;
7292 7293 7294 7295
      for ( ; ptr ; ptr= static_cast<RPL_TABLE_LIST*>(ptr->next_global))
      {
        if (ptr->m_tabledef.compatible_with(rli, ptr->table))
        {
7296 7297 7298 7299
          /*
            We should not honour --slave-skip-errors at this point as we are
            having severe errors which should not be skiped.
          */
7300 7301
          mysql_unlock_tables(thd, thd->lock);
          thd->lock= 0;
7302
          thd->is_slave_error= 1;
7303
          const_cast<Relay_log_info*>(rli)->clear_tables_to_lock();
7304 7305 7306 7307 7308
          DBUG_RETURN(ERR_BAD_TABLE_DEF);
        }
      }
    }

7309
    /*
7310 7311
      ... and then we add all the tables to the table map and remove
      them from tables to lock.
7312 7313 7314

      We also invalidate the query cache for all the tables, since
      they will now be changed.
7315 7316 7317 7318 7319 7320 7321

      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.
7322
     */
7323
    for (TABLE_LIST *ptr= rli->tables_to_lock ; ptr ; ptr= ptr->next_global)
7324
    {
7325
      const_cast<Relay_log_info*>(rli)->m_table_map.set_table(ptr->table_id, ptr->table);
7326
    }
7327 7328 7329
#ifdef HAVE_QUERY_CACHE
    query_cache.invalidate_locked_for_write(rli->tables_to_lock);
#endif
7330 7331
  }

7332 7333
  TABLE* 
    table= 
7334
    m_table= const_cast<Relay_log_info*>(rli)->m_table_map.get_table(m_table_id);
7335

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

7338 7339
  if (table)
  {
7340
    bool transactional_table= table->file->has_transactions();
7341 7342
    /*
      table == NULL means that this table should not be replicated
7343
      (this was set up by Table_map_log_event::do_apply_event()
7344
      which tested replicate-* rules).
7345
    */
7346 7347 7348 7349 7350 7351 7352 7353 7354 7355 7356

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

7357 7358 7359 7360 7361 7362 7363 7364 7365
    /*
      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.
     */
7366
    const_cast<Relay_log_info*>(rli)->set_flag(Relay_log_info::IN_STMT);
7367

7368 7369
     if ( m_width == table->s->fields && bitmap_is_set_all(&m_cols))
      set_flags(COMPLETE_ROWS_F);
7370

7371 7372 7373 7374 7375 7376 7377 7378 7379 7380 7381 7382 7383 7384 7385 7386
    /* 
      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);
7387

7388 7389
    this->slave_exec_mode= slave_exec_mode_options; // fix the mode

7390 7391
    // Do event specific preparations 
    error= do_before_row_operations(rli);
7392

7393
    // row processing loop
7394

7395 7396
    while (error == 0 && m_curr_row < m_rows_end)
    {
7397 7398 7399 7400
      /* 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;
7401 7402 7403

      error= do_exec_row(rli);

7404 7405 7406
      DBUG_PRINT("info", ("error: %s", HA_ERR(error)));
      DBUG_ASSERT(error != HA_ERR_RECORD_DELETED);

7407
      table->in_use = old_thd;
7408

7409 7410 7411 7412 7413 7414 7415 7416 7417 7418
      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)
7419 7420 7421 7422 7423
        {
          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);
7424
          clear_all_errors(thd, const_cast<Relay_log_info*>(rli));
7425
          error= 0;
7426 7427
          if (idempotent_error == 0)
            break;
7428
        }
7429 7430
      }

7431 7432 7433 7434 7435 7436 7437
      /*
       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.
      */ 
   
7438 7439 7440
      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));

7441
      if (!m_curr_row_end && !error)
7442
        error= unpack_current_row(rli);
7443 7444 7445 7446 7447 7448 7449 7450
  
      // 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;
 
7451 7452 7453
      if (error == 0 && !transactional_table)
        thd->transaction.all.modified_non_trans_table=
          thd->transaction.stmt.modified_non_trans_table= TRUE;
7454 7455
    } // row processing loop

7456
    DBUG_EXECUTE_IF("STOP_SLAVE_after_first_Rows_event",
7457
                    const_cast<Relay_log_info*>(rli)->abort_slave= 1;);
7458 7459 7460 7461 7462 7463 7464 7465 7466 7467 7468 7469 7470

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

7471
    if (!cache_stmt)
7472 7473 7474 7475
    {
      DBUG_PRINT("info", ("Marked that we need to keep log"));
      thd->options|= OPTION_KEEP_LOG;
    }
7476
  } // if (table)
7477

7478
  /*
7479 7480
    We need to delay this clear until here bacause unpack_current_row() uses
    master-side table definitions stored in rli.
7481 7482
  */
  if (rli->tables_to_lock && get_flags(STMT_END_F))
7483
    const_cast<Relay_log_info*>(rli)->clear_tables_to_lock();
7484 7485 7486
  
  if (error)
  {
7487 7488 7489
    slave_rows_error_report(ERROR_LEVEL, error, rli, thd, table,
                             get_type_str(),
                             RPL_LOG_NAME, (ulong) log_pos);
unknown's avatar
unknown committed
7490
    thd->reset_current_stmt_binlog_row_based();
7491
    const_cast<Relay_log_info*>(rli)->cleanup_context(thd, error);
7492
    thd->is_slave_error= 1;
7493
  }
7494 7495 7496 7497 7498
  /*
    This code would ideally be placed in do_update_pos() instead, but
    since we have no access to table there, we do the setting of
    last_event_start_time here instead.
  */
7499 7500
  else if (table && (table->s->primary_key == MAX_KEY) &&
           !cache_stmt && get_flags(STMT_END_F) == RLE_NO_FLAGS)
7501 7502 7503 7504 7505 7506 7507 7508 7509 7510 7511 7512 7513 7514 7515
  {
    /*
      ------------ Temporary fix until WL#2975 is implemented ---------

      This event is not the last one (no STMT_END_F). If we stop now
      (in case of terminate_slave_thread()), how will we restart? We
      have to restart from Table_map_log_event, but as this table is
      not transactional, the rows already inserted will still be
      present, and idempotency is not guaranteed (no PK) so we risk
      that repeating leads to double insert. So we desperately try to
      continue, hope we'll eventually leave this buggy situation (by
      executing the final Rows_log_event). If we are in a hopeless
      wait (reached end of last relay log and nothing gets appended
      there), we timeout after one minute, and notify DBA about the
      problem.  When WL#2975 is implemented, just remove the member
7516
      Relay_log_info::last_event_start_time and all its occurrences.
7517
    */
7518
    const_cast<Relay_log_info*>(rli)->last_event_start_time= my_time(0);
7519 7520
  }

7521
  DBUG_RETURN(error);
7522 7523
}

7524
Log_event::enum_skip_reason
7525
Rows_log_event::do_shall_skip(Relay_log_info *rli)
7526 7527 7528 7529 7530 7531 7532 7533 7534 7535 7536 7537
{
  /*
    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);
}

7538 7539 7540 7541 7542 7543 7544 7545 7546 7547
/**
   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.
 */
7548

7549 7550 7551
static int rows_event_stmt_cleanup(Relay_log_info const *rli, THD * thd)
{
  int error;
7552 7553 7554 7555 7556 7557 7558 7559 7560 7561 7562 7563 7564 7565 7566 7567 7568
  {
    /*
      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);
7569

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

7581 7582 7583 7584 7585 7586 7587 7588 7589 7590
    /*
      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
7591
    thd->reset_current_stmt_binlog_row_based();
7592

7593 7594 7595 7596 7597 7598 7599 7600 7601 7602 7603 7604 7605 7606 7607 7608 7609 7610 7611 7612 7613 7614 7615 7616 7617 7618 7619
    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))
  {
    if ((error= rows_event_stmt_cleanup(rli, thd)) == 0)
7620
    {
7621 7622 7623 7624
      /*
        Indicate that a statement is finished.
        Step the group log position if we are not in a transaction,
        otherwise increase the event log position.
7625
      */
7626 7627
      rli->stmt_done(log_pos, when);

7628 7629 7630 7631 7632 7633 7634 7635 7636 7637 7638
      /*
        Clear any errors pushed in thd->net.last_err* if for example "no key
        found" (as this is allowed). This is a safety measure; apparently
        those errors (e.g. when executing a Delete_rows_log_event of a
        non-existing row, like in rpl_row_mystery22.test,
        thd->net.last_error = "Can't find record in 't1'" and last_errno=1032)
        do not become visible. We still prefer to wipe them out.
      */
      thd->clear_error();
    }
    else
7639
    {
7640 7641 7642
      rli->report(ERROR_LEVEL, error,
                  "Error in %s event: commit of row events failed, "
                  "table `%s`.`%s`",
7643 7644
                  get_type_str(), m_table->s->db.str,
                  m_table->s->table_name.str);
7645
    }
7646
  }
7647
  else
7648
  {
7649
    rli->inc_event_relay_log_pos();
7650 7651
  }

7652
  DBUG_RETURN(error);
7653
}
7654

7655 7656 7657 7658 7659
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Rows_log_event::write_data_header(IO_CACHE *file)
{
7660
  uchar buf[ROWS_HEADER_LEN];	// No need to init the buffer
7661
  DBUG_ASSERT(m_table_id != ~0UL);
7662 7663 7664 7665 7666 7667 7668 7669 7670 7671 7672 7673 7674 7675 7676 7677 7678
  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.
  */
7679
  uchar sbuf[sizeof(m_width) + 1];
7680
  my_ptrdiff_t const data_size= m_rows_cur - m_rows_buf;
7681
  bool res= false;
7682 7683
  uchar *const sbuf_end= net_store_length(sbuf, (size_t) m_width);
  DBUG_ASSERT(static_cast<size_t>(sbuf_end - sbuf) <= sizeof(sbuf));
7684

7685 7686
  DBUG_DUMP("m_width", sbuf, (size_t) (sbuf_end - sbuf));
  res= res || my_b_safe_write(file, sbuf, (size_t) (sbuf_end - sbuf));
7687

7688 7689
  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,
7690 7691 7692 7693 7694 7695
                              no_bytes_in_map(&m_cols));
  /*
    TODO[refactor write]: Remove the "down cast" here (and elsewhere).
   */
  if (get_type_code() == UPDATE_ROWS_EVENT)
  {
7696 7697 7698
    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,
7699 7700
                                no_bytes_in_map(&m_cols_ai));
  }
7701 7702
  DBUG_DUMP("rows", m_rows_buf, data_size);
  res= res || my_b_safe_write(file, m_rows_buf, (size_t) data_size);
7703 7704 7705

  return res;

7706 7707 7708
}
#endif

7709
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
7710 7711
void Rows_log_event::pack_info(Protocol *protocol)
{
7712 7713 7714
  char buf[256];
  char const *const flagstr=
    get_flags(STMT_END_F) ? " flags: STMT_END_F" : "";
7715
  size_t bytes= my_snprintf(buf, sizeof(buf),
unknown's avatar
unknown committed
7716
                               "table_id: %lu%s", m_table_id, flagstr);
7717
  protocol->store(buf, bytes, &my_charset_bin);
7718 7719 7720
}
#endif

7721 7722 7723 7724 7725 7726 7727 7728 7729 7730 7731
#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);
7732 7733 7734
    my_b_printf(head, "\t%s: table id %lu%s\n",
                name, m_table_id,
                last_stmt_event ? " flags: STMT_END_F" : "");
7735 7736 7737 7738 7739
    print_base64(body, print_event_info, !last_stmt_event);
  }

  if (get_flags(STMT_END_F))
  {
7740 7741
    copy_event_cache_to_file_and_reinit(head, file);
    copy_event_cache_to_file_and_reinit(body, file);
7742 7743 7744 7745
  }
}
#endif

7746
/**************************************************************************
7747
	Table_map_log_event member functions and support functions
7748 7749
**************************************************************************/

7750 7751 7752 7753
/**
  @page How replication of field metadata works.
  
  When a table map is created, the master first calls 
7754
  Table_map_log_event::save_field_metadata() which calculates how many 
7755
  values will be in the field metadata. Only those fields that require the 
7756 7757 7758 7759 7760 7761 7762
  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.

7763 7764 7765 7766 7767 7768 7769
  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.

7770 7771 7772 7773 7774 7775 7776 7777 7778 7779
  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. 
7780 7781
*/

unknown's avatar
unknown committed
7782
#if !defined(MYSQL_CLIENT)
7783 7784 7785 7786 7787 7788
/**
  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
7789
  @retval  0  Ok.
7790

unknown's avatar
unknown committed
7791 7792
  @todo
  We may want to consider changing the encoding of the information.
7793 7794 7795 7796 7797 7798 7799 7800 7801 7802 7803 7804 7805 7806 7807 7808 7809 7810 7811
  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++)
7812 7813
    index+= m_table->s->field[i]->save_field_metadata(&m_field_metadata[index]);
  DBUG_RETURN(index);
7814 7815 7816
}
#endif /* !defined(MYSQL_CLIENT) */

7817 7818 7819 7820 7821 7822 7823 7824
/*
  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)
7825
  : Log_event(thd, 0, true),
7826 7827 7828 7829 7830
    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),
7831 7832 7833 7834 7835 7836 7837 7838 7839
    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)
7840
{
7841 7842
  uchar cbuf[sizeof(m_colcnt) + 1];
  uchar *cbuf_end;
7843
  DBUG_ASSERT(m_table_id != ~0UL);
7844 7845 7846 7847 7848 7849 7850 7851 7852 7853 7854 7855
  /*
    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
7856
  DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master", m_data_size= 6;);
7857 7858
  m_data_size+= m_dblen + 2;	// Include length and terminating \0
  m_data_size+= m_tbllen + 2;	// Include length and terminating \0
7859
  cbuf_end= net_store_length(cbuf, (size_t) m_colcnt);
Andrei Elkin's avatar
Andrei Elkin committed
7860
  DBUG_ASSERT(static_cast<size_t>(cbuf_end - cbuf) <= sizeof(cbuf));
7861
  m_data_size+= (cbuf_end - cbuf) + m_colcnt;	// COLCNT and column types
7862

7863
  /* If malloc fails, caught in is_valid() */
7864
  if ((m_memory= (uchar*) my_malloc(m_colcnt, MYF(MY_WME))))
7865
  {
unknown's avatar
unknown committed
7866
    m_coltype= reinterpret_cast<uchar*>(m_memory);
7867 7868 7869
    for (unsigned int i= 0 ; i < m_table->s->fields ; ++i)
      m_coltype[i]= m_table->field[i]->type();
  }
7870 7871 7872 7873 7874 7875 7876 7877 7878 7879 7880

  /*
    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,
7881
                                 &m_field_metadata, (m_colcnt * 2),
7882
                                 NULL);
7883 7884 7885 7886 7887 7888 7889 7890 7891 7892 7893

  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
7894 7895
    plus one or three bytes (see pack.c:net_store_length) for number of 
    elements in the field metadata array.
7896 7897
  */
  if (m_field_metadata_size > 255)
7898
    m_data_size+= m_field_metadata_size + 3; 
7899 7900 7901
  else
    m_data_size+= m_field_metadata_size + 1; 

7902 7903 7904 7905 7906
  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);

7907 7908 7909 7910 7911 7912 7913 7914 7915 7916 7917 7918 7919
}
#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
7920
    m_table(NULL),
7921
#endif
7922 7923 7924 7925 7926
    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)
7927
{
7928
  unsigned int bytes_read= 0;
7929 7930 7931 7932
  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
7933
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
7934 7935
                     event_len, common_header_len, post_header_len));

7936 7937 7938 7939 7940
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
7941
  DBUG_DUMP("event buffer", (uchar*) buf, event_len);
7942
#endif
7943 7944 7945 7946 7947 7948 7949 7950 7951 7952 7953 7954 7955 7956

  /* 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);
7957
    m_table_id= (ulong) uint6korr(post_start);
7958 7959 7960
    post_start+= TM_FLAGS_OFFSET;
  }

7961
  DBUG_ASSERT(m_table_id != ~0UL);
7962 7963 7964 7965 7966 7967 7968

  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 */
7969
  uchar const *const ptr_dblen= (uchar const*)vpart + 0;
unknown's avatar
unknown committed
7970
  m_dblen= *(uchar*) ptr_dblen;
7971 7972

  /* Length of database name + counter + terminating null */
7973
  uchar const *const ptr_tbllen= ptr_dblen + m_dblen + 2;
unknown's avatar
unknown committed
7974
  m_tbllen= *(uchar*) ptr_tbllen;
7975 7976

  /* Length of table name + counter + terminating null */
7977
  uchar const *const ptr_colcnt= ptr_tbllen + m_tbllen + 2;
7978 7979
  uchar *ptr_after_colcnt= (uchar*) ptr_colcnt;
  m_colcnt= net_field_length(&ptr_after_colcnt);
7980

unknown's avatar
unknown committed
7981
  DBUG_PRINT("info",("m_dblen: %lu  off: %ld  m_tbllen: %lu  off: %ld  m_colcnt: %lu  off: %ld",
7982 7983
                     (ulong) m_dblen, (long) (ptr_dblen-(const uchar*)vpart), 
                     (ulong) m_tbllen, (long) (ptr_tbllen-(const uchar*)vpart),
7984
                     m_colcnt, (long) (ptr_colcnt-(const uchar*)vpart)));
7985

7986
  /* Allocate mem for all fields in one go. If fails, caught in is_valid() */
7987 7988 7989 7990 7991
  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);
7992 7993 7994 7995

  if (m_memory)
  {
    /* Copy the different parts into their memory */
7996 7997
    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);
7998
    memcpy(m_coltype, ptr_after_colcnt, m_colcnt);
7999 8000

    ptr_after_colcnt= ptr_after_colcnt + m_colcnt;
8001
    bytes_read= (uint) (ptr_after_colcnt - (uchar *)buf);
8002 8003 8004 8005
    DBUG_PRINT("info", ("Bytes read: %d.\n", bytes_read));
    if (bytes_read < event_len)
    {
      m_field_metadata_size= net_field_length(&ptr_after_colcnt);
8006
      DBUG_ASSERT(m_field_metadata_size <= (m_colcnt * 2));
8007 8008 8009 8010 8011 8012 8013 8014 8015
      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);
    }
8016 8017 8018 8019 8020 8021 8022 8023
  }

  DBUG_VOID_RETURN;
}
#endif

Table_map_log_event::~Table_map_log_event()
{
8024
  my_free(m_meta_memory, MYF(MY_ALLOW_ZERO_PTR));
8025 8026 8027 8028 8029 8030 8031 8032 8033 8034 8035 8036 8037 8038 8039
  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)
8040
int Table_map_log_event::do_apply_event(Relay_log_info const *rli)
8041
{
8042 8043 8044 8045
  RPL_TABLE_LIST *table_list;
  char *db_mem, *tname_mem;
  size_t dummy_len;
  void *memory;
8046
  DBUG_ENTER("Table_map_log_event::do_apply_event(Relay_log_info*)");
8047 8048 8049 8050 8051 8052 8053
  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);

8054 8055 8056 8057 8058
  if (!(memory= my_multi_malloc(MYF(MY_WME),
                                &table_list, (uint) sizeof(RPL_TABLE_LIST),
                                &db_mem, (uint) NAME_LEN + 1,
                                &tname_mem, (uint) NAME_LEN + 1,
                                NullS)))
8059
    DBUG_RETURN(HA_ERR_OUT_OF_MEM);
8060 8061 8062 8063 8064 8065 8066 8067 8068 8069

  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);
8070 8071 8072

  int error= 0;

8073 8074 8075
  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))))
8076
  {
8077
    my_free(memory, MYF(MY_WME));
8078 8079
  }
  else
8080
  {
8081
    DBUG_ASSERT(thd->lex->query_tables != table_list);
8082

8083 8084 8085
    /*
      Use placement new to construct the table_def instance in the
      memory allocated for it inside table_list.
8086 8087 8088

      The memory allocated by the table_def structure (i.e., not the
      memory allocated *for* the table_def structure) is released
8089
      inside Relay_log_info::clear_tables_to_lock() by calling the
8090
      table_def destructor explicitly.
8091
    */
8092 8093
    new (&table_list->m_tabledef) table_def(m_coltype, m_colcnt, 
         m_field_metadata, m_field_metadata_size, m_null_bits);
8094
    table_list->m_tabledef_valid= TRUE;
8095 8096

    /*
8097
      We record in the slave's information that the table should be
unknown's avatar
unknown committed
8098
      locked by linking the table into the list of tables to lock.
8099
    */
8100
    table_list->next_global= table_list->next_local= rli->tables_to_lock;
8101 8102
    const_cast<Relay_log_info*>(rli)->tables_to_lock= table_list;
    const_cast<Relay_log_info*>(rli)->tables_to_lock_count++;
8103
    /* 'memory' is freed in clear_tables_to_lock */
8104 8105
  }

8106
  DBUG_RETURN(error);
8107
}
8108

8109
Log_event::enum_skip_reason
8110
Table_map_log_event::do_shall_skip(Relay_log_info *rli)
8111 8112 8113 8114 8115
{
  /*
    If the slave skip counter is 1, then we should not start executing
    on the next event.
  */
8116
  return continue_group(rli);
8117 8118
}

8119
int Table_map_log_event::do_update_pos(Relay_log_info *rli)
8120 8121 8122 8123 8124
{
  rli->inc_event_relay_log_pos();
  return 0;
}

8125 8126 8127 8128 8129
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Table_map_log_event::write_data_header(IO_CACHE *file)
{
8130
  DBUG_ASSERT(m_table_id != ~0UL);
8131
  uchar buf[TABLE_MAP_HEADER_LEN];
8132 8133 8134 8135 8136 8137 8138 8139 8140 8141 8142 8143 8144 8145 8146 8147 8148 8149 8150
  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);

8151 8152
  uchar const dbuf[]= { (uchar) m_dblen };
  uchar const tbuf[]= { (uchar) m_tbllen };
8153

8154
  uchar cbuf[sizeof(m_colcnt) + 1];
8155 8156
  uchar *const cbuf_end= net_store_length(cbuf, (size_t) m_colcnt);
  DBUG_ASSERT(static_cast<size_t>(cbuf_end - cbuf) <= sizeof(cbuf));
8157

8158 8159 8160 8161
  /*
    Store the size of the field metadata.
  */
  uchar mbuf[sizeof(m_field_metadata_size)];
8162
  uchar *const mbuf_end= net_store_length(mbuf, m_field_metadata_size);
8163

8164
  return (my_b_safe_write(file, dbuf,      sizeof(dbuf)) ||
8165
          my_b_safe_write(file, (const uchar*)m_dbnam,   m_dblen+1) ||
8166
          my_b_safe_write(file, tbuf,      sizeof(tbuf)) ||
8167 8168
          my_b_safe_write(file, (const uchar*)m_tblnam,  m_tbllen+1) ||
          my_b_safe_write(file, cbuf, (size_t) (cbuf_end - cbuf)) ||
8169 8170 8171 8172
          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));
8173 8174 8175 8176 8177 8178 8179 8180 8181 8182
 }
#endif

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

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

8183
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
8184 8185 8186
void Table_map_log_event::pack_info(Protocol *protocol)
{
    char buf[256];
8187
    size_t bytes= my_snprintf(buf, sizeof(buf),
unknown's avatar
unknown committed
8188
                                 "table_id: %lu (%s.%s)",
8189
                              m_table_id, m_dbnam, m_tblnam);
8190 8191
    protocol->store(buf, bytes, &my_charset_bin);
}
8192 8193
#endif

8194 8195 8196 8197 8198 8199 8200 8201 8202

#endif


#ifdef MYSQL_CLIENT
void Table_map_log_event::print(FILE *file, PRINT_EVENT_INFO *print_event_info)
{
  if (!print_event_info->short_form)
  {
8203 8204 8205 8206 8207
    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);
8208 8209 8210 8211 8212 8213 8214 8215 8216 8217 8218 8219 8220 8221 8222 8223 8224 8225 8226 8227 8228 8229 8230 8231 8232 8233 8234 8235 8236 8237 8238 8239 8240 8241
  }
}
#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)
8242 8243
int 
Write_rows_log_event::do_before_row_operations(const Slave_reporting_capability *const)
8244 8245 8246
{
  int error= 0;

8247 8248 8249
  /**
     todo: to introduce a property for the event (handler?) which forces
     applying the event in the replace (idempotent) fashion.
8250
  */
8251 8252 8253 8254 8255 8256 8257 8258 8259 8260 8261 8262 8263 8264 8265 8266 8267 8268 8269 8270 8271 8272 8273 8274 8275 8276 8277 8278 8279 8280 8281 8282 8283 8284 8285 8286 8287 8288 8289
  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.
    */
  }
8290 8291 8292 8293 8294 8295 8296 8297 8298 8299 8300 8301 8302 8303 8304 8305

  /*
    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).
  */
8306
  m_table->timestamp_field_type= TIMESTAMP_NO_AUTO_SET;
8307 8308 8309
  
  /* Honor next number column if present */
  m_table->next_number_field= m_table->found_next_number_field;
8310 8311 8312 8313 8314 8315 8316 8317 8318 8319
  /*
   * 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;
8320 8321 8322
  return error;
}

8323
int 
8324
Write_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const,
8325
                                              int error)
8326
{
8327
  int local_error= 0;
8328
  m_table->next_number_field=0;
8329
  m_table->auto_increment_field_not_null= FALSE;
8330 8331 8332 8333 8334 8335 8336 8337 8338 8339 8340 8341 8342
  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
    */
  }
8343
  if ((local_error= m_table->file->ha_end_bulk_insert()))
8344
  {
8345
    m_table->file->print_error(local_error, MYF(0));
8346 8347
  }
  return error? error : local_error;
8348 8349
}

8350
#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
8351 8352 8353 8354 8355 8356 8357 8358 8359 8360 8361 8362 8363

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

8364 8365 8366 8367 8368 8369 8370 8371 8372 8373 8374 8375 8376 8377 8378 8379 8380 8381 8382 8383 8384 8385 8386 8387 8388
/**
   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;
}

8389 8390
/**
  Write the current row into event's table.
8391

8392 8393 8394 8395 8396
  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.
8397

8398 8399 8400 8401 8402
  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.
8403

8404 8405 8406 8407
  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.
8408

8409 8410 8411 8412 8413 8414 8415 8416 8417 8418 8419 8420 8421 8422 8423 8424
  @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
8425
Rows_log_event::write_row(const Relay_log_info *const rli,
8426
                          const bool overwrite)
8427
{
8428 8429
  DBUG_ENTER("write_row");
  DBUG_ASSERT(m_table != NULL && thd != NULL);
8430

8431
  TABLE *table= m_table;  // pointer to event's table
8432 8433 8434 8435
  int error;
  int keynum;
  auto_afree_ptr<char> key(NULL);

8436 8437
  /* fill table->record[0] with default values */

8438
  if ((error= prepare_record(table, m_width,
8439 8440 8441 8442 8443
                             TRUE /* check if columns have def. values */)))
    DBUG_RETURN(error);
  
  /* unpack row into table->record[0] */
  error= unpack_current_row(rli); // TODO: how to handle errors?
8444 8445 8446 8447 8448 8449 8450 8451 8452 8453
  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);
  }
  
  
8454
#ifndef DBUG_OFF
8455
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
8456 8457 8458 8459
  DBUG_PRINT_BITSET("debug", "write_set = %s", table->write_set);
  DBUG_PRINT_BITSET("debug", "read_set = %s", table->read_set);
#endif

8460 8461 8462 8463 8464 8465 8466 8467
  /* 
    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. 
   */

8468 8469
  while ((error= table->file->ha_write_row(table->record[0])))
  {
8470 8471 8472 8473
    if (error == HA_ERR_LOCK_DEADLOCK ||
        error == HA_ERR_LOCK_WAIT_TIMEOUT ||
        (keynum= table->file->get_dup_key(error)) < 0 ||
        !overwrite)
8474
    {
8475
      DBUG_PRINT("info",("get_dup_key returns %d)", keynum));
8476
      /*
8477 8478 8479
        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
8480 8481 8482
        - either because the error was not "duplicate key" error
        - or because the information which key is not available
      */
8483
      table->file->print_error(error, MYF(0));
8484
      DBUG_RETURN(error);
8485 8486 8487 8488 8489 8490 8491 8492 8493 8494 8495
    }
    /*
       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.
     */
8496
    if (table->file->ha_table_flags() & HA_DUPLICATE_POS)
8497
    {
8498
      DBUG_PRINT("info",("Locating offending record using rnd_pos()"));
8499
      error= table->file->rnd_pos(table->record[1], table->file->dup_ref);
8500
      if (error)
8501
      {
8502
        DBUG_PRINT("info",("rnd_pos() returns error %d",error));
8503 8504
        if (error == HA_ERR_RECORD_DELETED)
          error= HA_ERR_KEY_NOT_FOUND;
8505
        table->file->print_error(error, MYF(0));
8506
        DBUG_RETURN(error);
8507
      }
8508 8509 8510
    }
    else
    {
8511 8512
      DBUG_PRINT("info",("Locating offending record using index_read_idx()"));

8513 8514
      if (table->file->extra(HA_EXTRA_FLUSH_CACHE))
      {
8515
        DBUG_PRINT("info",("Error when setting HA_EXTRA_FLUSH_CACHE"));
8516
        DBUG_RETURN(my_errno);
8517 8518 8519 8520 8521 8522
      }

      if (key.get() == NULL)
      {
        key.assign(static_cast<char*>(my_alloca(table->s->max_unique_length)));
        if (key.get() == NULL)
8523 8524
        {
          DBUG_PRINT("info",("Can't allocate key buffer"));
8525
          DBUG_RETURN(ENOMEM);
8526
        }
8527 8528
      }

8529 8530
      key_copy((uchar*)key.get(), table->record[0], table->key_info + keynum,
               0);
8531 8532 8533 8534
      error= table->file->index_read_idx_map(table->record[1], keynum,
                                             (const uchar*)key.get(),
                                             HA_WHOLE_KEY,
                                             HA_READ_KEY_EXACT);
8535
      if (error)
8536
      {
8537 8538 8539
        DBUG_PRINT("info",("index_read_idx() returns %s", HA_ERR(error)));
        if (error == HA_ERR_RECORD_DELETED)
          error= HA_ERR_KEY_NOT_FOUND;
8540
        table->file->print_error(error, MYF(0));
8541
        DBUG_RETURN(error);
8542
      }
8543 8544 8545
    }

    /*
8546
       Now, record[1] should contain the offending row.  That
8547 8548
       will enable us to update it or, alternatively, delete it (so
       that we can insert the new row afterwards).
8549
     */
8550

8551 8552 8553
    /*
      If row is incomplete we will use the record found to fill 
      missing columns.  
8554
    */
8555 8556 8557 8558 8559 8560 8561 8562 8563 8564 8565
    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
8566

8567
    /*
8568 8569 8570 8571 8572 8573 8574 8575 8576 8577 8578 8579 8580 8581 8582 8583 8584
       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())
    {
8585
      DBUG_PRINT("info",("Updating row using ha_update_row()"));
8586 8587
      error=table->file->ha_update_row(table->record[1],
                                       table->record[0]);
8588 8589 8590 8591 8592
      switch (error) {
                
      case HA_ERR_RECORD_IS_THE_SAME:
        DBUG_PRINT("info",("ignoring HA_ERR_RECORD_IS_THE_SAME error from"
                           " ha_update_row()"));
8593
        error= 0;
8594 8595 8596 8597 8598 8599
      
      case 0:
        break;
        
      default:    
        DBUG_PRINT("info",("ha_update_row() returns error %d",error));
8600
        table->file->print_error(error, MYF(0));
8601 8602
      }
      
8603
      DBUG_RETURN(error);
8604 8605 8606
    }
    else
    {
8607
      DBUG_PRINT("info",("Deleting offending row and trying to write new one again"));
8608
      if ((error= table->file->ha_delete_row(table->record[1])))
8609
      {
8610
        DBUG_PRINT("info",("ha_delete_row() returns error %d",error));
8611
        table->file->print_error(error, MYF(0));
8612
        DBUG_RETURN(error);
8613
      }
8614 8615 8616
      /* Will retry ha_write_row() with the offending row removed. */
    }
  }
8617

8618
  DBUG_RETURN(error);
8619 8620
}

8621 8622 8623
#endif

int 
8624
Write_rows_log_event::do_exec_row(const Relay_log_info *const rli)
8625
{
8626
  DBUG_ASSERT(m_table != NULL);
8627 8628 8629 8630
  int error=
    write_row(rli,        /* if 1 then overwrite */
              bit_is_set(slave_exec_mode, SLAVE_EXEC_MODE_IDEMPOTENT) == 1);
    
8631 8632 8633 8634 8635
  if (error && !thd->is_error())
  {
    DBUG_ASSERT(0);
    my_error(ER_UNKNOWN_ERROR, MYF(0));
  }
8636
  
8637
  return error; 
8638
}
8639

8640 8641 8642 8643 8644
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Write_rows_log_event::print(FILE *file, PRINT_EVENT_INFO* print_event_info)
{
8645
  Rows_log_event::print_helper(file, print_event_info, "Write_rows");
8646 8647 8648 8649 8650 8651 8652 8653
}
#endif

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

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
8654 8655 8656 8657 8658 8659
/*
  Compares table->record[0] and table->record[1]

  Returns TRUE if different.
*/
static bool record_compare(TABLE *table)
8660
{
8661 8662 8663 8664 8665 8666 8667 8668 8669 8670 8671 8672
  /*
    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.
   */

8673 8674 8675
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
  DBUG_DUMP("record[1]", table->record[1], table->s->reclength);

8676
  bool result= FALSE;
8677
  uchar saved_x[2], saved_filler[2];
8678 8679 8680 8681 8682 8683 8684 8685 8686 8687 8688 8689 8690

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

8691
  if (table->s->blob_fields + table->s->varchar_fields == 0)
8692 8693 8694 8695 8696
  {
    result= cmp_record(table,record[1]);
    goto record_compare_exit;
  }

8697 8698 8699 8700
  /* Compare null bits */
  if (memcmp(table->null_flags,
	     table->null_flags+table->s->rec_buff_length,
	     table->s->null_bytes))
8701 8702 8703 8704 8705
  {
    result= TRUE;				// Diff in NULL value
    goto record_compare_exit;
  }

8706 8707
  /* Compare updated fields */
  for (Field **ptr=table->field ; *ptr ; ptr++)
8708
  {
8709
    if ((*ptr)->cmp_binary_offset(table->s->rec_buff_length))
8710 8711 8712 8713
    {
      result= TRUE;
      goto record_compare_exit;
    }
8714
  }
8715 8716 8717 8718 8719 8720 8721 8722 8723 8724 8725 8726 8727 8728 8729

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];
    }
8730
  }
8731 8732

  return result;
8733 8734
}

8735 8736
/**
  Locate the current row in event's table.
8737

8738 8739 8740 8741
  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.
8742

8743 8744 8745
  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.
8746

8747 8748 8749 8750 8751
  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. 
8752

8753 8754 8755 8756
  @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.
8757

8758 8759
  @note If the engine allows random access of the records, a combination of
  @c position() and @c rnd_pos() will be used. 
8760
 */
8761

8762
int Rows_log_event::find_row(const Relay_log_info *rli)
8763
{
8764
  DBUG_ENTER("Rows_log_event::find_row");
8765 8766

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

8768
  TABLE *table= m_table;
8769
  int error= 0;
8770

8771 8772 8773 8774 8775 8776 8777 8778 8779
  /*
    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);
8780

8781 8782
#ifndef DBUG_OFF
  DBUG_PRINT("info",("looking for the following record"));
8783
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
8784
#endif
8785

8786 8787
  if ((table->file->ha_table_flags() & HA_PRIMARY_KEY_REQUIRED_FOR_POSITION) &&
      table->s->primary_key < MAX_KEY)
8788 8789 8790 8791 8792 8793
  {
    /*
      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
8794
      the "cursor" (i.e., record[0] in this case) at the correct row.
8795 8796 8797 8798 8799 8800 8801 8802 8803 8804 8805

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

8806
    */
8807
    DBUG_PRINT("info",("locating record using primary key (position)"));
8808
    int error= table->file->rnd_pos_by_record(table->record[0]);
8809 8810 8811
    if (error)
    {
      DBUG_PRINT("info",("rnd_pos returns error %d",error));
8812 8813
      if (error == HA_ERR_RECORD_DELETED)
        error= HA_ERR_KEY_NOT_FOUND;
8814 8815
      table->file->print_error(error, MYF(0));
    }
8816
    DBUG_RETURN(error);
8817 8818
  }

8819
  // We can't use position() - try other methods.
8820 8821 8822 8823 8824
  
  /* 
    We need to retrieve all fields
    TODO: Move this out from this function to main loop 
   */
8825
  table->use_all_columns();
unknown's avatar
unknown committed
8826

8827 8828 8829 8830 8831 8832
  /*
    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]);    

8833 8834
  if (table->s->keys > 0)
  {
8835 8836
    DBUG_PRINT("info",("locating record using primary key (index_read)"));

8837
    /* We have a key: search the table using the index */
8838
    if (!table->file->inited && (error= table->file->ha_index_init(0, FALSE)))
8839 8840 8841
    {
      DBUG_PRINT("info",("ha_index_init returns error %d",error));
      table->file->print_error(error, MYF(0));
8842
      goto err;
8843
    }
8844

8845 8846 8847 8848 8849 8850 8851 8852 8853
    /* 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.
     */
8854
#ifndef HAVE_purify
8855
    DBUG_DUMP("key data", m_key, table->key_info->key_length);
8856 8857
#endif

8858 8859 8860 8861 8862 8863
    /*
      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.
    */
8864 8865 8866 8867
    if (table->s->null_bytes > 0)
      table->record[0][table->s->null_bytes - 1]|=
        256U - (1U << table->s->last_null_bit_pos);

8868
    if ((error= table->file->index_read_map(table->record[0], m_key, 
8869
                                            HA_WHOLE_KEY,
8870
                                            HA_READ_KEY_EXACT)))
8871
    {
8872
      DBUG_PRINT("info",("no record matching the key found in the table"));
8873 8874
      if (error == HA_ERR_RECORD_DELETED)
        error= HA_ERR_KEY_NOT_FOUND;
8875
      table->file->print_error(error, MYF(0));
8876
      table->file->ha_index_end();
8877
      goto err;
8878 8879
    }

8880 8881 8882 8883 8884
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
8885 8886
    DBUG_PRINT("info",("found first matching record")); 
    DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
8887
#endif
8888 8889 8890 8891 8892 8893 8894 8895 8896 8897 8898 8899 8900
    /*
      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.
8901
    */
8902
    if (table->key_info->flags & HA_NOSAME)
8903 8904
    {
      table->file->ha_index_end();
8905
      goto ok;
8906
    }
8907

8908 8909
    /*
      In case key is not unique, we still have to iterate over records found
8910 8911
      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].
8912 8913 8914
     */ 
    DBUG_PRINT("info",("non-unique index, scanning it to find matching record")); 

8915
    while (record_compare(table))
8916
    {
8917 8918 8919 8920 8921
      /*
        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.
8922 8923 8924

        TODO[record format ndb]: Remove this code once NDB returns the
        correct record format.
8925
      */
8926 8927
      if (table->s->null_bytes > 0)
      {
8928
        table->record[0][table->s->null_bytes - 1]|=
8929 8930 8931
          256U - (1U << table->s->last_null_bit_pos);
      }

8932
      while ((error= table->file->index_next(table->record[0])))
8933
      {
8934 8935 8936
        /* We just skip records that has already been deleted */
        if (error == HA_ERR_RECORD_DELETED)
          continue;
8937 8938
        DBUG_PRINT("info",("no record matching the given row found"));
        table->file->print_error(error, MYF(0));
8939
        table->file->ha_index_end();
8940
        goto err;
8941 8942
      }
    }
8943 8944 8945 8946 8947

    /*
      Have to restart the scan to be able to fetch the next row.
    */
    table->file->ha_index_end();
8948 8949 8950
  }
  else
  {
8951 8952
    DBUG_PRINT("info",("locating record using table scan (rnd_next)"));

8953
    int restart_count= 0; // Number of times scanning has restarted from top
8954 8955 8956

    /* We don't have a key: search the table using rnd_next() */
    if ((error= table->file->ha_rnd_init(1)))
8957 8958 8959 8960
    {
      DBUG_PRINT("info",("error initializing table scan"
                         " (ha_rnd_init returns %d)",error));
      table->file->print_error(error, MYF(0));
8961
      goto err;
8962
    }
8963 8964

    /* Continue until we find the right record or have made a full loop */
8965 8966
    do
    {
8967
  restart_rnd_next:
8968
      error= table->file->rnd_next(table->record[0]);
8969

8970
      DBUG_PRINT("info", ("error: %s", HA_ERR(error)));
8971
      switch (error) {
8972

8973
      case 0:
8974
        break;
8975

8976 8977 8978 8979 8980 8981 8982
      /*
        If the record was deleted, we pick the next one without doing
        any comparisons.
      */
      case HA_ERR_RECORD_DELETED:
        goto restart_rnd_next;

8983
      case HA_ERR_END_OF_FILE:
8984 8985 8986
        if (++restart_count < 2)
          table->file->ha_rnd_init(1);
        break;
8987 8988

      default:
8989 8990 8991
        DBUG_PRINT("info", ("Failed to get next record"
                            " (rnd_next returns %d)",error));
        table->file->print_error(error, MYF(0));
8992
        table->file->ha_rnd_end();
8993
        goto err;
8994 8995
      }
    }
8996
    while (restart_count < 2 && record_compare(table));
8997 8998 8999 9000 9001
    
    /* 
      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
     */
9002

9003 9004 9005
    /*
      Have to restart the scan to be able to fetch the next row.
    */
9006 9007
    if (restart_count == 2)
      DBUG_PRINT("info", ("Record not found"));
9008 9009
    else
      DBUG_DUMP("record found", table->record[0], table->s->reclength);
9010 9011
    table->file->ha_rnd_end();

9012
    DBUG_ASSERT(error == HA_ERR_END_OF_FILE || error == 0);
9013
    goto err;
9014
  }
9015 9016
ok:
  table->default_column_bitmaps();
9017
  DBUG_RETURN(0);
9018 9019 9020 9021

err:
  table->default_column_bitmaps();
  DBUG_RETURN(error);
9022
}
9023

9024 9025 9026 9027 9028 9029 9030 9031 9032 9033 9034 9035 9036 9037 9038 9039 9040 9041 9042 9043 9044 9045 9046 9047 9048 9049 9050 9051 9052
#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)

9053 9054 9055 9056 9057
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)
9058 9059
  {
    /*
9060
      We don't need to allocate any memory for m_key since it is not used.
9061 9062 9063 9064
    */
    return 0;
  }

9065
  if (m_table->s->keys > 0)
9066
  {
9067 9068 9069 9070
    // 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;
9071
  }
9072
  return 0;
9073 9074
}

9075 9076 9077
int 
Delete_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const, 
                                               int error)
9078 9079
{
  /*error= ToDo:find out what this should really be, this triggers close_scan in nbd, returning error?*/
9080 9081
  m_table->file->ha_index_or_rnd_end();
  my_free(m_key, MYF(MY_ALLOW_ZERO_PTR));
9082
  m_key= NULL;
9083 9084 9085 9086

  return error;
}

9087
int Delete_rows_log_event::do_exec_row(const Relay_log_info *const rli)
9088
{
9089
  int error;
9090
  DBUG_ASSERT(m_table != NULL);
9091

9092
  if (!(error= find_row(rli))) 
9093 9094
  { 
    /*
9095
      Delete the record found, located in record[0]
9096
    */
9097
    error= m_table->file->ha_delete_row(m_table->record[0]);
9098
  }
9099 9100 9101 9102 9103 9104 9105 9106 9107
  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)
{
9108
  Rows_log_event::print_helper(file, print_event_info, "Delete_rows");
9109 9110 9111 9112 9113 9114 9115 9116 9117 9118 9119 9120 9121
}
#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,
9122 9123 9124 9125 9126 9127 9128 9129 9130 9131 9132 9133
                                             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,
9134 9135 9136
                                             bool is_transactional)
: Rows_log_event(thd_arg, tbl_arg, tid, cols, is_transactional)
{
9137 9138 9139 9140 9141
  init(cols);
}

void Update_rows_log_event::init(MY_BITMAP const *cols)
{
9142
  /* if bitmap_init fails, caught in is_valid() */
9143 9144
  if (likely(!bitmap_init(&m_cols_ai,
                          m_width <= sizeof(m_bitbuf_ai)*8 ? m_bitbuf_ai : NULL,
9145
                          m_width,
9146 9147 9148 9149
                          false)))
  {
    /* Cols can be zero if this is a dummy binrows event */
    if (likely(cols != NULL))
9150
    {
9151
      memcpy(m_cols_ai.bitmap, cols->bitmap, no_bytes_in_map(cols));
9152 9153
      create_last_word_mask(&m_cols_ai);
    }
9154
  }
9155 9156 9157
}
#endif /* !defined(MYSQL_CLIENT) */

9158 9159 9160 9161 9162 9163 9164 9165 9166

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


9167 9168 9169 9170 9171 9172 9173 9174 9175 9176 9177 9178 9179 9180 9181
/*
  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)

9182 9183 9184 9185
int 
Update_rows_log_event::do_before_row_operations(const Slave_reporting_capability *const)
{
  if (m_table->s->keys > 0)
9186
  {
9187 9188 9189 9190
    // 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;
9191 9192
  }

9193
  m_table->timestamp_field_type= TIMESTAMP_NO_AUTO_SET;
9194

9195
  return 0;
9196 9197
}

9198 9199 9200
int 
Update_rows_log_event::do_after_row_operations(const Slave_reporting_capability *const, 
                                               int error)
9201 9202
{
  /*error= ToDo:find out what this should really be, this triggers close_scan in nbd, returning error?*/
9203 9204
  m_table->file->ha_index_or_rnd_end();
  my_free(m_key, MYF(MY_ALLOW_ZERO_PTR)); // Free for multi_malloc
9205
  m_key= NULL;
9206 9207 9208 9209

  return error;
}

9210
int 
9211
Update_rows_log_event::do_exec_row(const Relay_log_info *const rli)
9212
{
9213
  DBUG_ASSERT(m_table != NULL);
9214

9215 9216
  int error= find_row(rli); 
  if (error)
9217 9218 9219 9220 9221 9222 9223
  {
    /*
      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);
9224
    return error;
9225
  }
9226

9227
  /*
9228
    This is the situation after locating BI:
9229

9230 9231 9232
    ===|=== before image ====|=== after image ===|===
       ^                     ^
       m_curr_row            m_curr_row_end
9233

9234 9235 9236
    BI found in the table is stored in record[0]. We copy it to record[1]
    and unpack AI to record[0].
   */
9237

9238
  store_record(m_table,record[1]);
9239

9240 9241
  m_curr_row= m_curr_row_end;
  error= unpack_current_row(rli); // this also updates m_curr_row_end
9242

9243
  /*
9244
    Now we have the right row to update.  The old row (the one we're
9245
    looking for) is in record[1] and the new row is in record[0].
9246
  */
9247 9248 9249 9250 9251 9252 9253 9254 9255 9256 9257
#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]);
9258 9259
  if (error == HA_ERR_RECORD_IS_THE_SAME)
    error= 0;
9260 9261 9262

  return error;
}
9263

9264 9265 9266 9267 9268 9269
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Update_rows_log_event::print(FILE *file,
				  PRINT_EVENT_INFO* print_event_info)
{
9270
  Rows_log_event::print_helper(file, print_event_info, "Update_rows");
9271 9272 9273
}
#endif

9274 9275 9276 9277 9278 9279 9280 9281 9282 9283 9284 9285 9286 9287

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

9288 9289 9290 9291 9292 9293 9294
  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().
9295
    m_incident= INCIDENT_NONE;
9296 9297 9298
    DBUG_VOID_RETURN;
  }
  m_incident= static_cast<Incident>(incident_number);
9299 9300
  char const *ptr= buf + common_header_len + post_header_len;
  char const *const str_end= buf + event_len;
unknown's avatar
unknown committed
9301 9302
  uint8 len= 0;                   // Assignment to keep compiler happy
  const char *str= NULL;          // Assignment to keep compiler happy
9303 9304 9305 9306 9307 9308 9309 9310 9311 9312 9313 9314 9315 9316 9317 9318 9319 9320 9321 9322 9323 9324 9325 9326 9327 9328 9329 9330 9331 9332 9333
  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];
9334
  size_t bytes;
9335 9336 9337 9338 9339 9340 9341 9342 9343 9344 9345 9346 9347 9348 9349 9350 9351 9352 9353 9354 9355
  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);
9356
  my_b_printf(&cache, "\n# Incident: %s\nRELOAD DATABASE; # Shall generate syntax error\n", description());
9357 9358 9359 9360 9361
}
#endif

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
int
9362
Incident_log_event::do_apply_event(Relay_log_info const *rli)
9363
{
9364
  DBUG_ENTER("Incident_log_event::do_apply_event");
9365 9366 9367 9368
  rli->report(ERROR_LEVEL, ER_SLAVE_INCIDENT,
              ER(ER_SLAVE_INCIDENT),
              description(),
              m_message.length > 0 ? m_message.str : "<none>");
9369 9370 9371 9372 9373 9374 9375 9376 9377
  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));
9378
  uchar buf[sizeof(int16)];
9379 9380 9381 9382 9383 9384 9385 9386
  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");
9387
  DBUG_RETURN(write_str(file, m_message.str, (uint) m_message.length));
9388
}
9389 9390 9391 9392 9393 9394 9395 9396 9397 9398 9399 9400 9401 9402 9403 9404 9405 9406 9407 9408 9409 9410 9411 9412 9413 9414 9415 9416 9417 9418 9419


#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