log_event.cc 244 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
/*
  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()
  {
78
    copy_event_cache_to_file_and_reinit(m_cache, m_file);
79 80 81 82 83 84 85 86 87 88 89
    if (m_flags | FLUSH_F)
      fflush(m_file);
  }

  /*
    Return a pointer to the internal IO_CACHE.

    SYNOPSIS
      operator&()

    DESCRIPTION
90 91 92 93

      Function to return a pointer to the internal cache, so that the
      object can be treated as a IO_CACHE and used with the my_b_*
      IO_CACHE functions
94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112

    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

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

144 145 146 147 148 149 150 151
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
152

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
153
/*
monty@mysql.com's avatar
monty@mysql.com committed
154
  Ignore error code specified on command line
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
155
*/
156

157 158
inline int ignored_error_code(int err_code)
{
tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
159 160 161 162 163 164 165 166 167 168 169 170 171 172
#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
173 174
  return ((err_code == ER_SLAVE_IGNORED_TABLE) ||
          (use_slave_mask && bitmap_is_set(&slave_error_mask, err_code)));
175
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
176
#endif
177

178

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
179
/*
180
  pretty_print_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
181
*/
182

183
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
184
static char *pretty_print_str(char *packet, char *str, int len)
185
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
186 187
  char *end= str + len;
  char *pos= packet;
188
  *pos++= '\'';
189 190 191
  while (str < end)
  {
    char c;
192
    switch ((c=*str++)) {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
193 194 195 196 197 198 199
    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;
200
    default:
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
201
      *pos++= c;
202 203
      break;
    }
204
  }
205 206
  *pos++= '\'';
  return pos;
207
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
208
#endif /* !MYSQL_CLIENT */
209

210

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
211
/*
212 213 214 215 216 217 218 219 220 221 222
  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
223
*/
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
224

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
225
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
226 227
static char *slave_load_file_stem(char *buf, uint file_id,
                                  int event_server_id, const char *ext)
228
{
229
  char *res;
230 231 232
  fn_format(buf,"SQL_LOAD-",slave_load_tmpdir, "", MY_UNPACK_FILENAME);
  to_unix_path(buf);

233 234 235 236 237
  buf = strend(buf);
  buf = int10_to_str(::server_id, buf, 10);
  *buf++ = '-';
  buf = int10_to_str(event_server_id, buf, 10);
  *buf++ = '-';
238 239 240
  res= int10_to_str(file_id, buf, 10);
  strmov(res, ext);                             // Add extension last
  return res;                                   // Pointer to extension
241
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
242
#endif
243

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

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
245
/*
246 247
  Delete all temporary files used for SQL_LOAD.

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
248 249
  SYNOPSIS
    cleanup_load_tmpdir()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
250
*/
251

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
252
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
253 254 255 256 257
static void cleanup_load_tmpdir()
{
  MY_DIR *dirp;
  FILEINFO *file;
  uint i;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
258
  char fname[FN_REFLEN], prefbuf[31], *p;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
259

260 261 262
  if (!(dirp=my_dir(slave_load_tmpdir,MYF(MY_WME))))
    return;

263 264 265 266 267 268 269 270
  /* 
     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.
  */
271
  p= strmake(prefbuf, STRING_WITH_LEN("SQL_LOAD-"));
272 273 274 275
  p= int10_to_str(::server_id, p, 10);
  *(p++)= '-';
  *p= 0;

276 277 278
  for (i=0 ; i < (uint)dirp->number_off_files; i++)
  {
    file=dirp->dir_entry+i;
279
    if (is_prefix(file->name, prefbuf))
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
280 281 282 283
    {
      fn_format(fname,file->name,slave_load_tmpdir,"",MY_UNPACK_FILENAME);
      my_delete(fname, MYF(0));
    }
284 285 286 287
  }

  my_dirend(dirp);
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
288
#endif
289 290


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
291
/*
292
  write_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
293
*/
294

295
static bool write_str(IO_CACHE *file, char *str, uint length)
296
{
297 298 299 300
  byte tmp[1];
  tmp[0]= (byte) length;
  return (my_b_safe_write(file, tmp, sizeof(tmp)) ||
	  my_b_safe_write(file, (byte*) str, length));
301 302 303
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
304
/*
305
  read_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
306
*/
307

308 309
static inline int read_str(char **buf, char *buf_end, char **str,
			   uint8 *len)
310
{
311
  if (*buf + ((uint) (uchar) **buf) >= buf_end)
312
    return 1;
313 314 315
  *len= (uint8) **buf;
  *str= (*buf)+1;
  (*buf)+= (uint) *len+1;
316 317 318
  return 0;
}

319

320 321 322
/*
  Transforms a string into "" or its expression in 0x... form.
*/
monty@mysql.com's avatar
monty@mysql.com committed
323

324
char *str_to_hex(char *to, const char *from, uint len)
325 326 327
{
  if (len)
  {
monty@mysql.com's avatar
monty@mysql.com committed
328 329 330
    *to++= '0';
    *to++= 'x';
    to= octet2hex(to, from, len);
331 332
  }
  else
monty@mysql.com's avatar
monty@mysql.com committed
333 334
    to= strmov(to, "\"\"");
  return to;                               // pointer to end 0 of 'to'
335 336
}

337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358
/*
  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++= '\'';
359
    ptr+= escape_string_for_mysql(csinfo, ptr, 0,
360 361 362 363 364 365 366 367
                                  from->ptr(), from->length());
    *ptr++='\'';
  }
  to->length(orig_len + ptr - beg);
  return 0;
}
#endif

368

369 370 371 372 373
/*
  Prints a "session_var=value" string. Used by mysqlbinlog to print some SET
  commands just before it prints a query.
*/

374
#ifdef MYSQL_CLIENT
375

376 377 378
static void print_set_option(IO_CACHE* file, uint32 bits_changed,
                             uint32 option, uint32 flags, const char* name,
                             bool* need_comma)
379 380 381 382
{
  if (bits_changed & option)
  {
    if (*need_comma)
383 384
      my_b_printf(file,", ");
    my_b_printf(file,"%s=%d", name, test(flags & option));
385 386 387
    *need_comma= 1;
  }
}
388
#endif
389

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
390
/**************************************************************************
391
	Log_event methods (= the parent class of all events)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
392
**************************************************************************/
393

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
394
/*
395
  Log_event::get_type_str()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
396
*/
397

398 399
const char* Log_event::get_type_str()
{
400
  switch(get_type_code()) {
401
  case START_EVENT_V3:  return "Start_v3";
402 403 404 405 406
  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";
407
  case NEW_LOAD_EVENT:   return "New_load";
408
  case SLAVE_EVENT:  return "Slave";
409 410 411 412
  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";
413
  case RAND_EVENT: return "RAND";
414
  case XID_EVENT: return "Xid";
415
  case USER_VAR_EVENT: return "User var";
416
  case FORMAT_DESCRIPTION_EVENT: return "Format_desc";
417 418 419 420
  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";
421 422
  case BEGIN_LOAD_QUERY_EVENT: return "Begin_load_query";
  case EXECUTE_LOAD_QUERY_EVENT: return "Execute_load_query";
423
  default: return "Unknown";				/* impossible */
424 425 426
  }
}

427

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
428
/*
429
  Log_event::Log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
430
*/
431

432
#ifndef MYSQL_CLIENT
433
Log_event::Log_event(THD* thd_arg, uint16 flags_arg, bool using_trans)
434
  :log_pos(0), temp_buf(0), exec_time(0), flags(flags_arg), thd(thd_arg)
435
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
436 437
  server_id=	thd->server_id;
  when=		thd->start_time;
438
  cache_stmt=	using_trans;
439 440 441
}


monty@mysql.com's avatar
monty@mysql.com committed
442
/*
443 444 445 446
  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
447 448
*/

449
Log_event::Log_event()
450
  :temp_buf(0), exec_time(0), flags(0), cache_stmt(0),
451 452
   thd(0)
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
453 454 455
  server_id=	::server_id;
  when=		time(NULL);
  log_pos=	0;
456
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
457
#endif /* !MYSQL_CLIENT */
458 459


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
460
/*
461
  Log_event::Log_event()
462
*/
463

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

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

534
int Log_event::do_update_pos(RELAY_LOG_INFO *rli)
535
{
536
  /*
537
    rli is null when (as far as I (Guilhem) know) the caller is
538 539 540 541
    Load_log_event::do_apply_event *and* that one is called from
    Execute_load_log_event::do_apply_event.  In this case, we don't
    do anything here ; Execute_load_log_event::do_apply_event will
    call Log_event::do_apply_event again later with the proper rli.
542 543 544
    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.
545 546

    Matz: I don't think we will need this check with this refactoring.
547
  */
548
  if (rli)
549
  {
550
    /*
551 552 553 554
      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= .
555

556
      CAUTION: opt_using_transactions means
557
      innodb || bdb ; suppose the master supports InnoDB and BDB,
558
      but the slave supports only BDB, problems
559
      will arise:
560 561
      - suppose an InnoDB table is created on the master,
      - then it will be MyISAM on the slave
562 563 564 565 566 567 568 569 570 571 572 573
      - 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.
574 575
    */
    if ((thd->options & OPTION_BEGIN) && opt_using_transactions)
576
      rli->inc_event_relay_log_pos();
577 578
    else
    {
579
      rli->inc_group_relay_log_pos(log_pos);
580
      flush_relay_log_info(rli);
581
      /*
582
         Note that Rotate_log_event::do_apply_event() does not call
583 584 585 586 587
         this function, so there is no chance that a fake rotate event
         resets last_master_timestamp.  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).
588 589
      */
      rli->last_master_timestamp= when;
590
    }
591
  }
592

593 594
  return 0;                                   // Cannot fail currently
}
595

596 597

Log_event::enum_skip_reason
598 599 600 601 602 603 604 605 606 607
Log_event::do_shall_skip(RELAY_LOG_INFO *rli)
{
  DBUG_PRINT("info", ("ev->server_id=%lu, ::server_id=%lu,"
                      " rli->replicate_same_server_id=%d,"
                      " rli->slave_skip_counter=%d",
                      (ulong) server_id, (ulong) ::server_id,
                      rli->replicate_same_server_id,
                      rli->slave_skip_counter));
  if (server_id == ::server_id && !rli->replicate_same_server_id)
    return EVENT_SKIP_IGNORE;
608 609 610
  else if (rli->slave_skip_counter > 0)
    return EVENT_SKIP_COUNT;
  else
611
    return EVENT_SKIP_NOT;
612
}
613

614

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

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


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

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

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


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

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));
663
  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
664 665 666 667
					    MYSQL_TYPE_LONGLONG));
  field_list->push_back(new Item_empty_string("Info", 20));
}

668

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

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

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

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

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
  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
741 742 743
}


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

  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
750
*/
751

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

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

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

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

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

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

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

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

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

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

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

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

919

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

926 927 928
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
929
{
930 931
  Log_event* ev;
  DBUG_ENTER("Log_event::read_log_event(char*,...)");
932
  DBUG_ASSERT(description_event != 0);
933
  DBUG_PRINT("info", ("binlog_version: %d", description_event->binlog_version));
934
  if (event_len < EVENT_LEN_OFFSET ||
935 936 937
      (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
938
    DBUG_RETURN(NULL); // general sanity check - will fail on a partial read
939
  }
940

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

944
  switch(buf[EVENT_TYPE_OFFSET]) {
bk@work.mysql.com's avatar
bk@work.mysql.com committed
945
  case QUERY_EVENT:
946
    ev  = new Query_log_event(buf, event_len, description_event, QUERY_EVENT);
947
    break;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
948
  case LOAD_EVENT:
949
    ev = new Load_log_event(buf, event_len, description_event);
950
    break;
951
  case NEW_LOAD_EVENT:
952
    ev = new Load_log_event(buf, event_len, description_event);
953
    break;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
954
  case ROTATE_EVENT:
955
    ev = new Rotate_log_event(buf, event_len, description_event);
956
    break;
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
957
#ifdef HAVE_REPLICATION
958
  case SLAVE_EVENT: /* can never happen (unused event) */
959 960
    ev = new Slave_log_event(buf, event_len);
    break;
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
961
#endif /* HAVE_REPLICATION */
962
  case CREATE_FILE_EVENT:
963
    ev = new Create_file_log_event(buf, event_len, description_event);
964 965
    break;
  case APPEND_BLOCK_EVENT:
966
    ev = new Append_block_log_event(buf, event_len, description_event);
967 968
    break;
  case DELETE_FILE_EVENT:
969
    ev = new Delete_file_log_event(buf, event_len, description_event);
970 971
    break;
  case EXEC_LOAD_EVENT:
972
    ev = new Execute_load_log_event(buf, event_len, description_event);
973
    break;
974 975
  case START_EVENT_V3: /* this is sent only by MySQL <=4.x */
    ev = new Start_log_event_v3(buf, description_event);
976 977
    break;
  case STOP_EVENT:
978
    ev = new Stop_log_event(buf, description_event);
979 980
    break;
  case INTVAR_EVENT:
981
    ev = new Intvar_log_event(buf, description_event);
982
    break;
983 984 985
  case XID_EVENT:
    ev = new Xid_log_event(buf, description_event);
    break;
nick@mysql.com's avatar
nick@mysql.com committed
986
  case RAND_EVENT:
987
    ev = new Rand_log_event(buf, description_event);
nick@mysql.com's avatar
nick@mysql.com committed
988
    break;
989
  case USER_VAR_EVENT:
990 991 992 993
    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); 
994
    break;
995
#if defined(HAVE_REPLICATION) 
996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008
  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
1009 1010 1011 1012 1013 1014
  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;
1015
  default:
1016 1017
    DBUG_PRINT("error",("Unknown event code: %d",
                        (int) buf[EVENT_TYPE_OFFSET]));
1018
    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
    {
      char emit_buf[256];
      int const bytes_written=
        my_snprintf(emit_buf, sizeof(emit_buf),
1147
                    "# %8.8lx %-48.48s |%s|\n",
1148 1149 1150 1151
                    (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 1156 1157
    /*
      need a # to prefix the rest of printouts for example those of
      Rows_log_event::print_helper().
    */
1158
    my_b_write(file, reinterpret_cast<const byte*>("# "), 2);
1159
  }
1160
  DBUG_VOID_RETURN;
1161 1162
}

1163

1164 1165 1166
void Log_event::print_base64(IO_CACHE* file,
                             PRINT_EVENT_INFO* print_event_info,
                             bool more)
1167
{
1168
  const uchar *ptr= (const uchar *)temp_buf;
1169
  uint32 size= uint4korr(ptr + EVENT_LEN_OFFSET);
1170 1171
  DBUG_ENTER("Log_event::print_base64");

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

1180 1181 1182 1183
  if (base64_encode(ptr, (size_t) size, tmp_str))
  {
    DBUG_ASSERT(0);
  }
1184 1185 1186 1187 1188 1189 1190

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

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

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

1193
  my_free(tmp_str, MYF(0));
1194
  DBUG_VOID_RETURN;
1195 1196 1197
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1198
/*
1199
  Log_event::print_timestamp()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1200
*/
1201

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

1215 1216 1217 1218 1219 1220 1221 1222
  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
1223 1224
}

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1225
#endif /* MYSQL_CLIENT */
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1226 1227


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1228
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1229
	Query_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1230
**************************************************************************/
1231

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

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1234
/*
1235
  Query_log_event::pack_info()
1236 1237 1238 1239
  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
1240
*/
1241

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

1266
#ifndef MYSQL_CLIENT
1267

1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279
/* 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
1280
/*
1281
  Query_log_event::write()
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1282

1283 1284 1285 1286
  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
1287
*/
1288

1289
bool Query_log_event::write(IO_CACHE* file)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1290
{
1291 1292 1293 1294 1295
  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
1296
            1+6+           // code of charset and charset
1297
            1+1+MAX_TIME_ZONE_NAME_LENGTH+ // code of tz and tz length and tz name
1298 1299
            1+2+           // code of lc_time_names and lc_time_names_number
            1+2            // code of charset_database and charset_database_number
1300
            ], *start, *start_of_status;
1301
  ulong event_length;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1302

1303
  if (!query)
1304 1305
    return 1;                                   // Something wrong with event

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1306 1307 1308 1309 1310
  /*
    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.
1311
    Now imagine we (write()) are called by the slave SQL thread (we are
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
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 1337 1338 1339 1340 1341 1342 1343
    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);
1344 1345 1346 1347
  int4store(buf + Q_EXEC_TIME_OFFSET, exec_time);
  buf[Q_DB_LEN_OFFSET] = (char) db_len;
  int2store(buf + Q_ERR_CODE_OFFSET, error_code);

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

  return (write_header(file, event_length) ||
1447 1448 1449 1450
          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)) ||
1451 1452
          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
1453 1454
}

1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466
/*
  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)
{
}

1467

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1468
/*
1469
  Query_log_event::Query_log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1470
*/
1471
Query_log_event::Query_log_event(THD* thd_arg, const char* query_arg,
1472 1473
				 ulong query_length, bool using_trans,
				 bool suppress_use)
1474
  :Log_event(thd_arg,
1475 1476 1477
	     ((thd_arg->tmp_table_used ? LOG_EVENT_THREAD_SPECIFIC_F : 0)
	      | (suppress_use          ? LOG_EVENT_SUPPRESS_USE_F    : 0)),
	     using_trans),
1478
   data_buf(0), query(query_arg), catalog(thd_arg->catalog),
1479
   db(thd_arg->db), q_len((uint32) query_length),
1480
   error_code((thd_arg->killed != THD::NOT_KILLED) ?
1481
              ((thd_arg->system_thread & SYSTEM_THREAD_DELAYED_INSERT) ?
1482
               0 : thd->killed_errno()) : thd_arg->net.last_errno),
guilhem@mysql.com's avatar
guilhem@mysql.com committed
1483 1484
   thread_id(thd_arg->thread_id),
   /* save the original thread id; we already know the server id */
1485
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
1486
   flags2_inited(1), sql_mode_inited(1), charset_inited(1),
1487 1488
   sql_mode(thd_arg->variables.sql_mode),
   auto_increment_increment(thd_arg->variables.auto_increment_increment),
1489
   auto_increment_offset(thd_arg->variables.auto_increment_offset),
1490 1491
   lc_time_names_number(thd_arg->variables.lc_time_names->number),
   charset_database_number(0)
1492 1493 1494 1495
{
  time_t end_time;
  time(&end_time);
  exec_time = (ulong) (end_time  - thd->start_time);
1496
  catalog_len = (catalog) ? (uint32) strlen(catalog) : 0;
1497
  /* status_vars_len is set just before writing the event */
1498
  db_len = (db) ? (uint32) strlen(db) : 0;
1499 1500 1501
  if (thd_arg->variables.collation_database != thd_arg->db_charset)
    charset_database_number= thd_arg->variables.collation_database->number;
  
1502 1503 1504 1505 1506 1507 1508
  /*
    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 &.
  */
1509
  flags2= (uint32) (thd_arg->options & OPTIONS_WRITTEN_TO_BIN_LOG);
1510 1511 1512 1513 1514 1515
  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);
1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527
  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;
1528 1529
  DBUG_PRINT("info",("Query_log_event has flags2: %lu  sql_mode: %lu",
                     (ulong) flags2, sql_mode));
1530
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1531
#endif /* MYSQL_CLIENT */
1532

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

1534 1535
/* 2 utility functions for the next method */

1536 1537 1538 1539 1540 1541 1542 1543
/* 
  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)
1544 1545
{
  if ((*len= **src))
1546 1547
    *dst= (char *)*src + 1;                          // Will be copied later
  (*src)+= *len + 1;
1548 1549
}

1550 1551 1552
static void copy_str_and_move(const char **src, 
                              Log_event::Byte **dst, 
                              uint len)
1553 1554
{
  memcpy(*dst, *src, len);
1555
  *src= (const char *)*dst;
1556 1557 1558 1559
  (*dst)+= len;
  *(*dst)++= 0;
}

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1560
/*
1561
  Query_log_event::Query_log_event()
1562
  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
1563
*/
1564

1565
Query_log_event::Query_log_event(const char* buf, uint event_len,
1566 1567
                                 const Format_description_log_event *description_event,
                                 Log_event_type event_type)
1568
  :Log_event(buf, description_event), data_buf(0), query(NullS),
1569
   db(NullS), catalog_len(0), status_vars_len(0),
1570
   flags2_inited(0), sql_mode_inited(0), charset_inited(0),
1571
   auto_increment_increment(1), auto_increment_offset(1),
1572
   time_zone_len(0), lc_time_names_number(0), charset_database_number(0)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1573 1574
{
  ulong data_len;
1575 1576
  uint32 tmp;
  uint8 common_header_len, post_header_len;
1577 1578
  Log_event::Byte *start;
  const Log_event::Byte *end;
1579
  bool catalog_nz= 1;
1580 1581 1582
  DBUG_ENTER("Query_log_event::Query_log_event(char*,...)");

  common_header_len= description_event->common_header_len;
1583
  post_header_len= description_event->post_header_len[event_type-1];
1584
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598
                     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);
1599
  db_len = (uint)buf[Q_DB_LEN_OFFSET]; // TODO: add a check of all *_len vars
1600 1601 1602 1603 1604 1605 1606 1607 1608
  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)
1609
  {
1610 1611 1612 1613 1614
    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;
1615
  }
1616 1617 1618 1619 1620 1621
  /*
    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...)
  */

1622 1623
  /* variable-part: the status vars; only in MySQL 5.0  */
  
1624 1625 1626
  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;)
1627
  {
1628 1629 1630 1631
    switch (*pos++) {
    case Q_FLAGS2_CODE:
      flags2_inited= 1;
      flags2= uint4korr(pos);
1632
      DBUG_PRINT("info",("In Query_log_event, read flags2: %lu", (ulong) flags2));
1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646
      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;
    }
1647
    case Q_CATALOG_NZ_CODE:
1648
      get_str_len_and_pointer(&pos, &catalog, &catalog_len);
1649 1650 1651 1652 1653 1654
      break;
    case Q_AUTO_INCREMENT:
      auto_increment_increment= uint2korr(pos);
      auto_increment_offset=    uint2korr(pos+2);
      pos+= 4;
      break;
1655 1656 1657 1658 1659 1660 1661
    case Q_CHARSET_CODE:
    {
      charset_inited= 1;
      memcpy(charset, pos, 6);
      pos+= 6;
      break;
    }
1662 1663
    case Q_TIME_ZONE_CODE:
    {
1664
      get_str_len_and_pointer(&pos, &time_zone_str, &time_zone_len);
1665 1666
      break;
    }
1667 1668 1669 1670 1671 1672
    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;
1673 1674 1675 1676
    case Q_LC_TIME_NAMES_CODE:
      lc_time_names_number= uint2korr(pos);
      pos+= 2;
      break;
1677 1678 1679 1680
    case Q_CHARSET_DATABASE_CODE:
      charset_database_number= uint2korr(pos);
      pos+= 2;
      break;
1681 1682 1683 1684
    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)));
