log.cc 39.7 KB
Newer Older
unknown's avatar
unknown committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
/* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
   
   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
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.
   
   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.
   
   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 */


/* logging of commands */
19
/* TODO: Abort logging when we get an error in reading or writing log files */
unknown's avatar
unknown committed
20

21 22 23 24
#ifdef __EMX__
#include <io.h>
#endif

unknown's avatar
unknown committed
25 26
#include "mysql_priv.h"
#include "sql_acl.h"
unknown's avatar
unknown committed
27
#include "sql_repl.h"
unknown's avatar
unknown committed
28 29 30 31

#include <my_dir.h>
#include <stdarg.h>
#include <m_ctype.h>				// For test_if_number
32
#include <assert.h>
unknown's avatar
unknown committed
33

34 35
#define files_charset_info my_charset_latin1

unknown's avatar
unknown committed
36 37 38 39 40 41 42 43 44 45 46 47 48 49
MYSQL_LOG mysql_log,mysql_update_log,mysql_slow_log,mysql_bin_log;
extern I_List<i_string> binlog_do_db, binlog_ignore_db;

static bool test_if_number(const char *str,
			   long *res, bool allow_wildcards);

/****************************************************************************
** Find a uniq filename for 'filename.#'.
** Set # to a number as low as possible
** returns != 0 if not possible to get uniq filename
****************************************************************************/

static int find_uniq_filename(char *name)
{
50 51 52 53
  long                  number;
  uint                  i;
  char                  buff[FN_REFLEN];
  struct st_my_dir     *dir_info;
unknown's avatar
unknown committed
54
  reg1 struct fileinfo *file_info;
55 56
  ulong                 max_found=0;

unknown's avatar
unknown committed
57 58
  DBUG_ENTER("find_uniq_filename");

59 60 61 62
  uint  length = dirname_part(buff,name);
  char *start  = name + length;
  char *end    = strend(start);

unknown's avatar
unknown committed
63
  *end='.';
unknown's avatar
unknown committed
64
  length= (uint) (end-start+1);
unknown's avatar
unknown committed
65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82

  if (!(dir_info = my_dir(buff,MYF(MY_DONT_SORT))))
  {						// This shouldn't happen
    strmov(end,".1");				// use name+1
    DBUG_RETURN(0);
  }
  file_info= dir_info->dir_entry;
  for (i=dir_info->number_off_files ; i-- ; file_info++)
  {
    if (bcmp(file_info->name,start,length) == 0 &&
	test_if_number(file_info->name+length, &number,0))
    {
      set_if_bigger(max_found,(ulong) number);
    }
  }
  my_dirend(dir_info);

  *end++='.';
83
  sprintf(end,"%06ld",max_found+1);
unknown's avatar
unknown committed
84 85 86
  DBUG_RETURN(0);
}

87

unknown's avatar
unknown committed
88
MYSQL_LOG::MYSQL_LOG()
89
  :bytes_written(0), last_time(0), query_start(0), name(0),
unknown's avatar
unknown committed
90 91
   file_id(1), open_count(1), log_type(LOG_CLOSED), write_error(0), inited(0),
   no_rotate(0), need_start_event(1)
unknown's avatar
unknown committed
92 93 94 95 96
{
  /*
    We don't want to intialize LOCK_Log here as the thread system may
    not have been initailized yet. We do it instead at 'open'.
  */
97 98
  index_file_name[0] = 0;
  bzero((char*) &log_file,sizeof(log_file));
99
  bzero((char*) &index_file, sizeof(index_file));
unknown's avatar
unknown committed
100 101
}

102

unknown's avatar
unknown committed
103 104 105
MYSQL_LOG::~MYSQL_LOG()
{
  if (inited)
106 107 108
  {
    (void) pthread_mutex_destroy(&LOCK_log);
    (void) pthread_mutex_destroy(&LOCK_index);
unknown's avatar
unknown committed
109
    (void) pthread_cond_destroy(&update_cond);
110
  }
unknown's avatar
unknown committed
111 112
}

113

unknown's avatar
unknown committed
114 115
int MYSQL_LOG::generate_new_name(char *new_name, const char *log_name)
{      
116 117
  fn_format(new_name,log_name,mysql_data_home,"",4);
  if (log_type != LOG_NORMAL)
unknown's avatar
unknown committed
118 119 120 121 122 123 124 125 126 127 128 129 130
  {
    if (!fn_ext(log_name)[0])
    {
      if (find_uniq_filename(new_name))
      {
	sql_print_error(ER(ER_NO_UNIQUE_LOGFILE), log_name);
	return 1;
      }
    }
  }
  return 0;
}

131

132
void MYSQL_LOG::init(enum_log_type log_type_arg,
133 134
		     enum cache_type io_cache_type_arg,
		     bool no_auto_events_arg)
135 136
{
  log_type = log_type_arg;
137
  io_cache_type = io_cache_type_arg;
138
  no_auto_events = no_auto_events_arg;
139 140
  if (!inited)
  {
141
    inited= 1;
142 143
    (void) pthread_mutex_init(&LOCK_log,MY_MUTEX_INIT_SLOW);
    (void) pthread_mutex_init(&LOCK_index, MY_MUTEX_INIT_SLOW);
144
    (void) pthread_cond_init(&update_cond, 0);
145 146 147
  }
}

unknown's avatar
unknown committed
148

149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165
/*
  Open a (new) log file.

  DESCRIPTION
  - If binary logs, also open the index file and register the new
    file name in it
  - When calling this when the file is in use, you must have a locks
    on LOCK_log and LOCK_index.

  RETURN VALUES
    0	ok
    1	error
*/

bool MYSQL_LOG::open(const char *log_name, enum_log_type log_type_arg,
		     const char *new_name, const char *index_file_name_arg,
		     enum cache_type io_cache_type_arg,
166
		     bool no_auto_events_arg)
