log_event.cc 232 KB
Newer Older
monty@mysql.com's avatar
monty@mysql.com committed
1
/* Copyright (C) 2000-2004 MySQL AB
2

bk@work.mysql.com's avatar
bk@work.mysql.com 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
5
   the Free Software Foundation; version 2 of the License.
6

bk@work.mysql.com's avatar
bk@work.mysql.com 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

bk@work.mysql.com's avatar
bk@work.mysql.com committed
12 13 14 15 16 17
   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 */


#ifndef MYSQL_CLIENT
kent@mysql.com's avatar
kent@mysql.com committed
18

19
#ifdef USE_PRAGMA_IMPLEMENTATION
bk@work.mysql.com's avatar
bk@work.mysql.com committed
20 21
#pragma implementation				// gcc: Class implementation
#endif
22

23
#include "mysql_priv.h"
24
#include "slave.h"
lars@mysql.com's avatar
lars@mysql.com committed
25
#include "rpl_filter.h"
26
#include "rpl_utility.h"
27
#include <my_dir.h>
bk@work.mysql.com's avatar
bk@work.mysql.com committed
28
#endif /* MYSQL_CLIENT */
29 30
#include <base64.h>
#include <my_bitmap.h>
bk@work.mysql.com's avatar
bk@work.mysql.com committed
31

32
#define log_cs	&my_charset_latin1
33

34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 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 110 111 112
/*
  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()
  {
    if (!my_b_copy_to_file(m_cache, m_file))
      reinit_io_cache(m_cache, WRITE_CACHE, 0L, FALSE, TRUE);
    if (m_flags | FLUSH_F)
      fflush(m_file);
  }

  /*
    Return a pointer to the internal IO_CACHE.

    SYNOPSIS
      operator&()

    DESCRIPTION
      Function to return a pointer to the internal, so that the object
      can be treated as a IO_CACHE and used with the my_b_* IO_CACHE
      functions

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


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
113
/*
114
  pretty_print_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
115
*/
116

117
#ifdef MYSQL_CLIENT
118
static void pretty_print_str(IO_CACHE* cache, char* str, int len)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
119
{
120
  char* end = str + len;
121
  my_b_printf(cache, "\'");
122 123
  while (str < end)
  {
124
    char c;
125
    switch ((c=*str++)) {
126 127 128 129 130 131 132
    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;
133
    default:
134
      my_b_printf(cache, "%c", c);
135 136
      break;
    }
137
  }
138
  my_b_printf(cache, "\'");
bk@work.mysql.com's avatar
bk@work.mysql.com committed
139
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
140
#endif /* MYSQL_CLIENT */
bk@work.mysql.com's avatar
bk@work.mysql.com committed
141

142 143 144 145 146 147 148 149 150 151 152 153 154 155 156
#ifdef HAVE_purify
static void
valgrind_check_mem(void *ptr, size_t len)
{
  static volatile uchar dummy;
  for (volatile uchar *p= (uchar*) ptr ; p != (uchar*) ptr + len ; ++p)
  {
    int const c = *p;
    if (c < 128)
      dummy= c + 1;
    else
      dummy = c - 1;
  }
}
#endif
157

monty@mysql.com's avatar
monty@mysql.com committed
158
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
159

160 161 162 163 164 165 166 167
static void clear_all_errors(THD *thd, struct st_relay_log_info *rli)
{
  thd->query_error = 0;
  thd->clear_error();
  *rli->last_slave_error = 0;
  rli->last_slave_errno = 0;
}

monty@mysql.com's avatar
monty@mysql.com committed
168

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
169
/*
monty@mysql.com's avatar
monty@mysql.com committed
170
  Ignore error code specified on command line
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
171
*/
172

173 174
inline int ignored_error_code(int err_code)
{
tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
175 176 177 178 179 180 181 182 183 184 185 186 187 188
#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
guilhem@mysql.com's avatar
guilhem@mysql.com committed
189 190
  return ((err_code == ER_SLAVE_IGNORED_TABLE) ||
          (use_slave_mask && bitmap_is_set(&slave_error_mask, err_code)));
191
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
192
#endif
193

194

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
195
/*
196
  pretty_print_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
197
*/
198

199
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
200
static char *pretty_print_str(char *packet, char *str, int len)
201
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
202 203
  char *end= str + len;
  char *pos= packet;
204
  *pos++= '\'';
205 206 207
  while (str < end)
  {
    char c;
208
    switch ((c=*str++)) {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
209 210 211 212 213 214 215
    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;
216
    default:
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
217
      *pos++= c;
218 219
      break;
    }
220
  }
221 222
  *pos++= '\'';
  return pos;
223
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
224
#endif /* !MYSQL_CLIENT */
225

226

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
227
/*
228 229 230 231 232 233 234 235 236 237 238
  Creates a temporary name for load data infile:

  SYNOPSIS
    slave_load_file_stem()
    buf		      Store new filename here
    file_id	      File_id (part of file name)
    event_server_id   Event_id (part of file name)
    ext		      Extension for file name

  RETURN
    Pointer to start of extension
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
239
*/
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
240

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
241
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
242 243
static char *slave_load_file_stem(char *buf, uint file_id,
                                  int event_server_id, const char *ext)
244
{
245
  char *res;
246 247 248
  fn_format(buf,"SQL_LOAD-",slave_load_tmpdir, "", MY_UNPACK_FILENAME);
  to_unix_path(buf);

249 250 251 252 253
  buf = strend(buf);
  buf = int10_to_str(::server_id, buf, 10);
  *buf++ = '-';
  buf = int10_to_str(event_server_id, buf, 10);
  *buf++ = '-';
254 255 256
  res= int10_to_str(file_id, buf, 10);
  strmov(res, ext);                             // Add extension last
  return res;                                   // Pointer to extension
257
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
258
#endif
259

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
260

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
261
/*
262 263
  Delete all temporary files used for SQL_LOAD.

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
264 265
  SYNOPSIS
    cleanup_load_tmpdir()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
266
*/
267

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
268
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
269 270 271 272 273
static void cleanup_load_tmpdir()
{
  MY_DIR *dirp;
  FILEINFO *file;
  uint i;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
274
  char fname[FN_REFLEN], prefbuf[31], *p;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
275

276 277 278
  if (!(dirp=my_dir(slave_load_tmpdir,MYF(MY_WME))))
    return;

279 280 281 282 283 284 285 286
  /* 
     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.
  */
287
  p= strmake(prefbuf, STRING_WITH_LEN("SQL_LOAD-"));
288 289 290 291
  p= int10_to_str(::server_id, p, 10);
  *(p++)= '-';
  *p= 0;

292 293 294
  for (i=0 ; i < (uint)dirp->number_off_files; i++)
  {
    file=dirp->dir_entry+i;
295
    if (is_prefix(file->name, prefbuf))
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
296 297 298 299
    {
      fn_format(fname,file->name,slave_load_tmpdir,"",MY_UNPACK_FILENAME);
      my_delete(fname, MYF(0));
    }
300 301 302 303
  }

  my_dirend(dirp);
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
304
#endif
305 306


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
307
/*
308
  write_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
309
*/
310

311
static bool write_str(IO_CACHE *file, char *str, uint length)
312
{
313 314 315 316
  byte tmp[1];
  tmp[0]= (byte) length;
  return (my_b_safe_write(file, tmp, sizeof(tmp)) ||
	  my_b_safe_write(file, (byte*) str, length));
317 318 319
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
320
/*
321
  read_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
322
*/
323

324 325
static inline int read_str(char **buf, char *buf_end, char **str,
			   uint8 *len)
326
{
327
  if (*buf + ((uint) (uchar) **buf) >= buf_end)
328
    return 1;
329 330 331
  *len= (uint8) **buf;
  *str= (*buf)+1;
  (*buf)+= (uint) *len+1;
332 333 334
  return 0;
}

335

336 337 338
/*
  Transforms a string into "" or its expression in 0x... form.
*/
monty@mysql.com's avatar
monty@mysql.com committed
339

340
char *str_to_hex(char *to, const char *from, uint len)
341 342 343
{
  if (len)
  {
monty@mysql.com's avatar
monty@mysql.com committed
344 345 346
    *to++= '0';
    *to++= 'x';
    to= octet2hex(to, from, len);
347 348
  }
  else
monty@mysql.com's avatar
monty@mysql.com committed
349 350
    to= strmov(to, "\"\"");
  return to;                               // pointer to end 0 of 'to'
351 352
}

353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374
/*
  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.
 */
#ifndef MYSQL_CLIENT
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++= '\'';
375
    ptr+= escape_string_for_mysql(csinfo, ptr, 0,
376 377 378 379 380 381 382 383
                                  from->ptr(), from->length());
    *ptr++='\'';
  }
  to->length(orig_len + ptr - beg);
  return 0;
}
#endif

384 385 386 387 388
/*
  Prints a "session_var=value" string. Used by mysqlbinlog to print some SET
  commands just before it prints a query.
*/

389
#ifdef MYSQL_CLIENT
390 391 392
static void print_set_option(IO_CACHE* file, uint32 bits_changed,
                             uint32 option, uint32 flags, const char* name,
                             bool* need_comma)
393 394 395 396
{
  if (bits_changed & option)
  {
    if (*need_comma)
397 398
      my_b_printf(file,", ");
    my_b_printf(file,"%s=%d", name, test(flags & option));
399 400 401
    *need_comma= 1;
  }
}
402
#endif
403

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
404
/**************************************************************************
405
	Log_event methods (= the parent class of all events)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
406
**************************************************************************/
407

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
408
/*
409
  Log_event::get_type_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
410
*/
411

412 413
const char* Log_event::get_type_str()
{
414
  switch(get_type_code()) {
415
  case START_EVENT_V3:  return "Start_v3";
416 417 418 419 420
  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";
421
  case NEW_LOAD_EVENT:   return "New_load";
422
  case SLAVE_EVENT:  return "Slave";
423 424 425 426
  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";
427
  case RAND_EVENT: return "RAND";
428
  case XID_EVENT: return "Xid";
429
  case USER_VAR_EVENT: return "User var";
430
  case FORMAT_DESCRIPTION_EVENT: return "Format_desc";
431 432 433 434
  case TABLE_MAP_EVENT: return "Table_map";
  case WRITE_ROWS_EVENT: return "Write_rows";
  case UPDATE_ROWS_EVENT: return "Update_rows";
  case DELETE_ROWS_EVENT: return "Delete_rows";
435 436
  case BEGIN_LOAD_QUERY_EVENT: return "Begin_load_query";
  case EXECUTE_LOAD_QUERY_EVENT: return "Execute_load_query";
437
  default: return "Unknown";				/* impossible */
438 439 440
  }
}

441

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
442
/*
443
  Log_event::Log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
444
*/
445

446
#ifndef MYSQL_CLIENT
447
Log_event::Log_event(THD* thd_arg, uint16 flags_arg, bool using_trans)
448
  :log_pos(0), temp_buf(0), exec_time(0), flags(flags_arg), thd(thd_arg)
449
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
450 451
  server_id=	thd->server_id;
  when=		thd->start_time;
452
  cache_stmt=	using_trans;
453 454 455
}


monty@mysql.com's avatar
monty@mysql.com committed
456
/*
457 458 459 460
  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).
monty@mysql.com's avatar
monty@mysql.com committed
461 462
*/

463
Log_event::Log_event()
464
  :temp_buf(0), exec_time(0), flags(0), cache_stmt(0),
465 466
   thd(0)
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
467 468 469
  server_id=	::server_id;
  when=		time(NULL);
  log_pos=	0;
470
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
471
#endif /* !MYSQL_CLIENT */
472 473


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
474
/*
475
  Log_event::Log_event()
476
*/
477

478
Log_event::Log_event(const char* buf,
479
                     const Format_description_log_event* description_event)
480
  :temp_buf(0), cache_stmt(0)
481
{
482 483
#ifndef MYSQL_CLIENT
  thd = 0;
484
#endif
485 486
  when = uint4korr(buf);
  server_id = uint4korr(buf + SERVER_ID_OFFSET);
487
  if (description_event->binlog_version==1)
488
  {
489 490 491
    log_pos= 0;
    flags= 0;
    return;
492
  }
493 494 495
  /* 4.0 or newer */
  log_pos= uint4korr(buf + LOG_POS_OFFSET);
  /*
496 497 498 499 500 501 502 503
    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).
504 505 506
  */
  if (description_event->binlog_version==3 &&
      buf[EVENT_TYPE_OFFSET]<FORMAT_DESCRIPTION_EVENT && log_pos)
507
  {
508 509 510
      /*
        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
511 512
        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
513
        not have its log_pos (which is 0) changed or it will modify
514 515 516 517
        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).
518 519
      */
    log_pos+= uint4korr(buf + EVENT_LEN_OFFSET);
520
  }
521 522 523 524 525 526 527
  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))
  {
    /*
528 529
      These events always have a header which stops here (i.e. their
      header is FROZEN).
530 531
    */
    /*
532 533 534 535 536 537 538
      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.
539 540 541 542
    */
    return;
  }
  /* otherwise, go on with reading the header from buf (nothing now) */
543 544 545
}

#ifndef MYSQL_CLIENT
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
546
#ifdef HAVE_REPLICATION
547

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
548
/*
549
  Log_event::exec_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
550
*/
551

552
int Log_event::exec_event(struct st_relay_log_info* rli)
553
{
monty@mysql.com's avatar
monty@mysql.com committed
554 555
  DBUG_ENTER("Log_event::exec_event");

556 557 558 559 560 561 562 563 564 565 566 567
  /*
    rli is null when (as far as I (Guilhem) know)
    the caller is
    Load_log_event::exec_event *and* that one is called from
    Execute_load_log_event::exec_event. 
    In this case, we don't do anything here ;
    Execute_load_log_event::exec_event will call Log_event::exec_event
    again later with the proper rli.
    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.
  */
568
  if (rli)
569
  {
570
    /*
571 572 573 574
      If in a transaction, and if the slave supports transactions, just
      inc_event_relay_log_pos(). We only have to check for OPTION_BEGIN
      (not OPTION_NOT_AUTOCOMMIT) as transactions are logged with
      BEGIN/COMMIT, not with SET AUTOCOMMIT= .
575

576
      CAUTION: opt_using_transactions means
577
      innodb || bdb ; suppose the master supports InnoDB and BDB,
578
      but the slave supports only BDB, problems
579
      will arise:
580 581
      - suppose an InnoDB table is created on the master,
      - then it will be MyISAM on the slave
582 583 584 585 586 587 588 589 590 591 592 593
      - but as opt_using_transactions is true, the slave will believe he
      is transactional with the MyISAM table. And problems will come
      when one does START SLAVE; STOP SLAVE; START SLAVE; (the slave
      will resume at BEGIN whereas there has not been any rollback).
      This is the problem of using opt_using_transactions instead of a
      finer "does the slave support
      _the_transactional_handler_used_on_the_master_".

      More generally, we'll have problems when a query mixes a
      transactional handler and MyISAM and STOP SLAVE is issued in the
      middle of the "transaction". START SLAVE will resume at BEGIN
      while the MyISAM table has already been updated.
594 595
    */
    if ((thd->options & OPTION_BEGIN) && opt_using_transactions)
596
      rli->inc_event_relay_log_pos();
597 598
    else
    {
599
      rli->inc_group_relay_log_pos(log_pos);
600
      flush_relay_log_info(rli);
601
      /* 
602 603
         Note that Rotate_log_event::exec_event() does not call this
         function, so there is no chance that a fake rotate event resets
604
         last_master_timestamp.
605 606 607
         Note that we update without mutex (probably ok - except in some very
         rare cases, only consequence is that value may take some time to
         display in Seconds_Behind_Master - not critical).
608 609
      */
      rli->last_master_timestamp= when;
610
    }
611
  }
monty@mysql.com's avatar
monty@mysql.com committed
612
  DBUG_RETURN(0);
613
}
614

615

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
616
/*
617
  Log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
618
*/
619