1685
      pos= (const uchar*) end;                         // Break loop
1686
    }
1687
  }
1688
  
1689
#if !defined(MYSQL_CLIENT) && defined(HAVE_QUERY_CACHE)
1690 1691 1692 1693 1694 1695
  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))))
1696
#else
1697 1698 1699 1700
  if (!(start= data_buf = (Log_event::Byte*) my_malloc(catalog_len + 1 +
                                             time_zone_len + 1 +
                                             data_len + 1,
                                             MYF(MY_WME))))
1701
#endif
1702
      DBUG_VOID_RETURN;
1703
  if (catalog_len)                                  // If catalog is given
1704
  {
1705
    if (likely(catalog_nz)) // true except if event comes from 5.0.0|1|2|3.
1706
      copy_str_and_move(&catalog, &start, catalog_len);
1707 1708 1709
    else
    {
      memcpy(start, catalog, catalog_len+1); // copy end 0
1710
      catalog= (const char *)start;
1711 1712
      start+= catalog_len+1;
    }
1713
  }
1714
  if (time_zone_len)
1715
    copy_str_and_move(&time_zone_str, &start, time_zone_len);
1716

1717
  /* A 2nd variable part; this is common to all versions */ 
1718
  memcpy((char*) start, end, data_len);          // Copy db and query
1719
  start[data_len]= '\0';              // End query with \0 (For safetly)
1720 1721
  db= (char *)start;
  query= (char *)(start + db_len + 1);
1722 1723
  q_len= data_len - db_len -1;
  DBUG_VOID_RETURN;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1724 1725
}

1726

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1727
/*
1728
  Query_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1729
*/
1730

1731
#ifdef MYSQL_CLIENT
1732
void Query_log_event::print_query_header(IO_CACHE* file,
1733
					 PRINT_EVENT_INFO* print_event_info)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1734
{
1735
  // TODO: print the catalog ??
1736
  char buff[40],*end;				// Enough for SET TIMESTAMP
1737 1738 1739
  bool different_db= 1;
  uint32 tmp;

1740
  if (!print_event_info->short_form)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1741
  {
1742 1743 1744 1745
    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
1746 1747
  }

monty@mysql.com's avatar
monty@mysql.com committed
1748
  if (!(flags & LOG_EVENT_SUPPRESS_USE_F) && db)
1749
  {
1750 1751
    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
1752
    if (db[0] && different_db) 
1753
      my_b_printf(file, "use %s%s\n", db, print_event_info->delimiter);
1754
  }
1755

1756
  end=int10_to_str((long) when, strmov(buff,"SET TIMESTAMP="),10);
1757
  end= strmov(end, print_event_info->delimiter);
1758
  *end++='\n';
1759
  my_b_write(file, (byte*) buff, (uint) (end-buff));
1760
  if (flags & LOG_EVENT_THREAD_SPECIFIC_F)
1761 1762
    my_b_printf(file,"SET @@session.pseudo_thread_id=%lu%s\n",
                (ulong)thread_id, print_event_info->delimiter);
1763

1764
  /*
1765 1766 1767
    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).
1768 1769 1770 1771
  */
  if (likely(flags2_inited)) /* likely as this will mainly read 5.0 logs */
  {
    /* tmp is a bitmask of bits which have changed. */
1772
    if (likely(print_event_info->flags2_inited)) 
1773
      /* All bits which have changed */
1774
      tmp= (print_event_info->flags2) ^ flags2;
1775 1776
    else /* that's the first Query event we read */
    {
1777
      print_event_info->flags2_inited= 1;
1778 1779 1780 1781 1782 1783
      tmp= ~((uint32)0); /* all bits have changed */
    }

    if (unlikely(tmp)) /* some bits have changed */
    {
      bool need_comma= 0;
1784
      my_b_printf(file, "SET ");
1785 1786 1787 1788 1789 1790
      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);
1791
      my_b_printf(file,"%s\n", print_event_info->delimiter);
1792
      print_event_info->flags2= flags2;
1793 1794 1795 1796
    }
  }

  /*
1797 1798 1799 1800 1801 1802 1803 1804 1805 1806
    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.
1807 1808 1809 1810
  */

  if (likely(sql_mode_inited))
  {
1811
    if (unlikely(!print_event_info->sql_mode_inited)) /* first Query event */
1812
    {
1813
      print_event_info->sql_mode_inited= 1;
1814
      /* force a difference to force write */
1815
      print_event_info->sql_mode= ~sql_mode;
1816
    }
1817
    if (unlikely(print_event_info->sql_mode != sql_mode))
1818
    {
1819 1820
      my_b_printf(file,"SET @@session.sql_mode=%lu%s\n",
                  (ulong)sql_mode, print_event_info->delimiter);
1821
      print_event_info->sql_mode= sql_mode;
1822 1823
    }
  }
1824 1825
  if (print_event_info->auto_increment_increment != auto_increment_increment ||
      print_event_info->auto_increment_offset != auto_increment_offset)
1826
  {
1827 1828 1829
    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);
1830 1831
    print_event_info->auto_increment_increment= auto_increment_increment;
    print_event_info->auto_increment_offset=    auto_increment_offset;
1832 1833
  }

1834 1835
  /* TODO: print the catalog when we feature SET CATALOG */

1836 1837
  if (likely(charset_inited))
  {
1838
    if (unlikely(!print_event_info->charset_inited)) /* first Query event */
1839
    {
1840 1841
      print_event_info->charset_inited= 1;
      print_event_info->charset[0]= ~charset[0]; // force a difference to force write
1842
    }
1843
    if (unlikely(bcmp(print_event_info->charset, charset, 6)))
1844
    {
1845 1846 1847
      CHARSET_INFO *cs_info= get_charset(uint2korr(charset), MYF(MY_WME));
      if (cs_info)
      {
1848
        /* for mysql client */
1849 1850
        my_b_printf(file, "/*!\\C %s */%s\n",
                    cs_info->csname, print_event_info->delimiter);
1851
      }
1852 1853 1854 1855
      my_b_printf(file,"SET "
                  "@@session.character_set_client=%d,"
                  "@@session.collation_connection=%d,"
                  "@@session.collation_server=%d"
1856
                  "%s\n",
1857 1858
                  uint2korr(charset),
                  uint2korr(charset+2),
1859 1860
                  uint2korr(charset+4),
                  print_event_info->delimiter);
1861
      memcpy(print_event_info->charset, charset, 6);
1862 1863
    }
  }
1864 1865
  if (time_zone_len)
  {
1866
    if (bcmp(print_event_info->time_zone_str, time_zone_str, time_zone_len+1))
1867
    {
1868 1869
      my_b_printf(file,"SET @@session.time_zone='%s'%s\n",
                  time_zone_str, print_event_info->delimiter);
1870
      memcpy(print_event_info->time_zone_str, time_zone_str, time_zone_len+1);
1871 1872
    }
  }
1873 1874
  if (lc_time_names_number != print_event_info->lc_time_names_number)
  {
bar@mysql.com's avatar
bar@mysql.com committed
1875 1876
    my_b_printf(file, "SET @@session.lc_time_names=%d%s\n",
                lc_time_names_number, print_event_info->delimiter);
1877 1878
    print_event_info->lc_time_names_number= lc_time_names_number;
  }
1879 1880 1881
  if (charset_database_number != print_event_info->charset_database_number)
  {
    if (charset_database_number)
bar@mysql.com's avatar
bar@mysql.com committed
1882 1883
      my_b_printf(file, "SET @@session.collation_database=%d%s\n",
                  charset_database_number, print_event_info->delimiter);
1884
    else
bar@mysql.com's avatar
bar@mysql.com committed
1885 1886
      my_b_printf(file, "SET @@session.collation_database=DEFAULT%s\n",
                  print_event_info->delimiter);
1887 1888
    print_event_info->charset_database_number= charset_database_number;
  }
1889 1890
}

1891

1892
void Query_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
1893
{
1894 1895 1896 1897
  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);
1898
  my_b_printf(&cache, "%s\n", print_event_info->delimiter);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1899
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1900
#endif /* MYSQL_CLIENT */
1901

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

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1903
/*
1904
  Query_log_event::do_apply_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1905
*/
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1906

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

1909
int Query_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
1910
{
1911
  return do_apply_event(rli, query, q_len);
1912 1913 1914
}


1915
int Query_log_event::do_apply_event(RELAY_LOG_INFO const *rli,
1916
                                      const char *query_arg, uint32 q_len_arg)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
1917
{
1918
  LEX_STRING new_db;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1919
  int expected_error,actual_error= 0;
1920
  /*
1921 1922 1923
    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
1924
    Query_log_event::do_apply_event()). Same for thd->db.  Thank
1925
    you.
1926
  */
1927
  thd->catalog= catalog_len ? (char *) catalog : (char *)"";
1928 1929 1930
  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' */
1931 1932
  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
1933

1934
  /*
1935 1936 1937 1938 1939 1940 1941 1942
    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.
1943
  */
1944
  const_cast<RELAY_LOG_INFO*>(rli)->future_group_master_log_pos= log_pos;
1945 1946
  DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));

1947 1948
  clear_all_errors(thd, const_cast<RELAY_LOG_INFO*>(rli));
  const_cast<RELAY_LOG_INFO*>(rli)->clear_tables_to_lock();
1949

lars@mysql.com's avatar
lars@mysql.com committed
1950 1951 1952 1953 1954 1955 1956
  /*
    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
1957
            ::do_apply_event(), then the companion SET also have so
1958
            we don't need to reset_one_shot_variables().
lars@mysql.com's avatar
lars@mysql.com committed
1959
  */
1960
  if (rpl_filter->db_ok(thd->db))
1961 1962
  {
    thd->set_time((time_t)when);
1963 1964
    thd->query_length= q_len_arg;
    thd->query= (char*)query_arg;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1965
    VOID(pthread_mutex_lock(&LOCK_thread_count));
1966
    thd->query_id = next_query_id();
1967
    VOID(pthread_mutex_unlock(&LOCK_thread_count));
1968
    thd->variables.pseudo_thread_id= thread_id;		// for temp tables
monty@mysql.com's avatar
monty@mysql.com committed
1969
    DBUG_PRINT("query",("%s",thd->query));
1970

monty@mysql.com's avatar
monty@mysql.com committed
1971
    if (ignored_error_code((expected_error= error_code)) ||
1972
	!check_expected_error(thd,rli,expected_error))
1973 1974 1975
    {
      if (flags2_inited)
        /*
1976 1977
          all bits of thd->options which are 1 in OPTIONS_WRITTEN_TO_BIN_LOG
          must take their value from flags2.
1978
        */
1979
        thd->options= flags2|(thd->options & ~OPTIONS_WRITTEN_TO_BIN_LOG);
1980 1981
      /*
        else, we are in a 3.23/4.0 binlog; we previously received a
1982 1983
        Rotate_log_event which reset thd->options and sql_mode etc, so
        nothing to do.
1984 1985 1986 1987 1988
      */
      /*
        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
1989 1990 1991
        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).
1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008 2009
      */
      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))))
          {
            /*
2010 2011 2012 2013
              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).
2014
            */
2015
            set_slave_thread_default_charset(thd, rli);
2016 2017 2018 2019 2020
            goto compare_errors;
          }
          thd->update_charset(); // for the charset change to take effect
        }
      }
2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031
      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;
        }
      }
2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044
      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;
2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059
      if (charset_database_number)
      {
        CHARSET_INFO *cs;
        if (!(cs= get_charset(charset_database_number, MYF(0))))
        {
          char buf[20];
          int10_to_str((int) charset_database_number, buf, -10);
          my_error(ER_UNKNOWN_COLLATION, MYF(0), buf);
          goto compare_errors;
        }
        thd->variables.collation_database= cs;
      }
      else
        thd->variables.collation_database= thd->db_charset;
      
2060
      /* Execute the query (note that we bypass dispatch_command()) */
2061
      mysql_parse(thd, thd->query, thd->query_length);
2062 2063

    }
monty@mysql.com's avatar
monty@mysql.com committed
2064 2065
    else
    {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2066
      /*
monty@mysql.com's avatar
monty@mysql.com committed
2067 2068 2069 2070 2071
        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
2072
      */
2073
      if (mysql_test_parse_for_slave(thd, thd->query, thd->query_length))
2074
        clear_all_errors(thd, const_cast<RELAY_LOG_INFO*>(rli)); /* Can ignore query */
monty@mysql.com's avatar
monty@mysql.com committed
2075
      else
2076
      {
2077
        slave_print_msg(ERROR_LEVEL, rli, expected_error, 
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2078
                          "\
monty@mysql.com's avatar
monty@mysql.com committed
2079
Query partially completed on the master (error on master: %d) \
monty@mysql.com's avatar
monty@mysql.com committed
2080 2081 2082
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
2083
START SLAVE; . Query: '%s'", expected_error, thd->query);
monty@mysql.com's avatar
monty@mysql.com committed
2084 2085 2086 2087
        thd->query_error= 1;
      }
      goto end;
    }
2088

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

2093
compare_errors:
lars@mysql.com's avatar
lars@mysql.com committed
2094 2095

     /*
monty@mysql.com's avatar
monty@mysql.com committed
2096 2097 2098 2099
      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",
2100
 		       expected_error, thd->net.last_errno));
monty@mysql.com's avatar
monty@mysql.com committed
2101
    if ((expected_error != (actual_error= thd->net.last_errno)) &&
2102 2103 2104
 	expected_error &&
 	!ignored_error_code(actual_error) &&
 	!ignored_error_code(expected_error))
monty@mysql.com's avatar
monty@mysql.com committed
2105
    {
2106 2107 2108
      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
2109
Error on master: '%s' (%d), Error on slave: '%s' (%d). \
monty@mysql.com's avatar
monty@mysql.com committed
2110
Default database: '%s'. Query: '%s'",
2111 2112 2113 2114 2115
                      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
2116 2117 2118 2119 2120 2121
      thd->query_error= 1;
    }
    /*
      If we get the same error code as expected, or they should be ignored. 
    */
    else if (expected_error == actual_error ||
2122
 	     ignored_error_code(actual_error))
monty@mysql.com's avatar
monty@mysql.com committed
2123 2124
    {
      DBUG_PRINT("info",("error ignored"));
2125
      clear_all_errors(thd, const_cast<RELAY_LOG_INFO*>(rli));
monty@mysql.com's avatar
monty@mysql.com committed
2126 2127 2128
    }
    /*
      Other cases: mostly we expected no error and get one.
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2129
    */
monty@mysql.com's avatar
monty@mysql.com committed
2130 2131
    else if (thd->query_error || thd->is_fatal_error)
    {
2132 2133 2134 2135 2136
      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
2137 2138
      thd->query_error= 1;
    }
2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152

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

2154 2155 2156 2157 2158 2159 2160
      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
2161 2162
  } /* End of if (db_ok(... */

monty@mysql.com's avatar
monty@mysql.com committed
2163
end:
2164
  VOID(pthread_mutex_lock(&LOCK_thread_count));
2165 2166 2167 2168 2169 2170
  /*
    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
2171 2172 2173
    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.
2174
  */
2175
  thd->catalog= 0;
2176
  thd->set_db(NULL, 0);                 /* will free the current database */
2177
  thd->query= 0;			// just to be sure
2178
  thd->query_length= 0;
2179
  VOID(pthread_mutex_unlock(&LOCK_thread_count));
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2180
  close_thread_tables(thd);      
2181 2182 2183 2184 2185 2186 2187 2188 2189 2190
  /*
    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;
2191
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
2192 2193 2194 2195 2196
  return thd->query_error;
}

int Query_log_event::do_update_pos(RELAY_LOG_INFO *rli)
{
2197
  /*
2198 2199 2200
    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.
2201
  */
2202 2203 2204 2205 2206 2207 2208
  if (thd->one_shot_set)
  {
    rli->inc_event_relay_log_pos();
    return 0;
  }
  else
    return Log_event::do_update_pos(rli);
2209
}
2210 2211


hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2212
#endif
2213

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

2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229
/**************************************************************************
	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
2230
/**************************************************************************
2231
	Start_log_event_v3 methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2232
**************************************************************************/
2233