unknown's avatar
unknown committed
167
{
168
  char buff[512];
169
  File file= -1, index_file_nr= -1;
170
  int open_flags = O_CREAT | O_APPEND | O_BINARY;
unknown's avatar
unknown committed
171
  DBUG_ENTER("MYSQL_LOG::open");
172 173 174 175
  DBUG_PRINT("enter",("log_type: %d",(int) log_type));

  last_time=query_start=0;
  write_error=0;
unknown's avatar
unknown committed
176

177
  if (!inited && log_type_arg == LOG_BIN && *fn_ext(log_name))
unknown's avatar
unknown committed
178
    no_rotate = 1;
179
  init(log_type_arg,io_cache_type_arg,no_auto_events_arg);
180 181 182
  
  if (!(name=my_strdup(log_name,MYF(MY_WME))))
    goto err;
unknown's avatar
unknown committed
183 184 185
  if (new_name)
    strmov(log_file_name,new_name);
  else if (generate_new_name(log_file_name, name))
186
    goto err;
187 188 189 190 191 192
  
  if (io_cache_type == SEQ_READ_APPEND)
    open_flags |= O_RDWR;
  else
    open_flags |= O_WRONLY;
  
unknown's avatar
unknown committed
193
  db[0]=0;
unknown's avatar
unknown committed
194
  open_count++;
195
  if ((file=my_open(log_file_name,open_flags,
196
		    MYF(MY_WME | ME_WAITTANG))) < 0 ||
197
      init_io_cache(&log_file, file, IO_SIZE, io_cache_type,
198 199
		    my_tell(file,MYF(MY_WME)), 0, MYF(MY_WME | MY_NABP)))
    goto err;
unknown's avatar
unknown committed
200

201 202
  switch (log_type) {
  case LOG_NORMAL:
unknown's avatar
unknown committed
203
  {
204
    char *end;
unknown's avatar
unknown committed
205
#ifdef __NT__
206
    sprintf(buff, "%s, Version: %s, started with:\nTCP Port: %d, Named Pipe: %s\n", my_progname, server_version, mysql_port, mysql_unix_port);
unknown's avatar
unknown committed
207
#else
208
    sprintf(buff, "%s, Version: %s, started with:\nTcp port: %d  Unix socket: %s\n", my_progname,server_version,mysql_port,mysql_unix_port);
unknown's avatar
unknown committed
209
#endif
210
    end=strmov(strend(buff),"Time                 Id Command    Argument\n");
unknown's avatar
unknown committed
211
    if (my_b_write(&log_file, (byte*) buff,(uint) (end-buff)) ||
212 213
	flush_io_cache(&log_file))
      goto err;
214
    break;
unknown's avatar
unknown committed
215
  }
216
  case LOG_NEW:
unknown's avatar
unknown committed
217 218 219 220
  {
    time_t skr=time(NULL);
    struct tm tm_tmp;
    localtime_r(&skr,&tm_tmp);
221 222 223 224 225 226 227 228 229 230 231 232
    ulong length;
    length= my_sprintf(buff,
		       (buff,
			"# %s, Version: %s at %02d%02d%02d %2d:%02d:%02d\n",
			my_progname,server_version,
			tm_tmp.tm_year % 100,
			tm_tmp.tm_mon+1,
			tm_tmp.tm_mday,
			tm_tmp.tm_hour,
			tm_tmp.tm_min,
			tm_tmp.tm_sec));
    if (my_b_write(&log_file, (byte*) buff, length) ||
233 234
	flush_io_cache(&log_file))
      goto err;
235
    break;
unknown's avatar
unknown committed
236
  }
237
  case LOG_BIN:
unknown's avatar
unknown committed
238
  {
239 240 241 242
    bool write_file_name_to_index_file=0;

    myf opt= MY_UNPACK_FILENAME;
    if (!index_file_name_arg)
unknown's avatar
unknown committed
243
    {
244 245 246 247 248 249 250 251 252 253 254 255 256
      index_file_name_arg= name;	// Use same basename for index file
      opt= MY_UNPACK_FILENAME | MY_REPLACE_EXT;
    }
  
    if (!my_b_filelength(&log_file))
    {
      /*
	The binary log file was empty (probably newly created)
	This is the normal case and happens when the user doesn't specify
	an extension for the binary log files.
	In this case we write a standard header to it.
      */
      if (my_b_write(&log_file, (byte*) BINLOG_MAGIC, BIN_LOG_HEADER_SIZE))
unknown's avatar
unknown committed
257
        goto err;
unknown's avatar
unknown committed
258
      bytes_written += BIN_LOG_HEADER_SIZE;
259
      write_file_name_to_index_file=1;
unknown's avatar
unknown committed
260
    }
unknown's avatar
unknown committed
261

262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285
    if (!my_b_inited(&index_file))
    {
      /*
	First open of this class instance
	Create an index file that will hold all file names uses for logging.
	Add new entries to the end of it.
      */
      fn_format(index_file_name, index_file_name_arg, mysql_data_home,
		".index", opt);
      if ((index_file_nr= my_open(index_file_name,
				  O_RDWR | O_CREAT | O_BINARY ,
				  MYF(MY_WME))) < 0 ||
	  init_io_cache(&index_file, index_file_nr,
			IO_SIZE, WRITE_CACHE,
			my_seek(index_file_nr,0L,MY_SEEK_END,MYF(0)),
			0, MYF(MY_WME)))
	goto err;
    }
    else
    {
      safe_mutex_assert_owner(&LOCK_index);
      reinit_io_cache(&index_file, WRITE_CACHE, my_b_filelength(&index_file),
		      0, 0);
    }
286
    if (need_start_event && !no_auto_events)
287
    {
288
      need_start_event=0;
289
      Start_log_event s;
290
      s.set_log_pos(this);
291 292
      s.write(&log_file);
    }
293
    if (flush_io_cache(&log_file))
unknown's avatar
unknown committed
294
      goto err;
295 296 297 298 299 300 301 302 303

    if (write_file_name_to_index_file)
    {
      /* As this is a new log file, we write the file name to the index file */
      if (my_b_write(&index_file, (byte*) log_file_name,
		     strlen(log_file_name)) ||
	  my_b_write(&index_file, (byte*) "\n", 1) ||
	  flush_io_cache(&index_file))
	goto err;
unknown's avatar
unknown committed
304
    }
305
    break;
unknown's avatar
unknown committed
306
  }
307 308 309 310 311
  case LOG_CLOSED:				// Impossible
    DBUG_ASSERT(1);
    break;
  }
  DBUG_RETURN(0);
312 313

err:
314
  sql_print_error("Could not use %s for logging (error %d)", log_name, errno);
315 316
  if (file >= 0)
    my_close(file,MYF(0));
317 318
  if (index_file_nr >= 0)
    my_close(index_file_nr,MYF(0));
319
  end_io_cache(&log_file);
320 321
  end_io_cache(&index_file);
  safeFree(name);
322
  log_type=LOG_CLOSED;
323
  DBUG_RETURN(1);
unknown's avatar
unknown committed
324 325
}

326

unknown's avatar
unknown committed
327 328 329
int MYSQL_LOG::get_current_log(LOG_INFO* linfo)
{
  pthread_mutex_lock(&LOCK_log);
330 331
  strmake(linfo->log_file_name, log_file_name, sizeof(linfo->log_file_name)-1);
  linfo->pos = my_b_tell(&log_file);
unknown's avatar
unknown committed
332 333 334 335
  pthread_mutex_unlock(&LOCK_log);
  return 0;
}

unknown's avatar
unknown committed
336

337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399
/*
  Move all data up in a file in an filename index file

  SYNOPSIS
    copy_up_file_and_fill()
    index_file			File to move
    offset			Move everything from here to beginning

  NOTE
    File will be truncated to be 'offset' shorter or filled up with
    newlines

  IMPLEMENTATION
    We do the copy outside of the IO_CACHE as the cache buffers would just
    make things slower and more complicated.
    In most cases the copy loop should only do one read.

  RETURN VALUES
    0	ok
*/

static bool copy_up_file_and_fill(IO_CACHE *index_file, my_off_t offset)
{
  int bytes_read;
  my_off_t init_offset= offset;
  File file= index_file->file;
  byte io_buf[IO_SIZE*2];
  DBUG_ENTER("copy_up_file_and_fill");

  for (;; offset+= bytes_read)
  {
    (void) my_seek(file, offset, MY_SEEK_SET, MYF(0));
    if ((bytes_read= (int) my_read(file, io_buf, sizeof(io_buf), MYF(MY_WME)))
	< 0)
      goto err;
    if (!bytes_read)
      break;					// end of file
    (void) my_seek(file, offset-init_offset, MY_SEEK_SET, MYF(0));
    if (my_write(file, (byte*) io_buf, bytes_read, MYF(MY_WME | MY_NABP)))
      goto err;
  }
  /* The following will either truncate the file or fill the end with \n' */
  if (my_chsize(file, offset - init_offset, '\n', MYF(MY_WME)))
    goto err;

  /* Reset data in old index cache */
  reinit_io_cache(index_file, READ_CACHE, (my_off_t) 0, 0, 1);
  DBUG_RETURN(0);

err:
  DBUG_RETURN(1);
}