620
void Log_event::pack_info(Protocol *protocol)
621
{
622
  protocol->store("", &my_charset_bin);
623 624 625
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
626
/*
627
  Log_event::net_send()
628

629
  Only called by SHOW BINLOG EVENTS
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
630
*/
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
631

632
int Log_event::net_send(Protocol *protocol, const char* log_name, my_off_t pos)
633
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
634 635
  const char *p= strrchr(log_name, FN_LIBCHAR);
  const char *event_type;
636 637 638
  if (p)
    log_name = p + 1;
  
639
  protocol->prepare_for_resend();
640
  protocol->store(log_name, &my_charset_bin);
641
  protocol->store((ulonglong) pos);
642
  event_type = get_type_str();
643
  protocol->store(event_type, strlen(event_type), &my_charset_bin);
644 645 646 647
  protocol->store((uint32) server_id);
  protocol->store((ulonglong) log_pos);
  pack_info(protocol);
  return protocol->write();
648
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
649 650 651
#endif /* HAVE_REPLICATION */


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
652
/*
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
653
  Log_event::init_show_field_list()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
654
*/
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
655 656 657 658 659 660 661 662 663

void Log_event::init_show_field_list(List<Item>* field_list)
{
  field_list->push_back(new Item_empty_string("Log_name", 20));
  field_list->push_back(new Item_return_int("Pos", 11,
					    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));
664
  field_list->push_back(new Item_return_int("End_log_pos", 11,
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
665 666 667 668
					    MYSQL_TYPE_LONGLONG));
  field_list->push_back(new Item_empty_string("Info", 20));
}

669

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
670
/*
671
  Log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
672
*/
673

674
bool Log_event::write_header(IO_CACHE* file, ulong event_data_length)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
675
{
676 677
  byte header[LOG_EVENT_HEADER_LEN];
  DBUG_ENTER("Log_event::write_header");
bk@work.mysql.com's avatar
bk@work.mysql.com committed
678

679 680
  /* Store number of bytes that will be written by this event */
  data_written= event_data_length + sizeof(header);
681

682 683 684 685
  /*
    log_pos != 0 if this is relay-log event. In this case we should not
    change the position
  */
686

687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741
  if (is_artificial_event())
  {
    /*
      We should not do any cleanup on slave when reading this. We
      mark this by setting log_pos to 0.  Start_log_event_v3() will
      detect this on reading and set artificial_event=1 for the event.
    */
    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;
  }

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

  int4store(header, (ulong) when);              // timestamp
  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);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
742 743 744
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
745
/*
746
  Log_event::read_log_event()
747 748 749 750

  This needn't be format-tolerant, because we only read
  LOG_EVENT_MINIMAL_HEADER_LEN (we just want to read the event's length).

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
751
*/
752

753
int Log_event::read_log_event(IO_CACHE* file, String* packet,
754
			      pthread_mutex_t* log_lock)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
755 756
{
  ulong data_len;
757
  int result=0;
758
  char buf[LOG_EVENT_MINIMAL_HEADER_LEN];
759
  DBUG_ENTER("read_log_event");
760

761
  if (log_lock)
762
    pthread_mutex_lock(log_lock);
763 764
  if (my_b_read(file, (byte*) buf, sizeof(buf)))
  {
765 766 767 768 769
    /*
      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.
    */
770
    DBUG_PRINT("error",("file->error: %d", file->error));
771 772 773
    if (!file->error)
      result= LOG_READ_EOF;
    else
774
      result= (file->error > 0 ? LOG_READ_TRUNC : LOG_READ_IO);
775
    goto end;
776
  }
777
  data_len= uint4korr(buf + EVENT_LEN_OFFSET);
778
  if (data_len < LOG_EVENT_MINIMAL_HEADER_LEN ||
779
      data_len > current_thd->variables.max_allowed_packet)
780
  {
781
    DBUG_PRINT("error",("data_len: %ld", data_len));
782
    result= ((data_len < LOG_EVENT_MINIMAL_HEADER_LEN) ? LOG_READ_BOGUS :
783 784
	     LOG_READ_TOO_LARGE);
    goto end;
785
  }
bk@work.mysql.com's avatar
bk@work.mysql.com committed
786
  packet->append(buf, sizeof(buf));
787
  data_len-= LOG_EVENT_MINIMAL_HEADER_LEN;
788 789 790
  if (data_len)
  {
    if (packet->append(file, data_len))
791
    {
792
      /*
793 794
	Here if we hit EOF it's really an error: as data_len is >=0
        there's supposed to be more bytes available. 
795
	EOF means we are reading the event partially, which should
796
	never happen: either we read badly or the binlog is truncated.
797 798 799
      */
      result= file->error >= 0 ? LOG_READ_TRUNC: LOG_READ_IO;
      /* Implicit goto end; */
800
    }
801
  }
802 803 804 805

end:
  if (log_lock)
    pthread_mutex_unlock(log_lock);
806
  DBUG_RETURN(result);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
807
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
808
#endif /* !MYSQL_CLIENT */
bk@work.mysql.com's avatar
bk@work.mysql.com committed
809

810
#ifndef MYSQL_CLIENT
811 812
#define UNLOCK_MUTEX if (log_lock) pthread_mutex_unlock(log_lock);
#define LOCK_MUTEX if (log_lock) pthread_mutex_lock(log_lock);
813
#else
814
#define UNLOCK_MUTEX
815 816 817
#define LOCK_MUTEX
#endif

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
818
/*
819 820
  Log_event::read_log_event()

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
821
  NOTE:
822
    Allocates memory;  The caller is responsible for clean-up.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
823
*/
824

825
#ifndef MYSQL_CLIENT
826 827
Log_event* Log_event::read_log_event(IO_CACHE* file,
				     pthread_mutex_t* log_lock,
828
                                     const Format_description_log_event *description_event)
829
#else
830 831
Log_event* Log_event::read_log_event(IO_CACHE* file,
                                     const Format_description_log_event *description_event)
832
#endif
bk@work.mysql.com's avatar
bk@work.mysql.com committed
833
{
834
  DBUG_ENTER("Log_event::read_log_event(IO_CACHE *, Format_description_log_event *");
835
  DBUG_ASSERT(description_event != 0);
836 837 838 839 840
  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
841 842
    of 13 bytes, whereas LOG_EVENT_MINIMAL_HEADER_LEN is 19 bytes (it's
    "minimal" over the set {MySQL >=4.0}).
843 844 845
  */
  uint header_size= min(description_event->common_header_len,
                        LOG_EVENT_MINIMAL_HEADER_LEN);
846

847
  LOCK_MUTEX;
848
  DBUG_PRINT("info", ("my_b_tell: %lu", (ulong) my_b_tell(file)));
849
  if (my_b_read(file, (byte *) head, header_size))
850
  {
851 852
    DBUG_PRINT("info", ("Log_event::read_log_event(IO_CACHE*,Format_desc*) \
failed my_b_read"));
sasha@mysql.sashanet.com's avatar
sasha@mysql.sashanet.com committed
853
    UNLOCK_MUTEX;
854
    /*
855 856 857
      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.
858
    */
859
    DBUG_RETURN(0);
860
  }
861
  uint data_len = uint4korr(head + EVENT_LEN_OFFSET);
862 863 864
  char *buf= 0;
  const char *error= 0;
  Log_event *res=  0;
865 866
#ifndef max_allowed_packet
  THD *thd=current_thd;
867
  uint max_allowed_packet= thd ? thd->variables.max_allowed_packet : ~(ulong)0;
868
#endif
bk@work.mysql.com's avatar
bk@work.mysql.com committed
869

870
  if (data_len > max_allowed_packet)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
871
  {
872 873
    error = "Event too big";
    goto err;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
874 875
  }

876
  if (data_len < header_size)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
877
  {
878 879
    error = "Event too small";
    goto err;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
880
  }
881 882 883

  // some events use the extra byte to null-terminate strings
  if (!(buf = my_malloc(data_len+1, MYF(MY_WME))))
884 885 886
  {
    error = "Out of memory";
    goto err;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
887
  }
888
  buf[data_len] = 0;
889
  memcpy(buf, head, header_size);
890
  if (my_b_read(file, (byte*) buf + header_size, data_len - header_size))
891 892 893 894
  {
    error = "read error";
    goto err;
  }
895
  if ((res= read_log_event(buf, data_len, &error, description_event)))
896
    res->register_temp_buf(buf);
897

898
err:
sasha@mysql.sashanet.com's avatar
sasha@mysql.sashanet.com committed
899
  UNLOCK_MUTEX;
900
  if (!res)
901
  {
902
    DBUG_ASSERT(error != 0);
903 904
    sql_print_error("Error in Log_event::read_log_event(): "
                    "'%s', data_len: %d, event_type: %d",
905
		    error,data_len,head[EVENT_TYPE_OFFSET]);
906
    my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
907 908 909 910 911 912 913 914 915
    /*
      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;
916
  }
917
  DBUG_RETURN(res);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
918 919
}

920

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
921
/*
922
  Log_event::read_log_event()
923 924
  Binlog format tolerance is in (buf, event_len, description_event)
  constructors.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
925
*/
926

927 928 929
Log_event* Log_event::read_log_event(const char* buf, uint event_len,
				     const char **error,
                                     const Format_description_log_event *description_event)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
930
{
931 932
  Log_event* ev;
  DBUG_ENTER("Log_event::read_log_event(char*,...)");
933
  DBUG_ASSERT(description_event != 0);
934
  DBUG_PRINT("info", ("binlog_version: %d", description_event->binlog_version));
935
  if (event_len < EVENT_LEN_OFFSET ||
936 937 938
      (uint) event_len != uint4korr(buf+EVENT_LEN_OFFSET))
  {
    *error="Sanity check failed";		// Needed to free buffer
monty@mysql.com's avatar
monty@mysql.com committed
939
    DBUG_RETURN(NULL); // general sanity check - will fail on a partial read
940
  }
941

942 943 944
  /* To check the integrity of the Log_event_type enumeration */
  DBUG_ASSERT(buf[EVENT_TYPE_OFFSET] < ENUM_END_EVENT);

945
  switch(buf[EVENT_TYPE_OFFSET]) {
bk@work.mysql.com's avatar
bk@work.mysql.com committed
946
  case QUERY_EVENT:
947
    ev  = new Query_log_event(buf, event_len, description_event, QUERY_EVENT);
948
    break;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
949
  case LOAD_EVENT:
950
    ev = new Load_log_event(buf, event_len, description_event);
951
    break;
952
  case NEW_LOAD_EVENT:
953
    ev = new Load_log_event(buf, event_len, description_event);
954
    break;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
955
  case ROTATE_EVENT:
956
    ev = new Rotate_log_event(buf, event_len, description_event);
957
    break;
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
958
#ifdef HAVE_REPLICATION
959
  case SLAVE_EVENT: /* can never happen (unused event) */
960 961
    ev = new Slave_log_event(buf, event_len);
    break;
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
962
#endif /* HAVE_REPLICATION */
963
  case CREATE_FILE_EVENT:
964
    ev = new Create_file_log_event(buf, event_len, description_event);
965 966
    break;
  case APPEND_BLOCK_EVENT:
967
    ev = new Append_block_log_event(buf, event_len, description_event);
968 969
    break;
  case DELETE_FILE_EVENT:
970
    ev = new Delete_file_log_event(buf, event_len, description_event);
971 972
    break;
  case EXEC_LOAD_EVENT:
973
    ev = new Execute_load_log_event(buf, event_len, description_event);
974
    break;
975 976
  case START_EVENT_V3: /* this is sent only by MySQL <=4.x */
    ev = new Start_log_event_v3(buf, description_event);
977 978
    break;
  case STOP_EVENT:
979
    ev = new Stop_log_event(buf, description_event);
980 981
    break;
  case INTVAR_EVENT:
982
    ev = new Intvar_log_event(buf, description_event);
983
    break;
984 985 986
  case XID_EVENT:
    ev = new Xid_log_event(buf, description_event);
    break;
nick@mysql.com's avatar
nick@mysql.com committed
987
  case RAND_EVENT:
988
    ev = new Rand_log_event(buf, description_event);
nick@mysql.com's avatar
nick@mysql.com committed
989
    break;
990
  case USER_VAR_EVENT:
991 992 993 994
    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); 
995
    break;
996
#if defined(HAVE_REPLICATION) 
997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009
  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;
#endif
1010 1011 1012 1013 1014 1015
  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;
1016
  default:
1017 1018
    DBUG_PRINT("error",("Unknown evernt code: %d",(int) buf[EVENT_TYPE_OFFSET]));
    ev= NULL;
1019
    break;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1020
  }
1021

1022
  /*
1023 1024 1025 1026 1027 1028 1029
    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'.
1030
  */
1031
  if (!ev || !ev->is_valid())
1032
  {
1033 1034
    DBUG_PRINT("error",("Found invalid event in binary log"));

1035
    delete ev;
1036
#ifdef MYSQL_CLIENT
1037
    if (!force_opt) /* then mysqlbinlog dies */
1038 1039
    {
      *error= "Found invalid event in binary log";
monty@mysql.com's avatar
monty@mysql.com committed
1040
      DBUG_RETURN(0);
1041
    }
1042
    ev= new Unknown_log_event(buf, description_event);
1043 1044
#else
    *error= "Found invalid event in binary log";
monty@mysql.com's avatar
monty@mysql.com committed
1045
    DBUG_RETURN(0);
1046
#endif
1047
  }
monty@mysql.com's avatar
monty@mysql.com committed
1048
  DBUG_RETURN(ev);  
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1049 1050
}

1051
#ifdef MYSQL_CLIENT
1052

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1053
/*
1054
  Log_event::print_header()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1055
*/
1056

1057 1058 1059
void Log_event::print_header(IO_CACHE* file,
                             PRINT_EVENT_INFO* print_event_info,
                             bool is_more __attribute__((unused)))
1060
{
1061
  char llbuff[22];
1062
  my_off_t hexdump_from= print_event_info->hexdump_from;
1063
  DBUG_ENTER("Log_event::print_header");
lars@mysql.com's avatar
lars@mysql.com committed
1064

1065
  my_b_printf(file, "#");
1066
  print_timestamp(file);
1067 1068
  my_b_printf(file, " server id %d  end_log_pos %s ", server_id,
              llstr(log_pos,llbuff));
1069

1070
  /* mysqlbinlog --hexdump */
1071
  if (print_event_info->hexdump_from)
1072
  {
1073
    my_b_printf(file, "\n");
1074 1075 1076
    uchar *ptr= (uchar*)temp_buf;
    my_off_t size=
      uint4korr(ptr + EVENT_LEN_OFFSET) - LOG_EVENT_MINIMAL_HEADER_LEN;
1077 1078
    my_off_t i;

1079 1080 1081 1082
    /* 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};

lars@mysql.com's avatar
lars@mysql.com committed
1083
    /* Pretty-print event common header if header is exactly 19 bytes */
1084
    if (print_event_info->common_header_len == LOG_EVENT_MINIMAL_HEADER_LEN)
lars@mysql.com's avatar
lars@mysql.com committed
1085
    {
1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099
      char emit_buf[256];               // Enough for storing one line
      my_b_printf(file, "# Position  Timestamp   Type   Master ID        "
                  "Size      Master Pos    Flags \n");
      int const bytes_written=
        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]);
      DBUG_ASSERT(bytes_written >= 0);
      DBUG_ASSERT(static_cast<my_size_t>(bytes_written) < sizeof(emit_buf));
1100
      my_b_write(file, (byte*) emit_buf, bytes_written);
lars@mysql.com's avatar
lars@mysql.com committed
1101 1102 1103
      ptr += LOG_EVENT_MINIMAL_HEADER_LEN;
      hexdump_from += LOG_EVENT_MINIMAL_HEADER_LEN;
    }
1104 1105 1106 1107 1108

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

1113
      *c++= my_isalnum(&my_charset_bin, *ptr) ? *ptr : '.';
1114 1115 1116

      if (i % 16 == 15)
      {
1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130
        /*
          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];
        int const bytes_written=
          my_snprintf(emit_buf, sizeof(emit_buf),
                      "# %8.8lx %-48.48s |%16s|\n",
                      (unsigned long) (hexdump_from + (i & 0xfffffff0)),
                      hex_string, char_string);
        DBUG_ASSERT(bytes_written >= 0);
        DBUG_ASSERT(static_cast<my_size_t>(bytes_written) < sizeof(emit_buf));
1131
	my_b_write(file, (byte*) emit_buf, bytes_written);
1132 1133 1134 1135
	hex_string[0]= 0;
	char_string[0]= 0;
	c= char_string;
	h= hex_string;
1136
      }
1137
      else if (i % 8 == 7) *h++ = ' ';
1138
    }
1139
    *c= '\0';
1140

1141
    /* Non-full last line */
1142
    if (hex_string[0])
1143 1144 1145 1146 1147 1148 1149 1150 1151
    {
      char emit_buf[256];
      int const bytes_written=
        my_snprintf(emit_buf, sizeof(emit_buf),
                    "# %8.8lx %-48.48s |%s|\n# ",
                    (unsigned long) (hexdump_from + (i & 0xfffffff0)),
                    hex_string, char_string);
      DBUG_ASSERT(bytes_written >= 0);
      DBUG_ASSERT(static_cast<my_size_t>(bytes_written) < sizeof(emit_buf));
1152
      my_b_write(file, (byte*) emit_buf, bytes_written);
1153
    }
1154
  }
1155
  DBUG_VOID_RETURN;
1156 1157
}

1158

1159 1160 1161
void Log_event::print_base64(IO_CACHE* file,
                             PRINT_EVENT_INFO* print_event_info,
                             bool more)
1162
{
1163
  const uchar *ptr= (const uchar *)temp_buf;
1164
  uint32 size= uint4korr(ptr + EVENT_LEN_OFFSET);
1165

1166 1167
  DBUG_ENTER("Log_event::print_base64");

1168
  size_t const tmp_str_sz= base64_needed_encoded_length((int) size);
1169
  char *const tmp_str= (char *) my_malloc(tmp_str_sz, MYF(MY_WME));
1170 1171 1172
  if (!tmp_str) {
    fprintf(stderr, "\nError: Out of memory. "
            "Could not print correct binlog event.\n");
1173
    DBUG_VOID_RETURN;
1174
  }
1175

1176
  int const res= base64_encode(ptr, (size_t) size, tmp_str);
1177 1178 1179 1180 1181 1182 1183 1184
  DBUG_ASSERT(res == 0);

  if (my_b_tell(file) == 0)
    my_b_printf(file, "\nBINLOG '\n");

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

  if (!more)
1185
    my_b_printf(file, "'%s\n", print_event_info->delimiter);
1186

1187
  my_free(tmp_str, MYF(0));
1188
  DBUG_VOID_RETURN;
1189 1190 1191
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1192
/*
1193
  Log_event::print_timestamp()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1194
*/
1195

1196
void Log_event::print_timestamp(IO_CACHE* file, time_t* ts)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1197
{
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
1198
  struct tm *res;
1199
  DBUG_ENTER("Log_event::print_timestamp");
1200 1201
  if (!ts)
    ts = &when;
1202 1203
#ifdef MYSQL_SERVER				// This is always false
  struct tm tm_tmp;
monty@work.mysql.com's avatar
monty@work.mysql.com committed
1204
  localtime_r(ts,(res= &tm_tmp));
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
1205
#else
1206
  res=localtime(ts);
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
1207
#endif
1208

1209 1210 1211 1212 1213 1214 1215 1216
  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;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1217 1218
}

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1219
#endif /* MYSQL_CLIENT */
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1220 1221


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1222
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1223
	Query_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1224
**************************************************************************/
1225

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1226
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
1227

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1228
/*
1229
  Query_log_event::pack_info()
1230 1231 1232 1233
  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).
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1234
*/
1235

1236
void Query_log_event::pack_info(Protocol *protocol)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1237
{
1238
  // TODO: show the catalog ??
1239 1240 1241
  char *buf, *pos;
  if (!(buf= my_malloc(9 + db_len + q_len, MYF(MY_WME))))
    return;
1242 1243
  pos= buf;
  if (!(flags & LOG_EVENT_SUPPRESS_USE_F)
1244
      && db && db_len)
1245
  {
1246 1247
    pos= strmov(buf, "use `");
    memcpy(pos, db, db_len);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1248
    pos= strmov(pos+db_len, "`; ");
1249
  }
1250
  if (query && q_len)
1251 1252 1253 1254
  {
    memcpy(pos, query, q_len);
    pos+= q_len;
  }
1255
  protocol->store(buf, pos-buf, &my_charset_bin);
1256
  my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
1257
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1258
#endif
1259

1260
#ifndef MYSQL_CLIENT
1261

1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273
/* Utility function for the next method */
static void write_str_with_code_and_len(char **dst, const char *src,
                                        int len, uint code)
{
  DBUG_ASSERT(src);
  *((*dst)++)= code;
  *((*dst)++)= (uchar) len;
  bmove(*dst, src, len);
  (*dst)+= len;
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1274
/*
1275
  Query_log_event::write()
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1276

1277 1278 1279 1280
  NOTES:
    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!
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1281
*/
1282

1283
bool Query_log_event::write(IO_CACHE* file)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1284
{
1285 1286 1287 1288 1289
  uchar buf[QUERY_HEADER_LEN+
            1+4+           // code of flags2 and flags2
            1+8+           // code of sql_mode and sql_mode
            1+1+FN_REFLEN+ // code of catalog and catalog length and catalog
            1+4+           // code of autoinc and the 2 autoinc variables
1290
            1+6+           // code of charset and charset
1291
            1+1+MAX_TIME_ZONE_NAME_LENGTH+ // code of tz and tz length and tz name
1292
            1+2            // code of lc_time_names and lc_time_names_number
1293
            ], *start, *start_of_status;
1294
  ulong event_length;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1295

1296
  if (!query)
1297 1298
    return 1;                                   // Something wrong with event

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1299 1300 1301 1302 1303
  /*
    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.
1304
    Now imagine we (write()) are called by the slave SQL thread (we are
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336
    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);
1337 1338 1339 1340
  int4store(buf + Q_EXEC_TIME_OFFSET, exec_time);
  buf[Q_DB_LEN_OFFSET] = (char) db_len;
  int2store(buf + Q_ERR_CODE_OFFSET, error_code);

1341 1342 1343 1344 1345 1346 1347 1348
  /*
    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)
  {
1349
    *start++= Q_FLAGS2_CODE;
1350 1351 1352 1353 1354
    int4store(start, flags2);
    start+= 4;
  }
  if (sql_mode_inited)
  {
1355
    *start++= Q_SQL_MODE_CODE;
guilhem@mysql.com's avatar
guilhem@mysql.com committed
1356
    int8store(start, (ulonglong)sql_mode);
1357 1358
    start+= 8;
  }
1359
  if (catalog_len) // i.e. this var is inited (false for 4.0 events)
1360
  {
1361 1362
    write_str_with_code_and_len((char **)(&start),
                                catalog, catalog_len, Q_CATALOG_NZ_CODE);
1363
    /*
1364 1365 1366 1367 1368 1369
      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
1370 1371 1372 1373 1374
      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
1375 1376
      Q_AUTO_INCREMENT*, Q_CHARSET and so replication will fail silently in
      various ways. Documented that you should not mix alpha/beta versions if
1377 1378 1379
      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.
1380 1381 1382 1383 1384 1385 1386 1387 1388
    */
  }
  if (auto_increment_increment != 1)
  {
    *start++= Q_AUTO_INCREMENT;
    int2store(start, auto_increment_increment);
    int2store(start+2, auto_increment_offset);
    start+= 4;
  }
1389 1390
  if (charset_inited)
  {
1391
    *start++= Q_CHARSET_CODE;
1392 1393 1394
    memcpy(start, charset, 6);
    start+= 6;
  }
1395 1396 1397 1398 1399 1400 1401 1402 1403
  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);
    *start++= Q_TIME_ZONE_CODE;
    *start++= time_zone_len;
    memcpy(start, time_zone_str, time_zone_len);
    start+= time_zone_len;
  }
1404 1405 1406 1407 1408 1409 1410
  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;
  }
1411 1412
  /*
    Here there could be code like
1413
    if (command-line-option-which-says-"log_this_variable" && inited)
1414
    {
1415
    *start++= Q_THIS_VARIABLE_CODE;
1416 1417 1418 1419 1420 1421 1422
    int4store(start, this_variable);
    start+= 4;
    }
  */
  
  /* Store length of status variables */
  status_vars_len= (uint) (start-start_of_status);
1423
  DBUG_ASSERT(status_vars_len <= MAX_SIZE_LOG_EVENT_STATUS);
1424 1425 1426 1427 1428 1429
  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
  */
1430
  event_length= (uint) (start-buf) + get_post_header_size_for_derived() + db_len + 1 + q_len;
1431 1432

  return (write_header(file, event_length) ||
1433 1434 1435 1436
          my_b_safe_write(file, (byte*) buf, QUERY_HEADER_LEN) ||
          write_post_header_for_derived(file) ||
          my_b_safe_write(file, (byte*) start_of_status,
                          (uint) (start-start_of_status)) ||
1437 1438
          my_b_safe_write(file, (db) ? (byte*) db : (byte*)"", db_len + 1) ||
          my_b_safe_write(file, (byte*) query, q_len)) ? 1 : 0;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1439 1440
}

1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452
/*
  Query_log_event::Query_log_event()
 
  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)
{
}

1453

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1454
/*
1455
  Query_log_event::Query_log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1456
*/
1457
Query_log_event::Query_log_event(THD* thd_arg, const char* query_arg,
1458 1459
				 ulong query_length, bool using_trans,
				 bool suppress_use)
1460
  :Log_event(thd_arg,
1461 1462 1463
	     ((thd_arg->tmp_table_used ? LOG_EVENT_THREAD_SPECIFIC_F : 0)
	      | (suppress_use          ? LOG_EVENT_SUPPRESS_USE_F    : 0)),
	     using_trans),
1464
   data_buf(0), query(query_arg), catalog(thd_arg->catalog),
1465
   db(thd_arg->db), q_len((uint32) query_length),
1466
   error_code((thd_arg->killed != THD::NOT_KILLED) ?
1467
              ((thd_arg->system_thread & SYSTEM_THREAD_DELAYED_INSERT) ?
1468
               0 : thd->killed_errno()) : thd_arg->net.last_errno),
guilhem@mysql.com's avatar
guilhem@mysql.com committed
1469 1470
   thread_id(thd_arg->thread_id),
   /* save the original thread id; we already know the server id */
1471
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
1472
   flags2_inited(1), sql_mode_inited(1), charset_inited(1),
1473 1474
   sql_mode(thd_arg->variables.sql_mode),
   auto_increment_increment(thd_arg->variables.auto_increment_increment),
1475 1476
   auto_increment_offset(thd_arg->variables.auto_increment_offset),
   lc_time_names_number(thd_arg->variables.lc_time_names->number)
1477 1478 1479 1480
{
  time_t end_time;
  time(&end_time);
  exec_time = (ulong) (end_time  - thd->start_time);
1481
  catalog_len = (catalog) ? (uint32) strlen(catalog) : 0;
1482
  /* status_vars_len is set just before writing the event */
1483
  db_len = (db) ? (uint32) strlen(db) : 0;
1484 1485 1486 1487 1488 1489 1490
  /*
    If we don't use flags2 for anything else than options contained in
    thd->options, it would be more efficient to flags2=thd_arg->options
    (OPTIONS_WRITTEN_TO_BINLOG would be used only at reading time).
    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 &.
  */
1491
  flags2= (uint32) (thd_arg->options & OPTIONS_WRITTEN_TO_BIN_LOG);
1492 1493 1494 1495 1496 1497
  DBUG_ASSERT(thd->variables.character_set_client->number < 256*256);
  DBUG_ASSERT(thd->variables.collation_connection->number < 256*256);
  DBUG_ASSERT(thd->variables.collation_server->number < 256*256);
  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);
1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509
  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;
1510 1511
  DBUG_PRINT("info",("Query_log_event has flags2: %lu  sql_mode: %lu",
                     (ulong) flags2, sql_mode));
1512
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1513
#endif /* MYSQL_CLIENT */
1514

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1515

1516 1517
/* 2 utility functions for the next method */

1518 1519 1520 1521 1522 1523 1524 1525
/* 
  Get the pointer for a string (src) that contains the length in
  the first byte. Set the output string (dst) to the string value
  and place the length of the string in the byte after the string.
*/
static void get_str_len_and_pointer(const Log_event::Byte **src, 
                                    const char **dst, 
                                    uint *len)
1526 1527
{
  if ((*len= **src))
1528 1529
    *dst= (char *)*src + 1;                          // Will be copied later
  (*src)+= *len + 1;
1530 1531
}

1532 1533 1534
static void copy_str_and_move(const char **src, 
                              Log_event::Byte **dst, 
                              uint len)
1535 1536
{
  memcpy(*dst, *src, len);
1537
  *src= (const char *)*dst;
1538 1539 1540 1541
  (*dst)+= len;
  *(*dst)++= 0;
}

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1542
/*
1543
  Query_log_event::Query_log_event()
1544
  This is used by the SQL slave thread to prepare the event before execution.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1545
*/
1546

1547
Query_log_event::Query_log_event(const char* buf, uint event_len,
1548 1549
                                 const Format_description_log_event *description_event,
                                 Log_event_type event_type)
1550
  :Log_event(buf, description_event), data_buf(0), query(NullS),
1551
   db(NullS), catalog_len(0), status_vars_len(0),
1552
   flags2_inited(0), sql_mode_inited(0), charset_inited(0),
1553
   auto_increment_increment(1), auto_increment_offset(1),
1554
   time_zone_len(0), lc_time_names_number(0)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1555 1556
{
  ulong data_len;
1557 1558
  uint32 tmp;
  uint8 common_header_len, post_header_len;
1559 1560
  Log_event::Byte *start;
  const Log_event::Byte *end;
1561
  bool catalog_nz= 1;
1562 1563 1564
  DBUG_ENTER("Query_log_event::Query_log_event(char*,...)");

  common_header_len= description_event->common_header_len;
1565
  post_header_len= description_event->post_header_len[event_type-1];
1566
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580
                     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);
1581
  db_len = (uint)buf[Q_DB_LEN_OFFSET]; // TODO: add a check of all *_len vars
1582 1583 1584 1585 1586 1587 1588 1589 1590
  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)
1591
  {
1592 1593 1594 1595 1596
    status_vars_len= uint2korr(buf + Q_STATUS_VARS_LEN_OFFSET);
    data_len-= status_vars_len;
    DBUG_PRINT("info", ("Query_log_event has status_vars_len: %u",
                        (uint) status_vars_len));
    tmp-= 2;
1597
  }
1598 1599 1600 1601 1602 1603
  /*
    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...)
  */

1604 1605
  /* variable-part: the status vars; only in MySQL 5.0  */
  
1606 1607 1608
  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;)
1609
  {
1610 1611 1612 1613
    switch (*pos++) {
    case Q_FLAGS2_CODE:
      flags2_inited= 1;
      flags2= uint4korr(pos);
1614
      DBUG_PRINT("info",("In Query_log_event, read flags2: %lu", (ulong) flags2));
1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628
      pos+= 4;
      break;
    case Q_SQL_MODE_CODE:
    {
#ifndef DBUG_OFF
      char buff[22];
#endif
      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;
    }
1629
    case Q_CATALOG_NZ_CODE:
1630
      get_str_len_and_pointer(&pos, &catalog, &catalog_len);
1631 1632 1633 1634 1635 1636
      break;
    case Q_AUTO_INCREMENT:
      auto_increment_increment= uint2korr(pos);
      auto_increment_offset=    uint2korr(pos+2);
      pos+= 4;
      break;
1637 1638 1639 1640 1641 1642 1643
    case Q_CHARSET_CODE:
    {
      charset_inited= 1;
      memcpy(charset, pos, 6);
      pos+= 6;
      break;
    }
1644 1645
    case Q_TIME_ZONE_CODE:
    {
1646
      get_str_len_and_pointer(&pos, &time_zone_str, &time_zone_len);
1647 1648
      break;
    }
1649 1650 1651 1652 1653 1654
    case Q_CATALOG_CODE: /* for 5.0.x where 0<=x<=3 masters */
      if ((catalog_len= *pos))
        catalog= (char*) pos+1;                           // Will be copied later
      pos+= catalog_len+2; // leap over end 0
      catalog_nz= 0; // catalog has end 0 in event
      break;
1655 1656 1657 1658
    case Q_LC_TIME_NAMES_CODE:
      lc_time_names_number= uint2korr(pos);
      pos+= 2;
      break;
1659 1660 1661 1662
    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)));
1663
      pos= (const uchar*) end;                         // Break loop
1664
    }
1665
  }
1666
  
1667
#if !defined(MYSQL_CLIENT) && defined(HAVE_QUERY_CACHE)
1668 1669 1670 1671 1672 1673
  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))))
1674
#else
1675 1676 1677 1678
  if (!(start= data_buf = (Log_event::Byte*) my_malloc(catalog_len + 1 +
                                             time_zone_len + 1 +
                                             data_len + 1,
                                             MYF(MY_WME))))
1679
#endif
1680
      DBUG_VOID_RETURN;
1681
  if (catalog_len)                                  // If catalog is given
1682
  {
1683
    if (likely(catalog_nz)) // true except if event comes from 5.0.0|1|2|3.
1684
      copy_str_and_move(&catalog, &start, catalog_len);
1685 1686 1687
    else
    {
      memcpy(start, catalog, catalog_len+1); // copy end 0
1688
      catalog= (const char *)start;
1689 1690
      start+= catalog_len+1;
    }
1691
  }
1692
  if (time_zone_len)
1693
    copy_str_and_move(&time_zone_str, &start, time_zone_len);
1694

1695
  /* A 2nd variable part; this is common to all versions */ 
1696
  memcpy((char*) start, end, data_len);          // Copy db and query
1697
  start[data_len]= '\0';              // End query with \0 (For safetly)
1698 1699
  db= (char *)start;
  query= (char *)(start + db_len + 1);
1700 1701
  q_len= data_len - db_len -1;
  DBUG_VOID_RETURN;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1702 1703
}

1704

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1705
/*
1706
  Query_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1707
*/
1708

1709
#ifdef MYSQL_CLIENT
1710
void Query_log_event::print_query_header(IO_CACHE* file,
1711
					 PRINT_EVENT_INFO* print_event_info)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1712
{
1713
  // TODO: print the catalog ??
1714
  char buff[40],*end;				// Enough for SET TIMESTAMP
1715 1716 1717
  bool different_db= 1;
  uint32 tmp;

1718
  if (!print_event_info->short_form)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1719
  {
1720 1721 1722 1723
    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);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1724 1725
  }

monty@mysql.com's avatar
monty@mysql.com committed
1726
  if (!(flags & LOG_EVENT_SUPPRESS_USE_F) && db)
1727
  {
1728 1729
    if (different_db= memcmp(print_event_info->db, db, db_len + 1))
      memcpy(print_event_info->db, db, db_len + 1);
monty@mysql.com's avatar
monty@mysql.com committed
1730
    if (db[0] && different_db) 
1731
      my_b_printf(file, "use %s%s\n", db, print_event_info->delimiter);
1732
  }
1733

1734
  end=int10_to_str((long) when, strmov(buff,"SET TIMESTAMP="),10);
1735
  end= strmov(end, print_event_info->delimiter);
1736
  *end++='\n';
1737
  my_b_write(file, (byte*) buff, (uint) (end-buff));
1738
  if (flags & LOG_EVENT_THREAD_SPECIFIC_F)
1739 1740
    my_b_printf(file,"SET @@session.pseudo_thread_id=%lu%s\n",
                (ulong)thread_id, print_event_info->delimiter);
1741

1742
  /*
1743 1744 1745
    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).
1746 1747 1748 1749
  */
  if (likely(flags2_inited)) /* likely as this will mainly read 5.0 logs */
  {
    /* tmp is a bitmask of bits which have changed. */
1750
    if (likely(print_event_info->flags2_inited)) 
1751
      /* All bits which have changed */
1752
      tmp= (print_event_info->flags2) ^ flags2;
1753 1754
    else /* that's the first Query event we read */
    {
1755
      print_event_info->flags2_inited= 1;
1756 1757 1758 1759 1760 1761
      tmp= ~((uint32)0); /* all bits have changed */
    }

    if (unlikely(tmp)) /* some bits have changed */
    {
      bool need_comma= 0;
1762
      my_b_printf(file, "SET ");
1763 1764 1765 1766 1767 1768
      print_set_option(file, tmp, OPTION_NO_FOREIGN_KEY_CHECKS, ~flags2,
                   "@@session.foreign_key_checks", &need_comma);
      print_set_option(file, tmp, OPTION_AUTO_IS_NULL, flags2,
                   "@@session.sql_auto_is_null", &need_comma);
      print_set_option(file, tmp, OPTION_RELAXED_UNIQUE_CHECKS, ~flags2,
                   "@@session.unique_checks", &need_comma);
1769
      my_b_printf(file,"%s\n", print_event_info->delimiter);
1770
      print_event_info->flags2= flags2;
1771 1772 1773 1774
    }
  }

  /*
1775 1776 1777 1778 1779 1780 1781 1782 1783 1784
    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.
1785 1786 1787 1788
  */

  if (likely(sql_mode_inited))
  {
1789
    if (unlikely(!print_event_info->sql_mode_inited)) /* first Query event */
1790
    {
1791
      print_event_info->sql_mode_inited= 1;
1792
      /* force a difference to force write */
1793
      print_event_info->sql_mode= ~sql_mode;
1794
    }
1795
    if (unlikely(print_event_info->sql_mode != sql_mode))
1796
    {
1797 1798
      my_b_printf(file,"SET @@session.sql_mode=%lu%s\n",
                  (ulong)sql_mode, print_event_info->delimiter);
1799
      print_event_info->sql_mode= sql_mode;
1800 1801
    }
  }
1802 1803
  if (print_event_info->auto_increment_increment != auto_increment_increment ||
      print_event_info->auto_increment_offset != auto_increment_offset)
1804
  {
1805 1806 1807
    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);
1808 1809
    print_event_info->auto_increment_increment= auto_increment_increment;
    print_event_info->auto_increment_offset=    auto_increment_offset;
1810 1811
  }

1812 1813
  /* TODO: print the catalog when we feature SET CATALOG */

1814 1815
  if (likely(charset_inited))
  {
1816
    if (unlikely(!print_event_info->charset_inited)) /* first Query event */
1817
    {
1818 1819
      print_event_info->charset_inited= 1;
      print_event_info->charset[0]= ~charset[0]; // force a difference to force write
1820
    }
1821
    if (unlikely(bcmp(print_event_info->charset, charset, 6)))
1822
    {
1823 1824 1825
      CHARSET_INFO *cs_info= get_charset(uint2korr(charset), MYF(MY_WME));
      if (cs_info)
      {
1826
        /* for mysql client */
1827 1828
        my_b_printf(file, "/*!\\C %s */%s\n",
                    cs_info->csname, print_event_info->delimiter);
1829
      }
1830 1831 1832 1833
      my_b_printf(file,"SET "
                  "@@session.character_set_client=%d,"
                  "@@session.collation_connection=%d,"
                  "@@session.collation_server=%d"
1834
                  "%s\n",
1835 1836
                  uint2korr(charset),
                  uint2korr(charset+2),
1837 1838
                  uint2korr(charset+4),
                  print_event_info->delimiter);
1839
      memcpy(print_event_info->charset, charset, 6);
1840 1841
    }
  }
1842 1843
  if (time_zone_len)
  {
1844
    if (bcmp(print_event_info->time_zone_str, time_zone_str, time_zone_len+1))
1845
    {
1846 1847
      my_b_printf(file,"SET @@session.time_zone='%s'%s\n",
                  time_zone_str, print_event_info->delimiter);
1848
      memcpy(print_event_info->time_zone_str, time_zone_str, time_zone_len+1);
1849 1850
    }
  }
1851 1852
  if (lc_time_names_number != print_event_info->lc_time_names_number)
  {
bar@mysql.com's avatar
bar@mysql.com committed
1853 1854
    my_b_printf(file, "SET @@session.lc_time_names=%d%s\n",
                lc_time_names_number, print_event_info->delimiter);
1855 1856
    print_event_info->lc_time_names_number= lc_time_names_number;
  }