2234 2235 2236 2237 2238 2239 2240 2241
#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
2242
/*
2243
  Start_log_event_v3::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2244
*/
2245

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2246
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2247
void Start_log_event_v3::pack_info(Protocol *protocol)
nick@mysql.com's avatar
nick@mysql.com committed
2248
{
2249 2250 2251 2252
  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
2253 2254
  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
2255
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2256
#endif
2257 2258


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2259
/*
2260
  Start_log_event_v3::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2261
*/
nick@mysql.com's avatar
nick@mysql.com committed
2262 2263

#ifdef MYSQL_CLIENT
2264
void Start_log_event_v3::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
nick@mysql.com's avatar
nick@mysql.com committed
2265
{
2266 2267 2268 2269 2270
  DBUG_ENTER("Start_log_event_v3::print");

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

2271
  if (!print_event_info->short_form)
2272
  {
2273 2274 2275 2276
    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);
2277
    if (created)
2278 2279
      my_b_printf(&cache," at startup");
    my_b_printf(&cache, "\n");
2280
    if (flags & LOG_EVENT_BINLOG_IN_USE_F)
2281 2282
      my_b_printf(&cache, "# Warning: this binlog was not closed properly. "
                  "Most probably mysqld crashed writing it.\n");
2283
  }
2284 2285
  if (!artificial_event && created)
  {
2286
#ifdef WHEN_WE_HAVE_THE_RESET_CONNECTION_SQL_COMMAND
2287 2288 2289 2290 2291 2292
    /*
      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).
    */
2293
    my_b_printf(&cache,"RESET CONNECTION%s\n", print_event_info->delimiter);
2294
#else
2295
    my_b_printf(&cache,"ROLLBACK%s\n", print_event_info->delimiter);
2296
#endif
2297
  }
2298
  DBUG_VOID_RETURN;
nick@mysql.com's avatar
nick@mysql.com committed
2299
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2300
#endif /* MYSQL_CLIENT */
bk@work.mysql.com's avatar
bk@work.mysql.com committed
2301

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2302
/*
2303
  Start_log_event_v3::Start_log_event_v3()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2304
*/
2305

2306 2307 2308
Start_log_event_v3::Start_log_event_v3(const char* buf,
                                       const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
2309
{
2310 2311
  buf+= description_event->common_header_len;
  binlog_version= uint2korr(buf+ST_BINLOG_VER_OFFSET);
2312 2313
  memcpy(server_version, buf+ST_SERVER_VER_OFFSET,
	 ST_SERVER_VER_LEN);
guilhem@gbichot3.local's avatar
guilhem@gbichot3.local committed
2314 2315
  // prevent overrun if log is corrupted on disk
  server_version[ST_SERVER_VER_LEN-1]= 0;
2316 2317 2318
  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
2319 2320
}

2321

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2322
/*
2323
  Start_log_event_v3::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2324
*/
2325

2326
#ifndef MYSQL_CLIENT
2327
bool Start_log_event_v3::write(IO_CACHE* file)
2328
{
2329
  char buff[START_V3_HEADER_LEN];
2330 2331 2332
  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);
2333 2334
  return (write_header(file, sizeof(buff)) ||
          my_b_safe_write(file, (byte*) buff, sizeof(buff)));
2335
}
2336
#endif
2337

2338

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2339
/*
2340
  Start_log_event_v3::do_apply_event()
2341 2342 2343 2344

  The master started

  IMPLEMENTATION
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2345 2346 2347 2348
    - 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).
2349 2350

  TODO
2351 2352 2353 2354 2355
    - 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
2356 2357
*/

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2358
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2359
int Start_log_event_v3::do_apply_event(RELAY_LOG_INFO const *rli)
2360
{
2361
  DBUG_ENTER("Start_log_event_v3::do_apply_event");
2362
  switch (binlog_version)
2363 2364 2365 2366 2367 2368 2369 2370
  {
  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
2371
    */
2372 2373 2374 2375 2376
    if (created)
    {
      close_temporary_tables(thd);
      cleanup_load_tmpdir();
    }
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2377 2378
    break;

2379
    /*
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2380 2381
       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
2382
    */
2383
  case 1:
2384
    if (strncmp(rli->relay_log.description_event_for_exec->server_version,
2385 2386 2387 2388 2389 2390 2391 2392
                "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
2393
    /*
2394 2395 2396
      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
2397 2398 2399 2400
    */
    break;
  default:
    /* this case is impossible */
2401
    DBUG_RETURN(1);
nick@mysql.com's avatar
nick@mysql.com committed
2402
  }
2403
  DBUG_RETURN(0);
2404
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2405
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
2406

2407 2408 2409 2410 2411 2412 2413 2414 2415
/***************************************************************************
       Format_description_log_event methods
****************************************************************************/

/*
  Format_description_log_event 1st ctor.

  SYNOPSIS
    Format_description_log_event::Format_description_log_event
2416
      binlog_version              the binlog version for which we want to build
2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430
                                  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::
2431
Format_description_log_event(uint8 binlog_ver, const char* server_ver)
2432 2433 2434 2435 2436 2437 2438
  :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
2439 2440
    DBUG_EXECUTE_IF("pretend_version_50034_in_binlog",
                    strmov(server_version, "5.0.34"););
2441 2442 2443 2444
    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),
2445
                                       MYF(MY_ZEROFILL));
2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462
    /*
      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;
2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481
      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;);
2482 2483
      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;
2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497
    }
    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 :
2498
      LOG_EVENT_MINIMAL_HEADER_LEN;
2499 2500 2501 2502 2503 2504 2505 2506 2507
    /*
      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),
2508
                                       MYF(0));
2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530
    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
2531
  calc_server_version_split();
2532 2533 2534 2535 2536 2537 2538 2539
}


/*
  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
2540
  post-header starts.
2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554 2555
  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*
2556
                             description_event)
2557 2558 2559 2560 2561 2562 2563 2564 2565
  :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",
2566
                      common_header_len, number_of_event_types));
2567 2568 2569
  /* 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*
2570
                                      sizeof(*post_header_len), MYF(0));
guilhem@gbichot3.local's avatar
guilhem@gbichot3.local committed
2571
  calc_server_version_split();
2572 2573 2574
  DBUG_VOID_RETURN;
}

2575
#ifndef MYSQL_CLIENT
2576 2577 2578 2579 2580 2581 2582 2583 2584 2585
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);
2586
  buff[ST_COMMON_HEADER_LEN_OFFSET]= LOG_EVENT_HEADER_LEN;
2587 2588 2589 2590 2591
  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)));
}
2592
#endif
2593

2594
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2595
int Format_description_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
2596
{
2597
  DBUG_ENTER("Format_description_log_event::do_apply_event");
2598

serg@serg.mylan's avatar
serg@serg.mylan committed
2599
#ifdef USING_TRANSACTIONS
2600 2601 2602 2603
  /*
    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
2604 2605
    flushing the binlog cache to the binlog. XA guarantees that master has
    rolled back. So we roll back.
2606 2607 2608 2609 2610 2611 2612
    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)
  {
2613 2614 2615 2616 2617 2618
    /* 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."); 
2619
    const_cast<RELAY_LOG_INFO*>(rli)->cleanup_context(thd, 1);
2620
  }
serg@serg.mylan's avatar
serg@serg.mylan committed
2621
#endif
2622
  /*
2623
    If this event comes from ourselves, there is no cleaning task to
2624
    perform, we don't call Start_log_event_v3::do_apply_event()
2625
    (this was just to update the log's description event).
2626
  */
2627 2628 2629 2630 2631 2632 2633 2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644 2645 2646 2647 2648
  if (server_id != (uint32) ::server_id)
  {
    /*
      If the event was not requested by the slave i.e. the master sent
      it while the slave asked for a position >4, the event will make
      rli->group_master_log_pos advance. Say that the slave asked for
      position 1000, and the Format_desc event's end is 96. Then in
      the beginning of replication rli->group_master_log_pos will be
      0, then 96, then jump to first really asked event (which is
      >96). So this is ok.
    */
    DBUG_RETURN(Start_log_event_v3::do_apply_event(rli));
  }
  DBUG_RETURN(0);
}

int Format_description_log_event::do_update_pos(RELAY_LOG_INFO *rli)
{
  /* save the information describing this binlog */
  delete rli->relay_log.description_event_for_exec;
  rli->relay_log.description_event_for_exec= this;

2649 2650 2651
  if (server_id == (uint32) ::server_id)
  {
    /*
2652 2653 2654 2655 2656 2657 2658 2659 2660 2661 2662 2663 2664
      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();
2665
    return 0;
2666
  }
2667 2668 2669
  else
  {
    return Log_event::do_update_pos(rli);
2670 2671 2672
  }
}

2673
Log_event::enum_skip_reason
2674
Format_description_log_event::do_shall_skip(RELAY_LOG_INFO *rli)
2675
{
2676
  return Log_event::EVENT_SKIP_NOT;
2677
}
2678

2679 2680
#endif

guilhem@gbichot3.local's avatar
guilhem@gbichot3.local committed
2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711

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


2712
  /**************************************************************************
2713
        Load_log_event methods
2714
   General note about Load_log_event: the binlogging of LOAD DATA INFILE is
2715
   going to be changed in 5.0 (or maybe in 5.1; not decided yet).
2716 2717 2718 2719 2720 2721 2722 2723 2724 2725 2726 2727
   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).
  **************************************************************************/
2728

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2729
/*
2730
  Load_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2731
*/
2732

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2733
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
2734
uint Load_log_event::get_query_buffer_length()
2735
{
2736
  return
2737 2738
    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
2739
    7 +					    // LOCAL
2740
    9 +                                     // " REPLACE or IGNORE "
2741
    13 + table_name_len*2 +                 // "INTO TABLE `table`"
2742 2743 2744 2745
    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'"
2746 2747
    19 + sql_ex.line_start_len*4 + 2 +      // " LINES STARTING BY 'str'"
    15 + 22 +                               // " IGNORE xxx  LINES"
2748
    3 + (num_fields-1)*2 + field_block_len; // " (field1, field2, ...)"
2749
}
2750

2751 2752 2753 2754 2755 2756 2757

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)
2758
  {
2759 2760
    pos= strmov(pos, "use `");
    memcpy(pos, db, db_len);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2761
    pos= strmov(pos+db_len, "`; ");
2762
  }
2763

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2764
  pos= strmov(pos, "LOAD DATA ");
2765 2766 2767 2768

  if (fn_start)
    *fn_start= pos;

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2769 2770 2771
  if (check_fname_outside_temp_buf())
    pos= strmov(pos, "LOCAL ");
  pos= strmov(pos, "INFILE '");
2772
  memcpy(pos, fname, fname_len);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2773
  pos= strmov(pos+fname_len, "' ");
2774

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2775
  if (sql_ex.opt_flags & REPLACE_FLAG)
2776
    pos= strmov(pos, " REPLACE ");
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2777
  else if (sql_ex.opt_flags & IGNORE_FLAG)
2778 2779
    pos= strmov(pos, " IGNORE ");

2780 2781 2782 2783 2784 2785
  pos= strmov(pos ,"INTO");

  if (fn_end)
    *fn_end= pos;

  pos= strmov(pos ," TABLE `");
2786 2787 2788
  memcpy(pos, table_name, table_name_len);
  pos+= table_name_len;

monty@mysql.com's avatar
monty@mysql.com committed
2789
  /* We have to create all optinal fields as the default is not empty */
2790
  pos= strmov(pos, "` FIELDS TERMINATED BY ");
monty@mysql.com's avatar
monty@mysql.com committed
2791 2792 2793 2794 2795
  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);
2796

monty@mysql.com's avatar
monty@mysql.com committed
2797 2798
  pos= strmov(pos, " ESCAPED BY ");
  pos= pretty_print_str(pos, sql_ex.escaped, sql_ex.escaped_len);
2799

monty@mysql.com's avatar
monty@mysql.com committed
2800 2801
  pos= strmov(pos, " LINES TERMINATED BY ");
  pos= pretty_print_str(pos, sql_ex.line_term, sql_ex.line_term_len);
2802 2803
  if (sql_ex.line_start_len)
  {
2804
    pos= strmov(pos, " STARTING BY ");
2805
    pos= pretty_print_str(pos, sql_ex.line_start, sql_ex.line_start_len);
2806
  }
2807

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2808
  if ((long) skip_lines > 0)
2809 2810
  {
    pos= strmov(pos, " IGNORE ");
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2811
    pos= longlong10_to_str((longlong) skip_lines, pos, 10);
2812 2813
    pos= strmov(pos," LINES ");    
  }
2814 2815 2816 2817

  if (num_fields)
  {
    uint i;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2818
    const char *field= fields;
2819
    pos= strmov(pos, " (");
2820 2821 2822
    for (i = 0; i < num_fields; i++)
    {
      if (i)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2823 2824 2825 2826
      {
        *pos++= ' ';
        *pos++= ',';
      }
2827
      memcpy(pos, field, field_lens[i]);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2828 2829
      pos+=   field_lens[i];
      field+= field_lens[i]  + 1;
2830
    }
2831
    *pos++= ')';
2832
  }
2833

2834 2835 2836 2837 2838 2839 2840 2841 2842 2843 2844 2845
  *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
2846
  my_free(buf, MYF(0));
2847
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2848
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
2849

2850

2851 2852
#ifndef MYSQL_CLIENT

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2853
/*
2854
  Load_log_event::write_data_header()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2855
*/
2856

2857
bool Load_log_event::write_data_header(IO_CACHE* file)
2858
{
2859
  char buf[LOAD_HEADER_LEN];
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2860
  int4store(buf + L_THREAD_ID_OFFSET, slave_proxy_id);
2861 2862 2863 2864 2865
  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);
2866
  return my_b_safe_write(file, (byte*)buf, LOAD_HEADER_LEN) != 0;
2867
}
2868

2869

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2870
/*
2871
  Load_log_event::write_data_body()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2872
*/
2873

2874
bool Load_log_event::write_data_body(IO_CACHE* file)
2875
{
2876 2877 2878
  if (sql_ex.write_data(file))
    return 1;
  if (num_fields && fields && field_lens)
2879
  {
2880 2881 2882
    if (my_b_safe_write(file, (byte*)field_lens, num_fields) ||
	my_b_safe_write(file, (byte*)fields, field_block_len))
      return 1;
2883
  }
2884 2885 2886
  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));
2887 2888
}

2889

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2890
/*
2891
  Load_log_event::Load_log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2892
*/
2893

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2894 2895 2896
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,
2897
			       enum enum_duplicates handle_dup,
2898
			       bool ignore, bool using_trans)
2899 2900 2901
  :Log_event(thd_arg, !thd_arg->tmp_table_used ?
	     0 : LOG_EVENT_THREAD_SPECIFIC_F, using_trans),
   thread_id(thd_arg->thread_id),
2902
   slave_proxy_id(thd_arg->variables.pseudo_thread_id),
guilhem@mysql.com's avatar
guilhem@mysql.com committed
2903 2904
   num_fields(0),fields(0),
   field_lens(0),field_block_len(0),
2905
   table_name(table_name_arg ? table_name_arg : ""),
2906
   db(db_arg), fname(ex->file_name), local_fname(FALSE)
2907 2908 2909
{
  time_t end_time;
  time(&end_time);
2910
  exec_time = (ulong) (end_time  - thd_arg->start_time);
2911 2912 2913
  /* db can never be a zero pointer in 4.0 */
  db_len = (uint32) strlen(db);
  table_name_len = (uint32) strlen(table_name);
2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926
  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;
2927
    
2928
  if (ex->dumpfile)
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2929
    sql_ex.opt_flags|= DUMPFILE_FLAG;
2930
  if (ex->opt_enclosed)
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2931
    sql_ex.opt_flags|= OPT_ENCLOSED_FLAG;
2932

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2933
  sql_ex.empty_flags= 0;
2934

2935
  switch (handle_dup) {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2936
  case DUP_REPLACE:
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2937
    sql_ex.opt_flags|= REPLACE_FLAG;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2938 2939 2940 2941
    break;
  case DUP_UPDATE:				// Impossible here
  case DUP_ERROR:
    break;	
2942
  }
2943 2944
  if (ignore)
    sql_ex.opt_flags|= IGNORE_FLAG;
2945

2946 2947 2948 2949 2950 2951 2952 2953 2954 2955
  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;
2956
    
2957
  skip_lines = ex->skip_lines;
2958

2959 2960 2961 2962 2963 2964 2965 2966 2967 2968 2969
  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);
2970 2971
  }

2972 2973 2974
  field_lens = (const uchar*)field_lens_buf.ptr();
  fields = fields_buf.ptr();
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2975
#endif /* !MYSQL_CLIENT */
2976

2977

2978
/*
2979
  Load_log_event::Load_log_event()
2980

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
2981 2982 2983
  NOTE
    The caller must do buf[event_len] = 0 before he starts using the
    constructed event.
2984 2985
*/

2986 2987 2988 2989
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
2990
   table_name(0), db(0), fname(0), local_fname(FALSE)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
2991
{
monty@mysql.com's avatar
monty@mysql.com committed
2992
  DBUG_ENTER("Load_log_event");
2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004
  /*
    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
3005
  DBUG_VOID_RETURN;
3006 3007
}

3008

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3009
/*
3010
  Load_log_event::copy_log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3011
*/
3012

3013
int Load_log_event::copy_log_event(const char *buf, ulong event_len,
3014 3015
                                   int body_offset,
                                   const Format_description_log_event *description_event)
3016
{
3017
  DBUG_ENTER("Load_log_event::copy_log_event");
3018
  uint data_len;
3019
  char* buf_end = (char*)buf + event_len;
3020 3021
  /* 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
3022
  slave_proxy_id= thread_id= uint4korr(data_head + L_THREAD_ID_OFFSET);
3023 3024 3025 3026 3027
  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
3028
	  
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
3029
  if ((int) event_len < body_offset)
monty@mysql.com's avatar
monty@mysql.com committed
3030
    DBUG_RETURN(1);
3031 3032 3033 3034
  /*
    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.
  */
3035 3036 3037
  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
3038
    DBUG_RETURN(1);
3039
  
3040
  data_len = event_len - body_offset;
3041
  if (num_fields > data_len) // simple sanity check against corruption
monty@mysql.com's avatar
monty@mysql.com committed
3042
    DBUG_RETURN(1);
3043
  for (uint i = 0; i < num_fields; i++)
3044
    field_block_len += (uint)field_lens[i] + 1;
3045

bk@work.mysql.com's avatar
bk@work.mysql.com committed
3046 3047 3048 3049
  fields = (char*)field_lens + num_fields;
  table_name  = fields + field_block_len;
  db = table_name + table_name_len + 1;
  fname = db + db_len + 1;
3050 3051
  fname_len = strlen(fname);
  // null termination is accomplished by the caller doing buf[event_len]=0
3052

monty@mysql.com's avatar
monty@mysql.com committed
3053
  DBUG_RETURN(0);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3054 3055 3056
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3057
/*
3058
  Load_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3059
*/
3060 3061

#ifdef MYSQL_CLIENT
3062
void Load_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3063
{
3064
  print(file, print_event_info, 0);
3065 3066
}

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

3068
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
3069
			   bool commented)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3070
{
3071 3072
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

monty@mysql.com's avatar
monty@mysql.com committed
3073
  DBUG_ENTER("Load_log_event::print");
3074
  if (!print_event_info->short_form)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3075
  {
3076 3077 3078
    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
3079 3080
  }

3081
  bool different_db= 1;
3082
  if (db)
3083
  {
3084 3085 3086 3087 3088 3089
    /*
      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.
    */
3090
    if ((different_db= memcmp(print_event_info->db, db, db_len + 1)) &&
3091
        !commented)
3092
      memcpy(print_event_info->db, db, db_len + 1);
3093
  }
3094
  
3095
  if (db && db[0] && different_db)
3096
    my_b_printf(&cache, "%suse %s%s\n", 
3097
            commented ? "# " : "",
3098
            db, print_event_info->delimiter);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3099

3100
  if (flags & LOG_EVENT_THREAD_SPECIFIC_F)
3101
    my_b_printf(&cache,"%sSET @@session.pseudo_thread_id=%lu%s\n",
3102 3103
            commented ? "# " : "", (ulong)thread_id,
            print_event_info->delimiter);
3104
  my_b_printf(&cache, "%sLOAD DATA ",
3105
              commented ? "# " : "");
3106
  if (check_fname_outside_temp_buf())
3107 3108
    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
3109

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3110
  if (sql_ex.opt_flags & REPLACE_FLAG)
3111
    my_b_printf(&cache," REPLACE ");
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3112
  else if (sql_ex.opt_flags & IGNORE_FLAG)
3113
    my_b_printf(&cache," IGNORE ");
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3114
  
3115 3116 3117
  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
3118

monty@mysql.com's avatar
monty@mysql.com committed
3119
  if (sql_ex.opt_flags & OPT_ENCLOSED_FLAG)
3120 3121 3122
    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
3123
     
3124 3125
  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
3126
     
3127 3128
  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
3129

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

3131
  if (sql_ex.line_start)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3132
  {
3133 3134
    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
3135
  }
3136
  if ((long) skip_lines > 0)
3137
    my_b_printf(&cache, " IGNORE %ld LINES", (long) skip_lines);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3138

3139 3140 3141 3142
  if (num_fields)
  {
    uint i;
    const char* field = fields;
3143
    my_b_printf(&cache, " (");
3144
    for (i = 0; i < num_fields; i++)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3145
    {
3146
      if (i)
3147 3148
	my_b_printf(&cache, ",");
      my_b_printf(&cache, field);
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3149
	  
3150
      field += field_lens[i]  + 1;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3151
    }
3152
    my_b_printf(&cache, ")");
3153
  }
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3154

3155
  my_b_printf(&cache, "%s\n", print_event_info->delimiter);
monty@mysql.com's avatar
monty@mysql.com committed
3156
  DBUG_VOID_RETURN;
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3157
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3158
#endif /* MYSQL_CLIENT */
3159

3160

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3161
/*
3162
  Load_log_event::set_fields()
lars@mysql.com's avatar
lars@mysql.com committed
3163 3164 3165 3166 3167

  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
3168
*/
3169

3170
#ifndef MYSQL_CLIENT
lars@mysql.com's avatar
lars@mysql.com committed
3171
void Load_log_event::set_fields(const char* affected_db, 
3172 3173
				List<Item> &field_list,
                                Name_resolution_context *context)
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3174 3175
{
  uint i;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3176
  const char* field = fields;
3177
  for (i= 0; i < num_fields; i++)
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
3178
  {
3179 3180
    field_list.push_back(new Item_field(context,
                                        affected_db, table_name, field));
3181
    field+= field_lens[i]  + 1;
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
3182
  }
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3183
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3184
#endif /* !MYSQL_CLIENT */
bk@work.mysql.com's avatar
bk@work.mysql.com committed
3185 3186


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

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3191
  SYNOPSIS
3192
    Load_log_event::do_apply_event
3193 3194 3195
      net
      rli
      use_rli_only_for_errors	  - if set to 1, rli is provided to
3196
                                  Load_log_event::do_apply_event
3197 3198 3199 3200 3201 3202
                                  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
3203
                                  Execute_load_log_event::do_apply_event).
3204 3205 3206
                                  - if set to 0, rli is provided for
                                  full use, i.e. for error reports and
                                  position advancing.
3207

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3208 3209
  DESCRIPTION
    Does the data loading job when executing a LOAD DATA on the slave
3210

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3211
  RETURN VALUE
3212
    0           Success
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3213 3214
    1    	Failure
*/
3215

3216
int Load_log_event::do_apply_event(NET* net, RELAY_LOG_INFO const *rli,
3217
                                   bool use_rli_only_for_errors)
3218
{
3219 3220 3221 3222
  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);
3223
  DBUG_ASSERT(thd->query == 0);
monty@mysql.com's avatar
monty@mysql.com committed
3224
  thd->query_length= 0;                         // Should not be needed
monty@mysql.com's avatar
monty@mysql.com committed
3225
  thd->query_error= 0;
3226
  clear_all_errors(thd, const_cast<RELAY_LOG_INFO*>(rli));
3227

3228
  /* see Query_log_event::do_apply_event() and BUG#13360 */
3229
  DBUG_ASSERT(!rli->m_table_map.count());
3230 3231 3232 3233
  /*
    Usually mysql_init_query() is called by mysql_parse(), but we need it here
    as the present method does not call mysql_parse().
  */
3234
  mysql_init_query(thd, 0, 0);
monty@mysql.com's avatar
monty@mysql.com committed
3235
  if (!use_rli_only_for_errors)
3236
  {
3237 3238
    /*
      Saved for InnoDB, see comment in
3239
      Query_log_event::do_apply_event()
3240
    */
3241
    const_cast<RELAY_LOG_INFO*>(rli)->future_group_master_log_pos= log_pos;
3242
    DBUG_PRINT("info", ("log_pos: %lu", (ulong) log_pos));
3243
  }
3244 3245
 
   /*
3246 3247 3248 3249 3250 3251 3252
    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
3253
    done by testing rules in Create_file_log_event::do_apply_event()
3254 3255 3256
    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
3257 3258 3259 3260 3261 3262 3263 3264


    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
3265
            ::do_apply_event(), then the companion SET also have so
3266
            we don't need to reset_one_shot_variables().
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3267
  */
3268
  if (rpl_filter->db_ok(thd->db))
3269
  {
3270 3271
    thd->set_time((time_t)when);
    VOID(pthread_mutex_lock(&LOCK_thread_count));
3272
    thd->query_id = next_query_id();
3273
    VOID(pthread_mutex_unlock(&LOCK_thread_count));
3274 3275 3276 3277 3278 3279
    /*
      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
3280
    mysql_reset_errors(thd, 0);
3281 3282 3283

    TABLE_LIST tables;
    bzero((char*) &tables,sizeof(tables));
3284
    tables.db= thd->strmake(thd->db, thd->db_length);
3285
    tables.alias = tables.table_name = (char*) table_name;
3286
    tables.lock_type = TL_WRITE;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3287
    tables.updating= 1;
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
3288

3289
    // the table will be opened in mysql_load    
3290
    if (rpl_filter->is_on() && !rpl_filter->tables_ok(thd->db, &tables))
3291 3292 3293 3294 3295 3296 3297 3298
    {
      // 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];
3299
      char *end;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3300
      enum enum_duplicates handle_dup;
3301
      bool ignore= 0;
3302 3303
      char *load_data_query;

3304
      /*
3305 3306
        Forge LOAD DATA INFILE query which will be used in SHOW PROCESS LIST
        and written to slave's binlog if binlogging is on.
3307
      */
3308
      if (!(load_data_query= (char *)thd->alloc(get_query_buffer_length() + 1)))
3309
      {
3310 3311 3312 3313 3314
        /*
          This will set thd->fatal_error in case of OOM. So we surely will notice
          that something is wrong.
        */
        goto error;
3315
      }
3316 3317 3318 3319 3320 3321 3322

      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
3323
      if (sql_ex.opt_flags & REPLACE_FLAG)
3324
      {
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3325
	handle_dup= DUP_REPLACE;
3326
      }
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3327
      else if (sql_ex.opt_flags & IGNORE_FLAG)
3328 3329 3330 3331
      {
        ignore= 1;
        handle_dup= DUP_ERROR;
      }
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3332
      else
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3333
      {
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3334
        /*
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3335
	  When replication is running fine, if it was DUP_ERROR on the
3336
          master then we could choose IGNORE here, because if DUP_ERROR
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3337
          suceeded on master, and data is identical on the master and slave,
3338
          then there should be no uniqueness errors on slave, so IGNORE is
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3339
          the same as DUP_ERROR. But in the unlikely case of uniqueness errors
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3340 3341 3342
          (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
3343 3344

          If reading from net (a 3.23 master), mysql_load() will change this
3345
          to IGNORE.
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3346 3347
        */
        handle_dup= DUP_ERROR;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3348
      }
3349 3350 3351 3352 3353 3354 3355 3356 3357 3358
      /*
        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
3359

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3360
      sql_exchange ex((char*)fname, sql_ex.opt_flags & DUMPFILE_FLAG);
3361 3362 3363 3364 3365
      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
3366 3367 3368 3369 3370
      ex.field_term= &field_term;
      ex.enclosed= &enclosed;
      ex.line_term= &line_term;
      ex.line_start= &line_start;
      ex.escaped= &escaped;
3371 3372 3373 3374 3375 3376

      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
3377
      List<Item> field_list;
3378 3379
      thd->lex->select_lex.context.resolve_in_table_list_only(&tables);
      set_fields(tables.db, field_list, &thd->lex->select_lex.context);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3380
      thd->variables.pseudo_thread_id= thread_id;
3381 3382 3383 3384 3385 3386 3387 3388 3389
      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;
      }
3390
      /*
3391
        It is safe to use tmp_list twice because we are not going to
3392 3393
        update it inside mysql_load().
      */
3394 3395
      List<Item> tmp_list;
      if (mysql_load(thd, &ex, &tables, field_list, tmp_list, tmp_list,
3396
                     handle_dup, ignore, net != 0))
3397
        thd->query_error= 1;
3398
      if (thd->cuted_fields)
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3399
      {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3400
	/* log_pos is the position of the LOAD event in the master log */
lars@mysql.com's avatar
lars@mysql.com committed
3401 3402 3403 3404 3405 3406 3407
        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
3408
      }
3409 3410 3411
      if (net)
        net->pkt_nr= thd->net.pkt_nr;
    }
3412 3413
  }
  else
3414 3415 3416 3417 3418 3419 3420 3421 3422
  {
    /*
      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);
  }
3423 3424

error:
3425
  thd->net.vio = 0; 
3426
  const char *remember_db= thd->db;
3427
  VOID(pthread_mutex_lock(&LOCK_thread_count));
3428
  thd->catalog= 0;
3429
  thd->set_db(NULL, 0);                   /* will free the current database */
3430
  thd->query= 0;
3431
  thd->query_length= 0;
3432
  VOID(pthread_mutex_unlock(&LOCK_thread_count));
3433 3434 3435
  close_thread_tables(thd);
  if (thd->query_error)
  {
3436
    /* this err/sql_errno code is copy-paste from net_send_error() */
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3437 3438 3439 3440 3441 3442 3443 3444 3445
    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);       
    }
3446
    slave_print_msg(ERROR_LEVEL, rli, sql_errno,"\
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3447
Error '%s' running LOAD DATA INFILE on table '%s'. Default database: '%s'",
3448
                    err, (char*)table_name, print_slave_db_safe(remember_db));
3449
    free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
3450 3451
    return 1;
  }