/*
  Find the position in the log-index-file for the given log name

  SYNOPSIS
    find_log_pos()
    linfo		Store here the found log file name and position to
			the NEXT log file name in the index file.
    log_name		Filename to find in the index file.
			Is a null pointer if we want to read the first entry
unknown's avatar
unknown committed
400
    need_lock		Set this to 1 if the parent doesn't already have a
401 402 403
			lock on LOCK_index

  NOTE
unknown's avatar
unknown committed
404 405
    On systems without the truncate function the file will end with one or
    more empty lines.  These will be ignored when reading the file.
406 407 408 409 410 411 412 413 414

  RETURN VALUES
    0			ok
    LOG_INFO_EOF	End of log-index-file found
    LOG_INFO_IO		Got IO error while reading file
*/

int MYSQL_LOG::find_log_pos(LOG_INFO *linfo, const char *log_name,
			    bool need_lock)
unknown's avatar
unknown committed
415
{
416 417 418 419 420
  int error= 0;
  char *fname= linfo->log_file_name;
  uint log_name_len= log_name ? (uint) strlen(log_name) : 0;
  DBUG_ENTER("find_log_pos");
  DBUG_PRINT("enter",("log_name: %s", log_name ? log_name : "NULL"));
unknown's avatar
unknown committed
421

unknown's avatar
unknown committed
422 423 424 425
  /*
    Mutex needed because we need to make sure the file pointer does not move
    from under our feet
  */
426
  if (need_lock)
427
    pthread_mutex_lock(&LOCK_index);
428 429 430 431 432
  safe_mutex_assert_owner(&LOCK_index);

  /* As the file is flushed, we can't get an error here */
  (void) reinit_io_cache(&index_file, READ_CACHE, (my_off_t) 0, 0, 0);

unknown's avatar
unknown committed
433
  for (;;)
434
  {
435
    uint length;
436 437 438 439
    my_off_t offset= my_b_tell(&index_file);
    /* If we get 0 or 1 characters, this is the end of the file */

    if ((length= my_b_gets(&index_file, fname, FN_REFLEN)) <= 1)
unknown's avatar
unknown committed
440
    {
441 442 443
      /* Did not find the given entry; Return not found or error */
      error= !index_file.error ? LOG_INFO_EOF : LOG_INFO_IO;
      break;
unknown's avatar
unknown committed
444 445
    }

446 447
    // if the log entry matches, null string matching anything
    if (!log_name ||
unknown's avatar
unknown committed
448
	(log_name_len == length-1 && fname[log_name_len] == '\n' &&
449
	 !memcmp(fname, log_name, log_name_len)))
unknown's avatar
unknown committed
450
    {
451
      DBUG_PRINT("info",("Found log file entry"));
452
      fname[length-1]=0;			// remove last \n
453 454
      linfo->index_file_start_offset= offset;
      linfo->index_file_offset = my_b_tell(&index_file);
455
      break;
unknown's avatar
unknown committed
456
    }
457
  }
458

459
  if (need_lock)
460
    pthread_mutex_unlock(&LOCK_index);
461
  DBUG_RETURN(error);
unknown's avatar
unknown committed
462
}
unknown's avatar
unknown committed
463

464

465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487
/*
  Find the position in the log-index-file for the given log name

  SYNOPSIS
    find_next_log()
    linfo		Store here the next log file name and position to
			the file name after that.
    need_lock		Set this to 1 if the parent doesn't already have a
			lock on LOCK_index

  NOTE
    - Before calling this function, one has to call find_log_pos()
      to set up 'linfo'
    - Mutex needed because we need to make sure the file pointer does not move
      from under our feet

  RETURN VALUES
    0			ok
    LOG_INFO_EOF	End of log-index-file found
    LOG_INFO_SEEK	Could not allocate IO cache
    LOG_INFO_IO		Got IO error while reading file
*/

488
int MYSQL_LOG::find_next_log(LOG_INFO* linfo, bool need_lock)
unknown's avatar
unknown committed
489
{
490
  int error= 0;
491
  uint length;
492 493
  char *fname= linfo->log_file_name;

494 495
  if (need_lock)
    pthread_mutex_lock(&LOCK_index);
496 497 498 499 500 501 502 503
  safe_mutex_assert_owner(&LOCK_index);

  /* As the file is flushed, we can't get an error here */
  (void) reinit_io_cache(&index_file, READ_CACHE, linfo->index_file_offset, 0,
			 0);

  linfo->index_file_start_offset= linfo->index_file_offset;
  if ((length=my_b_gets(&index_file, fname, FN_REFLEN)) <= 1)
504
  {
505
    error = !index_file.error ? LOG_INFO_EOF : LOG_INFO_IO;
506 507 508
    goto err;
  }
  fname[length-1]=0;				// kill /n
509
  linfo->index_file_offset = my_b_tell(&index_file);
510

unknown's avatar
unknown committed
511
err:
512 513
  if (need_lock)
    pthread_mutex_unlock(&LOCK_index);
unknown's avatar
unknown committed
514 515 516
  return error;
}

unknown's avatar
unknown committed
517

518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536
/*
  Delete all logs refered to in the index file
  Start writing to a new log file.  The new index file will only contain
  this file.

  SYNOPSIS
     reset_logs()
     thd		Thread

  NOTE
    If not called from slave thread, write start event to new log


  RETURN VALUES
    0	ok
    1   error
*/

bool MYSQL_LOG::reset_logs(THD* thd)
537 538
{
  LOG_INFO linfo;
539
  bool error=0;
540 541
  const char* save_name;
  enum_log_type save_log_type;
542
  DBUG_ENTER("reset_logs");
543

544 545 546 547
  /*
    We need to get both locks to be sure that no one is trying to
    write to the index log file.
  */
548
  pthread_mutex_lock(&LOCK_log);
549 550 551 552 553 554 555 556 557 558 559
  pthread_mutex_lock(&LOCK_index);

  /* Save variables so that we can reopen the log */
  save_name=name;
  name=0;					// Protect against free
  save_log_type=log_type;
  close(0);					// Don't close the index file

  /* First delete all old log files */

  if (find_log_pos(&linfo, NullS, 0))
560 561 562 563 564
  {
    error=1;
    goto err;
  }
  
unknown's avatar
unknown committed
565
  for (;;)
566 567
  {
    my_delete(linfo.log_file_name, MYF(MY_WME));
568
    if (find_next_log(&linfo, 0))
569 570
      break;
  }
571 572 573 574 575

  /* Start logging with a new file */
  close(1);					// Close index file
  my_delete(index_file_name, MYF(MY_WME));	// Reset (open will update)
  if (!thd->slave_thread)
576
    need_start_event=1;
577 578 579
  open(save_name, save_log_type, 0, index_file_name,
       io_cache_type, no_auto_events);
  my_free((gptr) save_name, MYF(0));
580

581
err:  
582
  pthread_mutex_unlock(&LOCK_index);
583
  pthread_mutex_unlock(&LOCK_log);
584
  DBUG_RETURN(error);
585 586
}

unknown's avatar
unknown committed
587

588 589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608
/*
  Delete the current log file, remove it from index file and start on next 

  SYNOPSIS
    purge_first_log()
    rli		Relay log information

  NOTE
    - This is only called from the slave-execute thread when it has read
      all commands from a log and want to switch to a new log.
    - When this happens, we should never be in an active transaction as
      a transaction is always written as a single block to the binary log.

  IMPLEMENTATION
    - Protects index file with LOCK_index
    - Delete first log file,
    - Copy all file names after this one to the front of the index file
    - If the OS has truncate, truncate the file, else fill it with \n'
    - Read the first file name from the index file and store in rli->linfo

  RETURN VALUES
609 610 611 612
    0			ok
    LOG_INFO_EOF	End of log-index-file found
    LOG_INFO_SEEK	Could not allocate IO cache
    LOG_INFO_IO		Got IO error while reading file
613 614
*/

