File: wait_for_binlog_event.inc

package info (click to toggle)
mysql-8.0 8.0.43-3
  • links: PTS, VCS
  • area: main
  • in suites: sid
  • size: 1,273,924 kB
  • sloc: cpp: 4,684,605; ansic: 412,450; pascal: 108,398; java: 83,641; perl: 30,221; cs: 27,067; sql: 26,594; sh: 24,181; python: 21,816; yacc: 17,169; php: 11,522; xml: 7,388; javascript: 7,076; makefile: 2,194; lex: 1,075; awk: 670; asm: 520; objc: 183; ruby: 97; lisp: 86
file content (42 lines) | stat: -rw-r--r-- 1,112 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
# include/wait_for_binlog_event.inc
#
# SUMMARY
#
#    Waits until SHOW BINLOG EVENTS has returned in last event a specified substring.
#
# USAGE
#
#    let $wait_binlog_event= DROP;
#    [let $wait_binlog_file= master-bin.000001;]
#    --source include/wait_for_binlog_event.inc

let $_loop_count= 300;
let $_last_event= ;
let $_event_pos= 1;
let $_show_events_query= SHOW BINLOG EVENTS;
if ($wait_binlog_file)
{
  # Show only binlog events in the given file
  let $_show_events_query=SHOW BINLOG EVENTS IN '$wait_binlog_file';
}

while (`SELECT INSTR("$_last_event","$wait_binlog_event") = 0`)
{
  dec $_loop_count;
  if (!$_loop_count)
  {
    --source include/show_rpl_debug_info.inc
    --die ERROR: failed while waiting for $wait_binlog_event in binlog 
  }
  sleep 0.1;
  let $_event= query_get_value($_show_events_query, Info, $_event_pos);
  let $_last_event= $_event;
  while ($_event != "No such row")
  {
    inc $_event_pos;
    let $_last_event= $_event;
    let $_event= query_get_value($_show_events_query, Info, $_event_pos);
  }
}
# Reset the wait_binlog_file parameter
let $wait_binlog_file=;