1857 1858
}

1859

1860
void Query_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
1861
{
1862 1863 1864 1865
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
  my_b_write(&cache, (byte*) query, q_len);
1866
  my_b_printf(&cache, "%s\n", print_event_info->delimiter);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1867
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1868
#endif /* MYSQL_CLIENT */
1869

bk@work.mysql.com's avatar
bk@work.mysql.com committed
1870

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1871
/*
1872
  Query_log_event::exec_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1873
*/
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1874

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1875
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
1876

1877
int Query_log_event::exec_event(struct st_relay_log_info* rli)
1878 1879 1880 1881 1882
{
  return exec_event(rli, query, q_len);
}


1883 1884
int Query_log_event::exec_event(struct st_relay_log_info* rli,
                                const char *query_arg, uint32 q_len_arg)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1885
{
1886
  LEX_STRING new_db;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1887
  int expected_error,actual_error= 0;
1888 1889 1890 1891 1892 1893
  /*
    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 Query_log_event::exec_event()). Same for thd->db.
    Thank you.
  */
1894
  thd->catalog= catalog_len ? (char *) catalog : (char *)"";
1895 1896 1897
  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' */
1898 1899
  thd->variables.auto_increment_increment= auto_increment_increment;
  thd->variables.auto_increment_offset=    auto_increment_offset;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1900

1901
  /*
1902 1903 1904 1905 1906 1907 1908 1909
    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.
1910
  */
monty@mysql.com's avatar
monty@mysql.com committed
1911
  rli->future_group_master_log_pos= log_pos;
1912 1913
  DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));

monty@mysql.com's avatar
monty@mysql.com committed
1914
  clear_all_errors(thd, rli);
1915
  rli->clear_tables_to_lock();
1916

lars@mysql.com's avatar
lars@mysql.com committed
1917 1918 1919 1920 1921 1922 1923 1924 1925 1926
  /*
    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
            ::exec_event(), then the companion SET also have so we
            don't need to reset_one_shot_variables().
  */
1927
  if (rpl_filter->db_ok(thd->db))
1928 1929
  {
    thd->set_time((time_t)when);
1930 1931
    thd->query_length= q_len_arg;
    thd->query= (char*)query_arg;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1932
    VOID(pthread_mutex_lock(&LOCK_thread_count));
1933
    thd->query_id = next_query_id();
1934
    VOID(pthread_mutex_unlock(&LOCK_thread_count));
1935
    thd->variables.pseudo_thread_id= thread_id;		// for temp tables
monty@mysql.com's avatar
monty@mysql.com committed
1936
    DBUG_PRINT("query",("%s",thd->query));
1937

monty@mysql.com's avatar
monty@mysql.com committed
1938
    if (ignored_error_code((expected_error= error_code)) ||
1939
	!check_expected_error(thd,rli,expected_error))
1940 1941 1942
    {
      if (flags2_inited)
        /*
1943 1944
          all bits of thd->options which are 1 in OPTIONS_WRITTEN_TO_BIN_LOG
          must take their value from flags2.
1945
        */
1946
        thd->options= flags2|(thd->options & ~OPTIONS_WRITTEN_TO_BIN_LOG);
1947 1948
      /*
        else, we are in a 3.23/4.0 binlog; we previously received a
1949 1950
        Rotate_log_event which reset thd->options and sql_mode etc, so
        nothing to do.
1951 1952 1953 1954 1955
      */
      /*
        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
1956 1957 1958
        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).
1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976
      */
      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))))
          {
            /*
1977 1978 1979 1980
              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).
1981
            */
1982
            set_slave_thread_default_charset(thd, rli);
1983 1984 1985 1986 1987
            goto compare_errors;
          }
          thd->update_charset(); // for the charset change to take effect
        }
      }
1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998
      if (time_zone_len)
      {
        String tmp(time_zone_str, time_zone_len, &my_charset_bin);
        if (!(thd->variables.time_zone=
              my_tz_find_with_opening_tz_tables(thd, &tmp)))
        {
          my_error(ER_UNKNOWN_TIME_ZONE, MYF(0), tmp.c_ptr());
          thd->variables.time_zone= global_system_variables.time_zone;
          goto compare_errors;
        }
      }
1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009 2010 2011
      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;
2012 2013

      /* Execute the query (note that we bypass dispatch_command()) */
2014
      mysql_parse(thd, thd->query, thd->query_length);
2015 2016

    }
monty@mysql.com's avatar
monty@mysql.com committed
2017 2018
    else
    {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2019
      /*
monty@mysql.com's avatar
monty@mysql.com committed
2020 2021 2022 2023 2024
        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.
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2025
      */
2026
      if (mysql_test_parse_for_slave(thd, thd->query, thd->query_length))
monty@mysql.com's avatar
monty@mysql.com committed
2027 2028
        clear_all_errors(thd, rli);        /* Can ignore query */
      else
2029
      {
2030
        slave_print_msg(ERROR_LEVEL, rli, expected_error, 
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2031
                          "\
monty@mysql.com's avatar
monty@mysql.com committed
2032
Query partially completed on the master (error on master: %d) \
monty@mysql.com's avatar
monty@mysql.com committed
2033 2034 2035
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; \
monty@mysql.com's avatar
monty@mysql.com committed
2036
START SLAVE; . Query: '%s'", expected_error, thd->query);
monty@mysql.com's avatar
monty@mysql.com committed
2037 2038 2039 2040
        thd->query_error= 1;
      }
      goto end;
    }
2041

2042 2043
    /* If the query was not ignored, it is printed to the general log */
    if (thd->net.last_errno != ER_SLAVE_IGNORED_TABLE)
2044
      general_log_print(thd, COM_QUERY, "%s", thd->query);
2045

2046
compare_errors:
lars@mysql.com's avatar
lars@mysql.com committed
2047 2048

     /*
monty@mysql.com's avatar
monty@mysql.com committed
2049 2050 2051 2052
      If we expected a non-zero error code, and we don't get the same error
      code, and none of them should be ignored.
    */
    DBUG_PRINT("info",("expected_error: %d  last_errno: %d",
2053
 		       expected_error, thd->net.last_errno));
monty@mysql.com's avatar
monty@mysql.com committed
2054
    if ((expected_error != (actual_error= thd->net.last_errno)) &&
2055 2056 2057
 	expected_error &&
 	!ignored_error_code(actual_error) &&
 	!ignored_error_code(expected_error))
monty@mysql.com's avatar
monty@mysql.com committed
2058
    {
2059 2060 2061
      slave_print_msg(ERROR_LEVEL, rli, 0,
                      "\
Query caused different errors on master and slave.     \
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2062
Error on master: '%s' (%d), Error on slave: '%s' (%d). \
monty@mysql.com's avatar
monty@mysql.com committed
2063
Default database: '%s'. Query: '%s'",
2064 2065 2066 2067 2068
                      ER_SAFE(expected_error),
                      expected_error,
                      actual_error ? thd->net.last_error: "no error",
                      actual_error,
                      print_slave_db_safe(db), query_arg);
monty@mysql.com's avatar
monty@mysql.com committed
2069 2070 2071 2072 2073 2074
      thd->query_error= 1;
    }
    /*
      If we get the same error code as expected, or they should be ignored. 
    */
    else if (expected_error == actual_error ||
2075
 	     ignored_error_code(actual_error))
monty@mysql.com's avatar
monty@mysql.com committed
2076 2077 2078 2079 2080 2081
    {
      DBUG_PRINT("info",("error ignored"));
      clear_all_errors(thd, rli);
    }
    /*
      Other cases: mostly we expected no error and get one.
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2082
    */
monty@mysql.com's avatar
monty@mysql.com committed
2083 2084
    else if (thd->query_error || thd->is_fatal_error)
    {
2085 2086 2087 2088 2089
      slave_print_msg(ERROR_LEVEL, rli, actual_error,
                      "Error '%s' on query. Default database: '%s'. Query: '%s'",
                      (actual_error ? thd->net.last_error :
                       "unexpected success or fatal error"),
                      print_slave_db_safe(thd->db), query_arg);
monty@mysql.com's avatar
monty@mysql.com committed
2090 2091
      thd->query_error= 1;
    }
2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105

    /*
      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, ...);
      thd->query_error = 1;
      }
      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...
2106

2107 2108 2109 2110 2111 2112 2113
      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.
    */
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2114 2115
  } /* End of if (db_ok(... */

monty@mysql.com's avatar
monty@mysql.com committed
2116
end:
2117
  VOID(pthread_mutex_lock(&LOCK_thread_count));
2118 2119 2120 2121 2122 2123
  /*
    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
2124 2125 2126
    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.
2127
  */
2128
  thd->catalog= 0;
2129
  thd->set_db(NULL, 0);                 /* will free the current database */
2130
  thd->query= 0;			// just to be sure
2131
  thd->query_length= 0;
2132
  VOID(pthread_mutex_unlock(&LOCK_thread_count));
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2133
  close_thread_tables(thd);      
2134 2135 2136 2137 2138 2139 2140 2141 2142 2143
  /*
    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;
2144
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
2145 2146 2147 2148 2149 2150 2151
  /*
    If there was an error we stop. Otherwise we increment positions. 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.
  */
  return (thd->query_error ? thd->query_error : 
2152
          (thd->one_shot_set ? (rli->inc_event_relay_log_pos(),0) :
2153
           Log_event::exec_event(rli))); 
2154
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2155
#endif
2156

bk@work.mysql.com's avatar
bk@work.mysql.com committed
2157

2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172
/**************************************************************************
	Muted_query_log_event methods
**************************************************************************/

#ifndef MYSQL_CLIENT
/*
  Muted_query_log_event::Muted_query_log_event()
*/
Muted_query_log_event::Muted_query_log_event()
  :Query_log_event()
{
}
#endif


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2173
/**************************************************************************
2174
	Start_log_event_v3 methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2175
**************************************************************************/
2176

2177 2178 2179 2180 2181 2182 2183 2184
#ifndef MYSQL_CLIENT
Start_log_event_v3::Start_log_event_v3() :Log_event(), binlog_version(BINLOG_VERSION), artificial_event(0)
{
  created= when;
  memcpy(server_version, ::server_version, ST_SERVER_VER_LEN);
}
#endif

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2185
/*
2186
  Start_log_event_v3::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2187
*/
2188

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2189
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2190
void Start_log_event_v3::pack_info(Protocol *protocol)
nick@mysql.com's avatar
nick@mysql.com committed
2191
{
2192 2193 2194 2195
  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: ");
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2196 2197
  pos= int10_to_str(binlog_version, pos, 10);
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
nick@mysql.com's avatar
nick@mysql.com committed
2198
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2199
#endif
2200 2201


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2202
/*
2203
  Start_log_event_v3::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2204
*/
nick@mysql.com's avatar
nick@mysql.com committed
2205 2206

#ifdef MYSQL_CLIENT
2207
void Start_log_event_v3::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
nick@mysql.com's avatar
nick@mysql.com committed
2208
{
2209 2210 2211 2212 2213
  DBUG_ENTER("Start_log_event_v3::print");

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

2214
  if (!print_event_info->short_form)
2215
  {
2216 2217 2218 2219
    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);
2220
    if (created)
2221 2222
      my_b_printf(&cache," at startup");
    my_b_printf(&cache, "\n");
2223
    if (flags & LOG_EVENT_BINLOG_IN_USE_F)
2224 2225
      my_b_printf(&cache, "# Warning: this binlog was not closed properly. "
                  "Most probably mysqld crashed writing it.\n");
2226
  }
2227 2228
  if (!artificial_event && created)
  {
2229
#ifdef WHEN_WE_HAVE_THE_RESET_CONNECTION_SQL_COMMAND
2230 2231 2232 2233 2234 2235
    /*
      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).
    */
2236
    my_b_printf(&cache,"RESET CONNECTION%s\n", print_event_info->delimiter);
2237
#else
2238
    my_b_printf(&cache,"ROLLBACK%s\n", print_event_info->delimiter);
2239
#endif
2240
  }
2241
  DBUG_VOID_RETURN;
nick@mysql.com's avatar
nick@mysql.com committed
2242
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2243
#endif /* MYSQL_CLIENT */
bk@work.mysql.com's avatar
bk@work.mysql.com committed
2244

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2245
/*
2246
  Start_log_event_v3::Start_log_event_v3()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2247
*/
2248

2249 2250 2251
Start_log_event_v3::Start_log_event_v3(const char* buf,
                                       const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
2252
{
2253 2254
  buf+= description_event->common_header_len;
  binlog_version= uint2korr(buf+ST_BINLOG_VER_OFFSET);
2255 2256
  memcpy(server_version, buf+ST_SERVER_VER_OFFSET,
	 ST_SERVER_VER_LEN);
guilhem@gbichot3.local's avatar
guilhem@gbichot3.local committed
2257 2258
  // prevent overrun if log is corrupted on disk
  server_version[ST_SERVER_VER_LEN-1]= 0;
2259 2260 2261
  created= uint4korr(buf+ST_CREATED_OFFSET);
  /* We use log_pos to mark if this was an artificial event or not */
  artificial_event= (log_pos == 0);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
2262 2263
}

2264

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2265
/*
2266
  Start_log_event_v3::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2267
*/
2268

2269
#ifndef MYSQL_CLIENT
2270
bool Start_log_event_v3::write(IO_CACHE* file)
2271
{
2272
  char buff[START_V3_HEADER_LEN];
2273 2274 2275
  int2store(buff + ST_BINLOG_VER_OFFSET,binlog_version);
  memcpy(buff + ST_SERVER_VER_OFFSET,server_version,ST_SERVER_VER_LEN);
  int4store(buff + ST_CREATED_OFFSET,created);
2276 2277
  return (write_header(file, sizeof(buff)) ||
          my_b_safe_write(file, (byte*) buff, sizeof(buff)));
2278
}
2279
#endif
2280

2281

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2282
/*
2283
  Start_log_event_v3::exec_event()
2284 2285 2286 2287

  The master started

  IMPLEMENTATION
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2288 2289 2290 2291
    - To handle the case where the master died without having time to write
      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).
2292 2293

  TODO
2294 2295 2296 2297 2298
    - Remove all active user locks.
      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.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2299 2300
*/

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2301
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2302
int Start_log_event_v3::exec_event(struct st_relay_log_info* rli)
2303
{
2304
  DBUG_ENTER("Start_log_event_v3::exec_event");
2305
  switch (binlog_version)
2306 2307 2308 2309 2310 2311 2312 2313
  {
  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').
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2314
    */
2315 2316 2317 2318 2319
    if (created)
    {
      close_temporary_tables(thd);
      cleanup_load_tmpdir();
    }
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2320 2321
    break;

2322
    /*
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2323 2324
       Now the older formats; in that case load_tmpdir is cleaned up by the I/O
       thread.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2325
    */
2326
  case 1:
2327
    if (strncmp(rli->relay_log.description_event_for_exec->server_version,
2328 2329 2330 2331 2332 2333 2334 2335
                "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);
    }
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2336
    /*
2337 2338 2339
      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.
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2340 2341 2342 2343
    */
    break;
  default:
    /* this case is impossible */
2344
    DBUG_RETURN(1);
nick@mysql.com's avatar
nick@mysql.com committed
2345
  }
2346
  DBUG_RETURN(Log_event::exec_event(rli));
2347
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2348
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
2349

2350 2351 2352 2353 2354 2355 2356 2357 2358
/***************************************************************************
       Format_description_log_event methods
****************************************************************************/

/*
  Format_description_log_event 1st ctor.

  SYNOPSIS
    Format_description_log_event::Format_description_log_event
2359
      binlog_version              the binlog version for which we want to build
2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373
                                  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.

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

Format_description_log_event::
2374
Format_description_log_event(uint8 binlog_ver, const char* server_ver)
2375 2376 2377 2378 2379 2380 2381
  :Start_log_event_v3()
{
  created= when;
  binlog_version= binlog_ver;
  switch (binlog_ver) {
  case 4: /* MySQL 5.0 */
    memcpy(server_version, ::server_version, ST_SERVER_VER_LEN);
guilhem@gbichot3.local's avatar
guilhem@gbichot3.local committed
2382 2383
    DBUG_EXECUTE_IF("pretend_version_50034_in_binlog",
                    strmov(server_version, "5.0.34"););
2384 2385 2386 2387
    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),
2388
                                       MYF(MY_ZEROFILL));
2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405
    /*
      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)
    {
      post_header_len[START_EVENT_V3-1]= START_V3_HEADER_LEN;
      post_header_len[QUERY_EVENT-1]= QUERY_HEADER_LEN;
      post_header_len[ROTATE_EVENT-1]= ROTATE_HEADER_LEN;
      post_header_len[LOAD_EVENT-1]= LOAD_HEADER_LEN;
      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[FORMAT_DESCRIPTION_EVENT-1]= FORMAT_DESCRIPTION_HEADER_LEN;
2406 2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424
      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;);
2425 2426
      post_header_len[BEGIN_LOAD_QUERY_EVENT-1]= post_header_len[APPEND_BLOCK_EVENT-1];
      post_header_len[EXECUTE_LOAD_QUERY_EVENT-1]= EXECUTE_LOAD_QUERY_HEADER_LEN;
2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440
    }
    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 :
2441
      LOG_EVENT_MINIMAL_HEADER_LEN;
2442 2443 2444 2445 2446 2447 2448 2449 2450
    /*
      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),
2451
                                       MYF(0));
2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473
    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;
  }
guilhem@gbichot3.local's avatar
guilhem@gbichot3.local committed
2474
  calc_server_version_split();
2475 2476 2477 2478 2479 2480 2481 2482
}


/*
  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
2483
  post-header starts.
2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498
  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.
  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*
2499
                             description_event)
2500 2501 2502 2503 2504 2505 2506 2507 2508
  :Start_log_event_v3(buf, description_event)
{
  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",
2509
                      common_header_len, number_of_event_types));
2510 2511 2512
  /* If alloc fails, we'll detect it in is_valid() */
  post_header_len= (uint8*) my_memdup((byte*)buf+ST_COMMON_HEADER_LEN_OFFSET+1,
                                      number_of_event_types*
2513
                                      sizeof(*post_header_len), MYF(0));
guilhem@gbichot3.local's avatar
guilhem@gbichot3.local committed
2514
  calc_server_version_split();
2515 2516 2517
  DBUG_VOID_RETURN;
}

2518
#ifndef MYSQL_CLIENT
2519 2520 2521 2522 2523 2524 2525 2526 2527 2528
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().
  */
  byte buff[FORMAT_DESCRIPTION_HEADER_LEN];
  int2store(buff + ST_BINLOG_VER_OFFSET,binlog_version);
  memcpy((char*) buff + ST_SERVER_VER_OFFSET,server_version,ST_SERVER_VER_LEN);
  int4store(buff + ST_CREATED_OFFSET,created);
2529
  buff[ST_COMMON_HEADER_LEN_OFFSET]= LOG_EVENT_HEADER_LEN;
2530 2531 2532 2533 2534
  memcpy((char*) buff+ST_COMMON_HEADER_LEN_OFFSET+1, (byte*) post_header_len,
         LOG_EVENT_TYPES);
  return (write_header(file, sizeof(buff)) ||
          my_b_safe_write(file, buff, sizeof(buff)));
}
2535
#endif
2536

2537 2538 2539
/*
  SYNOPSIS
    Format_description_log_event::exec_event()
2540

2541 2542 2543 2544 2545 2546 2547 2548 2549 2550
  IMPLEMENTATION
    Save the information which describes the binlog's format, to be able to
    read all coming events.
    Call Start_log_event_v3::exec_event().
*/

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
int Format_description_log_event::exec_event(struct st_relay_log_info* rli)
{
  DBUG_ENTER("Format_description_log_event::exec_event");
2551 2552

  /* save the information describing this binlog */
2553 2554 2555
  delete rli->relay_log.description_event_for_exec;
  rli->relay_log.description_event_for_exec= this;

serg@serg.mylan's avatar
serg@serg.mylan committed
2556
#ifdef USING_TRANSACTIONS
2557 2558 2559 2560
  /*
    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
2561 2562
    flushing the binlog cache to the binlog. XA guarantees that master has
    rolled back. So we roll back.
2563 2564 2565 2566 2567 2568 2569
    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).
  */
  if (!artificial_event && created && thd->transaction.all.nht)
  {
2570 2571 2572 2573 2574 2575 2576
    /* This is not an error (XA is safe), just an information */
    slave_print_msg(INFORMATION_LEVEL, rli, 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."); 
    rli->cleanup_context(thd, 1);
2577
  }
serg@serg.mylan's avatar
serg@serg.mylan committed
2578
#endif
2579 2580 2581 2582 2583 2584 2585 2586
  /*
    If this event comes from ourselves, there is no cleaning task to perform,
    we don't call Start_log_event_v3::exec_event() (this was just to update the
    log's description event).
  */
  if (server_id == (uint32) ::server_id)
  {
    /*
2587 2588 2589 2590 2591 2592 2593 2594 2595 2596 2597 2598 2599
      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();
2600 2601 2602 2603 2604 2605 2606
    DBUG_RETURN(0);
  }

  /*
    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
2607 2608 2609
    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.
2610 2611 2612 2613 2614
  */
  DBUG_RETURN(Start_log_event_v3::exec_event(rli));
}
#endif

guilhem@gbichot3.local's avatar
guilhem@gbichot3.local committed
2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628 2629 2630 2631 2632 2633 2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644 2645

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


2646
  /**************************************************************************
2647
        Load_log_event methods
2648
   General note about Load_log_event: the binlogging of LOAD DATA INFILE is
2649
   going to be changed in 5.0 (or maybe in 5.1; not decided yet).
2650 2651 2652 2653 2654 2655 2656 2657 2658 2659 2660 2661
   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).
  **************************************************************************/
2662

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2663
/*
2664
  Load_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2665
*/
2666

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2667
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2668
uint Load_log_event::get_query_buffer_length()
2669
{
2670
  return
2671 2672
    5 + db_len + 3 +                        // "use DB; "
    18 + fname_len + 2 +                    // "LOAD DATA INFILE 'file''"
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2673
    7 +					    // LOCAL
2674
    9 +                                     // " REPLACE or IGNORE "
2675
    13 + table_name_len*2 +                 // "INTO TABLE `table`"
2676 2677 2678 2679
    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'"
    21 + sql_ex.line_term_len*4 + 2 +       // " FIELDS TERMINATED BY 'str'"
2680 2681
    19 + sql_ex.line_start_len*4 + 2 +      // " LINES STARTING BY 'str'"
    15 + 22 +                               // " IGNORE xxx  LINES"
2682
    3 + (num_fields-1)*2 + field_block_len; // " (field1, field2, ...)"
2683
}
2684

2685 2686 2687 2688 2689 2690 2691

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)
2692
  {
2693 2694
    pos= strmov(pos, "use `");
    memcpy(pos, db, db_len);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2695
    pos= strmov(pos+db_len, "`; ");
2696
  }
2697

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2698
  pos= strmov(pos, "LOAD DATA ");
2699 2700 2701 2702

  if (fn_start)
    *fn_start= pos;

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2703 2704 2705
  if (check_fname_outside_temp_buf())
    pos= strmov(pos, "LOCAL ");
  pos= strmov(pos, "INFILE '");
2706
  memcpy(pos, fname, fname_len);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2707
  pos= strmov(pos+fname_len, "' ");
2708

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2709
  if (sql_ex.opt_flags & REPLACE_FLAG)
2710
    pos= strmov(pos, " REPLACE ");
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2711
  else if (sql_ex.opt_flags & IGNORE_FLAG)
2712 2713
    pos= strmov(pos, " IGNORE ");

2714 2715 2716 2717 2718 2719
  pos= strmov(pos ,"INTO");

  if (fn_end)
    *fn_end= pos;

  pos= strmov(pos ," TABLE `");
2720 2721 2722
  memcpy(pos, table_name, table_name_len);
  pos+= table_name_len;

monty@mysql.com's avatar
monty@mysql.com committed
2723
  /* We have to create all optinal fields as the default is not empty */
2724
  pos= strmov(pos, "` FIELDS TERMINATED BY ");
monty@mysql.com's avatar
monty@mysql.com committed
2725 2726 2727 2728 2729
  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);
2730

monty@mysql.com's avatar
monty@mysql.com committed
2731 2732
  pos= strmov(pos, " ESCAPED BY ");
  pos= pretty_print_str(pos, sql_ex.escaped, sql_ex.escaped_len);
2733

monty@mysql.com's avatar
monty@mysql.com committed
2734 2735
  pos= strmov(pos, " LINES TERMINATED BY ");
  pos= pretty_print_str(pos, sql_ex.line_term, sql_ex.line_term_len);
2736 2737
  if (sql_ex.line_start_len)
  {
2738
    pos= strmov(pos, " STARTING BY ");
2739
    pos= pretty_print_str(pos, sql_ex.line_start, sql_ex.line_start_len);
2740
  }
2741

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2742
  if ((long) skip_lines > 0)
2743 2744
  {
    pos= strmov(pos, " IGNORE ");
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2745
    pos= longlong10_to_str((longlong) skip_lines, pos, 10);
2746 2747
    pos= strmov(pos," LINES ");    
  }
2748 2749 2750 2751

  if (num_fields)
  {
    uint i;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2752
    const char *field= fields;
2753
    pos= strmov(pos, " (");
2754 2755 2756
    for (i = 0; i < num_fields; i++)
    {
      if (i)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2757 2758 2759 2760
      {
        *pos++= ' ';
        *pos++= ',';
      }
2761
      memcpy(pos, field, field_lens[i]);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2762 2763
      pos+=   field_lens[i];
      field+= field_lens[i]  + 1;
2764
    }
2765
    *pos++= ')';
2766
  }
2767

2768 2769 2770 2771 2772 2773 2774 2775 2776 2777 2778 2779
  *end= pos;
}


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

  if (!(buf= my_malloc(get_query_buffer_length(), MYF(MY_WME))))
    return;
  print_query(TRUE, buf, &end, 0, 0);
  protocol->store(buf, end-buf, &my_charset_bin);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2780
  my_free(buf, MYF(0));
2781
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2782
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
2783

2784

2785 2786
#ifndef MYSQL_CLIENT

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2787
/*
2788
  Load_log_event::write_data_header()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2789
*/
2790

2791
bool Load_log_event::write_data_header(IO_CACHE* file)
2792
{
2793
  char buf[LOAD_HEADER_LEN];
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2794
  int4store(buf + L_THREAD_ID_OFFSET, slave_proxy_id);
2795 2796 2797 2798 2799
  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);
2800
  return my_b_safe_write(file, (byte*)buf, LOAD_HEADER_LEN) != 0;
2801
}
2802

2803

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2804
/*
2805
  Load_log_event::write_data_body()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2806
*/
2807

2808
bool Load_log_event::write_data_body(IO_CACHE* file)
2809
{
2810 2811 2812
  if (sql_ex.write_data(file))
    return 1;
  if (num_fields && fields && field_lens)
2813
  {
2814 2815 2816
    if (my_b_safe_write(file, (byte*)field_lens, num_fields) ||
	my_b_safe_write(file, (byte*)fields, field_block_len))
      return 1;
2817
  }
2818 2819 2820
  return (my_b_safe_write(file, (byte*)table_name, table_name_len + 1) ||
	  my_b_safe_write(file, (byte*)db, db_len + 1) ||
	  my_b_safe_write(file, (byte*)fname, fname_len));
2821 2822
}

2823

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2824
/*
2825
  Load_log_event::Load_log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2826
*/
2827

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2828 2829 2830
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,
2831
			       enum enum_duplicates handle_dup,
2832
			       bool ignore, bool using_trans)
2833 2834 2835
  :Log_event(thd_arg, !thd_arg->tmp_table_used ?
	     0 : LOG_EVENT_THREAD_SPECIFIC_F, using_trans),
   thread_id(thd_arg->thread_id),