615 616
int MYSQL_LOG::purge_first_log(struct st_relay_log_info* rli)
{
617
  int error;
618 619
  DBUG_ENTER("purge_first_log");

unknown's avatar
unknown committed
620
  /*
621 622
    Test pre-conditions.

unknown's avatar
unknown committed
623 624 625
    Assume that we have previously read the first log and
    stored it in rli->relay_log_name
  */
626 627 628
  DBUG_ASSERT(is_open());
  DBUG_ASSERT(rli->slave_running == 1);
  DBUG_ASSERT(!strcmp(rli->linfo.log_file_name,rli->relay_log_name));
629 630
  DBUG_ASSERT(rli->linfo.index_file_offset ==
	      strlen(rli->relay_log_name) + 1);
631

632 633
  /* We have already processed the relay log, so it's safe to delete it */
  my_delete(rli->relay_log_name, MYF(0));
634
  pthread_mutex_lock(&LOCK_index);
635
  if (copy_up_file_and_fill(&index_file, rli->linfo.index_file_offset))
636
  {
637
    error= LOG_INFO_IO;
638 639
    goto err;
  }
unknown's avatar
unknown committed
640 641

  /*
642 643 644 645
    Update the space counter used by all relay logs
    Ok to broadcast after the critical region as there is no risk of
    the mutex being destroyed by this thread later - this helps save
    context switches
unknown's avatar
unknown committed
646
  */
647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664
  pthread_mutex_lock(&rli->log_space_lock);
  rli->log_space_total -= rli->relay_log_pos;
  pthread_mutex_unlock(&rli->log_space_lock);
  pthread_cond_broadcast(&rli->log_space_cond);
  
  /*
    Read the next log file name from the index file and pass it back to
    the caller
  */
  if ((error=find_log_pos(&rli->linfo, NullS, 0 /*no mutex*/)))
  {
    char buff[22];
    sql_print_error("next log error: %d  offset: %s  log: %s",
		    error,
		    llstr(rli->linfo.index_file_offset,buff),
		    rli->linfo.log_file_name);
    goto err;
  }
665 666 667 668
  /*
    Reset position to current log.  This involves setting both of the
    position variables:
  */
669
  rli->relay_log_pos = BIN_LOG_HEADER_SIZE;
670
  rli->pending = 0;
671 672 673 674 675
  strmake(rli->relay_log_name,rli->linfo.log_file_name,
	  sizeof(rli->relay_log_name)-1);

  /* Store where we are in the new file for the execution thread */
  flush_relay_log_info(rli);
unknown's avatar
unknown committed
676

677
err:
678
  pthread_mutex_unlock(&LOCK_index);
679
  DBUG_RETURN(error);
680 681
}

unknown's avatar
unknown committed
682

683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701
/*
  Remove all logs before the given log from disk and from the index file.

  SYNOPSIS
    purge_logs()
    thd		Thread pointer
    to_log	Delete all log file name before this file. This file is not
		deleted

  NOTES
    If any of the logs before the deleted one is in use,
    only purge logs up to this one.

  RETURN VALUES
    0				ok
    LOG_INFO_PURGE_NO_ROTATE	Binary file that can't be rotated
    LOG_INFO_EOF		to_log not found
*/

unknown's avatar
unknown committed
702 703 704
int MYSQL_LOG::purge_logs(THD* thd, const char* to_log)
{
  int error;
705 706 707
  LOG_INFO log_info;
  DBUG_ENTER("purge_logs");

unknown's avatar
unknown committed
708
  if (no_rotate)
709 710
    DBUG_RETURN(LOG_INFO_PURGE_NO_ROTATE);

unknown's avatar
unknown committed
711
  pthread_mutex_lock(&LOCK_index);
712
  if ((error=find_log_pos(&log_info, to_log, 0 /*no mutex*/)))
713 714
    goto err;

715 716 717 718 719
  /*
    File name exists in index file; Delete until we find this file
    or a file that is used.
  */
  if ((error=find_log_pos(&log_info, NullS, 0 /*no mutex*/)))
720
    goto err;
721 722
  while (strcmp(to_log,log_info.log_file_name) &&
	 !log_in_use(log_info.log_file_name))
723
  {
724 725 726 727
    /* It's not fatal even if we can't delete a log file */
    my_delete(log_info.log_file_name, MYF(0));
    if (find_next_log(&log_info, 0))
      break;
728
  }
729

unknown's avatar
unknown committed
730 731 732 733
  /*
    If we get killed -9 here, the sysadmin would have to edit
    the log index file after restart - otherwise, this should be safe
  */
734 735

  if (copy_up_file_and_fill(&index_file, log_info.index_file_start_offset))
unknown's avatar
unknown committed
736
  {
737
    error= LOG_INFO_IO;
unknown's avatar
unknown committed
738 739
    goto err;
  }
740

741 742
  // now update offsets in index file for running threads
  adjust_linfo_offsets(log_info.index_file_start_offset);
743

unknown's avatar
unknown committed
744 745
err:
  pthread_mutex_unlock(&LOCK_index);
746
  DBUG_RETURN(error);
unknown's avatar
unknown committed
747 748
}

749 750 751 752 753 754 755 756 757 758 759 760

/*
  Create a new log file name

  SYNOPSIS
    make_log_name()
    buf			buf of at least FN_REFLEN where new name is stored

  NOTE
    If file name will be longer then FN_REFLEN it will be truncated
*/

unknown's avatar
unknown committed
761 762
void MYSQL_LOG::make_log_name(char* buf, const char* log_ident)
{
763
  if (inited)					// QQ When is this not true ?
764
  {
765 766 767 768 769
    uint dir_len = dirname_length(log_file_name); 
    if (dir_len > FN_REFLEN)
      dir_len=FN_REFLEN-1;
    strnmov(buf, log_file_name, dir_len);
    strmake(buf+dir_len, log_ident, FN_REFLEN - dir_len);
770
  }
unknown's avatar
unknown committed
771 772
}

773 774 775 776 777 778

/*
  Check if we are writing/reading to the given log file
*/

bool MYSQL_LOG::is_active(const char *log_file_name_arg)
unknown's avatar
unknown committed
779
{
780
  return inited && !strcmp(log_file_name, log_file_name_arg);
unknown's avatar
unknown committed
781 782
}

783 784 785 786 787 788 789 790 791 792 793 794 795 796

/*
  Start writing to a new log file or reopen the old file

  SYNOPSIS
    new_file()
    need_lock		Set to 1 (default) if caller has not locked
			LOCK_log and LOCK_index

  NOTE
    The new file name is stored last in the index file
*/