3452
  free_root(thd->mem_root,MYF(MY_KEEP_PREALLOC));
3453
	    
3454
  if (thd->is_fatal_error)
3455
  {
3456
    slave_print_msg(ERROR_LEVEL, rli, ER_UNKNOWN_ERROR, "\
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3457
Fatal error running LOAD DATA INFILE on table '%s'. Default database: '%s'",
3458
                    (char*)table_name, print_slave_db_safe(remember_db));
3459 3460 3461
    return 1;
  }

3462
  return ( use_rli_only_for_errors ? 0 : Log_event::do_apply_event(rli) ); 
3463
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3464
#endif
3465 3466


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3467
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3468
  Rotate_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3469
**************************************************************************/
3470

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3471
/*
3472
  Rotate_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3473
*/
3474

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3475
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3476
void Rotate_log_event::pack_info(Protocol *protocol)
3477
{
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3478
  char buf1[256], buf[22];
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3479
  String tmp(buf1, sizeof(buf1), log_cs);
3480
  tmp.length(0);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3481
  tmp.append(new_log_ident, ident_len);
3482
  tmp.append(STRING_WITH_LEN(";pos="));
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3483 3484
  tmp.append(llstr(pos,buf));
  protocol->store(tmp.ptr(), tmp.length(), &my_charset_bin);
3485
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3486
#endif
3487

3488

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3489
/*
3490
  Rotate_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3491
*/
3492 3493

#ifdef MYSQL_CLIENT
3494
void Rotate_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3495
{
3496
  char buf[22];
3497 3498
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
3499

3500
  if (print_event_info->short_form)
3501
    return;
3502 3503
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tRotate to ");
3504
  if (new_log_ident)
3505 3506
    my_b_write(&cache, (byte*) new_log_ident, (uint)ident_len);
  my_b_printf(&cache, "  pos: %s\n", llstr(pos, buf));
3507
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3508
#endif /* MYSQL_CLIENT */
3509 3510


3511

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3512
/*
3513
  Rotate_log_event::Rotate_log_event() (2 constructors)
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3514
*/
3515

3516 3517

#ifndef MYSQL_CLIENT
3518
Rotate_log_event::Rotate_log_event(const char* new_log_ident_arg,
3519 3520 3521 3522 3523 3524 3525 3526
                                   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];
3527
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(...,flags)");
3528 3529
  DBUG_PRINT("enter",("new_log_ident: %s  pos: %s  flags: %lu", new_log_ident_arg,
                      llstr(pos_arg, buff), (ulong) flags));
3530 3531
#endif
  if (flags & DUP_NAME)
3532
    new_log_ident= my_strndup(new_log_ident_arg, ident_len, MYF(MY_WME));
3533 3534 3535 3536 3537
  DBUG_VOID_RETURN;
}
#endif


3538 3539
Rotate_log_event::Rotate_log_event(const char* buf, uint event_len,
                                   const Format_description_log_event* description_event)
3540
  :Log_event(buf, description_event) ,new_log_ident(0), flags(DUP_NAME)
3541
{
3542
  DBUG_ENTER("Rotate_log_event::Rotate_log_event(char*,...)");
3543
  // The caller will ensure that event_len is what we have at EVENT_LEN_OFFSET
3544 3545
  uint8 header_size= description_event->common_header_len;
  uint8 post_header_len= description_event->post_header_len[ROTATE_EVENT-1];
3546 3547
  uint ident_offset;
  if (event_len < header_size)
monty@mysql.com's avatar
monty@mysql.com committed
3548
    DBUG_VOID_RETURN;
3549
  buf += header_size;
3550 3551 3552 3553
  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; 
3554
  set_if_smaller(ident_len,FN_REFLEN-1);
3555
  new_log_ident= my_strndup(buf + ident_offset, (uint) ident_len, MYF(MY_WME));
3556
  DBUG_PRINT("debug", ("new_log_ident: '%s'", new_log_ident));
monty@mysql.com's avatar
monty@mysql.com committed
3557
  DBUG_VOID_RETURN;
3558
}
3559 3560


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3561
/*
3562
  Rotate_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3563
*/
3564

3565
#ifndef MYSQL_CLIENT
3566
bool Rotate_log_event::write(IO_CACHE* file)
3567
{
3568
  char buf[ROTATE_HEADER_LEN];
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3569
  int8store(buf + R_POS_OFFSET, pos);
3570 3571 3572
  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));
3573
}
3574
#endif
3575

3576 3577 3578
/**
   Helper function to detect if the event is inside a group.
 */
3579
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3580 3581 3582 3583 3584
static bool is_in_group(THD *const thd, RELAY_LOG_INFO *const rli)
{
  return (thd->options & OPTION_BEGIN) != 0 ||
         (rli->last_event_start_time > 0);
}
3585
#endif
3586 3587


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3588
/*
3589
  Rotate_log_event::do_apply_event()
3590

3591
  Got a rotate log event from the master
3592

3593 3594 3595
  IMPLEMENTATION
    This is mainly used so that we can later figure out the logname and
    position for the master.
3596

3597
    We can't rotate the slave's BINlog as this will cause infinitive rotations
3598
    in a A -> B -> A setup.
3599
    The NOTES below is a wrong comment which will disappear when 4.1 is merged.
3600 3601 3602

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

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3605
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3606
int Rotate_log_event::do_update_pos(RELAY_LOG_INFO *rli)
3607
{
3608
  DBUG_ENTER("Rotate_log_event::do_update_pos");
3609 3610 3611 3612
#ifndef DBUG_OFF
  char buf[32];
#endif

3613 3614
  DBUG_PRINT("info", ("server_id=%lu; ::server_id=%lu",
                      (ulong) this->server_id, (ulong) ::server_id));
3615 3616
  DBUG_PRINT("info", ("new_log_ident: %s", this->new_log_ident));
  DBUG_PRINT("info", ("pos: %s", llstr(this->pos, buf)));
3617 3618

  pthread_mutex_lock(&rli->data_lock);
3619
  rli->event_relay_log_pos= my_b_tell(rli->cur_log);
guilhem@gbichot2's avatar
guilhem@gbichot2 committed
3620
  /*
3621 3622 3623 3624
    If we are in a transaction or in a group: the only normal case is
    when the I/O thread was copying a big transaction, then it was
    stopped and restarted: we have this in the relay log:

guilhem@gbichot2's avatar
guilhem@gbichot2 committed
3625 3626 3627 3628 3629
    BEGIN
    ...
    ROTATE (a fake one)
    ...
    COMMIT or ROLLBACK
3630 3631 3632 3633

    In that case, we don't want to touch the coordinates which
    correspond to the beginning of the transaction.  Starting from
    5.0.0, there also are some rotates from the slave itself, in the
3634
    relay log, which shall not change the group positions.
guilhem@gbichot2's avatar
guilhem@gbichot2 committed
3635
  */
3636 3637
  if ((server_id != ::server_id || rli->replicate_same_server_id) &&
      !is_in_group(thd, rli))
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3638
  {
3639 3640 3641 3642
    DBUG_PRINT("info", ("old group_master_log_name: '%s'  "
                        "old group_master_log_pos: %lu",
                        rli->group_master_log_name,
                        (ulong) rli->group_master_log_pos));
3643 3644
    memcpy(rli->group_master_log_name, new_log_ident, ident_len+1);
    rli->notify_group_master_log_name_update();
3645 3646
    rli->group_master_log_pos= pos;
    rli->group_relay_log_pos= rli->event_relay_log_pos;
3647 3648
    DBUG_PRINT("info", ("new group_master_log_name: '%s'  "
                        "new group_master_log_pos: %lu",
3649
                        rli->group_master_log_name,
3650
                        (ulong) rli->group_master_log_pos));
3651
    /*
3652 3653
      Reset thd->options and sql_mode etc, because this could be the signal of
      a master's downgrade from 5.0 to 4.0.
3654 3655 3656 3657 3658
      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);
3659
    set_slave_thread_default_charset(thd, rli);
3660
    thd->variables.sql_mode= global_system_variables.sql_mode;
3661 3662
    thd->variables.auto_increment_increment=
      thd->variables.auto_increment_offset= 1;
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3663
  }
3664 3665 3666
  pthread_mutex_unlock(&rli->data_lock);
  pthread_cond_broadcast(&rli->data_cond);
  flush_relay_log_info(rli);
3667

3668
  DBUG_RETURN(0);
3669
}
3670

3671 3672

Log_event::enum_skip_reason
3673
Rotate_log_event::do_shall_skip(RELAY_LOG_INFO *rli)
3674
{
3675
  enum_skip_reason reason= Log_event::do_shall_skip(rli);
3676 3677

  switch (reason) {
3678
  case Log_event::EVENT_SKIP_NOT:
3679
  case Log_event::EVENT_SKIP_COUNT:
3680
    return Log_event::EVENT_SKIP_NOT;
3681

3682 3683
  case Log_event::EVENT_SKIP_IGNORE:
    return Log_event::EVENT_SKIP_IGNORE;
3684 3685 3686 3687
  }
  DBUG_ASSERT(0);
}

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3688
#endif
3689 3690


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3691
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3692
	Intvar_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3693
**************************************************************************/
3694

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3695
/*
3696
  Intvar_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3697
*/
3698

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

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

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3711
/*
3712
  Intvar_log_event::Intvar_log_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3713
*/
3714

3715 3716 3717
Intvar_log_event::Intvar_log_event(const char* buf,
                                   const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
3718
{
3719 3720 3721
  buf+= description_event->common_header_len;
  type= buf[I_TYPE_OFFSET];
  val= uint8korr(buf+I_VAL_OFFSET);
3722 3723
}

3724

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3725
/*
3726
  Intvar_log_event::get_var_type_name()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3727
*/
3728 3729

const char* Intvar_log_event::get_var_type_name()
3730
{
3731 3732 3733 3734 3735
  switch(type) {
  case LAST_INSERT_ID_EVENT: return "LAST_INSERT_ID";
  case INSERT_ID_EVENT: return "INSERT_ID";
  default: /* impossible */ return "UNKNOWN";
  }
3736 3737
}

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

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3739
/*
3740
  Intvar_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3741
*/
3742

3743
#ifndef MYSQL_CLIENT
3744
bool Intvar_log_event::write(IO_CACHE* file)
3745
{
3746 3747
  byte buf[9];
  buf[I_TYPE_OFFSET]= (byte) type;
3748
  int8store(buf + I_VAL_OFFSET, val);
3749 3750
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
3751
}
3752
#endif
3753

3754

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3755
/*
3756
  Intvar_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3757
*/
3758 3759

#ifdef MYSQL_CLIENT
3760
void Intvar_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3761
{
3762 3763 3764
  char llbuff[22];
  const char *msg;
  LINT_INIT(msg);
3765 3766
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);
3767

3768
  if (!print_event_info->short_form)
3769
  {
3770 3771
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tIntvar\n");
3772
  }
3773

3774
  my_b_printf(&cache, "SET ");
3775 3776 3777 3778 3779 3780 3781
  switch (type) {
  case LAST_INSERT_ID_EVENT:
    msg="LAST_INSERT_ID";
    break;
  case INSERT_ID_EVENT:
    msg="INSERT_ID";
    break;
3782 3783 3784 3785
  case INVALID_INT_EVENT:
  default: // cannot happen
    msg="INVALID_INT";
    break;
3786
  }
3787 3788
  my_b_printf(&cache, "%s=%s%s\n",
              msg, llstr(val,llbuff), print_event_info->delimiter);
3789
}
3790
#endif
3791

3792

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3793
/*
3794
  Intvar_log_event::do_apply_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
3795
*/
3796

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3797
#if defined(HAVE_REPLICATION)&& !defined(MYSQL_CLIENT)
3798
int Intvar_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
3799
{
3800 3801
  switch (type) {
  case LAST_INSERT_ID_EVENT:
3802 3803
    thd->stmt_depends_on_first_successful_insert_id_in_prev_stmt= 1;
    thd->first_successful_insert_id_in_prev_stmt= val;
3804 3805
    break;
  case INSERT_ID_EVENT:
3806
    thd->force_one_auto_inc_interval(val);
3807 3808
    break;
  }
3809 3810 3811 3812 3813
  return 0;
}

int Intvar_log_event::do_update_pos(RELAY_LOG_INFO *rli)
{
3814
  rli->inc_event_relay_log_pos();
3815
  return 0;
3816
}
3817 3818 3819


Log_event::enum_skip_reason
3820
Intvar_log_event::do_shall_skip(RELAY_LOG_INFO *rli)
3821 3822
{
  /*
3823 3824 3825 3826 3827 3828
    It is a common error to set the slave skip counter to 1 instead of
    2 when recovering from an insert which used a auto increment,
    rand, or user var.  Therefore, if the slave skip counter is 1, we
    just say that this event should be skipped by ignoring it, meaning
    that we do not change the value of the slave skip counter since it
    will be decreased by the following insert event.
3829 3830
  */
  if (rli->slave_skip_counter == 1)
3831
    return Log_event::EVENT_SKIP_IGNORE;
3832
  else
3833
    return Log_event::do_shall_skip(rli);
3834 3835
}

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3836
#endif
3837

3838

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

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3843
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3844
void Rand_log_event::pack_info(Protocol *protocol)
3845
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3846 3847 3848 3849 3850
  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);
3851
  protocol->store(buf1, (uint) (pos-buf1), &my_charset_bin);
3852
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3853
#endif
3854 3855


3856 3857 3858
Rand_log_event::Rand_log_event(const char* buf,
                               const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
3859
{
3860 3861 3862
  buf+= description_event->common_header_len;
  seed1= uint8korr(buf+RAND_SEED1_OFFSET);
  seed2= uint8korr(buf+RAND_SEED2_OFFSET);
3863 3864
}

3865

3866
#ifndef MYSQL_CLIENT
3867
bool Rand_log_event::write(IO_CACHE* file)
3868
{
3869
  byte buf[16];
3870 3871
  int8store(buf + RAND_SEED1_OFFSET, seed1);
  int8store(buf + RAND_SEED2_OFFSET, seed2);
3872 3873
  return (write_header(file, sizeof(buf)) ||
          my_b_safe_write(file, buf, sizeof(buf)));
3874
}
3875
#endif
3876

3877 3878

#ifdef MYSQL_CLIENT
3879
void Rand_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3880
{
3881 3882 3883
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

3884
  char llbuff[22],llbuff2[22];
3885
  if (!print_event_info->short_form)
3886
  {
3887 3888
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tRand\n");
3889
  }
3890 3891 3892
  my_b_printf(&cache, "SET @@RAND_SEED1=%s, @@RAND_SEED2=%s%s\n",
              llstr(seed1, llbuff),llstr(seed2, llbuff2),
              print_event_info->delimiter);
3893
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3894
#endif /* MYSQL_CLIENT */
3895

3896

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
3897
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3898
int Rand_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
3899
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3900 3901
  thd->rand.seed1= (ulong) seed1;
  thd->rand.seed2= (ulong) seed2;
3902 3903 3904 3905 3906
  return 0;
}

int Rand_log_event::do_update_pos(RELAY_LOG_INFO *rli)
{
3907
  rli->inc_event_relay_log_pos();
3908 3909
  return 0;
}
3910

3911 3912

Log_event::enum_skip_reason
3913
Rand_log_event::do_shall_skip(RELAY_LOG_INFO *rli)
3914 3915
{
  /*
3916 3917 3918 3919 3920 3921
    It is a common error to set the slave skip counter to 1 instead of
    2 when recovering from an insert which used a auto increment,
    rand, or user var.  Therefore, if the slave skip counter is 1, we
    just say that this event should be skipped by ignoring it, meaning
    that we do not change the value of the slave skip counter since it
    will be decreased by the following insert event.
3922 3923
  */
  if (rli->slave_skip_counter == 1)
3924
    return Log_event::EVENT_SKIP_IGNORE;
3925
  else
3926
    return Log_event::do_shall_skip(rli);
3927 3928
}

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3929
#endif /* !MYSQL_CLIENT */
3930

3931

3932 3933 3934 3935 3936 3937 3938
/**************************************************************************
  Xid_log_event methods
**************************************************************************/

#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
void Xid_log_event::pack_info(Protocol *protocol)
{
3939 3940
  char buf[128], *pos;
  pos= strmov(buf, "COMMIT /* xid=");
3941
  pos= longlong10_to_str(xid, pos, 10);
3942
  pos= strmov(pos, " */");
3943 3944 3945 3946
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
}
#endif

3947 3948 3949 3950 3951 3952 3953 3954
/*
  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
*/
3955 3956 3957 3958

Xid_log_event::
Xid_log_event(const char* buf,
              const Format_description_log_event *description_event)
3959 3960 3961
  :Log_event(buf, description_event)
{
  buf+= description_event->common_header_len;
3962
  memcpy((char*) &xid, buf, sizeof(xid));
3963 3964 3965
}


3966
#ifndef MYSQL_CLIENT
3967 3968 3969 3970 3971
bool Xid_log_event::write(IO_CACHE* file)
{
  return write_header(file, sizeof(xid)) ||
         my_b_safe_write(file, (byte*) &xid, sizeof(xid));
}
3972
#endif
3973 3974 3975


#ifdef MYSQL_CLIENT
3976
void Xid_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
3977
{
3978 3979 3980
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

3981
  if (!print_event_info->short_form)
3982
  {
3983 3984 3985
    char buf[64];
    longlong10_to_str(xid, buf, 10);

3986 3987
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tXid = %s\n", buf);
3988
  }
3989
  my_b_printf(&cache, "COMMIT%s\n", print_event_info->delimiter);
3990 3991 3992 3993 3994
}
#endif /* MYSQL_CLIENT */


#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
3995
int Xid_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
3996
{
3997
  /* For a slave Xid_log_event is COMMIT */
3998 3999
  general_log_print(thd, COM_QUERY,
                    "COMMIT /* implicit, from Xid_log_event */");
4000
  return end_trans(thd, COMMIT);
4001 4002 4003 4004
}
#endif /* !MYSQL_CLIENT */


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4005
/**************************************************************************
4006
  User_var_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4007
**************************************************************************/
4008

4009
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4010 4011 4012
void User_var_log_event::pack_info(Protocol* protocol)
{
  char *buf= 0;
4013
  uint val_offset= 4 + name_len;
4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028
  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));
4029 4030
      event_len+= my_sprintf(buf + val_offset,
			     (buf + val_offset, "%.14g", real_val));
4031 4032 4033 4034 4035
      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;
4036 4037 4038 4039 4040 4041 4042 4043 4044 4045
    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;
    } 
4046
    case STRING_RESULT:
4047 4048 4049 4050 4051 4052 4053 4054 4055 4056
      /* 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
      {
4057 4058 4059
        char *p= strxmov(buf + val_offset, "_", cs->csname, " ", NullS);
        p= str_to_hex(p, val, val_len);
        p= strxmov(p, " COLLATE ", cs->name, NullS);
4060 4061
        event_len= p-buf;
      }
4062
      break;
4063
    case ROW_RESULT:
4064
    default:
4065 4066 4067 4068 4069
      DBUG_ASSERT(1);
      return;
    }
  }
  buf[0]= '@';
4070 4071 4072 4073
  buf[1]= '`';
  buf[2+name_len]= '`';
  buf[3+name_len]= '=';
  memcpy(buf+2, name, name_len);
4074
  protocol->store(buf, event_len, &my_charset_bin);
4075 4076
  my_free(buf, MYF(MY_ALLOW_ZERO_PTR));
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4077
#endif /* !MYSQL_CLIENT */
4078 4079


4080 4081 4082 4083
User_var_log_event::
User_var_log_event(const char* buf,
                   const Format_description_log_event* description_event)
  :Log_event(buf, description_event)
4084
{
4085
  buf+= description_event->common_header_len;
4086 4087
  name_len= uint4korr(buf);
  name= (char *) buf + UV_NAME_LEN_SIZE;
4088 4089
  buf+= UV_NAME_LEN_SIZE + name_len;
  is_null= (bool) *buf;
4090 4091 4092
  if (is_null)
  {
    type= STRING_RESULT;
4093
    charset_number= my_charset_bin.number;
4094 4095 4096 4097 4098
    val_len= 0;
    val= 0;  
  }
  else
  {
4099 4100 4101
    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 + 
4102
		       UV_CHARSET_NUMBER_SIZE);
4103 4104
    val= (char *) (buf + UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE +
		   UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE);
4105 4106 4107 4108
  }
}


4109
#ifndef MYSQL_CLIENT
4110
bool User_var_log_event::write(IO_CACHE* file)
4111 4112 4113 4114
{
  char buf[UV_NAME_LEN_SIZE];
  char buf1[UV_VAL_IS_NULL + UV_VAL_TYPE_SIZE + 
	    UV_CHARSET_NUMBER_SIZE + UV_VAL_LEN_SIZE];
4115
  char buf2[max(8, DECIMAL_MAX_FIELD_SIZE + 2)], *pos= buf2;
4116
  uint buf1_length;
4117
  ulong event_length;
4118

4119
  int4store(buf, name_len);
4120 4121 4122 4123 4124 4125 4126
  
  if ((buf1[0]= is_null))
  {
    buf1_length= 1;
    val_len= 0;
  }    
  else
4127 4128 4129 4130 4131 4132 4133 4134 4135 4136 4137
  {
    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;
4138 4139 4140 4141 4142 4143
    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;
4144
      decimal2bin((decimal_t*)val, buf2+2, buf2[0], buf2[1]);
4145 4146 4147
      val_len= decimal_bin_size(buf2[0], buf2[1]) + 2;
      break;
    }
4148 4149 4150
    case STRING_RESULT:
      pos= val;
      break;
4151
    case ROW_RESULT:
4152
    default:
4153 4154 4155
      DBUG_ASSERT(1);
      return 0;
    }
4156 4157
    int4store(buf1 + 2 + UV_CHARSET_NUMBER_SIZE, val_len);
    buf1_length= 10;
4158
  }
4159 4160 4161 4162 4163 4164

  /* 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))   ||
4165 4166 4167
	  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));
4168
}
4169
#endif
4170

4171

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4172
/*
4173
  User_var_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4174
*/
4175 4176

#ifdef MYSQL_CLIENT
4177
void User_var_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4178
{
4179 4180 4181
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

4182
  if (!print_event_info->short_form)
4183
  {
4184 4185
    print_header(&cache, print_event_info, FALSE);
    my_b_printf(&cache, "\tUser_var\n");
4186 4187
  }

4188 4189 4190
  my_b_printf(&cache, "SET @`");
  my_b_write(&cache, (byte*) name, (uint) (name_len));
  my_b_printf(&cache, "`");
4191 4192 4193

  if (is_null)
  {
4194
    my_b_printf(&cache, ":=NULL%s\n", print_event_info->delimiter);
4195 4196 4197 4198 4199 4200 4201
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      double real_val;
      float8get(real_val, val);
4202
      my_b_printf(&cache, ":=%.14g%s\n", real_val, print_event_info->delimiter);
4203 4204 4205 4206
      break;
    case INT_RESULT:
      char int_buf[22];
      longlong10_to_str(uint8korr(val), int_buf, -10);
4207
      my_b_printf(&cache, ":=%s%s\n", int_buf, print_event_info->delimiter);
4208
      break;
4209 4210 4211 4212 4213 4214
    case DECIMAL_RESULT:
    {
      char str_buf[200];
      int str_len= sizeof(str_buf) - 1;
      int precision= (int)val[0];
      int scale= (int)val[1];
4215 4216
      decimal_digit_t dec_buf[10];
      decimal_t dec;
4217 4218 4219 4220 4221 4222
      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;
4223
      my_b_printf(&cache, ":=%s%s\n", str_buf, print_event_info->delimiter);
4224 4225
      break;
    }
4226
    case STRING_RESULT:
4227
    {
4228 4229 4230 4231 4232 4233 4234 4235 4236 4237 4238 4239 4240 4241
      /*
        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.
      */
4242 4243 4244 4245
      char *hex_str;
      CHARSET_INFO *cs;

      if (!(hex_str= (char *)my_alloca(2*val_len+1+2))) // 2 hex digits / byte
4246
        break; // no error, as we are 'void'
4247
      str_to_hex(hex_str, val, val_len);
4248 4249 4250 4251 4252 4253 4254 4255 4256 4257 4258
      /*
        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.
        */
4259
        my_b_printf(&cache, ":=???%s\n", print_event_info->delimiter);
4260
      else
4261 4262 4263
        my_b_printf(&cache, ":=_%s %s COLLATE `%s`%s\n",
                    cs->csname, hex_str, cs->name,
                    print_event_info->delimiter);
4264
      my_afree(hex_str);
4265
    }
4266
      break;
4267
    case ROW_RESULT:
4268
    default:
4269
      DBUG_ASSERT(1);
4270 4271 4272 4273
      return;
    }
  }
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4274
#endif
4275

4276

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4277
/*
4278
  User_var_log_event::do_apply_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4279
*/
4280

4281
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4282
int User_var_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
4283 4284
{
  Item *it= 0;
4285 4286 4287
  CHARSET_INFO *charset;
  if (!(charset= get_charset(charset_number, MYF(MY_WME))))
    return 1;
4288 4289 4290
  LEX_STRING user_var_name;
  user_var_name.str= name;
  user_var_name.length= name_len;
4291 4292
  double real_val;
  longlong int_val;
4293 4294 4295 4296 4297 4298 4299 4300 4301 4302

  if (is_null)
  {
    it= new Item_null();
  }
  else
  {
    switch (type) {
    case REAL_RESULT:
      float8get(real_val, val);
4303
      it= new Item_float(real_val);
4304
      val= (char*) &real_val;		// Pointer to value in native format
4305
      val_len= 8;
4306 4307
      break;
    case INT_RESULT:
4308 4309 4310
      int_val= (longlong) uint8korr(val);
      it= new Item_int(int_val);
      val= (char*) &int_val;		// Pointer to value in native format
4311
      val_len= 8;
4312
      break;
4313 4314 4315 4316 4317 4318 4319 4320
    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;
    }
4321 4322 4323
    case STRING_RESULT:
      it= new Item_string(val, val_len, charset);
      break;
4324
    case ROW_RESULT:
4325
    default:
4326 4327 4328 4329 4330
      DBUG_ASSERT(1);
      return 0;
    }
  }
  Item_func_set_user_var e(user_var_name, it);
4331 4332 4333 4334
  /*
    Item_func_set_user_var can't substitute something else on its place =>
    0 can be passed as last argument (reference on item)
  */
4335
  e.fix_fields(thd, 0);
4336 4337 4338 4339 4340
  /*
    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
4341
  e.update_hash(val, val_len, type, charset, DERIVATION_IMPLICIT, 0);
4342
  free_root(thd->mem_root,0);
4343

4344 4345 4346 4347 4348
  return 0;
}

int User_var_log_event::do_update_pos(RELAY_LOG_INFO *rli)
{
4349
  rli->inc_event_relay_log_pos();
4350 4351
  return 0;
}
4352

4353
Log_event::enum_skip_reason
4354 4355 4356 4357 4358 4359 4360 4361 4362 4363 4364 4365 4366 4367 4368
User_var_log_event::do_shall_skip(RELAY_LOG_INFO *rli)
{
  /*
    It is a common error to set the slave skip counter to 1 instead
    of 2 when recovering from an insert which used a auto increment,
    rand, or user var.  Therefore, if the slave skip counter is 1, we
    just say that this event should be skipped by ignoring it, meaning
    that we do not change the value of the slave skip counter since it
    will be decreased by the following insert event.
  */
  if (rli->slave_skip_counter == 1)
    return Log_event::EVENT_SKIP_IGNORE;
  else
    return Log_event::do_shall_skip(rli);
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4369
#endif /* !MYSQL_CLIENT */
4370 4371


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4372
/**************************************************************************
4373
  Slave_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4374
**************************************************************************/
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4375

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4376
#ifdef HAVE_REPLICATION
4377
#ifdef MYSQL_CLIENT
4378
void Unknown_log_event::print(FILE* file_arg, PRINT_EVENT_INFO* print_event_info)
4379
{
4380 4381
  Write_on_release_cache cache(&print_event_info->head_cache, file_arg);

4382
  if (print_event_info->short_form)
4383
    return;
4384 4385
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n# %s", "Unknown event\n");
4386 4387
}
#endif  
4388

4389
#ifndef MYSQL_CLIENT
4390
void Slave_log_event::pack_info(Protocol *protocol)
4391
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4392
  char buf[256+HOSTNAME_LENGTH], *pos;
4393 4394 4395 4396 4397 4398 4399
  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=");
4400
  pos= longlong10_to_str(master_pos, pos, 10);
4401
  protocol->store(buf, pos-buf, &my_charset_bin);
4402
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4403
#endif /* !MYSQL_CLIENT */
4404 4405 4406 4407


#ifndef MYSQL_CLIENT
Slave_log_event::Slave_log_event(THD* thd_arg,
4408
				 RELAY_LOG_INFO* rli)
4409
  :Log_event(thd_arg, 0, 0) , mem_pool(0), master_host(0)
4410 4411 4412 4413
{
  DBUG_ENTER("Slave_log_event");
  if (!rli->inited)				// QQ When can this happen ?
    DBUG_VOID_RETURN;
4414

4415 4416 4417 4418 4419
  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);
4420
  master_log_len = strlen(rli->group_master_log_name);
4421 4422 4423
  // 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))))
4424
  {
4425 4426 4427
    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;
4428
    memcpy(master_log, rli->group_master_log_name, master_log_len + 1);
4429
    master_port = mi->port;
4430
    master_pos = rli->group_master_log_pos;
4431
    DBUG_PRINT("info", ("master_log: %s  pos: %lu", master_log,
4432
			(ulong) master_pos));
4433
  }
4434 4435 4436 4437 4438 4439
  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
4440
#endif /* !MYSQL_CLIENT */
4441 4442 4443 4444 4445 4446 4447 4448 4449


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


#ifdef MYSQL_CLIENT
4450
void Slave_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4451
{
4452 4453
  Write_on_release_cache cache(&print_event_info->head_cache, file);

4454
  char llbuff[22];
4455
  if (print_event_info->short_form)
4456
    return;
4457 4458
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n\
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4459
Slave: master_host: '%s'  master_port: %d  master_log: '%s'  master_pos: %s\n",
4460 4461
	  master_host, master_port, master_log, llstr(master_pos, llbuff));
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4462
#endif /* MYSQL_CLIENT */
4463 4464 4465 4466 4467 4468 4469 4470


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


4471
#ifndef MYSQL_CLIENT
4472
bool Slave_log_event::write(IO_CACHE* file)
4473
{
4474
  ulong event_length= get_data_size();
4475 4476 4477
  int8store(mem_pool + SL_MASTER_POS_OFFSET, master_pos);
  int2store(mem_pool + SL_MASTER_PORT_OFFSET, master_port);
  // log and host are already there
4478 4479 4480

  return (write_header(file, event_length) ||
          my_b_safe_write(file, (byte*) mem_pool, event_length));
4481
}
4482
#endif
4483 4484 4485 4486 4487 4488 4489 4490 4491 4492 4493


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)
4494
  {
4495 4496
    master_host = 0;
    return;
4497
  }
4498 4499
  master_log_len = strlen(master_log);
}
4500

4501

4502 4503 4504
/* 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)
4505
{
4506
  if (event_len < LOG_EVENT_HEADER_LEN)
4507
    return;
4508
  event_len -= LOG_EVENT_HEADER_LEN;
4509 4510 4511 4512 4513
  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);
4514 4515
}

4516

4517
#ifndef MYSQL_CLIENT
4518
int Slave_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
4519 4520 4521
{
  if (mysql_bin_log.is_open())
    mysql_bin_log.write(this);
4522
  return 0;
4523
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4524
#endif /* !MYSQL_CLIENT */
4525 4526


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4527
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4528
	Stop_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4529
**************************************************************************/
4530

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4531
/*
4532
  Stop_log_event::print()
4533
*/
4534 4535

#ifdef MYSQL_CLIENT
4536
void Stop_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4537
{
4538 4539 4540
  Write_on_release_cache cache(&print_event_info->head_cache, file,
                               Write_on_release_cache::FLUSH_F);

4541
  if (print_event_info->short_form)
4542 4543
    return;

4544 4545
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\tStop\n");
4546
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4547
#endif /* MYSQL_CLIENT */
4548

4549

4550
/*
4551
  Stop_log_event::do_apply_event()
4552 4553 4554 4555 4556 4557 4558 4559

  The master stopped.  We used to clean up all temporary tables but
  this is useless as, as the master has shut down properly, it has
  written all DROP TEMPORARY TABLE (prepared statements' deletion is
  TODO only when we binlog prep stmts).  We used to clean up
  slave_load_tmpdir, but this is useless as it has been cleared at the
  end of LOAD DATA INFILE.  So we have nothing to do here.  The place
  were we must do this cleaning is in
4560
  Start_log_event_v3::do_apply_event(), not here. Because if we come
4561
  here, the master was sane.
4562 4563
*/

4564
#ifndef MYSQL_CLIENT
4565
int Stop_log_event::do_update_pos(RELAY_LOG_INFO *rli)
4566
{
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4567 4568
  /*
    We do not want to update master_log pos because we get a rotate event
4569
    before stop, so by now group_master_log_name is set to the next log.
4570
    If we updated it, we will have incorrect master coordinates and this
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4571
    could give false triggers in MASTER_POS_WAIT() that we have reached
4572
    the target position when in fact we have not.
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4573
  */
4574 4575 4576 4577 4578 4579 4580
  if (thd->options & OPTION_BEGIN)
    rli->inc_event_relay_log_pos();
  else
  {
    rli->inc_group_relay_log_pos(0);
    flush_relay_log_info(rli);
  }
4581 4582
  return 0;
}
4583

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4584
#endif /* !MYSQL_CLIENT */
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4585
#endif /* HAVE_REPLICATION */
4586

4587

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4588
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4589
	Create_file_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4590
**************************************************************************/
4591 4592

/*
4593
  Create_file_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4594
*/
4595 4596

#ifndef MYSQL_CLIENT
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4597 4598 4599 4600
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,
4601
                      bool ignore,
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4602
		      char* block_arg, uint block_len_arg, bool using_trans)
4603
  :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
4604
		  using_trans),
4605
   fake_base(0), block(block_arg), event_buf(0), block_len(block_len_arg),
4606
   file_id(thd_arg->file_id = mysql_bin_log.next_file_id())
4607
{
monty@mysql.com's avatar
monty@mysql.com committed
4608
  DBUG_ENTER("Create_file_log_event");
4609
  sql_ex.force_new_format();
monty@mysql.com's avatar
monty@mysql.com committed
4610
  DBUG_VOID_RETURN;
4611
}
4612

4613

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4614
/*
4615
  Create_file_log_event::write_data_body()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4616
*/
4617

4618
bool Create_file_log_event::write_data_body(IO_CACHE* file)
4619
{
4620 4621
  bool res;
  if ((res= Load_log_event::write_data_body(file)) || fake_base)
4622 4623
    return res;
  return (my_b_safe_write(file, (byte*) "", 1) ||
4624
          my_b_safe_write(file, (byte*) block, block_len));
4625 4626
}

4627

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4628
/*
4629
  Create_file_log_event::write_data_header()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4630
*/
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4631

4632
bool Create_file_log_event::write_data_header(IO_CACHE* file)
4633
{
4634
  bool res;
4635
  byte buf[CREATE_FILE_HEADER_LEN];
4636 4637
  if ((res= Load_log_event::write_data_header(file)) || fake_base)
    return res;
4638
  int4store(buf + CF_FILE_ID_OFFSET, file_id);
4639
  return my_b_safe_write(file, buf, CREATE_FILE_HEADER_LEN) != 0;
4640 4641 4642
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4643
/*
4644
  Create_file_log_event::write_base()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4645
*/
4646

4647
bool Create_file_log_event::write_base(IO_CACHE* file)
4648
{
4649 4650 4651 4652
  bool res;
  fake_base= 1;                                 // pretend we are Load event
  res= write(file);
  fake_base= 0;
4653 4654 4655
  return res;
}

4656
#endif /* !MYSQL_CLIENT */
4657

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4658
/*
4659
  Create_file_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4660
*/
4661

4662 4663 4664
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)
4665
{
4666 4667 4668 4669 4670
  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
4671
  if (!(event_buf= my_memdup((byte*) buf, len, MYF(MY_WME))) ||
4672 4673 4674 4675 4676 4677 4678
      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
4679
    DBUG_VOID_RETURN;
4680
  if (description_event->binlog_version!=1)
4681
  {
4682 4683 4684 4685 4686 4687 4688 4689 4690 4691 4692 4693 4694 4695 4696 4697 4698
    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);
4699 4700 4701 4702 4703 4704 4705 4706 4707
    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;
4708
  }
monty@mysql.com's avatar
monty@mysql.com committed
4709
  DBUG_VOID_RETURN;
4710 4711
}

4712

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

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

4723
  if (print_event_info->short_form)
4724 4725
  {
    if (enable_local && check_fname_outside_temp_buf())
4726
      Load_log_event::print(file, print_event_info);
4727
    return;
4728 4729 4730 4731
  }

  if (enable_local)
  {
4732
    Load_log_event::print(file, print_event_info,
4733
			  !check_fname_outside_temp_buf());
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4734 4735 4736 4737
    /* 
       That one is for "file_id: etc" below: in mysqlbinlog we want the #, in
       SHOW BINLOG EVENTS we don't.
    */
4738
    my_b_printf(&cache, "#"); 
4739 4740
  }

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

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

4745
void Create_file_log_event::print(FILE* file, PRINT_EVENT_INFO* print_event_info)
4746
{
4747
  print(file, print_event_info, 0);
4748
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4749
#endif /* MYSQL_CLIENT */
nick@mysql.com's avatar
nick@mysql.com committed
4750

4751

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4752
/*
4753
  Create_file_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4754
*/
4755

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4756
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4757
void Create_file_log_event::pack_info(Protocol *protocol)
4758
{
4759 4760 4761
  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
4762
  pos= strmov(pos + db_len, ";table=");
4763
  memcpy(pos, table_name, table_name_len);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4764
  pos= strmov(pos + table_name_len, ";file_id=");
4765 4766 4767
  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
4768
  protocol->store(buf, (uint) (pos-buf), &my_charset_bin);
4769
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4770
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
4771 4772


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4773
/*
4774
  Create_file_log_event::do_apply_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4775
*/
4776

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4777
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4778
int Create_file_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
4779
{
4780 4781
  char proc_info[17+FN_REFLEN+10], *fname_buf;
  char *ext;
4782 4783 4784
  int fd = -1;
  IO_CACHE file;
  int error = 1;
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4785

4786
  bzero((char*)&file, sizeof(file));
4787 4788
  fname_buf= strmov(proc_info, "Making temp file ");
  ext= slave_load_file_stem(fname_buf, file_id, server_id, ".info");
4789
  thd->proc_info= proc_info;
4790 4791 4792 4793
  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 ||
4794 4795 4796
      init_io_cache(&file, fd, IO_SIZE, WRITE_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
4797 4798
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Error in Create_file event: "
                    "could not open file '%s'", fname_buf);
4799 4800 4801 4802
    goto err;
  }
  
  // a trick to avoid allocating another buffer
4803 4804
  fname= fname_buf;
  fname_len= (uint) (strmov(ext, ".data") - fname);
4805 4806
  if (write_base(&file))
  {
4807
    strmov(ext, ".info"); // to have it right in the error message
4808 4809 4810
    slave_print_msg(ERROR_LEVEL, rli, my_errno,
                    "Error in Create_file event: could not write to file '%s'",
                    fname_buf);
4811 4812 4813 4814 4815 4816
    goto err;
  }
  end_io_cache(&file);
  my_close(fd, MYF(0));
  
  // fname_buf now already has .data, not .info, because we did our trick
4817 4818 4819 4820
  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)
4821
  {
4822 4823
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Error in Create_file event: "
                    "could not open file '%s'", fname_buf);
4824 4825
    goto err;
  }
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4826
  if (my_write(fd, (byte*) block, block_len, MYF(MY_WME+MY_NABP)))
4827
  {
4828 4829
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Error in Create_file event: "
                    "write to '%s' failed", fname_buf);
4830 4831
    goto err;
  }
4832 4833
  error=0;					// Everything is ok

4834 4835 4836 4837 4838
err:
  if (error)
    end_io_cache(&file);
  if (fd >= 0)
    my_close(fd, MYF(0));
4839
  thd->proc_info= 0;
4840
  return error == 0;
4841
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4842
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
4843

4844

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4845
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4846
	Append_block_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4847
**************************************************************************/
4848

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4849
/*
4850
  Append_block_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4851
*/
4852 4853

#ifndef MYSQL_CLIENT  
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4854 4855
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
4856 4857 4858
					       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
4859
   block_len(block_len_arg), file_id(thd_arg->file_id), db(db_arg)