2836
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
guilhem@mysql.com's avatar
guilhem@mysql.com committed
2837 2838
   num_fields(0),fields(0),
   field_lens(0),field_block_len(0),
2839
   table_name(table_name_arg ? table_name_arg : ""),
2840
   db(db_arg), fname(ex->file_name), local_fname(FALSE)
2841 2842 2843
{
  time_t end_time;
  time(&end_time);
2844
  exec_time = (ulong) (end_time  - thd_arg->start_time);
2845 2846 2847
  /* db can never be a zero pointer in 4.0 */
  db_len = (uint32) strlen(db);
  table_name_len = (uint32) strlen(table_name);
2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860
  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;
2861
    
2862
  if (ex->dumpfile)
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2863
    sql_ex.opt_flags|= DUMPFILE_FLAG;
2864
  if (ex->opt_enclosed)
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2865
    sql_ex.opt_flags|= OPT_ENCLOSED_FLAG;
2866

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2867
  sql_ex.empty_flags= 0;
2868

2869
  switch (handle_dup) {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2870
  case DUP_REPLACE:
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2871
    sql_ex.opt_flags|= REPLACE_FLAG;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2872 2873 2874 2875
    break;
  case DUP_UPDATE:				// Impossible here
  case DUP_ERROR:
    break;	
2876
  }
2877 2878
  if (ignore)
    sql_ex.opt_flags|= IGNORE_FLAG;
2879

2880 2881 2882 2883 2884 2885 2886 2887 2888 2889
  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;
2890
    
2891
  skip_lines = ex->skip_lines;
2892

2893 2894 2895 2896 2897 2898 2899 2900 2901 2902 2903
  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);
2904 2905
  }

2906 2907 2908
  field_lens = (const uchar*)field_lens_buf.ptr();
  fields = fields_buf.ptr();
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2909
#endif /* !MYSQL_CLIENT */
2910

2911

2912
/*
2913
  Load_log_event::Load_log_event()
2914

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2915 2916 2917
  NOTE
    The caller must do buf[event_len] = 0 before he starts using the
    constructed event.
2918 2919
*/

2920 2921 2922 2923
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),
monty@mysql.com's avatar
monty@mysql.com committed
2924
   table_name(0), db(0), fname(0), local_fname(FALSE)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
2925
{
monty@mysql.com's avatar
monty@mysql.com committed
2926
  DBUG_ENTER("Load_log_event");
2927 2928 2929 2930 2931 2932 2933 2934 2935 2936 2937 2938
  /*
    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 */
monty@mysql.com's avatar
monty@mysql.com committed
2939
  DBUG_VOID_RETURN;
2940 2941
}

2942

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2943
/*
2944
  Load_log_event::copy_log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2945
*/
2946

2947
int Load_log_event::copy_log_event(const char *buf, ulong event_len,
2948 2949
                                   int body_offset,
                                   const Format_description_log_event *description_event)
2950
{
2951
  DBUG_ENTER("Load_log_event::copy_log_event");
2952
  uint data_len;
2953
  char* buf_end = (char*)buf + event_len;
2954 2955
  /* this is the beginning of the post-header */
  const char* data_head = buf + description_event->common_header_len;
guilhem@mysql.com's avatar
guilhem@mysql.com committed
2956
  slave_proxy_id= thread_id= uint4korr(data_head + L_THREAD_ID_OFFSET);
2957 2958 2959 2960 2961
  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);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
2962
	  
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
2963
  if ((int) event_len < body_offset)
monty@mysql.com's avatar
monty@mysql.com committed
2964
    DBUG_RETURN(1);
2965 2966 2967 2968
  /*
    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.
  */
2969 2970 2971
  if (!(field_lens= (uchar*)sql_ex.init((char*)buf + body_offset,
                                        buf_end,
                                        buf[EVENT_TYPE_OFFSET] != LOAD_EVENT)))
monty@mysql.com's avatar
monty@mysql.com committed
2972
    DBUG_RETURN(1);
2973
  
2974
  data_len = event_len - body_offset;
2975
  if (num_fields > data_len) // simple sanity check against corruption
monty@mysql.com's avatar
monty@mysql.com committed
2976
    DBUG_RETURN(1);
2977
  for (uint i = 0; i < num_fields; i++)
2978
    field_block_len += (uint)field_lens[i] + 1;
2979

bk@work.mysql.com's avatar
bk@work.mysql.com committed
2980 2981 2982 2983
  fields = (char*)field_lens + num_fields;
  table_name  = fields + field_block_len;
  db = table_name + table_name_len + 1;
  fname = db + db_len + 1;
2984 2985
  fname_len = strlen(fname);
  // null termination is accomplished by the caller doing buf[event_len]=0
2986

monty@mysql.com's avatar
monty@mysql.com committed
2987
  DBUG_RETURN(0);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
2988 2989 2990
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2991
/*
2992
  Load_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2993
*/
2994 2995

#ifdef MYSQL_CLIENT
2996
void Load_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
2997
{
2998
  print(file, print_event_info, 0);
2999 3000
}

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3001

3002
void Load_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info,
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3003
			   bool commented)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3004
{
3005 3006
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

monty@mysql.com's avatar
monty@mysql.com committed
3007
  DBUG_ENTER("Load_log_event::print");
3008
  if (!print_event_info->short_form)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3009
  {
3010 3011 3012
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tQuery\tthread_id=%ld\texec_time=%ld\n",
                thread_id, exec_time);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3013 3014
  }

3015
  bool different_db= 1;
3016
  if (db)
3017
  {
3018 3019 3020 3021 3022 3023
    /*
      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.
    */
3024
    if ((different_db= memcmp(print_event_info->db, db, db_len + 1)) &&
3025
        !commented)
3026
      memcpy(print_event_info->db, db, db_len + 1);
3027
  }
3028
  
3029
  if (db && db[0] && different_db)
3030
    my_b_printf(&cache, "%suse %s%s\n", 
3031
            commented ? "# " : "",
3032
            db, print_event_info->delimiter);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3033

3034
  if (flags & LOG_EVENT_THREAD_SPECIFIC_F)
3035
    my_b_printf(&cache,"%sSET @@session.pseudo_thread_id=%lu%s\n",
3036 3037
            commented ? "# " : "", (ulong)thread_id,
            print_event_info->delimiter);
3038
  my_b_printf(&cache, "%sLOAD DATA ",
3039
              commented ? "# " : "");
3040
  if (check_fname_outside_temp_buf())
3041 3042
    my_b_printf(&cache, "LOCAL ");
  my_b_printf(&cache, "INFILE '%-*s' ", fname_len, fname);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3043

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3044
  if (sql_ex.opt_flags & REPLACE_FLAG)
3045
    my_b_printf(&cache," REPLACE ");
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3046
  else if (sql_ex.opt_flags & IGNORE_FLAG)
3047
    my_b_printf(&cache," IGNORE ");
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3048
  
3049 3050 3051
  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);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3052

monty@mysql.com's avatar
monty@mysql.com committed
3053
  if (sql_ex.opt_flags & OPT_ENCLOSED_FLAG)
3054 3055 3056
    my_b_printf(&cache," OPTIONALLY ");
  my_b_printf(&cache, " ENCLOSED BY ");
  pretty_print_str(&cache, sql_ex.enclosed, sql_ex.enclosed_len);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3057
     
3058 3059
  my_b_printf(&cache, " ESCAPED BY ");
  pretty_print_str(&cache, sql_ex.escaped, sql_ex.escaped_len);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3060
     
3061 3062
  my_b_printf(&cache," LINES TERMINATED BY ");
  pretty_print_str(&cache, sql_ex.line_term, sql_ex.line_term_len);
monty@mysql.com's avatar
monty@mysql.com committed
3063

bk@work.mysql.com's avatar
bk@work.mysql.com committed
3064

3065
  if (sql_ex.line_start)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3066
  {
3067 3068
    my_b_printf(&cache," STARTING BY ");
    pretty_print_str(&cache, sql_ex.line_start, sql_ex.line_start_len);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3069
  }
3070
  if ((long) skip_lines > 0)
3071
    my_b_printf(&cache, " IGNORE %ld LINES", (long) skip_lines);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3072

3073 3074 3075 3076
  if (num_fields)
  {
    uint i;
    const char* field = fields;
3077
    my_b_printf(&cache, " (");
3078
    for (i = 0; i < num_fields; i++)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3079
    {
3080
      if (i)
3081 3082
	my_b_printf(&cache, ",");
      my_b_printf(&cache, field);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3083
	  
3084
      field += field_lens[i]  + 1;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3085
    }
3086
    my_b_printf(&cache, ")");
3087
  }
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3088

3089
  my_b_printf(&cache, "%s\n", print_event_info->delimiter);
monty@mysql.com's avatar
monty@mysql.com committed
3090
  DBUG_VOID_RETURN;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3091
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3092
#endif /* MYSQL_CLIENT */
3093

3094

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3095
/*
3096
  Load_log_event::set_fields()
lars@mysql.com's avatar
lars@mysql.com committed
3097 3098 3099 3100 3101

  Note that 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.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3102
*/
3103

3104
#ifndef MYSQL_CLIENT
lars@mysql.com's avatar
lars@mysql.com committed
3105
void Load_log_event::set_fields(const char* affected_db, 
3106 3107
				List<Item> &field_list,
                                Name_resolution_context *context)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3108 3109
{
  uint i;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3110
  const char* field = fields;
3111
  for (i= 0; i < num_fields; i++)
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
3112
  {
3113 3114
    field_list.push_back(new Item_field(context,
                                        affected_db, table_name, field));
3115
    field+= field_lens[i]  + 1;
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
3116
  }
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3117
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3118
#endif /* !MYSQL_CLIENT */
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3119 3120


hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3121
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3122 3123
/*
  Does the data loading job when executing a LOAD DATA on the slave
3124

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3125 3126 3127 3128 3129 3130 3131 3132 3133 3134 3135 3136 3137 3138
  SYNOPSIS
    Load_log_event::exec_event
      net  
      rli                             
      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.
3139

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3140 3141 3142 3143 3144 3145 3146
  DESCRIPTION
    Does the data loading job when executing a LOAD DATA on the slave
 
  RETURN VALUE
    0           Success                                                 
    1    	Failure
*/
3147

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3148 3149
int Load_log_event::exec_event(NET* net, struct st_relay_log_info* rli, 
			       bool use_rli_only_for_errors)
3150
{
3151 3152 3153 3154
  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);
3155
  DBUG_ASSERT(thd->query == 0);
monty@mysql.com's avatar
monty@mysql.com committed
3156
  thd->query_length= 0;                         // Should not be needed
monty@mysql.com's avatar
monty@mysql.com committed
3157
  thd->query_error= 0;
monty@mysql.com's avatar
monty@mysql.com committed
3158
  clear_all_errors(thd, rli);
3159 3160 3161

  /* see Query_log_event::exec_event() and BUG#13360 */
  DBUG_ASSERT(!rli->m_table_map.count());
3162 3163 3164 3165
  /*
    Usually mysql_init_query() is called by mysql_parse(), but we need it here
    as the present method does not call mysql_parse().
  */
3166
  mysql_init_query(thd, 0, 0);
monty@mysql.com's avatar
monty@mysql.com committed
3167
  if (!use_rli_only_for_errors)
3168
  {
3169
    /* Saved for InnoDB, see comment in Query_log_event::exec_event() */
monty@mysql.com's avatar
monty@mysql.com committed
3170
    rli->future_group_master_log_pos= log_pos;
3171
    DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));
3172
  }
3173 3174
 
   /*
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3175 3176 3177 3178 3179 3180 3181 3182 3183 3184
    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 done by testing rules in
    Create_file_log_event::exec_event() 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).
lars@mysql.com's avatar
lars@mysql.com committed
3185 3186 3187 3188 3189 3190 3191 3192 3193 3194


    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
            ::exec_event(), then the companion SET also have so we
            don't need to reset_one_shot_variables().
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3195
  */
3196
  if (rpl_filter->db_ok(thd->db))
3197
  {
3198 3199
    thd->set_time((time_t)when);
    VOID(pthread_mutex_lock(&LOCK_thread_count));
3200
    thd->query_id = next_query_id();
3201
    VOID(pthread_mutex_unlock(&LOCK_thread_count));
3202 3203 3204 3205 3206 3207
    /*
      Initing thd->row_count is not necessary in theory as this variable has no
      influence in the case of the slave SQL thread (it is used to generate a
      "data truncated" warning but which is absorbed and never gets to the
      error log); still we init it to avoid a Valgrind message.
    */
monty@mysql.com's avatar
monty@mysql.com committed
3208
    mysql_reset_errors(thd, 0);
3209 3210 3211

    TABLE_LIST tables;
    bzero((char*) &tables,sizeof(tables));
3212
    tables.db= thd->strmake(thd->db, thd->db_length);
3213
    tables.alias = tables.table_name = (char*) table_name;
3214
    tables.lock_type = TL_WRITE;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3215
    tables.updating= 1;
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
3216

3217
    // the table will be opened in mysql_load    
3218
    if (rpl_filter->is_on() && !rpl_filter->tables_ok(thd->db, &tables))
3219 3220 3221 3222 3223 3224 3225 3226
    {
      // 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];
3227
      char *end;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3228
      enum enum_duplicates handle_dup;
3229
      bool ignore= 0;
3230 3231
      char *load_data_query;

3232
      /*
3233 3234
        Forge LOAD DATA INFILE query which will be used in SHOW PROCESS LIST
        and written to slave's binlog if binlogging is on.
3235
      */
3236
      if (!(load_data_query= (char *)thd->alloc(get_query_buffer_length() + 1)))
3237
      {
3238 3239 3240 3241 3242
        /*
          This will set thd->fatal_error in case of OOM. So we surely will notice
          that something is wrong.
        */
        goto error;
3243
      }
3244 3245 3246 3247 3248 3249 3250

      print_query(FALSE, load_data_query, &end, (char **)&thd->lex->fname_start,
                  (char **)&thd->lex->fname_end);
      *end= 0;
      thd->query_length= end - load_data_query;
      thd->query= load_data_query;

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3251
      if (sql_ex.opt_flags & REPLACE_FLAG)
3252
      {
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3253
	handle_dup= DUP_REPLACE;
3254
      }
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3255
      else if (sql_ex.opt_flags & IGNORE_FLAG)
3256 3257 3258 3259
      {
        ignore= 1;
        handle_dup= DUP_ERROR;
      }
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3260
      else
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3261
      {
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3262
        /*
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3263
	  When replication is running fine, if it was DUP_ERROR on the
3264
          master then we could choose IGNORE here, because if DUP_ERROR
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3265
          suceeded on master, and data is identical on the master and slave,
3266
          then there should be no uniqueness errors on slave, so IGNORE is
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3267
          the same as DUP_ERROR. But in the unlikely case of uniqueness errors
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3268 3269 3270
          (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.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3271 3272

          If reading from net (a 3.23 master), mysql_load() will change this
3273
          to IGNORE.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3274 3275
        */
        handle_dup= DUP_ERROR;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3276
      }
3277 3278 3279 3280 3281 3282 3283 3284 3285 3286
      /*
        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;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3287

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3288
      sql_exchange ex((char*)fname, sql_ex.opt_flags & DUMPFILE_FLAG);
3289 3290 3291 3292 3293
      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);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3294 3295 3296 3297 3298
      ex.field_term= &field_term;
      ex.enclosed= &enclosed;
      ex.line_term= &line_term;
      ex.line_start= &line_start;
      ex.escaped= &escaped;
3299 3300 3301 3302 3303 3304

      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;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3305
      List<Item> field_list;
3306
      thd->main_lex.select_lex.context.resolve_in_table_list_only(&tables);
3307
      set_fields(tables.db, field_list, &thd->main_lex.select_lex.context);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3308
      thd->variables.pseudo_thread_id= thread_id;
3309
      List<Item> set_fields;
3310 3311 3312 3313 3314 3315 3316 3317 3318
      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;
      }
3319 3320 3321 3322 3323
      /*
        It is safe to use set_fields twice because we are not going to
        update it inside mysql_load().
      */
      if (mysql_load(thd, &ex, &tables, field_list, set_fields, set_fields,
3324
                     handle_dup, ignore, net != 0))
3325
        thd->query_error= 1;
3326
      if (thd->cuted_fields)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3327
      {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3328
	/* log_pos is the position of the LOAD event in the master log */
lars@mysql.com's avatar
lars@mysql.com committed
3329 3330 3331 3332 3333 3334 3335
        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));
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3336
      }
3337 3338 3339
      if (net)
        net->pkt_nr= thd->net.pkt_nr;
    }
3340 3341
  }
  else