void MYSQL_LOG::new_file(bool need_lock)
unknown's avatar
unknown committed
797
{
798 799 800 801 802 803 804
  char new_name[FN_REFLEN], *new_name_ptr, *old_name;
  enum_log_type save_log_type;

  if (!is_open())
    return;					// Should never happen

  if (need_lock)
unknown's avatar
unknown committed
805
  {
806 807 808 809 810 811
    pthread_mutex_lock(&LOCK_log);
    pthread_mutex_lock(&LOCK_index);
  }    
  safe_mutex_assert_owner(&LOCK_log);
  safe_mutex_assert_owner(&LOCK_index);

812 813
  // Reuse old name if not binlog and not update log
  new_name_ptr= name;
unknown's avatar
unknown committed
814

815 816 817 818 819 820
  /*
    Only rotate open logs that are marked non-rotatable
    (binlog with constant name are non-rotatable)
  */
  if (!no_rotate)
  {
821 822 823 824 825 826 827 828 829
    /*
      If user hasn't specified an extension, generate a new log name
      We have to do this here and not in open as we want to store the
      new file name in the current binary log file.
    */
    if (generate_new_name(new_name, name))
      goto end;
    new_name_ptr=new_name;

830
    if (log_type == LOG_BIN)
unknown's avatar
unknown committed
831
    {
832
      if (!no_auto_events)
unknown's avatar
unknown committed
833
      {
834
	/*
835 836
	  We log the whole file name for log file as the user may decide
	  to change base names at some point.
837
	*/
838 839 840 841 842
	THD* thd = current_thd;
	Rotate_log_event r(thd,new_name+dirname_length(new_name));
	r.set_log_pos(this);

	/*
843
	  Because this log rotation could have been initiated by a master of
844
	  the slave running with log-bin, we set the flag on rotate
845
	  event to prevent infinite log rotation loop
846 847 848 849 850
	*/
	if (thd->slave_thread)
	  r.flags|= LOG_EVENT_FORCED_ROTATE_F;
	r.write(&log_file);
	bytes_written += r.get_event_len();
unknown's avatar
unknown committed
851
      }
852
      /*
853
	Update needs to be signalled even if there is no rotate event
854 855 856 857
	log rotation should give the waiting thread a signal to
	discover EOF and move on to the next log.
      */
      signal_update(); 
unknown's avatar
unknown committed
858
    }
859 860 861 862 863 864 865 866 867
  }
  old_name=name;
  save_log_type=log_type;
  name=0;				// Don't free name
  close();
  open(old_name, save_log_type, new_name_ptr, index_file_name, io_cache_type,
       no_auto_events);
  my_free(old_name,MYF(0));

868
end:
869 870 871 872
  if (need_lock)
  {
    pthread_mutex_unlock(&LOCK_index);
    pthread_mutex_unlock(&LOCK_log);
unknown's avatar
unknown committed
873 874 875
  }
}

876

877 878 879 880 881 882
bool MYSQL_LOG::append(Log_event* ev)
{
  bool error = 0;
  pthread_mutex_lock(&LOCK_log);
  
  DBUG_ASSERT(log_file.type == SEQ_READ_APPEND);
883 884 885 886
  /*
    Log_event::write() is smart enough to use my_b_write() or
    my_b_append() depending on the kind of cache we have.
  */
887 888 889 890 891
  if (ev->write(&log_file))
  {
    error=1;
    goto err;
  }
unknown's avatar
unknown committed
892
  bytes_written += ev->get_event_len();
893
  if ((uint) my_b_append_tell(&log_file) > max_binlog_size)
894
  {
895 896 897
    pthread_mutex_lock(&LOCK_index);
    new_file(0);
    pthread_mutex_unlock(&LOCK_index);
898
  }
899

900 901
err:  
  pthread_mutex_unlock(&LOCK_log);
902
  signal_update();				// Safe as we don't call close
903 904 905
  return error;
}

906

907 908
bool MYSQL_LOG::appendv(const char* buf, uint len,...)
{
909
  bool error= 0;
910 911 912
  va_list(args);
  va_start(args,len);
  
913 914
  DBUG_ASSERT(log_file.type == SEQ_READ_APPEND);
  
915 916 917
  pthread_mutex_lock(&LOCK_log);
  do
  {
unknown's avatar
unknown committed
918
    if (my_b_append(&log_file,(byte*) buf,len))
919
    {
920 921
      error= 1;
      goto err;
922
    }
unknown's avatar
unknown committed
923
    bytes_written += len;
924 925
  } while ((buf=va_arg(args,const char*)) && (len=va_arg(args,uint)));
  
unknown's avatar
unknown committed
926
  if ((uint) my_b_append_tell(&log_file) > max_binlog_size)
927
  {
928 929 930
    pthread_mutex_lock(&LOCK_index);
    new_file(0);
    pthread_mutex_unlock(&LOCK_index);
931
  }
932 933 934

err:
  pthread_mutex_unlock(&LOCK_log);
935 936 937 938
  if (!error)
    signal_update();
  return error;
}
unknown's avatar
unknown committed
939

unknown's avatar
unknown committed
940

941 942 943 944 945
/*
  Write to normal (not rotable) log
  This is the format for the 'normal', 'slow' and 'update' logs.
*/

946
bool MYSQL_LOG::write(THD *thd,enum enum_server_command command,
unknown's avatar
unknown committed
947 948
		      const char *format,...)
{
949
  if (is_open() && (what_to_log & (1L << (uint) command)))
unknown's avatar
unknown committed
950
  {
951 952
    uint length;
    int error= 0;
unknown's avatar
unknown committed
953
    VOID(pthread_mutex_lock(&LOCK_log));
954

unknown's avatar
unknown committed
955 956
    /* Test if someone closed between the is_open test and lock */
    if (is_open())
unknown's avatar
unknown committed
957 958 959
    {
      time_t skr;
      ulong id;
960 961 962 963
      va_list args;
      va_start(args,format);
      char buff[32];

unknown's avatar
unknown committed
964 965 966
      if (thd)
      {						// Normal thread
	if ((thd->options & OPTION_LOG_OFF) &&
unknown's avatar
unknown committed
967
	    (thd->master_access & SUPER_ACL))
unknown's avatar
unknown committed
968 969
	{
	  VOID(pthread_mutex_unlock(&LOCK_log));
970
	  return 0;				// No logging
unknown's avatar
unknown committed
971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987
	}
	id=thd->thread_id;
	if (thd->user_time || !(skr=thd->query_start()))
	  skr=time(NULL);			// Connected
      }
      else
      {						// Log from connect handler
	skr=time(NULL);
	id=0;
      }
      if (skr != last_time)
      {
	last_time=skr;
	struct tm tm_tmp;
	struct tm *start;
	localtime_r(&skr,&tm_tmp);
	start=&tm_tmp;
988 989 990 991 992 993 994 995
	/* Note that my_b_write() assumes it knows the length for this */
	sprintf(buff,"%02d%02d%02d %2d:%02d:%02d\t",
		start->tm_year % 100,
		start->tm_mon+1,
		start->tm_mday,
		start->tm_hour,
		start->tm_min,
		start->tm_sec);
unknown's avatar
unknown committed
996
	if (my_b_write(&log_file, (byte*) buff,16))
unknown's avatar
unknown committed
997 998
	  error=errno;
      }
unknown's avatar
unknown committed
999
      else if (my_b_write(&log_file, (byte*) "\t\t",2) < 0)
unknown's avatar
unknown committed
1000
	error=errno;
1001 1002 1003 1004
      length=my_sprintf(buff,
			(buff, "%7ld %-11.11s", id,
			 command_name[(uint) command]));
      if (my_b_write(&log_file, (byte*) buff,length))
unknown's avatar
unknown committed
1005 1006 1007
	error=errno;
      if (format)
      {
unknown's avatar
unknown committed
1008
	if (my_b_write(&log_file, (byte*) " ",1) ||
1009
	    my_b_vprintf(&log_file,format,args) == (uint) -1)
unknown's avatar
unknown committed
1010 1011
	  error=errno;
      }
unknown's avatar
unknown committed
1012
      if (my_b_write(&log_file, (byte*) "\n",1) ||
1013
	  flush_io_cache(&log_file))
unknown's avatar
unknown committed
1014 1015 1016 1017 1018 1019
	error=errno;
      if (error && ! write_error)
      {
	write_error=1;
	sql_print_error(ER(ER_ERROR_ON_WRITE),name,error);
      }
1020
      va_end(args);
unknown's avatar
unknown committed
1021 1022
    }
    VOID(pthread_mutex_unlock(&LOCK_log));
1023
    return error != 0;
unknown's avatar
unknown committed
1024
  }
1025
  return 0;
unknown's avatar
unknown committed
1026 1027 1028
}