4860 4861
{
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4862
#endif
4863 4864


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4865
/*
4866
  Append_block_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4867
*/
4868

4869 4870 4871
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)
4872
{
4873 4874 4875 4876 4877 4878
  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
4879
    DBUG_VOID_RETURN;
4880 4881 4882
  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
4883
  DBUG_VOID_RETURN;
4884 4885 4886
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4887
/*
4888
  Append_block_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4889
*/
4890

4891
#ifndef MYSQL_CLIENT
4892
bool Append_block_log_event::write(IO_CACHE* file)
4893 4894 4895
{
  byte buf[APPEND_BLOCK_HEADER_LEN];
  int4store(buf + AB_FILE_ID_OFFSET, file_id);
4896 4897
  return (write_header(file, APPEND_BLOCK_HEADER_LEN + block_len) ||
          my_b_safe_write(file, buf, APPEND_BLOCK_HEADER_LEN) ||
4898 4899
	  my_b_safe_write(file, (byte*) block, block_len));
}
4900
#endif
4901 4902


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4903
/*
4904
  Append_block_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4905
*/
4906 4907

#ifdef MYSQL_CLIENT  
lars@mysql.com's avatar
lars@mysql.com committed
4908
void Append_block_log_event::print(FILE* file,
4909
				   PRINT_EVENT_INFO* print_event_info)
4910
{
4911 4912
  Write_on_release_cache cache(&print_event_info->head_cache, file);

4913
  if (print_event_info->short_form)
4914
    return;
4915 4916 4917
  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);
4918
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
4919
#endif /* MYSQL_CLIENT */
4920 4921


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4922
/*
4923
  Append_block_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4924
*/
4925

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4926
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
4927
void Append_block_log_event::pack_info(Protocol *protocol)
4928 4929 4930 4931 4932 4933
{
  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
4934
  protocol->store(buf, length, &my_charset_bin);
4935 4936 4937
}


4938
/*
4939
  Append_block_log_event::get_create_or_append()
4940 4941
*/

4942
int Append_block_log_event::get_create_or_append() const
4943
{
4944
  return 0; /* append to the file, fail if not exists */
4945 4946
}

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4947
/*
4948
  Append_block_log_event::do_apply_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
4949
*/
4950

4951
int Append_block_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
4952
{
4953
  char proc_info[17+FN_REFLEN+10], *fname= proc_info+17;
4954
  int fd;
4955
  int error = 1;
4956
  DBUG_ENTER("Append_block_log_event::do_apply_event");
4957

4958 4959
  fname= strmov(proc_info, "Making temp file ");
  slave_load_file_stem(fname, file_id, server_id, ".data");
4960
  thd->proc_info= proc_info;
4961 4962 4963 4964 4965 4966 4967
  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)
    {
4968 4969 4970
      slave_print_msg(ERROR_LEVEL, rli, my_errno,
                      "Error in %s event: could not create file '%s'",
                      get_type_str(), fname);
4971 4972 4973
      goto err;
    }
  }
4974 4975
  else if ((fd = my_open(fname, O_WRONLY | O_APPEND | O_BINARY | O_NOFOLLOW,
                         MYF(MY_WME))) < 0)
4976
  {
4977 4978 4979
    slave_print_msg(ERROR_LEVEL, rli, my_errno,
                    "Error in %s event: could not open file '%s'",
                    get_type_str(), fname);
4980 4981
    goto err;
  }
monty@hundin.mysql.fi's avatar
monty@hundin.mysql.fi committed
4982
  if (my_write(fd, (byte*) block, block_len, MYF(MY_WME+MY_NABP)))
4983
  {
4984 4985 4986
    slave_print_msg(ERROR_LEVEL, rli, my_errno,
                    "Error in %s event: write to '%s' failed",
                    get_type_str(), fname);
4987 4988 4989
    goto err;
  }
  error=0;
4990

4991 4992 4993
err:
  if (fd >= 0)
    my_close(fd, MYF(0));
4994
  thd->proc_info= 0;
4995
  DBUG_RETURN(error);
4996
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
4997
#endif
4998 4999


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5000
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5001
	Delete_file_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5002
**************************************************************************/
5003

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5004
/*
5005
  Delete_file_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5006
*/
5007 5008

#ifndef MYSQL_CLIENT
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5009 5010 5011
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)
5012 5013
{
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5014
#endif
5015

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5016
/*
5017
  Delete_file_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5018
*/
5019

5020 5021 5022
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)
5023
{
5024 5025 5026
  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))
5027
    return;
5028
  file_id= uint4korr(buf + common_header_len + DF_FILE_ID_OFFSET);
5029 5030 5031
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5032
/*
5033
  Delete_file_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5034
*/
5035

5036
#ifndef MYSQL_CLIENT
5037
bool Delete_file_log_event::write(IO_CACHE* file)
5038 5039 5040
{
 byte buf[DELETE_FILE_HEADER_LEN];
 int4store(buf + DF_FILE_ID_OFFSET, file_id);
5041 5042
 return (write_header(file, sizeof(buf)) ||
         my_b_safe_write(file, buf, sizeof(buf)));
5043
}
5044
#endif
5045 5046


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5047
/*
5048
  Delete_file_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5049
*/
5050 5051

#ifdef MYSQL_CLIENT  
lars@mysql.com's avatar
lars@mysql.com committed
5052
void Delete_file_log_event::print(FILE* file,
5053
				  PRINT_EVENT_INFO* print_event_info)
5054
{
5055 5056
  Write_on_release_cache cache(&print_event_info->head_cache, file);

5057
  if (print_event_info->short_form)
5058
    return;
5059 5060
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Delete_file: file_id=%u\n", file_id);
5061
}
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5062
#endif /* MYSQL_CLIENT */
5063

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5064
/*
5065
  Delete_file_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5066
*/
5067

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
5068
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5069
void Delete_file_log_event::pack_info(Protocol *protocol)
5070 5071 5072 5073
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
5074
  protocol->store(buf, (int32) length, &my_charset_bin);
5075
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
5076
#endif
5077

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5078
/*
5079
  Delete_file_log_event::do_apply_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5080
*/
5081

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
5082
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5083
int Delete_file_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
5084 5085
{
  char fname[FN_REFLEN+10];
5086
  char *ext= slave_load_file_stem(fname, file_id, server_id, ".data");
5087
  (void) my_delete(fname, MYF(MY_WME));
5088
  strmov(ext, ".info");
5089
  (void) my_delete(fname, MYF(MY_WME));
5090
  return 0;
5091
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5092
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
5093 5094


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5095
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5096
	Execute_load_log_event methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5097
**************************************************************************/
5098

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5099
/*
5100
  Execute_load_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5101
*/
5102 5103

#ifndef MYSQL_CLIENT  
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5104 5105 5106
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)
5107 5108
{
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5109
#endif
5110 5111
  

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5112
/*
5113
  Execute_load_log_event ctor
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5114
*/
5115

5116 5117 5118
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)
5119
{
5120 5121 5122
  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))
5123
    return;
5124
  file_id= uint4korr(buf + common_header_len + EL_FILE_ID_OFFSET);
5125 5126 5127
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5128
/*
5129
  Execute_load_log_event::write()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5130
*/
5131

5132
#ifndef MYSQL_CLIENT
5133
bool Execute_load_log_event::write(IO_CACHE* file)
5134 5135 5136
{
  byte buf[EXEC_LOAD_HEADER_LEN];
  int4store(buf + EL_FILE_ID_OFFSET, file_id);
5137 5138
  return (write_header(file, sizeof(buf)) || 
          my_b_safe_write(file, buf, sizeof(buf)));
5139
}
5140
#endif
5141 5142


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5143
/*
5144
  Execute_load_log_event::print()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5145
*/
5146 5147

#ifdef MYSQL_CLIENT  
lars@mysql.com's avatar
lars@mysql.com committed
5148
void Execute_load_log_event::print(FILE* file,
5149
				   PRINT_EVENT_INFO* print_event_info)
5150
{
5151 5152
  Write_on_release_cache cache(&print_event_info->head_cache, file);

5153
  if (print_event_info->short_form)
5154
    return;
5155 5156 5157
  print_header(&cache, print_event_info, FALSE);
  my_b_printf(&cache, "\n#Exec_load: file_id=%d\n",
              file_id);
5158
}
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5159
#endif
5160

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5161
/*
5162
  Execute_load_log_event::pack_info()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5163
*/
5164

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
5165
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
5166
void Execute_load_log_event::pack_info(Protocol *protocol)
5167 5168 5169 5170
{
  char buf[64];
  uint length;
  length= (uint) my_sprintf(buf, (buf, ";file_id=%u", (uint) file_id));
5171
  protocol->store(buf, (int32) length, &my_charset_bin);
5172 5173 5174
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5175
/*
5176
  Execute_load_log_event::do_apply_event()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5177
*/
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
5178

5179
int Execute_load_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
5180 5181
{
  char fname[FN_REFLEN+10];
5182
  char *ext;
5183
  int fd;
5184
  int error= 1;
5185
  IO_CACHE file;
5186
  Load_log_event *lev= 0;
5187

5188
  ext= slave_load_file_stem(fname, file_id, server_id, ".info");
5189 5190
  if ((fd = my_open(fname, O_RDONLY | O_BINARY | O_NOFOLLOW,
                    MYF(MY_WME))) < 0 ||
5191 5192 5193
      init_io_cache(&file, fd, IO_SIZE, READ_CACHE, (my_off_t)0, 0,
		    MYF(MY_WME|MY_NABP)))
  {
5194 5195
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Error in Exec_load event: "
                    "could not open file '%s'", fname);
5196 5197
    goto err;
  }
5198
  if (!(lev = (Load_log_event*)Log_event::read_log_event(&file,
5199 5200
                                                         (pthread_mutex_t*)0,
                                                         rli->relay_log.description_event_for_exec)) ||
5201
      lev->get_type_code() != NEW_LOAD_EVENT)
5202
  {
5203 5204
    slave_print_msg(ERROR_LEVEL, rli, 0, "Error in Exec_load event: "
                    "file '%s' appears corrupted", fname);
5205 5206
    goto err;
  }
5207

5208
  lev->thd = thd;
5209
  /*
5210
    lev->do_apply_event should use rli only for errors i.e. should
5211 5212
    not advance rli's position.

5213
    lev->do_apply_event is the place where the table is loaded (it
5214
    calls mysql_load()).
5215
  */
guilhem@mysql.com's avatar
guilhem@mysql.com committed
5216

5217 5218
  const_cast<RELAY_LOG_INFO*>(rli)->future_group_master_log_pos= log_pos;
  if (lev->do_apply_event(0,rli,1)) 
5219
  {
5220 5221 5222 5223 5224 5225 5226 5227 5228
    /*
      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));
5229 5230
    if (tmp)
    {
5231 5232 5233 5234
      slave_print_msg(ERROR_LEVEL, rli,
                      rli->last_slave_errno, /* ok to re-use error code */
                      "%s. Failed executing load from '%s'", 
                      tmp, fname);
5235 5236
      my_free(tmp,MYF(0));
    }
5237 5238
    goto err;
  }
guilhem@mysql.com's avatar
guilhem@mysql.com committed
5239 5240 5241 5242 5243 5244 5245 5246 5247 5248
  /*
    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;
  }
5249
  (void) my_delete(fname, MYF(MY_WME));
5250
  memcpy(ext, ".data", 6);
5251
  (void) my_delete(fname, MYF(MY_WME));
5252
  error = 0;
5253

5254 5255 5256
err:
  delete lev;
  if (fd >= 0)
5257
  {
5258
    my_close(fd, MYF(0));
5259 5260
    end_io_cache(&file);
  }
5261
  return error;
5262
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
5263

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5264
#endif /* defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT) */
5265 5266


5267 5268 5269 5270 5271 5272 5273 5274 5275 5276 5277 5278 5279 5280 5281 5282 5283 5284 5285 5286 5287 5288 5289 5290 5291
/**************************************************************************
	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)
5292
int Begin_load_query_log_event::get_create_or_append() const
5293
{
5294
  return 1; /* create the file */
5295 5296 5297 5298 5299 5300 5301 5302 5303 5304 5305 5306 5307 5308 5309 5310 5311 5312 5313 5314 5315 5316 5317 5318 5319 5320 5321 5322 5323 5324 5325 5326 5327 5328 5329 5330 5331 5332 5333 5334 5335 5336 5337 5338 5339 5340 5341 5342 5343 5344 5345 5346 5347 5348
}
#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;
}


5349
#ifndef MYSQL_CLIENT
5350 5351 5352 5353 5354 5355 5356 5357 5358 5359
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);
}
5360
#endif
5361 5362 5363


#ifdef MYSQL_CLIENT
lars@mysql.com's avatar
lars@mysql.com committed
5364
void Execute_load_query_log_event::print(FILE* file,
5365
                                         PRINT_EVENT_INFO* print_event_info)
5366
{
5367
  print(file, print_event_info, 0);
5368 5369 5370
}


lars@mysql.com's avatar
lars@mysql.com committed
5371
void Execute_load_query_log_event::print(FILE* file,
5372
                                         PRINT_EVENT_INFO* print_event_info,
5373 5374
                                         const char *local_fname)
{
5375 5376 5377
  Write_on_release_cache cache(&print_event_info->head_cache, file);

  print_query_header(&cache, print_event_info);
5378 5379 5380

  if (local_fname)
  {
5381 5382 5383 5384
    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, "\'");
5385
    if (dup_handling == LOAD_DUP_REPLACE)
5386 5387 5388
      my_b_printf(&cache, " REPLACE");
    my_b_printf(&cache, " INTO");
    my_b_write(&cache, (byte*) query + fn_pos_end, q_len-fn_pos_end);
5389
    my_b_printf(&cache, "%s\n", print_event_info->delimiter);
5390 5391 5392
  }
  else
  {
5393
    my_b_write(&cache, (byte*) query, q_len);
5394
    my_b_printf(&cache, "%s\n", print_event_info->delimiter);
5395 5396
  }

5397
  if (!print_event_info->short_form)
5398
    my_b_printf(&cache, "# file_id: %d \n", file_id);
5399 5400 5401 5402 5403 5404 5405 5406 5407 5408 5409 5410 5411 5412 5413 5414 5415 5416 5417 5418 5419 5420 5421 5422 5423 5424 5425 5426 5427 5428
}
#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
5429
Execute_load_query_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
5430 5431 5432 5433 5434 5435 5436 5437 5438 5439 5440
{
  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))))
  {
5441
    slave_print_msg(ERROR_LEVEL, rli, my_errno, "Not enough memory");
5442 5443 5444 5445 5446 5447
    return 1;
  }

  p= buf;
  memcpy(p, query, fn_pos_start);
  p+= fn_pos_start;
5448
  fname= (p= strmake(p, STRING_WITH_LEN(" INFILE \'")));
5449 5450
  p= slave_load_file_stem(p, file_id, server_id, ".data");
  fname_end= p= strend(p);                      // Safer than p=p+5
5451
  *(p++)='\'';
5452
  switch (dup_handling) {
5453
  case LOAD_DUP_IGNORE:
5454
    p= strmake(p, STRING_WITH_LEN(" IGNORE"));
5455 5456
    break;
  case LOAD_DUP_REPLACE:
5457
    p= strmake(p, STRING_WITH_LEN(" REPLACE"));
5458 5459 5460 5461 5462
    break;
  default:
    /* Ordinary load data */
    break;
  }
5463
  p= strmake(p, STRING_WITH_LEN(" INTO"));
5464 5465
  p= strmake(p, query+fn_pos_end, q_len-fn_pos_end);

5466
  error= Query_log_event::do_apply_event(rli, buf, p-buf);
5467 5468 5469 5470

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

5471 5472 5473 5474 5475 5476
  /*
    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));
5477 5478 5479 5480 5481 5482 5483

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


monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5484
/**************************************************************************
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5485
	sql_ex_info methods
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
5486
**************************************************************************/
5487

monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5488
/*
5489
  sql_ex_info::write_data()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5490
*/
5491

5492
bool sql_ex_info::write_data(IO_CACHE* file)
5493 5494 5495
{
  if (new_format())
  {
5496 5497 5498 5499 5500
    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) ||
5501 5502 5503 5504 5505 5506 5507 5508 5509 5510 5511 5512
	    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;
5513
    return my_b_safe_write(file, (byte*) &old_ex, sizeof(old_ex)) != 0;
5514 5515 5516 5517
  }
}


monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5518
/*
5519
  sql_ex_info::init()
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
5520
*/
5521 5522 5523 5524 5525 5526 5527 5528 5529 5530 5531 5532 5533 5534

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.
    */
5535 5536 5537 5538 5539
    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))
5540 5541 5542 5543 5544 5545 5546 5547 5548 5549 5550 5551 5552 5553 5554 5555 5556 5557 5558 5559 5560 5561 5562 5563 5564 5565
      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;
}
5566 5567 5568 5569 5570 5571 5572 5573 5574 5575


/**************************************************************************
	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),
5576
    m_row_count(0),
5577 5578
    m_table(tbl_arg),
    m_table_id(tid),
5579 5580
    m_width(tbl_arg ? tbl_arg->s->fields : 1),
    m_rows_buf(0), m_rows_cur(0), m_rows_end(0),
5581 5582
    m_flags(0)
{
5583 5584
  /*
    We allow a special form of dummy event when the table, and cols
5585
    are null and the table id is ~0UL.  This is a temporary
5586 5587
    solution, to be able to terminate a started statement in the
    binary log: the extreneous events will be removed in the future.
5588
   */
5589 5590
  DBUG_ASSERT(tbl_arg && tbl_arg->s && tid != ~0UL ||
              !tbl_arg && !cols && tid == ~0UL);
5591 5592 5593 5594 5595 5596 5597 5598 5599 5600

  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)))
5601 5602 5603 5604 5605
  {
    /* 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));
  }
5606 5607 5608 5609 5610 5611 5612 5613 5614 5615
  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),
5616
    m_row_count(0),
5617 5618 5619 5620 5621 5622
    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];

5623 5624
  DBUG_PRINT("enter",("event_len: %u  common_header_len: %d  "
		      "post_header_len: %d",
5625 5626 5627 5628 5629 5630 5631 5632 5633 5634 5635 5636 5637
		      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
  {
5638
    m_table_id= (ulong) uint6korr(post_start);
5639 5640 5641 5642 5643
    post_start+= RW_FLAGS_OFFSET;
  }

  m_flags= uint2korr(post_start);

5644 5645
  byte const *const var_start= (const byte *)buf + common_header_len + 
    post_header_len;
5646
  byte const *const ptr_width= var_start;
5647 5648
  uchar *ptr_after_width= (uchar*) ptr_width;
  m_width = net_field_length(&ptr_after_width);
5649 5650

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

5653
  my_size_t const data_size= event_len - (ptr_rows_data - (const byte *) buf);
5654
  DBUG_PRINT("info",("m_table_id: %lu  m_flags: %d  m_width: %lu  data_size: %lu",
5655 5656
                     m_table_id, m_flags, m_width, data_size));

5657
  m_rows_buf= (byte*)my_malloc(data_size, MYF(MY_WME));
5658 5659 5660 5661 5662 5663 5664 5665 5666 5667 5668 5669 5670 5671 5672 5673 5674 5675 5676 5677 5678 5679 5680
  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().
5681
  my_free((gptr)m_rows_buf, MYF(MY_ALLOW_ZERO_PTR));
5682 5683 5684 5685 5686 5687 5688 5689 5690 5691 5692
}

#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
  */
5693
  DBUG_ENTER("Rows_log_event::do_add_row_data");
5694 5695
  DBUG_PRINT("enter", ("row_data: 0x%lx  length: %lu", (ulong) row_data,
                       (ulong) length));
5696 5697 5698 5699 5700
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
5701
  DBUG_DUMP("row_data", (const char*)row_data, min(length, 32));
5702
#endif
5703 5704

  DBUG_ASSERT(m_rows_buf <= m_rows_cur);
5705
  DBUG_ASSERT(!m_rows_buf || m_rows_end && m_rows_buf < m_rows_end);
5706 5707 5708
  DBUG_ASSERT(m_rows_cur <= m_rows_end);

  /* The cast will always work since m_rows_cur <= m_rows_end */
5709
  if (static_cast<my_size_t>(m_rows_end - m_rows_cur) <= length)
5710 5711 5712
  {
    my_size_t const block_size= 1024;
    my_ptrdiff_t const cur_size= m_rows_cur - m_rows_buf;
5713
    my_ptrdiff_t const new_alloc= 
5714
        block_size * ((cur_size + length + block_size - 1) / block_size);
5715

5716
    byte* const new_buf= (byte*)my_realloc((gptr)m_rows_buf, (uint) new_alloc,
5717
                                           MYF(MY_ALLOW_ZERO_PTR|MY_WME));
5718 5719 5720 5721 5722 5723 5724 5725 5726 5727 5728 5729 5730 5731 5732 5733 5734
    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;
  }

5735
  DBUG_ASSERT(m_rows_cur + length <= m_rows_end);
5736 5737
  memcpy(m_rows_cur, row_data, length);
  m_rows_cur+= length;
5738
  m_row_count++;
5739 5740 5741 5742 5743 5744
  DBUG_RETURN(0);
}
#endif

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
/*
5745
  Unpack a row into table->record[0].
5746
  
5747 5748 5749 5750 5751 5752 5753 5754 5755 5756
  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
5757 5758 5759 5760
             Pointer to variable that will be set to the length of the
             record on the master side
    rw_set   Pointer to bitmap that holds either the read_set or the
             write_set of the table
5761 5762 5763

  DESCRIPTION

5764 5765 5766 5767 5768
      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.

5769 5770 5771
      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.
5772

5773 5774
      At most 'colcnt' columns are read: if the table is larger than
      that, the remaining fields are not filled in.
5775 5776 5777 5778 5779 5780 5781 5782 5783

  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)
5784
 */
5785
static int
5786
unpack_row(RELAY_LOG_INFO const *rli,
5787
           TABLE *table, uint const colcnt,
5788 5789
           char const *const row_data, MY_BITMAP const *cols,
           char const **const row_end, ulong *const master_reclength,
5790
           MY_BITMAP* const rw_set, Log_event_type const event_type)