3342 3343 3344 3345 3346 3347 3348 3349 3350
  {
    /*
      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);
  }
3351 3352

error:
3353
  thd->net.vio = 0; 
3354
  const char *remember_db= thd->db;
3355
  VOID(pthread_mutex_lock(&LOCK_thread_count));
3356
  thd->catalog= 0;
3357
  thd->set_db(NULL, 0);                   /* will free the current database */
3358
  thd->query= 0;
3359
  thd->query_length= 0;
3360
  VOID(pthread_mutex_unlock(&LOCK_thread_count));
3361 3362 3363
  close_thread_tables(thd);
  if (thd->query_error)
  {
3364
    /* this err/sql_errno code is copy-paste from net_send_error() */
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3365 3366 3367 3368 3369 3370 3371 3372 3373
    const char *err;
    int sql_errno;
    if ((err=thd->net.last_error)[0])
      sql_errno=thd->net.last_errno;
    else
    {
      sql_errno=ER_UNKNOWN_ERROR;
      err=ER(sql_errno);       
    }
3374
    slave_print_msg(ERROR_LEVEL, rli, sql_errno,"\
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3375
Error '%s' running LOAD DATA INFILE on table '%s'. Default database: '%s'",
3376
                    err, (char*)table_name, print_slave_db_safe(remember_db));
3377
    free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
3378 3379
    return 1;
  }
3380
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
3381
	    
3382
  if (thd->is_fatal_error)
3383
  {
3384
    slave_print_msg(ERROR_LEVEL, rli, ER_UNKNOWN_ERROR, "\
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3385
Fatal error running LOAD DATA INFILE on table '%s'. Default database: '%s'",
3386
                    (char*)table_name, print_slave_db_safe(remember_db));
3387 3388 3389
    return 1;
  }

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3390
  return ( use_rli_only_for_errors ? 0 : Log_event::exec_event(rli) ); 
3391
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3392
#endif
3393 3394


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3395
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3396
  Rotate_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3397
**************************************************************************/
3398

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3399
/*
3400
  Rotate_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3401
*/
3402

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3403
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3404
void Rotate_log_event::pack_info(Protocol *protocol)
3405
{
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3406
  char buf1[256], buf[22];
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3407
  String tmp(buf1, sizeof(buf1), log_cs);
3408
  tmp.length(0);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3409
  tmp.append(new_log_ident, ident_len);
3410
  tmp.append(STRING_WITH_LEN(";pos="));
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3411 3412
  tmp.append(llstr(pos,buf));
  protocol->store(tmp.ptr(), tmp.length(), &my_charset_bin);
3413
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3414
#endif
3415

3416

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3417
/*
3418
  Rotate_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3419
*/
3420 3421

#ifdef MYSQL_CLIENT
3422
void Rotate_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3423
{
3424
  char buf[22];
3425 3426
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
3427

3428
  if (print_event_info->short_form)
3429
    return;
3430 3431
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tRotate to ");
3432
  if (new_log_ident)
3433 3434
    my_b_write(&cache, (byte*) new_log_ident, (uint)ident_len);
  my_b_printf(&cache, "  pos: %s\n", llstr(pos, buf));
3435
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3436
#endif /* MYSQL_CLIENT */
3437 3438


3439

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3440
/*
3441
  Rotate_log_event::Rotate_log_event() (2 constructors)
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3442
*/
3443

3444 3445

#ifndef MYSQL_CLIENT
3446
Rotate_log_event::Rotate_log_event(const char* new_log_ident_arg,
3447 3448 3449 3450 3451 3452 3453 3454
                                   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];
3455
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(...,flags)");
3456 3457
  DBUG_PRINT("enter",("new_log_ident: %s  pos: %s  flags: %lu", new_log_ident_arg,
                      llstr(pos_arg, buff), (ulong) flags));
3458 3459
#endif
  if (flags & DUP_NAME)
3460
    new_log_ident= my_strndup(new_log_ident_arg, ident_len, MYF(MY_WME));
3461 3462 3463 3464 3465
  DBUG_VOID_RETURN;
}
#endif


3466 3467
Rotate_log_event::Rotate_log_event(const char* buf, uint event_len,
                                   const Format_description_log_event* description_event)
3468
  :Log_event(buf, description_event) ,new_log_ident(0), flags(DUP_NAME)
3469
{
3470
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(char*,...)");
3471
  // The caller will ensure that event_len is what we have at EVENT_LEN_OFFSET
3472 3473
  uint8 header_size= description_event->common_header_len;
  uint8 post_header_len= description_event->post_header_len[ROTATE_EVENT-1];
3474 3475
  uint ident_offset;
  if (event_len < header_size)
monty@mysql.com's avatar
monty@mysql.com committed
3476
    DBUG_VOID_RETURN;
3477
  buf += header_size;
3478 3479 3480 3481
  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; 
3482
  set_if_smaller(ident_len,FN_REFLEN-1);
3483
  new_log_ident= my_strndup(buf + ident_offset, (uint) ident_len, MYF(MY_WME));
monty@mysql.com's avatar
monty@mysql.com committed
3484
  DBUG_VOID_RETURN;
3485
}
3486 3487


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3488
/*
3489
  Rotate_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3490
*/
3491

3492
#ifndef MYSQL_CLIENT
3493
bool Rotate_log_event::write(IO_CACHE* file)
3494
{
3495
  char buf[ROTATE_HEADER_LEN];
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3496
  int8store(buf + R_POS_OFFSET, pos);
3497 3498 3499
  return (write_header(file, ROTATE_HEADER_LEN + ident_len) ||
          my_b_safe_write(file, (byte*)buf, ROTATE_HEADER_LEN) ||
          my_b_safe_write(file, (byte*)new_log_ident, (uint) ident_len));
3500
}
3501
#endif
3502

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3503
/*
3504 3505
  Rotate_log_event::exec_event()

3506
  Got a rotate log event from the master
3507

3508 3509 3510
  IMPLEMENTATION
    This is mainly used so that we can later figure out the logname and
    position for the master.
3511

3512
    We can't rotate the slave's BINlog as this will cause infinitive rotations
3513
    in a A -> B -> A setup.
3514
    The NOTES below is a wrong comment which will disappear when 4.1 is merged.
3515 3516 3517

  RETURN VALUES
    0	ok
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3518
*/
3519

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3520
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3521
int Rotate_log_event::exec_event(struct st_relay_log_info* rli)
3522
{
3523 3524 3525
  DBUG_ENTER("Rotate_log_event::exec_event");

  pthread_mutex_lock(&rli->data_lock);
3526
  rli->event_relay_log_pos= my_b_tell(rli->cur_log);
guilhem@gbichot2's avatar
guilhem@gbichot2 committed
3527 3528 3529 3530 3531 3532 3533 3534 3535
  /*
    If we are in a transaction: 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:
    BEGIN
    ...
    ROTATE (a fake one)
    ...
    COMMIT or ROLLBACK
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3536 3537
    In that case, we don't want to touch the coordinates which correspond to
    the beginning of the transaction.
3538 3539
    Starting from 5.0.0, there also are some rotates from the slave itself, in
    the relay log.
guilhem@gbichot2's avatar
guilhem@gbichot2 committed
3540
  */
3541
  if (!(thd->options & OPTION_BEGIN))
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3542
  {
3543 3544
    memcpy(rli->group_master_log_name, new_log_ident, ident_len+1);
    rli->notify_group_master_log_name_update();
3545 3546
    rli->group_master_log_pos= pos;
    rli->group_relay_log_pos= rli->event_relay_log_pos;
3547 3548
    DBUG_PRINT("info", ("group_master_log_name: '%s'  "
                        "group_master_log_pos: %lu",
3549
                        rli->group_master_log_name,
3550
                        (ulong) rli->group_master_log_pos));
3551
    /*
3552 3553
      Reset thd->options and sql_mode etc, because this could be the signal of
      a master's downgrade from 5.0 to 4.0.
3554 3555 3556 3557 3558
      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);
3559
    set_slave_thread_default_charset(thd, rli);
3560
    thd->variables.sql_mode= global_system_variables.sql_mode;
3561 3562
    thd->variables.auto_increment_increment=
      thd->variables.auto_increment_offset= 1;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3563
  }
3564 3565 3566 3567
  pthread_mutex_unlock(&rli->data_lock);
  pthread_cond_broadcast(&rli->data_cond);
  flush_relay_log_info(rli);
  DBUG_RETURN(0);
3568
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3569
#endif
3570 3571


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3572
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3573
	Intvar_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3574
**************************************************************************/
3575

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3576
/*
3577
  Intvar_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3578
*/
3579

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3580
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3581
void Intvar_log_event::pack_info(Protocol *protocol)
3582
{
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3583 3584
  char buf[256], *pos;
  pos= strmake(buf, get_var_type_name(), sizeof(buf)-23);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3585
  *pos++= '=';
3586
  pos= longlong10_to_str(val, pos, -10);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3587
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
3588
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3589
#endif
3590

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3591

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3592
/*
3593
  Intvar_log_event::Intvar_log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3594
*/
3595

3596 3597 3598
Intvar_log_event::Intvar_log_event(const char* buf,
                                   const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
3599
{
3600 3601 3602
  buf+= description_event->common_header_len;
  type= buf[I_TYPE_OFFSET];
  val= uint8korr(buf+I_VAL_OFFSET);
3603 3604
}

3605

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3606
/*
3607
  Intvar_log_event::get_var_type_name()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3608
*/
3609 3610

const char* Intvar_log_event::get_var_type_name()
3611
{
3612 3613 3614 3615 3616
  switch(type) {
  case LAST_INSERT_ID_EVENT: return "LAST_INSERT_ID";
  case INSERT_ID_EVENT: return "INSERT_ID";
  default: /* impossible */ return "UNKNOWN";
  }
3617 3618
}

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3619

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3620
/*
3621
  Intvar_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3622
*/
3623

3624
#ifndef MYSQL_CLIENT
3625
bool Intvar_log_event::write(IO_CACHE* file)
3626
{
3627 3628
  byte buf[9];
  buf[I_TYPE_OFFSET]= (byte) type;
3629
  int8store(buf + I_VAL_OFFSET, val);
3630 3631
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
3632
}
3633
#endif
3634

3635

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3636
/*
3637
  Intvar_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3638
*/
3639 3640

#ifdef MYSQL_CLIENT
3641
void Intvar_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3642
{
3643 3644 3645
  char llbuff[22];
  const char *msg;
  LINT_INIT(msg);
3646 3647
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
3648

3649
  if (!print_event_info->short_form)
3650
  {
3651 3652
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tIntvar\n");
3653
  }
3654

3655
  my_b_printf(&cache, "SET ");
3656 3657 3658 3659 3660 3661 3662
  switch (type) {
  case LAST_INSERT_ID_EVENT:
    msg="LAST_INSERT_ID";
    break;
  case INSERT_ID_EVENT:
    msg="INSERT_ID";
    break;
3663 3664 3665 3666
  case INVALID_INT_EVENT:
  default: // cannot happen
    msg="INVALID_INT";
    break;
3667
  }
3668 3669
  my_b_printf(&cache, "%s=%s%s\n",
              msg, llstr(val,llbuff), print_event_info->delimiter);
3670
}
3671
#endif
3672

3673

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3674
/*
3675
  Intvar_log_event::exec_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3676
*/
3677

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3678
#if defined(HAVE_REPLICATION)&& !defined(MYSQL_CLIENT)
3679
int Intvar_log_event::exec_event(struct st_relay_log_info* rli)
3680
{
3681 3682
  switch (type) {
  case LAST_INSERT_ID_EVENT:
3683 3684
    thd->stmt_depends_on_first_successful_insert_id_in_prev_stmt= 1;
    thd->first_successful_insert_id_in_prev_stmt= val;
3685 3686
    break;
  case INSERT_ID_EVENT:
3687
    thd->force_one_auto_inc_interval(val);
3688 3689
    break;
  }
3690
  rli->inc_event_relay_log_pos();
3691
  return 0;
3692
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3693
#endif
3694

3695

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3696
/**************************************************************************
3697
  Rand_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3698
**************************************************************************/
3699

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3700
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3701
void Rand_log_event::pack_info(Protocol *protocol)
3702
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3703 3704 3705 3706 3707
  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);
3708
  protocol->store(buf1, (uint) (pos-buf1), &my_charset_bin);
3709
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3710
#endif
3711 3712


3713 3714 3715
Rand_log_event::Rand_log_event(const char* buf,
                               const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
3716
{
3717 3718 3719
  buf+= description_event->common_header_len;
  seed1= uint8korr(buf+RAND_SEED1_OFFSET);
  seed2= uint8korr(buf+RAND_SEED2_OFFSET);
3720 3721
}

3722

3723
#ifndef MYSQL_CLIENT
3724
bool Rand_log_event::write(IO_CACHE* file)
3725
{
3726
  byte buf[16];
3727 3728
  int8store(buf + RAND_SEED1_OFFSET, seed1);
  int8store(buf + RAND_SEED2_OFFSET, seed2);
3729 3730
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
3731
}
3732
#endif
3733

3734 3735

#ifdef MYSQL_CLIENT
3736
void Rand_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3737
{
3738 3739 3740
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

3741
  char llbuff[22],llbuff2[22];
3742
  if (!print_event_info->short_form)
3743
  {
3744 3745
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tRand\n");
3746
  }
3747 3748 3749
  my_b_printf(&cache, "SET @@RAND_SEED1=%s, @@RAND_SEED2=%s%s\n",
              llstr(seed1, llbuff),llstr(seed2, llbuff2),
              print_event_info->delimiter);
3750
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3751
#endif /* MYSQL_CLIENT */
3752

3753

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3754
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3755
int Rand_log_event::exec_event(struct st_relay_log_info* rli)
3756
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3757 3758
  thd->rand.seed1= (ulong) seed1;
  thd->rand.seed2= (ulong) seed2;
3759
  rli->inc_event_relay_log_pos();
3760 3761
  return 0;
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3762
#endif /* !MYSQL_CLIENT */
3763

3764

3765 3766 3767 3768 3769 3770 3771
/**************************************************************************
  Xid_log_event methods
**************************************************************************/

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Xid_log_event::pack_info(Protocol *protocol)
{
3772 3773
  char buf[128], *pos;
  pos= strmov(buf, "COMMIT /* xid=");
3774
  pos= longlong10_to_str(xid, pos, 10);
3775
  pos= strmov(pos, " */");
3776 3777 3778 3779
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
}
#endif

3780 3781 3782 3783 3784 3785 3786 3787
/*
  NOTE it's ok not to use int8store here,
  as long as xid_t::set(ulonglong) and
  xid_t::get_my_xid doesn't do it either

  we don't care about actual values of xids as long as
  identical numbers compare identically
*/
3788 3789 3790 3791

Xid_log_event::
Xid_log_event(const char* buf,
              const Format_description_log_event *description_event)
3792 3793 3794
  :Log_event(buf, description_event)
{
  buf+= description_event->common_header_len;
3795
  memcpy((char*) &xid, buf, sizeof(xid));
3796 3797 3798
}


3799
#ifndef MYSQL_CLIENT
3800 3801 3802 3803 3804
bool Xid_log_event::write(IO_CACHE* file)
{
  return write_header(file, sizeof(xid)) ||
         my_b_safe_write(file, (byte*) &xid, sizeof(xid));
}
3805
#endif
3806 3807 3808


#ifdef MYSQL_CLIENT
3809
void Xid_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3810
{
3811 3812 3813
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

3814
  if (!print_event_info->short_form)
3815
  {
3816 3817 3818
    char buf[64];
    longlong10_to_str(xid, buf, 10);

3819 3820
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tXid = %s\n", buf);
3821
  }
3822
  my_b_printf(&cache, "COMMIT%s\n", print_event_info->delimiter);
3823 3824 3825 3826 3827 3828 3829
}
#endif /* MYSQL_CLIENT */


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
int Xid_log_event::exec_event(struct st_relay_log_info* rli)
{
3830
  /* For a slave Xid_log_event is COMMIT */
3831 3832
  general_log_print(thd, COM_QUERY,
                    "COMMIT /* implicit, from Xid_log_event */");
3833
  return end_trans(thd, COMMIT) || Log_event::exec_event(rli);
3834 3835 3836 3837
}
#endif /* !MYSQL_CLIENT */


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3838
/**************************************************************************
3839
  User_var_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3840
**************************************************************************/
3841

3842
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3843 3844 3845
void User_var_log_event::pack_info(Protocol* protocol)
{
  char *buf= 0;
3846
  uint val_offset= 4 + name_len;
3847 3848 3849 3850 3851 3852 3853 3854 3855 3856 3857 3858 3859 3860 3861
  uint event_len= val_offset;

  if (is_null)
  {
    buf= my_malloc(val_offset + 5, MYF(MY_WME));
    strmov(buf + val_offset, "NULL");
    event_len= val_offset + 4;
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
      float8get(real_val, val);
      buf= my_malloc(val_offset + FLOATING_POINT_BUFFER, MYF(MY_WME));
3862 3863
      event_len+= my_sprintf(buf + val_offset,
			     (buf + val_offset, "%.14g", real_val));
3864 3865 3866 3867 3868
      break;
    case INT_RESULT:
      buf= my_malloc(val_offset + 22, MYF(MY_WME));
      event_len= longlong10_to_str(uint8korr(val), buf + val_offset,-10)-buf;
      break;
3869 3870 3871 3872 3873 3874 3875 3876 3877 3878
    case DECIMAL_RESULT:
    {
      buf= my_malloc(val_offset + DECIMAL_MAX_STR_LENGTH, MYF(MY_WME));
      String str(buf+val_offset, DECIMAL_MAX_STR_LENGTH, &my_charset_bin);
      my_decimal dec;
      binary2my_decimal(E_DEC_FATAL_ERROR, val+2, &dec, val[0], val[1]);
      my_decimal2string(E_DEC_FATAL_ERROR, &dec, 0, 0, 0, &str);
      event_len= str.length() + val_offset;
      break;
    } 
3879
    case STRING_RESULT:
3880 3881 3882 3883 3884 3885 3886 3887 3888 3889
      /* 15 is for 'COLLATE' and other chars */
      buf= my_malloc(event_len+val_len*2+1+2*MY_CS_NAME_SIZE+15, MYF(MY_WME));
      CHARSET_INFO *cs;
      if (!(cs= get_charset(charset_number, MYF(0))))
      {
        strmov(buf+val_offset, "???");
        event_len+= 3;
      }
      else
      {
3890 3891 3892
        char *p= strxmov(buf + val_offset, "_", cs->csname, " ", NullS);
        p= str_to_hex(p, val, val_len);
        p= strxmov(p, " COLLATE ", cs->name, NullS);
3893 3894
        event_len= p-buf;
      }
3895
      break;
3896
    case ROW_RESULT:
3897
    default:
3898 3899 3900 3901 3902
      DBUG_ASSERT(1);
      return;
    }
  }
  buf[0]= '@';
3903 3904 3905 3906
  buf[1]= '`';
  buf[2+name_len]= '`';
  buf[3+name_len]= '=';
  memcpy(buf+2, name, name_len);
3907
  protocol->store(buf, event_len, &my_charset_bin);
3908 3909
  my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3910
#endif /* !MYSQL_CLIENT */
3911 3912


3913 3914 3915 3916
User_var_log_event::
User_var_log_event(const char* buf,
                   const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
3917
{
3918
  buf+= description_event->common_header_len;
3919 3920
  name_len= uint4korr(buf);
  name= (char *) buf + UV_NAME_LEN_SIZE;
3921 3922
  buf+= UV_NAME_LEN_SIZE + name_len;
  is_null= (bool) *buf;
3923 3924 3925
  if (is_null)
  {
    type= STRING_RESULT;
3926
    charset_number= my_charset_bin.number;
3927 3928 3929 3930 3931
    val_len= 0;
    val= 0;  
  }
  else
  {
3932 3933 3934
    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 + 
3935
		       UV_CHARSET_NUMBER_SIZE);
3936 3937
    val= (char *) (buf + UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE +
		   UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE);
3938 3939 3940 3941
  }
}


3942
#ifndef MYSQL_CLIENT
3943
bool User_var_log_event::write(IO_CACHE* file)
3944 3945 3946 3947
{
  char buf[UV_NAME_LEN_SIZE];
  char buf1[UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE + 
	    UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE];
3948
  char buf2[max(8, DECIMAL_MAX_FIELD_SIZE + 2)], *pos= buf2;
3949
  uint buf1_length;
3950
  ulong event_length;
3951

3952
  int4store(buf, name_len);
3953 3954 3955 3956 3957 3958 3959
  
  if ((buf1[0]= is_null))
  {
    buf1_length= 1;
    val_len= 0;
  }    
  else
3960 3961 3962 3963 3964 3965 3966 3967 3968 3969 3970
  {
    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;
3971 3972 3973 3974 3975 3976
    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;
3977
      decimal2bin((decimal_t*)val, buf2+2, buf2[0], buf2[1]);
3978 3979 3980
      val_len= decimal_bin_size(buf2[0], buf2[1]) + 2;
      break;
    }
3981 3982 3983
    case STRING_RESULT:
      pos= val;
      break;
3984
    case ROW_RESULT:
3985
    default:
3986 3987 3988
      DBUG_ASSERT(1);
      return 0;
    }
3989 3990
    int4store(buf1 + 2 + UV_CHARSET_NUMBER_SIZE, val_len);
    buf1_length= 10;
3991
  }
3992 3993 3994 3995 3996 3997

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

  return (write_header(file, event_length) ||
          my_b_safe_write(file, (byte*) buf, sizeof(buf))   ||
3998 3999 4000
	  my_b_safe_write(file, (byte*) name, name_len)     ||
	  my_b_safe_write(file, (byte*) buf1, buf1_length) ||
	  my_b_safe_write(file, (byte*) pos, val_len));
4001
}
4002
#endif
4003

4004

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4005
/*
4006
  User_var_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4007
*/
4008 4009

#ifdef MYSQL_CLIENT
4010
void User_var_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4011
{
4012 4013 4014
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

4015
  if (!print_event_info->short_form)
4016
  {
4017 4018
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tUser_var\n");
4019 4020
  }

4021 4022 4023
  my_b_printf(&cache, "SET @`");
  my_b_write(&cache, (byte*) name, (uint) (name_len));
  my_b_printf(&cache, "`");
4024 4025 4026

  if (is_null)
  {
4027
    my_b_printf(&cache, ":=NULL%s\n", print_event_info->delimiter);
4028 4029 4030 4031 4032 4033 4034
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
      float8get(real_val, val);
4035
      my_b_printf(&cache, ":=%.14g%s\n", real_val, print_event_info->delimiter);
4036 4037 4038 4039
      break;
    case INT_RESULT:
      char int_buf[22];
      longlong10_to_str(uint8korr(val), int_buf, -10);
4040
      my_b_printf(&cache, ":=%s%s\n", int_buf, print_event_info->delimiter);
4041
      break;
4042 4043 4044 4045 4046 4047
    case DECIMAL_RESULT:
    {
      char str_buf[200];
      int str_len= sizeof(str_buf) - 1;
      int precision= (int)val[0];
      int scale= (int)val[1];
4048 4049
      decimal_digit_t dec_buf[10];
      decimal_t dec;
4050 4051 4052 4053 4054 4055
      dec.len= 10;
      dec.buf= dec_buf;

      bin2decimal(val+2, &dec, precision, scale);
      decimal2string(&dec, str_buf, &str_len, 0, 0, 0);
      str_buf[str_len]= 0;
4056
      my_b_printf(&cache, ":=%s%s\n", str_buf, print_event_info->delimiter);
4057 4058
      break;
    }
4059
    case STRING_RESULT:
4060
    {
4061 4062 4063 4064 4065 4066 4067 4068 4069 4070 4071 4072 4073 4074
      /*
        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.
      */
4075 4076 4077 4078
      char *hex_str;
      CHARSET_INFO *cs;

      if (!(hex_str= (char *)my_alloca(2*val_len+1+2))) // 2 hex digits / byte
4079
        break; // no error, as we are 'void'
4080
      str_to_hex(hex_str, val, val_len);
4081 4082 4083 4084 4085 4086 4087 4088 4089 4090 4091
      /*
        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.
        */
4092
        my_b_printf(&cache, ":=???%s\n", print_event_info->delimiter);
4093
      else
4094 4095 4096
        my_b_printf(&cache, ":=_%s %s COLLATE `%s`%s\n",
                    cs->csname, hex_str, cs->name,
                    print_event_info->delimiter);
4097
      my_afree(hex_str);
4098
    }
4099
      break;
4100
    case ROW_RESULT:
4101
    default:
4102
      DBUG_ASSERT(1);
4103 4104 4105 4106
      return;
    }
  }
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4107
#endif
4108

4109

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4110
/*
4111
  User_var_log_event::exec_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4112
*/
4113

4114
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4115 4116 4117
int User_var_log_event::exec_event(struct st_relay_log_info* rli)
{
  Item *it= 0;
4118 4119 4120
  CHARSET_INFO *charset;
  if (!(charset= get_charset(charset_number, MYF(MY_WME))))
    return 1;
4121 4122 4123
  LEX_STRING user_var_name;
  user_var_name.str= name;
  user_var_name.length= name_len;
4124 4125
  double real_val;
  longlong int_val;
4126 4127 4128 4129 4130 4131 4132 4133 4134 4135

  if (is_null)
  {
    it= new Item_null();
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      float8get(real_val, val);
4136
      it= new Item_float(real_val);
4137
      val= (char*) &real_val;		// Pointer to value in native format
4138
      val_len= 8;
4139 4140
      break;
    case INT_RESULT:
4141 4142 4143
      int_val= (longlong) uint8korr(val);
      it= new Item_int(int_val);
      val= (char*) &int_val;		// Pointer to value in native format
4144
      val_len= 8;
4145
      break;
4146 4147 4148 4149 4150 4151 4152 4153
    case DECIMAL_RESULT:
    {
      Item_decimal *dec= new Item_decimal(val+2, val[0], val[1]);
      it= dec;
      val= (char *)dec->val_decimal(NULL);
      val_len= sizeof(my_decimal);
      break;
    }
4154 4155 4156
    case STRING_RESULT:
      it= new Item_string(val, val_len, charset);
      break;
4157
    case ROW_RESULT:
4158
    default:
4159 4160 4161 4162 4163
      DBUG_ASSERT(1);
      return 0;
    }
  }
  Item_func_set_user_var e(user_var_name, it);
4164 4165 4166 4167
  /*
    Item_func_set_user_var can't substitute something else on its place =>
    0 can be passed as last argument (reference on item)
  */
4168
  e.fix_fields(thd, 0);
4169 4170 4171 4172 4173
  /*
    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.
   */
kaa@polly.local's avatar
kaa@polly.local committed
4174
  e.update_hash(val, val_len, type, charset, DERIVATION_IMPLICIT, 0);
4175
  free_root(thd->mem_root,0);
4176

4177
  rli->inc_event_relay_log_pos();
4178 4179
  return 0;
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4180
#endif /* !MYSQL_CLIENT */
4181 4182


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4183
/**************************************************************************
4184
  Slave_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4185
**************************************************************************/
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4186

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4187
#ifdef HAVE_REPLICATION
4188
#ifdef MYSQL_CLIENT
4189
void Unknown_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info)
4190
{
4191 4192
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

4193
  if (print_event_info->short_form)
4194
    return;
4195 4196
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n# %s", "Unknown event\n");
4197 4198
}
#endif  
4199

4200
#ifndef MYSQL_CLIENT
4201
void Slave_log_event::pack_info(Protocol *protocol)
4202
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4203
  char buf[256+HOSTNAME_LENGTH], *pos;
4204 4205 4206 4207 4208 4209 4210
  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=");
4211
  pos= longlong10_to_str(master_pos, pos, 10);
4212
  protocol->store(buf, pos-buf, &my_charset_bin);
4213
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4214
#endif /* !MYSQL_CLIENT */
4215 4216 4217 4218


#ifndef MYSQL_CLIENT
Slave_log_event::Slave_log_event(THD* thd_arg,
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4219
				 struct st_relay_log_info* rli)
4220
  :Log_event(thd_arg, 0, 0) , mem_pool(0), master_host(0)
4221 4222 4223 4224
{
  DBUG_ENTER("Slave_log_event");
  if (!rli->inited)				// QQ When can this happen ?
    DBUG_VOID_RETURN;
4225

4226 4227 4228 4229 4230
  MASTER_INFO* mi = rli->mi;
  // 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);
4231
  master_log_len = strlen(rli->group_master_log_name);
4232 4233 4234
  // 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))))
4235
  {
4236 4237 4238
    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;
4239
    memcpy(master_log, rli->group_master_log_name, master_log_len + 1);
4240
    master_port = mi->port;
4241
    master_pos = rli->group_master_log_pos;
4242
    DBUG_PRINT("info", ("master_log: %s  pos: %lu", master_log,
4243
			(ulong) master_pos));
4244
  }
4245 4246 4247 4248 4249 4250
  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;
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4251
#endif /* !MYSQL_CLIENT */
4252 4253 4254 4255 4256 4257 4258 4259 4260


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


#ifdef MYSQL_CLIENT
4261
void Slave_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4262
{
4263 4264
  Write_on_release_cache cache(&print_event_info->head_cache, file);

4265
  char llbuff[22];
4266
  if (print_event_info->short_form)
4267
    return;
4268 4269
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n\
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4270
Slave: master_host: '%s'  master_port: %d  master_log: '%s'  master_pos: %s\n",
4271 4272
	  master_host, master_port, master_log, llstr(master_pos, llbuff));
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4273
#endif /* MYSQL_CLIENT */
4274 4275 4276 4277 4278 4279 4280 4281


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


4282
#ifndef MYSQL_CLIENT
4283
bool Slave_log_event::write(IO_CACHE* file)
4284
{
4285
  ulong event_length= get_data_size();
4286 4287 4288
  int8store(mem_pool + SL_MASTER_POS_OFFSET, master_pos);
  int2store(mem_pool + SL_MASTER_PORT_OFFSET, master_port);
  // log and host are already there
4289 4290 4291

  return (write_header(file, event_length) ||
          my_b_safe_write(file, (byte*) mem_pool, event_length));
4292
}
4293
#endif
4294 4295 4296 4297 4298 4299 4300 4301 4302 4303 4304


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;
  master_host_len = strlen(master_host);
  // safety
  master_log = master_host + master_host_len + 1;
  if (master_log > mem_pool + data_size)
4305
  {
4306 4307
    master_host = 0;
    return;
4308
  }
4309 4310
  master_log_len = strlen(master_log);
}
4311

4312

4313 4314 4315
/* This code is not used, so has not been updated to be format-tolerant */
Slave_log_event::Slave_log_event(const char* buf, uint event_len)
  :Log_event(buf,0) /*unused event*/ ,mem_pool(0),master_host(0)
4316
{
4317
  if (event_len < LOG_EVENT_HEADER_LEN)
4318
    return;
4319
  event_len -= LOG_EVENT_HEADER_LEN;
4320 4321 4322 4323 4324
  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);
4325 4326
}

4327

4328 4329 4330 4331 4332 4333 4334
#ifndef MYSQL_CLIENT
int Slave_log_event::exec_event(struct st_relay_log_info* rli)
{
  if (mysql_bin_log.is_open())
    mysql_bin_log.write(this);
  return Log_event::exec_event(rli);
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4335
#endif /* !MYSQL_CLIENT */
4336 4337


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4338
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4339
	Stop_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4340
**************************************************************************/
4341

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4342
/*
4343
  Stop_log_event::print()
4344
*/
4345 4346

#ifdef MYSQL_CLIENT
4347
void Stop_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4348
{
4349 4350 4351
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

4352
  if (print_event_info->short_form)
4353 4354
    return;

4355 4356
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tStop\n");
4357
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4358
#endif /* MYSQL_CLIENT */
4359

4360

4361
/*
4362
  Stop_log_event::exec_event()
4363

4364
  The master stopped.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4365
  We used to clean up all temporary tables but this is useless as, as the
4366 4367
  master has shut down properly, it has written all DROP TEMPORARY TABLE
  (prepared statements' deletion is TODO only when we binlog prep stmts).
4368 4369 4370
  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.
4371
  The place were we must do this cleaning is in Start_log_event_v3::exec_event(),
4372
  not here. Because if we come here, the master was sane.
4373 4374
*/

4375
#ifndef MYSQL_CLIENT
4376
int Stop_log_event::exec_event(struct st_relay_log_info* rli)
4377
{
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4378 4379
  /*
    We do not want to update master_log pos because we get a rotate event
4380
    before stop, so by now group_master_log_name is set to the next log.
4381
    If we updated it, we will have incorrect master coordinates and this
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4382
    could give false triggers in MASTER_POS_WAIT() that we have reached
4383
    the target position when in fact we have not.
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4384
  */
4385 4386 4387 4388 4389 4390 4391
  if (thd->options & OPTION_BEGIN)
    rli->inc_event_relay_log_pos();
  else
  {
    rli->inc_group_relay_log_pos(0);
    flush_relay_log_info(rli);
  }
4392 4393
  return 0;
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4394
#endif /* !MYSQL_CLIENT */
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4395
#endif /* HAVE_REPLICATION */
4396

4397

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4398
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4399
	Create_file_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4400
**************************************************************************/
4401 4402

/*
4403
  Create_file_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4404
*/
4405 4406

#ifndef MYSQL_CLIENT
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4407 4408 4409 4410
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,
4411
                      bool ignore,
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4412
		      char* block_arg, uint block_len_arg, bool using_trans)
4413
  :Load_log_event(thd_arg,ex,db_arg,table_name_arg,fields_arg,handle_dup, ignore,
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4414
		  using_trans),
4415
   fake_base(0), block(block_arg), event_buf(0), block_len(block_len_arg),
4416
   file_id(thd_arg->file_id = mysql_bin_log.next_file_id())
4417
{
monty@mysql.com's avatar
monty@mysql.com committed
4418
  DBUG_ENTER("Create_file_log_event");
4419
  sql_ex.force_new_format();
monty@mysql.com's avatar
monty@mysql.com committed
4420
  DBUG_VOID_RETURN;
4421
}
4422

4423

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4424
/*
4425
  Create_file_log_event::write_data_body()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4426
*/
4427

4428
bool Create_file_log_event::write_data_body(IO_CACHE* file)
4429
{
4430 4431
  bool res;
  if ((res= Load_log_event::write_data_body(file)) || fake_base)
4432 4433
    return res;
  return (my_b_safe_write(file, (byte*) "", 1) ||
4434
          my_b_safe_write(file, (byte*) block, block_len));
4435 4436
}

4437

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4438
/*
4439
  Create_file_log_event::write_data_header()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4440
*/
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4441

4442
bool Create_file_log_event::write_data_header(IO_CACHE* file)
4443
{
4444
  bool res;
4445
  byte buf[CREATE_FILE_HEADER_LEN];
4446 4447
  if ((res= Load_log_event::write_data_header(file)) || fake_base)
    return res;
4448
  int4store(buf + CF_FILE_ID_OFFSET, file_id);
4449
  return my_b_safe_write(file, buf, CREATE_FILE_HEADER_LEN) != 0;
4450 4451 4452
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4453
/*
4454
  Create_file_log_event::write_base()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4455
*/
4456

4457
bool Create_file_log_event::write_base(IO_CACHE* file)
4458
{
4459 4460 4461 4462
  bool res;
  fake_base= 1;                                 // pretend we are Load event
  res= write(file);
  fake_base= 0;
4463 4464 4465
  return res;
}

4466
#endif /* !MYSQL_CLIENT */
4467

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4468
/*
4469
  Create_file_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4470
*/
4471

4472 4473 4474
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)
4475
{
4476 4477 4478 4479 4480
  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];
monty@mysql.com's avatar
monty@mysql.com committed
4481
  if (!(event_buf= my_memdup((byte*) buf, len, MYF(MY_WME))) ||
4482 4483 4484 4485 4486 4487 4488
      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))
monty@mysql.com's avatar
monty@mysql.com committed
4489
    DBUG_VOID_RETURN;
4490
  if (description_event->binlog_version!=1)
4491
  {
4492 4493 4494 4495 4496 4497 4498 4499 4500 4501 4502 4503 4504 4505 4506 4507 4508
    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);
4509 4510 4511 4512 4513 4514 4515 4516 4517
    if (len < block_offset)
      return;
    block = (char*)buf + block_offset;
    block_len = len - block_offset;
  }
  else
  {
    sql_ex.force_new_format();
    inited_from_old = 1;
4518
  }
monty@mysql.com's avatar
monty@mysql.com committed
4519
  DBUG_VOID_RETURN;
4520 4521
}

4522

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4523
/*
4524
  Create_file_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4525
*/
4526 4527

#ifdef MYSQL_CLIENT
4528
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info,
lars@mysql.com's avatar
lars@mysql.com committed
4529
				  bool enable_local)
nick@mysql.com's avatar
nick@mysql.com committed
4530
{
4531 4532
  Write_on_release_cache cache(&print_event_info->head_cache, file);

4533
  if (print_event_info->short_form)
4534 4535
  {
    if (enable_local && check_fname_outside_temp_buf())
4536
      Load_log_event::print(file, print_event_info);
4537
    return;
4538 4539 4540 4541
  }

  if (enable_local)
  {
4542
    Load_log_event::print(file, print_event_info,
4543
			  !check_fname_outside_temp_buf());
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4544 4545 4546 4547
    /* 
       That one is for "file_id: etc" below: in mysqlbinlog we want the #, in
       SHOW BINLOG EVENTS we don't.
    */
4548
    my_b_printf(&cache, "#"); 
4549 4550
  }

4551
  my_b_printf(&cache, " file_id: %d  block_len: %d\n", file_id, block_len);
nick@mysql.com's avatar
nick@mysql.com committed
4552
}
4553

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4554

4555
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4556
{
4557
  print(file, print_event_info, 0);
4558
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4559
#endif /* MYSQL_CLIENT */
nick@mysql.com's avatar
nick@mysql.com committed
4560

4561

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4562
/*
4563
  Create_file_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4564
*/
4565

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4566
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4567
void Create_file_log_event::pack_info(Protocol *protocol)
4568
{
4569 4570 4571
  char buf[NAME_LEN*2 + 30 + 21*2], *pos;
  pos= strmov(buf, "db=");
  memcpy(pos, db, db_len);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4572
  pos= strmov(pos + db_len, ";table=");
4573
  memcpy(pos, table_name, table_name_len);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4574
  pos= strmov(pos + table_name_len, ";file_id=");
4575 4576 4577
  pos= int10_to_str((long) file_id, pos, 10);
  pos= strmov(pos, ";block_len=");
  pos= int10_to_str((long) block_len, pos, 10);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4578
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
4579
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4580
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
4581 4582


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4583
/*
4584
  Create_file_log_event::exec_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4585
*/
4586

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4587
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4588
int Create_file_log_event::exec_event(struct st_relay_log_info* rli)
4589
{
4590 4591
  char proc_info[17+FN_REFLEN+10], *fname_buf;
  char *ext;
4592 4593 4594
  int fd = -1;
  IO_CACHE file;
  int error = 1;
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4595

4596
  bzero((char*)&file, sizeof(file));
4597 4598
  fname_buf= strmov(proc_info, "Making temp file ");
  ext= slave_load_file_stem(fname_buf, file_id, server_id, ".info");
4599
  thd->proc_info= proc_info;
4600 4601 4602 4603
  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 ||
4604 4605 4606
      init_io_cache(&file, fd, IO_SIZE, WRITE_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
4607 4608
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Error in Create_file event: "
                    "could not open file '%s'", fname_buf);
4609 4610 4611 4612
    goto err;
  }
  
  // a trick to avoid allocating another buffer
4613 4614
  fname= fname_buf;
  fname_len= (uint) (strmov(ext, ".data") - fname);
4615 4616
  if (write_base(&file))
  {
4617
    strmov(ext, ".info"); // to have it right in the error message
4618 4619 4620
    slave_print_msg(ERROR_LEVEL, rli, my_errno,
                    "Error in Create_file event: could not write to file '%s'",
                    fname_buf);
4621 4622 4623 4624 4625 4626
    goto err;
  }
  end_io_cache(&file);
  my_close(fd, MYF(0));
  
  // fname_buf now already has .data, not .info, because we did our trick
4627 4628 4629 4630
  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)
4631
  {
4632 4633
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Error in Create_file event: "
                    "could not open file '%s'", fname_buf);
4634 4635
    goto err;
  }
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4636
  if (my_write(fd, (byte*) block, block_len, MYF(MY_WME+MY_NABP)))
4637
  {
4638 4639
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Error in Create_file event: "
                    "write to '%s' failed", fname_buf);
4640 4641
    goto err;
  }
4642 4643
  error=0;					// Everything is ok

4644 4645 4646 4647 4648
err:
  if (error)
    end_io_cache(&file);
  if (fd >= 0)
    my_close(fd, MYF(0));
4649
  thd->proc_info= 0;
4650
  return error ? 1 : Log_event::exec_event(rli);
4651
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4652
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
4653

4654

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4655
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4656
	Append_block_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4657
**************************************************************************/
4658

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4659
/*
4660
  Append_block_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4661
*/
4662 4663

#ifndef MYSQL_CLIENT  
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4664 4665
Append_block_log_event::Append_block_log_event(THD* thd_arg, const char* db_arg,
					       char* block_arg,
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4666 4667 4668
					       uint block_len_arg,
					       bool using_trans)
  :Log_event(thd_arg,0, using_trans), block(block_arg),
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4669
   block_len(block_len_arg), file_id(thd_arg->file_id), db(db_arg)
4670 4671
{
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4672
#endif
4673 4674


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4675
/*
4676
  Append_block_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4677
*/
4678

4679 4680 4681
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)
4682
{
4683 4684 4685 4686 4687 4688
  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)
monty@mysql.com's avatar
monty@mysql.com committed
4689
    DBUG_VOID_RETURN;
4690 4691 4692
  file_id= uint4korr(buf + common_header_len + AB_FILE_ID_OFFSET);
  block= (char*)buf + total_header_len;
  block_len= len - total_header_len;
monty@mysql.com's avatar
monty@mysql.com committed
4693
  DBUG_VOID_RETURN;
4694 4695 4696
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4697
/*
4698
  Append_block_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4699
*/
4700

4701
#ifndef MYSQL_CLIENT
4702
bool Append_block_log_event::write(IO_CACHE* file)
4703 4704 4705
{
  byte buf[APPEND_BLOCK_HEADER_LEN];
  int4store(buf + AB_FILE_ID_OFFSET, file_id);
4706 4707
  return (write_header(file, APPEND_BLOCK_HEADER_LEN + block_len) ||
          my_b_safe_write(file, buf, APPEND_BLOCK_HEADER_LEN) ||
4708 4709
	  my_b_safe_write(file, (byte*) block, block_len));
}
4710
#endif
4711 4712


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4713
/*
4714
  Append_block_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4715
*/
4716 4717

#ifdef MYSQL_CLIENT  
lars@mysql.com's avatar
lars@mysql.com committed
4718
void Append_block_log_event::print(FILE* file,
4719
				   PRINT_EVENT_INFO* print_event_info)
4720
{
4721 4722
  Write_on_release_cache cache(&print_event_info->head_cache, file);

4723
  if (print_event_info->short_form)
4724
    return;
4725 4726 4727
  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);
4728
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4729
#endif /* MYSQL_CLIENT */
4730 4731


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4732
/*
4733
  Append_block_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4734
*/
4735

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4736
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4737
void Append_block_log_event::pack_info(Protocol *protocol)
4738 4739 4740 4741 4742 4743
{
  char buf[256];
  uint length;
  length= (uint) my_sprintf(buf,
			    (buf, ";file_id=%u;block_len=%u", file_id,
			     block_len));
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4744
  protocol->store(buf, length, &my_charset_bin);
4745 4746 4747
}


4748
/*
4749
  Append_block_log_event::get_create_or_append()
4750 4751
*/

4752
int Append_block_log_event::get_create_or_append() const
4753
{
4754
  return 0; /* append to the file, fail if not exists */
4755 4756
}

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4757
/*
4758
  Append_block_log_event::exec_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4759
*/
4760

4761
int Append_block_log_event::exec_event(struct st_relay_log_info* rli)
4762
{
4763
  char proc_info[17+FN_REFLEN+10], *fname= proc_info+17;
4764
  int fd;
4765
  int error = 1;
monty@mysql.com's avatar
monty@mysql.com committed
4766
  DBUG_ENTER("Append_block_log_event::exec_event");
4767

4768 4769
  fname= strmov(proc_info, "Making temp file ");
  slave_load_file_stem(fname, file_id, server_id, ".data");
4770
  thd->proc_info= proc_info;
4771 4772 4773 4774 4775 4776 4777
  if (get_create_or_append())
  {
    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)
    {
4778 4779 4780
      slave_print_msg(ERROR_LEVEL, rli, my_errno,
                      "Error in %s event: could not create file '%s'",
                      get_type_str(), fname);
4781 4782 4783
      goto err;
    }
  }
4784 4785
  else if ((fd = my_open(fname, O_WRONLY | O_APPEND | O_BINARY | O_NOFOLLOW,
                         MYF(MY_WME))) < 0)
4786
  {
4787 4788 4789
    slave_print_msg(ERROR_LEVEL, rli, my_errno,
                    "Error in %s event: could not open file '%s'",
                    get_type_str(), fname);
4790 4791
    goto err;
  }
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4792
  if (my_write(fd, (byte*) block, block_len, MYF(MY_WME+MY_NABP)))
4793
  {
4794 4795 4796
    slave_print_msg(ERROR_LEVEL, rli, my_errno,
                    "Error in %s event: write to '%s' failed",
                    get_type_str(), fname);
4797 4798 4799
    goto err;
  }
  error=0;
4800

4801 4802 4803
err:
  if (fd >= 0)
    my_close(fd, MYF(0));
4804
  thd->proc_info= 0;
monty@mysql.com's avatar
monty@mysql.com committed
4805
  DBUG_RETURN(error ? error : Log_event::exec_event(rli));
4806
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4807
#endif
4808 4809


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4810
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4811
	Delete_file_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4812
**************************************************************************/
4813

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4814
/*
4815
  Delete_file_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4816
*/
4817 4818

#ifndef MYSQL_CLIENT
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4819 4820 4821
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)
4822 4823
{
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4824
#endif
4825

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4826
/*
4827
  Delete_file_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4828
*/
4829

4830 4831 4832
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)
4833
{
4834 4835 4836
  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))