1029 1030 1031 1032
/*
  Write an event to the binary log
*/

1033
bool MYSQL_LOG::write(Log_event* event_info)
unknown's avatar
unknown committed
1034
{
unknown's avatar
unknown committed
1035
  bool error=0;
1036
  DBUG_ENTER("MYSQL_LOG::write(event)");
1037
  
unknown's avatar
unknown committed
1038
  if (!inited)					// Can't use mutex if not init
1039 1040 1041 1042
  {
    DBUG_PRINT("error",("not initied"));
    DBUG_RETURN(0);
  }
1043 1044
  pthread_mutex_lock(&LOCK_log);

1045
  /* In most cases this is only called if 'is_open()' is true */
1046
  if (is_open())
unknown's avatar
unknown committed
1047
  {
1048
    bool should_rotate = 0;
1049
    THD *thd=event_info->thd;
1050
    const char *local_db = event_info->get_db();
unknown's avatar
unknown committed
1051
#ifdef USING_TRANSACTIONS    
1052
    IO_CACHE *file = ((event_info->get_cache_stmt()) ?
1053
		      &thd->transaction.trans_log :
1054
		      &log_file);
unknown's avatar
unknown committed
1055 1056 1057
#else
    IO_CACHE *file = &log_file;
#endif    
1058
    if ((thd && !(thd->options & OPTION_BIN_LOG) &&
unknown's avatar
unknown committed
1059
	 (thd->master_access & SUPER_ACL)) ||
1060
	(local_db && !db_ok(local_db, binlog_do_db, binlog_ignore_db)))
unknown's avatar
unknown committed
1061
    {
1062
      VOID(pthread_mutex_unlock(&LOCK_log));
1063 1064
      DBUG_PRINT("error",("!db_ok"));
      DBUG_RETURN(0);
1065
    }
1066

unknown's avatar
unknown committed
1067
    error=1;
unknown's avatar
unknown committed
1068 1069 1070 1071
    /*
      No check for auto events flag here - this write method should
      never be called if auto-events are enabled
    */
1072
    if (thd)
1073
    {
1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109
      if (thd->last_insert_id_used)
      {
	Intvar_log_event e(thd,(uchar) LAST_INSERT_ID_EVENT,
			   thd->last_insert_id);
	e.set_log_pos(this);
	if (thd->server_id)
	  e.server_id = thd->server_id;
	if (e.write(file))
	  goto err;
      }
      if (thd->insert_id_used)
      {
	Intvar_log_event e(thd,(uchar) INSERT_ID_EVENT,thd->last_insert_id);
	e.set_log_pos(this);
	if (thd->server_id)
	  e.server_id = thd->server_id;
	if (e.write(file))
	  goto err;
      }
      if (thd->rand_used)
      {
	Rand_log_event e(thd,thd->rand_saved_seed1,thd->rand_saved_seed2);
	e.set_log_pos(this);
	if (e.write(file))
	  goto err;
      }
      if (thd->variables.convert_set)
      {
	char buf[256], *p;
	p= strmov(strmov(buf, "SET CHARACTER SET "),
		  thd->variables.convert_set->name);
	Query_log_event e(thd, buf, (ulong) (p - buf), 0);
	e.set_log_pos(this);
	if (e.write(file))
	  goto err;
      }
1110
    }
1111
    event_info->set_log_pos(this);
1112 1113 1114 1115
    if (event_info->write(file) ||
	file == &log_file && flush_io_cache(file))
      goto err;
    error=0;
1116

unknown's avatar
unknown committed
1117 1118 1119 1120 1121 1122 1123 1124 1125
    /*
      Tell for transactional table handlers up to which position in the
      binlog file we wrote. The table handler can store this info, and
      after crash recovery print for the user the offset of the last
      transactions which were recovered. Actually, we must also call
      the table handler commit here, protected by the LOCK_log mutex,
      because otherwise the transactions may end up in a different order
      in the table handler log!
    */
1126

unknown's avatar
unknown committed
1127 1128
    if (file == &log_file)
    {
unknown's avatar
unknown committed
1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139
      /*
	LOAD DATA INFILE in AUTOCOMMIT=1 mode writes to the binlog
	chunks also before it is successfully completed. We only report
	the binlog write and do the commit inside the transactional table
	handler if the log event type is appropriate.
      */

      if (event_info->get_type_code() == QUERY_EVENT
          || event_info->get_type_code() == EXEC_LOAD_EVENT)
      {
	error = ha_report_binlog_offset_and_commit(thd, log_file_name,
unknown's avatar
unknown committed
1140
                                                 file->pos_in_file);
unknown's avatar
unknown committed
1141 1142
      }

unknown's avatar
unknown committed
1143
      should_rotate= (my_b_tell(file) >= (my_off_t) max_binlog_size); 
1144 1145
    }

1146 1147 1148 1149 1150 1151 1152 1153 1154 1155
err:
    if (error)
    {
      if (my_errno == EFBIG)
	my_error(ER_TRANS_CACHE_FULL, MYF(0));
      else
	my_error(ER_ERROR_ON_WRITE, MYF(0), name, errno);
      write_error=1;
    }
    if (file == &log_file)
1156
      signal_update();
1157
    if (should_rotate)
1158 1159 1160 1161 1162
    {
      pthread_mutex_lock(&LOCK_index);      
      new_file(0); // inside mutex
      pthread_mutex_unlock(&LOCK_index);
    }
1163
  }
1164 1165

  pthread_mutex_unlock(&LOCK_log);
1166
  DBUG_RETURN(error);
1167 1168
}

1169

unknown's avatar
unknown committed
1170 1171 1172 1173 1174 1175 1176 1177 1178
uint MYSQL_LOG::next_file_id()
{
  uint res;
  pthread_mutex_lock(&LOCK_log);
  res = file_id++;
  pthread_mutex_unlock(&LOCK_log);
  return res;
}

1179

1180 1181
/*
  Write a cached log entry to the binary log
1182 1183 1184

  NOTE
    - We only come here if there is something in the cache.
unknown's avatar
unknown committed
1185
    - The thing in the cache is always a complete transaction
1186 1187 1188 1189 1190
    - 'cache' needs to be reinitialized after this functions returns.

  IMPLEMENTATION
    - To support transaction over replication, we wrap the transaction
      with BEGIN/COMMIT in the binary log.
1191 1192
*/