5791
{
5792
  DBUG_ENTER("unpack_row");
5793
  DBUG_ASSERT(row_data);
5794 5795
  my_size_t const master_null_byte_count= (bitmap_bits_set(cols) + 7) / 8;
  int error= 0;
5796

5797 5798
  char const *null_ptr= row_data;
  char const *pack_ptr= row_data + master_null_byte_count;
5799

5800
  bitmap_clear_all(rw_set);
5801

5802
  empty_record(table);
5803 5804

  Field **const begin_ptr = table->field;
5805
  Field **field_ptr;
5806
  Field **const end_ptr= begin_ptr + colcnt;
5807 5808 5809 5810 5811 5812 5813

  DBUG_ASSERT(null_ptr < row_data + master_null_byte_count);

  // Mask to mask out the correct bit among the null bits
  unsigned int null_mask= 1U;
  // The "current" null bits
  unsigned int null_bits= *null_ptr++;
5814
  for (field_ptr= begin_ptr ; field_ptr < end_ptr ; ++field_ptr)
5815 5816 5817
  {
    Field *const f= *field_ptr;

5818 5819 5820 5821
    /*
      No need to bother about columns that does not exist: they have
      gotten default values when being emptied above.
     */
5822
    if (bitmap_is_set(cols, field_ptr -  begin_ptr))
5823
    {
5824 5825 5826 5827 5828 5829 5830 5831
      if ((null_mask & 0xFF) == 0)
      {
        DBUG_ASSERT(null_ptr < row_data + master_null_byte_count);
        null_mask= 1U;
        null_bits= *null_ptr++;
      }

      DBUG_ASSERT(null_mask & 0xFF); // One of the 8 LSB should be set
5832

5833
      /* Field...::unpack() cannot return 0 */
5834 5835 5836
      DBUG_ASSERT(pack_ptr != NULL);

      if ((null_bits & null_mask) && f->maybe_null())
5837
        f->set_null();
5838 5839
      else
      {
5840
        f->set_notnull();
5841 5842 5843 5844

        /*
          We only unpack the field if it was non-null
        */
5845
        const char *const old_ptr= pack_ptr;
5846
        pack_ptr= f->unpack(f->ptr, pack_ptr);
5847 5848
        DBUG_PRINT("debug", ("Unpacking field '%s' from %d bytes",
                             f->field_name, pack_ptr - old_ptr));
5849 5850
      }

5851
      bitmap_set_bit(rw_set, f->field_index);
5852
      null_mask <<= 1;
5853 5854
    }
  }
5855

5856 5857 5858 5859 5860 5861 5862
  /*
    We should now have read all the null bytes, otherwise something is
    really wrong.
   */
  DBUG_ASSERT(null_ptr == row_data + master_null_byte_count);

  *row_end = pack_ptr;
5863 5864 5865 5866 5867 5868
  if (master_reclength)
  {
    if (*field_ptr)
      *master_reclength = (*field_ptr)->ptr - (char*) table->record[0];
    else
      *master_reclength = table->s->reclength;
5869
  }
5870

5871 5872 5873 5874 5875 5876
  /*
    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,
5877 5878 5879 5880
    so redo that.

    This generation of error messages is only relevant when inserting
    new rows.
5881 5882 5883
   */
  for ( ; *field_ptr ; ++field_ptr)
  {
5884
    uint32 const mask= NOT_NULL_FLAG | NO_DEFAULT_VALUE_FLAG;
5885
    Field *const f= *field_ptr;
5886 5887 5888

    if (event_type == WRITE_ROWS_EVENT &&
        ((*field_ptr)->flags & mask) == mask)
5889
    {
5890
      slave_print_msg(ERROR_LEVEL, rli, ER_NO_DEFAULT_FOR_FIELD,
5891 5892
                      "Field `%s` of table `%s`.`%s` "
                      "has no default value and cannot be NULL",
5893
                      (*field_ptr)->field_name, table->s->db.str,
5894 5895
                      table->s->table_name.str);
      error = ER_NO_DEFAULT_FOR_FIELD;
5896 5897
    }
    else
5898
      f->set_default();
5899
  }
5900

5901
  DBUG_RETURN(error);
5902 5903
}

5904
int Rows_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
5905
{
5906
  DBUG_ENTER("Rows_log_event::do_apply_event(st_relay_log_info*)");
5907
  int error= 0;
5908
  char const *row_start= (char const *)m_rows_buf;
5909 5910

  /*
5911 5912 5913 5914
    If m_table_id == ~0UL, then we have a dummy event that does not
    contain any data.  In that case, we just remove all tables in the
    tables_to_lock list, close the thread tables, and return with
    success.  The relay log position will be stepped in 
5915
   */
5916
  if (m_table_id == ~0UL)
5917 5918 5919 5920 5921 5922 5923
  {
    /*
       This one is supposed to be set: just an extra check so that
       nothing strange has happened.
     */
    DBUG_ASSERT(get_flags(STMT_END_F));

5924
    const_cast<RELAY_LOG_INFO*>(rli)->clear_tables_to_lock();
5925
    close_thread_tables(thd);
5926 5927 5928
    thd->clear_error();
    DBUG_RETURN(0);
  }
5929 5930 5931

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

  /*
5938 5939 5940 5941
    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.
5942
  */
5943
  if (!thd->lock)
5944
  {
5945 5946
    bool need_reopen= 1; /* To execute the first lap of the loop below */

5947
    /*
5948
      lock_tables() reads the contents of thd->lex, so they must be
5949
      initialized. Contrary to in
5950
      Table_map_log_event::do_apply_event() we don't call
5951
      mysql_init_query() as that may reset the binlog format.
5952
    */
5953
    lex_start(thd, NULL, 0);
5954

5955 5956 5957
    while ((error= lock_tables(thd, rli->tables_to_lock,
                               rli->tables_to_lock_count, &need_reopen)))
    {
5958 5959
      if (!need_reopen)
      {
5960 5961 5962 5963 5964 5965 5966 5967 5968 5969 5970 5971 5972 5973 5974 5975 5976 5977 5978 5979
        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,
                          "Error '%s' in %s event: when locking tables",
                          (actual_error ? thd->net.last_error :
                           "unexpected success or fatal error"),
                          get_type_str());
          thd->is_fatal_error= 1;
        }
        else
        {
          slave_print_msg(ERROR_LEVEL, rli, error,
                         "Error in %s event: when locking tables",
                         get_type_str());
        }
5980
        const_cast<RELAY_LOG_INFO*>(rli)->clear_tables_to_lock();
5981 5982
        DBUG_RETURN(error);
      }
5983

5984
      /*
5985
        So we need to reopen the tables.
5986

5987 5988
        We need to flush the pending RBR event, since it keeps a
        pointer to an open table.
5989

5990 5991 5992
        ALTERNATIVE SOLUTION (not implemented): Extract a pointer to
        the pending RBR event and reset the table pointer after the
        tables has been reopened.
5993

5994 5995
        NOTE: For this new scheme there should be no pending event:
        need to add code to assert that is the case.
5996 5997
       */
      thd->binlog_flush_pending_rows_event(false);
5998 5999
      TABLE_LIST *tables= rli->tables_to_lock;
      close_tables_for_reopen(thd, &tables);
6000

6001 6002
      uint tables_count= rli->tables_to_lock_count;
      if ((error= open_tables(thd, &tables, &tables_count, 0)))
6003 6004 6005 6006 6007 6008 6009 6010 6011
      {
        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,
6012
                          "Error '%s' on reopening tables",
6013
                          (actual_error ? thd->net.last_error :
6014
                           "unexpected success or fatal error"));
6015 6016
          thd->query_error= 1;
        }
6017
        const_cast<RELAY_LOG_INFO*>(rli)->clear_tables_to_lock();
6018
        DBUG_RETURN(error);
6019
      }
6020
    }
6021 6022 6023 6024 6025 6026 6027 6028 6029 6030

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

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

    {
6031
      RPL_TABLE_LIST *ptr= rli->tables_to_lock;
6032 6033 6034 6035 6036 6037 6038
      for ( ; ptr ; ptr= static_cast<RPL_TABLE_LIST*>(ptr->next_global))
      {
        if (ptr->m_tabledef.compatible_with(rli, ptr->table))
        {
          mysql_unlock_tables(thd, thd->lock);
          thd->lock= 0;
          thd->query_error= 1;
6039
          const_cast<RELAY_LOG_INFO*>(rli)->clear_tables_to_lock();
6040 6041 6042 6043 6044
          DBUG_RETURN(ERR_BAD_TABLE_DEF);
        }
      }
    }

6045
    /*
6046 6047
      ... and then we add all the tables to the table map and remove
      them from tables to lock.
6048 6049 6050

      We also invalidate the query cache for all the tables, since
      they will now be changed.
6051 6052 6053 6054 6055 6056 6057

      TODO [/Matz]: Maybe the query cache should not be invalidated
      here? It might be that a table is not changed, even though it
      was locked for the statement.  We do know that each
      Rows_log_event contain at least one row, so after processing one
      Rows_log_event, we can invalidate the query cache for the
      associated table.
6058
     */
6059
    for (TABLE_LIST *ptr= rli->tables_to_lock ; ptr ; ptr= ptr->next_global)
6060
    {
6061
      const_cast<RELAY_LOG_INFO*>(rli)->m_table_map.set_table(ptr->table_id, ptr->table);
6062
    }
6063 6064 6065
#ifdef HAVE_QUERY_CACHE
    query_cache.invalidate_locked_for_write(rli->tables_to_lock);
#endif
6066
    const_cast<RELAY_LOG_INFO*>(rli)->clear_tables_to_lock();
6067 6068
  }

6069 6070
  DBUG_ASSERT(rli->tables_to_lock == NULL && rli->tables_to_lock_count == 0);

6071
  TABLE* table= const_cast<RELAY_LOG_INFO*>(rli)->m_table_map.get_table(m_table_id);
6072 6073 6074 6075 6076

  if (table)
  {
    /*
      table == NULL means that this table should not be replicated
6077
      (this was set up by Table_map_log_event::do_apply_event()
6078
      which tested replicate-* rules).
6079
    */
6080 6081 6082 6083 6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094 6095 6096 6097 6098 6099 6100 6101 6102 6103 6104 6105 6106 6107

    /*
      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);
6108 6109
    while (error == 0 && row_start < (const char*) m_rows_end)
    {
6110 6111
      char const *row_end= NULL;
      if ((error= do_prepare_row(thd, rli, table, row_start, &row_end)))
6112 6113
        break; // We should perform the after-row operation even in
               // the case of error
6114

6115
      DBUG_ASSERT(row_end != NULL); // cannot happen
6116
      DBUG_ASSERT(row_end <= (const char*)m_rows_end);
6117 6118 6119 6120 6121 6122 6123 6124 6125 6126 6127 6128 6129 6130 6131 6132 6133 6134

      /* 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:
6135
	slave_print_msg(ERROR_LEVEL, rli, thd->net.last_errno,
6136 6137 6138 6139 6140 6141 6142 6143 6144
                        "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",
6145
                    const_cast<RELAY_LOG_INFO*>(rli)->abort_slave= 1;);
6146 6147
    error= do_after_row_operations(table, error);
    if (!cache_stmt)
6148 6149 6150 6151
    {
      DBUG_PRINT("info", ("Marked that we need to keep log"));
      thd->options|= OPTION_KEEP_LOG;
    }
6152 6153 6154 6155
  }

  if (error)
  {                     /* error has occured during the transaction */
6156
    slave_print_msg(ERROR_LEVEL, rli, thd->net.last_errno,
tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
6157 6158 6159 6160
                    "Error in %s event: error during transaction execution "
                    "on table %s.%s",
                    get_type_str(), table->s->db.str, 
                    table->s->table_name.str);
6161

tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
6162
     /*
6163 6164 6165 6166 6167 6168 6169 6170
      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.
6171
      rollback at the caller along with sbr.
6172
    */
6173
    thd->reset_current_stmt_binlog_row_based();
6174
    const_cast<RELAY_LOG_INFO*>(rli)->cleanup_context(thd, error);
6175 6176 6177 6178 6179 6180 6181 6182 6183 6184 6185 6186 6187 6188 6189 6190 6191 6192 6193 6194 6195 6196 6197 6198 6199 6200 6201 6202 6203 6204 6205 6206 6207 6208 6209 6210 6211 6212 6213 6214 6215 6216
    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.
    */

6217
    thd->reset_current_stmt_binlog_row_based();
6218
    const_cast<RELAY_LOG_INFO*>(rli)->cleanup_context(thd, 0);
6219 6220 6221 6222 6223 6224 6225 6226 6227 6228 6229 6230 6231 6232 6233 6234 6235

    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();
    }
    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
6236 6237
                      get_type_str(), table->s->db.str, 
                      table->s->table_name.str);
6238 6239 6240
    DBUG_RETURN(error);
  }

6241
  if (table && (table->s->primary_key == MAX_KEY) && !cache_stmt)
6242 6243
  {
    /*
6244 6245 6246 6247 6248 6249 6250 6251 6252 6253 6254 6255 6256
      ------------ 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
6257
      st_relay_log_info::last_event_start_time and all its occurences.
6258
    */
6259
    const_cast<RELAY_LOG_INFO*>(rli)->last_event_start_time= time(0);
6260 6261 6262 6263
  }

  DBUG_ASSERT(error == 0);
  thd->clear_error();
6264

6265 6266
  DBUG_RETURN(0);
}
6267

6268 6269 6270 6271 6272 6273
#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
6274
  DBUG_ASSERT(m_table_id != ~0UL);
6275 6276 6277 6278 6279 6280 6281 6282 6283 6284 6285 6286 6287 6288 6289 6290 6291
  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
6292
  char sbuf[sizeof(m_width)];
6293 6294
  my_ptrdiff_t const data_size= m_rows_cur - m_rows_buf;

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

knielsen@mysql.com's avatar
knielsen@mysql.com committed
6298 6299
  return (my_b_safe_write(file, reinterpret_cast<byte*>(sbuf),
                          sbuf_end - sbuf) ||
6300 6301
          my_b_safe_write(file, reinterpret_cast<byte*>(m_cols.bitmap),
                          no_bytes_in_map(&m_cols)) ||
6302
          my_b_safe_write(file, m_rows_buf, (uint) data_size));
6303 6304 6305
}
#endif

6306
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6307 6308
void Rows_log_event::pack_info(Protocol *protocol)
{
6309 6310 6311
  char buf[256];
  char const *const flagstr=
    get_flags(STMT_END_F) ? " flags: STMT_END_F" : "";
6312 6313
  my_size_t bytes= my_snprintf(buf, sizeof(buf),
                               "table_id: %lu%s", m_table_id, flagstr);
6314
  protocol->store(buf, bytes, &my_charset_bin);
6315 6316 6317
}
#endif

6318 6319 6320 6321 6322 6323 6324 6325 6326 6327 6328
#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);
6329
    my_b_printf(head, "\t%s: table id %lu\n", name, m_table_id);
6330 6331 6332 6333 6334
    print_base64(body, print_event_info, !last_stmt_event);
  }

  if (get_flags(STMT_END_F))
  {
6335 6336
    copy_event_cache_to_file_and_reinit(head, file);
    copy_event_cache_to_file_and_reinit(body, file);
6337 6338 6339 6340
  }
}
#endif

6341
/**************************************************************************
6342
	Table_map_log_event member functions and support functions
6343 6344 6345 6346 6347 6348 6349 6350 6351 6352 6353 6354 6355 6356 6357 6358 6359 6360 6361 6362
**************************************************************************/

/*
  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)
{
6363
  DBUG_ASSERT(m_table_id != ~0UL);
6364 6365 6366 6367 6368 6369 6370 6371 6372 6373 6374 6375
  /*
    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
6376
  DBUG_EXECUTE_IF("old_row_based_repl_4_byte_map_id_master", m_data_size= 6;);
6377 6378 6379 6380 6381 6382 6383
  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
6384
    m_coltype= reinterpret_cast<uchar*>(m_memory);
6385 6386 6387 6388 6389 6390 6391 6392 6393 6394 6395 6396 6397 6398 6399 6400 6401 6402 6403 6404 6405 6406 6407 6408
    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];
6409
  DBUG_PRINT("info",("event_len: %u  common_header_len: %d  post_header_len: %d",
6410 6411
                     event_len, common_header_len, post_header_len));

6412 6413 6414 6415 6416
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
6417
  DBUG_DUMP("event buffer", buf, event_len);
6418
#endif
6419 6420 6421 6422 6423 6424 6425 6426 6427 6428 6429 6430 6431 6432

  /* 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);
6433
    m_table_id= (ulong) uint6korr(post_start);
6434 6435 6436
    post_start+= TM_FLAGS_OFFSET;
  }

6437
  DBUG_ASSERT(m_table_id != ~0UL);
6438 6439 6440 6441 6442 6443 6444

  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 */
6445
  byte const *const ptr_dblen= (byte const*)vpart + 0;
monty@mysql.com's avatar
monty@mysql.com committed
6446
  m_dblen= *(uchar*) ptr_dblen;
6447 6448

  /* Length of database name + counter + terminating null */
6449
  byte const *const ptr_tbllen= ptr_dblen + m_dblen + 2;
monty@mysql.com's avatar
monty@mysql.com committed
6450
  m_tbllen= *(uchar*) ptr_tbllen;
6451 6452

  /* Length of table name + counter + terminating null */
6453
  byte const *const ptr_colcnt= ptr_tbllen + m_tbllen + 2;
6454 6455
  uchar *ptr_after_colcnt= (uchar*) ptr_colcnt;
  m_colcnt= net_field_length(&ptr_after_colcnt);
6456

6457
  DBUG_PRINT("info",("m_dblen: %lu  off: %ld  m_tbllen: %lu  off: %ld  m_colcnt: %lu  off: %ld",
6458 6459 6460
                     m_dblen, (long) (ptr_dblen-(const byte*)vpart), 
                     m_tbllen, (long) (ptr_tbllen-(const byte*)vpart),
                     m_colcnt, (long) (ptr_colcnt-(const byte*)vpart)));
6461 6462 6463 6464 6465 6466 6467 6468 6469 6470 6471

  /* 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 */
6472 6473
    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);
6474 6475 6476 6477 6478 6479 6480 6481 6482 6483 6484 6485 6486 6487 6488 6489 6490 6491 6492 6493 6494 6495 6496 6497
    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)
6498
int Table_map_log_event::do_apply_event(RELAY_LOG_INFO const *rli)
6499
{
6500
  DBUG_ENTER("Table_map_log_event::do_apply_event(st_relay_log_info*)");
6501 6502 6503 6504 6505 6506 6507 6508

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

6509
  RPL_TABLE_LIST *table_list;
6510 6511 6512
  char *db_mem, *tname_mem;
  void *const memory=
    my_multi_malloc(MYF(MY_WME),
6513
                    &table_list, sizeof(RPL_TABLE_LIST),
6514 6515 6516 6517
                    &db_mem, NAME_LEN + 1,
                    &tname_mem, NAME_LEN + 1,
                    NULL);

6518 6519
  if (memory == NULL)
    DBUG_RETURN(HA_ERR_OUT_OF_MEM);
6520

6521
  uint dummy_len;
6522 6523 6524 6525 6526 6527 6528 6529 6530
  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);
6531 6532 6533

  int error= 0;

6534 6535 6536 6537 6538 6539
  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
6540
  {
6541 6542 6543 6544 6545 6546
    /*
      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);
6547
    /*
6548 6549 6550
      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.
6551
    */
6552 6553
    if (!thd->current_stmt_binlog_row_based &&
        mysql_bin_log.is_open() && (thd->options & OPTION_BIN_LOG))
6554
    {
6555
      thd->set_current_stmt_binlog_row_based();
6556 6557 6558
    }

    /*
6559 6560 6561 6562 6563 6564 6565 6566 6567 6568 6569 6570 6571 6572 6573 6574
      Open the table if it is not already open and add the table to
      table map.  Note that for any table that should not be
      replicated, a filter is needed.

      The creation of a new TABLE_LIST is used to up-cast the
      table_list consisting of RPL_TABLE_LIST items. This will work
      since the only case where the argument to open_tables() is
      changed, is when thd->lex->query_tables == table_list, i.e.,
      when the statement requires prelocking. Since this is not
      executed when a statement is executed, this case will not occur.
      As a precaution, an assertion is added to ensure that the bad
      case is not a fact.

      Either way, the memory in the list is *never* released
      internally in the open_tables() function, hence we take a copy
      of the pointer to make sure that it's not lost.
6575 6576
    */
    uint count;
6577 6578 6579
    DBUG_ASSERT(thd->lex->query_tables != table_list);
    TABLE_LIST *tmp_table_list= table_list;
    if ((error= open_tables(thd, &tmp_table_list, &count, 0)))
6580
    {
6581
      if (thd->query_error || thd->is_fatal_error)
6582
      {
6583 6584 6585 6586 6587
        /*
          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;
6588 6589 6590 6591 6592 6593
        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;
6594
      }
6595
      goto err;
6596 6597
    }

6598
    m_table= table_list->table;
6599 6600 6601 6602 6603 6604 6605

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

6606 6607 6608
    /*
      Use placement new to construct the table_def instance in the
      memory allocated for it inside table_list.
6609 6610 6611 6612 6613

      The memory allocated by the table_def structure (i.e., not the
      memory allocated *for* the table_def structure) is released
      inside st_relay_log_info::clear_tables_to_lock() by calling the
      table_def destructor explicitly.
6614
    */
6615
    new (&table_list->m_tabledef) table_def(m_coltype, m_colcnt);
6616
    table_list->m_tabledef_valid= TRUE;
6617 6618

    /*
6619
      We record in the slave's information that the table should be
mats@romeo.(none)'s avatar
mats@romeo.(none) committed
6620
      locked by linking the table into the list of tables to lock.
6621
    */
6622
    table_list->next_global= table_list->next_local= rli->tables_to_lock;
6623 6624
    const_cast<RELAY_LOG_INFO*>(rli)->tables_to_lock= table_list;
    const_cast<RELAY_LOG_INFO*>(rli)->tables_to_lock_count++;
6625
    /* 'memory' is freed in clear_tables_to_lock */
6626 6627
  }

6628
  DBUG_RETURN(error);
6629

6630 6631
err:
  my_free((gptr) memory, MYF(MY_WME));
6632 6633
  DBUG_RETURN(error);
}
6634 6635 6636 6637 6638 6639 6640

int Table_map_log_event::do_update_pos(RELAY_LOG_INFO *rli)
{
  rli->inc_event_relay_log_pos();
  return 0;
}

6641 6642 6643 6644 6645
#endif /* !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION) */

#ifndef MYSQL_CLIENT
bool Table_map_log_event::write_data_header(IO_CACHE *file)
{
6646
  DBUG_ASSERT(m_table_id != ~0UL);
6647 6648 6649 6650 6651 6652 6653 6654 6655 6656 6657 6658 6659 6660 6661 6662 6663 6664 6665 6666
  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);

6667 6668
  byte const dbuf[]= { (byte) m_dblen };
  byte const tbuf[]= { (byte) m_tbllen };
6669

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

6674
  return (my_b_safe_write(file, dbuf,      sizeof(dbuf)) ||
6675
          my_b_safe_write(file, (const byte*)m_dbnam,   m_dblen+1) ||
6676
          my_b_safe_write(file, tbuf,      sizeof(tbuf)) ||
6677
          my_b_safe_write(file, (const byte*)m_tblnam,  m_tbllen+1) ||
knielsen@mysql.com's avatar
knielsen@mysql.com committed
6678
          my_b_safe_write(file, reinterpret_cast<byte*>(cbuf),
kent@mysql.com's avatar
Merge  
kent@mysql.com committed
6679
                          cbuf_end - (char*) cbuf) ||
6680
          my_b_safe_write(file, reinterpret_cast<byte*>(m_coltype), m_colcnt));
6681 6682 6683 6684 6685 6686 6687 6688 6689 6690
 }