4837
    return;
4838
  file_id= uint4korr(buf + common_header_len + DF_FILE_ID_OFFSET);
4839 4840 4841
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4842
/*
4843
  Delete_file_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4844
*/
4845

4846
#ifndef MYSQL_CLIENT
4847
bool Delete_file_log_event::write(IO_CACHE* file)
4848 4849 4850
{
 byte buf[DELETE_FILE_HEADER_LEN];
 int4store(buf + DF_FILE_ID_OFFSET, file_id);
4851 4852
 return (write_header(file, sizeof(buf)) ||
         my_b_safe_write(file, buf, sizeof(buf)));
4853
}
4854
#endif
4855 4856


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4857
/*
4858
  Delete_file_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4859
*/
4860 4861

#ifdef MYSQL_CLIENT  
lars@mysql.com's avatar
lars@mysql.com committed
4862
void Delete_file_log_event::print(FILE* file,
4863
				  PRINT_EVENT_INFO* print_event_info)
4864
{
4865 4866
  Write_on_release_cache cache(&print_event_info->head_cache, file);

4867
  if (print_event_info->short_form)
4868
    return;
4869 4870
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Delete_file: file_id=%u\n", file_id);
4871
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4872
#endif /* MYSQL_CLIENT */
4873

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4874
/*
4875
  Delete_file_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4876
*/
4877

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4878
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4879
void Delete_file_log_event::pack_info(Protocol *protocol)
4880 4881 4882 4883
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
4884
  protocol->store(buf, (int32) length, &my_charset_bin);
4885
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4886
#endif
4887

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4888
/*
4889
  Delete_file_log_event::exec_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4890
*/
4891

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4892
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4893 4894 4895
int Delete_file_log_event::exec_event(struct st_relay_log_info* rli)
{
  char fname[FN_REFLEN+10];
4896
  char *ext= slave_load_file_stem(fname, file_id, server_id, ".data");
4897
  (void) my_delete(fname, MYF(MY_WME));
4898
  strmov(ext, ".info");
4899 4900 4901
  (void) my_delete(fname, MYF(MY_WME));
  return Log_event::exec_event(rli);
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4902
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
4903 4904


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4905
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4906
	Execute_load_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4907
**************************************************************************/
4908

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4909
/*
4910
  Execute_load_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4911
*/
4912 4913

#ifndef MYSQL_CLIENT  
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4914 4915 4916
Execute_load_log_event::Execute_load_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)
4917 4918
{
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4919
#endif
4920 4921
  

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4922
/*
4923
  Execute_load_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4924
*/
4925

4926 4927 4928
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)
4929
{
4930 4931 4932
  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))
4933
    return;
4934
  file_id= uint4korr(buf + common_header_len + EL_FILE_ID_OFFSET);
4935 4936 4937
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4938
/*
4939
  Execute_load_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4940
*/
4941

4942
#ifndef MYSQL_CLIENT
4943
bool Execute_load_log_event::write(IO_CACHE* file)
4944 4945 4946
{
  byte buf[EXEC_LOAD_HEADER_LEN];
  int4store(buf + EL_FILE_ID_OFFSET, file_id);
4947 4948
  return (write_header(file, sizeof(buf)) || 
          my_b_safe_write(file, buf, sizeof(buf)));
4949
}
4950
#endif
4951 4952


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4953
/*
4954
  Execute_load_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4955
*/
4956 4957

#ifdef MYSQL_CLIENT  
lars@mysql.com's avatar
lars@mysql.com committed
4958
void Execute_load_log_event::print(FILE* file,
4959
				   PRINT_EVENT_INFO* print_event_info)
4960
{
4961 4962
  Write_on_release_cache cache(&print_event_info->head_cache, file);

4963
  if (print_event_info->short_form)
4964
    return;
4965 4966 4967
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Exec_load: file_id=%d\n",
              file_id);
4968
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4969
#endif
4970

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4971
/*
4972
  Execute_load_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4973
*/
4974

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4975
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4976
void Execute_load_log_event::pack_info(Protocol *protocol)
4977 4978 4979 4980
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
4981
  protocol->store(buf, (int32) length, &my_charset_bin);
4982 4983 4984
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4985
/*
4986
  Execute_load_log_event::exec_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4987
*/
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4988

4989
int Execute_load_log_event::exec_event(struct st_relay_log_info* rli)
4990 4991
{
  char fname[FN_REFLEN+10];
4992
  char *ext;
4993
  int fd;
4994
  int error= 1;
4995
  IO_CACHE file;
4996
  Load_log_event *lev= 0;
4997

4998
  ext= slave_load_file_stem(fname, file_id, server_id, ".info");
4999 5000
  if ((fd = my_open(fname, O_RDONLY | O_BINARY | O_NOFOLLOW,
                    MYF(MY_WME))) < 0 ||
5001 5002 5003
      init_io_cache(&file, fd, IO_SIZE, READ_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
5004 5005
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Error in Exec_load event: "
                    "could not open file '%s'", fname);
5006 5007
    goto err;
  }
5008
  if (!(lev = (Load_log_event*)Log_event::read_log_event(&file,
5009 5010
                                                         (pthread_mutex_t*)0,
                                                         rli->relay_log.description_event_for_exec)) ||
5011
      lev->get_type_code() != NEW_LOAD_EVENT)
5012
  {
5013 5014
    slave_print_msg(ERROR_LEVEL, rli, 0, "Error in Exec_load event: "
                    "file '%s' appears corrupted", fname);
5015 5016
    goto err;
  }
5017

5018
  lev->thd = thd;
5019 5020
  /*
    lev->exec_event should use rli only for errors
5021 5022 5023
    i.e. should not advance rli's position.
    lev->exec_event is the place where the table is loaded (it calls
    mysql_load()).
5024
  */
guilhem@mysql.com's avatar
guilhem@mysql.com committed
5025

5026
  rli->future_group_master_log_pos= log_pos;
5027
  if (lev->exec_event(0,rli,1)) 
5028
  {
5029 5030 5031 5032 5033 5034 5035 5036 5037
    /*
      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.
    */
    char *tmp= my_strdup(rli->last_slave_error,MYF(MY_WME));
5038 5039
    if (tmp)
    {
5040 5041 5042 5043
      slave_print_msg(ERROR_LEVEL, rli,
                      rli->last_slave_errno, /* ok to re-use error code */
                      "%s. Failed executing load from '%s'", 
                      tmp, fname);
5044 5045
      my_free(tmp,MYF(0));
    }
5046 5047
    goto err;
  }
guilhem@mysql.com's avatar
guilhem@mysql.com committed
5048 5049 5050 5051 5052 5053 5054 5055 5056 5057
  /*
    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;
  }
5058
  (void) my_delete(fname, MYF(MY_WME));
5059
  memcpy(ext, ".data", 6);
5060
  (void) my_delete(fname, MYF(MY_WME));
5061
  error = 0;
5062

5063 5064 5065
err:
  delete lev;
  if (fd >= 0)
5066
  {
5067
    my_close(fd, MYF(0));
5068 5069
    end_io_cache(&file);
  }
5070
  return error ? error : Log_event::exec_event(rli);
5071
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
5072

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5073
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
5074 5075


5076 5077 5078 5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092 5093 5094 5095 5096 5097 5098 5099 5100
/**************************************************************************
	Begin_load_query_log_event methods
**************************************************************************/

#ifndef MYSQL_CLIENT
Begin_load_query_log_event::
Begin_load_query_log_event(THD* thd_arg, const char* db_arg, char* block_arg,
                           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)
5101
int Begin_load_query_log_event::get_create_or_append() const
5102
{
5103
  return 1; /* create the file */
5104 5105 5106 5107 5108 5109 5110 5111 5112 5113 5114 5115 5116 5117 5118 5119 5120 5121 5122 5123 5124 5125 5126 5127 5128 5129 5130 5131 5132 5133 5134 5135 5136 5137 5138 5139 5140 5141 5142 5143 5144 5145 5146 5147 5148 5149 5150 5151 5152 5153 5154 5155 5156 5157
}
#endif /* defined( HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */


/**************************************************************************
	Execute_load_query_log_event methods
**************************************************************************/


#ifndef MYSQL_CLIENT
Execute_load_query_log_event::
Execute_load_query_log_event(THD* thd_arg, const char* query_arg,
                     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):
  Query_log_event(thd_arg, query_arg, query_length_arg, using_trans,
                  suppress_use),
  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;
}


5158
#ifndef MYSQL_CLIENT
5159 5160 5161 5162 5163 5164 5165 5166 5167 5168
bool
Execute_load_query_log_event::write_post_header_for_derived(IO_CACHE* file)
{
  char buf[EXECUTE_LOAD_QUERY_EXTRA_HEADER_LEN];
  int4store(buf, file_id);
  int4store(buf + 4, fn_pos_start);
  int4store(buf + 4 + 4, fn_pos_end);
  *(buf + 4 + 4 + 4)= (char)dup_handling;
  return my_b_safe_write(file, (byte*) buf, EXECUTE_LOAD_QUERY_EXTRA_HEADER_LEN);
}
5169
#endif
5170 5171 5172


#ifdef MYSQL_CLIENT
lars@mysql.com's avatar
lars@mysql.com committed
5173
void Execute_load_query_log_event::print(FILE* file,
5174
                                         PRINT_EVENT_INFO* print_event_info)
5175
{
5176
  print(file, print_event_info, 0);
5177 5178 5179
}


lars@mysql.com's avatar
lars@mysql.com committed
5180
void Execute_load_query_log_event::print(FILE* file,
5181
                                         PRINT_EVENT_INFO* print_event_info,
5182 5183
                                         const char *local_fname)
{
5184 5185 5186
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
5187 5188 5189

  if (local_fname)
  {
5190 5191 5192 5193
    my_b_write(&cache, (byte*) query, fn_pos_start);
    my_b_printf(&cache, " LOCAL INFILE \'");
    my_b_printf(&cache, local_fname);
    my_b_printf(&cache, "\'");
5194
    if (dup_handling == LOAD_DUP_REPLACE)
5195 5196 5197
      my_b_printf(&cache, " REPLACE");
    my_b_printf(&cache, " INTO");
    my_b_write(&cache, (byte*) query + fn_pos_end, q_len-fn_pos_end);
5198
    my_b_printf(&cache, "%s\n", print_event_info->delimiter);
5199 5200 5201
  }
  else
  {
5202
    my_b_write(&cache, (byte*) query, q_len);
5203
    my_b_printf(&cache, "%s\n", print_event_info->delimiter);
5204 5205
  }

5206
  if (!print_event_info->short_form)
5207
    my_b_printf(&cache, "# file_id: %d \n", file_id);
5208 5209 5210 5211 5212 5213 5214 5215 5216 5217 5218 5219 5220 5221 5222 5223 5224 5225 5226 5227 5228 5229 5230 5231 5232 5233 5234 5235 5236 5237 5238 5239 5240 5241 5242 5243 5244 5245 5246 5247 5248 5249
}
#endif


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Execute_load_query_log_event::pack_info(Protocol *protocol)
{
  char *buf, *pos;
  if (!(buf= my_malloc(9 + db_len + q_len + 10 + 21, MYF(MY_WME))))
    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
Execute_load_query_log_event::exec_event(struct st_relay_log_info* rli)
{
  char *p;
  char *buf;
  char *fname;
  char *fname_end;
  int error;

  /* Replace filename and LOCAL keyword in query before executing it */
  if (!(buf = my_malloc(q_len + 1 - (fn_pos_end - fn_pos_start) +
                        (FN_REFLEN + 10) + 10 + 8 + 5, MYF(MY_WME))))
  {
5250
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Not enough memory");
5251 5252 5253 5254 5255 5256
    return 1;
  }

  p= buf;
  memcpy(p, query, fn_pos_start);
  p+= fn_pos_start;
5257
  fname= (p= strmake(p, STRING_WITH_LEN(" INFILE \'")));
5258 5259
  p= slave_load_file_stem(p, file_id, server_id, ".data");
  fname_end= p= strend(p);                      // Safer than p=p+5
5260
  *(p++)='\'';
5261
  switch (dup_handling) {
5262
  case LOAD_DUP_IGNORE:
5263
    p= strmake(p, STRING_WITH_LEN(" IGNORE"));
5264 5265
    break;
  case LOAD_DUP_REPLACE:
5266
    p= strmake(p, STRING_WITH_LEN(" REPLACE"));
5267 5268 5269 5270 5271
    break;
  default:
    /* Ordinary load data */
    break;
  }
5272
  p= strmake(p, STRING_WITH_LEN(" INTO"));
5273 5274 5275 5276 5277 5278 5279
  p= strmake(p, query+fn_pos_end, q_len-fn_pos_end);

  error= Query_log_event::exec_event(rli, buf, p-buf);

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

5280 5281 5282 5283 5284 5285
  /*
    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));
5286 5287 5288 5289 5290 5291 5292

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


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5293
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5294
	sql_ex_info methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5295
**************************************************************************/
5296

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5297
/*
5298
  sql_ex_info::write_data()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5299
*/
5300

5301
bool sql_ex_info::write_data(IO_CACHE* file)
5302 5303 5304
{
  if (new_format())
  {
5305 5306 5307 5308 5309
    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) ||
5310 5311 5312 5313 5314 5315 5316 5317 5318 5319 5320 5321
	    my_b_safe_write(file,(byte*) &opt_flags,1));
  }
  else
  {
    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;
5322
    return my_b_safe_write(file, (byte*) &old_ex, sizeof(old_ex)) != 0;
5323 5324 5325 5326
  }
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5327
/*
5328
  sql_ex_info::init()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5329
*/
5330 5331 5332 5333 5334 5335 5336 5337 5338 5339 5340 5341 5342 5343

char* sql_ex_info::init(char* buf,char* buf_end,bool use_new_format)
{
  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.
    */
5344 5345 5346 5347 5348
    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))
5349 5350 5351 5352 5353 5354 5355 5356 5357 5358 5359 5360 5361 5362 5363 5364 5365 5366 5367 5368 5369 5370 5371 5372 5373 5374
      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;
}
5375 5376 5377 5378 5379 5380 5381 5382 5383 5384


/**************************************************************************
	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),
5385
    m_row_count(0),
5386 5387
    m_table(tbl_arg),
    m_table_id(tid),
5388 5389
    m_width(tbl_arg ? tbl_arg->s->fields : 1),
    m_rows_buf(0), m_rows_cur(0), m_rows_end(0),
5390 5391
    m_flags(0)
{
5392 5393
  /*
    We allow a special form of dummy event when the table, and cols
5394
    are null and the table id is ~0UL.  This is a temporary
5395 5396
    solution, to be able to terminate a started statement in the
    binary log: the extreneous events will be removed in the future.
5397
   */
5398 5399
  DBUG_ASSERT(tbl_arg && tbl_arg->s && tid != ~0UL ||
              !tbl_arg && !cols && tid == ~0UL);
5400 5401 5402 5403 5404 5405 5406 5407 5408 5409

  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);
  /* if bitmap_init fails, catched in is_valid() */
  if (likely(!bitmap_init(&m_cols,
                          m_width <= sizeof(m_bitbuf)*8 ? m_bitbuf : NULL,
                          (m_width + 7) & ~7UL,
                          false)))
5410 5411 5412 5413 5414
  {
    /* Cols can be zero if this is a dummy binrows event */
    if (likely(cols != NULL))
      memcpy(m_cols.bitmap, cols->bitmap, no_bytes_in_map(cols));
  }
5415 5416 5417 5418 5419 5420 5421 5422 5423 5424
  else
    m_cols.bitmap= 0; // to not free it
}
#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),
5425
    m_row_count(0),
5426 5427 5428 5429 5430 5431
    m_rows_buf(0), m_rows_cur(0), m_rows_end(0)
{
  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];