1193
bool MYSQL_LOG::write(THD *thd, IO_CACHE *cache)
1194 1195
{
  VOID(pthread_mutex_lock(&LOCK_log));
1196
  DBUG_ENTER("MYSQL_LOG::write(cache");
1197
  
1198
  if (is_open())				// Should always be true
1199
  {
1200 1201
    uint length;

unknown's avatar
unknown committed
1202
    /*
1203 1204 1205 1206 1207 1208 1209 1210
      Add the "BEGIN" and "COMMIT" in the binlog around transactions
      which may contain more than 1 SQL statement. If we run with
      AUTOCOMMIT=1, then MySQL immediately writes each SQL statement to
      the binlog when the statement has been completed. No need to add
      "BEGIN" ... "COMMIT" around such statements. Otherwise, MySQL uses
      thd->transaction.trans_log to cache the SQL statements until the
      explicit commit, and at the commit writes the contents in .trans_log
      to the binlog.
unknown's avatar
unknown committed
1211

1212 1213 1214 1215 1216 1217 1218 1219 1220
      We write the "BEGIN" mark first in the buffer (.trans_log) where we
      store the SQL statements for a transaction. At the transaction commit
      we will add the "COMMIT mark and write the buffer to the binlog.
    */
    {
      Query_log_event qinfo(thd, "BEGIN", 5, TRUE);
      if (qinfo.write(&log_file))
	goto err;
    }
unknown's avatar
unknown committed
1221
    /* Read from the file used to cache the queries .*/
unknown's avatar
unknown committed
1222
    if (reinit_io_cache(cache, READ_CACHE, 0, 0, 0))
1223
      goto err;
1224 1225
    length=my_b_bytes_in_cache(cache);
    do
1226
    {
unknown's avatar
unknown committed
1227
      /* Write data to the binary log file */
unknown's avatar
unknown committed
1228
      if (my_b_write(&log_file, cache->read_pos, length))
1229
	goto err;
unknown's avatar
unknown committed
1230
      cache->read_pos=cache->read_end;		// Mark buffer used up
1231
    } while ((length=my_b_fill(cache)));
1232 1233 1234 1235 1236 1237

    /*
      We write the command "COMMIT" as the last SQL command in the
      binlog segment cached for this transaction
    */

1238
    {
1239 1240 1241
      Query_log_event qinfo(thd, "COMMIT", 6, TRUE);
      if (qinfo.write(&log_file) || flush_io_cache(&log_file))
	goto err;
1242 1243 1244
    }
    if (cache->error)				// Error on read
    {
unknown's avatar
unknown committed
1245
      sql_print_error(ER(ER_ERROR_ON_READ), cache->file_name, errno);
1246
      write_error=1;				// Don't give more errors
1247
      goto err;
unknown's avatar
unknown committed
1248
    }
1249 1250
    if ((ha_report_binlog_offset_and_commit(thd, log_file_name,
					    log_file.pos_in_file)))
1251
      goto err;
1252
    signal_update();
1253 1254 1255 1256 1257 1258 1259
    if (my_b_tell(&log_file) >= (my_off_t) max_binlog_size)
    {
      pthread_mutex_lock(&LOCK_index);
      new_file(0); // inside mutex
      pthread_mutex_unlock(&LOCK_index);
    }

unknown's avatar
unknown committed
1260
  }
1261
  VOID(pthread_mutex_unlock(&LOCK_log));
1262
  DBUG_RETURN(0);
1263 1264

err:
1265 1266 1267 1268 1269
  if (!write_error)
  {
    write_error= 1;
    sql_print_error(ER(ER_ERROR_ON_WRITE), name, errno);
  }
1270
  VOID(pthread_mutex_unlock(&LOCK_log));
1271
  DBUG_RETURN(1);
unknown's avatar
unknown committed
1272 1273
}

1274

1275 1276
/*
  Write update log in a format suitable for incremental backup
1277
  This is also used by the slow query log.
1278
*/
unknown's avatar
unknown committed
1279

1280
bool MYSQL_LOG::write(THD *thd,const char *query, uint query_length,
1281
		      time_t query_start_arg)
unknown's avatar
unknown committed
1282
{
1283
  bool error=0;
1284
  if (is_open())
unknown's avatar
unknown committed
1285
  {
1286
    time_t current_time;
unknown's avatar
unknown committed
1287
    VOID(pthread_mutex_lock(&LOCK_log));
1288
    if (is_open())
unknown's avatar
unknown committed
1289
    {						// Safety agains reopen
1290
      int tmp_errno=0;
unknown's avatar
unknown committed
1291 1292 1293
      char buff[80],*end;
      end=buff;
      if (!(thd->options & OPTION_UPDATE_LOG) &&
unknown's avatar
unknown committed
1294
	  (thd->master_access & SUPER_ACL))
unknown's avatar
unknown committed
1295 1296
      {
	VOID(pthread_mutex_unlock(&LOCK_log));
1297
	return 0;
unknown's avatar
unknown committed
1298
      }
1299
      if ((specialflag & SPECIAL_LONG_LOG_FORMAT) || query_start_arg)
unknown's avatar
unknown committed
1300
      {
1301 1302
	current_time=time(NULL);
	if (current_time != last_time)
unknown's avatar
unknown committed
1303
	{
1304
	  last_time=current_time;
unknown's avatar
unknown committed
1305 1306
	  struct tm tm_tmp;
	  struct tm *start;
1307
	  localtime_r(&current_time,&tm_tmp);
unknown's avatar
unknown committed
1308
	  start=&tm_tmp;
1309 1310 1311 1312 1313 1314 1315 1316
	  /* Note that my_b_write() assumes it knows the length for this */
	  sprintf(buff,"# Time: %02d%02d%02d %2d:%02d:%02d\n",
		  start->tm_year % 100,
		  start->tm_mon+1,
		  start->tm_mday,
		  start->tm_hour,
		  start->tm_min,
		  start->tm_sec);
unknown's avatar
unknown committed
1317
	  if (my_b_write(&log_file, (byte*) buff,24))
1318
	    tmp_errno=errno;
unknown's avatar
unknown committed
1319
	}
unknown's avatar
unknown committed
1320
	if (my_b_printf(&log_file, "# User@Host: %s[%s] @ %s [%s]\n",
1321 1322 1323
			thd->priv_user,
			thd->user,
			thd->host ? thd->host : "",
unknown's avatar
unknown committed
1324
			thd->ip ? thd->ip : "") == (uint) -1)
1325
	  tmp_errno=errno;
unknown's avatar
unknown committed
1326
      }
1327
      if (query_start_arg)
1328 1329
      {
	/* For slow query log */
1330
	if (my_b_printf(&log_file,
1331
			"# Query_time: %lu  Lock_time: %lu  Rows_sent: %lu  Rows_examined: %lu\n",
1332 1333
			(ulong) (current_time - query_start_arg),
			(ulong) (thd->time_after_lock - query_start_arg),
1334 1335 1336
			(ulong) thd->sent_row_count,
			(ulong) thd->examined_row_count) == (uint) -1)
	  tmp_errno=errno;
1337
      }
unknown's avatar
unknown committed
1338 1339
      if (thd->db && strcmp(thd->db,db))
      {						// Database changed
unknown's avatar
unknown committed
1340
	if (my_b_printf(&log_file,"use %s;\n",thd->db) == (uint) -1)
1341
	  tmp_errno=errno;
unknown's avatar
unknown committed
1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359
	strmov(db,thd->db);
      }
      if (thd->last_insert_id_used)
      {
	end=strmov(end,",last_insert_id=");
	end=longlong10_to_str((longlong) thd->current_insert_id,end,-10);
      }
      // Save value if we do an insert.
      if (thd->insert_id_used)
      {
	if (specialflag & SPECIAL_LONG_LOG_FORMAT)
	{
	  end=strmov(end,",insert_id=");
	  end=longlong10_to_str((longlong) thd->last_insert_id,end,-10);
	}
      }
      if (thd->query_start_used)
      {
1360
	if (query_start_arg != thd->query_start())
unknown's avatar
unknown committed
1361
	{
1362
	  query_start_arg=thd->query_start();
unknown's avatar
unknown committed
1363
	  end=strmov(end,",timestamp=");
1364
	  end=int10_to_str((long) query_start_arg,end,10);
unknown's avatar
unknown committed
1365 1366 1367 1368 1369
	}
      }
      if (end != buff)
      {
	*end++=';';
1370
	*end='\n';
unknown's avatar
unknown committed
1371
	if (my_b_write(&log_file, (byte*) "SET ",4) ||
1372
	    my_b_write(&log_file, (byte*) buff+1,(uint) (end-buff)))
1373
	  tmp_errno=errno;
unknown's avatar
unknown committed
1374 1375 1376
      }
      if (!query)
      {
1377 1378 1379
	end=strxmov(buff, "# administrator command: ",
		    command_name[thd->command], NullS);
	query_length=(ulong) (end-buff);
unknown's avatar
unknown committed
1380
	query=buff;
unknown's avatar
unknown committed
1381
      }
unknown's avatar
unknown committed
1382 1383
      if (my_b_write(&log_file, (byte*) query,query_length) ||
	  my_b_write(&log_file, (byte*) ";\n",2) ||
1384
	  flush_io_cache(&log_file))
1385 1386
	tmp_errno=errno;
      if (tmp_errno)
unknown's avatar
unknown committed
1387
      {
1388 1389 1390 1391 1392 1393
	error=1;
	if (! write_error)
	{
	  write_error=1;
	  sql_print_error(ER(ER_ERROR_ON_WRITE),name,error);
	}
unknown's avatar
unknown committed
1394 1395 1396 1397
      }
    }
    VOID(pthread_mutex_unlock(&LOCK_log));
  }
1398
  return error;
unknown's avatar
unknown committed
1399 1400
}

