File: remove_debug_point.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 (114 lines) | stat: -rw-r--r-- 3,101 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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114

#
# This include will remove a debug point from the current GLOBAL or SESSION
# debug variable without changing other debugging flags set.
#
# ==== Usage ====
#
# --let $debug_point= debug_point
# [--let $debug_point_silent= 1]
# [--let $debug_type= GLOBAL | SESSION]
# [--let $debug_if_exists= 1]
# --source extra/rpl_tests/remove_debug_point.inc
#
# Parameters:
#   $debug_point
#     The debug point to be removed.
#
#   $debug_point_silent
#     By default, this script prints the name of the debug point. If
#     this parameter is set, it does not print anything.
#
#   $debug_type
#     If the debug variable to be changed is the GLOBAL or SESSION one.
#     The default (if not specified one) is GLOBAL.
#
#   $debug_if_exists
#     By default, this script fails if the debug symbol does not exist.
#     If this variable is set, the error is omitted.

--let $_previous_include_silent= $include_silent
--let $include_silent= 1
--let $include_filename= remove_debug_point.inc
--source include/begin_include_file.inc
--let $include_silent= $_previous_include_silent

if (!$debug_type)
{
  --let $_debug_type= GLOBAL
}
if ($debug_type)
{
  --let $_debug_type= $debug_type
}
if ( `SELECT UPPER('$_debug_type') <> 'GLOBAL' AND UPPER('$_debug_type') <> 'SESSION'` )
{
  --die ERROR IN TEST: invalid value for mysqltest variable 'debug_type'. It must be either GLOBAL or SESSION
}
if (!$debug_point)
{
  --die ERROR IN TEST: the mysqltest variable 'debug_point' must be set
}

--disable_query_log

--eval SET @previous_debug=@@$_debug_type.debug
--eval SET @new_debug=@@$_debug_type.debug

if (`SELECT LOCATE('$debug_point', @previous_debug) > 0`)
{
  --eval SET @new_debug=REPLACE(@previous_debug, ',$debug_point', '')

  # If there is no other debug options, we will clean it up
  if (`SELECT @new_debug="d"`)
  {
    SET @new_debug="";
  }
}

if (!$debug_if_exists)
{
  if (`SELECT @new_debug = @previous_debug`)
  {
    # Long debug entries don't allow this check
    if(`SELECT LENGTH(@@$_debug_type.debug) < 512`)
    {
      --die ERROR IN TEST: the debug point to be removed was not found
    }
  }
}

if (!$debug_point_silent)
{
  --let $message_prefix=`SELECT REPEAT("#", $_include_file_depth)`
  --echo $message_prefix Removing debug point '$debug_point' from @@$_debug_type.debug
}

if ($rpl_debug)
{
  --let $_to_display=`SELECT @@$_debug_type.debug`
  --echo @@$_debug_type.debug was '$_to_display'
}

# If the current debug setting is already too big it might compromise the above checks
# as the shown debug info will be cut and end with '...'
# In this case we revert to the -d strategy
if(`SELECT LENGTH(@@$_debug_type.debug) >= 512`)
{
  --eval SET @new_debug="-d,$debug_point";
  if ($rpl_debug)
  {
    --echo Warning: the current value for @@$_debug_type.debug is too big to be displayed so some checks were ommited
  }
}

--eval SET @@$_debug_type.debug=@new_debug

if ($rpl_debug)
{
  --let $_to_display=`SELECT @@$_debug_type.debug`
  --echo @@$_debug_type.debug set to '$_to_display'
}

--let $include_filename= remove_debug_point.inc
--source include/end_include_file.inc