5432 5433
  DBUG_PRINT("enter",("event_len: %u  common_header_len: %d  "
		      "post_header_len: %d",
5434 5435 5436 5437 5438 5439 5440 5441 5442 5443 5444 5445 5446
		      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
  {
5447
    m_table_id= (ulong) uint6korr(post_start);
5448 5449 5450 5451 5452
    post_start+= RW_FLAGS_OFFSET;
  }

  m_flags= uint2korr(post_start);

5453 5454
  byte const *const var_start= (const byte *)buf + common_header_len + 
    post_header_len;
5455
  byte const *const ptr_width= var_start;
5456 5457
  uchar *ptr_after_width= (uchar*) ptr_width;
  m_width = net_field_length(&ptr_after_width);
5458 5459

  const uint byte_count= (m_width + 7) / 8;
5460
  const byte* const ptr_rows_data= var_start + byte_count + 1;
5461

5462
  my_size_t const data_size= event_len - (ptr_rows_data - (const byte *) buf);
5463
  DBUG_PRINT("info",("m_table_id: %lu  m_flags: %d  m_width: %lu  data_size: %lu",
5464 5465
                     m_table_id, m_flags, m_width, data_size));

5466
  m_rows_buf= (byte*)my_malloc(data_size, MYF(MY_WME));
5467 5468 5469 5470 5471 5472 5473 5474 5475 5476 5477 5478 5479 5480 5481 5482 5483 5484 5485 5486 5487 5488 5489
  if (likely((bool)m_rows_buf))
  {
    /* if bitmap_init fails, catched in is_valid() */
    if (likely(!bitmap_init(&m_cols,
                            m_width <= sizeof(m_bitbuf)*8 ? m_bitbuf : NULL,
                            (m_width + 7) & ~7UL,
                            false)))
      memcpy(m_cols.bitmap, ptr_after_width, byte_count);
    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().
5490
  my_free((gptr)m_rows_buf, MYF(MY_ALLOW_ZERO_PTR));
5491 5492 5493 5494 5495 5496 5497 5498 5499 5500 5501
}

#ifndef MYSQL_CLIENT
int Rows_log_event::do_add_row_data(byte *const row_data,
                                    my_size_t const length)
{
  /*
    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
  */
5502
  DBUG_ENTER("Rows_log_event::do_add_row_data");
5503 5504
  DBUG_PRINT("enter", ("row_data: 0x%lx  length: %lu", (ulong) row_data,
                       (ulong) length));
5505 5506 5507 5508 5509
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
5510
  DBUG_DUMP("row_data", (const char*)row_data, min(length, 32));
5511
#endif
5512 5513

  DBUG_ASSERT(m_rows_buf <= m_rows_cur);
5514
  DBUG_ASSERT(!m_rows_buf || m_rows_end && m_rows_buf < m_rows_end);
5515 5516 5517 5518 5519 5520 5521 5522
  DBUG_ASSERT(m_rows_cur <= m_rows_end);

  /* The cast will always work since m_rows_cur <= m_rows_end */
  if (static_cast<my_size_t>(m_rows_end - m_rows_cur) < length)
  {
    my_size_t const block_size= 1024;
    my_ptrdiff_t const old_alloc= m_rows_end - m_rows_buf;
    my_ptrdiff_t const cur_size= m_rows_cur - m_rows_buf;
5523 5524
    my_ptrdiff_t const new_alloc= 
        block_size * ((cur_size + length) / block_size + block_size - 1);
5525

5526 5527
    byte* const new_buf= (byte*)my_realloc((gptr)m_rows_buf, new_alloc,
                                           MYF(MY_ALLOW_ZERO_PTR|MY_WME));
5528 5529 5530 5531 5532 5533 5534 5535 5536 5537 5538 5539 5540 5541 5542 5543 5544 5545 5546 5547
    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;
  }

  DBUG_ASSERT(m_rows_cur + length < m_rows_end);
  memcpy(m_rows_cur, row_data, length);
  m_rows_cur+= length;
5548
  m_row_count++;
5549 5550 5551 5552 5553 5554
  DBUG_RETURN(0);
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
/*
5555
  Unpack a row into table->record[0].
5556
  
5557 5558 5559 5560 5561 5562 5563 5564 5565 5566
  SYNOPSIS
    unpack_row()
    rli     Relay log info
    table   Table to unpack into
    colcnt  Number of columns to read from record
    row     Packed row data
    cols    Pointer to columns data to fill in
    row_end Pointer to variable that will hold the value of the
            one-after-end position for the row
    master_reclength
5567
            Pointer to variable that will be set to the length of the
5568 5569 5570 5571 5572 5573
            record on the master side
    rw_set  Pointer to bitmap that holds either the read_set or the
            write_set of the table

  DESCRIPTION

5574 5575 5576 5577 5578
      The function will always unpack into the table->record[0]
      record.  This is because there are too many dependencies on
      where the various member functions of Field and subclasses
      expect to write.

5579 5580 5581
      The row is assumed to only consist of the fields for which the
      bitset represented by 'arr' and 'bits'; the other parts of the
      record are left alone.
5582

5583 5584
      At most 'colcnt' columns are read: if the table is larger than
      that, the remaining fields are not filled in.
5585 5586 5587 5588 5589 5590 5591 5592 5593

  RETURN VALUE

      Error code, or zero if no error. The following error codes can
      be returned:

      ER_NO_DEFAULT_FOR_FIELD
        Returned if one of the fields existing on the slave but not on
        the master does not have a default value (and isn't nullable)
5594
 */
5595 5596
static int
unpack_row(RELAY_LOG_INFO *rli,
5597
           TABLE *table, uint const colcnt,
5598
           char const *row, MY_BITMAP const *cols,
5599
           char const **row_end, ulong *master_reclength,
5600
           MY_BITMAP* const rw_set, Log_event_type const event_type)
5601
{
5602
  byte *const record= table->record[0];
5603
  DBUG_ENTER("unpack_row");
5604
  DBUG_ASSERT(record && row);
5605
  DBUG_PRINT("enter", ("row: 0x%lx  table->record[0]: 0x%lx", (long) row, (long) record));
5606
  my_size_t master_null_bytes= table->s->null_bytes;
5607

5608 5609 5610 5611 5612
  if (colcnt != table->s->fields)
  {
    Field **fptr= &table->field[colcnt-1];
    do
      master_null_bytes= (*fptr)->last_null_byte();
5613 5614 5615 5616 5617 5618 5619 5620
    while (master_null_bytes == Field::LAST_NULL_BYTE_UNDEF &&
           fptr-- > table->field);

    /*
      If master_null_bytes is LAST_NULL_BYTE_UNDEF (0) at this time,
      there were no nullable fields nor BIT fields at all in the
      columns that are common to the master and the slave. In that
      case, there is only one null byte holding the X bit.
5621

5622 5623 5624 5625 5626
      OBSERVE! There might still be nullable columns following the
      common columns, so table->s->null_bytes might be greater than 1.
     */
    if (master_null_bytes == Field::LAST_NULL_BYTE_UNDEF)
      master_null_bytes= 1;
5627 5628 5629 5630
  }

  DBUG_ASSERT(master_null_bytes <= table->s->null_bytes);
  memcpy(record, row, master_null_bytes);            // [1]
5631
  int error= 0;
5632

5633
  bitmap_set_all(rw_set);
5634 5635

  Field **const begin_ptr = table->field;
5636
  Field **field_ptr;
5637 5638 5639
  char const *ptr= row + master_null_bytes;
  Field **const end_ptr= begin_ptr + colcnt;
  for (field_ptr= begin_ptr ; field_ptr < end_ptr ; ++field_ptr)
5640 5641 5642
  {
    Field *const f= *field_ptr;

5643
    if (bitmap_is_set(cols, field_ptr -  begin_ptr))
5644
    {
patg@radha.patg.net's avatar
patg@radha.patg.net committed
5645 5646
      DBUG_ASSERT((const char *)table->record[0] <= f->ptr);
      DBUG_ASSERT(f->ptr < ((const char *)table->record[0] + table->s->reclength +
5647
                            (f->pack_length_in_rec() == 0)));
5648

5649 5650
      DBUG_PRINT("info", ("unpacking column '%s' to 0x%lx", f->field_name,
                          (long) f->ptr));
5651
      ptr= f->unpack(f->ptr, ptr);
5652 5653
      /* Field...::unpack() cannot return 0 */
      DBUG_ASSERT(ptr != NULL);
5654 5655
    }
    else
5656
      bitmap_clear_bit(rw_set, field_ptr - begin_ptr);
5657
  }
5658 5659 5660 5661 5662 5663 5664 5665

  *row_end = ptr;
  if (master_reclength)
  {
    if (*field_ptr)
      *master_reclength = (*field_ptr)->ptr - (char*) table->record[0];
    else
      *master_reclength = table->s->reclength;
5666
  }
5667

5668 5669 5670 5671 5672 5673
  /*
    Set properties for remaining columns, if there are any. We let the
    corresponding bit in the write_set be set, to write the value if
    it was not there already. We iterate over all remaining columns,
    even if there were an error, to get as many error messages as
    possible.  We are still able to return a pointer to the next row,
5674 5675 5676 5677
    so redo that.

    This generation of error messages is only relevant when inserting
    new rows.
5678 5679 5680
   */
  for ( ; *field_ptr ; ++field_ptr)
  {
5681
    uint32 const mask= NOT_NULL_FLAG | NO_DEFAULT_VALUE_FLAG;
5682
    Field *const f= *field_ptr;
5683

5684 5685
    DBUG_PRINT("info", ("processing column '%s' @ 0x%lx", f->field_name,
                        (long) f->ptr));
5686
    if (event_type == WRITE_ROWS_EVENT && (f->flags & mask) == mask)
5687
    {
5688
      slave_print_msg(ERROR_LEVEL, rli, ER_NO_DEFAULT_FOR_FIELD,
5689 5690
                      "Field `%s` of table `%s`.`%s` "
                      "has no default value and cannot be NULL",
5691
                      (*field_ptr)->field_name, table->s->db.str,
5692 5693
                      table->s->table_name.str);
      error = ER_NO_DEFAULT_FOR_FIELD;
5694 5695
    }
    else
5696
      f->set_default();
5697
  }
5698

5699
  DBUG_RETURN(error);
5700 5701 5702 5703 5704 5705
}

int Rows_log_event::exec_event(st_relay_log_info *rli)
{
  DBUG_ENTER("Rows_log_event::exec_event(st_relay_log_info*)");
  int error= 0;
5706
  char const *row_start= (char const *)m_rows_buf;
5707 5708

  /*
5709
    If m_table_id == ~0UL, then we have a dummy event that does
5710
    not contain any data.  In that case, we just remove all tables in
5711 5712
    the tables_to_lock list, close the thread tables, step the relay
    log position, and return with success.
5713
   */
5714
  if (m_table_id == ~0UL)
5715 5716 5717 5718 5719 5720 5721 5722
  {
    /*
       This one is supposed to be set: just an extra check so that
       nothing strange has happened.
     */
    DBUG_ASSERT(get_flags(STMT_END_F));

    rli->clear_tables_to_lock();
5723
    close_thread_tables(thd);
5724 5725 5726 5727
    thd->clear_error();
    rli->inc_event_relay_log_pos();
    DBUG_RETURN(0);
  }
5728 5729 5730 5731 5732 5733 5734 5735

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

  /*
5736 5737 5738 5739
    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.
5740
  */
5741
  if (!thd->lock)
5742
  {
5743 5744
    bool need_reopen= 1; /* To execute the first lap of the loop below */

5745
    /*
5746
      lock_tables() reads the contents of thd->lex, so they must be
5747 5748
      initialized. Contrary to in Table_map_log_event::exec_event() we don't
      call mysql_init_query() as that may reset the binlog format.
5749
    */
5750
    lex_start(thd, NULL, 0);
5751

5752 5753 5754
    while ((error= lock_tables(thd, rli->tables_to_lock,
                               rli->tables_to_lock_count, &need_reopen)))
    {
5755 5756 5757
      if (!need_reopen)
      {
        slave_print_msg(ERROR_LEVEL, rli, error,
5758 5759
                        "Error in %s event: when locking tables",
                        get_type_str());
5760
        rli->clear_tables_to_lock();
5761 5762
        DBUG_RETURN(error);
      }
5763

5764
      /*
5765
        So we need to reopen the tables.
5766

5767 5768
        We need to flush the pending RBR event, since it keeps a
        pointer to an open table.
5769

5770 5771 5772
        ALTERNATIVE SOLUTION (not implemented): Extract a pointer to
        the pending RBR event and reset the table pointer after the
        tables has been reopened.
5773

5774 5775
        NOTE: For this new scheme there should be no pending event:
        need to add code to assert that is the case.
5776 5777
       */
      thd->binlog_flush_pending_rows_event(false);
5778
      close_tables_for_reopen(thd, &rli->tables_to_lock);
5779

5780 5781
      if ((error= open_tables(thd, &rli->tables_to_lock,
                              &rli->tables_to_lock_count, 0)))
5782 5783 5784 5785 5786 5787 5788 5789 5790
      {
        if (thd->query_error || thd->is_fatal_error)
        {
          /*
            Error reporting borrowed from Query_log_event with many excessive
            simplifications (we don't honour --slave-skip-errors)
          */
          uint actual_error= thd->net.last_errno;
          slave_print_msg(ERROR_LEVEL, rli, actual_error,
5791
                          "Error '%s' on reopening tables",
5792
                          (actual_error ? thd->net.last_error :
5793
                           "unexpected success or fatal error"));
5794 5795
          thd->query_error= 1;
        }
5796
        rli->clear_tables_to_lock();
5797
        DBUG_RETURN(error);
5798
      }
5799
    }
5800 5801 5802
    /*
      When the open and locking succeeded, we add all the tables to
      the table map and remove them from tables to lock.
5803 5804 5805

      We also invalidate the query cache for all the tables, since
      they will now be changed.
5806
     */
5807 5808
    TABLE_LIST *ptr;
    for (ptr= rli->tables_to_lock ; ptr ; ptr= ptr->next_global)
5809 5810
    {
      rli->m_table_map.set_table(ptr->table_id, ptr->table);
5811
    }
5812 5813 5814
#ifdef HAVE_QUERY_CACHE
    query_cache.invalidate_locked_for_write(rli->tables_to_lock);
#endif
5815
    rli->clear_tables_to_lock();
5816 5817
  }

5818 5819
  DBUG_ASSERT(rli->tables_to_lock == NULL && rli->tables_to_lock_count == 0);

5820 5821 5822 5823 5824 5825 5826 5827 5828
  TABLE* table= rli->m_table_map.get_table(m_table_id);

  if (table)
  {
    /*
      table == NULL means that this table should not be replicated
      (this was set up by Table_map_log_event::exec_event() which
      tested replicate-* rules).
    */
5829 5830 5831 5832 5833 5834 5835 5836 5837 5838 5839 5840 5841 5842 5843 5844 5845 5846 5847 5848 5849 5850 5851 5852 5853 5854 5855 5856

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

    error= do_before_row_operations(table);
5857 5858
    while (error == 0 && row_start < (const char*) m_rows_end)
    {
5859 5860
      char const *row_end= NULL;
      if ((error= do_prepare_row(thd, rli, table, row_start, &row_end)))
5861 5862
        break; // We should perform the after-row operation even in
               // the case of error
5863

5864
      DBUG_ASSERT(row_end != NULL); // cannot happen
5865
      DBUG_ASSERT(row_end <= (const char*)m_rows_end);
5866 5867 5868 5869 5870 5871 5872 5873 5874 5875 5876 5877 5878 5879 5880 5881 5882 5883 5884 5885 5886 5887 5888 5889 5890 5891 5892 5893 5894 5895 5896

      /* 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;
      error= do_exec_row(table);
      table->in_use = old_thd;
      switch (error)
      {
        /* Some recoverable errors */
      case HA_ERR_RECORD_CHANGED:
      case HA_ERR_KEY_NOT_FOUND:	/* Idempotency support: OK if
                                           tuple does not exist */
	error= 0;
      case 0:
	break;

      default:
	slave_print_msg(ERROR_LEVEL, rli, error,
                        "Error in %s event: row application failed",
                        get_type_str());
	thd->query_error= 1;
	break;
      }

      row_start= row_end;
    }
    DBUG_EXECUTE_IF("STOP_SLAVE_after_first_Rows_event",
                    rli->abort_slave=1;);
    error= do_after_row_operations(table, error);
    if (!cache_stmt)
5897 5898 5899 5900
    {
      DBUG_PRINT("info", ("Marked that we need to keep log"));
      thd->options|= OPTION_KEEP_LOG;
    }
5901 5902 5903 5904
  }

  if (error)
  {                     /* error has occured during the transaction */
tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
5905 5906 5907 5908 5909 5910
    slave_print_msg(ERROR_LEVEL, rli, error,
                    "Error in %s event: error during transaction execution "
                    "on table %s.%s",
                    get_type_str(), table->s->db.str, 
                    table->s->table_name.str);
     /*
5911 5912 5913 5914 5915 5916 5917 5918
      If one day we honour --skip-slave-errors in row-based replication, and
      the error should be skipped, then we would clear mappings, rollback,
      close tables, but the slave SQL thread would not stop and then may
      assume the mapping is still available, the tables are still open...
      So then we should clear mappings/rollback/close here only if this is a
      STMT_END_F.
      For now we code, knowing that error is not skippable and so slave SQL
      thread is certainly going to stop.
5919
      rollback at the caller along with sbr.
5920
    */
5921
    thd->reset_current_stmt_binlog_row_based();
5922
    rli->cleanup_context(thd, 0);  /* rollback at caller in step with sbr */
5923 5924 5925 5926 5927 5928 5929 5930 5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947 5948 5949 5950 5951 5952 5953 5954 5955 5956 5957 5958 5959 5960 5961 5962 5963 5964
    thd->query_error= 1;
    DBUG_RETURN(error);
  }

  if (get_flags(STMT_END_F))
  {
    /*
      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);
    /*
      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);
    /*
      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.
    */

5965
    thd->reset_current_stmt_binlog_row_based();
5966 5967 5968 5969 5970 5971 5972 5973 5974 5975 5976 5977 5978 5979 5980 5981 5982 5983 5984 5985
    rli->cleanup_context(thd, 0);
    rli->transaction_end(thd);

    if (error == 0)
    {
      /*
        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();
      error= Log_event::exec_event(rli);
    }
    else
      slave_print_msg(ERROR_LEVEL, rli, error,
                      "Error in %s event: commit of row events failed, "
                      "table `%s`.`%s`",
tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
5986 5987
                      get_type_str(), table->s->db.str, 
                      table->s->table_name.str);
5988 5989 5990
    DBUG_RETURN(error);
  }

5991
  if (table && (table->s->primary_key == MAX_KEY) && !cache_stmt)
5992 5993
  {
    /*
5994 5995 5996 5997 5998 5999 6000 6001 6002 6003 6004 6005 6006 6007
      ------------ 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
      st_relay_log_info::unsafe_to_stop_at and all its occurences.
6008
    */
6009
    rli->unsafe_to_stop_at= time(0);
6010 6011 6012 6013 6014 6015 6016 6017 6018 6019 6020 6021 6022 6023
  }

  DBUG_ASSERT(error == 0);
  thd->clear_error();
  rli->inc_event_relay_log_pos();
  
  DBUG_RETURN(0);
}
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Rows_log_event::write_data_header(IO_CACHE *file)
{
  byte buf[ROWS_HEADER_LEN];	// No need to init the buffer
6024
  DBUG_ASSERT(m_table_id != ~0UL);
6025 6026 6027 6028 6029 6030 6031 6032 6033 6034 6035 6036 6037 6038 6039 6040 6041
  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.
  */
knielsen@mysql.com's avatar
knielsen@mysql.com committed
6042
  char sbuf[sizeof(m_width)];
6043 6044
  my_ptrdiff_t const data_size= m_rows_cur - m_rows_buf;

kent@mysql.com's avatar
kent@mysql.com committed
6045
  char *const sbuf_end= net_store_length((char*) sbuf, (uint) m_width);
knielsen@mysql.com's avatar
knielsen@mysql.com committed
6046
  DBUG_ASSERT(static_cast<my_size_t>(sbuf_end - sbuf) <= sizeof(sbuf));
6047

knielsen@mysql.com's avatar
knielsen@mysql.com committed
6048 6049
  return (my_b_safe_write(file, reinterpret_cast<byte*>(sbuf),
                          sbuf_end - sbuf) ||
6050 6051 6052 6053 6054 6055
          my_b_safe_write(file, reinterpret_cast<byte*>(m_cols.bitmap),
                          no_bytes_in_map(&m_cols)) ||
          my_b_safe_write(file, m_rows_buf, data_size));
}
#endif

6056
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6057 6058
void Rows_log_event::pack_info(Protocol *protocol)
{
6059 6060 6061
  char buf[256];
  char const *const flagstr=
    get_flags(STMT_END_F) ? " flags: STMT_END_F" : "";
6062 6063
  my_size_t bytes= my_snprintf(buf, sizeof(buf),
                               "table_id: %lu%s", m_table_id, flagstr);
6064
  protocol->store(buf, bytes, &my_charset_bin);
6065 6066 6067
}
#endif

6068 6069 6070 6071 6072 6073 6074 6075 6076 6077 6078 6079 6080 6081 6082 6083 6084 6085 6086 6087 6088 6089 6090 6091 6092
#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);
    my_b_printf(head, "\t%s: table id %lu", name, m_table_id);
    print_base64(body, print_event_info, !last_stmt_event);
  }

  if (get_flags(STMT_END_F))
  {
    my_b_copy_to_file(head, file);
    my_b_copy_to_file(body, file);
    reinit_io_cache(head, WRITE_CACHE, 0, FALSE, TRUE);
    reinit_io_cache(body, WRITE_CACHE, 0, FALSE, TRUE);
  }
}
#endif

6093
/**************************************************************************
6094
	Table_map_log_event member functions and support functions
6095 6096 6097 6098 6099 6100 6101 6102 6103 6104 6105 6106 6107 6108 6109 6110 6111 6112 6113 6114
**************************************************************************/

/*
  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)
  : Log_event(thd, 0, is_transactional),
    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),
    m_colcnt(tbl->s->fields), m_coltype(0),
    m_table_id(tid),
    m_flags(flags)
{
6115
  DBUG_ASSERT(m_table_id != ~0UL);
6116 6117 6118 6119 6120 6121 6122 6123 6124 6125 6126 6127
  /*
    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;
serg@serg.mylan's avatar
serg@serg.mylan committed
6128
  DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master", m_data_size= 6;);
6129 6130 6131 6132 6133 6134 6135
  m_data_size+= m_dblen + 2;	// Include length and terminating \0
  m_data_size+= m_tbllen + 2;	// Include length and terminating \0
  m_data_size+= 1 + m_colcnt;	// COLCNT and column types

  /* If malloc fails, catched in is_valid() */
  if ((m_memory= my_malloc(m_colcnt, MYF(MY_WME))))
  {
monty@mysql.com's avatar
monty@mysql.com committed
6136
    m_coltype= reinterpret_cast<uchar*>(m_memory);
6137 6138 6139 6140 6141 6142 6143 6144 6145 6146 6147 6148 6149 6150 6151 6152 6153 6154 6155 6156 6157 6158 6159 6160
    for (unsigned int i= 0 ; i < m_table->s->fields ; ++i)
      m_coltype[i]= m_table->field[i]->type();
  }
}
#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
  m_table(NULL),
#endif
  m_memory(NULL)
{
  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];
6161
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
6162 6163
                     event_len, common_header_len, post_header_len));

6164 6165 6166 6167 6168
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
6169
  DBUG_DUMP("event buffer", buf, event_len);
6170
#endif
6171 6172 6173 6174 6175 6176 6177 6178 6179 6180 6181 6182 6183 6184

  /* 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);
6185
    m_table_id= (ulong) uint6korr(post_start);
6186 6187 6188
    post_start+= TM_FLAGS_OFFSET;
  }

6189
  DBUG_ASSERT(m_table_id != ~0UL);
6190 6191 6192 6193 6194 6195 6196

  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 */
6197
  byte const* const ptr_dblen= (byte const*)vpart + 0;
monty@mysql.com's avatar
monty@mysql.com committed
6198
  m_dblen= *(uchar*) ptr_dblen;
6199 6200 6201

  /* Length of database name + counter + terminating null */
  byte const* const ptr_tbllen= ptr_dblen + m_dblen + 2;
monty@mysql.com's avatar
monty@mysql.com committed
6202
  m_tbllen= *(uchar*) ptr_tbllen;
6203 6204 6205

  /* Length of table name + counter + terminating null */
  byte const* const ptr_colcnt= ptr_tbllen + m_tbllen + 2;
6206 6207
  uchar *ptr_after_colcnt= (uchar*) ptr_colcnt;
  m_colcnt= net_field_length(&ptr_after_colcnt);
6208

6209
  DBUG_PRINT("info",("m_dblen: %lu  off: %ld  m_tbllen: %lu  off: %ld  m_colcnt: %lu  off: %ld",
6210 6211 6212
                     m_dblen, (long) (ptr_dblen-(const byte*)vpart), 
                     m_tbllen, (long) (ptr_tbllen-(const byte*)vpart),
                     m_colcnt, (long) (ptr_colcnt-(const byte*)vpart)));
6213 6214 6215 6216 6217 6218 6219 6220 6221 6222 6223

  /* Allocate mem for all fields in one go. If fails, catched in is_valid() */
  m_memory= my_multi_malloc(MYF(MY_WME),
			    &m_dbnam, m_dblen + 1,
			    &m_tblnam, m_tbllen + 1,
			    &m_coltype, m_colcnt,
			    NULL);

  if (m_memory)
  {
    /* Copy the different parts into their memory */
6224 6225
    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);
6226 6227 6228 6229 6230 6231 6232 6233 6234 6235 6236 6237 6238 6239 6240 6241 6242 6243 6244 6245 6246 6247 6248 6249 6250 6251 6252 6253 6254 6255 6256 6257 6258 6259 6260
    memcpy(m_coltype, ptr_after_colcnt, m_colcnt);
  }

  DBUG_VOID_RETURN;
}
#endif

Table_map_log_event::~Table_map_log_event()
{
  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)
int Table_map_log_event::exec_event(st_relay_log_info *rli)
{
  DBUG_ENTER("Table_map_log_event::exec_event(st_relay_log_info*)");

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

6261 6262 6263 6264 6265 6266 6267 6268 6269
  TABLE_LIST *table_list;
  char *db_mem, *tname_mem;
  void *const memory=
    my_multi_malloc(MYF(MY_WME),
                    &table_list, sizeof(TABLE_LIST),
                    &db_mem, NAME_LEN + 1,
                    &tname_mem, NAME_LEN + 1,
                    NULL);

6270 6271
  if (memory == NULL)
    DBUG_RETURN(HA_ERR_OUT_OF_MEM);
6272

6273
  uint dummy_len;
6274 6275 6276 6277 6278 6279 6280 6281 6282
  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);
6283 6284 6285

  int error= 0;

6286 6287 6288 6289 6290 6291
  if (!rpl_filter->db_ok(table_list->db) ||
      (rpl_filter->is_on() && !rpl_filter->tables_ok("", table_list)))
  {
    my_free((gptr) memory, MYF(MY_WME));
  }
  else
6292
  {
6293 6294 6295 6296 6297 6298
    /*
      open_tables() reads the contents of thd->lex, so they must be
      initialized, so we should call lex_start(); to be even safer, we
      call mysql_init_query() which does a more complete set of inits.
    */
    mysql_init_query(thd, NULL, 0);
6299
    /*
6300 6301 6302
      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.
6303
    */
6304 6305
    if (!thd->current_stmt_binlog_row_based &&
        mysql_bin_log.is_open() && (thd->options & OPTION_BIN_LOG))
6306
    {
6307
      thd->set_current_stmt_binlog_row_based();
6308 6309 6310 6311
    }

    /*
      Open the table if it is not already open and add the table to table map.
6312
      Note that for any table that should not be replicated, a filter is needed.
6313 6314
    */
    uint count;
6315
    if ((error= open_tables(thd, &table_list, &count, 0)))
6316
    {
6317
      if (thd->query_error || thd->is_fatal_error)
6318
      {
6319 6320 6321 6322 6323
        /*
          Error reporting borrowed from Query_log_event with many excessive
          simplifications (we don't honour --slave-skip-errors)
        */
        uint actual_error= thd->net.last_errno;
6324 6325 6326 6327 6328 6329
        slave_print_msg(ERROR_LEVEL, rli, actual_error,
                        "Error '%s' on opening table `%s`.`%s`",
                        (actual_error ? thd->net.last_error :
                         "unexpected success or fatal error"),
                        table_list->db, table_list->table_name);
        thd->query_error= 1;
6330
      }
6331
      goto err;
6332 6333
    }

6334
    m_table= table_list->table;
6335 6336 6337 6338 6339 6340 6341

    /*
      This will fail later otherwise, the 'in_use' field should be
      set to the current thread.
    */
    DBUG_ASSERT(m_table->in_use);

6342 6343
    table_def const def(m_coltype, m_colcnt);
    if (def.compatible_with(rli, m_table))
6344 6345
    {
      thd->query_error= 1;
6346 6347
      error= ERR_BAD_TABLE_DEF;
      goto err;
6348
      /* purecov: end */
6349 6350 6351
    }

    /*
6352
      We record in the slave's information that the table should be
mats@romeo.(none)'s avatar
mats@romeo.(none) committed
6353
      locked by linking the table into the list of tables to lock.
6354
    */
6355 6356 6357 6358
    table_list->next_global= table_list->next_local= rli->tables_to_lock;
    rli->tables_to_lock= table_list;
    rli->tables_to_lock_count++;
    /* 'memory' is freed in clear_tables_to_lock */
6359 6360 6361 6362 6363 6364 6365 6366 6367 6368 6369 6370 6371 6372
  }

  /*
    We explicitly do not call Log_event::exec_event() here since we do not
    want the relay log position to be flushed to disk. The flushing will be
    done by the last Rows_log_event that either ends a statement (outside a
    transaction) or a transaction.

    A table map event can *never* end a transaction or a statement, so we
    just step the relay log position.
  */

  if (likely(!error))
    rli->inc_event_relay_log_pos();
6373
  DBUG_RETURN(error);
6374

6375 6376
err:
  my_free((gptr) memory, MYF(MY_WME));
6377 6378 6379 6380 6381 6382 6383
  DBUG_RETURN(error);
}
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Table_map_log_event::write_data_header(IO_CACHE *file)
{
6384
  DBUG_ASSERT(m_table_id != ~0UL);
6385 6386 6387 6388 6389 6390 6391 6392 6393 6394 6395 6396 6397 6398 6399 6400 6401 6402 6403 6404 6405 6406 6407
  byte buf[TABLE_MAP_HEADER_LEN];
  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);

  byte const dbuf[]= { m_dblen };
  byte const tbuf[]= { m_tbllen };

knielsen@mysql.com's avatar
knielsen@mysql.com committed
6408
  char cbuf[sizeof(m_colcnt)];
kent@mysql.com's avatar
kent@mysql.com committed
6409
  char *const cbuf_end= net_store_length((char*) cbuf, (uint) m_colcnt);
knielsen@mysql.com's avatar
knielsen@mysql.com committed
6410
  DBUG_ASSERT(static_cast<my_size_t>(cbuf_end - cbuf) <= sizeof(cbuf));
6411

6412
  return (my_b_safe_write(file, dbuf,      sizeof(dbuf)) ||
6413
          my_b_safe_write(file, (const byte*)m_dbnam,   m_dblen+1) ||
6414
          my_b_safe_write(file, tbuf,      sizeof(tbuf)) ||
6415
          my_b_safe_write(file, (const byte*)m_tblnam,  m_tbllen+1) ||
knielsen@mysql.com's avatar
knielsen@mysql.com committed
6416
          my_b_safe_write(file, reinterpret_cast<byte*>(cbuf),
kent@mysql.com's avatar
Merge  
kent@mysql.com committed
6417
                          cbuf_end - (char*) cbuf) ||
6418
          my_b_safe_write(file, reinterpret_cast<byte*>(m_coltype), m_colcnt));
6419 6420 6421 6422 6423 6424 6425 6426 6427 6428
 }
#endif

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

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

6429
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6430 6431 6432
void Table_map_log_event::pack_info(Protocol *protocol)
{
    char buf[256];
6433 6434
    my_size_t bytes= my_snprintf(buf, sizeof(buf),
                                 "table_id: %lu (%s.%s)",
6435
                              m_table_id, m_dbnam, m_tblnam);
6436 6437
    protocol->store(buf, bytes, &my_charset_bin);
}
6438 6439
#endif

6440 6441 6442 6443 6444 6445 6446 6447 6448

#endif