#endif

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

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

6691
#if defined(HAVE_REPLICATION) && !defined(MYSQL_CLIENT)
6692 6693 6694
void Table_map_log_event::pack_info(Protocol *protocol)
{
    char buf[256];
6695 6696
    my_size_t bytes= my_snprintf(buf, sizeof(buf),
                                 "table_id: %lu (%s.%s)",
6697
                              m_table_id, m_dbnam, m_tblnam);
6698 6699
    protocol->store(buf, bytes, &my_charset_bin);
}
6700 6701
#endif

6702 6703 6704 6705 6706 6707 6708 6709 6710

#endif


#ifdef MYSQL_CLIENT
void Table_map_log_event::print(FILE *file, PRINT_EVENT_INFO *print_event_info)
{
  if (!print_event_info->short_form)
  {
6711 6712 6713 6714 6715
    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);
6716 6717 6718 6719 6720 6721 6722 6723 6724 6725 6726 6727 6728 6729 6730 6731 6732 6733 6734 6735 6736 6737 6738 6739 6740 6741 6742 6743 6744 6745 6746 6747 6748 6749 6750 6751 6752 6753 6754 6755 6756 6757 6758 6759 6760 6761 6762 6763 6764 6765 6766 6767 6768 6769
  }
}
#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
6770
  table->file->extra(HA_EXTRA_IGNORE_DUP_KEY);  // Needed for ndbcluster
6771
  table->file->extra(HA_EXTRA_WRITE_CAN_REPLACE);  // Needed for ndbcluster
tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
6772
  table->file->extra(HA_EXTRA_IGNORE_NO_KEY);   // Needed for ndbcluster
6773 6774 6775 6776 6777
  /*
    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.
  */
6778
  table->file->ha_start_bulk_insert(0);
6779 6780 6781 6782 6783 6784 6785 6786 6787 6788 6789 6790 6791 6792 6793 6794 6795 6796 6797 6798 6799 6800
  /*
    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)
6801
    error= table->file->ha_end_bulk_insert();
6802 6803 6804
  return error;
}

6805
int Write_rows_log_event::do_prepare_row(THD *thd, RELAY_LOG_INFO const *rli,
6806
                                         TABLE *table,
6807 6808
                                         char const *const row_start,
                                         char const **const row_end)
6809 6810
{
  DBUG_ASSERT(table != NULL);
6811 6812 6813
  DBUG_ASSERT(row_start && row_end);

  int error;
6814 6815
  error= unpack_row(rli, table, m_width, row_start, &m_cols, row_end,
                    &m_master_reclength, table->write_set, WRITE_ROWS_EVENT);
6816
  bitmap_copy(table->read_set, table->write_set);
6817
  return error;
6818 6819 6820 6821 6822 6823 6824 6825 6826 6827 6828 6829 6830 6831 6832 6833 6834 6835 6836 6837 6838 6839 6840 6841 6842 6843 6844 6845 6846 6847 6848 6849 6850 6851 6852 6853 6854 6855 6856 6857 6858 6859 6860 6861 6862
}

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

}


6863 6864 6865 6866 6867 6868 6869 6870 6871 6872 6873 6874 6875
/*
  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)
{
6876
  DBUG_PRINT("info", ("Copying to 0x%lx "
6877
                      "from field %lu at offset %lu "
6878 6879
                      "to field %d at offset %lu",
                      (long) table->record[0],
6880
                      (ulong) master_fields, (ulong) master_reclength,
6881
                      table->s->fields, table->s->reclength));
6882 6883 6884 6885 6886
  /*
    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);
6887 6888 6889 6890 6891 6892 6893 6894 6895 6896 6897 6898 6899 6900 6901 6902 6903 6904 6905 6906 6907 6908 6909 6910 6911 6912 6913 6914 6915 6916 6917 6918 6919 6920 6921 6922 6923 6924 6925 6926 6927 6928 6929
  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;

6930
      case MYSQL_TYPE_BIT:
6931
        Field_bit *f= static_cast<Field_bit*>(*field_ptr);
6932 6933 6934 6935 6936 6937 6938
        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);
        }
6939 6940 6941 6942 6943 6944 6945
        break;
      }
    }
  }
  return 0;                                     // All OK
}

6946 6947
#define DBUG_PRINT_BITSET(N,FRM,BS)                \
  do {                                             \
6948 6949 6950 6951 6952 6953 6954
    char buf[256];                                 \
    for (uint i = 0 ; i < (BS)->n_bits ; ++i)      \
      buf[i] = bitmap_is_set((BS), i) ? '1' : '0'; \
    buf[(BS)->n_bits] = '\0';                      \
    DBUG_PRINT((N), ((FRM), buf));                 \
  } while (0)

6955

6956 6957 6958 6959 6960 6961 6962 6963 6964 6965 6966 6967 6968 6969 6970 6971 6972 6973 6974 6975 6976 6977 6978 6979 6980 6981
/**
   Check if an error is a duplicate key error.

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

   @param errcode The error code to check.

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


6982 6983 6984
/*
  Replace the provided record in the database.

6985 6986 6987 6988 6989 6990 6991 6992
  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.
6993

6994 6995
  RETURN VALUE
      Error code on failure, 0 on success.
6996

6997 6998 6999 7000
  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.
7001 7002
 */
static int
7003 7004 7005
replace_record(THD *thd, TABLE *table,
               ulong const master_reclength,
               uint const master_fields)
7006
{
7007
  DBUG_ENTER("replace_record");
7008 7009 7010 7011 7012 7013
  DBUG_ASSERT(table != NULL && thd != NULL);

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

7014 7015 7016 7017 7018 7019
#ifndef DBUG_OFF
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
  DBUG_PRINT_BITSET("debug", "write_set = %s", table->write_set);
  DBUG_PRINT_BITSET("debug", "read_set = %s", table->read_set);
#endif

7020 7021
  while ((error= table->file->ha_write_row(table->record[0])))
  {
7022 7023 7024 7025 7026
    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);
    }
7027 7028 7029
    if ((keynum= table->file->get_dup_key(error)) < 0)
    {
      /* We failed to retrieve the duplicate key */
7030
      DBUG_RETURN(error);
7031 7032 7033 7034 7035 7036 7037 7038 7039 7040 7041 7042
    }

    /*
       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.
     */
7043
    if (table->file->ha_table_flags() & HA_DUPLICATE_POS)
7044
    {
7045
      error= table->file->rnd_pos(table->record[1], table->file->dup_ref);
7046
      if (error)
7047 7048
      {
        table->file->print_error(error, MYF(0));
7049
        DBUG_RETURN(error);
7050
      }
7051 7052 7053 7054 7055
    }
    else
    {
      if (table->file->extra(HA_EXTRA_FLUSH_CACHE))
      {
7056
        DBUG_RETURN(my_errno);
7057 7058 7059 7060 7061 7062
      }

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

7066
      key_copy((byte*)key.get(), table->record[0], table->key_info + keynum, 0);
7067
      error= table->file->index_read_idx(table->record[1], keynum,
7068
                                         (const byte*)key.get(),
7069 7070 7071
                                         table->key_info[keynum].key_length,
                                         HA_READ_KEY_EXACT);
      if (error)
7072 7073
      {
        table->file->print_error(error, MYF(0));
7074
        DBUG_RETURN(error);
7075
      }
7076 7077 7078 7079 7080 7081 7082
    }

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

7083 7084 7085
       First we copy the columns into table->record[0] that are not
       present on the master from table->record[1], if there are any.
    */
7086
    copy_extra_record_fields(table, master_reclength, master_fields);
7087

7088
    /*
7089 7090 7091 7092 7093 7094 7095 7096 7097 7098 7099 7100 7101 7102 7103 7104 7105 7106 7107
       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]);
7108 7109
      if (error)
        table->file->print_error(error, MYF(0));
7110
      DBUG_RETURN(error);
7111 7112 7113 7114
    }
    else
    {
      if ((error= table->file->ha_delete_row(table->record[1])))
7115 7116
      {
        table->file->print_error(error, MYF(0));
7117
        DBUG_RETURN(error);
7118
      }
7119 7120 7121
      /* Will retry ha_write_row() with the offending row removed. */
    }
  }
7122

7123
  DBUG_RETURN(error);
7124 7125 7126 7127 7128
}

int Write_rows_log_event::do_exec_row(TABLE *table)
{
  DBUG_ASSERT(table != NULL);
7129
  int error= replace_record(thd, table, m_master_reclength, m_width);
7130 7131 7132 7133 7134 7135 7136
  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)
{
7137
  Rows_log_event::print_helper(file, print_event_info, "Write_rows");
7138 7139 7140 7141 7142 7143 7144 7145
}
#endif

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

#if !defined(MYSQL_CLIENT) && defined(HAVE_REPLICATION)
7146 7147 7148 7149 7150 7151
/*
  Compares table->record[0] and table->record[1]

  Returns TRUE if different.
*/
static bool record_compare(TABLE *table)
7152
{
7153 7154 7155 7156 7157 7158 7159 7160 7161 7162 7163 7164 7165 7166 7167 7168 7169 7170 7171 7172 7173 7174 7175 7176 7177 7178 7179
  /*
    Need to set the X bit and the filler bits in both records since
    there are engines that do not set it correctly.

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

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

  bool result= FALSE;
  byte saved_x[2], saved_filler[2];

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

7180
  if (table->s->blob_fields + table->s->varchar_fields == 0)
7181 7182 7183 7184 7185
  {
    result= cmp_record(table,record[1]);
    goto record_compare_exit;
  }

7186 7187 7188 7189
  /* Compare null bits */
  if (memcmp(table->null_flags,
	     table->null_flags+table->s->rec_buff_length,
	     table->s->null_bytes))
7190 7191 7192 7193 7194
  {
    result= TRUE;				// Diff in NULL value
    goto record_compare_exit;
  }

7195 7196
  /* Compare updated fields */
  for (Field **ptr=table->field ; *ptr ; ptr++)
7197
  {
7198
    if ((*ptr)->cmp_binary_offset(table->s->rec_buff_length))
7199 7200 7201 7202 7203 7204 7205 7206 7207 7208 7209 7210 7211 7212 7213 7214 7215 7216 7217 7218
    {
      result= TRUE;
      goto record_compare_exit;
    }
  }

record_compare_exit:
  /*
    Restore the saved bytes.

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

  return result;
7222 7223 7224 7225 7226
}


/*
  Find the row given by 'key', if the table has keys, or else use a table scan
7227 7228 7229 7230 7231 7232 7233 7234 7235 7236 7237 7238 7239 7240 7241 7242 7243 7244 7245 7246
  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.
7247
 */
7248

7249
static int find_and_fetch_row(TABLE *table, byte *key)
7250 7251
{
  DBUG_ENTER("find_and_fetch_row(TABLE *table, byte *key, byte *record)");
7252 7253
  DBUG_PRINT("enter", ("table: 0x%lx, key: 0x%lx  record: 0x%lx",
		       (long) table, (long) key, (long) table->record[1]));
7254 7255 7256

  DBUG_ASSERT(table->in_use != NULL);

7257 7258
  DBUG_DUMP("record[0]", table->record[0], table->s->reclength);

7259 7260
  if ((table->file->ha_table_flags() & HA_PRIMARY_KEY_REQUIRED_FOR_POSITION) &&
      table->s->primary_key < MAX_KEY)
7261 7262 7263 7264 7265 7266
  {
    /*
      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
7267
      the "cursor" (i.e., record[0] in this case) at the correct row.
7268 7269 7270 7271 7272 7273 7274 7275 7276 7277 7278

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

7279 7280
    */
    table->file->position(table->record[0]);
7281 7282 7283 7284 7285 7286 7287
    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);
7288 7289
  }

tomas@poseidon.ndb.mysql.com's avatar
tomas@poseidon.ndb.mysql.com committed
7290
  /* We need to retrieve all fields */
7291 7292
  /* 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
7293

7294 7295 7296
  if (table->s->keys > 0)
  {
    int error;
7297
    /* We have a key: search the table using the index */
7298
    if (!table->file->inited && (error= table->file->ha_index_init(0, FALSE)))
7299
      DBUG_RETURN(error);
7300

7301 7302 7303 7304 7305
  /*
    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
7306 7307
    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);
7308 7309
#endif

7310 7311 7312 7313 7314 7315
    /*
      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.
    */
7316 7317 7318
    my_ptrdiff_t const pos=
      table->s->null_bytes > 0 ? table->s->null_bytes - 1 : 0;
    table->record[1][pos]= 0xFF;
7319 7320 7321
    if ((error= table->file->index_read(table->record[1], key,
                                        table->key_info->key_length,
                                        HA_READ_KEY_EXACT)))
7322 7323
    {
      table->file->print_error(error, MYF(0));
7324
      table->file->ha_index_end();
7325 7326 7327
      DBUG_RETURN(error);
    }

7328 7329 7330 7331 7332
  /*
    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
7333 7334
    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);
7335
#endif
7336 7337 7338 7339 7340 7341 7342 7343 7344 7345 7346 7347 7348
    /*
      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.
7349
    */
7350
    if (table->key_info->flags & HA_NOSAME)
7351 7352
    {
      table->file->ha_index_end();
7353
      DBUG_RETURN(0);
7354
    }
7355

7356
    while (record_compare(table))
7357 7358
    {
      int error;
7359

7360 7361 7362 7363 7364
      /*
        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.
7365 7366 7367

        TODO[record format ndb]: Remove this code once NDB returns the
        correct record format.
7368
      */
7369 7370 7371 7372 7373 7374
      if (table->s->null_bytes > 0)
      {
        table->record[1][table->s->null_bytes - 1]|=
          256U - (1U << table->s->last_null_bit_pos);
      }

7375
      if ((error= table->file->index_next(table->record[1])))
7376 7377
      {
	table->file->print_error(error, MYF(0));
7378
        table->file->ha_index_end();
7379 7380 7381
	DBUG_RETURN(error);
      }
    }
7382 7383 7384 7385 7386

    /*
      Have to restart the scan to be able to fetch the next row.
    */
    table->file->ha_index_end();
7387 7388 7389 7390
  }
  else
  {
    int restart_count= 0; // Number of times scanning has restarted from top
7391 7392 7393 7394 7395 7396 7397
    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 */
7398 7399
    do
    {
7400
      error= table->file->rnd_next(table->record[1]);
7401

7402 7403
      DBUG_DUMP("record[0]", table->record[0], table->s->reclength);
      DBUG_DUMP("record[1]", table->record[1], table->s->reclength);
7404

7405 7406 7407 7408 7409 7410 7411 7412 7413 7414 7415 7416 7417
      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));
7418
        DBUG_PRINT("info", ("Record not found"));
7419
        table->file->ha_rnd_end();
7420 7421 7422
	DBUG_RETURN(error);
      }
    }
7423
    while (restart_count < 2 && record_compare(table));
7424

7425 7426 7427
    /*
      Have to restart the scan to be able to fetch the next row.
    */
7428
    DBUG_PRINT("info", ("Record %sfound", restart_count == 2 ? "not " : ""));
7429 7430
    table->file->ha_rnd_end();

7431 7432 7433 7434 7435 7436 7437 7438 7439 7440 7441 7442 7443 7444 7445 7446 7447 7448
    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
7449
  ,m_memory(NULL), m_key(NULL), m_after_image(NULL)
7450 7451 7452 7453 7454 7455 7456 7457 7458 7459 7460 7461 7462 7463 7464 7465
#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),
7466
    m_memory(NULL), m_key(NULL), m_after_image(NULL)
7467 7468 7469 7470 7471 7472 7473 7474 7475 7476
#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);

7477
  if ((table->file->ha_table_flags() & HA_PRIMARY_KEY_REQUIRED_FOR_POSITION) &&
7478 7479 7480
      table->s->primary_key < MAX_KEY)
  {
    /*
7481
      We don't need to allocate any memory for m_after_image and
7482 7483 7484 7485 7486 7487 7488 7489 7490 7491 7492
      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),
7493
		      &m_after_image, table->s->reclength,
7494 7495 7496 7497 7498
		      &m_key, table->key_info->key_length,
		      NULL);
  }
  else
  {
7499 7500
    m_after_image= (byte*)my_malloc(table->s->reclength, MYF(MY_WME));
    m_memory= (gptr)m_after_image;
7501 7502 7503 7504 7505 7506 7507 7508 7509 7510 7511 7512 7513
    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
7514
  m_memory= NULL;
7515
  m_after_image= NULL;
7516
  m_key= NULL;
7517 7518 7519 7520

  return error;
}

7521
int Delete_rows_log_event::do_prepare_row(THD *thd, RELAY_LOG_INFO const *rli,
7522
                                          TABLE *table,
7523 7524
                                          char const *const row_start,
                                          char const **const row_end)
7525
{
7526 7527
  int error;
  DBUG_ASSERT(row_start && row_end);
7528 7529 7530 7531 7532 7533
  /*
    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);

7534 7535
  error= unpack_row(rli, table, m_width, row_start, &m_cols, row_end,
                    &m_master_reclength, table->read_set, DELETE_ROWS_EVENT);
7536 7537 7538 7539 7540 7541 7542 7543 7544 7545 7546
  /*
    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);
  }

7547
  return error;
7548 7549 7550 7551
}

int Delete_rows_log_event::do_exec_row(TABLE *table)
{
7552
  int error;
7553 7554
  DBUG_ASSERT(table != NULL);

7555 7556 7557 7558 7559 7560 7561 7562
  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]);
7563
  }
7564 7565 7566 7567 7568 7569 7570 7571 7572
  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)
{
7573
  Rows_log_event::print_helper(file, print_event_info, "Delete_rows");
7574 7575 7576 7577 7578 7579 7580 7581 7582 7583 7584 7585 7586 7587 7588 7589 7590 7591 7592 7593 7594 7595 7596 7597 7598 7599 7600 7601 7602 7603 7604 7605 7606 7607 7608 7609 7610 7611 7612 7613 7614 7615 7616 7617 7618 7619 7620 7621 7622 7623 7624 7625
}
#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),
7626
		      &m_after_image, table->s->reclength,
7627 7628 7629 7630 7631
		      &m_key, table->key_info->key_length,
		      NULL);
  }
  else
  {
7632 7633
    m_after_image= (byte*)my_malloc(table->s->reclength, MYF(MY_WME));
    m_memory= (gptr)m_after_image;
7634 7635 7636 7637 7638 7639 7640 7641 7642 7643 7644 7645 7646 7647 7648
    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));
7649
  m_memory= NULL;
7650
  m_after_image= NULL;
7651
  m_key= NULL;
7652 7653 7654 7655

  return error;
}

7656
int Update_rows_log_event::do_prepare_row(THD *thd, RELAY_LOG_INFO const *rli,
7657
                                          TABLE *table,
7658 7659
                                          char const *const row_start,
                                          char const **const row_end)
7660
{
7661 7662
  int error;
  DBUG_ASSERT(row_start && row_end);
7663 7664 7665 7666 7667 7668
  /*
    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);

7669 7670 7671 7672 7673 7674
  /*
    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().
  */

7675
  /* record[0] is the before image for the update */
7676 7677 7678
  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]);
7679
  char const *next_start = *row_end;
7680
  /* m_after_image is the after image for the update */
7681 7682 7683 7684
  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]);
7685

7686 7687 7688 7689 7690
  /*
    Don't print debug messages when running valgrind since they can
    trigger false warnings.
   */
#ifndef HAVE_purify
7691 7692
  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);
7693
#endif
7694

7695 7696 7697 7698 7699 7700 7701 7702 7703 7704 7705
  /*
    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);
  }

7706
  return error;
7707 7708 7709 7710 7711 7712
}

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

7713
  int error= find_and_fetch_row(table, m_key);
7714 7715 7716
  if (error)
    return error;

7717
  /*
7718 7719 7720 7721 7722 7723
    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
7724 7725 7726 7727 7728
    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.
7729
  */
7730
  bmove_align(table->record[0], m_after_image, table->s->reclength);
7731
  copy_extra_record_fields(table, m_master_reclength, m_width);
7732

7733
  /*
7734 7735 7736 7737
    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.
7738
  */
7739
  error= table->file->ha_update_row(table->record[1], table->record[0]);
7740 7741 7742 7743 7744 7745 7746 7747 7748

  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)
{
7749
  Rows_log_event::print_helper(file, print_event_info, "Update_rows");
7750 7751 7752
}
#endif