1401 1402 1403 1404 1405 1406 1407 1408 1409
/*
  Wait until we get a signal that the binary log has been updated

  SYNOPSIS
    wait_for_update()
    thd			Thread variable

  NOTES
    One must have a lock on LOCK_log before calling this function.
1410 1411 1412 1413 1414 1415
    This lock will be freed before return!

    The reason for the above is that for enter_cond() / exit_cond() to
    work the mutex must be got before enter_cond() but releases before
    exit_cond().
    If you don't do it this way, you will get a deadlock in THD::awake()
1416 1417 1418
*/


1419 1420
void MYSQL_LOG:: wait_for_update(THD* thd)
{
1421
  safe_mutex_assert_owner(&LOCK_log);
1422 1423 1424
  const char* old_msg = thd->enter_cond(&update_cond, &LOCK_log,
					"Slave: waiting for binlog update");
  pthread_cond_wait(&update_cond, &LOCK_log);
1425
  pthread_mutex_unlock(&LOCK_log);		// See NOTES
1426
  thd->exit_cond(old_msg);
1427
}
unknown's avatar
unknown committed
1428

unknown's avatar
unknown committed
1429

1430 1431 1432 1433 1434 1435 1436 1437 1438
/*
  Close the log file

  SYNOPSIS
    close()
    exiting	Set to 1 if we should also close the index file
    		This can be set to 0 if we are going to do call open
		at once after close, in which case we don't want to
		close the index file.
unknown's avatar
unknown committed
1439
		We only write a 'stop' event to the log if exiting is set
1440 1441
*/

unknown's avatar
unknown committed
1442 1443
void MYSQL_LOG::close(bool exiting)
{					// One can't set log_type here!
1444 1445
  DBUG_ENTER("MYSQL_LOG::close");
  DBUG_PRINT("enter",("exiting: %d", (int) exiting));
1446
  if (is_open())
unknown's avatar
unknown committed
1447
  {
unknown's avatar
unknown committed
1448
    if (log_type == LOG_BIN && !no_auto_events && exiting)
unknown's avatar
unknown committed
1449 1450
    {
      Stop_log_event s;
1451
      s.set_log_pos(this);
1452
      s.write(&log_file);
1453
      signal_update();
unknown's avatar
unknown committed
1454
    }
1455
    end_io_cache(&log_file);
1456
    if (my_close(log_file.file,MYF(0)) < 0 && ! write_error)
unknown's avatar
unknown committed
1457 1458
    {
      write_error=1;
1459
      sql_print_error(ER(ER_ERROR_ON_WRITE), name, errno);
unknown's avatar
unknown committed
1460 1461
    }
  }
1462 1463 1464 1465 1466 1467 1468

  /*
    The following test is needed even if is_open() is not set, as we may have
    called a not complete close earlier and the index file is still open.
  */

  if (exiting && my_b_inited(&index_file))
1469
  {
1470 1471
    end_io_cache(&index_file);
    if (my_close(index_file.file, MYF(0)) < 0 && ! write_error)
unknown's avatar
unknown committed
1472
    {
1473 1474
      write_error= 1;
      sql_print_error(ER(ER_ERROR_ON_WRITE), index_file_name, errno);
unknown's avatar
unknown committed
1475
    }
1476
  }
1477
  log_type= LOG_CLOSED;
1478
  safeFree(name);
1479
  DBUG_VOID_RETURN;
unknown's avatar
unknown committed
1480 1481 1482
}


1483 1484
/*
  Check if a string is a valid number
1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498

  SYNOPSIS
    test_if_number()
    str			String to test
    res			Store value here
    allow_wildcards	Set to 1 if we should ignore '%' and '_'

  NOTE
    For the moment the allow_wildcards argument is not used
    Should be move to some other file.

  RETURN VALUES
    1	String is a number
    0	Error
1499
*/
unknown's avatar
unknown committed
1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511

static bool test_if_number(register const char *str,
			   long *res, bool allow_wildcards)
{
  reg2 int flag;
  const char *start;
  DBUG_ENTER("test_if_number");

  flag=0; start=str;
  while (*str++ == ' ') ;
  if (*--str == '-' || *str == '+')
    str++;
1512
  while (my_isdigit(files_charset_info,*str) || (allow_wildcards &&
unknown's avatar
unknown committed
1513 1514 1515 1516 1517 1518 1519 1520
			   (*str == wild_many || *str == wild_one)))
  {
    flag=1;
    str++;
  }
  if (*str == '.')
  {
    for (str++ ;
1521
	 my_isdigit(files_charset_info,*str) ||
unknown's avatar
unknown committed
1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545
	   (allow_wildcards && (*str == wild_many || *str == wild_one)) ;
	 str++, flag=1) ;
  }
  if (*str != 0 || flag == 0)
    DBUG_RETURN(0);
  if (res)
    *res=atol(start);
  DBUG_RETURN(1);			/* Number ok */
} /* test_if_number */


void sql_print_error(const char *format,...)
{
  va_list args;
  time_t skr;
  struct tm tm_tmp;
  struct tm *start;
  va_start(args,format);
  DBUG_ENTER("sql_print_error");

  VOID(pthread_mutex_lock(&LOCK_error_log));
#ifndef DBUG_OFF
  {
    char buff[1024];
1546
    my_vsnprintf(buff,sizeof(buff)-1,format,args);
unknown's avatar
unknown committed
1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577
    DBUG_PRINT("error",("%s",buff));
  }
#endif
  skr=time(NULL);
  localtime_r(&skr,&tm_tmp);
  start=&tm_tmp;
  fprintf(stderr,"%02d%02d%02d %2d:%02d:%02d  ",
	  start->tm_year % 100,
	  start->tm_mon+1,
	  start->tm_mday,
	  start->tm_hour,
	  start->tm_min,
	  start->tm_sec);
  (void) vfprintf(stderr,format,args);
  (void) fputc('\n',stderr);
  fflush(stderr);
  va_end(args);

  VOID(pthread_mutex_unlock(&LOCK_error_log));
  DBUG_VOID_RETURN;
}


void sql_perror(const char *message)
{
#ifdef HAVE_STRERROR
  sql_print_error("%s: %s",message, strerror(errno));
#else
  perror(message);
#endif
}