#ifdef MYSQL_CLIENT
void Table_map_log_event::print(FILE *file, PRINT_EVENT_INFO *print_event_info)
{
  if (!print_event_info->short_form)
  {
6449 6450 6451 6452 6453
    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);
6454 6455 6456 6457 6458 6459 6460 6461 6462 6463 6464 6465 6466 6467 6468 6469 6470 6471 6472 6473 6474 6475 6476 6477 6478 6479 6480 6481 6482 6483 6484 6485 6486 6487 6488 6489 6490 6491 6492 6493 6494 6495 6496 6497 6498 6499 6500 6501 6502 6503 6504 6505 6506 6507
  }
}
#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)
int Write_rows_log_event::do_before_row_operations(TABLE *table)
{
  int error= 0;

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

tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
6508
  table->file->extra(HA_EXTRA_IGNORE_DUP_KEY);  // Needed for ndbcluster
6509
  table->file->extra(HA_EXTRA_WRITE_CAN_REPLACE);  // Needed for ndbcluster
tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
6510
  table->file->extra(HA_EXTRA_IGNORE_NO_KEY);   // Needed for ndbcluster
6511 6512 6513 6514 6515
  /*
    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.
  */
6516
  table->file->ha_start_bulk_insert(0);
6517 6518 6519 6520 6521 6522 6523 6524 6525 6526 6527 6528 6529 6530 6531 6532 6533 6534 6535 6536 6537 6538
  /*
    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).
  */
  table->timestamp_field_type= TIMESTAMP_NO_AUTO_SET;
  return error;
}

int Write_rows_log_event::do_after_row_operations(TABLE *table, int error)
{
  if (error == 0)
6539
    error= table->file->ha_end_bulk_insert();
6540 6541 6542
  return error;
}

6543 6544
int Write_rows_log_event::do_prepare_row(THD *thd, RELAY_LOG_INFO *rli,
                                         TABLE *table,
6545 6546
                                         char const *const row_start,
                                         char const **const row_end)
6547 6548
{
  DBUG_ASSERT(table != NULL);
6549 6550 6551
  DBUG_ASSERT(row_start && row_end);

  int error;
6552 6553
  error= unpack_row(rli, table, m_width, row_start, &m_cols, row_end,
                    &m_master_reclength, table->write_set, WRITE_ROWS_EVENT);
6554
  bitmap_copy(table->read_set, table->write_set);
6555
  return error;
6556 6557 6558 6559 6560 6561 6562 6563 6564 6565 6566 6567 6568 6569 6570 6571 6572 6573 6574 6575 6576 6577 6578 6579 6580 6581 6582 6583 6584 6585 6586 6587 6588 6589 6590 6591 6592 6593 6594 6595 6596 6597 6598 6599 6600
}

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

/* Anonymous namespace for template functions/classes */
namespace {

  /*
    Smart pointer that will automatically call my_afree (a macro) when
    the pointer goes out of scope.  This is used so that I do not have
    to remember to call my_afree() before each return.  There is no
    overhead associated with this, since all functions are inline.

    I (Matz) would prefer to use the free function as a template
    parameter, but that is not possible when the "function" is a
    macro.
  */
  template <class Obj>
  class auto_afree_ptr
  {
    Obj* m_ptr;
  public:
    auto_afree_ptr(Obj* ptr) : m_ptr(ptr) { }
    ~auto_afree_ptr() { if (m_ptr) my_afree(m_ptr); }
    void assign(Obj* ptr) {
      /* Only to be called if it hasn't been given a value before. */
      DBUG_ASSERT(m_ptr == NULL);
      m_ptr= ptr;
    }
    Obj* get() { return m_ptr; }
  };

}


6601 6602 6603 6604 6605 6606 6607 6608 6609 6610 6611 6612 6613
/*
  Copy "extra" columns from record[1] to record[0].

  Copy the extra fields that are not present on the master but are
  present on the slave from record[1] to record[0].  This is used
  after fetching a record that are to be updated, either inside
  replace_record() or as part of executing an update_row().
 */
static int
copy_extra_record_fields(TABLE *table,
                         my_size_t master_reclength,
                         my_ptrdiff_t master_fields)
{
6614
  DBUG_PRINT("info", ("Copying to 0x%lx "
6615
                      "from field %lu at offset %lu "
6616 6617
                      "to field %d at offset %lu",
                      (long) table->record[0],
6618
                      (ulong) master_fields, (ulong) master_reclength,
6619
                      table->s->fields, table->s->reclength));
6620 6621 6622 6623 6624
  /*
    Copying the extra fields of the slave that does not exist on
    master into record[0] (which are basically the default values).
  */
  DBUG_ASSERT(master_reclength <= table->s->reclength);
6625 6626 6627 6628 6629 6630 6631 6632 6633 6634 6635 6636 6637 6638 6639 6640 6641 6642 6643 6644 6645 6646 6647 6648 6649 6650 6651 6652 6653 6654 6655 6656 6657 6658 6659 6660 6661 6662 6663 6664 6665 6666 6667
  if (master_reclength < table->s->reclength)
    bmove_align(table->record[0] + master_reclength,
                table->record[1] + master_reclength,
                table->s->reclength - master_reclength);
    
  /*
    Bit columns are special.  We iterate over all the remaining
    columns and copy the "extra" bits to the new record.  This is
    not a very good solution: it should be refactored on
    opportunity.

    REFACTORING SUGGESTION (Matz).  Introduce a member function
    similar to move_field_offset() called copy_field_offset() to
    copy field values and implement it for all Field subclasses. Use
    this function to copy data from the found record to the record
    that are going to be inserted.

    The copy_field_offset() function need to be a virtual function,
    which in this case will prevent copying an entire range of
    fields efficiently.
  */
  {
    Field **field_ptr= table->field + master_fields;
    for ( ; *field_ptr ; ++field_ptr)
    {
      /*
        Set the null bit according to the values in record[1]
       */
      if ((*field_ptr)->maybe_null() &&
          (*field_ptr)->is_null_in_record(reinterpret_cast<uchar*>(table->record[1])))
        (*field_ptr)->set_null();
      else
        (*field_ptr)->set_notnull();

      /*
        Do the extra work for special columns.
       */
      switch ((*field_ptr)->real_type())
      {
      default:
        /* Nothing to do */
        break;

6668
      case MYSQL_TYPE_BIT:
6669
        Field_bit *f= static_cast<Field_bit*>(*field_ptr);
6670 6671 6672 6673 6674 6675 6676
        if (f->bit_len > 0)
        {
          my_ptrdiff_t const offset= table->record[1] - table->record[0];
          uchar const bits=
            get_rec_bits(f->bit_ptr + offset, f->bit_ofs, f->bit_len);
          set_rec_bits(bits, f->bit_ptr, f->bit_ofs, f->bit_len);
        }
6677 6678 6679 6680 6681 6682 6683
        break;
      }
    }
  }
  return 0;                                     // All OK
}

6684 6685 6686
/*
  Replace the provided record in the database.

6687 6688 6689 6690 6691 6692 6693 6694
  SYNOPSIS
      replace_record()
      thd    Thread context for writing the record.
      table  Table to which record should be written.
      master_reclength
             Offset to first column that is not present on the master,
             alternatively the length of the record on the master
             side.
6695

6696 6697
  RETURN VALUE
      Error code on failure, 0 on success.
6698

6699 6700 6701 6702
  DESCRIPTION
      Similar to how it is done in mysql_insert(), we first try to do
      a ha_write_row() and of that fails due to duplicated keys (or
      indices), we do an ha_update_row() or a ha_delete_row() instead.
6703 6704
 */
static int
6705 6706 6707
replace_record(THD *thd, TABLE *table,
               ulong const master_reclength,
               uint const master_fields)
6708
{
6709
  DBUG_ENTER("replace_record");
6710 6711 6712 6713 6714 6715 6716 6717
  DBUG_ASSERT(table != NULL && thd != NULL);

  int error;
  int keynum;
  auto_afree_ptr<char> key(NULL);

  while ((error= table->file->ha_write_row(table->record[0])))
  {
6718 6719 6720 6721 6722
    if (error == HA_ERR_LOCK_DEADLOCK || error == HA_ERR_LOCK_WAIT_TIMEOUT)
    {
      table->file->print_error(error, MYF(0)); /* to check at exec_relay_log_event */
      DBUG_RETURN(error);
    }
6723 6724 6725
    if ((keynum= table->file->get_dup_key(error)) < 0)
    {
      /* We failed to retrieve the duplicate key */
6726
      DBUG_RETURN(HA_ERR_FOUND_DUPP_KEY);
6727 6728 6729 6730 6731 6732 6733 6734 6735 6736 6737 6738
    }

    /*
       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.
     */
6739
    if (table->file->ha_table_flags() & HA_DUPLICATE_POS)
6740
    {
6741
      error= table->file->rnd_pos(table->record[1], table->file->dup_ref);
6742
      if (error)
6743
        DBUG_RETURN(error);
6744 6745 6746 6747 6748
    }
    else
    {
      if (table->file->extra(HA_EXTRA_FLUSH_CACHE))
      {
6749
        DBUG_RETURN(my_errno);
6750 6751 6752 6753 6754 6755
      }

      if (key.get() == NULL)
      {
        key.assign(static_cast<char*>(my_alloca(table->s->max_unique_length)));
        if (key.get() == NULL)
6756
          DBUG_RETURN(ENOMEM);
6757 6758
      }

6759 6760 6761
      key_copy((byte*)key.get(), table->record[0], table->key_info + keynum, 0);
      error= table->file->index_read_idx(table->record[1], keynum, 
                                         (const byte*)key.get(),
6762 6763 6764
                                         table->key_info[keynum].key_length,
                                         HA_READ_KEY_EXACT);
      if (error)
6765
        DBUG_RETURN(error);
6766 6767 6768 6769 6770 6771 6772
    }

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

6773 6774 6775
       First we copy the columns into table->record[0] that are not
       present on the master from table->record[1], if there are any.
    */
6776
    copy_extra_record_fields(table, master_reclength, master_fields);
6777

6778
    /*
6779 6780 6781 6782 6783 6784 6785 6786 6787 6788 6789 6790 6791 6792 6793 6794 6795 6796 6797
       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())
    {
      error=table->file->ha_update_row(table->record[1],
                                       table->record[0]);
6798
      DBUG_RETURN(error);
6799 6800 6801 6802
    }
    else
    {
      if ((error= table->file->ha_delete_row(table->record[1])))
6803
        DBUG_RETURN(error);
6804 6805 6806
      /* Will retry ha_write_row() with the offending row removed. */
    }
  }
6807
  DBUG_RETURN(error);
6808 6809 6810 6811 6812
}

int Write_rows_log_event::do_exec_row(TABLE *table)
{
  DBUG_ASSERT(table != NULL);
6813
  int error= replace_record(thd, table, m_master_reclength, m_width);
6814 6815 6816 6817 6818 6819 6820
  return error;
}
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Write_rows_log_event::print(FILE *file, PRINT_EVENT_INFO* print_event_info)
{
6821
  Rows_log_event::print_helper(file, print_event_info, "Write_rows");
6822 6823 6824 6825 6826 6827 6828 6829
}
#endif

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

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
6830 6831 6832 6833 6834 6835
/*
  Compares table->record[0] and table->record[1]

  Returns TRUE if different.
*/
static bool record_compare(TABLE *table)
6836
{
6837 6838 6839 6840 6841 6842 6843 6844 6845
  if (table->s->blob_fields + table->s->varchar_fields == 0)
    return cmp_record(table,record[1]);
  /* Compare null bits */
  if (memcmp(table->null_flags,
	     table->null_flags+table->s->rec_buff_length,
	     table->s->null_bytes))
    return TRUE;				// Diff in NULL value
  /* Compare updated fields */
  for (Field **ptr=table->field ; *ptr ; ptr++)
6846
  {
6847 6848
    if ((*ptr)->cmp_binary_offset(table->s->rec_buff_length))
      return TRUE;
6849
  }
6850
  return FALSE;
6851 6852 6853 6854 6855
}


/*
  Find the row given by 'key', if the table has keys, or else use a table scan
6856 6857 6858 6859 6860 6861 6862 6863 6864 6865 6866 6867 6868 6869 6870 6871 6872 6873 6874 6875
  to find (and fetch) the row.

  If the engine allows random access of the records, a combination of
  position() and rnd_pos() will be used.

  @param table Pointer to table to search
  @param key   Pointer to key to use for search, if table has key

  @pre <code>table->record[0]</code> shall contain the row to locate
  and <code>key</code> shall contain a key to use for searching, if
  the engine has a key.

  @post If the return value is zero, <code>table->record[1]</code>
  will contain the fetched row and the internal "cursor" will refer to
  the row. If the return value is non-zero,
  <code>table->record[1]</code> is undefined.  In either case,
  <code>table->record[0]</code> is undefined.

  @return Zero if the row was successfully fetched into
  <code>table->record[1]</code>, error code otherwise.
6876
 */
6877

6878
static int find_and_fetch_row(TABLE *table, byte *key)
6879 6880
{
  DBUG_ENTER("find_and_fetch_row(TABLE *table, byte *key, byte *record)");
6881 6882
  DBUG_PRINT("enter", ("table: 0x%lx, key: 0x%lx  record: 0x%lx",
		       (long) table, (long) key, (long) table->record[1]));
6883 6884 6885

  DBUG_ASSERT(table->in_use != NULL);

6886 6887
  if ((table->file->ha_table_flags() & HA_PRIMARY_KEY_REQUIRED_FOR_POSITION) &&
      table->s->primary_key < MAX_KEY)
6888 6889 6890 6891 6892 6893
  {
    /*
      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
6894
      the "cursor" (i.e., record[0] in this case) at the correct row.
6895 6896 6897 6898 6899 6900 6901 6902 6903 6904 6905

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

6906 6907
    */
    table->file->position(table->record[0]);
6908 6909 6910 6911 6912 6913 6914
    int error= table->file->rnd_pos(table->record[0], table->file->ref);
    /*
      rnd_pos() returns the record in table->record[0], so we have to
      move it to table->record[1].
     */
    bmove_align(table->record[1], table->record[0], table->s->reclength);
    DBUG_RETURN(error);
6915 6916
  }

tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
6917
  /* We need to retrieve all fields */
6918 6919
  /* TODO: Move this out from this function to main loop */
  table->use_all_columns();
tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
6920

6921 6922 6923
  if (table->s->keys > 0)
  {
    int error;
6924
    /* We have a key: search the table using the index */
6925
    if (!table->file->inited && (error= table->file->ha_index_init(0, FALSE)))
6926
      DBUG_RETURN(error);
6927

6928 6929 6930 6931 6932
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
patg@radha.patg.net's avatar
patg@radha.patg.net committed
6933 6934
    DBUG_DUMP("table->record[0]", (const char *)table->record[0], table->s->reclength);
    DBUG_DUMP("table->record[1]", (const char *)table->record[1], table->s->reclength);
6935 6936
#endif

6937 6938 6939 6940 6941 6942
    /*
      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.
    */
6943 6944 6945
    my_ptrdiff_t const pos=
      table->s->null_bytes > 0 ? table->s->null_bytes - 1 : 0;
    table->record[1][pos]= 0xFF;
6946 6947 6948
    if ((error= table->file->index_read(table->record[1], key,
                                        table->key_info->key_length,
                                        HA_READ_KEY_EXACT)))
6949 6950
    {
      table->file->print_error(error, MYF(0));
6951
      table->file->ha_index_end();
6952 6953 6954
      DBUG_RETURN(error);
    }

6955 6956 6957 6958 6959
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
patg@radha.patg.net's avatar
patg@radha.patg.net committed
6960 6961
    DBUG_DUMP("table->record[0]", (const char *)table->record[0], table->s->reclength);
    DBUG_DUMP("table->record[1]", (const char *)table->record[1], table->s->reclength);
6962
#endif
6963 6964 6965 6966 6967 6968 6969 6970 6971 6972 6973 6974 6975
    /*
      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.
6976
    */
6977
    if (table->key_info->flags & HA_NOSAME)
6978 6979
    {
      table->file->ha_index_end();
6980
      DBUG_RETURN(0);
6981
    }
6982

6983
    while (record_compare(table))
6984 6985
    {
      int error;
6986 6987 6988 6989 6990 6991
      /*
        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.
      */
6992 6993 6994
      my_ptrdiff_t const pos=
        table->s->null_bytes > 0 ? table->s->null_bytes - 1 : 0;
      table->record[1][pos]= 0xFF;
6995
      if ((error= table->file->index_next(table->record[1])))
6996 6997
      {
	table->file->print_error(error, MYF(0));
6998
        table->file->ha_index_end();
6999 7000 7001
	DBUG_RETURN(error);
      }
    }
7002 7003 7004 7005 7006

    /*
      Have to restart the scan to be able to fetch the next row.
    */
    table->file->ha_index_end();
7007 7008 7009 7010
  }
  else
  {
    int restart_count= 0; // Number of times scanning has restarted from top
7011 7012 7013 7014 7015 7016 7017
    int error;

    /* We don't have a key: search the table using rnd_next() */
    if ((error= table->file->ha_rnd_init(1)))
      return error;

    /* Continue until we find the right record or have made a full loop */
7018 7019
    do
    {
7020 7021 7022 7023 7024 7025
      /*
        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.
      */
7026 7027 7028
      my_ptrdiff_t const pos=
        table->s->null_bytes > 0 ? table->s->null_bytes - 1 : 0;
      table->record[1][pos]= 0xFF;
7029
      error= table->file->rnd_next(table->record[1]);
7030

7031 7032 7033 7034 7035 7036 7037 7038 7039 7040 7041 7042 7043
      switch (error)
      {
      case 0:
      case HA_ERR_RECORD_DELETED:
	break;

      case HA_ERR_END_OF_FILE:
	if (++restart_count < 2)
	  table->file->ha_rnd_init(1);
	break;

      default:
	table->file->print_error(error, MYF(0));
7044
        table->file->ha_rnd_end();
7045 7046 7047
	DBUG_RETURN(error);
      }
    }
7048
    while (restart_count < 2 && record_compare(table));
7049

7050 7051 7052 7053 7054
    /*
      Have to restart the scan to be able to fetch the next row.
    */
    table->file->ha_rnd_end();

7055 7056 7057 7058 7059 7060 7061 7062 7063 7064 7065 7066 7067 7068 7069 7070 7071 7072
    DBUG_ASSERT(error == HA_ERR_END_OF_FILE || error == 0);
    DBUG_RETURN(error);
  }

  DBUG_RETURN(0);
}
#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)
#ifdef HAVE_REPLICATION
7073
  ,m_memory(NULL), m_key(NULL), m_after_image(NULL)
7074 7075 7076 7077 7078 7079 7080 7081 7082 7083 7084 7085 7086 7087 7088 7089
#endif
{
}
#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)
#if defined(MYSQL_CLIENT)
  : Rows_log_event(buf, event_len, DELETE_ROWS_EVENT, description_event)
#else
  : Rows_log_event(buf, event_len, DELETE_ROWS_EVENT, description_event),
7090
    m_memory(NULL), m_key(NULL), m_after_image(NULL)
7091 7092 7093 7094 7095 7096 7097 7098 7099 7100
#endif
{
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
int Delete_rows_log_event::do_before_row_operations(TABLE *table)
{
  DBUG_ASSERT(m_memory == NULL);

7101
  if ((table->file->ha_table_flags() & HA_PRIMARY_KEY_REQUIRED_FOR_POSITION) &&
7102 7103 7104
      table->s->primary_key < MAX_KEY)
  {
    /*
7105
      We don't need to allocate any memory for m_after_image and
7106 7107 7108 7109 7110 7111 7112 7113 7114 7115 7116
      m_key since they are not used.
    */
    return 0;
  }

  int error= 0;

  if (table->s->keys > 0)
  {
    m_memory=
      my_multi_malloc(MYF(MY_WME),
7117
		      &m_after_image, table->s->reclength,
7118 7119 7120 7121 7122
		      &m_key, table->key_info->key_length,
		      NULL);
  }
  else
  {
7123 7124
    m_after_image= (byte*)my_malloc(table->s->reclength, MYF(MY_WME));
    m_memory= (gptr)m_after_image;
7125 7126 7127 7128 7129 7130 7131 7132 7133 7134 7135 7136 7137
    m_key= NULL;
  }
  if (!m_memory)
    return HA_ERR_OUT_OF_MEM;

  return error;
}

int Delete_rows_log_event::do_after_row_operations(TABLE *table, int error)
{
  /*error= ToDo:find out what this should really be, this triggers close_scan in nbd, returning error?*/
  table->file->ha_index_or_rnd_end();
  my_free(m_memory, MYF(MY_ALLOW_ZERO_PTR)); // Free for multi_malloc
7138
  m_memory= NULL;
7139
  m_after_image= NULL;
7140
  m_key= NULL;
7141 7142 7143 7144

  return error;
}

7145 7146
int Delete_rows_log_event::do_prepare_row(THD *thd, RELAY_LOG_INFO *rli,
                                          TABLE *table,
7147 7148
                                          char const *const row_start,
                                          char const **const row_end)
7149
{
7150 7151
  int error;
  DBUG_ASSERT(row_start && row_end);
7152 7153 7154 7155 7156 7157
  /*
    This assertion actually checks that there is at least as many
    columns on the slave as on the master.
  */
  DBUG_ASSERT(table->s->fields >= m_width);

7158 7159
  error= unpack_row(rli, table, m_width, row_start, &m_cols, row_end,
                    &m_master_reclength, table->read_set, DELETE_ROWS_EVENT);
7160 7161 7162 7163 7164 7165 7166 7167 7168 7169 7170
  /*
    If we will access rows using the random access method, m_key will
    be set to NULL, so we do not need to make a key copy in that case.
   */
  if (m_key)
  {
    KEY *const key_info= table->key_info;

    key_copy(m_key, table->record[0], key_info, 0);
  }

7171
  return error;
7172 7173 7174 7175
}

int Delete_rows_log_event::do_exec_row(TABLE *table)
{
7176
  int error;
7177 7178
  DBUG_ASSERT(table != NULL);

7179 7180 7181 7182 7183 7184 7185 7186
  if (!(error= find_and_fetch_row(table, m_key)))
  { 
    /*
      Now we should have the right row to delete.  We are using
      record[0] since it is guaranteed to point to a record with the
      correct value.
    */
    error= table->file->ha_delete_row(table->record[0]);
7187
  }
7188 7189 7190 7191 7192 7193 7194 7195 7196
  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)
{
7197
  Rows_log_event::print_helper(file, print_event_info, "Delete_rows");
7198 7199 7200 7201 7202 7203 7204 7205 7206 7207 7208 7209 7210 7211 7212 7213 7214 7215 7216 7217 7218 7219 7220 7221 7222 7223 7224 7225 7226 7227 7228 7229 7230 7231 7232 7233 7234 7235 7236 7237 7238 7239 7240 7241 7242 7243 7244 7245 7246 7247 7248 7249
}
#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,
                                             ulong tid, MY_BITMAP const *cols,
                                             bool is_transactional)
: Rows_log_event(thd_arg, tbl_arg, tid, cols, is_transactional)
#ifdef HAVE_REPLICATION
  , m_memory(NULL), m_key(NULL)
#endif
{
}
#endif /* !defined(MYSQL_CLIENT) */

/*
  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)
#if defined(MYSQL_CLIENT)
  : Rows_log_event(buf, event_len, UPDATE_ROWS_EVENT, description_event)
#else
  : Rows_log_event(buf, event_len, UPDATE_ROWS_EVENT, description_event),
    m_memory(NULL), m_key(NULL)
#endif
{
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
int Update_rows_log_event::do_before_row_operations(TABLE *table)
{
  DBUG_ASSERT(m_memory == NULL);

  int error= 0;

  if (table->s->keys > 0)
  {
    m_memory=
      my_multi_malloc(MYF(MY_WME),
7250
		      &m_after_image, table->s->reclength,
7251 7252 7253 7254 7255
		      &m_key, table->key_info->key_length,
		      NULL);
  }
  else
  {
7256 7257
    m_after_image= (byte*)my_malloc(table->s->reclength, MYF(MY_WME));
    m_memory= (gptr)m_after_image;
7258 7259 7260 7261 7262 7263 7264 7265 7266 7267 7268 7269 7270 7271 7272
    m_key= NULL;
  }
  if (!m_memory)
    return HA_ERR_OUT_OF_MEM;

  table->timestamp_field_type= TIMESTAMP_NO_AUTO_SET;

  return error;
}

int Update_rows_log_event::do_after_row_operations(TABLE *table, int error)
{
  /*error= ToDo:find out what this should really be, this triggers close_scan in nbd, returning error?*/
  table->file->ha_index_or_rnd_end();
  my_free(m_memory, MYF(MY_ALLOW_ZERO_PTR));
7273
  m_memory= NULL;
7274
  m_after_image= NULL;
7275
  m_key= NULL;
7276 7277 7278 7279

  return error;
}

7280 7281
int Update_rows_log_event::do_prepare_row(THD *thd, RELAY_LOG_INFO *rli,
                                          TABLE *table,
7282 7283
                                          char const *const row_start,
                                          char const **const row_end)
7284
{
7285 7286
  int error;
  DBUG_ASSERT(row_start && row_end);
7287 7288 7289 7290 7291 7292
  /*
    This assertion actually checks that there is at least as many
    columns on the slave as on the master.
  */
  DBUG_ASSERT(table->s->fields >= m_width);

7293 7294 7295 7296 7297 7298
  /*
    We need to perform some juggling below since unpack_row() always
    unpacks into table->record[0]. For more information, see the
    comments for unpack_row().
  */

7299
  /* record[0] is the before image for the update */
7300 7301 7302
  error= unpack_row(rli, table, m_width, row_start, &m_cols, row_end,
                    &m_master_reclength, table->read_set, UPDATE_ROWS_EVENT);
  store_record(table, record[1]);
7303
  char const *next_start = *row_end;
7304
  /* m_after_image is the after image for the update */
7305 7306 7307 7308
  error= unpack_row(rli, table, m_width, next_start, &m_cols, row_end,
                    &m_master_reclength, table->write_set, UPDATE_ROWS_EVENT);
  bmove_align(m_after_image, table->record[0], table->s->reclength);
  restore_record(table, record[1]);
7309

7310 7311 7312 7313 7314
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
7315 7316
  DBUG_DUMP("record[0]", (const char *)table->record[0], table->s->reclength);
  DBUG_DUMP("m_after_image", (const char *)m_after_image, table->s->reclength);
7317
#endif
7318

7319 7320 7321 7322 7323 7324 7325 7326 7327 7328 7329
  /*
    If we will access rows using the random access method, m_key will
    be set to NULL, so we do not need to make a key copy in that case.
   */
  if (m_key)
  {
    KEY *const key_info= table->key_info;

    key_copy(m_key, table->record[0], key_info, 0);
  }

7330
  return error;
7331 7332 7333 7334 7335 7336
}

int Update_rows_log_event::do_exec_row(TABLE *table)
{
  DBUG_ASSERT(table != NULL);

7337
  int error= find_and_fetch_row(table, m_key);
7338 7339 7340
  if (error)
    return error;

7341
  /*
7342 7343 7344 7345 7346 7347
    We have to ensure that the new record (i.e., the after image) is
    in record[0] and the old record (i.e., the before image) is in
    record[1].  This since some storage engines require this (for
    example, the partition engine).

    Since find_and_fetch_row() puts the fetched record (i.e., the old
7348 7349 7350 7351 7352
    record) in record[1], we can keep it there. We put the new record
    (i.e., the after image) into record[0], and copy the fields that
    are on the slave (i.e., in record[1]) into record[0], effectively
    overwriting the default values that where put there by the
    unpack_row() function.
7353
  */
7354
  bmove_align(table->record[0], m_after_image, table->s->reclength);
7355
  copy_extra_record_fields(table, m_master_reclength, m_width);
7356

7357
  /*
7358 7359 7360 7361
    Now we have the right row to update.  The old row (the one we're
    looking for) is in record[1] and the new row has is in record[0].
    We also have copied the original values already in the slave's
    database into the after image delivered from the master.
7362
  */
7363
  error= table->file->ha_update_row(table->record[1], table->record[0]);
7364 7365 7366 7367 7368 7369 7370 7371 7372

  return error;
}
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifdef MYSQL_CLIENT
void Update_rows_log_event::print(FILE *file,
				  PRINT_EVENT_INFO* print_event_info)
{
7373
  Rows_log_event::print_helper(file, print_event_info, "Update_rows");
7374 7375 7376
}
#endif