diff options
51 files changed, 9240 insertions, 2016 deletions
diff --git a/Documentation/DocBook/kgdb.tmpl b/Documentation/DocBook/kgdb.tmpl index 5cff41a5fa7c..55f12ac37acd 100644 --- a/Documentation/DocBook/kgdb.tmpl +++ b/Documentation/DocBook/kgdb.tmpl | |||
| @@ -4,7 +4,7 @@ | |||
| 4 | 4 | ||
| 5 | <book id="kgdbOnLinux"> | 5 | <book id="kgdbOnLinux"> |
| 6 | <bookinfo> | 6 | <bookinfo> |
| 7 | <title>Using kgdb and the kgdb Internals</title> | 7 | <title>Using kgdb, kdb and the kernel debugger internals</title> |
| 8 | 8 | ||
| 9 | <authorgroup> | 9 | <authorgroup> |
| 10 | <author> | 10 | <author> |
| @@ -17,33 +17,8 @@ | |||
| 17 | </affiliation> | 17 | </affiliation> |
| 18 | </author> | 18 | </author> |
| 19 | </authorgroup> | 19 | </authorgroup> |
| 20 | |||
| 21 | <authorgroup> | ||
| 22 | <author> | ||
| 23 | <firstname>Tom</firstname> | ||
| 24 | <surname>Rini</surname> | ||
| 25 | <affiliation> | ||
| 26 | <address> | ||
| 27 | <email>trini@kernel.crashing.org</email> | ||
| 28 | </address> | ||
| 29 | </affiliation> | ||
| 30 | </author> | ||
| 31 | </authorgroup> | ||
| 32 | |||
| 33 | <authorgroup> | ||
| 34 | <author> | ||
| 35 | <firstname>Amit S.</firstname> | ||
| 36 | <surname>Kale</surname> | ||
| 37 | <affiliation> | ||
| 38 | <address> | ||
| 39 | <email>amitkale@linsyssoft.com</email> | ||
| 40 | </address> | ||
| 41 | </affiliation> | ||
| 42 | </author> | ||
| 43 | </authorgroup> | ||
| 44 | |||
| 45 | <copyright> | 20 | <copyright> |
| 46 | <year>2008</year> | 21 | <year>2008,2010</year> |
| 47 | <holder>Wind River Systems, Inc.</holder> | 22 | <holder>Wind River Systems, Inc.</holder> |
| 48 | </copyright> | 23 | </copyright> |
| 49 | <copyright> | 24 | <copyright> |
| @@ -69,41 +44,76 @@ | |||
| 69 | <chapter id="Introduction"> | 44 | <chapter id="Introduction"> |
| 70 | <title>Introduction</title> | 45 | <title>Introduction</title> |
| 71 | <para> | 46 | <para> |
| 72 | kgdb is a source level debugger for linux kernel. It is used along | 47 | The kernel has two different debugger front ends (kdb and kgdb) |
| 73 | with gdb to debug a linux kernel. The expectation is that gdb can | 48 | which interface to the debug core. It is possible to use either |
| 74 | be used to "break in" to the kernel to inspect memory, variables | 49 | of the debugger front ends and dynamically transition between them |
| 75 | and look through call stack information similar to what an | 50 | if you configure the kernel properly at compile and runtime. |
| 76 | application developer would use gdb for. It is possible to place | 51 | </para> |
| 77 | breakpoints in kernel code and perform some limited execution | 52 | <para> |
| 78 | stepping. | 53 | Kdb is simplistic shell-style interface which you can use on a |
| 54 | system console with a keyboard or serial console. You can use it | ||
| 55 | to inspect memory, registers, process lists, dmesg, and even set | ||
| 56 | breakpoints to stop in a certain location. Kdb is not a source | ||
| 57 | level debugger, although you can set breakpoints and execute some | ||
| 58 | basic kernel run control. Kdb is mainly aimed at doing some | ||
| 59 | analysis to aid in development or diagnosing kernel problems. You | ||
| 60 | can access some symbols by name in kernel built-ins or in kernel | ||
| 61 | modules if the code was built | ||
| 62 | with <symbol>CONFIG_KALLSYMS</symbol>. | ||
| 63 | </para> | ||
| 64 | <para> | ||
| 65 | Kgdb is intended to be used as a source level debugger for the | ||
| 66 | Linux kernel. It is used along with gdb to debug a Linux kernel. | ||
| 67 | The expectation is that gdb can be used to "break in" to the | ||
| 68 | kernel to inspect memory, variables and look through call stack | ||
| 69 | information similar to the way an application developer would use | ||
| 70 | gdb to debug an application. It is possible to place breakpoints | ||
| 71 | in kernel code and perform some limited execution stepping. | ||
| 79 | </para> | 72 | </para> |
| 80 | <para> | 73 | <para> |
| 81 | Two machines are required for using kgdb. One of these machines is a | 74 | Two machines are required for using kgdb. One of these machines is |
| 82 | development machine and the other is a test machine. The kernel | 75 | a development machine and the other is the target machine. The |
| 83 | to be debugged runs on the test machine. The development machine | 76 | kernel to be debugged runs on the target machine. The development |
| 84 | runs an instance of gdb against the vmlinux file which contains | 77 | machine runs an instance of gdb against the vmlinux file which |
| 85 | the symbols (not boot image such as bzImage, zImage, uImage...). | 78 | contains the symbols (not boot image such as bzImage, zImage, |
| 86 | In gdb the developer specifies the connection parameters and | 79 | uImage...). In gdb the developer specifies the connection |
| 87 | connects to kgdb. The type of connection a developer makes with | 80 | parameters and connects to kgdb. The type of connection a |
| 88 | gdb depends on the availability of kgdb I/O modules compiled as | 81 | developer makes with gdb depends on the availability of kgdb I/O |
| 89 | builtin's or kernel modules in the test machine's kernel. | 82 | modules compiled as built-ins or loadable kernel modules in the test |
| 83 | machine's kernel. | ||
| 90 | </para> | 84 | </para> |
| 91 | </chapter> | 85 | </chapter> |
| 92 | <chapter id="CompilingAKernel"> | 86 | <chapter id="CompilingAKernel"> |
| 93 | <title>Compiling a kernel</title> | 87 | <title>Compiling a kernel</title> |
| 88 | <para> | ||
| 89 | <itemizedlist> | ||
| 90 | <listitem><para>In order to enable compilation of kdb, you must first enable kgdb.</para></listitem> | ||
| 91 | <listitem><para>The kgdb test compile options are described in the kgdb test suite chapter.</para></listitem> | ||
| 92 | </itemizedlist> | ||
| 93 | </para> | ||
| 94 | <sect1 id="CompileKGDB"> | ||
| 95 | <title>Kernel config options for kgdb</title> | ||
| 94 | <para> | 96 | <para> |
| 95 | To enable <symbol>CONFIG_KGDB</symbol> you should first turn on | 97 | To enable <symbol>CONFIG_KGDB</symbol> you should first turn on |
| 96 | "Prompt for development and/or incomplete code/drivers" | 98 | "Prompt for development and/or incomplete code/drivers" |
| 97 | (CONFIG_EXPERIMENTAL) in "General setup", then under the | 99 | (CONFIG_EXPERIMENTAL) in "General setup", then under the |
| 98 | "Kernel debugging" select "KGDB: kernel debugging with remote gdb". | 100 | "Kernel debugging" select "KGDB: kernel debugger". |
| 101 | </para> | ||
| 102 | <para> | ||
| 103 | While it is not a hard requirement that you have symbols in your | ||
| 104 | vmlinux file, gdb tends not to be very useful without the symbolic | ||
| 105 | data, so you will want to turn | ||
| 106 | on <symbol>CONFIG_DEBUG_INFO</symbol> which is called "Compile the | ||
| 107 | kernel with debug info" in the config menu. | ||
| 99 | </para> | 108 | </para> |
| 100 | <para> | 109 | <para> |
| 101 | It is advised, but not required that you turn on the | 110 | It is advised, but not required that you turn on the |
| 102 | CONFIG_FRAME_POINTER kernel option. This option inserts code to | 111 | <symbol>CONFIG_FRAME_POINTER</symbol> kernel option which is called "Compile the |
| 103 | into the compiled executable which saves the frame information in | 112 | kernel with frame pointers" in the config menu. This option |
| 104 | registers or on the stack at different points which will allow a | 113 | inserts code to into the compiled executable which saves the frame |
| 105 | debugger such as gdb to more accurately construct stack back traces | 114 | information in registers or on the stack at different points which |
| 106 | while debugging the kernel. | 115 | allows a debugger such as gdb to more accurately construct |
| 116 | stack back traces while debugging the kernel. | ||
| 107 | </para> | 117 | </para> |
| 108 | <para> | 118 | <para> |
| 109 | If the architecture that you are using supports the kernel option | 119 | If the architecture that you are using supports the kernel option |
| @@ -116,38 +126,160 @@ | |||
| 116 | this option. | 126 | this option. |
| 117 | </para> | 127 | </para> |
| 118 | <para> | 128 | <para> |
| 119 | Next you should choose one of more I/O drivers to interconnect debugging | 129 | Next you should choose one of more I/O drivers to interconnect |
| 120 | host and debugged target. Early boot debugging requires a KGDB | 130 | debugging host and debugged target. Early boot debugging requires |
| 121 | I/O driver that supports early debugging and the driver must be | 131 | a KGDB I/O driver that supports early debugging and the driver |
| 122 | built into the kernel directly. Kgdb I/O driver configuration | 132 | must be built into the kernel directly. Kgdb I/O driver |
| 123 | takes place via kernel or module parameters, see following | 133 | configuration takes place via kernel or module parameters which |
| 124 | chapter. | 134 | you can learn more about in the in the section that describes the |
| 135 | parameter "kgdboc". | ||
| 125 | </para> | 136 | </para> |
| 126 | <para> | 137 | <para>Here is an example set of .config symbols to enable or |
| 127 | The kgdb test compile options are described in the kgdb test suite chapter. | 138 | disable for kgdb: |
| 139 | <itemizedlist> | ||
| 140 | <listitem><para># CONFIG_DEBUG_RODATA is not set</para></listitem> | ||
| 141 | <listitem><para>CONFIG_FRAME_POINTER=y</para></listitem> | ||
| 142 | <listitem><para>CONFIG_KGDB=y</para></listitem> | ||
| 143 | <listitem><para>CONFIG_KGDB_SERIAL_CONSOLE=y</para></listitem> | ||
| 144 | </itemizedlist> | ||
| 128 | </para> | 145 | </para> |
| 129 | 146 | </sect1> | |
| 147 | <sect1 id="CompileKDB"> | ||
| 148 | <title>Kernel config options for kdb</title> | ||
| 149 | <para>Kdb is quite a bit more complex than the simple gdbstub | ||
| 150 | sitting on top of the kernel's debug core. Kdb must implement a | ||
| 151 | shell, and also adds some helper functions in other parts of the | ||
| 152 | kernel, responsible for printing out interesting data such as what | ||
| 153 | you would see if you ran "lsmod", or "ps". In order to build kdb | ||
| 154 | into the kernel you follow the same steps as you would for kgdb. | ||
| 155 | </para> | ||
| 156 | <para>The main config option for kdb | ||
| 157 | is <symbol>CONFIG_KGDB_KDB</symbol> which is called "KGDB_KDB: | ||
| 158 | include kdb frontend for kgdb" in the config menu. In theory you | ||
| 159 | would have already also selected an I/O driver such as the | ||
| 160 | CONFIG_KGDB_SERIAL_CONSOLE interface if you plan on using kdb on a | ||
| 161 | serial port, when you were configuring kgdb. | ||
| 162 | </para> | ||
| 163 | <para>If you want to use a PS/2-style keyboard with kdb, you would | ||
| 164 | select CONFIG_KDB_KEYBOARD which is called "KGDB_KDB: keyboard as | ||
| 165 | input device" in the config menu. The CONFIG_KDB_KEYBOARD option | ||
| 166 | is not used for anything in the gdb interface to kgdb. The | ||
| 167 | CONFIG_KDB_KEYBOARD option only works with kdb. | ||
| 168 | </para> | ||
| 169 | <para>Here is an example set of .config symbols to enable/disable kdb: | ||
| 170 | <itemizedlist> | ||
| 171 | <listitem><para># CONFIG_DEBUG_RODATA is not set</para></listitem> | ||
| 172 | <listitem><para>CONFIG_FRAME_POINTER=y</para></listitem> | ||
| 173 | <listitem><para>CONFIG_KGDB=y</para></listitem> | ||
| 174 | <listitem><para>CONFIG_KGDB_SERIAL_CONSOLE=y</para></listitem> | ||
| 175 | <listitem><para>CONFIG_KGDB_KDB=y</para></listitem> | ||
| 176 | <listitem><para>CONFIG_KDB_KEYBOARD=y</para></listitem> | ||
| 177 | </itemizedlist> | ||
| 178 | </para> | ||
| 179 | </sect1> | ||
| 130 | </chapter> | 180 | </chapter> |
| 131 | <chapter id="EnableKGDB"> | 181 | <chapter id="kgdbKernelArgs"> |
| 132 | <title>Enable kgdb for debugging</title> | 182 | <title>Kernel Debugger Boot Arguments</title> |
| 133 | <para> | 183 | <para>This section describes the various runtime kernel |
| 134 | In order to use kgdb you must activate it by passing configuration | 184 | parameters that affect the configuration of the kernel debugger. |
| 135 | information to one of the kgdb I/O drivers. If you do not pass any | 185 | The following chapter covers using kdb and kgdb as well as |
| 136 | configuration information kgdb will not do anything at all. Kgdb | 186 | provides some examples of the configuration parameters.</para> |
| 137 | will only actively hook up to the kernel trap hooks if a kgdb I/O | 187 | <sect1 id="kgdboc"> |
| 138 | driver is loaded and configured. If you unconfigure a kgdb I/O | 188 | <title>Kernel parameter: kgdboc</title> |
| 139 | driver, kgdb will unregister all the kernel hook points. | 189 | <para>The kgdboc driver was originally an abbreviation meant to |
| 190 | stand for "kgdb over console". Today it is the primary mechanism | ||
| 191 | to configure how to communicate from gdb to kgdb as well as the | ||
| 192 | devices you want to use to interact with the kdb shell. | ||
| 193 | </para> | ||
| 194 | <para>For kgdb/gdb, kgdboc is designed to work with a single serial | ||
| 195 | port. It is intended to cover the circumstance where you want to | ||
| 196 | use a serial console as your primary console as well as using it to | ||
| 197 | perform kernel debugging. It is also possible to use kgdb on a | ||
| 198 | serial port which is not designated as a system console. Kgdboc | ||
| 199 | may be configured as a kernel built-in or a kernel loadable module. | ||
| 200 | You can only make use of <constant>kgdbwait</constant> and early | ||
| 201 | debugging if you build kgdboc into the kernel as a built-in. | ||
| 140 | </para> | 202 | </para> |
| 203 | <sect2 id="kgdbocArgs"> | ||
| 204 | <title>kgdboc arguments</title> | ||
| 205 | <para>Usage: <constant>kgdboc=[kbd][[,]serial_device][,baud]</constant></para> | ||
| 206 | <sect3 id="kgdbocArgs1"> | ||
| 207 | <title>Using loadable module or built-in</title> | ||
| 141 | <para> | 208 | <para> |
| 142 | All drivers can be reconfigured at run time, if | 209 | <orderedlist> |
| 143 | <symbol>CONFIG_SYSFS</symbol> and <symbol>CONFIG_MODULES</symbol> | 210 | <listitem><para>As a kernel built-in:</para> |
| 144 | are enabled, by echo'ing a new config string to | 211 | <para>Use the kernel boot argument: <constant>kgdboc=<tty-device>,[baud]</constant></para></listitem> |
| 145 | <constant>/sys/module/<driver>/parameter/<option></constant>. | 212 | <listitem> |
| 146 | The driver can be unconfigured by passing an empty string. You cannot | 213 | <para>As a kernel loadable module:</para> |
| 147 | change the configuration while the debugger is attached. Make sure | 214 | <para>Use the command: <constant>modprobe kgdboc kgdboc=<tty-device>,[baud]</constant></para> |
| 148 | to detach the debugger with the <constant>detach</constant> command | 215 | <para>Here are two examples of how you might formate the kgdboc |
| 149 | prior to trying unconfigure a kgdb I/O driver. | 216 | string. The first is for an x86 target using the first serial port. |
| 217 | The second example is for the ARM Versatile AB using the second | ||
| 218 | serial port. | ||
| 219 | <orderedlist> | ||
| 220 | <listitem><para><constant>kgdboc=ttyS0,115200</constant></para></listitem> | ||
| 221 | <listitem><para><constant>kgdboc=ttyAMA1,115200</constant></para></listitem> | ||
| 222 | </orderedlist> | ||
| 150 | </para> | 223 | </para> |
| 224 | </listitem> | ||
| 225 | </orderedlist></para> | ||
| 226 | </sect3> | ||
| 227 | <sect3 id="kgdbocArgs2"> | ||
| 228 | <title>Configure kgdboc at runtime with sysfs</title> | ||
| 229 | <para>At run time you can enable or disable kgdboc by echoing a | ||
| 230 | parameters into the sysfs. Here are two examples:</para> | ||
| 231 | <orderedlist> | ||
| 232 | <listitem><para>Enable kgdboc on ttyS0</para> | ||
| 233 | <para><constant>echo ttyS0 > /sys/module/kgdboc/parameters/kgdboc</constant></para></listitem> | ||
| 234 | <listitem><para>Disable kgdboc</para> | ||
| 235 | <para><constant>echo "" > /sys/module/kgdboc/parameters/kgdboc</constant></para></listitem> | ||
| 236 | </orderedlist> | ||
| 237 | <para>NOTE: You do not need to specify the baud if you are | ||
| 238 | configuring the console on tty which is already configured or | ||
| 239 | open.</para> | ||
| 240 | </sect3> | ||
| 241 | <sect3 id="kgdbocArgs3"> | ||
| 242 | <title>More examples</title> | ||
| 243 | <para>You can configure kgdboc to use the keyboard, and or a serial device | ||
| 244 | depending on if you are using kdb and or kgdb, in one of the | ||
| 245 | following scenarios. | ||
| 246 | <orderedlist> | ||
| 247 | <listitem><para>kdb and kgdb over only a serial port</para> | ||
| 248 | <para><constant>kgdboc=<serial_device>[,baud]</constant></para> | ||
| 249 | <para>Example: <constant>kgdboc=ttyS0,115200</constant></para> | ||
| 250 | </listitem> | ||
| 251 | <listitem><para>kdb and kgdb with keyboard and a serial port</para> | ||
| 252 | <para><constant>kgdboc=kbd,<serial_device>[,baud]</constant></para> | ||
| 253 | <para>Example: <constant>kgdboc=kbd,ttyS0,115200</constant></para> | ||
| 254 | </listitem> | ||
| 255 | <listitem><para>kdb with a keyboard</para> | ||
| 256 | <para><constant>kgdboc=kbd</constant></para> | ||
| 257 | </listitem> | ||
| 258 | </orderedlist> | ||
| 259 | </para> | ||
| 260 | </sect3> | ||
| 261 | <para>NOTE: Kgdboc does not support interrupting the target via the | ||
| 262 | gdb remote protocol. You must manually send a sysrq-g unless you | ||
| 263 | have a proxy that splits console output to a terminal program. | ||
| 264 | A console proxy has a separate TCP port for the debugger and a separate | ||
| 265 | TCP port for the "human" console. The proxy can take care of sending | ||
| 266 | the sysrq-g for you. | ||
| 267 | </para> | ||
| 268 | <para>When using kgdboc with no debugger proxy, you can end up | ||
| 269 | connecting the debugger at one of two entry points. If an | ||
| 270 | exception occurs after you have loaded kgdboc, a message should | ||
| 271 | print on the console stating it is waiting for the debugger. In | ||
| 272 | this case you disconnect your terminal program and then connect the | ||
| 273 | debugger in its place. If you want to interrupt the target system | ||
| 274 | and forcibly enter a debug session you have to issue a Sysrq | ||
| 275 | sequence and then type the letter <constant>g</constant>. Then | ||
| 276 | you disconnect the terminal session and connect gdb. Your options | ||
| 277 | if you don't like this are to hack gdb to send the sysrq-g for you | ||
| 278 | as well as on the initial connect, or to use a debugger proxy that | ||
| 279 | allows an unmodified gdb to do the debugging. | ||
| 280 | </para> | ||
| 281 | </sect2> | ||
| 282 | </sect1> | ||
| 151 | <sect1 id="kgdbwait"> | 283 | <sect1 id="kgdbwait"> |
| 152 | <title>Kernel parameter: kgdbwait</title> | 284 | <title>Kernel parameter: kgdbwait</title> |
| 153 | <para> | 285 | <para> |
| @@ -162,103 +294,204 @@ | |||
| 162 | </para> | 294 | </para> |
| 163 | <para> | 295 | <para> |
| 164 | The kernel will stop and wait as early as the I/O driver and | 296 | The kernel will stop and wait as early as the I/O driver and |
| 165 | architecture will allow when you use this option. If you build the | 297 | architecture allows when you use this option. If you build the |
| 166 | kgdb I/O driver as a kernel module kgdbwait will not do anything. | 298 | kgdb I/O driver as a loadable kernel module kgdbwait will not do |
| 299 | anything. | ||
| 167 | </para> | 300 | </para> |
| 168 | </sect1> | 301 | </sect1> |
| 169 | <sect1 id="kgdboc"> | 302 | <sect1 id="kgdbcon"> |
| 170 | <title>Kernel parameter: kgdboc</title> | 303 | <title>Kernel parameter: kgdbcon</title> |
| 171 | <para> | 304 | <para> The kgdbcon feature allows you to see printk() messages |
| 172 | The kgdboc driver was originally an abbreviation meant to stand for | 305 | inside gdb while gdb is connected to the kernel. Kdb does not make |
| 173 | "kgdb over console". Kgdboc is designed to work with a single | 306 | use of the kgdbcon feature. |
| 174 | serial port. It was meant to cover the circumstance | 307 | </para> |
| 175 | where you wanted to use a serial console as your primary console as | 308 | <para>Kgdb supports using the gdb serial protocol to send console |
| 176 | well as using it to perform kernel debugging. Of course you can | 309 | messages to the debugger when the debugger is connected and running. |
| 177 | also use kgdboc without assigning a console to the same port. | 310 | There are two ways to activate this feature. |
| 311 | <orderedlist> | ||
| 312 | <listitem><para>Activate with the kernel command line option:</para> | ||
| 313 | <para><constant>kgdbcon</constant></para> | ||
| 314 | </listitem> | ||
| 315 | <listitem><para>Use sysfs before configuring an I/O driver</para> | ||
| 316 | <para> | ||
| 317 | <constant>echo 1 > /sys/module/kgdb/parameters/kgdb_use_con</constant> | ||
| 318 | </para> | ||
| 319 | <para> | ||
| 320 | NOTE: If you do this after you configure the kgdb I/O driver, the | ||
| 321 | setting will not take effect until the next point the I/O is | ||
| 322 | reconfigured. | ||
| 323 | </para> | ||
| 324 | </listitem> | ||
| 325 | </orderedlist> | ||
| 326 | <para>IMPORTANT NOTE: You cannot use kgdboc + kgdbcon on a tty that is an | ||
| 327 | active system console. An example incorrect usage is <constant>console=ttyS0,115200 kgdboc=ttyS0 kgdbcon</constant> | ||
| 328 | </para> | ||
| 329 | <para>It is possible to use this option with kgdboc on a tty that is not a system console. | ||
| 330 | </para> | ||
| 178 | </para> | 331 | </para> |
| 179 | <sect2 id="UsingKgdboc"> | 332 | </sect1> |
| 180 | <title>Using kgdboc</title> | 333 | </chapter> |
| 181 | <para> | 334 | <chapter id="usingKDB"> |
| 182 | You can configure kgdboc via sysfs or a module or kernel boot line | 335 | <title>Using kdb</title> |
| 183 | parameter depending on if you build with CONFIG_KGDBOC as a module | ||
| 184 | or built-in. | ||
| 185 | <orderedlist> | ||
| 186 | <listitem><para>From the module load or build-in</para> | ||
| 187 | <para><constant>kgdboc=<tty-device>,[baud]</constant></para> | ||
| 188 | <para> | 336 | <para> |
| 189 | The example here would be if your console port was typically ttyS0, you would use something like <constant>kgdboc=ttyS0,115200</constant> or on the ARM Versatile AB you would likely use <constant>kgdboc=ttyAMA0,115200</constant> | 337 | </para> |
| 338 | <sect1 id="quickKDBserial"> | ||
| 339 | <title>Quick start for kdb on a serial port</title> | ||
| 340 | <para>This is a quick example of how to use kdb.</para> | ||
| 341 | <para><orderedlist> | ||
| 342 | <listitem><para>Boot kernel with arguments: | ||
| 343 | <itemizedlist> | ||
| 344 | <listitem><para><constant>console=ttyS0,115200 kgdboc=ttyS0,115200</constant></para></listitem> | ||
| 345 | </itemizedlist></para> | ||
| 346 | <para>OR</para> | ||
| 347 | <para>Configure kgdboc after the kernel booted; assuming you are using a serial port console: | ||
| 348 | <itemizedlist> | ||
| 349 | <listitem><para><constant>echo ttyS0 > /sys/module/kgdboc/parameters/kgdboc</constant></para></listitem> | ||
| 350 | </itemizedlist> | ||
| 190 | </para> | 351 | </para> |
| 191 | </listitem> | 352 | </listitem> |
| 192 | <listitem><para>From sysfs</para> | 353 | <listitem><para>Enter the kernel debugger manually or by waiting for an oops or fault. There are several ways you can enter the kernel debugger manually; all involve using the sysrq-g, which means you must have enabled CONFIG_MAGIC_SYSRQ=y in your kernel config.</para> |
| 193 | <para><constant>echo ttyS0 > /sys/module/kgdboc/parameters/kgdboc</constant></para> | 354 | <itemizedlist> |
| 355 | <listitem><para>When logged in as root or with a super user session you can run:</para> | ||
| 356 | <para><constant>echo g > /proc/sysrq-trigger</constant></para></listitem> | ||
| 357 | <listitem><para>Example using minicom 2.2</para> | ||
| 358 | <para>Press: <constant>Control-a</constant></para> | ||
| 359 | <para>Press: <constant>f</constant></para> | ||
| 360 | <para>Press: <constant>g</constant></para> | ||
| 194 | </listitem> | 361 | </listitem> |
| 195 | </orderedlist> | 362 | <listitem><para>When you have telneted to a terminal server that supports sending a remote break</para> |
| 196 | </para> | 363 | <para>Press: <constant>Control-]</constant></para> |
| 197 | <para> | 364 | <para>Type in:<constant>send break</constant></para> |
| 198 | NOTE: Kgdboc does not support interrupting the target via the | 365 | <para>Press: <constant>Enter</constant></para> |
| 199 | gdb remote protocol. You must manually send a sysrq-g unless you | 366 | <para>Press: <constant>g</constant></para> |
| 200 | have a proxy that splits console output to a terminal problem and | 367 | </listitem> |
| 201 | has a separate port for the debugger to connect to that sends the | 368 | </itemizedlist> |
| 202 | sysrq-g for you. | 369 | </listitem> |
| 370 | <listitem><para>From the kdb prompt you can run the "help" command to see a complete list of the commands that are available.</para> | ||
| 371 | <para>Some useful commands in kdb include: | ||
| 372 | <itemizedlist> | ||
| 373 | <listitem><para>lsmod -- Shows where kernel modules are loaded</para></listitem> | ||
| 374 | <listitem><para>ps -- Displays only the active processes</para></listitem> | ||
| 375 | <listitem><para>ps A -- Shows all the processes</para></listitem> | ||
| 376 | <listitem><para>summary -- Shows kernel version info and memory usage</para></listitem> | ||
| 377 | <listitem><para>bt -- Get a backtrace of the current process using dump_stack()</para></listitem> | ||
| 378 | <listitem><para>dmesg -- View the kernel syslog buffer</para></listitem> | ||
| 379 | <listitem><para>go -- Continue the system</para></listitem> | ||
| 380 | </itemizedlist> | ||
| 203 | </para> | 381 | </para> |
| 204 | <para>When using kgdboc with no debugger proxy, you can end up | 382 | </listitem> |
| 205 | connecting the debugger for one of two entry points. If an | 383 | <listitem> |
| 206 | exception occurs after you have loaded kgdboc a message should print | 384 | <para>When you are done using kdb you need to consider rebooting the |
| 207 | on the console stating it is waiting for the debugger. In case you | 385 | system or using the "go" command to resuming normal kernel |
| 208 | disconnect your terminal program and then connect the debugger in | 386 | execution. If you have paused the kernel for a lengthy period of |
| 209 | its place. If you want to interrupt the target system and forcibly | 387 | time, applications that rely on timely networking or anything to do |
| 210 | enter a debug session you have to issue a Sysrq sequence and then | 388 | with real wall clock time could be adversely affected, so you |
| 211 | type the letter <constant>g</constant>. Then you disconnect the | 389 | should take this into consideration when using the kernel |
| 212 | terminal session and connect gdb. Your options if you don't like | 390 | debugger.</para> |
| 213 | this are to hack gdb to send the sysrq-g for you as well as on the | 391 | </listitem> |
| 214 | initial connect, or to use a debugger proxy that allows an | 392 | </orderedlist></para> |
| 215 | unmodified gdb to do the debugging. | 393 | </sect1> |
| 394 | <sect1 id="quickKDBkeyboard"> | ||
| 395 | <title>Quick start for kdb using a keyboard connected console</title> | ||
| 396 | <para>This is a quick example of how to use kdb with a keyboard.</para> | ||
| 397 | <para><orderedlist> | ||
| 398 | <listitem><para>Boot kernel with arguments: | ||
| 399 | <itemizedlist> | ||
| 400 | <listitem><para><constant>kgdboc=kbd</constant></para></listitem> | ||
| 401 | </itemizedlist></para> | ||
| 402 | <para>OR</para> | ||
| 403 | <para>Configure kgdboc after the kernel booted: | ||
| 404 | <itemizedlist> | ||
| 405 | <listitem><para><constant>echo kbd > /sys/module/kgdboc/parameters/kgdboc</constant></para></listitem> | ||
| 406 | </itemizedlist> | ||
| 216 | </para> | 407 | </para> |
| 217 | </sect2> | 408 | </listitem> |
| 409 | <listitem><para>Enter the kernel debugger manually or by waiting for an oops or fault. There are several ways you can enter the kernel debugger manually; all involve using the sysrq-g, which means you must have enabled CONFIG_MAGIC_SYSRQ=y in your kernel config.</para> | ||
| 410 | <itemizedlist> | ||
| 411 | <listitem><para>When logged in as root or with a super user session you can run:</para> | ||
| 412 | <para><constant>echo g > /proc/sysrq-trigger</constant></para></listitem> | ||
| 413 | <listitem><para>Example using a laptop keyboard</para> | ||
| 414 | <para>Press and hold down: <constant>Alt</constant></para> | ||
| 415 | <para>Press and hold down: <constant>Fn</constant></para> | ||
| 416 | <para>Press and release the key with the label: <constant>SysRq</constant></para> | ||
| 417 | <para>Release: <constant>Fn</constant></para> | ||
| 418 | <para>Press and release: <constant>g</constant></para> | ||
| 419 | <para>Release: <constant>Alt</constant></para> | ||
| 420 | </listitem> | ||
| 421 | <listitem><para>Example using a PS/2 101-key keyboard</para> | ||
| 422 | <para>Press and hold down: <constant>Alt</constant></para> | ||
| 423 | <para>Press and release the key with the label: <constant>SysRq</constant></para> | ||
| 424 | <para>Press and release: <constant>g</constant></para> | ||
| 425 | <para>Release: <constant>Alt</constant></para> | ||
| 426 | </listitem> | ||
| 427 | </itemizedlist> | ||
| 428 | </listitem> | ||
| 429 | <listitem> | ||
| 430 | <para>Now type in a kdb command such as "help", "dmesg", "bt" or "go" to continue kernel execution.</para> | ||
| 431 | </listitem> | ||
| 432 | </orderedlist></para> | ||
| 218 | </sect1> | 433 | </sect1> |
| 219 | <sect1 id="kgdbcon"> | 434 | </chapter> |
| 220 | <title>Kernel parameter: kgdbcon</title> | 435 | <chapter id="EnableKGDB"> |
| 221 | <para> | 436 | <title>Using kgdb / gdb</title> |
| 222 | Kgdb supports using the gdb serial protocol to send console messages | 437 | <para>In order to use kgdb you must activate it by passing |
| 223 | to the debugger when the debugger is connected and running. There | 438 | configuration information to one of the kgdb I/O drivers. If you |
| 224 | are two ways to activate this feature. | 439 | do not pass any configuration information kgdb will not do anything |
| 440 | at all. Kgdb will only actively hook up to the kernel trap hooks | ||
| 441 | if a kgdb I/O driver is loaded and configured. If you unconfigure | ||
| 442 | a kgdb I/O driver, kgdb will unregister all the kernel hook points. | ||
| 443 | </para> | ||
| 444 | <para> All kgdb I/O drivers can be reconfigured at run time, if | ||
| 445 | <symbol>CONFIG_SYSFS</symbol> and <symbol>CONFIG_MODULES</symbol> | ||
| 446 | are enabled, by echo'ing a new config string to | ||
| 447 | <constant>/sys/module/<driver>/parameter/<option></constant>. | ||
| 448 | The driver can be unconfigured by passing an empty string. You cannot | ||
| 449 | change the configuration while the debugger is attached. Make sure | ||
| 450 | to detach the debugger with the <constant>detach</constant> command | ||
| 451 | prior to trying to unconfigure a kgdb I/O driver. | ||
| 452 | </para> | ||
| 453 | <sect1 id="ConnectingGDB"> | ||
| 454 | <title>Connecting with gdb to a serial port</title> | ||
| 225 | <orderedlist> | 455 | <orderedlist> |
| 226 | <listitem><para>Activate with the kernel command line option:</para> | 456 | <listitem><para>Configure kgdboc</para> |
| 227 | <para><constant>kgdbcon</constant></para> | 457 | <para>Boot kernel with arguments: |
| 458 | <itemizedlist> | ||
| 459 | <listitem><para><constant>kgdboc=ttyS0,115200</constant></para></listitem> | ||
| 460 | </itemizedlist></para> | ||
| 461 | <para>OR</para> | ||
| 462 | <para>Configure kgdboc after the kernel booted: | ||
| 463 | <itemizedlist> | ||
| 464 | <listitem><para><constant>echo ttyS0 > /sys/module/kgdboc/parameters/kgdboc</constant></para></listitem> | ||
| 465 | </itemizedlist></para> | ||
| 228 | </listitem> | 466 | </listitem> |
| 229 | <listitem><para>Use sysfs before configuring an io driver</para> | 467 | <listitem> |
| 230 | <para> | 468 | <para>Stop kernel execution (break into the debugger)</para> |
| 231 | <constant>echo 1 > /sys/module/kgdb/parameters/kgdb_use_con</constant> | 469 | <para>In order to connect to gdb via kgdboc, the kernel must |
| 232 | </para> | 470 | first be stopped. There are several ways to stop the kernel which |
| 233 | <para> | 471 | include using kgdbwait as a boot argument, via a sysrq-g, or running |
| 234 | NOTE: If you do this after you configure the kgdb I/O driver, the | 472 | the kernel until it takes an exception where it waits for the |
| 235 | setting will not take effect until the next point the I/O is | 473 | debugger to attach. |
| 236 | reconfigured. | 474 | <itemizedlist> |
| 237 | </para> | 475 | <listitem><para>When logged in as root or with a super user session you can run:</para> |
| 476 | <para><constant>echo g > /proc/sysrq-trigger</constant></para></listitem> | ||
| 477 | <listitem><para>Example using minicom 2.2</para> | ||
| 478 | <para>Press: <constant>Control-a</constant></para> | ||
| 479 | <para>Press: <constant>f</constant></para> | ||
| 480 | <para>Press: <constant>g</constant></para> | ||
| 238 | </listitem> | 481 | </listitem> |
| 239 | </orderedlist> | 482 | <listitem><para>When you have telneted to a terminal server that supports sending a remote break</para> |
| 240 | </para> | 483 | <para>Press: <constant>Control-]</constant></para> |
| 241 | <para> | 484 | <para>Type in:<constant>send break</constant></para> |
| 242 | IMPORTANT NOTE: Using this option with kgdb over the console | 485 | <para>Press: <constant>Enter</constant></para> |
| 243 | (kgdboc) is not supported. | 486 | <para>Press: <constant>g</constant></para> |
| 487 | </listitem> | ||
| 488 | </itemizedlist> | ||
| 244 | </para> | 489 | </para> |
| 245 | </sect1> | 490 | </listitem> |
| 246 | </chapter> | 491 | <listitem> |
| 247 | <chapter id="ConnectingGDB"> | 492 | <para>Connect from from gdb</para> |
| 248 | <title>Connecting gdb</title> | ||
| 249 | <para> | ||
| 250 | If you are using kgdboc, you need to have used kgdbwait as a boot | ||
| 251 | argument, issued a sysrq-g, or the system you are going to debug | ||
| 252 | has already taken an exception and is waiting for the debugger to | ||
| 253 | attach before you can connect gdb. | ||
| 254 | </para> | ||
| 255 | <para> | ||
| 256 | If you are not using different kgdb I/O driver other than kgdboc, | ||
| 257 | you should be able to connect and the target will automatically | ||
| 258 | respond. | ||
| 259 | </para> | ||
| 260 | <para> | 493 | <para> |
| 261 | Example (using a serial port): | 494 | Example (using a directly connected port): |
| 262 | </para> | 495 | </para> |
| 263 | <programlisting> | 496 | <programlisting> |
| 264 | % gdb ./vmlinux | 497 | % gdb ./vmlinux |
| @@ -266,7 +499,7 @@ | |||
| 266 | (gdb) target remote /dev/ttyS0 | 499 | (gdb) target remote /dev/ttyS0 |
| 267 | </programlisting> | 500 | </programlisting> |
| 268 | <para> | 501 | <para> |
| 269 | Example (kgdb to a terminal server on tcp port 2012): | 502 | Example (kgdb to a terminal server on TCP port 2012): |
| 270 | </para> | 503 | </para> |
| 271 | <programlisting> | 504 | <programlisting> |
| 272 | % gdb ./vmlinux | 505 | % gdb ./vmlinux |
| @@ -283,6 +516,83 @@ | |||
| 283 | communications. You do this prior to issuing the <constant>target | 516 | communications. You do this prior to issuing the <constant>target |
| 284 | remote</constant> command by typing in: <constant>set debug remote 1</constant> | 517 | remote</constant> command by typing in: <constant>set debug remote 1</constant> |
| 285 | </para> | 518 | </para> |
| 519 | </listitem> | ||
| 520 | </orderedlist> | ||
| 521 | <para>Remember if you continue in gdb, and need to "break in" again, | ||
| 522 | you need to issue an other sysrq-g. It is easy to create a simple | ||
| 523 | entry point by putting a breakpoint at <constant>sys_sync</constant> | ||
| 524 | and then you can run "sync" from a shell or script to break into the | ||
| 525 | debugger.</para> | ||
| 526 | </sect1> | ||
| 527 | </chapter> | ||
| 528 | <chapter id="switchKdbKgdb"> | ||
| 529 | <title>kgdb and kdb interoperability</title> | ||
| 530 | <para>It is possible to transition between kdb and kgdb dynamically. | ||
| 531 | The debug core will remember which you used the last time and | ||
| 532 | automatically start in the same mode.</para> | ||
| 533 | <sect1> | ||
| 534 | <title>Switching between kdb and kgdb</title> | ||
| 535 | <sect2> | ||
| 536 | <title>Switching from kgdb to kdb</title> | ||
| 537 | <para> | ||
| 538 | There are two ways to switch from kgdb to kdb: you can use gdb to | ||
| 539 | issue a maintenance packet, or you can blindly type the command $3#33. | ||
| 540 | Whenever kernel debugger stops in kgdb mode it will print the | ||
| 541 | message <constant>KGDB or $3#33 for KDB</constant>. It is important | ||
| 542 | to note that you have to type the sequence correctly in one pass. | ||
| 543 | You cannot type a backspace or delete because kgdb will interpret | ||
| 544 | that as part of the debug stream. | ||
| 545 | <orderedlist> | ||
| 546 | <listitem><para>Change from kgdb to kdb by blindly typing:</para> | ||
| 547 | <para><constant>$3#33</constant></para></listitem> | ||
| 548 | <listitem><para>Change from kgdb to kdb with gdb</para> | ||
| 549 | <para><constant>maintenance packet 3</constant></para> | ||
| 550 | <para>NOTE: Now you must kill gdb. Typically you press control-z and | ||
| 551 | issue the command: kill -9 %</para></listitem> | ||
| 552 | </orderedlist> | ||
| 553 | </para> | ||
| 554 | </sect2> | ||
| 555 | <sect2> | ||
| 556 | <title>Change from kdb to kgdb</title> | ||
| 557 | <para>There are two ways you can change from kdb to kgdb. You can | ||
| 558 | manually enter kgdb mode by issuing the kgdb command from the kdb | ||
| 559 | shell prompt, or you can connect gdb while the kdb shell prompt is | ||
| 560 | active. The kdb shell looks for the typical first commands that gdb | ||
| 561 | would issue with the gdb remote protocol and if it sees one of those | ||
| 562 | commands it automatically changes into kgdb mode.</para> | ||
| 563 | <orderedlist> | ||
| 564 | <listitem><para>From kdb issue the command:</para> | ||
| 565 | <para><constant>kgdb</constant></para> | ||
| 566 | <para>Now disconnect your terminal program and connect gdb in its place</para></listitem> | ||
| 567 | <listitem><para>At the kdb prompt, disconnect the terminal program and connect gdb in its place.</para></listitem> | ||
| 568 | </orderedlist> | ||
| 569 | </sect2> | ||
| 570 | </sect1> | ||
| 571 | <sect1> | ||
| 572 | <title>Running kdb commands from gdb</title> | ||
| 573 | <para>It is possible to run a limited set of kdb commands from gdb, | ||
| 574 | using the gdb monitor command. You don't want to execute any of the | ||
| 575 | run control or breakpoint operations, because it can disrupt the | ||
| 576 | state of the kernel debugger. You should be using gdb for | ||
| 577 | breakpoints and run control operations if you have gdb connected. | ||
| 578 | The more useful commands to run are things like lsmod, dmesg, ps or | ||
| 579 | possibly some of the memory information commands. To see all the kdb | ||
| 580 | commands you can run <constant>monitor help</constant>.</para> | ||
| 581 | <para>Example: | ||
| 582 | <informalexample><programlisting> | ||
| 583 | (gdb) monitor ps | ||
| 584 | 1 idle process (state I) and | ||
| 585 | 27 sleeping system daemon (state M) processes suppressed, | ||
| 586 | use 'ps A' to see all. | ||
| 587 | Task Addr Pid Parent [*] cpu State Thread Command | ||
| 588 | |||
| 589 | 0xc78291d0 1 0 0 0 S 0xc7829404 init | ||
| 590 | 0xc7954150 942 1 0 0 S 0xc7954384 dropbear | ||
| 591 | 0xc78789c0 944 1 0 0 S 0xc7878bf4 sh | ||
| 592 | (gdb) | ||
| 593 | </programlisting></informalexample> | ||
| 594 | </para> | ||
| 595 | </sect1> | ||
| 286 | </chapter> | 596 | </chapter> |
| 287 | <chapter id="KGDBTestSuite"> | 597 | <chapter id="KGDBTestSuite"> |
| 288 | <title>kgdb Test Suite</title> | 598 | <title>kgdb Test Suite</title> |
| @@ -309,34 +619,36 @@ | |||
| 309 | </para> | 619 | </para> |
| 310 | </chapter> | 620 | </chapter> |
| 311 | <chapter id="CommonBackEndReq"> | 621 | <chapter id="CommonBackEndReq"> |
| 312 | <title>KGDB Internals</title> | 622 | <title>Kernel Debugger Internals</title> |
| 313 | <sect1 id="kgdbArchitecture"> | 623 | <sect1 id="kgdbArchitecture"> |
| 314 | <title>Architecture Specifics</title> | 624 | <title>Architecture Specifics</title> |
| 315 | <para> | 625 | <para> |
| 316 | Kgdb is organized into three basic components: | 626 | The kernel debugger is organized into a number of components: |
| 317 | <orderedlist> | 627 | <orderedlist> |
| 318 | <listitem><para>kgdb core</para> | 628 | <listitem><para>The debug core</para> |
| 319 | <para> | 629 | <para> |
| 320 | The kgdb core is found in kernel/kgdb.c. It contains: | 630 | The debug core is found in kernel/debugger/debug_core.c. It contains: |
| 321 | <itemizedlist> | 631 | <itemizedlist> |
| 322 | <listitem><para>All the logic to implement the gdb serial protocol</para></listitem> | 632 | <listitem><para>A generic OS exception handler which includes |
| 323 | <listitem><para>A generic OS exception handler which includes sync'ing the processors into a stopped state on an multi cpu system.</para></listitem> | 633 | sync'ing the processors into a stopped state on an multi-CPU |
| 634 | system.</para></listitem> | ||
| 324 | <listitem><para>The API to talk to the kgdb I/O drivers</para></listitem> | 635 | <listitem><para>The API to talk to the kgdb I/O drivers</para></listitem> |
| 325 | <listitem><para>The API to make calls to the arch specific kgdb implementation</para></listitem> | 636 | <listitem><para>The API to make calls to the arch-specific kgdb implementation</para></listitem> |
| 326 | <listitem><para>The logic to perform safe memory reads and writes to memory while using the debugger</para></listitem> | 637 | <listitem><para>The logic to perform safe memory reads and writes to memory while using the debugger</para></listitem> |
| 327 | <listitem><para>A full implementation for software breakpoints unless overridden by the arch</para></listitem> | 638 | <listitem><para>A full implementation for software breakpoints unless overridden by the arch</para></listitem> |
| 639 | <listitem><para>The API to invoke either the kdb or kgdb frontend to the debug core.</para></listitem> | ||
| 328 | </itemizedlist> | 640 | </itemizedlist> |
| 329 | </para> | 641 | </para> |
| 330 | </listitem> | 642 | </listitem> |
| 331 | <listitem><para>kgdb arch specific implementation</para> | 643 | <listitem><para>kgdb arch-specific implementation</para> |
| 332 | <para> | 644 | <para> |
| 333 | This implementation is generally found in arch/*/kernel/kgdb.c. | 645 | This implementation is generally found in arch/*/kernel/kgdb.c. |
| 334 | As an example, arch/x86/kernel/kgdb.c contains the specifics to | 646 | As an example, arch/x86/kernel/kgdb.c contains the specifics to |
| 335 | implement HW breakpoint as well as the initialization to | 647 | implement HW breakpoint as well as the initialization to |
| 336 | dynamically register and unregister for the trap handlers on | 648 | dynamically register and unregister for the trap handlers on |
| 337 | this architecture. The arch specific portion implements: | 649 | this architecture. The arch-specific portion implements: |
| 338 | <itemizedlist> | 650 | <itemizedlist> |
| 339 | <listitem><para>contains an arch specific trap catcher which | 651 | <listitem><para>contains an arch-specific trap catcher which |
| 340 | invokes kgdb_handle_exception() to start kgdb about doing its | 652 | invokes kgdb_handle_exception() to start kgdb about doing its |
| 341 | work</para></listitem> | 653 | work</para></listitem> |
| 342 | <listitem><para>translation to and from gdb specific packet format to pt_regs</para></listitem> | 654 | <listitem><para>translation to and from gdb specific packet format to pt_regs</para></listitem> |
| @@ -347,11 +659,35 @@ | |||
| 347 | </itemizedlist> | 659 | </itemizedlist> |
| 348 | </para> | 660 | </para> |
| 349 | </listitem> | 661 | </listitem> |
| 662 | <listitem><para>gdbstub frontend (aka kgdb)</para> | ||
| 663 | <para>The gdbstub is located in kernel/debug/gdbstub.c. It contains:</para> | ||
| 664 | <itemizedlist> | ||
| 665 | <listitem><para>All the logic to implement the gdb serial protocol</para></listitem> | ||
| 666 | </itemizedlist> | ||
| 667 | </listitem> | ||
| 668 | <listitem><para>kdb frontend</para> | ||
| 669 | <para>The kdb debugger shell is broken down into a number of | ||
| 670 | components. The kdb core is located in kernel/debug/kdb. There | ||
| 671 | are a number of helper functions in some of the other kernel | ||
| 672 | components to make it possible for kdb to examine and report | ||
| 673 | information about the kernel without taking locks that could | ||
| 674 | cause a kernel deadlock. The kdb core contains implements the following functionality.</para> | ||
| 675 | <itemizedlist> | ||
| 676 | <listitem><para>A simple shell</para></listitem> | ||
| 677 | <listitem><para>The kdb core command set</para></listitem> | ||
| 678 | <listitem><para>A registration API to register additional kdb shell commands.</para> | ||
| 679 | <para>A good example of a self-contained kdb module is the "ftdump" command for dumping the ftrace buffer. See: kernel/trace/trace_kdb.c</para></listitem> | ||
| 680 | <listitem><para>The implementation for kdb_printf() which | ||
| 681 | emits messages directly to I/O drivers, bypassing the kernel | ||
| 682 | log.</para></listitem> | ||
| 683 | <listitem><para>SW / HW breakpoint management for the kdb shell</para></listitem> | ||
| 684 | </itemizedlist> | ||
| 685 | </listitem> | ||
| 350 | <listitem><para>kgdb I/O driver</para> | 686 | <listitem><para>kgdb I/O driver</para> |
| 351 | <para> | 687 | <para> |
| 352 | Each kgdb I/O driver has to provide an implemenation for the following: | 688 | Each kgdb I/O driver has to provide an implementation for the following: |
| 353 | <itemizedlist> | 689 | <itemizedlist> |
| 354 | <listitem><para>configuration via builtin or module</para></listitem> | 690 | <listitem><para>configuration via built-in or module</para></listitem> |
| 355 | <listitem><para>dynamic configuration and kgdb hook registration calls</para></listitem> | 691 | <listitem><para>dynamic configuration and kgdb hook registration calls</para></listitem> |
| 356 | <listitem><para>read and write character interface</para></listitem> | 692 | <listitem><para>read and write character interface</para></listitem> |
| 357 | <listitem><para>A cleanup handler for unconfiguring from the kgdb core</para></listitem> | 693 | <listitem><para>A cleanup handler for unconfiguring from the kgdb core</para></listitem> |
| @@ -416,15 +752,15 @@ | |||
| 416 | underlying low level to the hardware driver having "polling hooks" | 752 | underlying low level to the hardware driver having "polling hooks" |
| 417 | which the to which the tty driver is attached. In the initial | 753 | which the to which the tty driver is attached. In the initial |
| 418 | implementation of kgdboc it the serial_core was changed to expose a | 754 | implementation of kgdboc it the serial_core was changed to expose a |
| 419 | low level uart hook for doing polled mode reading and writing of a | 755 | low level UART hook for doing polled mode reading and writing of a |
| 420 | single character while in an atomic context. When kgdb makes an I/O | 756 | single character while in an atomic context. When kgdb makes an I/O |
| 421 | request to the debugger, kgdboc invokes a call back in the serial | 757 | request to the debugger, kgdboc invokes a call back in the serial |
| 422 | core which in turn uses the call back in the uart driver. It is | 758 | core which in turn uses the call back in the UART driver. It is |
| 423 | certainly possible to extend kgdboc to work with non-uart based | 759 | certainly possible to extend kgdboc to work with non-UART based |
| 424 | consoles in the future. | 760 | consoles in the future. |
| 425 | </para> | 761 | </para> |
| 426 | <para> | 762 | <para> |
| 427 | When using kgdboc with a uart, the uart driver must implement two callbacks in the <constant>struct uart_ops</constant>. Example from drivers/8250.c:<programlisting> | 763 | When using kgdboc with a UART, the UART driver must implement two callbacks in the <constant>struct uart_ops</constant>. Example from drivers/8250.c:<programlisting> |
| 428 | #ifdef CONFIG_CONSOLE_POLL | 764 | #ifdef CONFIG_CONSOLE_POLL |
| 429 | .poll_get_char = serial8250_get_poll_char, | 765 | .poll_get_char = serial8250_get_poll_char, |
| 430 | .poll_put_char = serial8250_put_poll_char, | 766 | .poll_put_char = serial8250_put_poll_char, |
| @@ -434,7 +770,7 @@ | |||
| 434 | <constant>#ifdef CONFIG_CONSOLE_POLL</constant>, as shown above. | 770 | <constant>#ifdef CONFIG_CONSOLE_POLL</constant>, as shown above. |
| 435 | Keep in mind that polling hooks have to be implemented in such a way | 771 | Keep in mind that polling hooks have to be implemented in such a way |
| 436 | that they can be called from an atomic context and have to restore | 772 | that they can be called from an atomic context and have to restore |
| 437 | the state of the uart chip on return such that the system can return | 773 | the state of the UART chip on return such that the system can return |
| 438 | to normal when the debugger detaches. You need to be very careful | 774 | to normal when the debugger detaches. You need to be very careful |
| 439 | with any kind of lock you consider, because failing here is most | 775 | with any kind of lock you consider, because failing here is most |
| 440 | going to mean pressing the reset button. | 776 | going to mean pressing the reset button. |
| @@ -453,6 +789,10 @@ | |||
| 453 | <itemizedlist> | 789 | <itemizedlist> |
| 454 | <listitem><para>Jason Wessel<email>jason.wessel@windriver.com</email></para></listitem> | 790 | <listitem><para>Jason Wessel<email>jason.wessel@windriver.com</email></para></listitem> |
| 455 | </itemizedlist> | 791 | </itemizedlist> |
| 792 | In Jan 2010 this document was updated to include kdb. | ||
| 793 | <itemizedlist> | ||
| 794 | <listitem><para>Jason Wessel<email>jason.wessel@windriver.com</email></para></listitem> | ||
| 795 | </itemizedlist> | ||
| 456 | </para> | 796 | </para> |
| 457 | </chapter> | 797 | </chapter> |
| 458 | </book> | 798 | </book> |
diff --git a/Documentation/kernel-parameters.txt b/Documentation/kernel-parameters.txt index b12bacd252fc..bdce359820bb 100644 --- a/Documentation/kernel-parameters.txt +++ b/Documentation/kernel-parameters.txt | |||
| @@ -58,6 +58,7 @@ parameter is applicable: | |||
| 58 | ISAPNP ISA PnP code is enabled. | 58 | ISAPNP ISA PnP code is enabled. |
| 59 | ISDN Appropriate ISDN support is enabled. | 59 | ISDN Appropriate ISDN support is enabled. |
| 60 | JOY Appropriate joystick support is enabled. | 60 | JOY Appropriate joystick support is enabled. |
| 61 | KGDB Kernel debugger support is enabled. | ||
| 61 | KVM Kernel Virtual Machine support is enabled. | 62 | KVM Kernel Virtual Machine support is enabled. |
| 62 | LIBATA Libata driver is enabled | 63 | LIBATA Libata driver is enabled |
| 63 | LP Printer support is enabled. | 64 | LP Printer support is enabled. |
| @@ -1120,10 +1121,15 @@ and is between 256 and 4096 characters. It is defined in the file | |||
| 1120 | use the HighMem zone if it exists, and the Normal | 1121 | use the HighMem zone if it exists, and the Normal |
| 1121 | zone if it does not. | 1122 | zone if it does not. |
| 1122 | 1123 | ||
| 1123 | kgdboc= [HW] kgdb over consoles. | 1124 | kgdboc= [KGDB,HW] kgdb over consoles. |
| 1124 | Requires a tty driver that supports console polling. | 1125 | Requires a tty driver that supports console polling, |
| 1125 | (only serial supported for now) | 1126 | or a supported polling keyboard driver (non-usb). |
| 1126 | Format: <serial_device>[,baud] | 1127 | Serial only format: <serial_device>[,baud] |
| 1128 | keyboard only format: kbd | ||
| 1129 | keyboard and serial format: kbd,<serial_device>[,baud] | ||
| 1130 | |||
| 1131 | kgdbwait [KGDB] Stop kernel execution and enter the | ||
| 1132 | kernel debugger at the earliest opportunity. | ||
| 1127 | 1133 | ||
| 1128 | kmac= [MIPS] korina ethernet MAC address. | 1134 | kmac= [MIPS] korina ethernet MAC address. |
| 1129 | Configure the RouterBoard 532 series on-chip | 1135 | Configure the RouterBoard 532 series on-chip |
diff --git a/MAINTAINERS b/MAINTAINERS index a31a717e6dcc..a8fe9b461e09 100644 --- a/MAINTAINERS +++ b/MAINTAINERS | |||
| @@ -3319,15 +3319,17 @@ F: include/linux/key-type.h | |||
| 3319 | F: include/keys/ | 3319 | F: include/keys/ |
| 3320 | F: security/keys/ | 3320 | F: security/keys/ |
| 3321 | 3321 | ||
| 3322 | KGDB | 3322 | KGDB / KDB /debug_core |
| 3323 | M: Jason Wessel <jason.wessel@windriver.com> | 3323 | M: Jason Wessel <jason.wessel@windriver.com> |
| 3324 | W: http://kgdb.wiki.kernel.org/ | ||
| 3324 | L: kgdb-bugreport@lists.sourceforge.net | 3325 | L: kgdb-bugreport@lists.sourceforge.net |
| 3325 | S: Maintained | 3326 | S: Maintained |
| 3326 | F: Documentation/DocBook/kgdb.tmpl | 3327 | F: Documentation/DocBook/kgdb.tmpl |
| 3327 | F: drivers/misc/kgdbts.c | 3328 | F: drivers/misc/kgdbts.c |
| 3328 | F: drivers/serial/kgdboc.c | 3329 | F: drivers/serial/kgdboc.c |
| 3330 | F: include/linux/kdb.h | ||
| 3329 | F: include/linux/kgdb.h | 3331 | F: include/linux/kgdb.h |
| 3330 | F: kernel/kgdb.c | 3332 | F: kernel/debug/ |
| 3331 | 3333 | ||
| 3332 | KMEMCHECK | 3334 | KMEMCHECK |
| 3333 | M: Vegard Nossum <vegardno@ifi.uio.no> | 3335 | M: Vegard Nossum <vegardno@ifi.uio.no> |
diff --git a/arch/arm/include/asm/kmap_types.h b/arch/arm/include/asm/kmap_types.h index c4b2ea3fbe42..e51b1e81df05 100644 --- a/arch/arm/include/asm/kmap_types.h +++ b/arch/arm/include/asm/kmap_types.h | |||
| @@ -20,6 +20,7 @@ enum km_type { | |||
| 20 | KM_SOFTIRQ1, | 20 | KM_SOFTIRQ1, |
| 21 | KM_L1_CACHE, | 21 | KM_L1_CACHE, |
| 22 | KM_L2_CACHE, | 22 | KM_L2_CACHE, |
| 23 | KM_KDB, | ||
| 23 | KM_TYPE_NR | 24 | KM_TYPE_NR |
| 24 | }; | 25 | }; |
| 25 | 26 | ||
diff --git a/arch/arm/kernel/kgdb.c b/arch/arm/kernel/kgdb.c index a5b846b9895d..c868a8864117 100644 --- a/arch/arm/kernel/kgdb.c +++ b/arch/arm/kernel/kgdb.c | |||
| @@ -98,6 +98,11 @@ sleeping_thread_to_gdb_regs(unsigned long *gdb_regs, struct task_struct *task) | |||
| 98 | gdb_regs[_CPSR] = thread_regs->ARM_cpsr; | 98 | gdb_regs[_CPSR] = thread_regs->ARM_cpsr; |
| 99 | } | 99 | } |
| 100 | 100 | ||
| 101 | void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long pc) | ||
| 102 | { | ||
| 103 | regs->ARM_pc = pc; | ||
| 104 | } | ||
| 105 | |||
| 101 | static int compiled_break; | 106 | static int compiled_break; |
| 102 | 107 | ||
| 103 | int kgdb_arch_handle_exception(int exception_vector, int signo, | 108 | int kgdb_arch_handle_exception(int exception_vector, int signo, |
diff --git a/arch/blackfin/kernel/kgdb.c b/arch/blackfin/kernel/kgdb.c index 2c501ceb1e55..7367aea4ae59 100644 --- a/arch/blackfin/kernel/kgdb.c +++ b/arch/blackfin/kernel/kgdb.c | |||
| @@ -439,6 +439,11 @@ int kgdb_validate_break_address(unsigned long addr) | |||
| 439 | return -EFAULT; | 439 | return -EFAULT; |
| 440 | } | 440 | } |
| 441 | 441 | ||
| 442 | void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long ip) | ||
| 443 | { | ||
| 444 | regs->retx = ip; | ||
| 445 | } | ||
| 446 | |||
| 442 | int kgdb_arch_init(void) | 447 | int kgdb_arch_init(void) |
| 443 | { | 448 | { |
| 444 | kgdb_single_step = 0; | 449 | kgdb_single_step = 0; |
diff --git a/arch/mips/include/asm/kgdb.h b/arch/mips/include/asm/kgdb.h index 48223b09396c..19002d605ac4 100644 --- a/arch/mips/include/asm/kgdb.h +++ b/arch/mips/include/asm/kgdb.h | |||
| @@ -38,6 +38,8 @@ extern int kgdb_early_setup; | |||
| 38 | extern void *saved_vectors[32]; | 38 | extern void *saved_vectors[32]; |
| 39 | extern void handle_exception(struct pt_regs *regs); | 39 | extern void handle_exception(struct pt_regs *regs); |
| 40 | extern void breakinst(void); | 40 | extern void breakinst(void); |
| 41 | extern int kgdb_ll_trap(int cmd, const char *str, | ||
| 42 | struct pt_regs *regs, long err, int trap, int sig); | ||
| 41 | 43 | ||
| 42 | #endif /* __KERNEL__ */ | 44 | #endif /* __KERNEL__ */ |
| 43 | 45 | ||
diff --git a/arch/mips/kernel/kgdb.c b/arch/mips/kernel/kgdb.c index 50c9bb880667..9b78ff6e9b84 100644 --- a/arch/mips/kernel/kgdb.c +++ b/arch/mips/kernel/kgdb.c | |||
| @@ -180,6 +180,11 @@ void sleeping_thread_to_gdb_regs(unsigned long *gdb_regs, struct task_struct *p) | |||
| 180 | *(ptr++) = regs->cp0_epc; | 180 | *(ptr++) = regs->cp0_epc; |
| 181 | } | 181 | } |
| 182 | 182 | ||
| 183 | void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long pc) | ||
| 184 | { | ||
| 185 | regs->cp0_epc = pc; | ||
| 186 | } | ||
| 187 | |||
| 183 | /* | 188 | /* |
| 184 | * Calls linux_debug_hook before the kernel dies. If KGDB is enabled, | 189 | * Calls linux_debug_hook before the kernel dies. If KGDB is enabled, |
| 185 | * then try to fall into the debugger | 190 | * then try to fall into the debugger |
| @@ -198,7 +203,7 @@ static int kgdb_mips_notify(struct notifier_block *self, unsigned long cmd, | |||
| 198 | if (atomic_read(&kgdb_active) != -1) | 203 | if (atomic_read(&kgdb_active) != -1) |
| 199 | kgdb_nmicallback(smp_processor_id(), regs); | 204 | kgdb_nmicallback(smp_processor_id(), regs); |
| 200 | 205 | ||
| 201 | if (kgdb_handle_exception(trap, compute_signal(trap), 0, regs)) | 206 | if (kgdb_handle_exception(trap, compute_signal(trap), cmd, regs)) |
| 202 | return NOTIFY_DONE; | 207 | return NOTIFY_DONE; |
| 203 | 208 | ||
| 204 | if (atomic_read(&kgdb_setting_breakpoint)) | 209 | if (atomic_read(&kgdb_setting_breakpoint)) |
| @@ -212,6 +217,26 @@ static int kgdb_mips_notify(struct notifier_block *self, unsigned long cmd, | |||
| 212 | return NOTIFY_STOP; | 217 | return NOTIFY_STOP; |
| 213 | } | 218 | } |
| 214 | 219 | ||
| 220 | #ifdef CONFIG_KGDB_LOW_LEVEL_TRAP | ||
| 221 | int kgdb_ll_trap(int cmd, const char *str, | ||
| 222 | struct pt_regs *regs, long err, int trap, int sig) | ||
| 223 | { | ||
| 224 | struct die_args args = { | ||
| 225 | .regs = regs, | ||
| 226 | .str = str, | ||
| 227 | .err = err, | ||
| 228 | .trapnr = trap, | ||
| 229 | .signr = sig, | ||
| 230 | |||
| 231 | }; | ||
| 232 | |||
| 233 | if (!kgdb_io_module_registered) | ||
| 234 | return NOTIFY_DONE; | ||
| 235 | |||
| 236 | return kgdb_mips_notify(NULL, cmd, &args); | ||
| 237 | } | ||
| 238 | #endif /* CONFIG_KGDB_LOW_LEVEL_TRAP */ | ||
| 239 | |||
| 215 | static struct notifier_block kgdb_notifier = { | 240 | static struct notifier_block kgdb_notifier = { |
| 216 | .notifier_call = kgdb_mips_notify, | 241 | .notifier_call = kgdb_mips_notify, |
| 217 | }; | 242 | }; |
diff --git a/arch/mips/kernel/traps.c b/arch/mips/kernel/traps.c index d612c6dcb746..950bde8813fc 100644 --- a/arch/mips/kernel/traps.c +++ b/arch/mips/kernel/traps.c | |||
| @@ -26,6 +26,7 @@ | |||
| 26 | #include <linux/kgdb.h> | 26 | #include <linux/kgdb.h> |
| 27 | #include <linux/kdebug.h> | 27 | #include <linux/kdebug.h> |
| 28 | #include <linux/notifier.h> | 28 | #include <linux/notifier.h> |
| 29 | #include <linux/kdb.h> | ||
| 29 | 30 | ||
| 30 | #include <asm/bootinfo.h> | 31 | #include <asm/bootinfo.h> |
| 31 | #include <asm/branch.h> | 32 | #include <asm/branch.h> |
| @@ -185,6 +186,11 @@ void show_stack(struct task_struct *task, unsigned long *sp) | |||
| 185 | regs.regs[29] = task->thread.reg29; | 186 | regs.regs[29] = task->thread.reg29; |
| 186 | regs.regs[31] = 0; | 187 | regs.regs[31] = 0; |
| 187 | regs.cp0_epc = task->thread.reg31; | 188 | regs.cp0_epc = task->thread.reg31; |
| 189 | #ifdef CONFIG_KGDB_KDB | ||
| 190 | } else if (atomic_read(&kgdb_active) != -1 && | ||
| 191 | kdb_current_regs) { | ||
| 192 | memcpy(®s, kdb_current_regs, sizeof(regs)); | ||
| 193 | #endif /* CONFIG_KGDB_KDB */ | ||
| 188 | } else { | 194 | } else { |
| 189 | prepare_frametrace(®s); | 195 | prepare_frametrace(®s); |
| 190 | } | 196 | } |
| @@ -360,6 +366,8 @@ void __noreturn die(const char * str, struct pt_regs * regs) | |||
| 360 | unsigned long dvpret = dvpe(); | 366 | unsigned long dvpret = dvpe(); |
| 361 | #endif /* CONFIG_MIPS_MT_SMTC */ | 367 | #endif /* CONFIG_MIPS_MT_SMTC */ |
| 362 | 368 | ||
| 369 | notify_die(DIE_OOPS, str, (struct pt_regs *)regs, SIGSEGV, 0, 0); | ||
| 370 | |||
| 363 | console_verbose(); | 371 | console_verbose(); |
| 364 | spin_lock_irq(&die_lock); | 372 | spin_lock_irq(&die_lock); |
| 365 | bust_spinlocks(1); | 373 | bust_spinlocks(1); |
| @@ -704,6 +712,11 @@ static void do_trap_or_bp(struct pt_regs *regs, unsigned int code, | |||
| 704 | siginfo_t info; | 712 | siginfo_t info; |
| 705 | char b[40]; | 713 | char b[40]; |
| 706 | 714 | ||
| 715 | #ifdef CONFIG_KGDB_LOW_LEVEL_TRAP | ||
| 716 | if (kgdb_ll_trap(DIE_TRAP, str, regs, code, 0, 0) == NOTIFY_STOP) | ||
| 717 | return; | ||
| 718 | #endif /* CONFIG_KGDB_LOW_LEVEL_TRAP */ | ||
| 719 | |||
| 707 | if (notify_die(DIE_TRAP, str, regs, code, 0, 0) == NOTIFY_STOP) | 720 | if (notify_die(DIE_TRAP, str, regs, code, 0, 0) == NOTIFY_STOP) |
| 708 | return; | 721 | return; |
| 709 | 722 | ||
diff --git a/arch/powerpc/include/asm/kmap_types.h b/arch/powerpc/include/asm/kmap_types.h index 916369575c97..bca8fdcd2542 100644 --- a/arch/powerpc/include/asm/kmap_types.h +++ b/arch/powerpc/include/asm/kmap_types.h | |||
| @@ -26,6 +26,7 @@ enum km_type { | |||
| 26 | KM_SOFTIRQ1, | 26 | KM_SOFTIRQ1, |
| 27 | KM_PPC_SYNC_PAGE, | 27 | KM_PPC_SYNC_PAGE, |
| 28 | KM_PPC_SYNC_ICACHE, | 28 | KM_PPC_SYNC_ICACHE, |
| 29 | KM_KDB, | ||
| 29 | KM_TYPE_NR | 30 | KM_TYPE_NR |
| 30 | }; | 31 | }; |
| 31 | 32 | ||
diff --git a/arch/powerpc/kernel/kgdb.c b/arch/powerpc/kernel/kgdb.c index 41bada0298c8..82a7b228c81a 100644 --- a/arch/powerpc/kernel/kgdb.c +++ b/arch/powerpc/kernel/kgdb.c | |||
| @@ -20,6 +20,7 @@ | |||
| 20 | #include <linux/smp.h> | 20 | #include <linux/smp.h> |
| 21 | #include <linux/signal.h> | 21 | #include <linux/signal.h> |
| 22 | #include <linux/ptrace.h> | 22 | #include <linux/ptrace.h> |
| 23 | #include <linux/kdebug.h> | ||
| 23 | #include <asm/current.h> | 24 | #include <asm/current.h> |
| 24 | #include <asm/processor.h> | 25 | #include <asm/processor.h> |
| 25 | #include <asm/machdep.h> | 26 | #include <asm/machdep.h> |
| @@ -115,7 +116,8 @@ void kgdb_roundup_cpus(unsigned long flags) | |||
| 115 | /* KGDB functions to use existing PowerPC64 hooks. */ | 116 | /* KGDB functions to use existing PowerPC64 hooks. */ |
| 116 | static int kgdb_debugger(struct pt_regs *regs) | 117 | static int kgdb_debugger(struct pt_regs *regs) |
| 117 | { | 118 | { |
| 118 | return kgdb_handle_exception(0, computeSignal(TRAP(regs)), 0, regs); | 119 | return !kgdb_handle_exception(1, computeSignal(TRAP(regs)), |
| 120 | DIE_OOPS, regs); | ||
| 119 | } | 121 | } |
| 120 | 122 | ||
| 121 | static int kgdb_handle_breakpoint(struct pt_regs *regs) | 123 | static int kgdb_handle_breakpoint(struct pt_regs *regs) |
| @@ -123,7 +125,7 @@ static int kgdb_handle_breakpoint(struct pt_regs *regs) | |||
| 123 | if (user_mode(regs)) | 125 | if (user_mode(regs)) |
| 124 | return 0; | 126 | return 0; |
| 125 | 127 | ||
| 126 | if (kgdb_handle_exception(0, SIGTRAP, 0, regs) != 0) | 128 | if (kgdb_handle_exception(1, SIGTRAP, 0, regs) != 0) |
| 127 | return 0; | 129 | return 0; |
| 128 | 130 | ||
| 129 | if (*(u32 *) (regs->nip) == *(u32 *) (&arch_kgdb_ops.gdb_bpt_instr)) | 131 | if (*(u32 *) (regs->nip) == *(u32 *) (&arch_kgdb_ops.gdb_bpt_instr)) |
| @@ -309,6 +311,11 @@ void gdb_regs_to_pt_regs(unsigned long *gdb_regs, struct pt_regs *regs) | |||
| 309 | (unsigned long)(((void *)gdb_regs) + NUMREGBYTES)); | 311 | (unsigned long)(((void *)gdb_regs) + NUMREGBYTES)); |
| 310 | } | 312 | } |
| 311 | 313 | ||
| 314 | void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long pc) | ||
| 315 | { | ||
| 316 | regs->nip = pc; | ||
| 317 | } | ||
| 318 | |||
| 312 | /* | 319 | /* |
| 313 | * This function does PowerPC specific procesing for interfacing to gdb. | 320 | * This function does PowerPC specific procesing for interfacing to gdb. |
| 314 | */ | 321 | */ |
diff --git a/arch/powerpc/kernel/traps.c b/arch/powerpc/kernel/traps.c index 29d128eb6c43..b6859aade9c2 100644 --- a/arch/powerpc/kernel/traps.c +++ b/arch/powerpc/kernel/traps.c | |||
| @@ -815,12 +815,15 @@ void __kprobes program_check_exception(struct pt_regs *regs) | |||
| 815 | return; | 815 | return; |
| 816 | } | 816 | } |
| 817 | if (reason & REASON_TRAP) { | 817 | if (reason & REASON_TRAP) { |
| 818 | /* Debugger is first in line to stop recursive faults in | ||
| 819 | * rcu_lock, notify_die, or atomic_notifier_call_chain */ | ||
| 820 | if (debugger_bpt(regs)) | ||
| 821 | return; | ||
| 822 | |||
| 818 | /* trap exception */ | 823 | /* trap exception */ |
| 819 | if (notify_die(DIE_BPT, "breakpoint", regs, 5, 5, SIGTRAP) | 824 | if (notify_die(DIE_BPT, "breakpoint", regs, 5, 5, SIGTRAP) |
| 820 | == NOTIFY_STOP) | 825 | == NOTIFY_STOP) |
| 821 | return; | 826 | return; |
| 822 | if (debugger_bpt(regs)) | ||
| 823 | return; | ||
| 824 | 827 | ||
| 825 | if (!(regs->msr & MSR_PR) && /* not user-mode */ | 828 | if (!(regs->msr & MSR_PR) && /* not user-mode */ |
| 826 | report_bug(regs->nip, regs) == BUG_TRAP_TYPE_WARN) { | 829 | report_bug(regs->nip, regs) == BUG_TRAP_TYPE_WARN) { |
diff --git a/arch/sh/kernel/kgdb.c b/arch/sh/kernel/kgdb.c index 70c69659b846..efb6d398dec3 100644 --- a/arch/sh/kernel/kgdb.c +++ b/arch/sh/kernel/kgdb.c | |||
| @@ -237,6 +237,18 @@ int kgdb_arch_handle_exception(int e_vector, int signo, int err_code, | |||
| 237 | return -1; | 237 | return -1; |
| 238 | } | 238 | } |
| 239 | 239 | ||
| 240 | unsigned long kgdb_arch_pc(int exception, struct pt_regs *regs) | ||
| 241 | { | ||
| 242 | if (exception == 60) | ||
| 243 | return instruction_pointer(regs) - 2; | ||
| 244 | return instruction_pointer(regs); | ||
| 245 | } | ||
| 246 | |||
| 247 | void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long ip) | ||
| 248 | { | ||
| 249 | regs->pc = ip; | ||
| 250 | } | ||
| 251 | |||
| 240 | /* | 252 | /* |
| 241 | * The primary entry points for the kgdb debug trap table entries. | 253 | * The primary entry points for the kgdb debug trap table entries. |
| 242 | */ | 254 | */ |
| @@ -247,7 +259,7 @@ BUILD_TRAP_HANDLER(singlestep) | |||
| 247 | 259 | ||
| 248 | local_irq_save(flags); | 260 | local_irq_save(flags); |
| 249 | regs->pc -= instruction_size(__raw_readw(regs->pc - 4)); | 261 | regs->pc -= instruction_size(__raw_readw(regs->pc - 4)); |
| 250 | kgdb_handle_exception(vec >> 2, SIGTRAP, 0, regs); | 262 | kgdb_handle_exception(0, SIGTRAP, 0, regs); |
| 251 | local_irq_restore(flags); | 263 | local_irq_restore(flags); |
| 252 | } | 264 | } |
| 253 | 265 | ||
diff --git a/arch/sparc/kernel/kgdb_32.c b/arch/sparc/kernel/kgdb_32.c index 04df4edc0073..539243b236fa 100644 --- a/arch/sparc/kernel/kgdb_32.c +++ b/arch/sparc/kernel/kgdb_32.c | |||
| @@ -158,6 +158,12 @@ void kgdb_arch_exit(void) | |||
| 158 | { | 158 | { |
| 159 | } | 159 | } |
| 160 | 160 | ||
| 161 | void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long ip) | ||
| 162 | { | ||
| 163 | regs->pc = ip; | ||
| 164 | regs->npc = regs->pc + 4; | ||
| 165 | } | ||
| 166 | |||
| 161 | struct kgdb_arch arch_kgdb_ops = { | 167 | struct kgdb_arch arch_kgdb_ops = { |
| 162 | /* Breakpoint instruction: ta 0x7d */ | 168 | /* Breakpoint instruction: ta 0x7d */ |
| 163 | .gdb_bpt_instr = { 0x91, 0xd0, 0x20, 0x7d }, | 169 | .gdb_bpt_instr = { 0x91, 0xd0, 0x20, 0x7d }, |
diff --git a/arch/sparc/kernel/kgdb_64.c b/arch/sparc/kernel/kgdb_64.c index 0a2bd0f99fc1..768290a6c028 100644 --- a/arch/sparc/kernel/kgdb_64.c +++ b/arch/sparc/kernel/kgdb_64.c | |||
| @@ -181,6 +181,12 @@ void kgdb_arch_exit(void) | |||
| 181 | { | 181 | { |
| 182 | } | 182 | } |
| 183 | 183 | ||
| 184 | void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long ip) | ||
| 185 | { | ||
| 186 | regs->tpc = ip; | ||
| 187 | regs->tnpc = regs->tpc + 4; | ||
| 188 | } | ||
| 189 | |||
| 184 | struct kgdb_arch arch_kgdb_ops = { | 190 | struct kgdb_arch arch_kgdb_ops = { |
| 185 | /* Breakpoint instruction: ta 0x72 */ | 191 | /* Breakpoint instruction: ta 0x72 */ |
| 186 | .gdb_bpt_instr = { 0x91, 0xd0, 0x20, 0x72 }, | 192 | .gdb_bpt_instr = { 0x91, 0xd0, 0x20, 0x72 }, |
diff --git a/arch/x86/include/asm/kgdb.h b/arch/x86/include/asm/kgdb.h index e6c6c808489f..006da3687cdc 100644 --- a/arch/x86/include/asm/kgdb.h +++ b/arch/x86/include/asm/kgdb.h | |||
| @@ -76,4 +76,7 @@ static inline void arch_kgdb_breakpoint(void) | |||
| 76 | #define BREAK_INSTR_SIZE 1 | 76 | #define BREAK_INSTR_SIZE 1 |
| 77 | #define CACHE_FLUSH_IS_SAFE 1 | 77 | #define CACHE_FLUSH_IS_SAFE 1 |
| 78 | 78 | ||
| 79 | extern int kgdb_ll_trap(int cmd, const char *str, | ||
| 80 | struct pt_regs *regs, long err, int trap, int sig); | ||
| 81 | |||
| 79 | #endif /* _ASM_X86_KGDB_H */ | 82 | #endif /* _ASM_X86_KGDB_H */ |
diff --git a/arch/x86/kernel/kgdb.c b/arch/x86/kernel/kgdb.c index b2258ca91003..95b89d4cb8f1 100644 --- a/arch/x86/kernel/kgdb.c +++ b/arch/x86/kernel/kgdb.c | |||
| @@ -47,20 +47,8 @@ | |||
| 47 | #include <asm/debugreg.h> | 47 | #include <asm/debugreg.h> |
| 48 | #include <asm/apicdef.h> | 48 | #include <asm/apicdef.h> |
| 49 | #include <asm/system.h> | 49 | #include <asm/system.h> |
| 50 | |||
| 51 | #include <asm/apic.h> | 50 | #include <asm/apic.h> |
| 52 | 51 | ||
| 53 | /* | ||
| 54 | * Put the error code here just in case the user cares: | ||
| 55 | */ | ||
| 56 | static int gdb_x86errcode; | ||
| 57 | |||
| 58 | /* | ||
| 59 | * Likewise, the vector number here (since GDB only gets the signal | ||
| 60 | * number through the usual means, and that's not very specific): | ||
| 61 | */ | ||
| 62 | static int gdb_x86vector = -1; | ||
| 63 | |||
| 64 | /** | 52 | /** |
| 65 | * pt_regs_to_gdb_regs - Convert ptrace regs to GDB regs | 53 | * pt_regs_to_gdb_regs - Convert ptrace regs to GDB regs |
| 66 | * @gdb_regs: A pointer to hold the registers in the order GDB wants. | 54 | * @gdb_regs: A pointer to hold the registers in the order GDB wants. |
| @@ -399,23 +387,6 @@ void kgdb_disable_hw_debug(struct pt_regs *regs) | |||
| 399 | } | 387 | } |
| 400 | } | 388 | } |
| 401 | 389 | ||
| 402 | /** | ||
| 403 | * kgdb_post_primary_code - Save error vector/code numbers. | ||
| 404 | * @regs: Original pt_regs. | ||
| 405 | * @e_vector: Original error vector. | ||
| 406 | * @err_code: Original error code. | ||
| 407 | * | ||
| 408 | * This is needed on architectures which support SMP and KGDB. | ||
| 409 | * This function is called after all the slave cpus have been put | ||
| 410 | * to a know spin state and the primary CPU has control over KGDB. | ||
| 411 | */ | ||
| 412 | void kgdb_post_primary_code(struct pt_regs *regs, int e_vector, int err_code) | ||
| 413 | { | ||
| 414 | /* primary processor is completely in the debugger */ | ||
| 415 | gdb_x86vector = e_vector; | ||
| 416 | gdb_x86errcode = err_code; | ||
| 417 | } | ||
| 418 | |||
| 419 | #ifdef CONFIG_SMP | 390 | #ifdef CONFIG_SMP |
| 420 | /** | 391 | /** |
| 421 | * kgdb_roundup_cpus - Get other CPUs into a holding pattern | 392 | * kgdb_roundup_cpus - Get other CPUs into a holding pattern |
| @@ -567,7 +538,7 @@ static int __kgdb_notify(struct die_args *args, unsigned long cmd) | |||
| 567 | return NOTIFY_DONE; | 538 | return NOTIFY_DONE; |
| 568 | } | 539 | } |
| 569 | 540 | ||
| 570 | if (kgdb_handle_exception(args->trapnr, args->signr, args->err, regs)) | 541 | if (kgdb_handle_exception(args->trapnr, args->signr, cmd, regs)) |
| 571 | return NOTIFY_DONE; | 542 | return NOTIFY_DONE; |
| 572 | 543 | ||
| 573 | /* Must touch watchdog before return to normal operation */ | 544 | /* Must touch watchdog before return to normal operation */ |
| @@ -575,6 +546,26 @@ static int __kgdb_notify(struct die_args *args, unsigned long cmd) | |||
| 575 | return NOTIFY_STOP; | 546 | return NOTIFY_STOP; |
| 576 | } | 547 | } |
| 577 | 548 | ||
| 549 | #ifdef CONFIG_KGDB_LOW_LEVEL_TRAP | ||
| 550 | int kgdb_ll_trap(int cmd, const char *str, | ||
| 551 | struct pt_regs *regs, long err, int trap, int sig) | ||
| 552 | { | ||
| 553 | struct die_args args = { | ||
| 554 | .regs = regs, | ||
| 555 | .str = str, | ||
| 556 | .err = err, | ||
| 557 | .trapnr = trap, | ||
| 558 | .signr = sig, | ||
| 559 | |||
| 560 | }; | ||
| 561 | |||
| 562 | if (!kgdb_io_module_registered) | ||
| 563 | return NOTIFY_DONE; | ||
| 564 | |||
| 565 | return __kgdb_notify(&args, cmd); | ||
| 566 | } | ||
| 567 | #endif /* CONFIG_KGDB_LOW_LEVEL_TRAP */ | ||
| 568 | |||
| 578 | static int | 569 | static int |
| 579 | kgdb_notify(struct notifier_block *self, unsigned long cmd, void *ptr) | 570 | kgdb_notify(struct notifier_block *self, unsigned long cmd, void *ptr) |
| 580 | { | 571 | { |
| @@ -690,6 +681,11 @@ unsigned long kgdb_arch_pc(int exception, struct pt_regs *regs) | |||
| 690 | return instruction_pointer(regs); | 681 | return instruction_pointer(regs); |
| 691 | } | 682 | } |
| 692 | 683 | ||
| 684 | void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long ip) | ||
| 685 | { | ||
| 686 | regs->ip = ip; | ||
| 687 | } | ||
| 688 | |||
| 693 | struct kgdb_arch arch_kgdb_ops = { | 689 | struct kgdb_arch arch_kgdb_ops = { |
| 694 | /* Breakpoint instruction: */ | 690 | /* Breakpoint instruction: */ |
| 695 | .gdb_bpt_instr = { 0xcc }, | 691 | .gdb_bpt_instr = { 0xcc }, |
diff --git a/arch/x86/kernel/traps.c b/arch/x86/kernel/traps.c index 02cfb9b8f5b1..7eaad4c5110a 100644 --- a/arch/x86/kernel/traps.c +++ b/arch/x86/kernel/traps.c | |||
| @@ -15,6 +15,7 @@ | |||
| 15 | #include <linux/kprobes.h> | 15 | #include <linux/kprobes.h> |
| 16 | #include <linux/uaccess.h> | 16 | #include <linux/uaccess.h> |
| 17 | #include <linux/kdebug.h> | 17 | #include <linux/kdebug.h> |
| 18 | #include <linux/kgdb.h> | ||
| 18 | #include <linux/kernel.h> | 19 | #include <linux/kernel.h> |
| 19 | #include <linux/module.h> | 20 | #include <linux/module.h> |
| 20 | #include <linux/ptrace.h> | 21 | #include <linux/ptrace.h> |
| @@ -451,6 +452,11 @@ void restart_nmi(void) | |||
| 451 | /* May run on IST stack. */ | 452 | /* May run on IST stack. */ |
| 452 | dotraplinkage void __kprobes do_int3(struct pt_regs *regs, long error_code) | 453 | dotraplinkage void __kprobes do_int3(struct pt_regs *regs, long error_code) |
| 453 | { | 454 | { |
| 455 | #ifdef CONFIG_KGDB_LOW_LEVEL_TRAP | ||
| 456 | if (kgdb_ll_trap(DIE_INT3, "int3", regs, error_code, 3, SIGTRAP) | ||
| 457 | == NOTIFY_STOP) | ||
| 458 | return; | ||
| 459 | #endif /* CONFIG_KGDB_LOW_LEVEL_TRAP */ | ||
| 454 | #ifdef CONFIG_KPROBES | 460 | #ifdef CONFIG_KPROBES |
| 455 | if (notify_die(DIE_INT3, "int3", regs, error_code, 3, SIGTRAP) | 461 | if (notify_die(DIE_INT3, "int3", regs, error_code, 3, SIGTRAP) |
| 456 | == NOTIFY_STOP) | 462 | == NOTIFY_STOP) |
diff --git a/drivers/serial/8250.c b/drivers/serial/8250.c index 2b1ea3d4c4f4..891e1dd65f24 100644 --- a/drivers/serial/8250.c +++ b/drivers/serial/8250.c | |||
| @@ -1891,8 +1891,8 @@ static int serial8250_get_poll_char(struct uart_port *port) | |||
| 1891 | struct uart_8250_port *up = (struct uart_8250_port *)port; | 1891 | struct uart_8250_port *up = (struct uart_8250_port *)port; |
| 1892 | unsigned char lsr = serial_inp(up, UART_LSR); | 1892 | unsigned char lsr = serial_inp(up, UART_LSR); |
| 1893 | 1893 | ||
| 1894 | while (!(lsr & UART_LSR_DR)) | 1894 | if (!(lsr & UART_LSR_DR)) |
| 1895 | lsr = serial_inp(up, UART_LSR); | 1895 | return NO_POLL_CHAR; |
| 1896 | 1896 | ||
| 1897 | return serial_inp(up, UART_RX); | 1897 | return serial_inp(up, UART_RX); |
| 1898 | } | 1898 | } |
diff --git a/drivers/serial/amba-pl011.c b/drivers/serial/amba-pl011.c index 743ebf5f16da..eb4cb480b93e 100644 --- a/drivers/serial/amba-pl011.c +++ b/drivers/serial/amba-pl011.c | |||
| @@ -342,9 +342,9 @@ static int pl010_get_poll_char(struct uart_port *port) | |||
| 342 | struct uart_amba_port *uap = (struct uart_amba_port *)port; | 342 | struct uart_amba_port *uap = (struct uart_amba_port *)port; |
| 343 | unsigned int status; | 343 | unsigned int status; |
| 344 | 344 | ||
| 345 | do { | 345 | status = readw(uap->port.membase + UART01x_FR); |
| 346 | status = readw(uap->port.membase + UART01x_FR); | 346 | if (status & UART01x_FR_RXFE) |
| 347 | } while (status & UART01x_FR_RXFE); | 347 | return NO_POLL_CHAR; |
| 348 | 348 | ||
| 349 | return readw(uap->port.membase + UART01x_DR); | 349 | return readw(uap->port.membase + UART01x_DR); |
| 350 | } | 350 | } |
diff --git a/drivers/serial/kgdboc.c b/drivers/serial/kgdboc.c index eadc1ab6bbce..b765ab48dfe7 100644 --- a/drivers/serial/kgdboc.c +++ b/drivers/serial/kgdboc.c | |||
| @@ -14,7 +14,9 @@ | |||
| 14 | #include <linux/kernel.h> | 14 | #include <linux/kernel.h> |
| 15 | #include <linux/ctype.h> | 15 | #include <linux/ctype.h> |
| 16 | #include <linux/kgdb.h> | 16 | #include <linux/kgdb.h> |
| 17 | #include <linux/kdb.h> | ||
| 17 | #include <linux/tty.h> | 18 | #include <linux/tty.h> |
| 19 | #include <linux/console.h> | ||
| 18 | 20 | ||
| 19 | #define MAX_CONFIG_LEN 40 | 21 | #define MAX_CONFIG_LEN 40 |
| 20 | 22 | ||
| @@ -32,6 +34,40 @@ static struct kparam_string kps = { | |||
| 32 | static struct tty_driver *kgdb_tty_driver; | 34 | static struct tty_driver *kgdb_tty_driver; |
| 33 | static int kgdb_tty_line; | 35 | static int kgdb_tty_line; |
| 34 | 36 | ||
| 37 | #ifdef CONFIG_KDB_KEYBOARD | ||
| 38 | static int kgdboc_register_kbd(char **cptr) | ||
| 39 | { | ||
| 40 | if (strncmp(*cptr, "kbd", 3) == 0) { | ||
| 41 | if (kdb_poll_idx < KDB_POLL_FUNC_MAX) { | ||
| 42 | kdb_poll_funcs[kdb_poll_idx] = kdb_get_kbd_char; | ||
| 43 | kdb_poll_idx++; | ||
| 44 | if (cptr[0][3] == ',') | ||
| 45 | *cptr += 4; | ||
| 46 | else | ||
| 47 | return 1; | ||
| 48 | } | ||
| 49 | } | ||
| 50 | return 0; | ||
| 51 | } | ||
| 52 | |||
| 53 | static void kgdboc_unregister_kbd(void) | ||
| 54 | { | ||
| 55 | int i; | ||
| 56 | |||
| 57 | for (i = 0; i < kdb_poll_idx; i++) { | ||
| 58 | if (kdb_poll_funcs[i] == kdb_get_kbd_char) { | ||
| 59 | kdb_poll_idx--; | ||
| 60 | kdb_poll_funcs[i] = kdb_poll_funcs[kdb_poll_idx]; | ||
| 61 | kdb_poll_funcs[kdb_poll_idx] = NULL; | ||
| 62 | i--; | ||
| 63 | } | ||
| 64 | } | ||
| 65 | } | ||
| 66 | #else /* ! CONFIG_KDB_KEYBOARD */ | ||
| 67 | #define kgdboc_register_kbd(x) 0 | ||
| 68 | #define kgdboc_unregister_kbd() | ||
| 69 | #endif /* ! CONFIG_KDB_KEYBOARD */ | ||
| 70 | |||
| 35 | static int kgdboc_option_setup(char *opt) | 71 | static int kgdboc_option_setup(char *opt) |
| 36 | { | 72 | { |
| 37 | if (strlen(opt) > MAX_CONFIG_LEN) { | 73 | if (strlen(opt) > MAX_CONFIG_LEN) { |
| @@ -45,25 +81,51 @@ static int kgdboc_option_setup(char *opt) | |||
| 45 | 81 | ||
| 46 | __setup("kgdboc=", kgdboc_option_setup); | 82 | __setup("kgdboc=", kgdboc_option_setup); |
| 47 | 83 | ||
| 84 | static void cleanup_kgdboc(void) | ||
| 85 | { | ||
| 86 | kgdboc_unregister_kbd(); | ||
| 87 | if (configured == 1) | ||
| 88 | kgdb_unregister_io_module(&kgdboc_io_ops); | ||
| 89 | } | ||
| 90 | |||
| 48 | static int configure_kgdboc(void) | 91 | static int configure_kgdboc(void) |
| 49 | { | 92 | { |
| 50 | struct tty_driver *p; | 93 | struct tty_driver *p; |
| 51 | int tty_line = 0; | 94 | int tty_line = 0; |
| 52 | int err; | 95 | int err; |
| 96 | char *cptr = config; | ||
| 97 | struct console *cons; | ||
| 53 | 98 | ||
| 54 | err = kgdboc_option_setup(config); | 99 | err = kgdboc_option_setup(config); |
| 55 | if (err || !strlen(config) || isspace(config[0])) | 100 | if (err || !strlen(config) || isspace(config[0])) |
| 56 | goto noconfig; | 101 | goto noconfig; |
| 57 | 102 | ||
| 58 | err = -ENODEV; | 103 | err = -ENODEV; |
| 104 | kgdboc_io_ops.is_console = 0; | ||
| 105 | kgdb_tty_driver = NULL; | ||
| 59 | 106 | ||
| 60 | p = tty_find_polling_driver(config, &tty_line); | 107 | if (kgdboc_register_kbd(&cptr)) |
| 108 | goto do_register; | ||
| 109 | |||
| 110 | p = tty_find_polling_driver(cptr, &tty_line); | ||
| 61 | if (!p) | 111 | if (!p) |
| 62 | goto noconfig; | 112 | goto noconfig; |
| 63 | 113 | ||
| 114 | cons = console_drivers; | ||
| 115 | while (cons) { | ||
| 116 | int idx; | ||
| 117 | if (cons->device && cons->device(cons, &idx) == p && | ||
| 118 | idx == tty_line) { | ||
| 119 | kgdboc_io_ops.is_console = 1; | ||
| 120 | break; | ||
| 121 | } | ||
| 122 | cons = cons->next; | ||
| 123 | } | ||
| 124 | |||
| 64 | kgdb_tty_driver = p; | 125 | kgdb_tty_driver = p; |
| 65 | kgdb_tty_line = tty_line; | 126 | kgdb_tty_line = tty_line; |
| 66 | 127 | ||
| 128 | do_register: | ||
| 67 | err = kgdb_register_io_module(&kgdboc_io_ops); | 129 | err = kgdb_register_io_module(&kgdboc_io_ops); |
| 68 | if (err) | 130 | if (err) |
| 69 | goto noconfig; | 131 | goto noconfig; |
| @@ -75,6 +137,7 @@ static int configure_kgdboc(void) | |||
| 75 | noconfig: | 137 | noconfig: |
| 76 | config[0] = 0; | 138 | config[0] = 0; |
| 77 | configured = 0; | 139 | configured = 0; |
| 140 | cleanup_kgdboc(); | ||
| 78 | 141 | ||
| 79 | return err; | 142 | return err; |
| 80 | } | 143 | } |
| @@ -88,20 +151,18 @@ static int __init init_kgdboc(void) | |||
| 88 | return configure_kgdboc(); | 151 | return configure_kgdboc(); |
| 89 | } | 152 | } |
| 90 | 153 | ||
| 91 | static void cleanup_kgdboc(void) | ||
| 92 | { | ||
| 93 | if (configured == 1) | ||
| 94 | kgdb_unregister_io_module(&kgdboc_io_ops); | ||
| 95 | } | ||
| 96 | |||
| 97 | static int kgdboc_get_char(void) | 154 | static int kgdboc_get_char(void) |
| 98 | { | 155 | { |
| 156 | if (!kgdb_tty_driver) | ||
| 157 | return -1; | ||
| 99 | return kgdb_tty_driver->ops->poll_get_char(kgdb_tty_driver, | 158 | return kgdb_tty_driver->ops->poll_get_char(kgdb_tty_driver, |
| 100 | kgdb_tty_line); | 159 | kgdb_tty_line); |
| 101 | } | 160 | } |
| 102 | 161 | ||
| 103 | static void kgdboc_put_char(u8 chr) | 162 | static void kgdboc_put_char(u8 chr) |
| 104 | { | 163 | { |
| 164 | if (!kgdb_tty_driver) | ||
| 165 | return; | ||
| 105 | kgdb_tty_driver->ops->poll_put_char(kgdb_tty_driver, | 166 | kgdb_tty_driver->ops->poll_put_char(kgdb_tty_driver, |
| 106 | kgdb_tty_line, chr); | 167 | kgdb_tty_line, chr); |
| 107 | } | 168 | } |
diff --git a/drivers/serial/sh-sci.c b/drivers/serial/sh-sci.c index 8d993c4cceac..f250a610a268 100644 --- a/drivers/serial/sh-sci.c +++ b/drivers/serial/sh-sci.c | |||
| @@ -151,7 +151,11 @@ static int sci_poll_get_char(struct uart_port *port) | |||
| 151 | handle_error(port); | 151 | handle_error(port); |
| 152 | continue; | 152 | continue; |
| 153 | } | 153 | } |
| 154 | } while (!(status & SCxSR_RDxF(port))); | 154 | break; |
| 155 | } while (1); | ||
| 156 | |||
| 157 | if (!(status & SCxSR_RDxF(port))) | ||
| 158 | return NO_POLL_CHAR; | ||
| 155 | 159 | ||
| 156 | c = sci_in(port, SCxRDR); | 160 | c = sci_in(port, SCxRDR); |
| 157 | 161 | ||
diff --git a/drivers/serial/sunzilog.c b/drivers/serial/sunzilog.c index 2c7a66af4f52..978b3cee02d7 100644 --- a/drivers/serial/sunzilog.c +++ b/drivers/serial/sunzilog.c | |||
| @@ -102,6 +102,8 @@ struct uart_sunzilog_port { | |||
| 102 | #endif | 102 | #endif |
| 103 | }; | 103 | }; |
| 104 | 104 | ||
| 105 | static void sunzilog_putchar(struct uart_port *port, int ch); | ||
| 106 | |||
| 105 | #define ZILOG_CHANNEL_FROM_PORT(PORT) ((struct zilog_channel __iomem *)((PORT)->membase)) | 107 | #define ZILOG_CHANNEL_FROM_PORT(PORT) ((struct zilog_channel __iomem *)((PORT)->membase)) |
| 106 | #define UART_ZILOG(PORT) ((struct uart_sunzilog_port *)(PORT)) | 108 | #define UART_ZILOG(PORT) ((struct uart_sunzilog_port *)(PORT)) |
| 107 | 109 | ||
| @@ -996,6 +998,50 @@ static int sunzilog_verify_port(struct uart_port *port, struct serial_struct *se | |||
| 996 | return -EINVAL; | 998 | return -EINVAL; |
| 997 | } | 999 | } |
| 998 | 1000 | ||
| 1001 | #ifdef CONFIG_CONSOLE_POLL | ||
| 1002 | static int sunzilog_get_poll_char(struct uart_port *port) | ||
| 1003 | { | ||
| 1004 | unsigned char ch, r1; | ||
| 1005 | struct uart_sunzilog_port *up = (struct uart_sunzilog_port *) port; | ||
| 1006 | struct zilog_channel __iomem *channel | ||
| 1007 | = ZILOG_CHANNEL_FROM_PORT(&up->port); | ||
| 1008 | |||
| 1009 | |||
| 1010 | r1 = read_zsreg(channel, R1); | ||
| 1011 | if (r1 & (PAR_ERR | Rx_OVR | CRC_ERR)) { | ||
| 1012 | writeb(ERR_RES, &channel->control); | ||
| 1013 | ZSDELAY(); | ||
| 1014 | ZS_WSYNC(channel); | ||
| 1015 | } | ||
| 1016 | |||
| 1017 | ch = readb(&channel->control); | ||
| 1018 | ZSDELAY(); | ||
| 1019 | |||
| 1020 | /* This funny hack depends upon BRK_ABRT not interfering | ||
| 1021 | * with the other bits we care about in R1. | ||
| 1022 | */ | ||
| 1023 | if (ch & BRK_ABRT) | ||
| 1024 | r1 |= BRK_ABRT; | ||
| 1025 | |||
| 1026 | if (!(ch & Rx_CH_AV)) | ||
| 1027 | return NO_POLL_CHAR; | ||
| 1028 | |||
| 1029 | ch = readb(&channel->data); | ||
| 1030 | ZSDELAY(); | ||
| 1031 | |||
| 1032 | ch &= up->parity_mask; | ||
| 1033 | return ch; | ||
| 1034 | } | ||
| 1035 | |||
| 1036 | static void sunzilog_put_poll_char(struct uart_port *port, | ||
| 1037 | unsigned char ch) | ||
| 1038 | { | ||
| 1039 | struct uart_sunzilog_port *up = (struct uart_sunzilog_port *)port; | ||
| 1040 | |||
| 1041 | sunzilog_putchar(&up->port, ch); | ||
| 1042 | } | ||
| 1043 | #endif /* CONFIG_CONSOLE_POLL */ | ||
| 1044 | |||
| 999 | static struct uart_ops sunzilog_pops = { | 1045 | static struct uart_ops sunzilog_pops = { |
| 1000 | .tx_empty = sunzilog_tx_empty, | 1046 | .tx_empty = sunzilog_tx_empty, |
| 1001 | .set_mctrl = sunzilog_set_mctrl, | 1047 | .set_mctrl = sunzilog_set_mctrl, |
| @@ -1013,6 +1059,10 @@ static struct uart_ops sunzilog_pops = { | |||
| 1013 | .request_port = sunzilog_request_port, | 1059 | .request_port = sunzilog_request_port, |
| 1014 | .config_port = sunzilog_config_port, | 1060 | .config_port = sunzilog_config_port, |
| 1015 | .verify_port = sunzilog_verify_port, | 1061 | .verify_port = sunzilog_verify_port, |
| 1062 | #ifdef CONFIG_CONSOLE_POLL | ||
| 1063 | .poll_get_char = sunzilog_get_poll_char, | ||
| 1064 | .poll_put_char = sunzilog_put_poll_char, | ||
| 1065 | #endif | ||
| 1016 | }; | 1066 | }; |
| 1017 | 1067 | ||
| 1018 | static int uart_chip_count; | 1068 | static int uart_chip_count; |
diff --git a/include/asm-generic/kmap_types.h b/include/asm-generic/kmap_types.h index e5f234a08540..97e807c8c812 100644 --- a/include/asm-generic/kmap_types.h +++ b/include/asm-generic/kmap_types.h | |||
| @@ -28,7 +28,8 @@ KMAP_D(15) KM_UML_USERCOPY, | |||
| 28 | KMAP_D(16) KM_IRQ_PTE, | 28 | KMAP_D(16) KM_IRQ_PTE, |
| 29 | KMAP_D(17) KM_NMI, | 29 | KMAP_D(17) KM_NMI, |
| 30 | KMAP_D(18) KM_NMI_PTE, | 30 | KMAP_D(18) KM_NMI_PTE, |
| 31 | KMAP_D(19) KM_TYPE_NR | 31 | KMAP_D(19) KM_KDB, |
| 32 | KMAP_D(20) KM_TYPE_NR | ||
| 32 | }; | 33 | }; |
| 33 | 34 | ||
| 34 | #undef KMAP_D | 35 | #undef KMAP_D |
diff --git a/include/linux/kdb.h b/include/linux/kdb.h new file mode 100644 index 000000000000..ccb2b3ec0fe8 --- /dev/null +++ b/include/linux/kdb.h | |||
| @@ -0,0 +1,117 @@ | |||
| 1 | #ifndef _KDB_H | ||
| 2 | #define _KDB_H | ||
| 3 | |||
| 4 | /* | ||
| 5 | * Kernel Debugger Architecture Independent Global Headers | ||
| 6 | * | ||
| 7 | * This file is subject to the terms and conditions of the GNU General Public | ||
| 8 | * License. See the file "COPYING" in the main directory of this archive | ||
| 9 | * for more details. | ||
| 10 | * | ||
| 11 | * Copyright (c) 2000-2007 Silicon Graphics, Inc. All Rights Reserved. | ||
| 12 | * Copyright (C) 2000 Stephane Eranian <eranian@hpl.hp.com> | ||
| 13 | * Copyright (C) 2009 Jason Wessel <jason.wessel@windriver.com> | ||
| 14 | */ | ||
| 15 | |||
| 16 | #ifdef CONFIG_KGDB_KDB | ||
| 17 | #include <linux/init.h> | ||
| 18 | #include <linux/sched.h> | ||
| 19 | #include <asm/atomic.h> | ||
| 20 | |||
| 21 | #define KDB_POLL_FUNC_MAX 5 | ||
| 22 | extern int kdb_poll_idx; | ||
| 23 | |||
| 24 | /* | ||
| 25 | * kdb_initial_cpu is initialized to -1, and is set to the cpu | ||
| 26 | * number whenever the kernel debugger is entered. | ||
| 27 | */ | ||
| 28 | extern int kdb_initial_cpu; | ||
| 29 | extern atomic_t kdb_event; | ||
| 30 | |||
| 31 | /* | ||
| 32 | * kdb_diemsg | ||
| 33 | * | ||
| 34 | * Contains a pointer to the last string supplied to the | ||
| 35 | * kernel 'die' panic function. | ||
| 36 | */ | ||
| 37 | extern const char *kdb_diemsg; | ||
| 38 | |||
| 39 | #define KDB_FLAG_EARLYKDB (1 << 0) /* set from boot parameter kdb=early */ | ||
| 40 | #define KDB_FLAG_CATASTROPHIC (1 << 1) /* A catastrophic event has occurred */ | ||
| 41 | #define KDB_FLAG_CMD_INTERRUPT (1 << 2) /* Previous command was interrupted */ | ||
| 42 | #define KDB_FLAG_NOIPI (1 << 3) /* Do not send IPIs */ | ||
| 43 | #define KDB_FLAG_ONLY_DO_DUMP (1 << 4) /* Only do a dump, used when | ||
| 44 | * kdb is off */ | ||
| 45 | #define KDB_FLAG_NO_CONSOLE (1 << 5) /* No console is available, | ||
| 46 | * kdb is disabled */ | ||
| 47 | #define KDB_FLAG_NO_VT_CONSOLE (1 << 6) /* No VT console is available, do | ||
| 48 | * not use keyboard */ | ||
| 49 | #define KDB_FLAG_NO_I8042 (1 << 7) /* No i8042 chip is available, do | ||
| 50 | * not use keyboard */ | ||
| 51 | |||
| 52 | extern int kdb_flags; /* Global flags, see kdb_state for per cpu state */ | ||
| 53 | |||
| 54 | extern void kdb_save_flags(void); | ||
| 55 | extern void kdb_restore_flags(void); | ||
| 56 | |||
| 57 | #define KDB_FLAG(flag) (kdb_flags & KDB_FLAG_##flag) | ||
| 58 | #define KDB_FLAG_SET(flag) ((void)(kdb_flags |= KDB_FLAG_##flag)) | ||
| 59 | #define KDB_FLAG_CLEAR(flag) ((void)(kdb_flags &= ~KDB_FLAG_##flag)) | ||
| 60 | |||
| 61 | /* | ||
| 62 | * External entry point for the kernel debugger. The pt_regs | ||
| 63 | * at the time of entry are supplied along with the reason for | ||
| 64 | * entry to the kernel debugger. | ||
| 65 | */ | ||
| 66 | |||
| 67 | typedef enum { | ||
| 68 | KDB_REASON_ENTER = 1, /* KDB_ENTER() trap/fault - regs valid */ | ||
| 69 | KDB_REASON_ENTER_SLAVE, /* KDB_ENTER_SLAVE() trap/fault - regs valid */ | ||
| 70 | KDB_REASON_BREAK, /* Breakpoint inst. - regs valid */ | ||
| 71 | KDB_REASON_DEBUG, /* Debug Fault - regs valid */ | ||
| 72 | KDB_REASON_OOPS, /* Kernel Oops - regs valid */ | ||
| 73 | KDB_REASON_SWITCH, /* CPU switch - regs valid*/ | ||
| 74 | KDB_REASON_KEYBOARD, /* Keyboard entry - regs valid */ | ||
| 75 | KDB_REASON_NMI, /* Non-maskable interrupt; regs valid */ | ||
| 76 | KDB_REASON_RECURSE, /* Recursive entry to kdb; | ||
| 77 | * regs probably valid */ | ||
| 78 | KDB_REASON_SSTEP, /* Single Step trap. - regs valid */ | ||
| 79 | } kdb_reason_t; | ||
| 80 | |||
| 81 | extern int kdb_trap_printk; | ||
| 82 | extern int vkdb_printf(const char *fmt, va_list args) | ||
| 83 | __attribute__ ((format (printf, 1, 0))); | ||
| 84 | extern int kdb_printf(const char *, ...) | ||
| 85 | __attribute__ ((format (printf, 1, 2))); | ||
| 86 | typedef int (*kdb_printf_t)(const char *, ...) | ||
| 87 | __attribute__ ((format (printf, 1, 2))); | ||
| 88 | |||
| 89 | extern void kdb_init(int level); | ||
| 90 | |||
| 91 | /* Access to kdb specific polling devices */ | ||
| 92 | typedef int (*get_char_func)(void); | ||
| 93 | extern get_char_func kdb_poll_funcs[]; | ||
| 94 | extern int kdb_get_kbd_char(void); | ||
| 95 | |||
| 96 | static inline | ||
| 97 | int kdb_process_cpu(const struct task_struct *p) | ||
| 98 | { | ||
| 99 | unsigned int cpu = task_thread_info(p)->cpu; | ||
| 100 | if (cpu > num_possible_cpus()) | ||
| 101 | cpu = 0; | ||
| 102 | return cpu; | ||
| 103 | } | ||
| 104 | |||
| 105 | /* kdb access to register set for stack dumping */ | ||
| 106 | extern struct pt_regs *kdb_current_regs; | ||
| 107 | |||
| 108 | #else /* ! CONFIG_KGDB_KDB */ | ||
| 109 | #define kdb_printf(...) | ||
| 110 | #define kdb_init(x) | ||
| 111 | #endif /* CONFIG_KGDB_KDB */ | ||
| 112 | enum { | ||
| 113 | KDB_NOT_INITIALIZED, | ||
| 114 | KDB_INIT_EARLY, | ||
| 115 | KDB_INIT_FULL, | ||
| 116 | }; | ||
| 117 | #endif /* !_KDB_H */ | ||
diff --git a/include/linux/kgdb.h b/include/linux/kgdb.h index 19ec41a183f5..6c784ab6856a 100644 --- a/include/linux/kgdb.h +++ b/include/linux/kgdb.h | |||
| @@ -16,10 +16,12 @@ | |||
| 16 | #include <linux/serial_8250.h> | 16 | #include <linux/serial_8250.h> |
| 17 | #include <linux/linkage.h> | 17 | #include <linux/linkage.h> |
| 18 | #include <linux/init.h> | 18 | #include <linux/init.h> |
| 19 | |||
| 20 | #include <asm/atomic.h> | 19 | #include <asm/atomic.h> |
| 20 | #ifdef CONFIG_HAVE_ARCH_KGDB | ||
| 21 | #include <asm/kgdb.h> | 21 | #include <asm/kgdb.h> |
| 22 | #endif | ||
| 22 | 23 | ||
| 24 | #ifdef CONFIG_KGDB | ||
| 23 | struct pt_regs; | 25 | struct pt_regs; |
| 24 | 26 | ||
| 25 | /** | 27 | /** |
| @@ -34,20 +36,6 @@ struct pt_regs; | |||
| 34 | extern int kgdb_skipexception(int exception, struct pt_regs *regs); | 36 | extern int kgdb_skipexception(int exception, struct pt_regs *regs); |
| 35 | 37 | ||
| 36 | /** | 38 | /** |
| 37 | * kgdb_post_primary_code - (optional) Save error vector/code numbers. | ||
| 38 | * @regs: Original pt_regs. | ||
| 39 | * @e_vector: Original error vector. | ||
| 40 | * @err_code: Original error code. | ||
| 41 | * | ||
| 42 | * This is usually needed on architectures which support SMP and | ||
| 43 | * KGDB. This function is called after all the secondary cpus have | ||
| 44 | * been put to a know spin state and the primary CPU has control over | ||
| 45 | * KGDB. | ||
| 46 | */ | ||
| 47 | extern void kgdb_post_primary_code(struct pt_regs *regs, int e_vector, | ||
| 48 | int err_code); | ||
| 49 | |||
| 50 | /** | ||
| 51 | * kgdb_disable_hw_debug - (optional) Disable hardware debugging hook | 39 | * kgdb_disable_hw_debug - (optional) Disable hardware debugging hook |
| 52 | * @regs: Current &struct pt_regs. | 40 | * @regs: Current &struct pt_regs. |
| 53 | * | 41 | * |
| @@ -72,6 +60,7 @@ struct uart_port; | |||
| 72 | void kgdb_breakpoint(void); | 60 | void kgdb_breakpoint(void); |
| 73 | 61 | ||
| 74 | extern int kgdb_connected; | 62 | extern int kgdb_connected; |
| 63 | extern int kgdb_io_module_registered; | ||
| 75 | 64 | ||
| 76 | extern atomic_t kgdb_setting_breakpoint; | 65 | extern atomic_t kgdb_setting_breakpoint; |
| 77 | extern atomic_t kgdb_cpu_doing_single_step; | 66 | extern atomic_t kgdb_cpu_doing_single_step; |
| @@ -202,6 +191,17 @@ kgdb_arch_handle_exception(int vector, int signo, int err_code, | |||
| 202 | */ | 191 | */ |
| 203 | extern void kgdb_roundup_cpus(unsigned long flags); | 192 | extern void kgdb_roundup_cpus(unsigned long flags); |
| 204 | 193 | ||
| 194 | /** | ||
| 195 | * kgdb_arch_set_pc - Generic call back to the program counter | ||
| 196 | * @regs: Current &struct pt_regs. | ||
| 197 | * @pc: The new value for the program counter | ||
| 198 | * | ||
| 199 | * This function handles updating the program counter and requires an | ||
| 200 | * architecture specific implementation. | ||
| 201 | */ | ||
| 202 | extern void kgdb_arch_set_pc(struct pt_regs *regs, unsigned long pc); | ||
| 203 | |||
| 204 | |||
| 205 | /* Optional functions. */ | 205 | /* Optional functions. */ |
| 206 | extern int kgdb_validate_break_address(unsigned long addr); | 206 | extern int kgdb_validate_break_address(unsigned long addr); |
| 207 | extern int kgdb_arch_set_breakpoint(unsigned long addr, char *saved_instr); | 207 | extern int kgdb_arch_set_breakpoint(unsigned long addr, char *saved_instr); |
| @@ -247,6 +247,8 @@ struct kgdb_arch { | |||
| 247 | * the I/O driver. | 247 | * the I/O driver. |
| 248 | * @post_exception: Pointer to a function that will do any cleanup work | 248 | * @post_exception: Pointer to a function that will do any cleanup work |
| 249 | * for the I/O driver. | 249 | * for the I/O driver. |
| 250 | * @is_console: 1 if the end device is a console 0 if the I/O device is | ||
| 251 | * not a console | ||
| 250 | */ | 252 | */ |
| 251 | struct kgdb_io { | 253 | struct kgdb_io { |
| 252 | const char *name; | 254 | const char *name; |
| @@ -256,6 +258,7 @@ struct kgdb_io { | |||
| 256 | int (*init) (void); | 258 | int (*init) (void); |
| 257 | void (*pre_exception) (void); | 259 | void (*pre_exception) (void); |
| 258 | void (*post_exception) (void); | 260 | void (*post_exception) (void); |
| 261 | int is_console; | ||
| 259 | }; | 262 | }; |
| 260 | 263 | ||
| 261 | extern struct kgdb_arch arch_kgdb_ops; | 264 | extern struct kgdb_arch arch_kgdb_ops; |
| @@ -264,12 +267,14 @@ extern unsigned long __weak kgdb_arch_pc(int exception, struct pt_regs *regs); | |||
| 264 | 267 | ||
| 265 | extern int kgdb_register_io_module(struct kgdb_io *local_kgdb_io_ops); | 268 | extern int kgdb_register_io_module(struct kgdb_io *local_kgdb_io_ops); |
| 266 | extern void kgdb_unregister_io_module(struct kgdb_io *local_kgdb_io_ops); | 269 | extern void kgdb_unregister_io_module(struct kgdb_io *local_kgdb_io_ops); |
| 270 | extern struct kgdb_io *dbg_io_ops; | ||
| 267 | 271 | ||
| 268 | extern int kgdb_hex2long(char **ptr, unsigned long *long_val); | 272 | extern int kgdb_hex2long(char **ptr, unsigned long *long_val); |
| 269 | extern int kgdb_mem2hex(char *mem, char *buf, int count); | 273 | extern int kgdb_mem2hex(char *mem, char *buf, int count); |
| 270 | extern int kgdb_hex2mem(char *buf, char *mem, int count); | 274 | extern int kgdb_hex2mem(char *buf, char *mem, int count); |
| 271 | 275 | ||
| 272 | extern int kgdb_isremovedbreak(unsigned long addr); | 276 | extern int kgdb_isremovedbreak(unsigned long addr); |
| 277 | extern void kgdb_schedule_breakpoint(void); | ||
| 273 | 278 | ||
| 274 | extern int | 279 | extern int |
| 275 | kgdb_handle_exception(int ex_vector, int signo, int err_code, | 280 | kgdb_handle_exception(int ex_vector, int signo, int err_code, |
| @@ -278,5 +283,9 @@ extern int kgdb_nmicallback(int cpu, void *regs); | |||
| 278 | 283 | ||
| 279 | extern int kgdb_single_step; | 284 | extern int kgdb_single_step; |
| 280 | extern atomic_t kgdb_active; | 285 | extern atomic_t kgdb_active; |
| 281 | 286 | #define in_dbg_master() \ | |
| 287 | (raw_smp_processor_id() == atomic_read(&kgdb_active)) | ||
| 288 | #else /* ! CONFIG_KGDB */ | ||
| 289 | #define in_dbg_master() (0) | ||
| 290 | #endif /* ! CONFIG_KGDB */ | ||
| 282 | #endif /* _KGDB_H_ */ | 291 | #endif /* _KGDB_H_ */ |
diff --git a/include/linux/serial_core.h b/include/linux/serial_core.h index 09d0d2d5a08b..f10db6e5f3b5 100644 --- a/include/linux/serial_core.h +++ b/include/linux/serial_core.h | |||
| @@ -250,6 +250,7 @@ struct uart_ops { | |||
| 250 | #endif | 250 | #endif |
| 251 | }; | 251 | }; |
| 252 | 252 | ||
| 253 | #define NO_POLL_CHAR 0x00ff0000 | ||
| 253 | #define UART_CONFIG_TYPE (1 << 0) | 254 | #define UART_CONFIG_TYPE (1 << 0) |
| 254 | #define UART_CONFIG_IRQ (1 << 1) | 255 | #define UART_CONFIG_IRQ (1 << 1) |
| 255 | 256 | ||
diff --git a/init/main.c b/init/main.c index 5c8540271529..372771333d98 100644 --- a/init/main.c +++ b/init/main.c | |||
| @@ -62,6 +62,7 @@ | |||
| 62 | #include <linux/sched.h> | 62 | #include <linux/sched.h> |
| 63 | #include <linux/signal.h> | 63 | #include <linux/signal.h> |
| 64 | #include <linux/idr.h> | 64 | #include <linux/idr.h> |
| 65 | #include <linux/kdb.h> | ||
| 65 | #include <linux/ftrace.h> | 66 | #include <linux/ftrace.h> |
| 66 | #include <linux/async.h> | 67 | #include <linux/async.h> |
| 67 | #include <linux/kmemcheck.h> | 68 | #include <linux/kmemcheck.h> |
| @@ -675,6 +676,7 @@ asmlinkage void __init start_kernel(void) | |||
| 675 | buffer_init(); | 676 | buffer_init(); |
| 676 | key_init(); | 677 | key_init(); |
| 677 | security_init(); | 678 | security_init(); |
| 679 | kdb_init(KDB_INIT_FULL); | ||
| 678 | vfs_caches_init(totalram_pages); | 680 | vfs_caches_init(totalram_pages); |
| 679 | signals_init(); | 681 | signals_init(); |
| 680 | /* rootfs populating might need page-writeback */ | 682 | /* rootfs populating might need page-writeback */ |
diff --git a/kernel/Makefile b/kernel/Makefile index 149e18ef1ab1..057472fbc272 100644 --- a/kernel/Makefile +++ b/kernel/Makefile | |||
| @@ -75,7 +75,7 @@ obj-$(CONFIG_AUDITSYSCALL) += auditsc.o | |||
| 75 | obj-$(CONFIG_GCOV_KERNEL) += gcov/ | 75 | obj-$(CONFIG_GCOV_KERNEL) += gcov/ |
| 76 | obj-$(CONFIG_AUDIT_TREE) += audit_tree.o | 76 | obj-$(CONFIG_AUDIT_TREE) += audit_tree.o |
| 77 | obj-$(CONFIG_KPROBES) += kprobes.o | 77 | obj-$(CONFIG_KPROBES) += kprobes.o |
| 78 | obj-$(CONFIG_KGDB) += kgdb.o | 78 | obj-$(CONFIG_KGDB) += debug/ |
| 79 | obj-$(CONFIG_DETECT_SOFTLOCKUP) += softlockup.o | 79 | obj-$(CONFIG_DETECT_SOFTLOCKUP) += softlockup.o |
| 80 | obj-$(CONFIG_DETECT_HUNG_TASK) += hung_task.o | 80 | obj-$(CONFIG_DETECT_HUNG_TASK) += hung_task.o |
| 81 | obj-$(CONFIG_GENERIC_HARDIRQS) += irq/ | 81 | obj-$(CONFIG_GENERIC_HARDIRQS) += irq/ |
diff --git a/kernel/debug/Makefile b/kernel/debug/Makefile new file mode 100644 index 000000000000..a85edc339985 --- /dev/null +++ b/kernel/debug/Makefile | |||
| @@ -0,0 +1,6 @@ | |||
| 1 | # | ||
| 2 | # Makefile for the linux kernel debugger | ||
| 3 | # | ||
| 4 | |||
| 5 | obj-$(CONFIG_KGDB) += debug_core.o gdbstub.o | ||
| 6 | obj-$(CONFIG_KGDB_KDB) += kdb/ | ||
diff --git a/kernel/debug/debug_core.c b/kernel/debug/debug_core.c new file mode 100644 index 000000000000..64b5588c9638 --- /dev/null +++ b/kernel/debug/debug_core.c | |||
| @@ -0,0 +1,967 @@ | |||
| 1 | /* | ||
| 2 | * Kernel Debug Core | ||
| 3 | * | ||
| 4 | * Maintainer: Jason Wessel <jason.wessel@windriver.com> | ||
| 5 | * | ||
| 6 | * Copyright (C) 2000-2001 VERITAS Software Corporation. | ||
| 7 | * Copyright (C) 2002-2004 Timesys Corporation | ||
| 8 | * Copyright (C) 2003-2004 Amit S. Kale <amitkale@linsyssoft.com> | ||
| 9 | * Copyright (C) 2004 Pavel Machek <pavel@suse.cz> | ||
| 10 | * Copyright (C) 2004-2006 Tom Rini <trini@kernel.crashing.org> | ||
| 11 | * Copyright (C) 2004-2006 LinSysSoft Technologies Pvt. Ltd. | ||
| 12 | * Copyright (C) 2005-2009 Wind River Systems, Inc. | ||
| 13 | * Copyright (C) 2007 MontaVista Software, Inc. | ||
| 14 | * Copyright (C) 2008 Red Hat, Inc., Ingo Molnar <mingo@redhat.com> | ||
| 15 | * | ||
| 16 | * Contributors at various stages not listed above: | ||
| 17 | * Jason Wessel ( jason.wessel@windriver.com ) | ||
| 18 | * George Anzinger <george@mvista.com> | ||
| 19 | * Anurekh Saxena (anurekh.saxena@timesys.com) | ||
| 20 | * Lake Stevens Instrument Division (Glenn Engel) | ||
| 21 | * Jim Kingdon, Cygnus Support. | ||
| 22 | * | ||
| 23 | * Original KGDB stub: David Grothe <dave@gcom.com>, | ||
| 24 | * Tigran Aivazian <tigran@sco.com> | ||
| 25 | * | ||
| 26 | * This file is licensed under the terms of the GNU General Public License | ||
| 27 | * version 2. This program is licensed "as is" without any warranty of any | ||
| 28 | * kind, whether express or implied. | ||
| 29 | */ | ||
| 30 | #include <linux/pid_namespace.h> | ||
| 31 | #include <linux/clocksource.h> | ||
| 32 | #include <linux/interrupt.h> | ||
| 33 | #include <linux/spinlock.h> | ||
| 34 | #include <linux/console.h> | ||
| 35 | #include <linux/threads.h> | ||
| 36 | #include <linux/uaccess.h> | ||
| 37 | #include <linux/kernel.h> | ||
| 38 | #include <linux/module.h> | ||
| 39 | #include <linux/ptrace.h> | ||
| 40 | #include <linux/string.h> | ||
| 41 | #include <linux/delay.h> | ||
| 42 | #include <linux/sched.h> | ||
| 43 | #include <linux/sysrq.h> | ||
| 44 | #include <linux/init.h> | ||
| 45 | #include <linux/kgdb.h> | ||
| 46 | #include <linux/kdb.h> | ||
| 47 | #include <linux/pid.h> | ||
| 48 | #include <linux/smp.h> | ||
| 49 | #include <linux/mm.h> | ||
| 50 | |||
| 51 | #include <asm/cacheflush.h> | ||
| 52 | #include <asm/byteorder.h> | ||
| 53 | #include <asm/atomic.h> | ||
| 54 | #include <asm/system.h> | ||
| 55 | |||
| 56 | #include "debug_core.h" | ||
| 57 | |||
| 58 | static int kgdb_break_asap; | ||
| 59 | |||
| 60 | struct debuggerinfo_struct kgdb_info[NR_CPUS]; | ||
| 61 | |||
| 62 | /** | ||
| 63 | * kgdb_connected - Is a host GDB connected to us? | ||
| 64 | */ | ||
| 65 | int kgdb_connected; | ||
| 66 | EXPORT_SYMBOL_GPL(kgdb_connected); | ||
| 67 | |||
| 68 | /* All the KGDB handlers are installed */ | ||
| 69 | int kgdb_io_module_registered; | ||
| 70 | |||
| 71 | /* Guard for recursive entry */ | ||
| 72 | static int exception_level; | ||
| 73 | |||
| 74 | struct kgdb_io *dbg_io_ops; | ||
| 75 | static DEFINE_SPINLOCK(kgdb_registration_lock); | ||
| 76 | |||
| 77 | /* kgdb console driver is loaded */ | ||
| 78 | static int kgdb_con_registered; | ||
| 79 | /* determine if kgdb console output should be used */ | ||
| 80 | static int kgdb_use_con; | ||
| 81 | /* Next cpu to become the master debug core */ | ||
| 82 | int dbg_switch_cpu; | ||
| 83 | |||
| 84 | /* Use kdb or gdbserver mode */ | ||
| 85 | int dbg_kdb_mode = 1; | ||
| 86 | |||
| 87 | static int __init opt_kgdb_con(char *str) | ||
| 88 | { | ||
| 89 | kgdb_use_con = 1; | ||
| 90 | return 0; | ||
| 91 | } | ||
| 92 | |||
| 93 | early_param("kgdbcon", opt_kgdb_con); | ||
| 94 | |||
| 95 | module_param(kgdb_use_con, int, 0644); | ||
| 96 | |||
| 97 | /* | ||
| 98 | * Holds information about breakpoints in a kernel. These breakpoints are | ||
| 99 | * added and removed by gdb. | ||
| 100 | */ | ||
| 101 | static struct kgdb_bkpt kgdb_break[KGDB_MAX_BREAKPOINTS] = { | ||
| 102 | [0 ... KGDB_MAX_BREAKPOINTS-1] = { .state = BP_UNDEFINED } | ||
| 103 | }; | ||
| 104 | |||
| 105 | /* | ||
| 106 | * The CPU# of the active CPU, or -1 if none: | ||
| 107 | */ | ||
| 108 | atomic_t kgdb_active = ATOMIC_INIT(-1); | ||
| 109 | EXPORT_SYMBOL_GPL(kgdb_active); | ||
| 110 | |||
| 111 | /* | ||
| 112 | * We use NR_CPUs not PERCPU, in case kgdb is used to debug early | ||
| 113 | * bootup code (which might not have percpu set up yet): | ||
| 114 | */ | ||
| 115 | static atomic_t passive_cpu_wait[NR_CPUS]; | ||
| 116 | static atomic_t cpu_in_kgdb[NR_CPUS]; | ||
| 117 | static atomic_t kgdb_break_tasklet_var; | ||
| 118 | atomic_t kgdb_setting_breakpoint; | ||
| 119 | |||
| 120 | struct task_struct *kgdb_usethread; | ||
| 121 | struct task_struct *kgdb_contthread; | ||
| 122 | |||
| 123 | int kgdb_single_step; | ||
| 124 | static pid_t kgdb_sstep_pid; | ||
| 125 | |||
| 126 | /* to keep track of the CPU which is doing the single stepping*/ | ||
| 127 | atomic_t kgdb_cpu_doing_single_step = ATOMIC_INIT(-1); | ||
| 128 | |||
| 129 | /* | ||
| 130 | * If you are debugging a problem where roundup (the collection of | ||
| 131 | * all other CPUs) is a problem [this should be extremely rare], | ||
| 132 | * then use the nokgdbroundup option to avoid roundup. In that case | ||
| 133 | * the other CPUs might interfere with your debugging context, so | ||
| 134 | * use this with care: | ||
| 135 | */ | ||
| 136 | static int kgdb_do_roundup = 1; | ||
| 137 | |||
| 138 | static int __init opt_nokgdbroundup(char *str) | ||
| 139 | { | ||
| 140 | kgdb_do_roundup = 0; | ||
| 141 | |||
| 142 | return 0; | ||
| 143 | } | ||
| 144 | |||
| 145 | early_param("nokgdbroundup", opt_nokgdbroundup); | ||
| 146 | |||
| 147 | /* | ||
| 148 | * Finally, some KGDB code :-) | ||
| 149 | */ | ||
| 150 | |||
| 151 | /* | ||
| 152 | * Weak aliases for breakpoint management, | ||
| 153 | * can be overriden by architectures when needed: | ||
| 154 | */ | ||
| 155 | int __weak kgdb_arch_set_breakpoint(unsigned long addr, char *saved_instr) | ||
| 156 | { | ||
| 157 | int err; | ||
| 158 | |||
| 159 | err = probe_kernel_read(saved_instr, (char *)addr, BREAK_INSTR_SIZE); | ||
| 160 | if (err) | ||
| 161 | return err; | ||
| 162 | |||
| 163 | return probe_kernel_write((char *)addr, arch_kgdb_ops.gdb_bpt_instr, | ||
| 164 | BREAK_INSTR_SIZE); | ||
| 165 | } | ||
| 166 | |||
| 167 | int __weak kgdb_arch_remove_breakpoint(unsigned long addr, char *bundle) | ||
| 168 | { | ||
| 169 | return probe_kernel_write((char *)addr, | ||
| 170 | (char *)bundle, BREAK_INSTR_SIZE); | ||
| 171 | } | ||
| 172 | |||
| 173 | int __weak kgdb_validate_break_address(unsigned long addr) | ||
| 174 | { | ||
| 175 | char tmp_variable[BREAK_INSTR_SIZE]; | ||
| 176 | int err; | ||
| 177 | /* Validate setting the breakpoint and then removing it. In the | ||
| 178 | * remove fails, the kernel needs to emit a bad message because we | ||
| 179 | * are deep trouble not being able to put things back the way we | ||
| 180 | * found them. | ||
| 181 | */ | ||
| 182 | err = kgdb_arch_set_breakpoint(addr, tmp_variable); | ||
| 183 | if (err) | ||
| 184 | return err; | ||
| 185 | err = kgdb_arch_remove_breakpoint(addr, tmp_variable); | ||
| 186 | if (err) | ||
| 187 | printk(KERN_ERR "KGDB: Critical breakpoint error, kernel " | ||
| 188 | "memory destroyed at: %lx", addr); | ||
| 189 | return err; | ||
| 190 | } | ||
| 191 | |||
| 192 | unsigned long __weak kgdb_arch_pc(int exception, struct pt_regs *regs) | ||
| 193 | { | ||
| 194 | return instruction_pointer(regs); | ||
| 195 | } | ||
| 196 | |||
| 197 | int __weak kgdb_arch_init(void) | ||
| 198 | { | ||
| 199 | return 0; | ||
| 200 | } | ||
| 201 | |||
| 202 | int __weak kgdb_skipexception(int exception, struct pt_regs *regs) | ||
| 203 | { | ||
| 204 | return 0; | ||
| 205 | } | ||
| 206 | |||
| 207 | /** | ||
| 208 | * kgdb_disable_hw_debug - Disable hardware debugging while we in kgdb. | ||
| 209 | * @regs: Current &struct pt_regs. | ||
| 210 | * | ||
| 211 | * This function will be called if the particular architecture must | ||
| 212 | * disable hardware debugging while it is processing gdb packets or | ||
| 213 | * handling exception. | ||
| 214 | */ | ||
| 215 | void __weak kgdb_disable_hw_debug(struct pt_regs *regs) | ||
| 216 | { | ||
| 217 | } | ||
| 218 | |||
| 219 | /* | ||
| 220 | * Some architectures need cache flushes when we set/clear a | ||
| 221 | * breakpoint: | ||
| 222 | */ | ||
| 223 | static void kgdb_flush_swbreak_addr(unsigned long addr) | ||
| 224 | { | ||
| 225 | if (!CACHE_FLUSH_IS_SAFE) | ||
| 226 | return; | ||
| 227 | |||
| 228 | if (current->mm && current->mm->mmap_cache) { | ||
| 229 | flush_cache_range(current->mm->mmap_cache, | ||
| 230 | addr, addr + BREAK_INSTR_SIZE); | ||
| 231 | } | ||
| 232 | /* Force flush instruction cache if it was outside the mm */ | ||
| 233 | flush_icache_range(addr, addr + BREAK_INSTR_SIZE); | ||
| 234 | } | ||
| 235 | |||
| 236 | /* | ||
| 237 | * SW breakpoint management: | ||
| 238 | */ | ||
| 239 | int dbg_activate_sw_breakpoints(void) | ||
| 240 | { | ||
| 241 | unsigned long addr; | ||
| 242 | int error; | ||
| 243 | int ret = 0; | ||
| 244 | int i; | ||
| 245 | |||
| 246 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 247 | if (kgdb_break[i].state != BP_SET) | ||
| 248 | continue; | ||
| 249 | |||
| 250 | addr = kgdb_break[i].bpt_addr; | ||
| 251 | error = kgdb_arch_set_breakpoint(addr, | ||
| 252 | kgdb_break[i].saved_instr); | ||
| 253 | if (error) { | ||
| 254 | ret = error; | ||
| 255 | printk(KERN_INFO "KGDB: BP install failed: %lx", addr); | ||
| 256 | continue; | ||
| 257 | } | ||
| 258 | |||
| 259 | kgdb_flush_swbreak_addr(addr); | ||
| 260 | kgdb_break[i].state = BP_ACTIVE; | ||
| 261 | } | ||
| 262 | return ret; | ||
| 263 | } | ||
| 264 | |||
| 265 | int dbg_set_sw_break(unsigned long addr) | ||
| 266 | { | ||
| 267 | int err = kgdb_validate_break_address(addr); | ||
| 268 | int breakno = -1; | ||
| 269 | int i; | ||
| 270 | |||
| 271 | if (err) | ||
| 272 | return err; | ||
| 273 | |||
| 274 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 275 | if ((kgdb_break[i].state == BP_SET) && | ||
| 276 | (kgdb_break[i].bpt_addr == addr)) | ||
| 277 | return -EEXIST; | ||
| 278 | } | ||
| 279 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 280 | if (kgdb_break[i].state == BP_REMOVED && | ||
| 281 | kgdb_break[i].bpt_addr == addr) { | ||
| 282 | breakno = i; | ||
| 283 | break; | ||
| 284 | } | ||
| 285 | } | ||
| 286 | |||
| 287 | if (breakno == -1) { | ||
| 288 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 289 | if (kgdb_break[i].state == BP_UNDEFINED) { | ||
| 290 | breakno = i; | ||
| 291 | break; | ||
| 292 | } | ||
| 293 | } | ||
| 294 | } | ||
| 295 | |||
| 296 | if (breakno == -1) | ||
| 297 | return -E2BIG; | ||
| 298 | |||
| 299 | kgdb_break[breakno].state = BP_SET; | ||
| 300 | kgdb_break[breakno].type = BP_BREAKPOINT; | ||
| 301 | kgdb_break[breakno].bpt_addr = addr; | ||
| 302 | |||
| 303 | return 0; | ||
| 304 | } | ||
| 305 | |||
| 306 | int dbg_deactivate_sw_breakpoints(void) | ||
| 307 | { | ||
| 308 | unsigned long addr; | ||
| 309 | int error; | ||
| 310 | int ret = 0; | ||
| 311 | int i; | ||
| 312 | |||
| 313 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 314 | if (kgdb_break[i].state != BP_ACTIVE) | ||
| 315 | continue; | ||
| 316 | addr = kgdb_break[i].bpt_addr; | ||
| 317 | error = kgdb_arch_remove_breakpoint(addr, | ||
| 318 | kgdb_break[i].saved_instr); | ||
| 319 | if (error) { | ||
| 320 | printk(KERN_INFO "KGDB: BP remove failed: %lx\n", addr); | ||
| 321 | ret = error; | ||
| 322 | } | ||
| 323 | |||
| 324 | kgdb_flush_swbreak_addr(addr); | ||
| 325 | kgdb_break[i].state = BP_SET; | ||
| 326 | } | ||
| 327 | return ret; | ||
| 328 | } | ||
| 329 | |||
| 330 | int dbg_remove_sw_break(unsigned long addr) | ||
| 331 | { | ||
| 332 | int i; | ||
| 333 | |||
| 334 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 335 | if ((kgdb_break[i].state == BP_SET) && | ||
| 336 | (kgdb_break[i].bpt_addr == addr)) { | ||
| 337 | kgdb_break[i].state = BP_REMOVED; | ||
| 338 | return 0; | ||
| 339 | } | ||
| 340 | } | ||
| 341 | return -ENOENT; | ||
| 342 | } | ||
| 343 | |||
| 344 | int kgdb_isremovedbreak(unsigned long addr) | ||
| 345 | { | ||
| 346 | int i; | ||
| 347 | |||
| 348 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 349 | if ((kgdb_break[i].state == BP_REMOVED) && | ||
| 350 | (kgdb_break[i].bpt_addr == addr)) | ||
| 351 | return 1; | ||
| 352 | } | ||
| 353 | return 0; | ||
| 354 | } | ||
| 355 | |||
| 356 | int dbg_remove_all_break(void) | ||
| 357 | { | ||
| 358 | unsigned long addr; | ||
| 359 | int error; | ||
| 360 | int i; | ||
| 361 | |||
| 362 | /* Clear memory breakpoints. */ | ||
| 363 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 364 | if (kgdb_break[i].state != BP_ACTIVE) | ||
| 365 | goto setundefined; | ||
| 366 | addr = kgdb_break[i].bpt_addr; | ||
| 367 | error = kgdb_arch_remove_breakpoint(addr, | ||
| 368 | kgdb_break[i].saved_instr); | ||
| 369 | if (error) | ||
| 370 | printk(KERN_ERR "KGDB: breakpoint remove failed: %lx\n", | ||
| 371 | addr); | ||
| 372 | setundefined: | ||
| 373 | kgdb_break[i].state = BP_UNDEFINED; | ||
| 374 | } | ||
| 375 | |||
| 376 | /* Clear hardware breakpoints. */ | ||
| 377 | if (arch_kgdb_ops.remove_all_hw_break) | ||
| 378 | arch_kgdb_ops.remove_all_hw_break(); | ||
| 379 | |||
| 380 | return 0; | ||
| 381 | } | ||
| 382 | |||
| 383 | /* | ||
| 384 | * Return true if there is a valid kgdb I/O module. Also if no | ||
| 385 | * debugger is attached a message can be printed to the console about | ||
| 386 | * waiting for the debugger to attach. | ||
| 387 | * | ||
| 388 | * The print_wait argument is only to be true when called from inside | ||
| 389 | * the core kgdb_handle_exception, because it will wait for the | ||
| 390 | * debugger to attach. | ||
| 391 | */ | ||
| 392 | static int kgdb_io_ready(int print_wait) | ||
| 393 | { | ||
| 394 | if (!dbg_io_ops) | ||
| 395 | return 0; | ||
| 396 | if (kgdb_connected) | ||
| 397 | return 1; | ||
| 398 | if (atomic_read(&kgdb_setting_breakpoint)) | ||
| 399 | return 1; | ||
| 400 | if (print_wait) { | ||
| 401 | #ifdef CONFIG_KGDB_KDB | ||
| 402 | if (!dbg_kdb_mode) | ||
| 403 | printk(KERN_CRIT "KGDB: waiting... or $3#33 for KDB\n"); | ||
| 404 | #else | ||
| 405 | printk(KERN_CRIT "KGDB: Waiting for remote debugger\n"); | ||
| 406 | #endif | ||
| 407 | } | ||
| 408 | return 1; | ||
| 409 | } | ||
| 410 | |||
| 411 | static int kgdb_reenter_check(struct kgdb_state *ks) | ||
| 412 | { | ||
| 413 | unsigned long addr; | ||
| 414 | |||
| 415 | if (atomic_read(&kgdb_active) != raw_smp_processor_id()) | ||
| 416 | return 0; | ||
| 417 | |||
| 418 | /* Panic on recursive debugger calls: */ | ||
| 419 | exception_level++; | ||
| 420 | addr = kgdb_arch_pc(ks->ex_vector, ks->linux_regs); | ||
| 421 | dbg_deactivate_sw_breakpoints(); | ||
| 422 | |||
| 423 | /* | ||
| 424 | * If the break point removed ok at the place exception | ||
| 425 | * occurred, try to recover and print a warning to the end | ||
| 426 | * user because the user planted a breakpoint in a place that | ||
| 427 | * KGDB needs in order to function. | ||
| 428 | */ | ||
| 429 | if (dbg_remove_sw_break(addr) == 0) { | ||
| 430 | exception_level = 0; | ||
| 431 | kgdb_skipexception(ks->ex_vector, ks->linux_regs); | ||
| 432 | dbg_activate_sw_breakpoints(); | ||
| 433 | printk(KERN_CRIT "KGDB: re-enter error: breakpoint removed %lx\n", | ||
| 434 | addr); | ||
| 435 | WARN_ON_ONCE(1); | ||
| 436 | |||
| 437 | return 1; | ||
| 438 | } | ||
| 439 | dbg_remove_all_break(); | ||
| 440 | kgdb_skipexception(ks->ex_vector, ks->linux_regs); | ||
| 441 | |||
| 442 | if (exception_level > 1) { | ||
| 443 | dump_stack(); | ||
| 444 | panic("Recursive entry to debugger"); | ||
| 445 | } | ||
| 446 | |||
| 447 | printk(KERN_CRIT "KGDB: re-enter exception: ALL breakpoints killed\n"); | ||
| 448 | #ifdef CONFIG_KGDB_KDB | ||
| 449 | /* Allow kdb to debug itself one level */ | ||
| 450 | return 0; | ||
| 451 | #endif | ||
| 452 | dump_stack(); | ||
| 453 | panic("Recursive entry to debugger"); | ||
| 454 | |||
| 455 | return 1; | ||
| 456 | } | ||
| 457 | |||
| 458 | static void dbg_cpu_switch(int cpu, int next_cpu) | ||
| 459 | { | ||
| 460 | /* Mark the cpu we are switching away from as a slave when it | ||
| 461 | * holds the kgdb_active token. This must be done so that the | ||
| 462 | * that all the cpus wait in for the debug core will not enter | ||
| 463 | * again as the master. */ | ||
| 464 | if (cpu == atomic_read(&kgdb_active)) { | ||
| 465 | kgdb_info[cpu].exception_state |= DCPU_IS_SLAVE; | ||
| 466 | kgdb_info[cpu].exception_state &= ~DCPU_WANT_MASTER; | ||
| 467 | } | ||
| 468 | kgdb_info[next_cpu].exception_state |= DCPU_NEXT_MASTER; | ||
| 469 | } | ||
| 470 | |||
| 471 | static int kgdb_cpu_enter(struct kgdb_state *ks, struct pt_regs *regs) | ||
| 472 | { | ||
| 473 | unsigned long flags; | ||
| 474 | int sstep_tries = 100; | ||
| 475 | int error; | ||
| 476 | int i, cpu; | ||
| 477 | int trace_on = 0; | ||
| 478 | acquirelock: | ||
| 479 | /* | ||
| 480 | * Interrupts will be restored by the 'trap return' code, except when | ||
| 481 | * single stepping. | ||
| 482 | */ | ||
| 483 | local_irq_save(flags); | ||
| 484 | |||
| 485 | cpu = ks->cpu; | ||
| 486 | kgdb_info[cpu].debuggerinfo = regs; | ||
| 487 | kgdb_info[cpu].task = current; | ||
| 488 | kgdb_info[cpu].ret_state = 0; | ||
| 489 | kgdb_info[cpu].irq_depth = hardirq_count() >> HARDIRQ_SHIFT; | ||
| 490 | /* | ||
| 491 | * Make sure the above info reaches the primary CPU before | ||
| 492 | * our cpu_in_kgdb[] flag setting does: | ||
| 493 | */ | ||
| 494 | atomic_inc(&cpu_in_kgdb[cpu]); | ||
| 495 | |||
| 496 | if (exception_level == 1) | ||
| 497 | goto cpu_master_loop; | ||
| 498 | |||
| 499 | /* | ||
| 500 | * CPU will loop if it is a slave or request to become a kgdb | ||
| 501 | * master cpu and acquire the kgdb_active lock: | ||
| 502 | */ | ||
| 503 | while (1) { | ||
| 504 | cpu_loop: | ||
| 505 | if (kgdb_info[cpu].exception_state & DCPU_NEXT_MASTER) { | ||
| 506 | kgdb_info[cpu].exception_state &= ~DCPU_NEXT_MASTER; | ||
| 507 | goto cpu_master_loop; | ||
| 508 | } else if (kgdb_info[cpu].exception_state & DCPU_WANT_MASTER) { | ||
| 509 | if (atomic_cmpxchg(&kgdb_active, -1, cpu) == cpu) | ||
| 510 | break; | ||
| 511 | } else if (kgdb_info[cpu].exception_state & DCPU_IS_SLAVE) { | ||
| 512 | if (!atomic_read(&passive_cpu_wait[cpu])) | ||
| 513 | goto return_normal; | ||
| 514 | } else { | ||
| 515 | return_normal: | ||
| 516 | /* Return to normal operation by executing any | ||
| 517 | * hw breakpoint fixup. | ||
| 518 | */ | ||
| 519 | if (arch_kgdb_ops.correct_hw_break) | ||
| 520 | arch_kgdb_ops.correct_hw_break(); | ||
| 521 | if (trace_on) | ||
| 522 | tracing_on(); | ||
| 523 | atomic_dec(&cpu_in_kgdb[cpu]); | ||
| 524 | touch_softlockup_watchdog_sync(); | ||
| 525 | clocksource_touch_watchdog(); | ||
| 526 | local_irq_restore(flags); | ||
| 527 | return 0; | ||
| 528 | } | ||
| 529 | cpu_relax(); | ||
| 530 | } | ||
| 531 | |||
| 532 | /* | ||
| 533 | * For single stepping, try to only enter on the processor | ||
| 534 | * that was single stepping. To gaurd against a deadlock, the | ||
| 535 | * kernel will only try for the value of sstep_tries before | ||
| 536 | * giving up and continuing on. | ||
| 537 | */ | ||
| 538 | if (atomic_read(&kgdb_cpu_doing_single_step) != -1 && | ||
| 539 | (kgdb_info[cpu].task && | ||
| 540 | kgdb_info[cpu].task->pid != kgdb_sstep_pid) && --sstep_tries) { | ||
| 541 | atomic_set(&kgdb_active, -1); | ||
| 542 | touch_softlockup_watchdog_sync(); | ||
| 543 | clocksource_touch_watchdog(); | ||
| 544 | local_irq_restore(flags); | ||
| 545 | |||
| 546 | goto acquirelock; | ||
| 547 | } | ||
| 548 | |||
| 549 | if (!kgdb_io_ready(1)) { | ||
| 550 | kgdb_info[cpu].ret_state = 1; | ||
| 551 | goto kgdb_restore; /* No I/O connection, resume the system */ | ||
| 552 | } | ||
| 553 | |||
| 554 | /* | ||
| 555 | * Don't enter if we have hit a removed breakpoint. | ||
| 556 | */ | ||
| 557 | if (kgdb_skipexception(ks->ex_vector, ks->linux_regs)) | ||
| 558 | goto kgdb_restore; | ||
| 559 | |||
| 560 | /* Call the I/O driver's pre_exception routine */ | ||
| 561 | if (dbg_io_ops->pre_exception) | ||
| 562 | dbg_io_ops->pre_exception(); | ||
| 563 | |||
| 564 | kgdb_disable_hw_debug(ks->linux_regs); | ||
| 565 | |||
| 566 | /* | ||
| 567 | * Get the passive CPU lock which will hold all the non-primary | ||
| 568 | * CPU in a spin state while the debugger is active | ||
| 569 | */ | ||
| 570 | if (!kgdb_single_step) { | ||
| 571 | for (i = 0; i < NR_CPUS; i++) | ||
| 572 | atomic_inc(&passive_cpu_wait[i]); | ||
| 573 | } | ||
| 574 | |||
| 575 | #ifdef CONFIG_SMP | ||
| 576 | /* Signal the other CPUs to enter kgdb_wait() */ | ||
| 577 | if ((!kgdb_single_step) && kgdb_do_roundup) | ||
| 578 | kgdb_roundup_cpus(flags); | ||
| 579 | #endif | ||
| 580 | |||
| 581 | /* | ||
| 582 | * Wait for the other CPUs to be notified and be waiting for us: | ||
| 583 | */ | ||
| 584 | for_each_online_cpu(i) { | ||
| 585 | while (kgdb_do_roundup && !atomic_read(&cpu_in_kgdb[i])) | ||
| 586 | cpu_relax(); | ||
| 587 | } | ||
| 588 | |||
| 589 | /* | ||
| 590 | * At this point the primary processor is completely | ||
| 591 | * in the debugger and all secondary CPUs are quiescent | ||
| 592 | */ | ||
| 593 | dbg_deactivate_sw_breakpoints(); | ||
| 594 | kgdb_single_step = 0; | ||
| 595 | kgdb_contthread = current; | ||
| 596 | exception_level = 0; | ||
| 597 | trace_on = tracing_is_on(); | ||
| 598 | if (trace_on) | ||
| 599 | tracing_off(); | ||
| 600 | |||
| 601 | while (1) { | ||
| 602 | cpu_master_loop: | ||
| 603 | if (dbg_kdb_mode) { | ||
| 604 | kgdb_connected = 1; | ||
| 605 | error = kdb_stub(ks); | ||
| 606 | } else { | ||
| 607 | error = gdb_serial_stub(ks); | ||
| 608 | } | ||
| 609 | |||
| 610 | if (error == DBG_PASS_EVENT) { | ||
| 611 | dbg_kdb_mode = !dbg_kdb_mode; | ||
| 612 | kgdb_connected = 0; | ||
| 613 | } else if (error == DBG_SWITCH_CPU_EVENT) { | ||
| 614 | dbg_cpu_switch(cpu, dbg_switch_cpu); | ||
| 615 | goto cpu_loop; | ||
| 616 | } else { | ||
| 617 | kgdb_info[cpu].ret_state = error; | ||
| 618 | break; | ||
| 619 | } | ||
| 620 | } | ||
| 621 | |||
| 622 | /* Call the I/O driver's post_exception routine */ | ||
| 623 | if (dbg_io_ops->post_exception) | ||
| 624 | dbg_io_ops->post_exception(); | ||
| 625 | |||
| 626 | atomic_dec(&cpu_in_kgdb[ks->cpu]); | ||
| 627 | |||
| 628 | if (!kgdb_single_step) { | ||
| 629 | for (i = NR_CPUS-1; i >= 0; i--) | ||
| 630 | atomic_dec(&passive_cpu_wait[i]); | ||
| 631 | /* | ||
| 632 | * Wait till all the CPUs have quit from the debugger, | ||
| 633 | * but allow a CPU that hit an exception and is | ||
| 634 | * waiting to become the master to remain in the debug | ||
| 635 | * core. | ||
| 636 | */ | ||
| 637 | for_each_online_cpu(i) { | ||
| 638 | while (kgdb_do_roundup && | ||
| 639 | atomic_read(&cpu_in_kgdb[i]) && | ||
| 640 | !(kgdb_info[i].exception_state & | ||
| 641 | DCPU_WANT_MASTER)) | ||
| 642 | cpu_relax(); | ||
| 643 | } | ||
| 644 | } | ||
| 645 | |||
| 646 | kgdb_restore: | ||
| 647 | if (atomic_read(&kgdb_cpu_doing_single_step) != -1) { | ||
| 648 | int sstep_cpu = atomic_read(&kgdb_cpu_doing_single_step); | ||
| 649 | if (kgdb_info[sstep_cpu].task) | ||
| 650 | kgdb_sstep_pid = kgdb_info[sstep_cpu].task->pid; | ||
| 651 | else | ||
| 652 | kgdb_sstep_pid = 0; | ||
| 653 | } | ||
| 654 | if (trace_on) | ||
| 655 | tracing_on(); | ||
| 656 | /* Free kgdb_active */ | ||
| 657 | atomic_set(&kgdb_active, -1); | ||
| 658 | touch_softlockup_watchdog_sync(); | ||
| 659 | clocksource_touch_watchdog(); | ||
| 660 | local_irq_restore(flags); | ||
| 661 | |||
| 662 | return kgdb_info[cpu].ret_state; | ||
| 663 | } | ||
| 664 | |||
| 665 | /* | ||
| 666 | * kgdb_handle_exception() - main entry point from a kernel exception | ||
| 667 | * | ||
| 668 | * Locking hierarchy: | ||
| 669 | * interface locks, if any (begin_session) | ||
| 670 | * kgdb lock (kgdb_active) | ||
| 671 | */ | ||
| 672 | int | ||
| 673 | kgdb_handle_exception(int evector, int signo, int ecode, struct pt_regs *regs) | ||
| 674 | { | ||
| 675 | struct kgdb_state kgdb_var; | ||
| 676 | struct kgdb_state *ks = &kgdb_var; | ||
| 677 | int ret; | ||
| 678 | |||
| 679 | ks->cpu = raw_smp_processor_id(); | ||
| 680 | ks->ex_vector = evector; | ||
| 681 | ks->signo = signo; | ||
| 682 | ks->err_code = ecode; | ||
| 683 | ks->kgdb_usethreadid = 0; | ||
| 684 | ks->linux_regs = regs; | ||
| 685 | |||
| 686 | if (kgdb_reenter_check(ks)) | ||
| 687 | return 0; /* Ouch, double exception ! */ | ||
| 688 | kgdb_info[ks->cpu].exception_state |= DCPU_WANT_MASTER; | ||
| 689 | ret = kgdb_cpu_enter(ks, regs); | ||
| 690 | kgdb_info[ks->cpu].exception_state &= ~(DCPU_WANT_MASTER | | ||
| 691 | DCPU_IS_SLAVE); | ||
| 692 | return ret; | ||
| 693 | } | ||
| 694 | |||
| 695 | int kgdb_nmicallback(int cpu, void *regs) | ||
| 696 | { | ||
| 697 | #ifdef CONFIG_SMP | ||
| 698 | struct kgdb_state kgdb_var; | ||
| 699 | struct kgdb_state *ks = &kgdb_var; | ||
| 700 | |||
| 701 | memset(ks, 0, sizeof(struct kgdb_state)); | ||
| 702 | ks->cpu = cpu; | ||
| 703 | ks->linux_regs = regs; | ||
| 704 | |||
| 705 | if (!atomic_read(&cpu_in_kgdb[cpu]) && | ||
| 706 | atomic_read(&kgdb_active) != -1 && | ||
| 707 | atomic_read(&kgdb_active) != cpu) { | ||
| 708 | kgdb_info[cpu].exception_state |= DCPU_IS_SLAVE; | ||
| 709 | kgdb_cpu_enter(ks, regs); | ||
| 710 | kgdb_info[cpu].exception_state &= ~DCPU_IS_SLAVE; | ||
| 711 | return 0; | ||
| 712 | } | ||
| 713 | #endif | ||
| 714 | return 1; | ||
| 715 | } | ||
| 716 | |||
| 717 | static void kgdb_console_write(struct console *co, const char *s, | ||
| 718 | unsigned count) | ||
| 719 | { | ||
| 720 | unsigned long flags; | ||
| 721 | |||
| 722 | /* If we're debugging, or KGDB has not connected, don't try | ||
| 723 | * and print. */ | ||
| 724 | if (!kgdb_connected || atomic_read(&kgdb_active) != -1 || dbg_kdb_mode) | ||
| 725 | return; | ||
| 726 | |||
| 727 | local_irq_save(flags); | ||
| 728 | gdbstub_msg_write(s, count); | ||
| 729 | local_irq_restore(flags); | ||
| 730 | } | ||
| 731 | |||
| 732 | static struct console kgdbcons = { | ||
| 733 | .name = "kgdb", | ||
| 734 | .write = kgdb_console_write, | ||
| 735 | .flags = CON_PRINTBUFFER | CON_ENABLED, | ||
| 736 | .index = -1, | ||
| 737 | }; | ||
| 738 | |||
| 739 | #ifdef CONFIG_MAGIC_SYSRQ | ||
| 740 | static void sysrq_handle_dbg(int key, struct tty_struct *tty) | ||
| 741 | { | ||
| 742 | if (!dbg_io_ops) { | ||
| 743 | printk(KERN_CRIT "ERROR: No KGDB I/O module available\n"); | ||
| 744 | return; | ||
| 745 | } | ||
| 746 | if (!kgdb_connected) { | ||
| 747 | #ifdef CONFIG_KGDB_KDB | ||
| 748 | if (!dbg_kdb_mode) | ||
| 749 | printk(KERN_CRIT "KGDB or $3#33 for KDB\n"); | ||
| 750 | #else | ||
| 751 | printk(KERN_CRIT "Entering KGDB\n"); | ||
| 752 | #endif | ||
| 753 | } | ||
| 754 | |||
| 755 | kgdb_breakpoint(); | ||
| 756 | } | ||
| 757 | |||
| 758 | static struct sysrq_key_op sysrq_dbg_op = { | ||
| 759 | .handler = sysrq_handle_dbg, | ||
| 760 | .help_msg = "debug(G)", | ||
| 761 | .action_msg = "DEBUG", | ||
| 762 | }; | ||
| 763 | #endif | ||
| 764 | |||
| 765 | static int kgdb_panic_event(struct notifier_block *self, | ||
| 766 | unsigned long val, | ||
| 767 | void *data) | ||
| 768 | { | ||
| 769 | if (dbg_kdb_mode) | ||
| 770 | kdb_printf("PANIC: %s\n", (char *)data); | ||
| 771 | kgdb_breakpoint(); | ||
| 772 | return NOTIFY_DONE; | ||
| 773 | } | ||
| 774 | |||
| 775 | static struct notifier_block kgdb_panic_event_nb = { | ||
| 776 | .notifier_call = kgdb_panic_event, | ||
| 777 | .priority = INT_MAX, | ||
| 778 | }; | ||
| 779 | |||
| 780 | static void kgdb_register_callbacks(void) | ||
| 781 | { | ||
| 782 | if (!kgdb_io_module_registered) { | ||
| 783 | kgdb_io_module_registered = 1; | ||
| 784 | kgdb_arch_init(); | ||
| 785 | atomic_notifier_chain_register(&panic_notifier_list, | ||
| 786 | &kgdb_panic_event_nb); | ||
| 787 | #ifdef CONFIG_MAGIC_SYSRQ | ||
| 788 | register_sysrq_key('g', &sysrq_dbg_op); | ||
| 789 | #endif | ||
| 790 | if (kgdb_use_con && !kgdb_con_registered) { | ||
| 791 | register_console(&kgdbcons); | ||
| 792 | kgdb_con_registered = 1; | ||
| 793 | } | ||
| 794 | } | ||
| 795 | } | ||
| 796 | |||
| 797 | static void kgdb_unregister_callbacks(void) | ||
| 798 | { | ||
| 799 | /* | ||
| 800 | * When this routine is called KGDB should unregister from the | ||
| 801 | * panic handler and clean up, making sure it is not handling any | ||
| 802 | * break exceptions at the time. | ||
| 803 | */ | ||
| 804 | if (kgdb_io_module_registered) { | ||
| 805 | kgdb_io_module_registered = 0; | ||
| 806 | atomic_notifier_chain_unregister(&panic_notifier_list, | ||
| 807 | &kgdb_panic_event_nb); | ||
| 808 | kgdb_arch_exit(); | ||
| 809 | #ifdef CONFIG_MAGIC_SYSRQ | ||
| 810 | unregister_sysrq_key('g', &sysrq_dbg_op); | ||
| 811 | #endif | ||
| 812 | if (kgdb_con_registered) { | ||
| 813 | unregister_console(&kgdbcons); | ||
| 814 | kgdb_con_registered = 0; | ||
| 815 | } | ||
| 816 | } | ||
| 817 | } | ||
| 818 | |||
| 819 | /* | ||
| 820 | * There are times a tasklet needs to be used vs a compiled in | ||
| 821 | * break point so as to cause an exception outside a kgdb I/O module, | ||
| 822 | * such as is the case with kgdboe, where calling a breakpoint in the | ||
| 823 | * I/O driver itself would be fatal. | ||
| 824 | */ | ||
| 825 | static void kgdb_tasklet_bpt(unsigned long ing) | ||
| 826 | { | ||
| 827 | kgdb_breakpoint(); | ||
| 828 | atomic_set(&kgdb_break_tasklet_var, 0); | ||
| 829 | } | ||
| 830 | |||
| 831 | static DECLARE_TASKLET(kgdb_tasklet_breakpoint, kgdb_tasklet_bpt, 0); | ||
| 832 | |||
| 833 | void kgdb_schedule_breakpoint(void) | ||
| 834 | { | ||
| 835 | if (atomic_read(&kgdb_break_tasklet_var) || | ||
| 836 | atomic_read(&kgdb_active) != -1 || | ||
| 837 | atomic_read(&kgdb_setting_breakpoint)) | ||
| 838 | return; | ||
| 839 | atomic_inc(&kgdb_break_tasklet_var); | ||
| 840 | tasklet_schedule(&kgdb_tasklet_breakpoint); | ||
| 841 | } | ||
| 842 | EXPORT_SYMBOL_GPL(kgdb_schedule_breakpoint); | ||
| 843 | |||
| 844 | static void kgdb_initial_breakpoint(void) | ||
| 845 | { | ||
| 846 | kgdb_break_asap = 0; | ||
| 847 | |||
| 848 | printk(KERN_CRIT "kgdb: Waiting for connection from remote gdb...\n"); | ||
| 849 | kgdb_breakpoint(); | ||
| 850 | } | ||
| 851 | |||
| 852 | /** | ||
| 853 | * kgdb_register_io_module - register KGDB IO module | ||
| 854 | * @new_dbg_io_ops: the io ops vector | ||
| 855 | * | ||
| 856 | * Register it with the KGDB core. | ||
| 857 | */ | ||
| 858 | int kgdb_register_io_module(struct kgdb_io *new_dbg_io_ops) | ||
| 859 | { | ||
| 860 | int err; | ||
| 861 | |||
| 862 | spin_lock(&kgdb_registration_lock); | ||
| 863 | |||
| 864 | if (dbg_io_ops) { | ||
| 865 | spin_unlock(&kgdb_registration_lock); | ||
| 866 | |||
| 867 | printk(KERN_ERR "kgdb: Another I/O driver is already " | ||
| 868 | "registered with KGDB.\n"); | ||
| 869 | return -EBUSY; | ||
| 870 | } | ||
| 871 | |||
| 872 | if (new_dbg_io_ops->init) { | ||
| 873 | err = new_dbg_io_ops->init(); | ||
| 874 | if (err) { | ||
| 875 | spin_unlock(&kgdb_registration_lock); | ||
| 876 | return err; | ||
| 877 | } | ||
| 878 | } | ||
| 879 | |||
| 880 | dbg_io_ops = new_dbg_io_ops; | ||
| 881 | |||
| 882 | spin_unlock(&kgdb_registration_lock); | ||
| 883 | |||
| 884 | printk(KERN_INFO "kgdb: Registered I/O driver %s.\n", | ||
| 885 | new_dbg_io_ops->name); | ||
| 886 | |||
| 887 | /* Arm KGDB now. */ | ||
| 888 | kgdb_register_callbacks(); | ||
| 889 | |||
| 890 | if (kgdb_break_asap) | ||
| 891 | kgdb_initial_breakpoint(); | ||
| 892 | |||
| 893 | return 0; | ||
| 894 | } | ||
| 895 | EXPORT_SYMBOL_GPL(kgdb_register_io_module); | ||
| 896 | |||
| 897 | /** | ||
| 898 | * kkgdb_unregister_io_module - unregister KGDB IO module | ||
| 899 | * @old_dbg_io_ops: the io ops vector | ||
| 900 | * | ||
| 901 | * Unregister it with the KGDB core. | ||
| 902 | */ | ||
| 903 | void kgdb_unregister_io_module(struct kgdb_io *old_dbg_io_ops) | ||
| 904 | { | ||
| 905 | BUG_ON(kgdb_connected); | ||
| 906 | |||
| 907 | /* | ||
| 908 | * KGDB is no longer able to communicate out, so | ||
| 909 | * unregister our callbacks and reset state. | ||
| 910 | */ | ||
| 911 | kgdb_unregister_callbacks(); | ||
| 912 | |||
| 913 | spin_lock(&kgdb_registration_lock); | ||
| 914 | |||
| 915 | WARN_ON_ONCE(dbg_io_ops != old_dbg_io_ops); | ||
| 916 | dbg_io_ops = NULL; | ||
| 917 | |||
| 918 | spin_unlock(&kgdb_registration_lock); | ||
| 919 | |||
| 920 | printk(KERN_INFO | ||
| 921 | "kgdb: Unregistered I/O driver %s, debugger disabled.\n", | ||
| 922 | old_dbg_io_ops->name); | ||
| 923 | } | ||
| 924 | EXPORT_SYMBOL_GPL(kgdb_unregister_io_module); | ||
| 925 | |||
| 926 | int dbg_io_get_char(void) | ||
| 927 | { | ||
| 928 | int ret = dbg_io_ops->read_char(); | ||
| 929 | if (ret == NO_POLL_CHAR) | ||
| 930 | return -1; | ||
| 931 | if (!dbg_kdb_mode) | ||
| 932 | return ret; | ||
| 933 | if (ret == 127) | ||
| 934 | return 8; | ||
| 935 | return ret; | ||
| 936 | } | ||
| 937 | |||
| 938 | /** | ||
| 939 | * kgdb_breakpoint - generate breakpoint exception | ||
| 940 | * | ||
| 941 | * This function will generate a breakpoint exception. It is used at the | ||
| 942 | * beginning of a program to sync up with a debugger and can be used | ||
| 943 | * otherwise as a quick means to stop program execution and "break" into | ||
| 944 | * the debugger. | ||
| 945 | */ | ||
| 946 | void kgdb_breakpoint(void) | ||
| 947 | { | ||
| 948 | atomic_inc(&kgdb_setting_breakpoint); | ||
| 949 | wmb(); /* Sync point before breakpoint */ | ||
| 950 | arch_kgdb_breakpoint(); | ||
| 951 | wmb(); /* Sync point after breakpoint */ | ||
| 952 | atomic_dec(&kgdb_setting_breakpoint); | ||
| 953 | } | ||
| 954 | EXPORT_SYMBOL_GPL(kgdb_breakpoint); | ||
| 955 | |||
| 956 | static int __init opt_kgdb_wait(char *str) | ||
| 957 | { | ||
| 958 | kgdb_break_asap = 1; | ||
| 959 | |||
| 960 | kdb_init(KDB_INIT_EARLY); | ||
| 961 | if (kgdb_io_module_registered) | ||
| 962 | kgdb_initial_breakpoint(); | ||
| 963 | |||
| 964 | return 0; | ||
| 965 | } | ||
| 966 | |||
| 967 | early_param("kgdbwait", opt_kgdb_wait); | ||
diff --git a/kernel/debug/debug_core.h b/kernel/debug/debug_core.h new file mode 100644 index 000000000000..c5d753d80f67 --- /dev/null +++ b/kernel/debug/debug_core.h | |||
| @@ -0,0 +1,81 @@ | |||
| 1 | /* | ||
| 2 | * Created by: Jason Wessel <jason.wessel@windriver.com> | ||
| 3 | * | ||
| 4 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 5 | * | ||
| 6 | * This file is licensed under the terms of the GNU General Public | ||
| 7 | * License version 2. This program is licensed "as is" without any | ||
| 8 | * warranty of any kind, whether express or implied. | ||
| 9 | */ | ||
| 10 | |||
| 11 | #ifndef _DEBUG_CORE_H_ | ||
| 12 | #define _DEBUG_CORE_H_ | ||
| 13 | /* | ||
| 14 | * These are the private implementation headers between the kernel | ||
| 15 | * debugger core and the debugger front end code. | ||
| 16 | */ | ||
| 17 | |||
| 18 | /* kernel debug core data structures */ | ||
| 19 | struct kgdb_state { | ||
| 20 | int ex_vector; | ||
| 21 | int signo; | ||
| 22 | int err_code; | ||
| 23 | int cpu; | ||
| 24 | int pass_exception; | ||
| 25 | unsigned long thr_query; | ||
| 26 | unsigned long threadid; | ||
| 27 | long kgdb_usethreadid; | ||
| 28 | struct pt_regs *linux_regs; | ||
| 29 | }; | ||
| 30 | |||
| 31 | /* Exception state values */ | ||
| 32 | #define DCPU_WANT_MASTER 0x1 /* Waiting to become a master kgdb cpu */ | ||
| 33 | #define DCPU_NEXT_MASTER 0x2 /* Transition from one master cpu to another */ | ||
| 34 | #define DCPU_IS_SLAVE 0x4 /* Slave cpu enter exception */ | ||
| 35 | #define DCPU_SSTEP 0x8 /* CPU is single stepping */ | ||
| 36 | |||
| 37 | struct debuggerinfo_struct { | ||
| 38 | void *debuggerinfo; | ||
| 39 | struct task_struct *task; | ||
| 40 | int exception_state; | ||
| 41 | int ret_state; | ||
| 42 | int irq_depth; | ||
| 43 | }; | ||
| 44 | |||
| 45 | extern struct debuggerinfo_struct kgdb_info[]; | ||
| 46 | |||
| 47 | /* kernel debug core break point routines */ | ||
| 48 | extern int dbg_remove_all_break(void); | ||
| 49 | extern int dbg_set_sw_break(unsigned long addr); | ||
| 50 | extern int dbg_remove_sw_break(unsigned long addr); | ||
| 51 | extern int dbg_activate_sw_breakpoints(void); | ||
| 52 | extern int dbg_deactivate_sw_breakpoints(void); | ||
| 53 | |||
| 54 | /* polled character access to i/o module */ | ||
| 55 | extern int dbg_io_get_char(void); | ||
| 56 | |||
| 57 | /* stub return value for switching between the gdbstub and kdb */ | ||
| 58 | #define DBG_PASS_EVENT -12345 | ||
| 59 | /* Switch from one cpu to another */ | ||
| 60 | #define DBG_SWITCH_CPU_EVENT -123456 | ||
| 61 | extern int dbg_switch_cpu; | ||
| 62 | |||
| 63 | /* gdbstub interface functions */ | ||
| 64 | extern int gdb_serial_stub(struct kgdb_state *ks); | ||
| 65 | extern void gdbstub_msg_write(const char *s, int len); | ||
| 66 | |||
| 67 | /* gdbstub functions used for kdb <-> gdbstub transition */ | ||
| 68 | extern int gdbstub_state(struct kgdb_state *ks, char *cmd); | ||
| 69 | extern int dbg_kdb_mode; | ||
| 70 | |||
| 71 | #ifdef CONFIG_KGDB_KDB | ||
| 72 | extern int kdb_stub(struct kgdb_state *ks); | ||
| 73 | extern int kdb_parse(const char *cmdstr); | ||
| 74 | #else /* ! CONFIG_KGDB_KDB */ | ||
| 75 | static inline int kdb_stub(struct kgdb_state *ks) | ||
| 76 | { | ||
| 77 | return DBG_PASS_EVENT; | ||
| 78 | } | ||
| 79 | #endif /* CONFIG_KGDB_KDB */ | ||
| 80 | |||
| 81 | #endif /* _DEBUG_CORE_H_ */ | ||
diff --git a/kernel/debug/gdbstub.c b/kernel/debug/gdbstub.c new file mode 100644 index 000000000000..4b17b3269525 --- /dev/null +++ b/kernel/debug/gdbstub.c | |||
| @@ -0,0 +1,1017 @@ | |||
| 1 | /* | ||
| 2 | * Kernel Debug Core | ||
| 3 | * | ||
| 4 | * Maintainer: Jason Wessel <jason.wessel@windriver.com> | ||
| 5 | * | ||
| 6 | * Copyright (C) 2000-2001 VERITAS Software Corporation. | ||
| 7 | * Copyright (C) 2002-2004 Timesys Corporation | ||
| 8 | * Copyright (C) 2003-2004 Amit S. Kale <amitkale@linsyssoft.com> | ||
| 9 | * Copyright (C) 2004 Pavel Machek <pavel@suse.cz> | ||
| 10 | * Copyright (C) 2004-2006 Tom Rini <trini@kernel.crashing.org> | ||
| 11 | * Copyright (C) 2004-2006 LinSysSoft Technologies Pvt. Ltd. | ||
| 12 | * Copyright (C) 2005-2009 Wind River Systems, Inc. | ||
| 13 | * Copyright (C) 2007 MontaVista Software, Inc. | ||
| 14 | * Copyright (C) 2008 Red Hat, Inc., Ingo Molnar <mingo@redhat.com> | ||
| 15 | * | ||
| 16 | * Contributors at various stages not listed above: | ||
| 17 | * Jason Wessel ( jason.wessel@windriver.com ) | ||
| 18 | * George Anzinger <george@mvista.com> | ||
| 19 | * Anurekh Saxena (anurekh.saxena@timesys.com) | ||
| 20 | * Lake Stevens Instrument Division (Glenn Engel) | ||
| 21 | * Jim Kingdon, Cygnus Support. | ||
| 22 | * | ||
| 23 | * Original KGDB stub: David Grothe <dave@gcom.com>, | ||
| 24 | * Tigran Aivazian <tigran@sco.com> | ||
| 25 | * | ||
| 26 | * This file is licensed under the terms of the GNU General Public License | ||
| 27 | * version 2. This program is licensed "as is" without any warranty of any | ||
| 28 | * kind, whether express or implied. | ||
| 29 | */ | ||
| 30 | |||
| 31 | #include <linux/kernel.h> | ||
| 32 | #include <linux/kgdb.h> | ||
| 33 | #include <linux/kdb.h> | ||
| 34 | #include <linux/reboot.h> | ||
| 35 | #include <linux/uaccess.h> | ||
| 36 | #include <asm/cacheflush.h> | ||
| 37 | #include <asm/unaligned.h> | ||
| 38 | #include "debug_core.h" | ||
| 39 | |||
| 40 | #define KGDB_MAX_THREAD_QUERY 17 | ||
| 41 | |||
| 42 | /* Our I/O buffers. */ | ||
| 43 | static char remcom_in_buffer[BUFMAX]; | ||
| 44 | static char remcom_out_buffer[BUFMAX]; | ||
| 45 | |||
| 46 | /* Storage for the registers, in GDB format. */ | ||
| 47 | static unsigned long gdb_regs[(NUMREGBYTES + | ||
| 48 | sizeof(unsigned long) - 1) / | ||
| 49 | sizeof(unsigned long)]; | ||
| 50 | |||
| 51 | /* | ||
| 52 | * GDB remote protocol parser: | ||
| 53 | */ | ||
| 54 | |||
| 55 | static int hex(char ch) | ||
| 56 | { | ||
| 57 | if ((ch >= 'a') && (ch <= 'f')) | ||
| 58 | return ch - 'a' + 10; | ||
| 59 | if ((ch >= '0') && (ch <= '9')) | ||
| 60 | return ch - '0'; | ||
| 61 | if ((ch >= 'A') && (ch <= 'F')) | ||
| 62 | return ch - 'A' + 10; | ||
| 63 | return -1; | ||
| 64 | } | ||
| 65 | |||
| 66 | #ifdef CONFIG_KGDB_KDB | ||
| 67 | static int gdbstub_read_wait(void) | ||
| 68 | { | ||
| 69 | int ret = -1; | ||
| 70 | int i; | ||
| 71 | |||
| 72 | /* poll any additional I/O interfaces that are defined */ | ||
| 73 | while (ret < 0) | ||
| 74 | for (i = 0; kdb_poll_funcs[i] != NULL; i++) { | ||
| 75 | ret = kdb_poll_funcs[i](); | ||
| 76 | if (ret > 0) | ||
| 77 | break; | ||
| 78 | } | ||
| 79 | return ret; | ||
| 80 | } | ||
| 81 | #else | ||
| 82 | static int gdbstub_read_wait(void) | ||
| 83 | { | ||
| 84 | int ret = dbg_io_ops->read_char(); | ||
| 85 | while (ret == NO_POLL_CHAR) | ||
| 86 | ret = dbg_io_ops->read_char(); | ||
| 87 | return ret; | ||
| 88 | } | ||
| 89 | #endif | ||
| 90 | /* scan for the sequence $<data>#<checksum> */ | ||
| 91 | static void get_packet(char *buffer) | ||
| 92 | { | ||
| 93 | unsigned char checksum; | ||
| 94 | unsigned char xmitcsum; | ||
| 95 | int count; | ||
| 96 | char ch; | ||
| 97 | |||
| 98 | do { | ||
| 99 | /* | ||
| 100 | * Spin and wait around for the start character, ignore all | ||
| 101 | * other characters: | ||
| 102 | */ | ||
| 103 | while ((ch = (gdbstub_read_wait())) != '$') | ||
| 104 | /* nothing */; | ||
| 105 | |||
| 106 | kgdb_connected = 1; | ||
| 107 | checksum = 0; | ||
| 108 | xmitcsum = -1; | ||
| 109 | |||
| 110 | count = 0; | ||
| 111 | |||
| 112 | /* | ||
| 113 | * now, read until a # or end of buffer is found: | ||
| 114 | */ | ||
| 115 | while (count < (BUFMAX - 1)) { | ||
| 116 | ch = gdbstub_read_wait(); | ||
| 117 | if (ch == '#') | ||
| 118 | break; | ||
| 119 | checksum = checksum + ch; | ||
| 120 | buffer[count] = ch; | ||
| 121 | count = count + 1; | ||
| 122 | } | ||
| 123 | buffer[count] = 0; | ||
| 124 | |||
| 125 | if (ch == '#') { | ||
| 126 | xmitcsum = hex(gdbstub_read_wait()) << 4; | ||
| 127 | xmitcsum += hex(gdbstub_read_wait()); | ||
| 128 | |||
| 129 | if (checksum != xmitcsum) | ||
| 130 | /* failed checksum */ | ||
| 131 | dbg_io_ops->write_char('-'); | ||
| 132 | else | ||
| 133 | /* successful transfer */ | ||
| 134 | dbg_io_ops->write_char('+'); | ||
| 135 | if (dbg_io_ops->flush) | ||
| 136 | dbg_io_ops->flush(); | ||
| 137 | } | ||
| 138 | } while (checksum != xmitcsum); | ||
| 139 | } | ||
| 140 | |||
| 141 | /* | ||
| 142 | * Send the packet in buffer. | ||
| 143 | * Check for gdb connection if asked for. | ||
| 144 | */ | ||
| 145 | static void put_packet(char *buffer) | ||
| 146 | { | ||
| 147 | unsigned char checksum; | ||
| 148 | int count; | ||
| 149 | char ch; | ||
| 150 | |||
| 151 | /* | ||
| 152 | * $<packet info>#<checksum>. | ||
| 153 | */ | ||
| 154 | while (1) { | ||
| 155 | dbg_io_ops->write_char('$'); | ||
| 156 | checksum = 0; | ||
| 157 | count = 0; | ||
| 158 | |||
| 159 | while ((ch = buffer[count])) { | ||
| 160 | dbg_io_ops->write_char(ch); | ||
| 161 | checksum += ch; | ||
| 162 | count++; | ||
| 163 | } | ||
| 164 | |||
| 165 | dbg_io_ops->write_char('#'); | ||
| 166 | dbg_io_ops->write_char(hex_asc_hi(checksum)); | ||
| 167 | dbg_io_ops->write_char(hex_asc_lo(checksum)); | ||
| 168 | if (dbg_io_ops->flush) | ||
| 169 | dbg_io_ops->flush(); | ||
| 170 | |||
| 171 | /* Now see what we get in reply. */ | ||
| 172 | ch = gdbstub_read_wait(); | ||
| 173 | |||
| 174 | if (ch == 3) | ||
| 175 | ch = gdbstub_read_wait(); | ||
| 176 | |||
| 177 | /* If we get an ACK, we are done. */ | ||
| 178 | if (ch == '+') | ||
| 179 | return; | ||
| 180 | |||
| 181 | /* | ||
| 182 | * If we get the start of another packet, this means | ||
| 183 | * that GDB is attempting to reconnect. We will NAK | ||
| 184 | * the packet being sent, and stop trying to send this | ||
| 185 | * packet. | ||
| 186 | */ | ||
| 187 | if (ch == '$') { | ||
| 188 | dbg_io_ops->write_char('-'); | ||
| 189 | if (dbg_io_ops->flush) | ||
| 190 | dbg_io_ops->flush(); | ||
| 191 | return; | ||
| 192 | } | ||
| 193 | } | ||
| 194 | } | ||
| 195 | |||
| 196 | static char gdbmsgbuf[BUFMAX + 1]; | ||
| 197 | |||
| 198 | void gdbstub_msg_write(const char *s, int len) | ||
| 199 | { | ||
| 200 | char *bufptr; | ||
| 201 | int wcount; | ||
| 202 | int i; | ||
| 203 | |||
| 204 | if (len == 0) | ||
| 205 | len = strlen(s); | ||
| 206 | |||
| 207 | /* 'O'utput */ | ||
| 208 | gdbmsgbuf[0] = 'O'; | ||
| 209 | |||
| 210 | /* Fill and send buffers... */ | ||
| 211 | while (len > 0) { | ||
| 212 | bufptr = gdbmsgbuf + 1; | ||
| 213 | |||
| 214 | /* Calculate how many this time */ | ||
| 215 | if ((len << 1) > (BUFMAX - 2)) | ||
| 216 | wcount = (BUFMAX - 2) >> 1; | ||
| 217 | else | ||
| 218 | wcount = len; | ||
| 219 | |||
| 220 | /* Pack in hex chars */ | ||
| 221 | for (i = 0; i < wcount; i++) | ||
| 222 | bufptr = pack_hex_byte(bufptr, s[i]); | ||
| 223 | *bufptr = '\0'; | ||
| 224 | |||
| 225 | /* Move up */ | ||
| 226 | s += wcount; | ||
| 227 | len -= wcount; | ||
| 228 | |||
| 229 | /* Write packet */ | ||
| 230 | put_packet(gdbmsgbuf); | ||
| 231 | } | ||
| 232 | } | ||
| 233 | |||
| 234 | /* | ||
| 235 | * Convert the memory pointed to by mem into hex, placing result in | ||
| 236 | * buf. Return a pointer to the last char put in buf (null). May | ||
| 237 | * return an error. | ||
| 238 | */ | ||
| 239 | int kgdb_mem2hex(char *mem, char *buf, int count) | ||
| 240 | { | ||
| 241 | char *tmp; | ||
| 242 | int err; | ||
| 243 | |||
| 244 | /* | ||
| 245 | * We use the upper half of buf as an intermediate buffer for the | ||
| 246 | * raw memory copy. Hex conversion will work against this one. | ||
| 247 | */ | ||
| 248 | tmp = buf + count; | ||
| 249 | |||
| 250 | err = probe_kernel_read(tmp, mem, count); | ||
| 251 | if (!err) { | ||
| 252 | while (count > 0) { | ||
| 253 | buf = pack_hex_byte(buf, *tmp); | ||
| 254 | tmp++; | ||
| 255 | count--; | ||
| 256 | } | ||
| 257 | |||
| 258 | *buf = 0; | ||
| 259 | } | ||
| 260 | |||
| 261 | return err; | ||
| 262 | } | ||
| 263 | |||
| 264 | /* | ||
| 265 | * Convert the hex array pointed to by buf into binary to be placed in | ||
| 266 | * mem. Return a pointer to the character AFTER the last byte | ||
| 267 | * written. May return an error. | ||
| 268 | */ | ||
| 269 | int kgdb_hex2mem(char *buf, char *mem, int count) | ||
| 270 | { | ||
| 271 | char *tmp_raw; | ||
| 272 | char *tmp_hex; | ||
| 273 | |||
| 274 | /* | ||
| 275 | * We use the upper half of buf as an intermediate buffer for the | ||
| 276 | * raw memory that is converted from hex. | ||
| 277 | */ | ||
| 278 | tmp_raw = buf + count * 2; | ||
| 279 | |||
| 280 | tmp_hex = tmp_raw - 1; | ||
| 281 | while (tmp_hex >= buf) { | ||
| 282 | tmp_raw--; | ||
| 283 | *tmp_raw = hex(*tmp_hex--); | ||
| 284 | *tmp_raw |= hex(*tmp_hex--) << 4; | ||
| 285 | } | ||
| 286 | |||
| 287 | return probe_kernel_write(mem, tmp_raw, count); | ||
| 288 | } | ||
| 289 | |||
| 290 | /* | ||
| 291 | * While we find nice hex chars, build a long_val. | ||
| 292 | * Return number of chars processed. | ||
| 293 | */ | ||
| 294 | int kgdb_hex2long(char **ptr, unsigned long *long_val) | ||
| 295 | { | ||
| 296 | int hex_val; | ||
| 297 | int num = 0; | ||
| 298 | int negate = 0; | ||
| 299 | |||
| 300 | *long_val = 0; | ||
| 301 | |||
| 302 | if (**ptr == '-') { | ||
| 303 | negate = 1; | ||
| 304 | (*ptr)++; | ||
| 305 | } | ||
| 306 | while (**ptr) { | ||
| 307 | hex_val = hex(**ptr); | ||
| 308 | if (hex_val < 0) | ||
| 309 | break; | ||
| 310 | |||
| 311 | *long_val = (*long_val << 4) | hex_val; | ||
| 312 | num++; | ||
| 313 | (*ptr)++; | ||
| 314 | } | ||
| 315 | |||
| 316 | if (negate) | ||
| 317 | *long_val = -*long_val; | ||
| 318 | |||
| 319 | return num; | ||
| 320 | } | ||
| 321 | |||
| 322 | /* | ||
| 323 | * Copy the binary array pointed to by buf into mem. Fix $, #, and | ||
| 324 | * 0x7d escaped with 0x7d. Return -EFAULT on failure or 0 on success. | ||
| 325 | * The input buf is overwitten with the result to write to mem. | ||
| 326 | */ | ||
| 327 | static int kgdb_ebin2mem(char *buf, char *mem, int count) | ||
| 328 | { | ||
| 329 | int size = 0; | ||
| 330 | char *c = buf; | ||
| 331 | |||
| 332 | while (count-- > 0) { | ||
| 333 | c[size] = *buf++; | ||
| 334 | if (c[size] == 0x7d) | ||
| 335 | c[size] = *buf++ ^ 0x20; | ||
| 336 | size++; | ||
| 337 | } | ||
| 338 | |||
| 339 | return probe_kernel_write(mem, c, size); | ||
| 340 | } | ||
| 341 | |||
| 342 | /* Write memory due to an 'M' or 'X' packet. */ | ||
| 343 | static int write_mem_msg(int binary) | ||
| 344 | { | ||
| 345 | char *ptr = &remcom_in_buffer[1]; | ||
| 346 | unsigned long addr; | ||
| 347 | unsigned long length; | ||
| 348 | int err; | ||
| 349 | |||
| 350 | if (kgdb_hex2long(&ptr, &addr) > 0 && *(ptr++) == ',' && | ||
| 351 | kgdb_hex2long(&ptr, &length) > 0 && *(ptr++) == ':') { | ||
| 352 | if (binary) | ||
| 353 | err = kgdb_ebin2mem(ptr, (char *)addr, length); | ||
| 354 | else | ||
| 355 | err = kgdb_hex2mem(ptr, (char *)addr, length); | ||
| 356 | if (err) | ||
| 357 | return err; | ||
| 358 | if (CACHE_FLUSH_IS_SAFE) | ||
| 359 | flush_icache_range(addr, addr + length); | ||
| 360 | return 0; | ||
| 361 | } | ||
| 362 | |||
| 363 | return -EINVAL; | ||
| 364 | } | ||
| 365 | |||
| 366 | static void error_packet(char *pkt, int error) | ||
| 367 | { | ||
| 368 | error = -error; | ||
| 369 | pkt[0] = 'E'; | ||
| 370 | pkt[1] = hex_asc[(error / 10)]; | ||
| 371 | pkt[2] = hex_asc[(error % 10)]; | ||
| 372 | pkt[3] = '\0'; | ||
| 373 | } | ||
| 374 | |||
| 375 | /* | ||
| 376 | * Thread ID accessors. We represent a flat TID space to GDB, where | ||
| 377 | * the per CPU idle threads (which under Linux all have PID 0) are | ||
| 378 | * remapped to negative TIDs. | ||
| 379 | */ | ||
| 380 | |||
| 381 | #define BUF_THREAD_ID_SIZE 16 | ||
| 382 | |||
| 383 | static char *pack_threadid(char *pkt, unsigned char *id) | ||
| 384 | { | ||
| 385 | char *limit; | ||
| 386 | |||
| 387 | limit = pkt + BUF_THREAD_ID_SIZE; | ||
| 388 | while (pkt < limit) | ||
| 389 | pkt = pack_hex_byte(pkt, *id++); | ||
| 390 | |||
| 391 | return pkt; | ||
| 392 | } | ||
| 393 | |||
| 394 | static void int_to_threadref(unsigned char *id, int value) | ||
| 395 | { | ||
| 396 | unsigned char *scan; | ||
| 397 | int i = 4; | ||
| 398 | |||
| 399 | scan = (unsigned char *)id; | ||
| 400 | while (i--) | ||
| 401 | *scan++ = 0; | ||
| 402 | put_unaligned_be32(value, scan); | ||
| 403 | } | ||
| 404 | |||
| 405 | static struct task_struct *getthread(struct pt_regs *regs, int tid) | ||
| 406 | { | ||
| 407 | /* | ||
| 408 | * Non-positive TIDs are remapped to the cpu shadow information | ||
| 409 | */ | ||
| 410 | if (tid == 0 || tid == -1) | ||
| 411 | tid = -atomic_read(&kgdb_active) - 2; | ||
| 412 | if (tid < -1 && tid > -NR_CPUS - 2) { | ||
| 413 | if (kgdb_info[-tid - 2].task) | ||
| 414 | return kgdb_info[-tid - 2].task; | ||
| 415 | else | ||
| 416 | return idle_task(-tid - 2); | ||
| 417 | } | ||
| 418 | if (tid <= 0) { | ||
| 419 | printk(KERN_ERR "KGDB: Internal thread select error\n"); | ||
| 420 | dump_stack(); | ||
| 421 | return NULL; | ||
| 422 | } | ||
| 423 | |||
| 424 | /* | ||
| 425 | * find_task_by_pid_ns() does not take the tasklist lock anymore | ||
| 426 | * but is nicely RCU locked - hence is a pretty resilient | ||
| 427 | * thing to use: | ||
| 428 | */ | ||
| 429 | return find_task_by_pid_ns(tid, &init_pid_ns); | ||
| 430 | } | ||
| 431 | |||
| 432 | |||
| 433 | /* | ||
| 434 | * Remap normal tasks to their real PID, | ||
| 435 | * CPU shadow threads are mapped to -CPU - 2 | ||
| 436 | */ | ||
| 437 | static inline int shadow_pid(int realpid) | ||
| 438 | { | ||
| 439 | if (realpid) | ||
| 440 | return realpid; | ||
| 441 | |||
| 442 | return -raw_smp_processor_id() - 2; | ||
| 443 | } | ||
| 444 | |||
| 445 | /* | ||
| 446 | * All the functions that start with gdb_cmd are the various | ||
| 447 | * operations to implement the handlers for the gdbserial protocol | ||
| 448 | * where KGDB is communicating with an external debugger | ||
| 449 | */ | ||
| 450 | |||
| 451 | /* Handle the '?' status packets */ | ||
| 452 | static void gdb_cmd_status(struct kgdb_state *ks) | ||
| 453 | { | ||
| 454 | /* | ||
| 455 | * We know that this packet is only sent | ||
| 456 | * during initial connect. So to be safe, | ||
| 457 | * we clear out our breakpoints now in case | ||
| 458 | * GDB is reconnecting. | ||
| 459 | */ | ||
| 460 | dbg_remove_all_break(); | ||
| 461 | |||
| 462 | remcom_out_buffer[0] = 'S'; | ||
| 463 | pack_hex_byte(&remcom_out_buffer[1], ks->signo); | ||
| 464 | } | ||
| 465 | |||
| 466 | /* Handle the 'g' get registers request */ | ||
| 467 | static void gdb_cmd_getregs(struct kgdb_state *ks) | ||
| 468 | { | ||
| 469 | struct task_struct *thread; | ||
| 470 | void *local_debuggerinfo; | ||
| 471 | int i; | ||
| 472 | |||
| 473 | thread = kgdb_usethread; | ||
| 474 | if (!thread) { | ||
| 475 | thread = kgdb_info[ks->cpu].task; | ||
| 476 | local_debuggerinfo = kgdb_info[ks->cpu].debuggerinfo; | ||
| 477 | } else { | ||
| 478 | local_debuggerinfo = NULL; | ||
| 479 | for_each_online_cpu(i) { | ||
| 480 | /* | ||
| 481 | * Try to find the task on some other | ||
| 482 | * or possibly this node if we do not | ||
| 483 | * find the matching task then we try | ||
| 484 | * to approximate the results. | ||
| 485 | */ | ||
| 486 | if (thread == kgdb_info[i].task) | ||
| 487 | local_debuggerinfo = kgdb_info[i].debuggerinfo; | ||
| 488 | } | ||
| 489 | } | ||
| 490 | |||
| 491 | /* | ||
| 492 | * All threads that don't have debuggerinfo should be | ||
| 493 | * in schedule() sleeping, since all other CPUs | ||
| 494 | * are in kgdb_wait, and thus have debuggerinfo. | ||
| 495 | */ | ||
| 496 | if (local_debuggerinfo) { | ||
| 497 | pt_regs_to_gdb_regs(gdb_regs, local_debuggerinfo); | ||
| 498 | } else { | ||
| 499 | /* | ||
| 500 | * Pull stuff saved during switch_to; nothing | ||
| 501 | * else is accessible (or even particularly | ||
| 502 | * relevant). | ||
| 503 | * | ||
| 504 | * This should be enough for a stack trace. | ||
| 505 | */ | ||
| 506 | sleeping_thread_to_gdb_regs(gdb_regs, thread); | ||
| 507 | } | ||
| 508 | kgdb_mem2hex((char *)gdb_regs, remcom_out_buffer, NUMREGBYTES); | ||
| 509 | } | ||
| 510 | |||
| 511 | /* Handle the 'G' set registers request */ | ||
| 512 | static void gdb_cmd_setregs(struct kgdb_state *ks) | ||
| 513 | { | ||
| 514 | kgdb_hex2mem(&remcom_in_buffer[1], (char *)gdb_regs, NUMREGBYTES); | ||
| 515 | |||
| 516 | if (kgdb_usethread && kgdb_usethread != current) { | ||
| 517 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 518 | } else { | ||
| 519 | gdb_regs_to_pt_regs(gdb_regs, ks->linux_regs); | ||
| 520 | strcpy(remcom_out_buffer, "OK"); | ||
| 521 | } | ||
| 522 | } | ||
| 523 | |||
| 524 | /* Handle the 'm' memory read bytes */ | ||
| 525 | static void gdb_cmd_memread(struct kgdb_state *ks) | ||
| 526 | { | ||
| 527 | char *ptr = &remcom_in_buffer[1]; | ||
| 528 | unsigned long length; | ||
| 529 | unsigned long addr; | ||
| 530 | int err; | ||
| 531 | |||
| 532 | if (kgdb_hex2long(&ptr, &addr) > 0 && *ptr++ == ',' && | ||
| 533 | kgdb_hex2long(&ptr, &length) > 0) { | ||
| 534 | err = kgdb_mem2hex((char *)addr, remcom_out_buffer, length); | ||
| 535 | if (err) | ||
| 536 | error_packet(remcom_out_buffer, err); | ||
| 537 | } else { | ||
| 538 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 539 | } | ||
| 540 | } | ||
| 541 | |||
| 542 | /* Handle the 'M' memory write bytes */ | ||
| 543 | static void gdb_cmd_memwrite(struct kgdb_state *ks) | ||
| 544 | { | ||
| 545 | int err = write_mem_msg(0); | ||
| 546 | |||
| 547 | if (err) | ||
| 548 | error_packet(remcom_out_buffer, err); | ||
| 549 | else | ||
| 550 | strcpy(remcom_out_buffer, "OK"); | ||
| 551 | } | ||
| 552 | |||
| 553 | /* Handle the 'X' memory binary write bytes */ | ||
| 554 | static void gdb_cmd_binwrite(struct kgdb_state *ks) | ||
| 555 | { | ||
| 556 | int err = write_mem_msg(1); | ||
| 557 | |||
| 558 | if (err) | ||
| 559 | error_packet(remcom_out_buffer, err); | ||
| 560 | else | ||
| 561 | strcpy(remcom_out_buffer, "OK"); | ||
| 562 | } | ||
| 563 | |||
| 564 | /* Handle the 'D' or 'k', detach or kill packets */ | ||
| 565 | static void gdb_cmd_detachkill(struct kgdb_state *ks) | ||
| 566 | { | ||
| 567 | int error; | ||
| 568 | |||
| 569 | /* The detach case */ | ||
| 570 | if (remcom_in_buffer[0] == 'D') { | ||
| 571 | error = dbg_remove_all_break(); | ||
| 572 | if (error < 0) { | ||
| 573 | error_packet(remcom_out_buffer, error); | ||
| 574 | } else { | ||
| 575 | strcpy(remcom_out_buffer, "OK"); | ||
| 576 | kgdb_connected = 0; | ||
| 577 | } | ||
| 578 | put_packet(remcom_out_buffer); | ||
| 579 | } else { | ||
| 580 | /* | ||
| 581 | * Assume the kill case, with no exit code checking, | ||
| 582 | * trying to force detach the debugger: | ||
| 583 | */ | ||
| 584 | dbg_remove_all_break(); | ||
| 585 | kgdb_connected = 0; | ||
| 586 | } | ||
| 587 | } | ||
| 588 | |||
| 589 | /* Handle the 'R' reboot packets */ | ||
| 590 | static int gdb_cmd_reboot(struct kgdb_state *ks) | ||
| 591 | { | ||
| 592 | /* For now, only honor R0 */ | ||
| 593 | if (strcmp(remcom_in_buffer, "R0") == 0) { | ||
| 594 | printk(KERN_CRIT "Executing emergency reboot\n"); | ||
| 595 | strcpy(remcom_out_buffer, "OK"); | ||
| 596 | put_packet(remcom_out_buffer); | ||
| 597 | |||
| 598 | /* | ||
| 599 | * Execution should not return from | ||
| 600 | * machine_emergency_restart() | ||
| 601 | */ | ||
| 602 | machine_emergency_restart(); | ||
| 603 | kgdb_connected = 0; | ||
| 604 | |||
| 605 | return 1; | ||
| 606 | } | ||
| 607 | return 0; | ||
| 608 | } | ||
| 609 | |||
| 610 | /* Handle the 'q' query packets */ | ||
| 611 | static void gdb_cmd_query(struct kgdb_state *ks) | ||
| 612 | { | ||
| 613 | struct task_struct *g; | ||
| 614 | struct task_struct *p; | ||
| 615 | unsigned char thref[8]; | ||
| 616 | char *ptr; | ||
| 617 | int i; | ||
| 618 | int cpu; | ||
| 619 | int finished = 0; | ||
| 620 | |||
| 621 | switch (remcom_in_buffer[1]) { | ||
| 622 | case 's': | ||
| 623 | case 'f': | ||
| 624 | if (memcmp(remcom_in_buffer + 2, "ThreadInfo", 10)) { | ||
| 625 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 626 | break; | ||
| 627 | } | ||
| 628 | |||
| 629 | i = 0; | ||
| 630 | remcom_out_buffer[0] = 'm'; | ||
| 631 | ptr = remcom_out_buffer + 1; | ||
| 632 | if (remcom_in_buffer[1] == 'f') { | ||
| 633 | /* Each cpu is a shadow thread */ | ||
| 634 | for_each_online_cpu(cpu) { | ||
| 635 | ks->thr_query = 0; | ||
| 636 | int_to_threadref(thref, -cpu - 2); | ||
| 637 | pack_threadid(ptr, thref); | ||
| 638 | ptr += BUF_THREAD_ID_SIZE; | ||
| 639 | *(ptr++) = ','; | ||
| 640 | i++; | ||
| 641 | } | ||
| 642 | } | ||
| 643 | |||
| 644 | do_each_thread(g, p) { | ||
| 645 | if (i >= ks->thr_query && !finished) { | ||
| 646 | int_to_threadref(thref, p->pid); | ||
| 647 | pack_threadid(ptr, thref); | ||
| 648 | ptr += BUF_THREAD_ID_SIZE; | ||
| 649 | *(ptr++) = ','; | ||
| 650 | ks->thr_query++; | ||
| 651 | if (ks->thr_query % KGDB_MAX_THREAD_QUERY == 0) | ||
| 652 | finished = 1; | ||
| 653 | } | ||
| 654 | i++; | ||
| 655 | } while_each_thread(g, p); | ||
| 656 | |||
| 657 | *(--ptr) = '\0'; | ||
| 658 | break; | ||
| 659 | |||
| 660 | case 'C': | ||
| 661 | /* Current thread id */ | ||
| 662 | strcpy(remcom_out_buffer, "QC"); | ||
| 663 | ks->threadid = shadow_pid(current->pid); | ||
| 664 | int_to_threadref(thref, ks->threadid); | ||
| 665 | pack_threadid(remcom_out_buffer + 2, thref); | ||
| 666 | break; | ||
| 667 | case 'T': | ||
| 668 | if (memcmp(remcom_in_buffer + 1, "ThreadExtraInfo,", 16)) { | ||
| 669 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 670 | break; | ||
| 671 | } | ||
| 672 | ks->threadid = 0; | ||
| 673 | ptr = remcom_in_buffer + 17; | ||
| 674 | kgdb_hex2long(&ptr, &ks->threadid); | ||
| 675 | if (!getthread(ks->linux_regs, ks->threadid)) { | ||
| 676 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 677 | break; | ||
| 678 | } | ||
| 679 | if ((int)ks->threadid > 0) { | ||
| 680 | kgdb_mem2hex(getthread(ks->linux_regs, | ||
| 681 | ks->threadid)->comm, | ||
| 682 | remcom_out_buffer, 16); | ||
| 683 | } else { | ||
| 684 | static char tmpstr[23 + BUF_THREAD_ID_SIZE]; | ||
| 685 | |||
| 686 | sprintf(tmpstr, "shadowCPU%d", | ||
| 687 | (int)(-ks->threadid - 2)); | ||
| 688 | kgdb_mem2hex(tmpstr, remcom_out_buffer, strlen(tmpstr)); | ||
| 689 | } | ||
| 690 | break; | ||
| 691 | #ifdef CONFIG_KGDB_KDB | ||
| 692 | case 'R': | ||
| 693 | if (strncmp(remcom_in_buffer, "qRcmd,", 6) == 0) { | ||
| 694 | int len = strlen(remcom_in_buffer + 6); | ||
| 695 | |||
| 696 | if ((len % 2) != 0) { | ||
| 697 | strcpy(remcom_out_buffer, "E01"); | ||
| 698 | break; | ||
| 699 | } | ||
| 700 | kgdb_hex2mem(remcom_in_buffer + 6, | ||
| 701 | remcom_out_buffer, len); | ||
| 702 | len = len / 2; | ||
| 703 | remcom_out_buffer[len++] = 0; | ||
| 704 | |||
| 705 | kdb_parse(remcom_out_buffer); | ||
| 706 | strcpy(remcom_out_buffer, "OK"); | ||
| 707 | } | ||
| 708 | break; | ||
| 709 | #endif | ||
| 710 | } | ||
| 711 | } | ||
| 712 | |||
| 713 | /* Handle the 'H' task query packets */ | ||
| 714 | static void gdb_cmd_task(struct kgdb_state *ks) | ||
| 715 | { | ||
| 716 | struct task_struct *thread; | ||
| 717 | char *ptr; | ||
| 718 | |||
| 719 | switch (remcom_in_buffer[1]) { | ||
| 720 | case 'g': | ||
| 721 | ptr = &remcom_in_buffer[2]; | ||
| 722 | kgdb_hex2long(&ptr, &ks->threadid); | ||
| 723 | thread = getthread(ks->linux_regs, ks->threadid); | ||
| 724 | if (!thread && ks->threadid > 0) { | ||
| 725 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 726 | break; | ||
| 727 | } | ||
| 728 | kgdb_usethread = thread; | ||
| 729 | ks->kgdb_usethreadid = ks->threadid; | ||
| 730 | strcpy(remcom_out_buffer, "OK"); | ||
| 731 | break; | ||
| 732 | case 'c': | ||
| 733 | ptr = &remcom_in_buffer[2]; | ||
| 734 | kgdb_hex2long(&ptr, &ks->threadid); | ||
| 735 | if (!ks->threadid) { | ||
| 736 | kgdb_contthread = NULL; | ||
| 737 | } else { | ||
| 738 | thread = getthread(ks->linux_regs, ks->threadid); | ||
| 739 | if (!thread && ks->threadid > 0) { | ||
| 740 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 741 | break; | ||
| 742 | } | ||
| 743 | kgdb_contthread = thread; | ||
| 744 | } | ||
| 745 | strcpy(remcom_out_buffer, "OK"); | ||
| 746 | break; | ||
| 747 | } | ||
| 748 | } | ||
| 749 | |||
| 750 | /* Handle the 'T' thread query packets */ | ||
| 751 | static void gdb_cmd_thread(struct kgdb_state *ks) | ||
| 752 | { | ||
| 753 | char *ptr = &remcom_in_buffer[1]; | ||
| 754 | struct task_struct *thread; | ||
| 755 | |||
| 756 | kgdb_hex2long(&ptr, &ks->threadid); | ||
| 757 | thread = getthread(ks->linux_regs, ks->threadid); | ||
| 758 | if (thread) | ||
| 759 | strcpy(remcom_out_buffer, "OK"); | ||
| 760 | else | ||
| 761 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 762 | } | ||
| 763 | |||
| 764 | /* Handle the 'z' or 'Z' breakpoint remove or set packets */ | ||
| 765 | static void gdb_cmd_break(struct kgdb_state *ks) | ||
| 766 | { | ||
| 767 | /* | ||
| 768 | * Since GDB-5.3, it's been drafted that '0' is a software | ||
| 769 | * breakpoint, '1' is a hardware breakpoint, so let's do that. | ||
| 770 | */ | ||
| 771 | char *bpt_type = &remcom_in_buffer[1]; | ||
| 772 | char *ptr = &remcom_in_buffer[2]; | ||
| 773 | unsigned long addr; | ||
| 774 | unsigned long length; | ||
| 775 | int error = 0; | ||
| 776 | |||
| 777 | if (arch_kgdb_ops.set_hw_breakpoint && *bpt_type >= '1') { | ||
| 778 | /* Unsupported */ | ||
| 779 | if (*bpt_type > '4') | ||
| 780 | return; | ||
| 781 | } else { | ||
| 782 | if (*bpt_type != '0' && *bpt_type != '1') | ||
| 783 | /* Unsupported. */ | ||
| 784 | return; | ||
| 785 | } | ||
| 786 | |||
| 787 | /* | ||
| 788 | * Test if this is a hardware breakpoint, and | ||
| 789 | * if we support it: | ||
| 790 | */ | ||
| 791 | if (*bpt_type == '1' && !(arch_kgdb_ops.flags & KGDB_HW_BREAKPOINT)) | ||
| 792 | /* Unsupported. */ | ||
| 793 | return; | ||
| 794 | |||
| 795 | if (*(ptr++) != ',') { | ||
| 796 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 797 | return; | ||
| 798 | } | ||
| 799 | if (!kgdb_hex2long(&ptr, &addr)) { | ||
| 800 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 801 | return; | ||
| 802 | } | ||
| 803 | if (*(ptr++) != ',' || | ||
| 804 | !kgdb_hex2long(&ptr, &length)) { | ||
| 805 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 806 | return; | ||
| 807 | } | ||
| 808 | |||
| 809 | if (remcom_in_buffer[0] == 'Z' && *bpt_type == '0') | ||
| 810 | error = dbg_set_sw_break(addr); | ||
| 811 | else if (remcom_in_buffer[0] == 'z' && *bpt_type == '0') | ||
| 812 | error = dbg_remove_sw_break(addr); | ||
| 813 | else if (remcom_in_buffer[0] == 'Z') | ||
| 814 | error = arch_kgdb_ops.set_hw_breakpoint(addr, | ||
| 815 | (int)length, *bpt_type - '0'); | ||
| 816 | else if (remcom_in_buffer[0] == 'z') | ||
| 817 | error = arch_kgdb_ops.remove_hw_breakpoint(addr, | ||
| 818 | (int) length, *bpt_type - '0'); | ||
| 819 | |||
| 820 | if (error == 0) | ||
| 821 | strcpy(remcom_out_buffer, "OK"); | ||
| 822 | else | ||
| 823 | error_packet(remcom_out_buffer, error); | ||
| 824 | } | ||
| 825 | |||
| 826 | /* Handle the 'C' signal / exception passing packets */ | ||
| 827 | static int gdb_cmd_exception_pass(struct kgdb_state *ks) | ||
| 828 | { | ||
| 829 | /* C09 == pass exception | ||
| 830 | * C15 == detach kgdb, pass exception | ||
| 831 | */ | ||
| 832 | if (remcom_in_buffer[1] == '0' && remcom_in_buffer[2] == '9') { | ||
| 833 | |||
| 834 | ks->pass_exception = 1; | ||
| 835 | remcom_in_buffer[0] = 'c'; | ||
| 836 | |||
| 837 | } else if (remcom_in_buffer[1] == '1' && remcom_in_buffer[2] == '5') { | ||
| 838 | |||
| 839 | ks->pass_exception = 1; | ||
| 840 | remcom_in_buffer[0] = 'D'; | ||
| 841 | dbg_remove_all_break(); | ||
| 842 | kgdb_connected = 0; | ||
| 843 | return 1; | ||
| 844 | |||
| 845 | } else { | ||
| 846 | gdbstub_msg_write("KGDB only knows signal 9 (pass)" | ||
| 847 | " and 15 (pass and disconnect)\n" | ||
| 848 | "Executing a continue without signal passing\n", 0); | ||
| 849 | remcom_in_buffer[0] = 'c'; | ||
| 850 | } | ||
| 851 | |||
| 852 | /* Indicate fall through */ | ||
| 853 | return -1; | ||
| 854 | } | ||
| 855 | |||
| 856 | /* | ||
| 857 | * This function performs all gdbserial command procesing | ||
| 858 | */ | ||
| 859 | int gdb_serial_stub(struct kgdb_state *ks) | ||
| 860 | { | ||
| 861 | int error = 0; | ||
| 862 | int tmp; | ||
| 863 | |||
| 864 | /* Clear the out buffer. */ | ||
| 865 | memset(remcom_out_buffer, 0, sizeof(remcom_out_buffer)); | ||
| 866 | |||
| 867 | if (kgdb_connected) { | ||
| 868 | unsigned char thref[8]; | ||
| 869 | char *ptr; | ||
| 870 | |||
| 871 | /* Reply to host that an exception has occurred */ | ||
| 872 | ptr = remcom_out_buffer; | ||
| 873 | *ptr++ = 'T'; | ||
| 874 | ptr = pack_hex_byte(ptr, ks->signo); | ||
| 875 | ptr += strlen(strcpy(ptr, "thread:")); | ||
| 876 | int_to_threadref(thref, shadow_pid(current->pid)); | ||
| 877 | ptr = pack_threadid(ptr, thref); | ||
| 878 | *ptr++ = ';'; | ||
| 879 | put_packet(remcom_out_buffer); | ||
| 880 | } | ||
| 881 | |||
| 882 | kgdb_usethread = kgdb_info[ks->cpu].task; | ||
| 883 | ks->kgdb_usethreadid = shadow_pid(kgdb_info[ks->cpu].task->pid); | ||
| 884 | ks->pass_exception = 0; | ||
| 885 | |||
| 886 | while (1) { | ||
| 887 | error = 0; | ||
| 888 | |||
| 889 | /* Clear the out buffer. */ | ||
| 890 | memset(remcom_out_buffer, 0, sizeof(remcom_out_buffer)); | ||
| 891 | |||
| 892 | get_packet(remcom_in_buffer); | ||
| 893 | |||
| 894 | switch (remcom_in_buffer[0]) { | ||
| 895 | case '?': /* gdbserial status */ | ||
| 896 | gdb_cmd_status(ks); | ||
| 897 | break; | ||
| 898 | case 'g': /* return the value of the CPU registers */ | ||
| 899 | gdb_cmd_getregs(ks); | ||
| 900 | break; | ||
| 901 | case 'G': /* set the value of the CPU registers - return OK */ | ||
| 902 | gdb_cmd_setregs(ks); | ||
| 903 | break; | ||
| 904 | case 'm': /* mAA..AA,LLLL Read LLLL bytes at address AA..AA */ | ||
| 905 | gdb_cmd_memread(ks); | ||
| 906 | break; | ||
| 907 | case 'M': /* MAA..AA,LLLL: Write LLLL bytes at address AA..AA */ | ||
| 908 | gdb_cmd_memwrite(ks); | ||
| 909 | break; | ||
| 910 | case 'X': /* XAA..AA,LLLL: Write LLLL bytes at address AA..AA */ | ||
| 911 | gdb_cmd_binwrite(ks); | ||
| 912 | break; | ||
| 913 | /* kill or detach. KGDB should treat this like a | ||
| 914 | * continue. | ||
| 915 | */ | ||
| 916 | case 'D': /* Debugger detach */ | ||
| 917 | case 'k': /* Debugger detach via kill */ | ||
| 918 | gdb_cmd_detachkill(ks); | ||
| 919 | goto default_handle; | ||
| 920 | case 'R': /* Reboot */ | ||
| 921 | if (gdb_cmd_reboot(ks)) | ||
| 922 | goto default_handle; | ||
| 923 | break; | ||
| 924 | case 'q': /* query command */ | ||
| 925 | gdb_cmd_query(ks); | ||
| 926 | break; | ||
| 927 | case 'H': /* task related */ | ||
| 928 | gdb_cmd_task(ks); | ||
| 929 | break; | ||
| 930 | case 'T': /* Query thread status */ | ||
| 931 | gdb_cmd_thread(ks); | ||
| 932 | break; | ||
| 933 | case 'z': /* Break point remove */ | ||
| 934 | case 'Z': /* Break point set */ | ||
| 935 | gdb_cmd_break(ks); | ||
| 936 | break; | ||
| 937 | #ifdef CONFIG_KGDB_KDB | ||
| 938 | case '3': /* Escape into back into kdb */ | ||
| 939 | if (remcom_in_buffer[1] == '\0') { | ||
| 940 | gdb_cmd_detachkill(ks); | ||
| 941 | return DBG_PASS_EVENT; | ||
| 942 | } | ||
| 943 | #endif | ||
| 944 | case 'C': /* Exception passing */ | ||
| 945 | tmp = gdb_cmd_exception_pass(ks); | ||
| 946 | if (tmp > 0) | ||
| 947 | goto default_handle; | ||
| 948 | if (tmp == 0) | ||
| 949 | break; | ||
| 950 | /* Fall through on tmp < 0 */ | ||
| 951 | case 'c': /* Continue packet */ | ||
| 952 | case 's': /* Single step packet */ | ||
| 953 | if (kgdb_contthread && kgdb_contthread != current) { | ||
| 954 | /* Can't switch threads in kgdb */ | ||
| 955 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 956 | break; | ||
| 957 | } | ||
| 958 | dbg_activate_sw_breakpoints(); | ||
| 959 | /* Fall through to default processing */ | ||
| 960 | default: | ||
| 961 | default_handle: | ||
| 962 | error = kgdb_arch_handle_exception(ks->ex_vector, | ||
| 963 | ks->signo, | ||
| 964 | ks->err_code, | ||
| 965 | remcom_in_buffer, | ||
| 966 | remcom_out_buffer, | ||
| 967 | ks->linux_regs); | ||
| 968 | /* | ||
| 969 | * Leave cmd processing on error, detach, | ||
| 970 | * kill, continue, or single step. | ||
| 971 | */ | ||
| 972 | if (error >= 0 || remcom_in_buffer[0] == 'D' || | ||
| 973 | remcom_in_buffer[0] == 'k') { | ||
| 974 | error = 0; | ||
| 975 | goto kgdb_exit; | ||
| 976 | } | ||
| 977 | |||
| 978 | } | ||
| 979 | |||
| 980 | /* reply to the request */ | ||
| 981 | put_packet(remcom_out_buffer); | ||
| 982 | } | ||
| 983 | |||
| 984 | kgdb_exit: | ||
| 985 | if (ks->pass_exception) | ||
| 986 | error = 1; | ||
| 987 | return error; | ||
| 988 | } | ||
| 989 | |||
| 990 | int gdbstub_state(struct kgdb_state *ks, char *cmd) | ||
| 991 | { | ||
| 992 | int error; | ||
| 993 | |||
| 994 | switch (cmd[0]) { | ||
| 995 | case 'e': | ||
| 996 | error = kgdb_arch_handle_exception(ks->ex_vector, | ||
| 997 | ks->signo, | ||
| 998 | ks->err_code, | ||
| 999 | remcom_in_buffer, | ||
| 1000 | remcom_out_buffer, | ||
| 1001 | ks->linux_regs); | ||
| 1002 | return error; | ||
| 1003 | case 's': | ||
| 1004 | case 'c': | ||
| 1005 | strcpy(remcom_in_buffer, cmd); | ||
| 1006 | return 0; | ||
| 1007 | case '?': | ||
| 1008 | gdb_cmd_status(ks); | ||
| 1009 | break; | ||
| 1010 | case '\0': | ||
| 1011 | strcpy(remcom_out_buffer, ""); | ||
| 1012 | break; | ||
| 1013 | } | ||
| 1014 | dbg_io_ops->write_char('+'); | ||
| 1015 | put_packet(remcom_out_buffer); | ||
| 1016 | return 0; | ||
| 1017 | } | ||
diff --git a/kernel/debug/kdb/.gitignore b/kernel/debug/kdb/.gitignore new file mode 100644 index 000000000000..396d12eda9e8 --- /dev/null +++ b/kernel/debug/kdb/.gitignore | |||
| @@ -0,0 +1 @@ | |||
| gen-kdb_cmds.c | |||
diff --git a/kernel/debug/kdb/Makefile b/kernel/debug/kdb/Makefile new file mode 100644 index 000000000000..d4fc58f4b88d --- /dev/null +++ b/kernel/debug/kdb/Makefile | |||
| @@ -0,0 +1,25 @@ | |||
| 1 | # This file is subject to the terms and conditions of the GNU General Public | ||
| 2 | # License. See the file "COPYING" in the main directory of this archive | ||
| 3 | # for more details. | ||
| 4 | # | ||
| 5 | # Copyright (c) 1999-2004 Silicon Graphics, Inc. All Rights Reserved. | ||
| 6 | # Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 7 | # | ||
| 8 | |||
| 9 | CCVERSION := $(shell $(CC) -v 2>&1 | sed -ne '$$p') | ||
| 10 | obj-y := kdb_io.o kdb_main.o kdb_support.o kdb_bt.o gen-kdb_cmds.o kdb_bp.o kdb_debugger.o | ||
| 11 | obj-$(CONFIG_KDB_KEYBOARD) += kdb_keyboard.o | ||
| 12 | |||
| 13 | clean-files := gen-kdb_cmds.c | ||
| 14 | |||
| 15 | quiet_cmd_gen-kdb = GENKDB $@ | ||
| 16 | cmd_gen-kdb = $(AWK) 'BEGIN {print "\#include <linux/stddef.h>"; print "\#include <linux/init.h>"} \ | ||
| 17 | /^\#/{next} \ | ||
| 18 | /^[ \t]*$$/{next} \ | ||
| 19 | {gsub(/"/, "\\\"", $$0); \ | ||
| 20 | print "static __initdata char kdb_cmd" cmds++ "[] = \"" $$0 "\\n\";"} \ | ||
| 21 | END {print "extern char *kdb_cmds[]; char __initdata *kdb_cmds[] = {"; for (i = 0; i < cmds; ++i) {print " kdb_cmd" i ","}; print(" NULL\n};");}' \ | ||
| 22 | $(filter-out %/Makefile,$^) > $@# | ||
| 23 | |||
| 24 | $(obj)/gen-kdb_cmds.c: $(src)/kdb_cmds $(src)/Makefile | ||
| 25 | $(call cmd,gen-kdb) | ||
diff --git a/kernel/debug/kdb/kdb_bp.c b/kernel/debug/kdb/kdb_bp.c new file mode 100644 index 000000000000..75bd9b3ebbb7 --- /dev/null +++ b/kernel/debug/kdb/kdb_bp.c | |||
| @@ -0,0 +1,564 @@ | |||
| 1 | /* | ||
| 2 | * Kernel Debugger Architecture Independent Breakpoint Handler | ||
| 3 | * | ||
| 4 | * This file is subject to the terms and conditions of the GNU General Public | ||
| 5 | * License. See the file "COPYING" in the main directory of this archive | ||
| 6 | * for more details. | ||
| 7 | * | ||
| 8 | * Copyright (c) 1999-2004 Silicon Graphics, Inc. All Rights Reserved. | ||
| 9 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 10 | */ | ||
| 11 | |||
| 12 | #include <linux/string.h> | ||
| 13 | #include <linux/kernel.h> | ||
| 14 | #include <linux/init.h> | ||
| 15 | #include <linux/kdb.h> | ||
| 16 | #include <linux/kgdb.h> | ||
| 17 | #include <linux/smp.h> | ||
| 18 | #include <linux/sched.h> | ||
| 19 | #include <linux/interrupt.h> | ||
| 20 | #include "kdb_private.h" | ||
| 21 | |||
| 22 | /* | ||
| 23 | * Table of kdb_breakpoints | ||
| 24 | */ | ||
| 25 | kdb_bp_t kdb_breakpoints[KDB_MAXBPT]; | ||
| 26 | |||
| 27 | static void kdb_setsinglestep(struct pt_regs *regs) | ||
| 28 | { | ||
| 29 | KDB_STATE_SET(DOING_SS); | ||
| 30 | } | ||
| 31 | |||
| 32 | static char *kdb_rwtypes[] = { | ||
| 33 | "Instruction(i)", | ||
| 34 | "Instruction(Register)", | ||
| 35 | "Data Write", | ||
| 36 | "I/O", | ||
| 37 | "Data Access" | ||
| 38 | }; | ||
| 39 | |||
| 40 | static char *kdb_bptype(kdb_bp_t *bp) | ||
| 41 | { | ||
| 42 | if (bp->bp_type < 0 || bp->bp_type > 4) | ||
| 43 | return ""; | ||
| 44 | |||
| 45 | return kdb_rwtypes[bp->bp_type]; | ||
| 46 | } | ||
| 47 | |||
| 48 | static int kdb_parsebp(int argc, const char **argv, int *nextargp, kdb_bp_t *bp) | ||
| 49 | { | ||
| 50 | int nextarg = *nextargp; | ||
| 51 | int diag; | ||
| 52 | |||
| 53 | bp->bph_length = 1; | ||
| 54 | if ((argc + 1) != nextarg) { | ||
| 55 | if (strnicmp(argv[nextarg], "datar", sizeof("datar")) == 0) | ||
| 56 | bp->bp_type = BP_ACCESS_WATCHPOINT; | ||
| 57 | else if (strnicmp(argv[nextarg], "dataw", sizeof("dataw")) == 0) | ||
| 58 | bp->bp_type = BP_WRITE_WATCHPOINT; | ||
| 59 | else if (strnicmp(argv[nextarg], "inst", sizeof("inst")) == 0) | ||
| 60 | bp->bp_type = BP_HARDWARE_BREAKPOINT; | ||
| 61 | else | ||
| 62 | return KDB_ARGCOUNT; | ||
| 63 | |||
| 64 | bp->bph_length = 1; | ||
| 65 | |||
| 66 | nextarg++; | ||
| 67 | |||
| 68 | if ((argc + 1) != nextarg) { | ||
| 69 | unsigned long len; | ||
| 70 | |||
| 71 | diag = kdbgetularg((char *)argv[nextarg], | ||
| 72 | &len); | ||
| 73 | if (diag) | ||
| 74 | return diag; | ||
| 75 | |||
| 76 | |||
| 77 | if (len > 8) | ||
| 78 | return KDB_BADLENGTH; | ||
| 79 | |||
| 80 | bp->bph_length = len; | ||
| 81 | nextarg++; | ||
| 82 | } | ||
| 83 | |||
| 84 | if ((argc + 1) != nextarg) | ||
| 85 | return KDB_ARGCOUNT; | ||
| 86 | } | ||
| 87 | |||
| 88 | *nextargp = nextarg; | ||
| 89 | return 0; | ||
| 90 | } | ||
| 91 | |||
| 92 | static int _kdb_bp_remove(kdb_bp_t *bp) | ||
| 93 | { | ||
| 94 | int ret = 1; | ||
| 95 | if (!bp->bp_installed) | ||
| 96 | return ret; | ||
| 97 | if (!bp->bp_type) | ||
| 98 | ret = dbg_remove_sw_break(bp->bp_addr); | ||
| 99 | else | ||
| 100 | ret = arch_kgdb_ops.remove_hw_breakpoint(bp->bp_addr, | ||
| 101 | bp->bph_length, | ||
| 102 | bp->bp_type); | ||
| 103 | if (ret == 0) | ||
| 104 | bp->bp_installed = 0; | ||
| 105 | return ret; | ||
| 106 | } | ||
| 107 | |||
| 108 | static void kdb_handle_bp(struct pt_regs *regs, kdb_bp_t *bp) | ||
| 109 | { | ||
| 110 | if (KDB_DEBUG(BP)) | ||
| 111 | kdb_printf("regs->ip = 0x%lx\n", instruction_pointer(regs)); | ||
| 112 | |||
| 113 | /* | ||
| 114 | * Setup single step | ||
| 115 | */ | ||
| 116 | kdb_setsinglestep(regs); | ||
| 117 | |||
| 118 | /* | ||
| 119 | * Reset delay attribute | ||
| 120 | */ | ||
| 121 | bp->bp_delay = 0; | ||
| 122 | bp->bp_delayed = 1; | ||
| 123 | } | ||
| 124 | |||
| 125 | static int _kdb_bp_install(struct pt_regs *regs, kdb_bp_t *bp) | ||
| 126 | { | ||
| 127 | int ret; | ||
| 128 | /* | ||
| 129 | * Install the breakpoint, if it is not already installed. | ||
| 130 | */ | ||
| 131 | |||
| 132 | if (KDB_DEBUG(BP)) | ||
| 133 | kdb_printf("%s: bp_installed %d\n", | ||
| 134 | __func__, bp->bp_installed); | ||
| 135 | if (!KDB_STATE(SSBPT)) | ||
| 136 | bp->bp_delay = 0; | ||
| 137 | if (bp->bp_installed) | ||
| 138 | return 1; | ||
| 139 | if (bp->bp_delay || (bp->bp_delayed && KDB_STATE(DOING_SS))) { | ||
| 140 | if (KDB_DEBUG(BP)) | ||
| 141 | kdb_printf("%s: delayed bp\n", __func__); | ||
| 142 | kdb_handle_bp(regs, bp); | ||
| 143 | return 0; | ||
| 144 | } | ||
| 145 | if (!bp->bp_type) | ||
| 146 | ret = dbg_set_sw_break(bp->bp_addr); | ||
| 147 | else | ||
| 148 | ret = arch_kgdb_ops.set_hw_breakpoint(bp->bp_addr, | ||
| 149 | bp->bph_length, | ||
| 150 | bp->bp_type); | ||
| 151 | if (ret == 0) { | ||
| 152 | bp->bp_installed = 1; | ||
| 153 | } else { | ||
| 154 | kdb_printf("%s: failed to set breakpoint at 0x%lx\n", | ||
| 155 | __func__, bp->bp_addr); | ||
| 156 | return 1; | ||
| 157 | } | ||
| 158 | return 0; | ||
| 159 | } | ||
| 160 | |||
| 161 | /* | ||
| 162 | * kdb_bp_install | ||
| 163 | * | ||
| 164 | * Install kdb_breakpoints prior to returning from the | ||
| 165 | * kernel debugger. This allows the kdb_breakpoints to be set | ||
| 166 | * upon functions that are used internally by kdb, such as | ||
| 167 | * printk(). This function is only called once per kdb session. | ||
| 168 | */ | ||
| 169 | void kdb_bp_install(struct pt_regs *regs) | ||
| 170 | { | ||
| 171 | int i; | ||
| 172 | |||
| 173 | for (i = 0; i < KDB_MAXBPT; i++) { | ||
| 174 | kdb_bp_t *bp = &kdb_breakpoints[i]; | ||
| 175 | |||
| 176 | if (KDB_DEBUG(BP)) { | ||
| 177 | kdb_printf("%s: bp %d bp_enabled %d\n", | ||
| 178 | __func__, i, bp->bp_enabled); | ||
| 179 | } | ||
| 180 | if (bp->bp_enabled) | ||
| 181 | _kdb_bp_install(regs, bp); | ||
| 182 | } | ||
| 183 | } | ||
| 184 | |||
| 185 | /* | ||
| 186 | * kdb_bp_remove | ||
| 187 | * | ||
| 188 | * Remove kdb_breakpoints upon entry to the kernel debugger. | ||
| 189 | * | ||
| 190 | * Parameters: | ||
| 191 | * None. | ||
| 192 | * Outputs: | ||
| 193 | * None. | ||
| 194 | * Returns: | ||
| 195 | * None. | ||
| 196 | * Locking: | ||
| 197 | * None. | ||
| 198 | * Remarks: | ||
| 199 | */ | ||
| 200 | void kdb_bp_remove(void) | ||
| 201 | { | ||
| 202 | int i; | ||
| 203 | |||
| 204 | for (i = KDB_MAXBPT - 1; i >= 0; i--) { | ||
| 205 | kdb_bp_t *bp = &kdb_breakpoints[i]; | ||
| 206 | |||
| 207 | if (KDB_DEBUG(BP)) { | ||
| 208 | kdb_printf("%s: bp %d bp_enabled %d\n", | ||
| 209 | __func__, i, bp->bp_enabled); | ||
| 210 | } | ||
| 211 | if (bp->bp_enabled) | ||
| 212 | _kdb_bp_remove(bp); | ||
| 213 | } | ||
| 214 | } | ||
| 215 | |||
| 216 | |||
| 217 | /* | ||
| 218 | * kdb_printbp | ||
| 219 | * | ||
| 220 | * Internal function to format and print a breakpoint entry. | ||
| 221 | * | ||
| 222 | * Parameters: | ||
| 223 | * None. | ||
| 224 | * Outputs: | ||
| 225 | * None. | ||
| 226 | * Returns: | ||
| 227 | * None. | ||
| 228 | * Locking: | ||
| 229 | * None. | ||
| 230 | * Remarks: | ||
| 231 | */ | ||
| 232 | |||
| 233 | static void kdb_printbp(kdb_bp_t *bp, int i) | ||
| 234 | { | ||
| 235 | kdb_printf("%s ", kdb_bptype(bp)); | ||
| 236 | kdb_printf("BP #%d at ", i); | ||
| 237 | kdb_symbol_print(bp->bp_addr, NULL, KDB_SP_DEFAULT); | ||
| 238 | |||
| 239 | if (bp->bp_enabled) | ||
| 240 | kdb_printf("\n is enabled"); | ||
| 241 | else | ||
| 242 | kdb_printf("\n is disabled"); | ||
| 243 | |||
| 244 | kdb_printf("\taddr at %016lx, hardtype=%d installed=%d\n", | ||
| 245 | bp->bp_addr, bp->bp_type, bp->bp_installed); | ||
| 246 | |||
| 247 | kdb_printf("\n"); | ||
| 248 | } | ||
| 249 | |||
| 250 | /* | ||
| 251 | * kdb_bp | ||
| 252 | * | ||
| 253 | * Handle the bp commands. | ||
| 254 | * | ||
| 255 | * [bp|bph] <addr-expression> [DATAR|DATAW] | ||
| 256 | * | ||
| 257 | * Parameters: | ||
| 258 | * argc Count of arguments in argv | ||
| 259 | * argv Space delimited command line arguments | ||
| 260 | * Outputs: | ||
| 261 | * None. | ||
| 262 | * Returns: | ||
| 263 | * Zero for success, a kdb diagnostic if failure. | ||
| 264 | * Locking: | ||
| 265 | * None. | ||
| 266 | * Remarks: | ||
| 267 | * | ||
| 268 | * bp Set breakpoint on all cpus. Only use hardware assist if need. | ||
| 269 | * bph Set breakpoint on all cpus. Force hardware register | ||
| 270 | */ | ||
| 271 | |||
| 272 | static int kdb_bp(int argc, const char **argv) | ||
| 273 | { | ||
| 274 | int i, bpno; | ||
| 275 | kdb_bp_t *bp, *bp_check; | ||
| 276 | int diag; | ||
| 277 | int free; | ||
| 278 | char *symname = NULL; | ||
| 279 | long offset = 0ul; | ||
| 280 | int nextarg; | ||
| 281 | kdb_bp_t template = {0}; | ||
| 282 | |||
| 283 | if (argc == 0) { | ||
| 284 | /* | ||
| 285 | * Display breakpoint table | ||
| 286 | */ | ||
| 287 | for (bpno = 0, bp = kdb_breakpoints; bpno < KDB_MAXBPT; | ||
| 288 | bpno++, bp++) { | ||
| 289 | if (bp->bp_free) | ||
| 290 | continue; | ||
| 291 | kdb_printbp(bp, bpno); | ||
| 292 | } | ||
| 293 | |||
| 294 | return 0; | ||
| 295 | } | ||
| 296 | |||
| 297 | nextarg = 1; | ||
| 298 | diag = kdbgetaddrarg(argc, argv, &nextarg, &template.bp_addr, | ||
| 299 | &offset, &symname); | ||
| 300 | if (diag) | ||
| 301 | return diag; | ||
| 302 | if (!template.bp_addr) | ||
| 303 | return KDB_BADINT; | ||
| 304 | |||
| 305 | /* | ||
| 306 | * Find an empty bp structure to allocate | ||
| 307 | */ | ||
| 308 | free = KDB_MAXBPT; | ||
| 309 | for (bpno = 0, bp = kdb_breakpoints; bpno < KDB_MAXBPT; bpno++, bp++) { | ||
| 310 | if (bp->bp_free) | ||
| 311 | break; | ||
| 312 | } | ||
| 313 | |||
| 314 | if (bpno == KDB_MAXBPT) | ||
| 315 | return KDB_TOOMANYBPT; | ||
| 316 | |||
| 317 | if (strcmp(argv[0], "bph") == 0) { | ||
| 318 | template.bp_type = BP_HARDWARE_BREAKPOINT; | ||
| 319 | diag = kdb_parsebp(argc, argv, &nextarg, &template); | ||
| 320 | if (diag) | ||
| 321 | return diag; | ||
| 322 | } else { | ||
| 323 | template.bp_type = BP_BREAKPOINT; | ||
| 324 | } | ||
| 325 | |||
| 326 | /* | ||
| 327 | * Check for clashing breakpoints. | ||
| 328 | * | ||
| 329 | * Note, in this design we can't have hardware breakpoints | ||
| 330 | * enabled for both read and write on the same address. | ||
| 331 | */ | ||
| 332 | for (i = 0, bp_check = kdb_breakpoints; i < KDB_MAXBPT; | ||
| 333 | i++, bp_check++) { | ||
| 334 | if (!bp_check->bp_free && | ||
| 335 | bp_check->bp_addr == template.bp_addr) { | ||
| 336 | kdb_printf("You already have a breakpoint at " | ||
| 337 | kdb_bfd_vma_fmt0 "\n", template.bp_addr); | ||
| 338 | return KDB_DUPBPT; | ||
| 339 | } | ||
| 340 | } | ||
| 341 | |||
| 342 | template.bp_enabled = 1; | ||
| 343 | |||
| 344 | /* | ||
| 345 | * Actually allocate the breakpoint found earlier | ||
| 346 | */ | ||
| 347 | *bp = template; | ||
| 348 | bp->bp_free = 0; | ||
| 349 | |||
| 350 | kdb_printbp(bp, bpno); | ||
| 351 | |||
| 352 | return 0; | ||
| 353 | } | ||
| 354 | |||
| 355 | /* | ||
| 356 | * kdb_bc | ||
| 357 | * | ||
| 358 | * Handles the 'bc', 'be', and 'bd' commands | ||
| 359 | * | ||
| 360 | * [bd|bc|be] <breakpoint-number> | ||
| 361 | * [bd|bc|be] * | ||
| 362 | * | ||
| 363 | * Parameters: | ||
| 364 | * argc Count of arguments in argv | ||
| 365 | * argv Space delimited command line arguments | ||
| 366 | * Outputs: | ||
| 367 | * None. | ||
| 368 | * Returns: | ||
| 369 | * Zero for success, a kdb diagnostic for failure | ||
| 370 | * Locking: | ||
| 371 | * None. | ||
| 372 | * Remarks: | ||
| 373 | */ | ||
| 374 | static int kdb_bc(int argc, const char **argv) | ||
| 375 | { | ||
| 376 | unsigned long addr; | ||
| 377 | kdb_bp_t *bp = NULL; | ||
| 378 | int lowbp = KDB_MAXBPT; | ||
| 379 | int highbp = 0; | ||
| 380 | int done = 0; | ||
| 381 | int i; | ||
| 382 | int diag = 0; | ||
| 383 | |||
| 384 | int cmd; /* KDBCMD_B? */ | ||
| 385 | #define KDBCMD_BC 0 | ||
| 386 | #define KDBCMD_BE 1 | ||
| 387 | #define KDBCMD_BD 2 | ||
| 388 | |||
| 389 | if (strcmp(argv[0], "be") == 0) | ||
| 390 | cmd = KDBCMD_BE; | ||
| 391 | else if (strcmp(argv[0], "bd") == 0) | ||
| 392 | cmd = KDBCMD_BD; | ||
| 393 | else | ||
| 394 | cmd = KDBCMD_BC; | ||
| 395 | |||
| 396 | if (argc != 1) | ||
| 397 | return KDB_ARGCOUNT; | ||
| 398 | |||
| 399 | if (strcmp(argv[1], "*") == 0) { | ||
| 400 | lowbp = 0; | ||
| 401 | highbp = KDB_MAXBPT; | ||
| 402 | } else { | ||
| 403 | diag = kdbgetularg(argv[1], &addr); | ||
| 404 | if (diag) | ||
| 405 | return diag; | ||
| 406 | |||
| 407 | /* | ||
| 408 | * For addresses less than the maximum breakpoint number, | ||
| 409 | * assume that the breakpoint number is desired. | ||
| 410 | */ | ||
| 411 | if (addr < KDB_MAXBPT) { | ||
| 412 | bp = &kdb_breakpoints[addr]; | ||
| 413 | lowbp = highbp = addr; | ||
| 414 | highbp++; | ||
| 415 | } else { | ||
| 416 | for (i = 0, bp = kdb_breakpoints; i < KDB_MAXBPT; | ||
| 417 | i++, bp++) { | ||
| 418 | if (bp->bp_addr == addr) { | ||
| 419 | lowbp = highbp = i; | ||
| 420 | highbp++; | ||
| 421 | break; | ||
| 422 | } | ||
| 423 | } | ||
| 424 | } | ||
| 425 | } | ||
| 426 | |||
| 427 | /* | ||
| 428 | * Now operate on the set of breakpoints matching the input | ||
| 429 | * criteria (either '*' for all, or an individual breakpoint). | ||
| 430 | */ | ||
| 431 | for (bp = &kdb_breakpoints[lowbp], i = lowbp; | ||
| 432 | i < highbp; | ||
| 433 | i++, bp++) { | ||
| 434 | if (bp->bp_free) | ||
| 435 | continue; | ||
| 436 | |||
| 437 | done++; | ||
| 438 | |||
| 439 | switch (cmd) { | ||
| 440 | case KDBCMD_BC: | ||
| 441 | bp->bp_enabled = 0; | ||
| 442 | |||
| 443 | kdb_printf("Breakpoint %d at " | ||
| 444 | kdb_bfd_vma_fmt " cleared\n", | ||
| 445 | i, bp->bp_addr); | ||
| 446 | |||
| 447 | bp->bp_addr = 0; | ||
| 448 | bp->bp_free = 1; | ||
| 449 | |||
| 450 | break; | ||
| 451 | case KDBCMD_BE: | ||
| 452 | bp->bp_enabled = 1; | ||
| 453 | |||
| 454 | kdb_printf("Breakpoint %d at " | ||
| 455 | kdb_bfd_vma_fmt " enabled", | ||
| 456 | i, bp->bp_addr); | ||
| 457 | |||
| 458 | kdb_printf("\n"); | ||
| 459 | break; | ||
| 460 | case KDBCMD_BD: | ||
| 461 | if (!bp->bp_enabled) | ||
| 462 | break; | ||
| 463 | |||
| 464 | bp->bp_enabled = 0; | ||
| 465 | |||
| 466 | kdb_printf("Breakpoint %d at " | ||
| 467 | kdb_bfd_vma_fmt " disabled\n", | ||
| 468 | i, bp->bp_addr); | ||
| 469 | |||
| 470 | break; | ||
| 471 | } | ||
| 472 | if (bp->bp_delay && (cmd == KDBCMD_BC || cmd == KDBCMD_BD)) { | ||
| 473 | bp->bp_delay = 0; | ||
| 474 | KDB_STATE_CLEAR(SSBPT); | ||
| 475 | } | ||
| 476 | } | ||
| 477 | |||
| 478 | return (!done) ? KDB_BPTNOTFOUND : 0; | ||
| 479 | } | ||
| 480 | |||
| 481 | /* | ||
| 482 | * kdb_ss | ||
| 483 | * | ||
| 484 | * Process the 'ss' (Single Step) and 'ssb' (Single Step to Branch) | ||
| 485 | * commands. | ||
| 486 | * | ||
| 487 | * ss | ||
| 488 | * ssb | ||
| 489 | * | ||
| 490 | * Parameters: | ||
| 491 | * argc Argument count | ||
| 492 | * argv Argument vector | ||
| 493 | * Outputs: | ||
| 494 | * None. | ||
| 495 | * Returns: | ||
| 496 | * KDB_CMD_SS[B] for success, a kdb error if failure. | ||
| 497 | * Locking: | ||
| 498 | * None. | ||
| 499 | * Remarks: | ||
| 500 | * | ||
| 501 | * Set the arch specific option to trigger a debug trap after the next | ||
| 502 | * instruction. | ||
| 503 | * | ||
| 504 | * For 'ssb', set the trace flag in the debug trap handler | ||
| 505 | * after printing the current insn and return directly without | ||
| 506 | * invoking the kdb command processor, until a branch instruction | ||
| 507 | * is encountered. | ||
| 508 | */ | ||
| 509 | |||
| 510 | static int kdb_ss(int argc, const char **argv) | ||
| 511 | { | ||
| 512 | int ssb = 0; | ||
| 513 | |||
| 514 | ssb = (strcmp(argv[0], "ssb") == 0); | ||
| 515 | if (argc != 0) | ||
| 516 | return KDB_ARGCOUNT; | ||
| 517 | /* | ||
| 518 | * Set trace flag and go. | ||
| 519 | */ | ||
| 520 | KDB_STATE_SET(DOING_SS); | ||
| 521 | if (ssb) { | ||
| 522 | KDB_STATE_SET(DOING_SSB); | ||
| 523 | return KDB_CMD_SSB; | ||
| 524 | } | ||
| 525 | return KDB_CMD_SS; | ||
| 526 | } | ||
| 527 | |||
| 528 | /* Initialize the breakpoint table and register breakpoint commands. */ | ||
| 529 | |||
| 530 | void __init kdb_initbptab(void) | ||
| 531 | { | ||
| 532 | int i; | ||
| 533 | kdb_bp_t *bp; | ||
| 534 | |||
| 535 | /* | ||
| 536 | * First time initialization. | ||
| 537 | */ | ||
| 538 | memset(&kdb_breakpoints, '\0', sizeof(kdb_breakpoints)); | ||
| 539 | |||
| 540 | for (i = 0, bp = kdb_breakpoints; i < KDB_MAXBPT; i++, bp++) | ||
| 541 | bp->bp_free = 1; | ||
| 542 | |||
| 543 | kdb_register_repeat("bp", kdb_bp, "[<vaddr>]", | ||
| 544 | "Set/Display breakpoints", 0, KDB_REPEAT_NO_ARGS); | ||
| 545 | kdb_register_repeat("bl", kdb_bp, "[<vaddr>]", | ||
| 546 | "Display breakpoints", 0, KDB_REPEAT_NO_ARGS); | ||
| 547 | if (arch_kgdb_ops.flags & KGDB_HW_BREAKPOINT) | ||
| 548 | kdb_register_repeat("bph", kdb_bp, "[<vaddr>]", | ||
| 549 | "[datar [length]|dataw [length]] Set hw brk", 0, KDB_REPEAT_NO_ARGS); | ||
| 550 | kdb_register_repeat("bc", kdb_bc, "<bpnum>", | ||
| 551 | "Clear Breakpoint", 0, KDB_REPEAT_NONE); | ||
| 552 | kdb_register_repeat("be", kdb_bc, "<bpnum>", | ||
| 553 | "Enable Breakpoint", 0, KDB_REPEAT_NONE); | ||
| 554 | kdb_register_repeat("bd", kdb_bc, "<bpnum>", | ||
| 555 | "Disable Breakpoint", 0, KDB_REPEAT_NONE); | ||
| 556 | |||
| 557 | kdb_register_repeat("ss", kdb_ss, "", | ||
| 558 | "Single Step", 1, KDB_REPEAT_NO_ARGS); | ||
| 559 | kdb_register_repeat("ssb", kdb_ss, "", | ||
| 560 | "Single step to branch/call", 0, KDB_REPEAT_NO_ARGS); | ||
| 561 | /* | ||
| 562 | * Architecture dependent initialization. | ||
| 563 | */ | ||
| 564 | } | ||
diff --git a/kernel/debug/kdb/kdb_bt.c b/kernel/debug/kdb/kdb_bt.c new file mode 100644 index 000000000000..2f62fe85f16a --- /dev/null +++ b/kernel/debug/kdb/kdb_bt.c | |||
| @@ -0,0 +1,210 @@ | |||
| 1 | /* | ||
| 2 | * Kernel Debugger Architecture Independent Stack Traceback | ||
| 3 | * | ||
| 4 | * This file is subject to the terms and conditions of the GNU General Public | ||
| 5 | * License. See the file "COPYING" in the main directory of this archive | ||
| 6 | * for more details. | ||
| 7 | * | ||
| 8 | * Copyright (c) 1999-2004 Silicon Graphics, Inc. All Rights Reserved. | ||
| 9 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 10 | */ | ||
| 11 | |||
| 12 | #include <linux/ctype.h> | ||
| 13 | #include <linux/string.h> | ||
| 14 | #include <linux/kernel.h> | ||
| 15 | #include <linux/sched.h> | ||
| 16 | #include <linux/kdb.h> | ||
| 17 | #include <linux/nmi.h> | ||
| 18 | #include <asm/system.h> | ||
| 19 | #include "kdb_private.h" | ||
| 20 | |||
| 21 | |||
| 22 | static void kdb_show_stack(struct task_struct *p, void *addr) | ||
| 23 | { | ||
| 24 | int old_lvl = console_loglevel; | ||
| 25 | console_loglevel = 15; | ||
| 26 | kdb_trap_printk++; | ||
| 27 | kdb_set_current_task(p); | ||
| 28 | if (addr) { | ||
| 29 | show_stack((struct task_struct *)p, addr); | ||
| 30 | } else if (kdb_current_regs) { | ||
| 31 | #ifdef CONFIG_X86 | ||
| 32 | show_stack(p, &kdb_current_regs->sp); | ||
| 33 | #else | ||
| 34 | show_stack(p, NULL); | ||
| 35 | #endif | ||
| 36 | } else { | ||
| 37 | show_stack(p, NULL); | ||
| 38 | } | ||
| 39 | console_loglevel = old_lvl; | ||
| 40 | kdb_trap_printk--; | ||
| 41 | } | ||
| 42 | |||
| 43 | /* | ||
| 44 | * kdb_bt | ||
| 45 | * | ||
| 46 | * This function implements the 'bt' command. Print a stack | ||
| 47 | * traceback. | ||
| 48 | * | ||
| 49 | * bt [<address-expression>] (addr-exp is for alternate stacks) | ||
| 50 | * btp <pid> Kernel stack for <pid> | ||
| 51 | * btt <address-expression> Kernel stack for task structure at | ||
| 52 | * <address-expression> | ||
| 53 | * bta [DRSTCZEUIMA] All useful processes, optionally | ||
| 54 | * filtered by state | ||
| 55 | * btc [<cpu>] The current process on one cpu, | ||
| 56 | * default is all cpus | ||
| 57 | * | ||
| 58 | * bt <address-expression> refers to a address on the stack, that location | ||
| 59 | * is assumed to contain a return address. | ||
| 60 | * | ||
| 61 | * btt <address-expression> refers to the address of a struct task. | ||
| 62 | * | ||
| 63 | * Inputs: | ||
| 64 | * argc argument count | ||
| 65 | * argv argument vector | ||
| 66 | * Outputs: | ||
| 67 | * None. | ||
| 68 | * Returns: | ||
| 69 | * zero for success, a kdb diagnostic if error | ||
| 70 | * Locking: | ||
| 71 | * none. | ||
| 72 | * Remarks: | ||
| 73 | * Backtrack works best when the code uses frame pointers. But even | ||
| 74 | * without frame pointers we should get a reasonable trace. | ||
| 75 | * | ||
| 76 | * mds comes in handy when examining the stack to do a manual traceback or | ||
| 77 | * to get a starting point for bt <address-expression>. | ||
| 78 | */ | ||
| 79 | |||
| 80 | static int | ||
| 81 | kdb_bt1(struct task_struct *p, unsigned long mask, | ||
| 82 | int argcount, int btaprompt) | ||
| 83 | { | ||
| 84 | char buffer[2]; | ||
| 85 | if (kdb_getarea(buffer[0], (unsigned long)p) || | ||
| 86 | kdb_getarea(buffer[0], (unsigned long)(p+1)-1)) | ||
| 87 | return KDB_BADADDR; | ||
| 88 | if (!kdb_task_state(p, mask)) | ||
| 89 | return 0; | ||
| 90 | kdb_printf("Stack traceback for pid %d\n", p->pid); | ||
| 91 | kdb_ps1(p); | ||
| 92 | kdb_show_stack(p, NULL); | ||
| 93 | if (btaprompt) { | ||
| 94 | kdb_getstr(buffer, sizeof(buffer), | ||
| 95 | "Enter <q> to end, <cr> to continue:"); | ||
| 96 | if (buffer[0] == 'q') { | ||
| 97 | kdb_printf("\n"); | ||
| 98 | return 1; | ||
| 99 | } | ||
| 100 | } | ||
| 101 | touch_nmi_watchdog(); | ||
| 102 | return 0; | ||
| 103 | } | ||
| 104 | |||
| 105 | int | ||
| 106 | kdb_bt(int argc, const char **argv) | ||
| 107 | { | ||
| 108 | int diag; | ||
| 109 | int argcount = 5; | ||
| 110 | int btaprompt = 1; | ||
| 111 | int nextarg; | ||
| 112 | unsigned long addr; | ||
| 113 | long offset; | ||
| 114 | |||
| 115 | kdbgetintenv("BTARGS", &argcount); /* Arguments to print */ | ||
| 116 | kdbgetintenv("BTAPROMPT", &btaprompt); /* Prompt after each | ||
| 117 | * proc in bta */ | ||
| 118 | |||
| 119 | if (strcmp(argv[0], "bta") == 0) { | ||
| 120 | struct task_struct *g, *p; | ||
| 121 | unsigned long cpu; | ||
| 122 | unsigned long mask = kdb_task_state_string(argc ? argv[1] : | ||
| 123 | NULL); | ||
| 124 | if (argc == 0) | ||
| 125 | kdb_ps_suppressed(); | ||
| 126 | /* Run the active tasks first */ | ||
| 127 | for_each_online_cpu(cpu) { | ||
| 128 | p = kdb_curr_task(cpu); | ||
| 129 | if (kdb_bt1(p, mask, argcount, btaprompt)) | ||
| 130 | return 0; | ||
| 131 | } | ||
| 132 | /* Now the inactive tasks */ | ||
| 133 | kdb_do_each_thread(g, p) { | ||
| 134 | if (task_curr(p)) | ||
| 135 | continue; | ||
| 136 | if (kdb_bt1(p, mask, argcount, btaprompt)) | ||
| 137 | return 0; | ||
| 138 | } kdb_while_each_thread(g, p); | ||
| 139 | } else if (strcmp(argv[0], "btp") == 0) { | ||
| 140 | struct task_struct *p; | ||
| 141 | unsigned long pid; | ||
| 142 | if (argc != 1) | ||
| 143 | return KDB_ARGCOUNT; | ||
| 144 | diag = kdbgetularg((char *)argv[1], &pid); | ||
| 145 | if (diag) | ||
| 146 | return diag; | ||
| 147 | p = find_task_by_pid_ns(pid, &init_pid_ns); | ||
| 148 | if (p) { | ||
| 149 | kdb_set_current_task(p); | ||
| 150 | return kdb_bt1(p, ~0UL, argcount, 0); | ||
| 151 | } | ||
| 152 | kdb_printf("No process with pid == %ld found\n", pid); | ||
| 153 | return 0; | ||
| 154 | } else if (strcmp(argv[0], "btt") == 0) { | ||
| 155 | if (argc != 1) | ||
| 156 | return KDB_ARGCOUNT; | ||
| 157 | diag = kdbgetularg((char *)argv[1], &addr); | ||
| 158 | if (diag) | ||
| 159 | return diag; | ||
| 160 | kdb_set_current_task((struct task_struct *)addr); | ||
| 161 | return kdb_bt1((struct task_struct *)addr, ~0UL, argcount, 0); | ||
| 162 | } else if (strcmp(argv[0], "btc") == 0) { | ||
| 163 | unsigned long cpu = ~0; | ||
| 164 | struct task_struct *save_current_task = kdb_current_task; | ||
| 165 | char buf[80]; | ||
| 166 | if (argc > 1) | ||
| 167 | return KDB_ARGCOUNT; | ||
| 168 | if (argc == 1) { | ||
| 169 | diag = kdbgetularg((char *)argv[1], &cpu); | ||
| 170 | if (diag) | ||
| 171 | return diag; | ||
| 172 | } | ||
| 173 | /* Recursive use of kdb_parse, do not use argv after | ||
| 174 | * this point */ | ||
| 175 | argv = NULL; | ||
| 176 | if (cpu != ~0) { | ||
| 177 | if (cpu >= num_possible_cpus() || !cpu_online(cpu)) { | ||
| 178 | kdb_printf("no process for cpu %ld\n", cpu); | ||
| 179 | return 0; | ||
| 180 | } | ||
| 181 | sprintf(buf, "btt 0x%p\n", KDB_TSK(cpu)); | ||
| 182 | kdb_parse(buf); | ||
| 183 | return 0; | ||
| 184 | } | ||
| 185 | kdb_printf("btc: cpu status: "); | ||
| 186 | kdb_parse("cpu\n"); | ||
| 187 | for_each_online_cpu(cpu) { | ||
| 188 | sprintf(buf, "btt 0x%p\n", KDB_TSK(cpu)); | ||
| 189 | kdb_parse(buf); | ||
| 190 | touch_nmi_watchdog(); | ||
| 191 | } | ||
| 192 | kdb_set_current_task(save_current_task); | ||
| 193 | return 0; | ||
| 194 | } else { | ||
| 195 | if (argc) { | ||
| 196 | nextarg = 1; | ||
| 197 | diag = kdbgetaddrarg(argc, argv, &nextarg, &addr, | ||
| 198 | &offset, NULL); | ||
| 199 | if (diag) | ||
| 200 | return diag; | ||
| 201 | kdb_show_stack(kdb_current_task, (void *)addr); | ||
| 202 | return 0; | ||
| 203 | } else { | ||
| 204 | return kdb_bt1(kdb_current_task, ~0UL, argcount, 0); | ||
| 205 | } | ||
| 206 | } | ||
| 207 | |||
| 208 | /* NOTREACHED */ | ||
| 209 | return 0; | ||
| 210 | } | ||
diff --git a/kernel/debug/kdb/kdb_cmds b/kernel/debug/kdb/kdb_cmds new file mode 100644 index 000000000000..56c88e4db309 --- /dev/null +++ b/kernel/debug/kdb/kdb_cmds | |||
| @@ -0,0 +1,35 @@ | |||
| 1 | # Initial commands for kdb, alter to suit your needs. | ||
| 2 | # These commands are executed in kdb_init() context, no SMP, no | ||
| 3 | # processes. Commands that require process data (including stack or | ||
| 4 | # registers) are not reliable this early. set and bp commands should | ||
| 5 | # be safe. Global breakpoint commands affect each cpu as it is booted. | ||
| 6 | |||
| 7 | # Standard debugging information for first level support, just type archkdb | ||
| 8 | # or archkdbcpu or archkdbshort at the kdb prompt. | ||
| 9 | |||
| 10 | defcmd dumpcommon "" "Common kdb debugging" | ||
| 11 | set BTAPROMPT 0 | ||
| 12 | set LINES 10000 | ||
| 13 | -summary | ||
| 14 | -cpu | ||
| 15 | -ps | ||
| 16 | -dmesg 600 | ||
| 17 | -bt | ||
| 18 | endefcmd | ||
| 19 | |||
| 20 | defcmd dumpall "" "First line debugging" | ||
| 21 | set BTSYMARG 1 | ||
| 22 | set BTARGS 9 | ||
| 23 | pid R | ||
| 24 | -dumpcommon | ||
| 25 | -bta | ||
| 26 | endefcmd | ||
| 27 | |||
| 28 | defcmd dumpcpu "" "Same as dumpall but only tasks on cpus" | ||
| 29 | set BTSYMARG 1 | ||
| 30 | set BTARGS 9 | ||
| 31 | pid R | ||
| 32 | -dumpcommon | ||
| 33 | -btc | ||
| 34 | endefcmd | ||
| 35 | |||
diff --git a/kernel/debug/kdb/kdb_debugger.c b/kernel/debug/kdb/kdb_debugger.c new file mode 100644 index 000000000000..bf6e8270e957 --- /dev/null +++ b/kernel/debug/kdb/kdb_debugger.c | |||
| @@ -0,0 +1,169 @@ | |||
| 1 | /* | ||
| 2 | * Created by: Jason Wessel <jason.wessel@windriver.com> | ||
| 3 | * | ||
| 4 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 5 | * | ||
| 6 | * This file is licensed under the terms of the GNU General Public | ||
| 7 | * License version 2. This program is licensed "as is" without any | ||
| 8 | * warranty of any kind, whether express or implied. | ||
| 9 | */ | ||
| 10 | |||
| 11 | #include <linux/kgdb.h> | ||
| 12 | #include <linux/kdb.h> | ||
| 13 | #include <linux/kdebug.h> | ||
| 14 | #include "kdb_private.h" | ||
| 15 | #include "../debug_core.h" | ||
| 16 | |||
| 17 | /* | ||
| 18 | * KDB interface to KGDB internals | ||
| 19 | */ | ||
| 20 | get_char_func kdb_poll_funcs[] = { | ||
| 21 | dbg_io_get_char, | ||
| 22 | NULL, | ||
| 23 | NULL, | ||
| 24 | NULL, | ||
| 25 | NULL, | ||
| 26 | NULL, | ||
| 27 | }; | ||
| 28 | EXPORT_SYMBOL_GPL(kdb_poll_funcs); | ||
| 29 | |||
| 30 | int kdb_poll_idx = 1; | ||
| 31 | EXPORT_SYMBOL_GPL(kdb_poll_idx); | ||
| 32 | |||
| 33 | int kdb_stub(struct kgdb_state *ks) | ||
| 34 | { | ||
| 35 | int error = 0; | ||
| 36 | kdb_bp_t *bp; | ||
| 37 | unsigned long addr = kgdb_arch_pc(ks->ex_vector, ks->linux_regs); | ||
| 38 | kdb_reason_t reason = KDB_REASON_OOPS; | ||
| 39 | kdb_dbtrap_t db_result = KDB_DB_NOBPT; | ||
| 40 | int i; | ||
| 41 | |||
| 42 | if (KDB_STATE(REENTRY)) { | ||
| 43 | reason = KDB_REASON_SWITCH; | ||
| 44 | KDB_STATE_CLEAR(REENTRY); | ||
| 45 | addr = instruction_pointer(ks->linux_regs); | ||
| 46 | } | ||
| 47 | ks->pass_exception = 0; | ||
| 48 | if (atomic_read(&kgdb_setting_breakpoint)) | ||
| 49 | reason = KDB_REASON_KEYBOARD; | ||
| 50 | |||
| 51 | for (i = 0, bp = kdb_breakpoints; i < KDB_MAXBPT; i++, bp++) { | ||
| 52 | if ((bp->bp_enabled) && (bp->bp_addr == addr)) { | ||
| 53 | reason = KDB_REASON_BREAK; | ||
| 54 | db_result = KDB_DB_BPT; | ||
| 55 | if (addr != instruction_pointer(ks->linux_regs)) | ||
| 56 | kgdb_arch_set_pc(ks->linux_regs, addr); | ||
| 57 | break; | ||
| 58 | } | ||
| 59 | } | ||
| 60 | if (reason == KDB_REASON_BREAK || reason == KDB_REASON_SWITCH) { | ||
| 61 | for (i = 0, bp = kdb_breakpoints; i < KDB_MAXBPT; i++, bp++) { | ||
| 62 | if (bp->bp_free) | ||
| 63 | continue; | ||
| 64 | if (bp->bp_addr == addr) { | ||
| 65 | bp->bp_delay = 1; | ||
| 66 | bp->bp_delayed = 1; | ||
| 67 | /* | ||
| 68 | * SSBPT is set when the kernel debugger must single step a | ||
| 69 | * task in order to re-establish an instruction breakpoint | ||
| 70 | * which uses the instruction replacement mechanism. It is | ||
| 71 | * cleared by any action that removes the need to single-step | ||
| 72 | * the breakpoint. | ||
| 73 | */ | ||
| 74 | reason = KDB_REASON_BREAK; | ||
| 75 | db_result = KDB_DB_BPT; | ||
| 76 | KDB_STATE_SET(SSBPT); | ||
| 77 | break; | ||
| 78 | } | ||
| 79 | } | ||
| 80 | } | ||
| 81 | |||
| 82 | if (reason != KDB_REASON_BREAK && ks->ex_vector == 0 && | ||
| 83 | ks->signo == SIGTRAP) { | ||
| 84 | reason = KDB_REASON_SSTEP; | ||
| 85 | db_result = KDB_DB_BPT; | ||
| 86 | } | ||
| 87 | /* Set initial kdb state variables */ | ||
| 88 | KDB_STATE_CLEAR(KGDB_TRANS); | ||
| 89 | kdb_initial_cpu = ks->cpu; | ||
| 90 | kdb_current_task = kgdb_info[ks->cpu].task; | ||
| 91 | kdb_current_regs = kgdb_info[ks->cpu].debuggerinfo; | ||
| 92 | /* Remove any breakpoints as needed by kdb and clear single step */ | ||
| 93 | kdb_bp_remove(); | ||
| 94 | KDB_STATE_CLEAR(DOING_SS); | ||
| 95 | KDB_STATE_CLEAR(DOING_SSB); | ||
| 96 | KDB_STATE_SET(PAGER); | ||
| 97 | /* zero out any offline cpu data */ | ||
| 98 | for_each_present_cpu(i) { | ||
| 99 | if (!cpu_online(i)) { | ||
| 100 | kgdb_info[i].debuggerinfo = NULL; | ||
| 101 | kgdb_info[i].task = NULL; | ||
| 102 | } | ||
| 103 | } | ||
| 104 | if (ks->err_code == DIE_OOPS || reason == KDB_REASON_OOPS) { | ||
| 105 | ks->pass_exception = 1; | ||
| 106 | KDB_FLAG_SET(CATASTROPHIC); | ||
| 107 | } | ||
| 108 | kdb_initial_cpu = ks->cpu; | ||
| 109 | if (KDB_STATE(SSBPT) && reason == KDB_REASON_SSTEP) { | ||
| 110 | KDB_STATE_CLEAR(SSBPT); | ||
| 111 | KDB_STATE_CLEAR(DOING_SS); | ||
| 112 | } else { | ||
| 113 | /* Start kdb main loop */ | ||
| 114 | error = kdb_main_loop(KDB_REASON_ENTER, reason, | ||
| 115 | ks->err_code, db_result, ks->linux_regs); | ||
| 116 | } | ||
| 117 | /* | ||
| 118 | * Upon exit from the kdb main loop setup break points and restart | ||
| 119 | * the system based on the requested continue state | ||
| 120 | */ | ||
| 121 | kdb_initial_cpu = -1; | ||
| 122 | kdb_current_task = NULL; | ||
| 123 | kdb_current_regs = NULL; | ||
| 124 | KDB_STATE_CLEAR(PAGER); | ||
| 125 | kdbnearsym_cleanup(); | ||
| 126 | if (error == KDB_CMD_KGDB) { | ||
| 127 | if (KDB_STATE(DOING_KGDB) || KDB_STATE(DOING_KGDB2)) { | ||
| 128 | /* | ||
| 129 | * This inteface glue which allows kdb to transition in into | ||
| 130 | * the gdb stub. In order to do this the '?' or '' gdb serial | ||
| 131 | * packet response is processed here. And then control is | ||
| 132 | * passed to the gdbstub. | ||
| 133 | */ | ||
| 134 | if (KDB_STATE(DOING_KGDB)) | ||
| 135 | gdbstub_state(ks, "?"); | ||
| 136 | else | ||
| 137 | gdbstub_state(ks, ""); | ||
| 138 | KDB_STATE_CLEAR(DOING_KGDB); | ||
| 139 | KDB_STATE_CLEAR(DOING_KGDB2); | ||
| 140 | } | ||
| 141 | return DBG_PASS_EVENT; | ||
| 142 | } | ||
| 143 | kdb_bp_install(ks->linux_regs); | ||
| 144 | dbg_activate_sw_breakpoints(); | ||
| 145 | /* Set the exit state to a single step or a continue */ | ||
| 146 | if (KDB_STATE(DOING_SS)) | ||
| 147 | gdbstub_state(ks, "s"); | ||
| 148 | else | ||
| 149 | gdbstub_state(ks, "c"); | ||
| 150 | |||
| 151 | KDB_FLAG_CLEAR(CATASTROPHIC); | ||
| 152 | |||
| 153 | /* Invoke arch specific exception handling prior to system resume */ | ||
| 154 | kgdb_info[ks->cpu].ret_state = gdbstub_state(ks, "e"); | ||
| 155 | if (ks->pass_exception) | ||
| 156 | kgdb_info[ks->cpu].ret_state = 1; | ||
| 157 | if (error == KDB_CMD_CPU) { | ||
| 158 | KDB_STATE_SET(REENTRY); | ||
| 159 | /* | ||
| 160 | * Force clear the single step bit because kdb emulates this | ||
| 161 | * differently vs the gdbstub | ||
| 162 | */ | ||
| 163 | kgdb_single_step = 0; | ||
| 164 | dbg_deactivate_sw_breakpoints(); | ||
| 165 | return DBG_SWITCH_CPU_EVENT; | ||
| 166 | } | ||
| 167 | return kgdb_info[ks->cpu].ret_state; | ||
| 168 | } | ||
| 169 | |||
diff --git a/kernel/debug/kdb/kdb_io.c b/kernel/debug/kdb/kdb_io.c new file mode 100644 index 000000000000..c9b7f4f90bba --- /dev/null +++ b/kernel/debug/kdb/kdb_io.c | |||
| @@ -0,0 +1,826 @@ | |||
| 1 | /* | ||
| 2 | * Kernel Debugger Architecture Independent Console I/O handler | ||
| 3 | * | ||
| 4 | * This file is subject to the terms and conditions of the GNU General Public | ||
| 5 | * License. See the file "COPYING" in the main directory of this archive | ||
| 6 | * for more details. | ||
| 7 | * | ||
| 8 | * Copyright (c) 1999-2006 Silicon Graphics, Inc. All Rights Reserved. | ||
| 9 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 10 | */ | ||
| 11 | |||
| 12 | #include <linux/module.h> | ||
| 13 | #include <linux/types.h> | ||
| 14 | #include <linux/ctype.h> | ||
| 15 | #include <linux/kernel.h> | ||
| 16 | #include <linux/init.h> | ||
| 17 | #include <linux/kdev_t.h> | ||
| 18 | #include <linux/console.h> | ||
| 19 | #include <linux/string.h> | ||
| 20 | #include <linux/sched.h> | ||
| 21 | #include <linux/smp.h> | ||
| 22 | #include <linux/nmi.h> | ||
| 23 | #include <linux/delay.h> | ||
| 24 | #include <linux/kgdb.h> | ||
| 25 | #include <linux/kdb.h> | ||
| 26 | #include <linux/kallsyms.h> | ||
| 27 | #include "kdb_private.h" | ||
| 28 | |||
| 29 | #define CMD_BUFLEN 256 | ||
| 30 | char kdb_prompt_str[CMD_BUFLEN]; | ||
| 31 | |||
| 32 | int kdb_trap_printk; | ||
| 33 | |||
| 34 | static void kgdb_transition_check(char *buffer) | ||
| 35 | { | ||
| 36 | int slen = strlen(buffer); | ||
| 37 | if (strncmp(buffer, "$?#3f", slen) != 0 && | ||
| 38 | strncmp(buffer, "$qSupported#37", slen) != 0 && | ||
| 39 | strncmp(buffer, "+$qSupported#37", slen) != 0) { | ||
| 40 | KDB_STATE_SET(KGDB_TRANS); | ||
| 41 | kdb_printf("%s", buffer); | ||
| 42 | } | ||
| 43 | } | ||
| 44 | |||
| 45 | static int kdb_read_get_key(char *buffer, size_t bufsize) | ||
| 46 | { | ||
| 47 | #define ESCAPE_UDELAY 1000 | ||
| 48 | #define ESCAPE_DELAY (2*1000000/ESCAPE_UDELAY) /* 2 seconds worth of udelays */ | ||
| 49 | char escape_data[5]; /* longest vt100 escape sequence is 4 bytes */ | ||
| 50 | char *ped = escape_data; | ||
| 51 | int escape_delay = 0; | ||
| 52 | get_char_func *f, *f_escape = NULL; | ||
| 53 | int key; | ||
| 54 | |||
| 55 | for (f = &kdb_poll_funcs[0]; ; ++f) { | ||
| 56 | if (*f == NULL) { | ||
| 57 | /* Reset NMI watchdog once per poll loop */ | ||
| 58 | touch_nmi_watchdog(); | ||
| 59 | f = &kdb_poll_funcs[0]; | ||
| 60 | } | ||
| 61 | if (escape_delay == 2) { | ||
| 62 | *ped = '\0'; | ||
| 63 | ped = escape_data; | ||
| 64 | --escape_delay; | ||
| 65 | } | ||
| 66 | if (escape_delay == 1) { | ||
| 67 | key = *ped++; | ||
| 68 | if (!*ped) | ||
| 69 | --escape_delay; | ||
| 70 | break; | ||
| 71 | } | ||
| 72 | key = (*f)(); | ||
| 73 | if (key == -1) { | ||
| 74 | if (escape_delay) { | ||
| 75 | udelay(ESCAPE_UDELAY); | ||
| 76 | --escape_delay; | ||
| 77 | } | ||
| 78 | continue; | ||
| 79 | } | ||
| 80 | if (bufsize <= 2) { | ||
| 81 | if (key == '\r') | ||
| 82 | key = '\n'; | ||
| 83 | *buffer++ = key; | ||
| 84 | *buffer = '\0'; | ||
| 85 | return -1; | ||
| 86 | } | ||
| 87 | if (escape_delay == 0 && key == '\e') { | ||
| 88 | escape_delay = ESCAPE_DELAY; | ||
| 89 | ped = escape_data; | ||
| 90 | f_escape = f; | ||
| 91 | } | ||
| 92 | if (escape_delay) { | ||
| 93 | *ped++ = key; | ||
| 94 | if (f_escape != f) { | ||
| 95 | escape_delay = 2; | ||
| 96 | continue; | ||
| 97 | } | ||
| 98 | if (ped - escape_data == 1) { | ||
| 99 | /* \e */ | ||
| 100 | continue; | ||
| 101 | } else if (ped - escape_data == 2) { | ||
| 102 | /* \e<something> */ | ||
| 103 | if (key != '[') | ||
| 104 | escape_delay = 2; | ||
| 105 | continue; | ||
| 106 | } else if (ped - escape_data == 3) { | ||
| 107 | /* \e[<something> */ | ||
| 108 | int mapkey = 0; | ||
| 109 | switch (key) { | ||
| 110 | case 'A': /* \e[A, up arrow */ | ||
| 111 | mapkey = 16; | ||
| 112 | break; | ||
| 113 | case 'B': /* \e[B, down arrow */ | ||
| 114 | mapkey = 14; | ||
| 115 | break; | ||
| 116 | case 'C': /* \e[C, right arrow */ | ||
| 117 | mapkey = 6; | ||
| 118 | break; | ||
| 119 | case 'D': /* \e[D, left arrow */ | ||
| 120 | mapkey = 2; | ||
| 121 | break; | ||
| 122 | case '1': /* dropthrough */ | ||
| 123 | case '3': /* dropthrough */ | ||
| 124 | /* \e[<1,3,4>], may be home, del, end */ | ||
| 125 | case '4': | ||
| 126 | mapkey = -1; | ||
| 127 | break; | ||
| 128 | } | ||
| 129 | if (mapkey != -1) { | ||
| 130 | if (mapkey > 0) { | ||
| 131 | escape_data[0] = mapkey; | ||
| 132 | escape_data[1] = '\0'; | ||
| 133 | } | ||
| 134 | escape_delay = 2; | ||
| 135 | } | ||
| 136 | continue; | ||
| 137 | } else if (ped - escape_data == 4) { | ||
| 138 | /* \e[<1,3,4><something> */ | ||
| 139 | int mapkey = 0; | ||
| 140 | if (key == '~') { | ||
| 141 | switch (escape_data[2]) { | ||
| 142 | case '1': /* \e[1~, home */ | ||
| 143 | mapkey = 1; | ||
| 144 | break; | ||
| 145 | case '3': /* \e[3~, del */ | ||
| 146 | mapkey = 4; | ||
| 147 | break; | ||
| 148 | case '4': /* \e[4~, end */ | ||
| 149 | mapkey = 5; | ||
| 150 | break; | ||
| 151 | } | ||
| 152 | } | ||
| 153 | if (mapkey > 0) { | ||
| 154 | escape_data[0] = mapkey; | ||
| 155 | escape_data[1] = '\0'; | ||
| 156 | } | ||
| 157 | escape_delay = 2; | ||
| 158 | continue; | ||
| 159 | } | ||
| 160 | } | ||
| 161 | break; /* A key to process */ | ||
| 162 | } | ||
| 163 | return key; | ||
| 164 | } | ||
| 165 | |||
| 166 | /* | ||
| 167 | * kdb_read | ||
| 168 | * | ||
| 169 | * This function reads a string of characters, terminated by | ||
| 170 | * a newline, or by reaching the end of the supplied buffer, | ||
| 171 | * from the current kernel debugger console device. | ||
| 172 | * Parameters: | ||
| 173 | * buffer - Address of character buffer to receive input characters. | ||
| 174 | * bufsize - size, in bytes, of the character buffer | ||
| 175 | * Returns: | ||
| 176 | * Returns a pointer to the buffer containing the received | ||
| 177 | * character string. This string will be terminated by a | ||
| 178 | * newline character. | ||
| 179 | * Locking: | ||
| 180 | * No locks are required to be held upon entry to this | ||
| 181 | * function. It is not reentrant - it relies on the fact | ||
| 182 | * that while kdb is running on only one "master debug" cpu. | ||
| 183 | * Remarks: | ||
| 184 | * | ||
| 185 | * The buffer size must be >= 2. A buffer size of 2 means that the caller only | ||
| 186 | * wants a single key. | ||
| 187 | * | ||
| 188 | * An escape key could be the start of a vt100 control sequence such as \e[D | ||
| 189 | * (left arrow) or it could be a character in its own right. The standard | ||
| 190 | * method for detecting the difference is to wait for 2 seconds to see if there | ||
| 191 | * are any other characters. kdb is complicated by the lack of a timer service | ||
| 192 | * (interrupts are off), by multiple input sources and by the need to sometimes | ||
| 193 | * return after just one key. Escape sequence processing has to be done as | ||
| 194 | * states in the polling loop. | ||
| 195 | */ | ||
| 196 | |||
| 197 | static char *kdb_read(char *buffer, size_t bufsize) | ||
| 198 | { | ||
| 199 | char *cp = buffer; | ||
| 200 | char *bufend = buffer+bufsize-2; /* Reserve space for newline | ||
| 201 | * and null byte */ | ||
| 202 | char *lastchar; | ||
| 203 | char *p_tmp; | ||
| 204 | char tmp; | ||
| 205 | static char tmpbuffer[CMD_BUFLEN]; | ||
| 206 | int len = strlen(buffer); | ||
| 207 | int len_tmp; | ||
| 208 | int tab = 0; | ||
| 209 | int count; | ||
| 210 | int i; | ||
| 211 | int diag, dtab_count; | ||
| 212 | int key; | ||
| 213 | |||
| 214 | |||
| 215 | diag = kdbgetintenv("DTABCOUNT", &dtab_count); | ||
| 216 | if (diag) | ||
| 217 | dtab_count = 30; | ||
| 218 | |||
| 219 | if (len > 0) { | ||
| 220 | cp += len; | ||
| 221 | if (*(buffer+len-1) == '\n') | ||
| 222 | cp--; | ||
| 223 | } | ||
| 224 | |||
| 225 | lastchar = cp; | ||
| 226 | *cp = '\0'; | ||
| 227 | kdb_printf("%s", buffer); | ||
| 228 | poll_again: | ||
| 229 | key = kdb_read_get_key(buffer, bufsize); | ||
| 230 | if (key == -1) | ||
| 231 | return buffer; | ||
| 232 | if (key != 9) | ||
| 233 | tab = 0; | ||
| 234 | switch (key) { | ||
| 235 | case 8: /* backspace */ | ||
| 236 | if (cp > buffer) { | ||
| 237 | if (cp < lastchar) { | ||
| 238 | memcpy(tmpbuffer, cp, lastchar - cp); | ||
| 239 | memcpy(cp-1, tmpbuffer, lastchar - cp); | ||
| 240 | } | ||
| 241 | *(--lastchar) = '\0'; | ||
| 242 | --cp; | ||
| 243 | kdb_printf("\b%s \r", cp); | ||
| 244 | tmp = *cp; | ||
| 245 | *cp = '\0'; | ||
| 246 | kdb_printf(kdb_prompt_str); | ||
| 247 | kdb_printf("%s", buffer); | ||
| 248 | *cp = tmp; | ||
| 249 | } | ||
| 250 | break; | ||
| 251 | case 13: /* enter */ | ||
| 252 | *lastchar++ = '\n'; | ||
| 253 | *lastchar++ = '\0'; | ||
| 254 | kdb_printf("\n"); | ||
| 255 | return buffer; | ||
| 256 | case 4: /* Del */ | ||
| 257 | if (cp < lastchar) { | ||
| 258 | memcpy(tmpbuffer, cp+1, lastchar - cp - 1); | ||
| 259 | memcpy(cp, tmpbuffer, lastchar - cp - 1); | ||
| 260 | *(--lastchar) = '\0'; | ||
| 261 | kdb_printf("%s \r", cp); | ||
| 262 | tmp = *cp; | ||
| 263 | *cp = '\0'; | ||
| 264 | kdb_printf(kdb_prompt_str); | ||
| 265 | kdb_printf("%s", buffer); | ||
| 266 | *cp = tmp; | ||
| 267 | } | ||
| 268 | break; | ||
| 269 | case 1: /* Home */ | ||
| 270 | if (cp > buffer) { | ||
| 271 | kdb_printf("\r"); | ||
| 272 | kdb_printf(kdb_prompt_str); | ||
| 273 | cp = buffer; | ||
| 274 | } | ||
| 275 | break; | ||
| 276 | case 5: /* End */ | ||
| 277 | if (cp < lastchar) { | ||
| 278 | kdb_printf("%s", cp); | ||
| 279 | cp = lastchar; | ||
| 280 | } | ||
| 281 | break; | ||
| 282 | case 2: /* Left */ | ||
| 283 | if (cp > buffer) { | ||
| 284 | kdb_printf("\b"); | ||
| 285 | --cp; | ||
| 286 | } | ||
| 287 | break; | ||
| 288 | case 14: /* Down */ | ||
| 289 | memset(tmpbuffer, ' ', | ||
| 290 | strlen(kdb_prompt_str) + (lastchar-buffer)); | ||
| 291 | *(tmpbuffer+strlen(kdb_prompt_str) + | ||
| 292 | (lastchar-buffer)) = '\0'; | ||
| 293 | kdb_printf("\r%s\r", tmpbuffer); | ||
| 294 | *lastchar = (char)key; | ||
| 295 | *(lastchar+1) = '\0'; | ||
| 296 | return lastchar; | ||
| 297 | case 6: /* Right */ | ||
| 298 | if (cp < lastchar) { | ||
| 299 | kdb_printf("%c", *cp); | ||
| 300 | ++cp; | ||
| 301 | } | ||
| 302 | break; | ||
| 303 | case 16: /* Up */ | ||
| 304 | memset(tmpbuffer, ' ', | ||
| 305 | strlen(kdb_prompt_str) + (lastchar-buffer)); | ||
| 306 | *(tmpbuffer+strlen(kdb_prompt_str) + | ||
| 307 | (lastchar-buffer)) = '\0'; | ||
| 308 | kdb_printf("\r%s\r", tmpbuffer); | ||
| 309 | *lastchar = (char)key; | ||
| 310 | *(lastchar+1) = '\0'; | ||
| 311 | return lastchar; | ||
| 312 | case 9: /* Tab */ | ||
| 313 | if (tab < 2) | ||
| 314 | ++tab; | ||
| 315 | p_tmp = buffer; | ||
| 316 | while (*p_tmp == ' ') | ||
| 317 | p_tmp++; | ||
| 318 | if (p_tmp > cp) | ||
| 319 | break; | ||
| 320 | memcpy(tmpbuffer, p_tmp, cp-p_tmp); | ||
| 321 | *(tmpbuffer + (cp-p_tmp)) = '\0'; | ||
| 322 | p_tmp = strrchr(tmpbuffer, ' '); | ||
| 323 | if (p_tmp) | ||
| 324 | ++p_tmp; | ||
| 325 | else | ||
| 326 | p_tmp = tmpbuffer; | ||
| 327 | len = strlen(p_tmp); | ||
| 328 | count = kallsyms_symbol_complete(p_tmp, | ||
| 329 | sizeof(tmpbuffer) - | ||
| 330 | (p_tmp - tmpbuffer)); | ||
| 331 | if (tab == 2 && count > 0) { | ||
| 332 | kdb_printf("\n%d symbols are found.", count); | ||
| 333 | if (count > dtab_count) { | ||
| 334 | count = dtab_count; | ||
| 335 | kdb_printf(" But only first %d symbols will" | ||
| 336 | " be printed.\nYou can change the" | ||
| 337 | " environment variable DTABCOUNT.", | ||
| 338 | count); | ||
| 339 | } | ||
| 340 | kdb_printf("\n"); | ||
| 341 | for (i = 0; i < count; i++) { | ||
| 342 | if (kallsyms_symbol_next(p_tmp, i) < 0) | ||
| 343 | break; | ||
| 344 | kdb_printf("%s ", p_tmp); | ||
| 345 | *(p_tmp + len) = '\0'; | ||
| 346 | } | ||
| 347 | if (i >= dtab_count) | ||
| 348 | kdb_printf("..."); | ||
| 349 | kdb_printf("\n"); | ||
| 350 | kdb_printf(kdb_prompt_str); | ||
| 351 | kdb_printf("%s", buffer); | ||
| 352 | } else if (tab != 2 && count > 0) { | ||
| 353 | len_tmp = strlen(p_tmp); | ||
| 354 | strncpy(p_tmp+len_tmp, cp, lastchar-cp+1); | ||
| 355 | len_tmp = strlen(p_tmp); | ||
| 356 | strncpy(cp, p_tmp+len, len_tmp-len + 1); | ||
| 357 | len = len_tmp - len; | ||
| 358 | kdb_printf("%s", cp); | ||
| 359 | cp += len; | ||
| 360 | lastchar += len; | ||
| 361 | } | ||
| 362 | kdb_nextline = 1; /* reset output line number */ | ||
| 363 | break; | ||
| 364 | default: | ||
| 365 | if (key >= 32 && lastchar < bufend) { | ||
| 366 | if (cp < lastchar) { | ||
| 367 | memcpy(tmpbuffer, cp, lastchar - cp); | ||
| 368 | memcpy(cp+1, tmpbuffer, lastchar - cp); | ||
| 369 | *++lastchar = '\0'; | ||
| 370 | *cp = key; | ||
| 371 | kdb_printf("%s\r", cp); | ||
| 372 | ++cp; | ||
| 373 | tmp = *cp; | ||
| 374 | *cp = '\0'; | ||
| 375 | kdb_printf(kdb_prompt_str); | ||
| 376 | kdb_printf("%s", buffer); | ||
| 377 | *cp = tmp; | ||
| 378 | } else { | ||
| 379 | *++lastchar = '\0'; | ||
| 380 | *cp++ = key; | ||
| 381 | /* The kgdb transition check will hide | ||
| 382 | * printed characters if we think that | ||
| 383 | * kgdb is connecting, until the check | ||
| 384 | * fails */ | ||
| 385 | if (!KDB_STATE(KGDB_TRANS)) | ||
| 386 | kgdb_transition_check(buffer); | ||
| 387 | else | ||
| 388 | kdb_printf("%c", key); | ||
| 389 | } | ||
| 390 | /* Special escape to kgdb */ | ||
| 391 | if (lastchar - buffer >= 5 && | ||
| 392 | strcmp(lastchar - 5, "$?#3f") == 0) { | ||
| 393 | strcpy(buffer, "kgdb"); | ||
| 394 | KDB_STATE_SET(DOING_KGDB); | ||
| 395 | return buffer; | ||
| 396 | } | ||
| 397 | if (lastchar - buffer >= 14 && | ||
| 398 | strcmp(lastchar - 14, "$qSupported#37") == 0) { | ||
| 399 | strcpy(buffer, "kgdb"); | ||
| 400 | KDB_STATE_SET(DOING_KGDB2); | ||
| 401 | return buffer; | ||
| 402 | } | ||
| 403 | } | ||
| 404 | break; | ||
| 405 | } | ||
| 406 | goto poll_again; | ||
| 407 | } | ||
| 408 | |||
| 409 | /* | ||
| 410 | * kdb_getstr | ||
| 411 | * | ||
| 412 | * Print the prompt string and read a command from the | ||
| 413 | * input device. | ||
| 414 | * | ||
| 415 | * Parameters: | ||
| 416 | * buffer Address of buffer to receive command | ||
| 417 | * bufsize Size of buffer in bytes | ||
| 418 | * prompt Pointer to string to use as prompt string | ||
| 419 | * Returns: | ||
| 420 | * Pointer to command buffer. | ||
| 421 | * Locking: | ||
| 422 | * None. | ||
| 423 | * Remarks: | ||
| 424 | * For SMP kernels, the processor number will be | ||
| 425 | * substituted for %d, %x or %o in the prompt. | ||
| 426 | */ | ||
| 427 | |||
| 428 | char *kdb_getstr(char *buffer, size_t bufsize, char *prompt) | ||
| 429 | { | ||
| 430 | if (prompt && kdb_prompt_str != prompt) | ||
| 431 | strncpy(kdb_prompt_str, prompt, CMD_BUFLEN); | ||
| 432 | kdb_printf(kdb_prompt_str); | ||
| 433 | kdb_nextline = 1; /* Prompt and input resets line number */ | ||
| 434 | return kdb_read(buffer, bufsize); | ||
| 435 | } | ||
| 436 | |||
| 437 | /* | ||
| 438 | * kdb_input_flush | ||
| 439 | * | ||
| 440 | * Get rid of any buffered console input. | ||
| 441 | * | ||
| 442 | * Parameters: | ||
| 443 | * none | ||
| 444 | * Returns: | ||
| 445 | * nothing | ||
| 446 | * Locking: | ||
| 447 | * none | ||
| 448 | * Remarks: | ||
| 449 | * Call this function whenever you want to flush input. If there is any | ||
| 450 | * outstanding input, it ignores all characters until there has been no | ||
| 451 | * data for approximately 1ms. | ||
| 452 | */ | ||
| 453 | |||
| 454 | static void kdb_input_flush(void) | ||
| 455 | { | ||
| 456 | get_char_func *f; | ||
| 457 | int res; | ||
| 458 | int flush_delay = 1; | ||
| 459 | while (flush_delay) { | ||
| 460 | flush_delay--; | ||
| 461 | empty: | ||
| 462 | touch_nmi_watchdog(); | ||
| 463 | for (f = &kdb_poll_funcs[0]; *f; ++f) { | ||
| 464 | res = (*f)(); | ||
| 465 | if (res != -1) { | ||
| 466 | flush_delay = 1; | ||
| 467 | goto empty; | ||
| 468 | } | ||
| 469 | } | ||
| 470 | if (flush_delay) | ||
| 471 | mdelay(1); | ||
| 472 | } | ||
| 473 | } | ||
| 474 | |||
| 475 | /* | ||
| 476 | * kdb_printf | ||
| 477 | * | ||
| 478 | * Print a string to the output device(s). | ||
| 479 | * | ||
| 480 | * Parameters: | ||
| 481 | * printf-like format and optional args. | ||
| 482 | * Returns: | ||
| 483 | * 0 | ||
| 484 | * Locking: | ||
| 485 | * None. | ||
| 486 | * Remarks: | ||
| 487 | * use 'kdbcons->write()' to avoid polluting 'log_buf' with | ||
| 488 | * kdb output. | ||
| 489 | * | ||
| 490 | * If the user is doing a cmd args | grep srch | ||
| 491 | * then kdb_grepping_flag is set. | ||
| 492 | * In that case we need to accumulate full lines (ending in \n) before | ||
| 493 | * searching for the pattern. | ||
| 494 | */ | ||
| 495 | |||
| 496 | static char kdb_buffer[256]; /* A bit too big to go on stack */ | ||
| 497 | static char *next_avail = kdb_buffer; | ||
| 498 | static int size_avail; | ||
| 499 | static int suspend_grep; | ||
| 500 | |||
| 501 | /* | ||
| 502 | * search arg1 to see if it contains arg2 | ||
| 503 | * (kdmain.c provides flags for ^pat and pat$) | ||
| 504 | * | ||
| 505 | * return 1 for found, 0 for not found | ||
| 506 | */ | ||
| 507 | static int kdb_search_string(char *searched, char *searchfor) | ||
| 508 | { | ||
| 509 | char firstchar, *cp; | ||
| 510 | int len1, len2; | ||
| 511 | |||
| 512 | /* not counting the newline at the end of "searched" */ | ||
| 513 | len1 = strlen(searched)-1; | ||
| 514 | len2 = strlen(searchfor); | ||
| 515 | if (len1 < len2) | ||
| 516 | return 0; | ||
| 517 | if (kdb_grep_leading && kdb_grep_trailing && len1 != len2) | ||
| 518 | return 0; | ||
| 519 | if (kdb_grep_leading) { | ||
| 520 | if (!strncmp(searched, searchfor, len2)) | ||
| 521 | return 1; | ||
| 522 | } else if (kdb_grep_trailing) { | ||
| 523 | if (!strncmp(searched+len1-len2, searchfor, len2)) | ||
| 524 | return 1; | ||
| 525 | } else { | ||
| 526 | firstchar = *searchfor; | ||
| 527 | cp = searched; | ||
| 528 | while ((cp = strchr(cp, firstchar))) { | ||
| 529 | if (!strncmp(cp, searchfor, len2)) | ||
| 530 | return 1; | ||
| 531 | cp++; | ||
| 532 | } | ||
| 533 | } | ||
| 534 | return 0; | ||
| 535 | } | ||
| 536 | |||
| 537 | int vkdb_printf(const char *fmt, va_list ap) | ||
| 538 | { | ||
| 539 | int diag; | ||
| 540 | int linecount; | ||
| 541 | int logging, saved_loglevel = 0; | ||
| 542 | int saved_trap_printk; | ||
| 543 | int got_printf_lock = 0; | ||
| 544 | int retlen = 0; | ||
| 545 | int fnd, len; | ||
| 546 | char *cp, *cp2, *cphold = NULL, replaced_byte = ' '; | ||
| 547 | char *moreprompt = "more> "; | ||
| 548 | struct console *c = console_drivers; | ||
| 549 | static DEFINE_SPINLOCK(kdb_printf_lock); | ||
| 550 | unsigned long uninitialized_var(flags); | ||
| 551 | |||
| 552 | preempt_disable(); | ||
| 553 | saved_trap_printk = kdb_trap_printk; | ||
| 554 | kdb_trap_printk = 0; | ||
| 555 | |||
| 556 | /* Serialize kdb_printf if multiple cpus try to write at once. | ||
| 557 | * But if any cpu goes recursive in kdb, just print the output, | ||
| 558 | * even if it is interleaved with any other text. | ||
| 559 | */ | ||
| 560 | if (!KDB_STATE(PRINTF_LOCK)) { | ||
| 561 | KDB_STATE_SET(PRINTF_LOCK); | ||
| 562 | spin_lock_irqsave(&kdb_printf_lock, flags); | ||
| 563 | got_printf_lock = 1; | ||
| 564 | atomic_inc(&kdb_event); | ||
| 565 | } else { | ||
| 566 | __acquire(kdb_printf_lock); | ||
| 567 | } | ||
| 568 | |||
| 569 | diag = kdbgetintenv("LINES", &linecount); | ||
| 570 | if (diag || linecount <= 1) | ||
| 571 | linecount = 24; | ||
| 572 | |||
| 573 | diag = kdbgetintenv("LOGGING", &logging); | ||
| 574 | if (diag) | ||
| 575 | logging = 0; | ||
| 576 | |||
| 577 | if (!kdb_grepping_flag || suspend_grep) { | ||
| 578 | /* normally, every vsnprintf starts a new buffer */ | ||
| 579 | next_avail = kdb_buffer; | ||
| 580 | size_avail = sizeof(kdb_buffer); | ||
| 581 | } | ||
| 582 | vsnprintf(next_avail, size_avail, fmt, ap); | ||
| 583 | |||
| 584 | /* | ||
| 585 | * If kdb_parse() found that the command was cmd xxx | grep yyy | ||
| 586 | * then kdb_grepping_flag is set, and kdb_grep_string contains yyy | ||
| 587 | * | ||
| 588 | * Accumulate the print data up to a newline before searching it. | ||
| 589 | * (vsnprintf does null-terminate the string that it generates) | ||
| 590 | */ | ||
| 591 | |||
| 592 | /* skip the search if prints are temporarily unconditional */ | ||
| 593 | if (!suspend_grep && kdb_grepping_flag) { | ||
| 594 | cp = strchr(kdb_buffer, '\n'); | ||
| 595 | if (!cp) { | ||
| 596 | /* | ||
| 597 | * Special cases that don't end with newlines | ||
| 598 | * but should be written without one: | ||
| 599 | * The "[nn]kdb> " prompt should | ||
| 600 | * appear at the front of the buffer. | ||
| 601 | * | ||
| 602 | * The "[nn]more " prompt should also be | ||
| 603 | * (MOREPROMPT -> moreprompt) | ||
| 604 | * written * but we print that ourselves, | ||
| 605 | * we set the suspend_grep flag to make | ||
| 606 | * it unconditional. | ||
| 607 | * | ||
| 608 | */ | ||
| 609 | if (next_avail == kdb_buffer) { | ||
| 610 | /* | ||
| 611 | * these should occur after a newline, | ||
| 612 | * so they will be at the front of the | ||
| 613 | * buffer | ||
| 614 | */ | ||
| 615 | cp2 = kdb_buffer; | ||
| 616 | len = strlen(kdb_prompt_str); | ||
| 617 | if (!strncmp(cp2, kdb_prompt_str, len)) { | ||
| 618 | /* | ||
| 619 | * We're about to start a new | ||
| 620 | * command, so we can go back | ||
| 621 | * to normal mode. | ||
| 622 | */ | ||
| 623 | kdb_grepping_flag = 0; | ||
| 624 | goto kdb_printit; | ||
| 625 | } | ||
| 626 | } | ||
| 627 | /* no newline; don't search/write the buffer | ||
| 628 | until one is there */ | ||
| 629 | len = strlen(kdb_buffer); | ||
| 630 | next_avail = kdb_buffer + len; | ||
| 631 | size_avail = sizeof(kdb_buffer) - len; | ||
| 632 | goto kdb_print_out; | ||
| 633 | } | ||
| 634 | |||
| 635 | /* | ||
| 636 | * The newline is present; print through it or discard | ||
| 637 | * it, depending on the results of the search. | ||
| 638 | */ | ||
| 639 | cp++; /* to byte after the newline */ | ||
| 640 | replaced_byte = *cp; /* remember what/where it was */ | ||
| 641 | cphold = cp; | ||
| 642 | *cp = '\0'; /* end the string for our search */ | ||
| 643 | |||
| 644 | /* | ||
| 645 | * We now have a newline at the end of the string | ||
| 646 | * Only continue with this output if it contains the | ||
| 647 | * search string. | ||
| 648 | */ | ||
| 649 | fnd = kdb_search_string(kdb_buffer, kdb_grep_string); | ||
| 650 | if (!fnd) { | ||
| 651 | /* | ||
| 652 | * At this point the complete line at the start | ||
| 653 | * of kdb_buffer can be discarded, as it does | ||
| 654 | * not contain what the user is looking for. | ||
| 655 | * Shift the buffer left. | ||
| 656 | */ | ||
| 657 | *cphold = replaced_byte; | ||
| 658 | strcpy(kdb_buffer, cphold); | ||
| 659 | len = strlen(kdb_buffer); | ||
| 660 | next_avail = kdb_buffer + len; | ||
| 661 | size_avail = sizeof(kdb_buffer) - len; | ||
| 662 | goto kdb_print_out; | ||
| 663 | } | ||
| 664 | /* | ||
| 665 | * at this point the string is a full line and | ||
| 666 | * should be printed, up to the null. | ||
| 667 | */ | ||
| 668 | } | ||
| 669 | kdb_printit: | ||
| 670 | |||
| 671 | /* | ||
| 672 | * Write to all consoles. | ||
| 673 | */ | ||
| 674 | retlen = strlen(kdb_buffer); | ||
| 675 | if (!dbg_kdb_mode && kgdb_connected) { | ||
| 676 | gdbstub_msg_write(kdb_buffer, retlen); | ||
| 677 | } else { | ||
| 678 | if (!dbg_io_ops->is_console) { | ||
| 679 | len = strlen(kdb_buffer); | ||
| 680 | cp = kdb_buffer; | ||
| 681 | while (len--) { | ||
| 682 | dbg_io_ops->write_char(*cp); | ||
| 683 | cp++; | ||
| 684 | } | ||
| 685 | } | ||
| 686 | while (c) { | ||
| 687 | c->write(c, kdb_buffer, retlen); | ||
| 688 | touch_nmi_watchdog(); | ||
| 689 | c = c->next; | ||
| 690 | } | ||
| 691 | } | ||
| 692 | if (logging) { | ||
| 693 | saved_loglevel = console_loglevel; | ||
| 694 | console_loglevel = 0; | ||
| 695 | printk(KERN_INFO "%s", kdb_buffer); | ||
| 696 | } | ||
| 697 | |||
| 698 | if (KDB_STATE(PAGER) && strchr(kdb_buffer, '\n')) | ||
| 699 | kdb_nextline++; | ||
| 700 | |||
| 701 | /* check for having reached the LINES number of printed lines */ | ||
| 702 | if (kdb_nextline == linecount) { | ||
| 703 | char buf1[16] = ""; | ||
| 704 | #if defined(CONFIG_SMP) | ||
| 705 | char buf2[32]; | ||
| 706 | #endif | ||
| 707 | |||
| 708 | /* Watch out for recursion here. Any routine that calls | ||
| 709 | * kdb_printf will come back through here. And kdb_read | ||
| 710 | * uses kdb_printf to echo on serial consoles ... | ||
| 711 | */ | ||
| 712 | kdb_nextline = 1; /* In case of recursion */ | ||
| 713 | |||
| 714 | /* | ||
| 715 | * Pause until cr. | ||
| 716 | */ | ||
| 717 | moreprompt = kdbgetenv("MOREPROMPT"); | ||
| 718 | if (moreprompt == NULL) | ||
| 719 | moreprompt = "more> "; | ||
| 720 | |||
| 721 | #if defined(CONFIG_SMP) | ||
| 722 | if (strchr(moreprompt, '%')) { | ||
| 723 | sprintf(buf2, moreprompt, get_cpu()); | ||
| 724 | put_cpu(); | ||
| 725 | moreprompt = buf2; | ||
| 726 | } | ||
| 727 | #endif | ||
| 728 | |||
| 729 | kdb_input_flush(); | ||
| 730 | c = console_drivers; | ||
| 731 | |||
| 732 | if (!dbg_io_ops->is_console) { | ||
| 733 | len = strlen(moreprompt); | ||
| 734 | cp = moreprompt; | ||
| 735 | while (len--) { | ||
| 736 | dbg_io_ops->write_char(*cp); | ||
| 737 | cp++; | ||
| 738 | } | ||
| 739 | } | ||
| 740 | while (c) { | ||
| 741 | c->write(c, moreprompt, strlen(moreprompt)); | ||
| 742 | touch_nmi_watchdog(); | ||
| 743 | c = c->next; | ||
| 744 | } | ||
| 745 | |||
| 746 | if (logging) | ||
| 747 | printk("%s", moreprompt); | ||
| 748 | |||
| 749 | kdb_read(buf1, 2); /* '2' indicates to return | ||
| 750 | * immediately after getting one key. */ | ||
| 751 | kdb_nextline = 1; /* Really set output line 1 */ | ||
| 752 | |||
| 753 | /* empty and reset the buffer: */ | ||
| 754 | kdb_buffer[0] = '\0'; | ||
| 755 | next_avail = kdb_buffer; | ||
| 756 | size_avail = sizeof(kdb_buffer); | ||
| 757 | if ((buf1[0] == 'q') || (buf1[0] == 'Q')) { | ||
| 758 | /* user hit q or Q */ | ||
| 759 | KDB_FLAG_SET(CMD_INTERRUPT); /* command interrupted */ | ||
| 760 | KDB_STATE_CLEAR(PAGER); | ||
| 761 | /* end of command output; back to normal mode */ | ||
| 762 | kdb_grepping_flag = 0; | ||
| 763 | kdb_printf("\n"); | ||
| 764 | } else if (buf1[0] == ' ') { | ||
| 765 | kdb_printf("\n"); | ||
| 766 | suspend_grep = 1; /* for this recursion */ | ||
| 767 | } else if (buf1[0] == '\n') { | ||
| 768 | kdb_nextline = linecount - 1; | ||
| 769 | kdb_printf("\r"); | ||
| 770 | suspend_grep = 1; /* for this recursion */ | ||
| 771 | } else if (buf1[0] && buf1[0] != '\n') { | ||
| 772 | /* user hit something other than enter */ | ||
| 773 | suspend_grep = 1; /* for this recursion */ | ||
| 774 | kdb_printf("\nOnly 'q' or 'Q' are processed at more " | ||
| 775 | "prompt, input ignored\n"); | ||
| 776 | } else if (kdb_grepping_flag) { | ||
| 777 | /* user hit enter */ | ||
| 778 | suspend_grep = 1; /* for this recursion */ | ||
| 779 | kdb_printf("\n"); | ||
| 780 | } | ||
| 781 | kdb_input_flush(); | ||
| 782 | } | ||
| 783 | |||
| 784 | /* | ||
| 785 | * For grep searches, shift the printed string left. | ||
| 786 | * replaced_byte contains the character that was overwritten with | ||
| 787 | * the terminating null, and cphold points to the null. | ||
| 788 | * Then adjust the notion of available space in the buffer. | ||
| 789 | */ | ||
| 790 | if (kdb_grepping_flag && !suspend_grep) { | ||
| 791 | *cphold = replaced_byte; | ||
| 792 | strcpy(kdb_buffer, cphold); | ||
| 793 | len = strlen(kdb_buffer); | ||
| 794 | next_avail = kdb_buffer + len; | ||
| 795 | size_avail = sizeof(kdb_buffer) - len; | ||
| 796 | } | ||
| 797 | |||
| 798 | kdb_print_out: | ||
| 799 | suspend_grep = 0; /* end of what may have been a recursive call */ | ||
| 800 | if (logging) | ||
| 801 | console_loglevel = saved_loglevel; | ||
| 802 | if (KDB_STATE(PRINTF_LOCK) && got_printf_lock) { | ||
| 803 | got_printf_lock = 0; | ||
| 804 | spin_unlock_irqrestore(&kdb_printf_lock, flags); | ||
| 805 | KDB_STATE_CLEAR(PRINTF_LOCK); | ||
| 806 | atomic_dec(&kdb_event); | ||
| 807 | } else { | ||
| 808 | __release(kdb_printf_lock); | ||
| 809 | } | ||
| 810 | kdb_trap_printk = saved_trap_printk; | ||
| 811 | preempt_enable(); | ||
| 812 | return retlen; | ||
| 813 | } | ||
| 814 | |||
| 815 | int kdb_printf(const char *fmt, ...) | ||
| 816 | { | ||
| 817 | va_list ap; | ||
| 818 | int r; | ||
| 819 | |||
| 820 | va_start(ap, fmt); | ||
| 821 | r = vkdb_printf(fmt, ap); | ||
| 822 | va_end(ap); | ||
| 823 | |||
| 824 | return r; | ||
| 825 | } | ||
| 826 | |||
diff --git a/kernel/debug/kdb/kdb_keyboard.c b/kernel/debug/kdb/kdb_keyboard.c new file mode 100644 index 000000000000..4bca634975c0 --- /dev/null +++ b/kernel/debug/kdb/kdb_keyboard.c | |||
| @@ -0,0 +1,212 @@ | |||
| 1 | /* | ||
| 2 | * Kernel Debugger Architecture Dependent Console I/O handler | ||
| 3 | * | ||
| 4 | * This file is subject to the terms and conditions of the GNU General Public | ||
| 5 | * License. | ||
| 6 | * | ||
| 7 | * Copyright (c) 1999-2006 Silicon Graphics, Inc. All Rights Reserved. | ||
| 8 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 9 | */ | ||
| 10 | |||
| 11 | #include <linux/kdb.h> | ||
| 12 | #include <linux/keyboard.h> | ||
| 13 | #include <linux/ctype.h> | ||
| 14 | #include <linux/module.h> | ||
| 15 | #include <linux/io.h> | ||
| 16 | |||
| 17 | /* Keyboard Controller Registers on normal PCs. */ | ||
| 18 | |||
| 19 | #define KBD_STATUS_REG 0x64 /* Status register (R) */ | ||
| 20 | #define KBD_DATA_REG 0x60 /* Keyboard data register (R/W) */ | ||
| 21 | |||
| 22 | /* Status Register Bits */ | ||
| 23 | |||
| 24 | #define KBD_STAT_OBF 0x01 /* Keyboard output buffer full */ | ||
| 25 | #define KBD_STAT_MOUSE_OBF 0x20 /* Mouse output buffer full */ | ||
| 26 | |||
| 27 | static int kbd_exists; | ||
| 28 | |||
| 29 | /* | ||
| 30 | * Check if the keyboard controller has a keypress for us. | ||
| 31 | * Some parts (Enter Release, LED change) are still blocking polled here, | ||
| 32 | * but hopefully they are all short. | ||
| 33 | */ | ||
| 34 | int kdb_get_kbd_char(void) | ||
| 35 | { | ||
| 36 | int scancode, scanstatus; | ||
| 37 | static int shift_lock; /* CAPS LOCK state (0-off, 1-on) */ | ||
| 38 | static int shift_key; /* Shift next keypress */ | ||
| 39 | static int ctrl_key; | ||
| 40 | u_short keychar; | ||
| 41 | |||
| 42 | if (KDB_FLAG(NO_I8042) || KDB_FLAG(NO_VT_CONSOLE) || | ||
| 43 | (inb(KBD_STATUS_REG) == 0xff && inb(KBD_DATA_REG) == 0xff)) { | ||
| 44 | kbd_exists = 0; | ||
| 45 | return -1; | ||
| 46 | } | ||
| 47 | kbd_exists = 1; | ||
| 48 | |||
| 49 | if ((inb(KBD_STATUS_REG) & KBD_STAT_OBF) == 0) | ||
| 50 | return -1; | ||
| 51 | |||
| 52 | /* | ||
| 53 | * Fetch the scancode | ||
| 54 | */ | ||
| 55 | scancode = inb(KBD_DATA_REG); | ||
| 56 | scanstatus = inb(KBD_STATUS_REG); | ||
| 57 | |||
| 58 | /* | ||
| 59 | * Ignore mouse events. | ||
| 60 | */ | ||
| 61 | if (scanstatus & KBD_STAT_MOUSE_OBF) | ||
| 62 | return -1; | ||
| 63 | |||
| 64 | /* | ||
| 65 | * Ignore release, trigger on make | ||
| 66 | * (except for shift keys, where we want to | ||
| 67 | * keep the shift state so long as the key is | ||
| 68 | * held down). | ||
| 69 | */ | ||
| 70 | |||
| 71 | if (((scancode&0x7f) == 0x2a) || ((scancode&0x7f) == 0x36)) { | ||
| 72 | /* | ||
| 73 | * Next key may use shift table | ||
| 74 | */ | ||
| 75 | if ((scancode & 0x80) == 0) | ||
| 76 | shift_key = 1; | ||
| 77 | else | ||
| 78 | shift_key = 0; | ||
| 79 | return -1; | ||
| 80 | } | ||
| 81 | |||
| 82 | if ((scancode&0x7f) == 0x1d) { | ||
| 83 | /* | ||
| 84 | * Left ctrl key | ||
| 85 | */ | ||
| 86 | if ((scancode & 0x80) == 0) | ||
| 87 | ctrl_key = 1; | ||
| 88 | else | ||
| 89 | ctrl_key = 0; | ||
| 90 | return -1; | ||
| 91 | } | ||
| 92 | |||
| 93 | if ((scancode & 0x80) != 0) | ||
| 94 | return -1; | ||
| 95 | |||
| 96 | scancode &= 0x7f; | ||
| 97 | |||
| 98 | /* | ||
| 99 | * Translate scancode | ||
| 100 | */ | ||
| 101 | |||
| 102 | if (scancode == 0x3a) { | ||
| 103 | /* | ||
| 104 | * Toggle caps lock | ||
| 105 | */ | ||
| 106 | shift_lock ^= 1; | ||
| 107 | |||
| 108 | #ifdef KDB_BLINK_LED | ||
| 109 | kdb_toggleled(0x4); | ||
| 110 | #endif | ||
| 111 | return -1; | ||
| 112 | } | ||
| 113 | |||
| 114 | if (scancode == 0x0e) { | ||
| 115 | /* | ||
| 116 | * Backspace | ||
| 117 | */ | ||
| 118 | return 8; | ||
| 119 | } | ||
| 120 | |||
| 121 | /* Special Key */ | ||
| 122 | switch (scancode) { | ||
| 123 | case 0xF: /* Tab */ | ||
| 124 | return 9; | ||
| 125 | case 0x53: /* Del */ | ||
| 126 | return 4; | ||
| 127 | case 0x47: /* Home */ | ||
| 128 | return 1; | ||
| 129 | case 0x4F: /* End */ | ||
| 130 | return 5; | ||
| 131 | case 0x4B: /* Left */ | ||
| 132 | return 2; | ||
| 133 | case 0x48: /* Up */ | ||
| 134 | return 16; | ||
| 135 | case 0x50: /* Down */ | ||
| 136 | return 14; | ||
| 137 | case 0x4D: /* Right */ | ||
| 138 | return 6; | ||
| 139 | } | ||
| 140 | |||
| 141 | if (scancode == 0xe0) | ||
| 142 | return -1; | ||
| 143 | |||
| 144 | /* | ||
| 145 | * For Japanese 86/106 keyboards | ||
| 146 | * See comment in drivers/char/pc_keyb.c. | ||
| 147 | * - Masahiro Adegawa | ||
| 148 | */ | ||
| 149 | if (scancode == 0x73) | ||
| 150 | scancode = 0x59; | ||
| 151 | else if (scancode == 0x7d) | ||
| 152 | scancode = 0x7c; | ||
| 153 | |||
| 154 | if (!shift_lock && !shift_key && !ctrl_key) { | ||
| 155 | keychar = plain_map[scancode]; | ||
| 156 | } else if ((shift_lock || shift_key) && key_maps[1]) { | ||
| 157 | keychar = key_maps[1][scancode]; | ||
| 158 | } else if (ctrl_key && key_maps[4]) { | ||
| 159 | keychar = key_maps[4][scancode]; | ||
| 160 | } else { | ||
| 161 | keychar = 0x0020; | ||
| 162 | kdb_printf("Unknown state/scancode (%d)\n", scancode); | ||
| 163 | } | ||
| 164 | keychar &= 0x0fff; | ||
| 165 | if (keychar == '\t') | ||
| 166 | keychar = ' '; | ||
| 167 | switch (KTYP(keychar)) { | ||
| 168 | case KT_LETTER: | ||
| 169 | case KT_LATIN: | ||
| 170 | if (isprint(keychar)) | ||
| 171 | break; /* printable characters */ | ||
| 172 | /* drop through */ | ||
| 173 | case KT_SPEC: | ||
| 174 | if (keychar == K_ENTER) | ||
| 175 | break; | ||
| 176 | /* drop through */ | ||
| 177 | default: | ||
| 178 | return -1; /* ignore unprintables */ | ||
| 179 | } | ||
| 180 | |||
| 181 | if ((scancode & 0x7f) == 0x1c) { | ||
| 182 | /* | ||
| 183 | * enter key. All done. Absorb the release scancode. | ||
| 184 | */ | ||
| 185 | while ((inb(KBD_STATUS_REG) & KBD_STAT_OBF) == 0) | ||
| 186 | ; | ||
| 187 | |||
| 188 | /* | ||
| 189 | * Fetch the scancode | ||
| 190 | */ | ||
| 191 | scancode = inb(KBD_DATA_REG); | ||
| 192 | scanstatus = inb(KBD_STATUS_REG); | ||
| 193 | |||
| 194 | while (scanstatus & KBD_STAT_MOUSE_OBF) { | ||
| 195 | scancode = inb(KBD_DATA_REG); | ||
| 196 | scanstatus = inb(KBD_STATUS_REG); | ||
| 197 | } | ||
| 198 | |||
| 199 | if (scancode != 0x9c) { | ||
| 200 | /* | ||
| 201 | * Wasn't an enter-release, why not? | ||
| 202 | */ | ||
| 203 | kdb_printf("kdb: expected enter got 0x%x status 0x%x\n", | ||
| 204 | scancode, scanstatus); | ||
| 205 | } | ||
| 206 | |||
| 207 | return 13; | ||
| 208 | } | ||
| 209 | |||
| 210 | return keychar & 0xff; | ||
| 211 | } | ||
| 212 | EXPORT_SYMBOL_GPL(kdb_get_kbd_char); | ||
diff --git a/kernel/debug/kdb/kdb_main.c b/kernel/debug/kdb/kdb_main.c new file mode 100644 index 000000000000..b724c791b6d4 --- /dev/null +++ b/kernel/debug/kdb/kdb_main.c | |||
| @@ -0,0 +1,2849 @@ | |||
| 1 | /* | ||
| 2 | * Kernel Debugger Architecture Independent Main Code | ||
| 3 | * | ||
| 4 | * This file is subject to the terms and conditions of the GNU General Public | ||
| 5 | * License. See the file "COPYING" in the main directory of this archive | ||
| 6 | * for more details. | ||
| 7 | * | ||
| 8 | * Copyright (C) 1999-2004 Silicon Graphics, Inc. All Rights Reserved. | ||
| 9 | * Copyright (C) 2000 Stephane Eranian <eranian@hpl.hp.com> | ||
| 10 | * Xscale (R) modifications copyright (C) 2003 Intel Corporation. | ||
| 11 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 12 | */ | ||
| 13 | |||
| 14 | #include <linux/ctype.h> | ||
| 15 | #include <linux/string.h> | ||
| 16 | #include <linux/kernel.h> | ||
| 17 | #include <linux/reboot.h> | ||
| 18 | #include <linux/sched.h> | ||
| 19 | #include <linux/sysrq.h> | ||
| 20 | #include <linux/smp.h> | ||
| 21 | #include <linux/utsname.h> | ||
| 22 | #include <linux/vmalloc.h> | ||
| 23 | #include <linux/module.h> | ||
| 24 | #include <linux/mm.h> | ||
| 25 | #include <linux/init.h> | ||
| 26 | #include <linux/kallsyms.h> | ||
| 27 | #include <linux/kgdb.h> | ||
| 28 | #include <linux/kdb.h> | ||
| 29 | #include <linux/notifier.h> | ||
| 30 | #include <linux/interrupt.h> | ||
| 31 | #include <linux/delay.h> | ||
| 32 | #include <linux/nmi.h> | ||
| 33 | #include <linux/time.h> | ||
| 34 | #include <linux/ptrace.h> | ||
| 35 | #include <linux/sysctl.h> | ||
| 36 | #include <linux/cpu.h> | ||
| 37 | #include <linux/kdebug.h> | ||
| 38 | #include <linux/proc_fs.h> | ||
| 39 | #include <linux/uaccess.h> | ||
| 40 | #include <linux/slab.h> | ||
| 41 | #include "kdb_private.h" | ||
| 42 | |||
| 43 | #define GREP_LEN 256 | ||
| 44 | char kdb_grep_string[GREP_LEN]; | ||
| 45 | int kdb_grepping_flag; | ||
| 46 | EXPORT_SYMBOL(kdb_grepping_flag); | ||
| 47 | int kdb_grep_leading; | ||
| 48 | int kdb_grep_trailing; | ||
| 49 | |||
| 50 | /* | ||
| 51 | * Kernel debugger state flags | ||
| 52 | */ | ||
| 53 | int kdb_flags; | ||
| 54 | atomic_t kdb_event; | ||
| 55 | |||
| 56 | /* | ||
| 57 | * kdb_lock protects updates to kdb_initial_cpu. Used to | ||
| 58 | * single thread processors through the kernel debugger. | ||
| 59 | */ | ||
| 60 | int kdb_initial_cpu = -1; /* cpu number that owns kdb */ | ||
| 61 | int kdb_nextline = 1; | ||
| 62 | int kdb_state; /* General KDB state */ | ||
| 63 | |||
| 64 | struct task_struct *kdb_current_task; | ||
| 65 | EXPORT_SYMBOL(kdb_current_task); | ||
| 66 | struct pt_regs *kdb_current_regs; | ||
| 67 | |||
| 68 | const char *kdb_diemsg; | ||
| 69 | static int kdb_go_count; | ||
| 70 | #ifdef CONFIG_KDB_CONTINUE_CATASTROPHIC | ||
| 71 | static unsigned int kdb_continue_catastrophic = | ||
| 72 | CONFIG_KDB_CONTINUE_CATASTROPHIC; | ||
| 73 | #else | ||
| 74 | static unsigned int kdb_continue_catastrophic; | ||
| 75 | #endif | ||
| 76 | |||
| 77 | /* kdb_commands describes the available commands. */ | ||
| 78 | static kdbtab_t *kdb_commands; | ||
| 79 | #define KDB_BASE_CMD_MAX 50 | ||
| 80 | static int kdb_max_commands = KDB_BASE_CMD_MAX; | ||
| 81 | static kdbtab_t kdb_base_commands[50]; | ||
| 82 | #define for_each_kdbcmd(cmd, num) \ | ||
| 83 | for ((cmd) = kdb_base_commands, (num) = 0; \ | ||
| 84 | num < kdb_max_commands; \ | ||
| 85 | num == KDB_BASE_CMD_MAX ? cmd = kdb_commands : cmd++, num++) | ||
| 86 | |||
| 87 | typedef struct _kdbmsg { | ||
| 88 | int km_diag; /* kdb diagnostic */ | ||
| 89 | char *km_msg; /* Corresponding message text */ | ||
| 90 | } kdbmsg_t; | ||
| 91 | |||
| 92 | #define KDBMSG(msgnum, text) \ | ||
| 93 | { KDB_##msgnum, text } | ||
| 94 | |||
| 95 | static kdbmsg_t kdbmsgs[] = { | ||
| 96 | KDBMSG(NOTFOUND, "Command Not Found"), | ||
| 97 | KDBMSG(ARGCOUNT, "Improper argument count, see usage."), | ||
| 98 | KDBMSG(BADWIDTH, "Illegal value for BYTESPERWORD use 1, 2, 4 or 8, " | ||
| 99 | "8 is only allowed on 64 bit systems"), | ||
| 100 | KDBMSG(BADRADIX, "Illegal value for RADIX use 8, 10 or 16"), | ||
| 101 | KDBMSG(NOTENV, "Cannot find environment variable"), | ||
| 102 | KDBMSG(NOENVVALUE, "Environment variable should have value"), | ||
| 103 | KDBMSG(NOTIMP, "Command not implemented"), | ||
| 104 | KDBMSG(ENVFULL, "Environment full"), | ||
| 105 | KDBMSG(ENVBUFFULL, "Environment buffer full"), | ||
| 106 | KDBMSG(TOOMANYBPT, "Too many breakpoints defined"), | ||
| 107 | #ifdef CONFIG_CPU_XSCALE | ||
| 108 | KDBMSG(TOOMANYDBREGS, "More breakpoints than ibcr registers defined"), | ||
| 109 | #else | ||
| 110 | KDBMSG(TOOMANYDBREGS, "More breakpoints than db registers defined"), | ||
| 111 | #endif | ||
| 112 | KDBMSG(DUPBPT, "Duplicate breakpoint address"), | ||
| 113 | KDBMSG(BPTNOTFOUND, "Breakpoint not found"), | ||
| 114 | KDBMSG(BADMODE, "Invalid IDMODE"), | ||
| 115 | KDBMSG(BADINT, "Illegal numeric value"), | ||
| 116 | KDBMSG(INVADDRFMT, "Invalid symbolic address format"), | ||
| 117 | KDBMSG(BADREG, "Invalid register name"), | ||
| 118 | KDBMSG(BADCPUNUM, "Invalid cpu number"), | ||
| 119 | KDBMSG(BADLENGTH, "Invalid length field"), | ||
| 120 | KDBMSG(NOBP, "No Breakpoint exists"), | ||
| 121 | KDBMSG(BADADDR, "Invalid address"), | ||
| 122 | }; | ||
| 123 | #undef KDBMSG | ||
| 124 | |||
| 125 | static const int __nkdb_err = sizeof(kdbmsgs) / sizeof(kdbmsg_t); | ||
| 126 | |||
| 127 | |||
| 128 | /* | ||
| 129 | * Initial environment. This is all kept static and local to | ||
| 130 | * this file. We don't want to rely on the memory allocation | ||
| 131 | * mechanisms in the kernel, so we use a very limited allocate-only | ||
| 132 | * heap for new and altered environment variables. The entire | ||
| 133 | * environment is limited to a fixed number of entries (add more | ||
| 134 | * to __env[] if required) and a fixed amount of heap (add more to | ||
| 135 | * KDB_ENVBUFSIZE if required). | ||
| 136 | */ | ||
| 137 | |||
| 138 | static char *__env[] = { | ||
| 139 | #if defined(CONFIG_SMP) | ||
| 140 | "PROMPT=[%d]kdb> ", | ||
| 141 | "MOREPROMPT=[%d]more> ", | ||
| 142 | #else | ||
| 143 | "PROMPT=kdb> ", | ||
| 144 | "MOREPROMPT=more> ", | ||
| 145 | #endif | ||
| 146 | "RADIX=16", | ||
| 147 | "MDCOUNT=8", /* lines of md output */ | ||
| 148 | "BTARGS=9", /* 9 possible args in bt */ | ||
| 149 | KDB_PLATFORM_ENV, | ||
| 150 | "DTABCOUNT=30", | ||
| 151 | "NOSECT=1", | ||
| 152 | (char *)0, | ||
| 153 | (char *)0, | ||
| 154 | (char *)0, | ||
| 155 | (char *)0, | ||
| 156 | (char *)0, | ||
| 157 | (char *)0, | ||
| 158 | (char *)0, | ||
| 159 | (char *)0, | ||
| 160 | (char *)0, | ||
| 161 | (char *)0, | ||
| 162 | (char *)0, | ||
| 163 | (char *)0, | ||
| 164 | (char *)0, | ||
| 165 | (char *)0, | ||
| 166 | (char *)0, | ||
| 167 | (char *)0, | ||
| 168 | (char *)0, | ||
| 169 | (char *)0, | ||
| 170 | (char *)0, | ||
| 171 | (char *)0, | ||
| 172 | (char *)0, | ||
| 173 | (char *)0, | ||
| 174 | (char *)0, | ||
| 175 | }; | ||
| 176 | |||
| 177 | static const int __nenv = (sizeof(__env) / sizeof(char *)); | ||
| 178 | |||
| 179 | struct task_struct *kdb_curr_task(int cpu) | ||
| 180 | { | ||
| 181 | struct task_struct *p = curr_task(cpu); | ||
| 182 | #ifdef _TIF_MCA_INIT | ||
| 183 | if ((task_thread_info(p)->flags & _TIF_MCA_INIT) && KDB_TSK(cpu)) | ||
| 184 | p = krp->p; | ||
| 185 | #endif | ||
| 186 | return p; | ||
| 187 | } | ||
| 188 | |||
| 189 | /* | ||
| 190 | * kdbgetenv - This function will return the character string value of | ||
| 191 | * an environment variable. | ||
| 192 | * Parameters: | ||
| 193 | * match A character string representing an environment variable. | ||
| 194 | * Returns: | ||
| 195 | * NULL No environment variable matches 'match' | ||
| 196 | * char* Pointer to string value of environment variable. | ||
| 197 | */ | ||
| 198 | char *kdbgetenv(const char *match) | ||
| 199 | { | ||
| 200 | char **ep = __env; | ||
| 201 | int matchlen = strlen(match); | ||
| 202 | int i; | ||
| 203 | |||
| 204 | for (i = 0; i < __nenv; i++) { | ||
| 205 | char *e = *ep++; | ||
| 206 | |||
| 207 | if (!e) | ||
| 208 | continue; | ||
| 209 | |||
| 210 | if ((strncmp(match, e, matchlen) == 0) | ||
| 211 | && ((e[matchlen] == '\0') | ||
| 212 | || (e[matchlen] == '='))) { | ||
| 213 | char *cp = strchr(e, '='); | ||
| 214 | return cp ? ++cp : ""; | ||
| 215 | } | ||
| 216 | } | ||
| 217 | return NULL; | ||
| 218 | } | ||
| 219 | |||
| 220 | /* | ||
| 221 | * kdballocenv - This function is used to allocate bytes for | ||
| 222 | * environment entries. | ||
| 223 | * Parameters: | ||
| 224 | * match A character string representing a numeric value | ||
| 225 | * Outputs: | ||
| 226 | * *value the unsigned long representation of the env variable 'match' | ||
| 227 | * Returns: | ||
| 228 | * Zero on success, a kdb diagnostic on failure. | ||
| 229 | * Remarks: | ||
| 230 | * We use a static environment buffer (envbuffer) to hold the values | ||
| 231 | * of dynamically generated environment variables (see kdb_set). Buffer | ||
| 232 | * space once allocated is never free'd, so over time, the amount of space | ||
| 233 | * (currently 512 bytes) will be exhausted if env variables are changed | ||
| 234 | * frequently. | ||
| 235 | */ | ||
| 236 | static char *kdballocenv(size_t bytes) | ||
| 237 | { | ||
| 238 | #define KDB_ENVBUFSIZE 512 | ||
| 239 | static char envbuffer[KDB_ENVBUFSIZE]; | ||
| 240 | static int envbufsize; | ||
| 241 | char *ep = NULL; | ||
| 242 | |||
| 243 | if ((KDB_ENVBUFSIZE - envbufsize) >= bytes) { | ||
| 244 | ep = &envbuffer[envbufsize]; | ||
| 245 | envbufsize += bytes; | ||
| 246 | } | ||
| 247 | return ep; | ||
| 248 | } | ||
| 249 | |||
| 250 | /* | ||
| 251 | * kdbgetulenv - This function will return the value of an unsigned | ||
| 252 | * long-valued environment variable. | ||
| 253 | * Parameters: | ||
| 254 | * match A character string representing a numeric value | ||
| 255 | * Outputs: | ||
| 256 | * *value the unsigned long represntation of the env variable 'match' | ||
| 257 | * Returns: | ||
| 258 | * Zero on success, a kdb diagnostic on failure. | ||
| 259 | */ | ||
| 260 | static int kdbgetulenv(const char *match, unsigned long *value) | ||
| 261 | { | ||
| 262 | char *ep; | ||
| 263 | |||
| 264 | ep = kdbgetenv(match); | ||
| 265 | if (!ep) | ||
| 266 | return KDB_NOTENV; | ||
| 267 | if (strlen(ep) == 0) | ||
| 268 | return KDB_NOENVVALUE; | ||
| 269 | |||
| 270 | *value = simple_strtoul(ep, NULL, 0); | ||
| 271 | |||
| 272 | return 0; | ||
| 273 | } | ||
| 274 | |||
| 275 | /* | ||
| 276 | * kdbgetintenv - This function will return the value of an | ||
| 277 | * integer-valued environment variable. | ||
| 278 | * Parameters: | ||
| 279 | * match A character string representing an integer-valued env variable | ||
| 280 | * Outputs: | ||
| 281 | * *value the integer representation of the environment variable 'match' | ||
| 282 | * Returns: | ||
| 283 | * Zero on success, a kdb diagnostic on failure. | ||
| 284 | */ | ||
| 285 | int kdbgetintenv(const char *match, int *value) | ||
| 286 | { | ||
| 287 | unsigned long val; | ||
| 288 | int diag; | ||
| 289 | |||
| 290 | diag = kdbgetulenv(match, &val); | ||
| 291 | if (!diag) | ||
| 292 | *value = (int) val; | ||
| 293 | return diag; | ||
| 294 | } | ||
| 295 | |||
| 296 | /* | ||
| 297 | * kdbgetularg - This function will convert a numeric string into an | ||
| 298 | * unsigned long value. | ||
| 299 | * Parameters: | ||
| 300 | * arg A character string representing a numeric value | ||
| 301 | * Outputs: | ||
| 302 | * *value the unsigned long represntation of arg. | ||
| 303 | * Returns: | ||
| 304 | * Zero on success, a kdb diagnostic on failure. | ||
| 305 | */ | ||
| 306 | int kdbgetularg(const char *arg, unsigned long *value) | ||
| 307 | { | ||
| 308 | char *endp; | ||
| 309 | unsigned long val; | ||
| 310 | |||
| 311 | val = simple_strtoul(arg, &endp, 0); | ||
| 312 | |||
| 313 | if (endp == arg) { | ||
| 314 | /* | ||
| 315 | * Try base 16, for us folks too lazy to type the | ||
| 316 | * leading 0x... | ||
| 317 | */ | ||
| 318 | val = simple_strtoul(arg, &endp, 16); | ||
| 319 | if (endp == arg) | ||
| 320 | return KDB_BADINT; | ||
| 321 | } | ||
| 322 | |||
| 323 | *value = val; | ||
| 324 | |||
| 325 | return 0; | ||
| 326 | } | ||
| 327 | |||
| 328 | /* | ||
| 329 | * kdb_set - This function implements the 'set' command. Alter an | ||
| 330 | * existing environment variable or create a new one. | ||
| 331 | */ | ||
| 332 | int kdb_set(int argc, const char **argv) | ||
| 333 | { | ||
| 334 | int i; | ||
| 335 | char *ep; | ||
| 336 | size_t varlen, vallen; | ||
| 337 | |||
| 338 | /* | ||
| 339 | * we can be invoked two ways: | ||
| 340 | * set var=value argv[1]="var", argv[2]="value" | ||
| 341 | * set var = value argv[1]="var", argv[2]="=", argv[3]="value" | ||
| 342 | * - if the latter, shift 'em down. | ||
| 343 | */ | ||
| 344 | if (argc == 3) { | ||
| 345 | argv[2] = argv[3]; | ||
| 346 | argc--; | ||
| 347 | } | ||
| 348 | |||
| 349 | if (argc != 2) | ||
| 350 | return KDB_ARGCOUNT; | ||
| 351 | |||
| 352 | /* | ||
| 353 | * Check for internal variables | ||
| 354 | */ | ||
| 355 | if (strcmp(argv[1], "KDBDEBUG") == 0) { | ||
| 356 | unsigned int debugflags; | ||
| 357 | char *cp; | ||
| 358 | |||
| 359 | debugflags = simple_strtoul(argv[2], &cp, 0); | ||
| 360 | if (cp == argv[2] || debugflags & ~KDB_DEBUG_FLAG_MASK) { | ||
| 361 | kdb_printf("kdb: illegal debug flags '%s'\n", | ||
| 362 | argv[2]); | ||
| 363 | return 0; | ||
| 364 | } | ||
| 365 | kdb_flags = (kdb_flags & | ||
| 366 | ~(KDB_DEBUG_FLAG_MASK << KDB_DEBUG_FLAG_SHIFT)) | ||
| 367 | | (debugflags << KDB_DEBUG_FLAG_SHIFT); | ||
| 368 | |||
| 369 | return 0; | ||
| 370 | } | ||
| 371 | |||
| 372 | /* | ||
| 373 | * Tokenizer squashed the '=' sign. argv[1] is variable | ||
| 374 | * name, argv[2] = value. | ||
| 375 | */ | ||
| 376 | varlen = strlen(argv[1]); | ||
| 377 | vallen = strlen(argv[2]); | ||
| 378 | ep = kdballocenv(varlen + vallen + 2); | ||
| 379 | if (ep == (char *)0) | ||
| 380 | return KDB_ENVBUFFULL; | ||
| 381 | |||
| 382 | sprintf(ep, "%s=%s", argv[1], argv[2]); | ||
| 383 | |||
| 384 | ep[varlen+vallen+1] = '\0'; | ||
| 385 | |||
| 386 | for (i = 0; i < __nenv; i++) { | ||
| 387 | if (__env[i] | ||
| 388 | && ((strncmp(__env[i], argv[1], varlen) == 0) | ||
| 389 | && ((__env[i][varlen] == '\0') | ||
| 390 | || (__env[i][varlen] == '=')))) { | ||
| 391 | __env[i] = ep; | ||
| 392 | return 0; | ||
| 393 | } | ||
| 394 | } | ||
| 395 | |||
| 396 | /* | ||
| 397 | * Wasn't existing variable. Fit into slot. | ||
| 398 | */ | ||
| 399 | for (i = 0; i < __nenv-1; i++) { | ||
| 400 | if (__env[i] == (char *)0) { | ||
| 401 | __env[i] = ep; | ||
| 402 | return 0; | ||
| 403 | } | ||
| 404 | } | ||
| 405 | |||
| 406 | return KDB_ENVFULL; | ||
| 407 | } | ||
| 408 | |||
| 409 | static int kdb_check_regs(void) | ||
| 410 | { | ||
| 411 | if (!kdb_current_regs) { | ||
| 412 | kdb_printf("No current kdb registers." | ||
| 413 | " You may need to select another task\n"); | ||
| 414 | return KDB_BADREG; | ||
| 415 | } | ||
| 416 | return 0; | ||
| 417 | } | ||
| 418 | |||
| 419 | /* | ||
| 420 | * kdbgetaddrarg - This function is responsible for parsing an | ||
| 421 | * address-expression and returning the value of the expression, | ||
| 422 | * symbol name, and offset to the caller. | ||
| 423 | * | ||
| 424 | * The argument may consist of a numeric value (decimal or | ||
| 425 | * hexidecimal), a symbol name, a register name (preceeded by the | ||
| 426 | * percent sign), an environment variable with a numeric value | ||
| 427 | * (preceeded by a dollar sign) or a simple arithmetic expression | ||
| 428 | * consisting of a symbol name, +/-, and a numeric constant value | ||
| 429 | * (offset). | ||
| 430 | * Parameters: | ||
| 431 | * argc - count of arguments in argv | ||
| 432 | * argv - argument vector | ||
| 433 | * *nextarg - index to next unparsed argument in argv[] | ||
| 434 | * regs - Register state at time of KDB entry | ||
| 435 | * Outputs: | ||
| 436 | * *value - receives the value of the address-expression | ||
| 437 | * *offset - receives the offset specified, if any | ||
| 438 | * *name - receives the symbol name, if any | ||
| 439 | * *nextarg - index to next unparsed argument in argv[] | ||
| 440 | * Returns: | ||
| 441 | * zero is returned on success, a kdb diagnostic code is | ||
| 442 | * returned on error. | ||
| 443 | */ | ||
| 444 | int kdbgetaddrarg(int argc, const char **argv, int *nextarg, | ||
| 445 | unsigned long *value, long *offset, | ||
| 446 | char **name) | ||
| 447 | { | ||
| 448 | unsigned long addr; | ||
| 449 | unsigned long off = 0; | ||
| 450 | int positive; | ||
| 451 | int diag; | ||
| 452 | int found = 0; | ||
| 453 | char *symname; | ||
| 454 | char symbol = '\0'; | ||
| 455 | char *cp; | ||
| 456 | kdb_symtab_t symtab; | ||
| 457 | |||
| 458 | /* | ||
| 459 | * Process arguments which follow the following syntax: | ||
| 460 | * | ||
| 461 | * symbol | numeric-address [+/- numeric-offset] | ||
| 462 | * %register | ||
| 463 | * $environment-variable | ||
| 464 | */ | ||
| 465 | |||
| 466 | if (*nextarg > argc) | ||
| 467 | return KDB_ARGCOUNT; | ||
| 468 | |||
| 469 | symname = (char *)argv[*nextarg]; | ||
| 470 | |||
| 471 | /* | ||
| 472 | * If there is no whitespace between the symbol | ||
| 473 | * or address and the '+' or '-' symbols, we | ||
| 474 | * remember the character and replace it with a | ||
| 475 | * null so the symbol/value can be properly parsed | ||
| 476 | */ | ||
| 477 | cp = strpbrk(symname, "+-"); | ||
| 478 | if (cp != NULL) { | ||
| 479 | symbol = *cp; | ||
| 480 | *cp++ = '\0'; | ||
| 481 | } | ||
| 482 | |||
| 483 | if (symname[0] == '$') { | ||
| 484 | diag = kdbgetulenv(&symname[1], &addr); | ||
| 485 | if (diag) | ||
| 486 | return diag; | ||
| 487 | } else if (symname[0] == '%') { | ||
| 488 | diag = kdb_check_regs(); | ||
| 489 | if (diag) | ||
| 490 | return diag; | ||
| 491 | /* Implement register values with % at a later time as it is | ||
| 492 | * arch optional. | ||
| 493 | */ | ||
| 494 | return KDB_NOTIMP; | ||
| 495 | } else { | ||
| 496 | found = kdbgetsymval(symname, &symtab); | ||
| 497 | if (found) { | ||
| 498 | addr = symtab.sym_start; | ||
| 499 | } else { | ||
| 500 | diag = kdbgetularg(argv[*nextarg], &addr); | ||
| 501 | if (diag) | ||
| 502 | return diag; | ||
| 503 | } | ||
| 504 | } | ||
| 505 | |||
| 506 | if (!found) | ||
| 507 | found = kdbnearsym(addr, &symtab); | ||
| 508 | |||
| 509 | (*nextarg)++; | ||
| 510 | |||
| 511 | if (name) | ||
| 512 | *name = symname; | ||
| 513 | if (value) | ||
| 514 | *value = addr; | ||
| 515 | if (offset && name && *name) | ||
| 516 | *offset = addr - symtab.sym_start; | ||
| 517 | |||
| 518 | if ((*nextarg > argc) | ||
| 519 | && (symbol == '\0')) | ||
| 520 | return 0; | ||
| 521 | |||
| 522 | /* | ||
| 523 | * check for +/- and offset | ||
| 524 | */ | ||
| 525 | |||
| 526 | if (symbol == '\0') { | ||
| 527 | if ((argv[*nextarg][0] != '+') | ||
| 528 | && (argv[*nextarg][0] != '-')) { | ||
| 529 | /* | ||
| 530 | * Not our argument. Return. | ||
| 531 | */ | ||
| 532 | return 0; | ||
| 533 | } else { | ||
| 534 | positive = (argv[*nextarg][0] == '+'); | ||
| 535 | (*nextarg)++; | ||
| 536 | } | ||
| 537 | } else | ||
| 538 | positive = (symbol == '+'); | ||
| 539 | |||
| 540 | /* | ||
| 541 | * Now there must be an offset! | ||
| 542 | */ | ||
| 543 | if ((*nextarg > argc) | ||
| 544 | && (symbol == '\0')) { | ||
| 545 | return KDB_INVADDRFMT; | ||
| 546 | } | ||
| 547 | |||
| 548 | if (!symbol) { | ||
| 549 | cp = (char *)argv[*nextarg]; | ||
| 550 | (*nextarg)++; | ||
| 551 | } | ||
| 552 | |||
| 553 | diag = kdbgetularg(cp, &off); | ||
| 554 | if (diag) | ||
| 555 | return diag; | ||
| 556 | |||
| 557 | if (!positive) | ||
| 558 | off = -off; | ||
| 559 | |||
| 560 | if (offset) | ||
| 561 | *offset += off; | ||
| 562 | |||
| 563 | if (value) | ||
| 564 | *value += off; | ||
| 565 | |||
| 566 | return 0; | ||
| 567 | } | ||
| 568 | |||
| 569 | static void kdb_cmderror(int diag) | ||
| 570 | { | ||
| 571 | int i; | ||
| 572 | |||
| 573 | if (diag >= 0) { | ||
| 574 | kdb_printf("no error detected (diagnostic is %d)\n", diag); | ||
| 575 | return; | ||
| 576 | } | ||
| 577 | |||
| 578 | for (i = 0; i < __nkdb_err; i++) { | ||
| 579 | if (kdbmsgs[i].km_diag == diag) { | ||
| 580 | kdb_printf("diag: %d: %s\n", diag, kdbmsgs[i].km_msg); | ||
| 581 | return; | ||
| 582 | } | ||
| 583 | } | ||
| 584 | |||
| 585 | kdb_printf("Unknown diag %d\n", -diag); | ||
| 586 | } | ||
| 587 | |||
| 588 | /* | ||
| 589 | * kdb_defcmd, kdb_defcmd2 - This function implements the 'defcmd' | ||
| 590 | * command which defines one command as a set of other commands, | ||
| 591 | * terminated by endefcmd. kdb_defcmd processes the initial | ||
| 592 | * 'defcmd' command, kdb_defcmd2 is invoked from kdb_parse for | ||
| 593 | * the following commands until 'endefcmd'. | ||
| 594 | * Inputs: | ||
| 595 | * argc argument count | ||
| 596 | * argv argument vector | ||
| 597 | * Returns: | ||
| 598 | * zero for success, a kdb diagnostic if error | ||
| 599 | */ | ||
| 600 | struct defcmd_set { | ||
| 601 | int count; | ||
| 602 | int usable; | ||
| 603 | char *name; | ||
| 604 | char *usage; | ||
| 605 | char *help; | ||
| 606 | char **command; | ||
| 607 | }; | ||
| 608 | static struct defcmd_set *defcmd_set; | ||
| 609 | static int defcmd_set_count; | ||
| 610 | static int defcmd_in_progress; | ||
| 611 | |||
| 612 | /* Forward references */ | ||
| 613 | static int kdb_exec_defcmd(int argc, const char **argv); | ||
| 614 | |||
| 615 | static int kdb_defcmd2(const char *cmdstr, const char *argv0) | ||
| 616 | { | ||
| 617 | struct defcmd_set *s = defcmd_set + defcmd_set_count - 1; | ||
| 618 | char **save_command = s->command; | ||
| 619 | if (strcmp(argv0, "endefcmd") == 0) { | ||
| 620 | defcmd_in_progress = 0; | ||
| 621 | if (!s->count) | ||
| 622 | s->usable = 0; | ||
| 623 | if (s->usable) | ||
| 624 | kdb_register(s->name, kdb_exec_defcmd, | ||
| 625 | s->usage, s->help, 0); | ||
| 626 | return 0; | ||
| 627 | } | ||
| 628 | if (!s->usable) | ||
| 629 | return KDB_NOTIMP; | ||
| 630 | s->command = kmalloc((s->count + 1) * sizeof(*(s->command)), GFP_KDB); | ||
| 631 | if (!s->command) { | ||
| 632 | kdb_printf("Could not allocate new kdb_defcmd table for %s\n", | ||
| 633 | cmdstr); | ||
| 634 | s->usable = 0; | ||
| 635 | return KDB_NOTIMP; | ||
| 636 | } | ||
| 637 | memcpy(s->command, save_command, s->count * sizeof(*(s->command))); | ||
| 638 | s->command[s->count++] = kdb_strdup(cmdstr, GFP_KDB); | ||
| 639 | kfree(save_command); | ||
| 640 | return 0; | ||
| 641 | } | ||
| 642 | |||
| 643 | static int kdb_defcmd(int argc, const char **argv) | ||
| 644 | { | ||
| 645 | struct defcmd_set *save_defcmd_set = defcmd_set, *s; | ||
| 646 | if (defcmd_in_progress) { | ||
| 647 | kdb_printf("kdb: nested defcmd detected, assuming missing " | ||
| 648 | "endefcmd\n"); | ||
| 649 | kdb_defcmd2("endefcmd", "endefcmd"); | ||
| 650 | } | ||
| 651 | if (argc == 0) { | ||
| 652 | int i; | ||
| 653 | for (s = defcmd_set; s < defcmd_set + defcmd_set_count; ++s) { | ||
| 654 | kdb_printf("defcmd %s \"%s\" \"%s\"\n", s->name, | ||
| 655 | s->usage, s->help); | ||
| 656 | for (i = 0; i < s->count; ++i) | ||
| 657 | kdb_printf("%s", s->command[i]); | ||
| 658 | kdb_printf("endefcmd\n"); | ||
| 659 | } | ||
| 660 | return 0; | ||
| 661 | } | ||
| 662 | if (argc != 3) | ||
| 663 | return KDB_ARGCOUNT; | ||
| 664 | defcmd_set = kmalloc((defcmd_set_count + 1) * sizeof(*defcmd_set), | ||
| 665 | GFP_KDB); | ||
| 666 | if (!defcmd_set) { | ||
| 667 | kdb_printf("Could not allocate new defcmd_set entry for %s\n", | ||
| 668 | argv[1]); | ||
| 669 | defcmd_set = save_defcmd_set; | ||
| 670 | return KDB_NOTIMP; | ||
| 671 | } | ||
| 672 | memcpy(defcmd_set, save_defcmd_set, | ||
| 673 | defcmd_set_count * sizeof(*defcmd_set)); | ||
| 674 | kfree(save_defcmd_set); | ||
| 675 | s = defcmd_set + defcmd_set_count; | ||
| 676 | memset(s, 0, sizeof(*s)); | ||
| 677 | s->usable = 1; | ||
| 678 | s->name = kdb_strdup(argv[1], GFP_KDB); | ||
| 679 | s->usage = kdb_strdup(argv[2], GFP_KDB); | ||
| 680 | s->help = kdb_strdup(argv[3], GFP_KDB); | ||
| 681 | if (s->usage[0] == '"') { | ||
| 682 | strcpy(s->usage, s->usage+1); | ||
| 683 | s->usage[strlen(s->usage)-1] = '\0'; | ||
| 684 | } | ||
| 685 | if (s->help[0] == '"') { | ||
| 686 | strcpy(s->help, s->help+1); | ||
| 687 | s->help[strlen(s->help)-1] = '\0'; | ||
| 688 | } | ||
| 689 | ++defcmd_set_count; | ||
| 690 | defcmd_in_progress = 1; | ||
| 691 | return 0; | ||
| 692 | } | ||
| 693 | |||
| 694 | /* | ||
| 695 | * kdb_exec_defcmd - Execute the set of commands associated with this | ||
| 696 | * defcmd name. | ||
| 697 | * Inputs: | ||
| 698 | * argc argument count | ||
| 699 | * argv argument vector | ||
| 700 | * Returns: | ||
| 701 | * zero for success, a kdb diagnostic if error | ||
| 702 | */ | ||
| 703 | static int kdb_exec_defcmd(int argc, const char **argv) | ||
| 704 | { | ||
| 705 | int i, ret; | ||
| 706 | struct defcmd_set *s; | ||
| 707 | if (argc != 0) | ||
| 708 | return KDB_ARGCOUNT; | ||
| 709 | for (s = defcmd_set, i = 0; i < defcmd_set_count; ++i, ++s) { | ||
| 710 | if (strcmp(s->name, argv[0]) == 0) | ||
| 711 | break; | ||
| 712 | } | ||
| 713 | if (i == defcmd_set_count) { | ||
| 714 | kdb_printf("kdb_exec_defcmd: could not find commands for %s\n", | ||
| 715 | argv[0]); | ||
| 716 | return KDB_NOTIMP; | ||
| 717 | } | ||
| 718 | for (i = 0; i < s->count; ++i) { | ||
| 719 | /* Recursive use of kdb_parse, do not use argv after | ||
| 720 | * this point */ | ||
| 721 | argv = NULL; | ||
| 722 | kdb_printf("[%s]kdb> %s\n", s->name, s->command[i]); | ||
| 723 | ret = kdb_parse(s->command[i]); | ||
| 724 | if (ret) | ||
| 725 | return ret; | ||
| 726 | } | ||
| 727 | return 0; | ||
| 728 | } | ||
| 729 | |||
| 730 | /* Command history */ | ||
| 731 | #define KDB_CMD_HISTORY_COUNT 32 | ||
| 732 | #define CMD_BUFLEN 200 /* kdb_printf: max printline | ||
| 733 | * size == 256 */ | ||
| 734 | static unsigned int cmd_head, cmd_tail; | ||
| 735 | static unsigned int cmdptr; | ||
| 736 | static char cmd_hist[KDB_CMD_HISTORY_COUNT][CMD_BUFLEN]; | ||
| 737 | static char cmd_cur[CMD_BUFLEN]; | ||
| 738 | |||
| 739 | /* | ||
| 740 | * The "str" argument may point to something like | grep xyz | ||
| 741 | */ | ||
| 742 | static void parse_grep(const char *str) | ||
| 743 | { | ||
| 744 | int len; | ||
| 745 | char *cp = (char *)str, *cp2; | ||
| 746 | |||
| 747 | /* sanity check: we should have been called with the \ first */ | ||
| 748 | if (*cp != '|') | ||
| 749 | return; | ||
| 750 | cp++; | ||
| 751 | while (isspace(*cp)) | ||
| 752 | cp++; | ||
| 753 | if (strncmp(cp, "grep ", 5)) { | ||
| 754 | kdb_printf("invalid 'pipe', see grephelp\n"); | ||
| 755 | return; | ||
| 756 | } | ||
| 757 | cp += 5; | ||
| 758 | while (isspace(*cp)) | ||
| 759 | cp++; | ||
| 760 | cp2 = strchr(cp, '\n'); | ||
| 761 | if (cp2) | ||
| 762 | *cp2 = '\0'; /* remove the trailing newline */ | ||
| 763 | len = strlen(cp); | ||
| 764 | if (len == 0) { | ||
| 765 | kdb_printf("invalid 'pipe', see grephelp\n"); | ||
| 766 | return; | ||
| 767 | } | ||
| 768 | /* now cp points to a nonzero length search string */ | ||
| 769 | if (*cp == '"') { | ||
| 770 | /* allow it be "x y z" by removing the "'s - there must | ||
| 771 | be two of them */ | ||
| 772 | cp++; | ||
| 773 | cp2 = strchr(cp, '"'); | ||
| 774 | if (!cp2) { | ||
| 775 | kdb_printf("invalid quoted string, see grephelp\n"); | ||
| 776 | return; | ||
| 777 | } | ||
| 778 | *cp2 = '\0'; /* end the string where the 2nd " was */ | ||
| 779 | } | ||
| 780 | kdb_grep_leading = 0; | ||
| 781 | if (*cp == '^') { | ||
| 782 | kdb_grep_leading = 1; | ||
| 783 | cp++; | ||
| 784 | } | ||
| 785 | len = strlen(cp); | ||
| 786 | kdb_grep_trailing = 0; | ||
| 787 | if (*(cp+len-1) == '$') { | ||
| 788 | kdb_grep_trailing = 1; | ||
| 789 | *(cp+len-1) = '\0'; | ||
| 790 | } | ||
| 791 | len = strlen(cp); | ||
| 792 | if (!len) | ||
| 793 | return; | ||
| 794 | if (len >= GREP_LEN) { | ||
| 795 | kdb_printf("search string too long\n"); | ||
| 796 | return; | ||
| 797 | } | ||
| 798 | strcpy(kdb_grep_string, cp); | ||
| 799 | kdb_grepping_flag++; | ||
| 800 | return; | ||
| 801 | } | ||
| 802 | |||
| 803 | /* | ||
| 804 | * kdb_parse - Parse the command line, search the command table for a | ||
| 805 | * matching command and invoke the command function. This | ||
| 806 | * function may be called recursively, if it is, the second call | ||
| 807 | * will overwrite argv and cbuf. It is the caller's | ||
| 808 | * responsibility to save their argv if they recursively call | ||
| 809 | * kdb_parse(). | ||
| 810 | * Parameters: | ||
| 811 | * cmdstr The input command line to be parsed. | ||
| 812 | * regs The registers at the time kdb was entered. | ||
| 813 | * Returns: | ||
| 814 | * Zero for success, a kdb diagnostic if failure. | ||
| 815 | * Remarks: | ||
| 816 | * Limited to 20 tokens. | ||
| 817 | * | ||
| 818 | * Real rudimentary tokenization. Basically only whitespace | ||
| 819 | * is considered a token delimeter (but special consideration | ||
| 820 | * is taken of the '=' sign as used by the 'set' command). | ||
| 821 | * | ||
| 822 | * The algorithm used to tokenize the input string relies on | ||
| 823 | * there being at least one whitespace (or otherwise useless) | ||
| 824 | * character between tokens as the character immediately following | ||
| 825 | * the token is altered in-place to a null-byte to terminate the | ||
| 826 | * token string. | ||
| 827 | */ | ||
| 828 | |||
| 829 | #define MAXARGC 20 | ||
| 830 | |||
| 831 | int kdb_parse(const char *cmdstr) | ||
| 832 | { | ||
| 833 | static char *argv[MAXARGC]; | ||
| 834 | static int argc; | ||
| 835 | static char cbuf[CMD_BUFLEN+2]; | ||
| 836 | char *cp; | ||
| 837 | char *cpp, quoted; | ||
| 838 | kdbtab_t *tp; | ||
| 839 | int i, escaped, ignore_errors = 0, check_grep; | ||
| 840 | |||
| 841 | /* | ||
| 842 | * First tokenize the command string. | ||
| 843 | */ | ||
| 844 | cp = (char *)cmdstr; | ||
| 845 | kdb_grepping_flag = check_grep = 0; | ||
| 846 | |||
| 847 | if (KDB_FLAG(CMD_INTERRUPT)) { | ||
| 848 | /* Previous command was interrupted, newline must not | ||
| 849 | * repeat the command */ | ||
| 850 | KDB_FLAG_CLEAR(CMD_INTERRUPT); | ||
| 851 | KDB_STATE_SET(PAGER); | ||
| 852 | argc = 0; /* no repeat */ | ||
| 853 | } | ||
| 854 | |||
| 855 | if (*cp != '\n' && *cp != '\0') { | ||
| 856 | argc = 0; | ||
| 857 | cpp = cbuf; | ||
| 858 | while (*cp) { | ||
| 859 | /* skip whitespace */ | ||
| 860 | while (isspace(*cp)) | ||
| 861 | cp++; | ||
| 862 | if ((*cp == '\0') || (*cp == '\n') || | ||
| 863 | (*cp == '#' && !defcmd_in_progress)) | ||
| 864 | break; | ||
| 865 | /* special case: check for | grep pattern */ | ||
| 866 | if (*cp == '|') { | ||
| 867 | check_grep++; | ||
| 868 | break; | ||
| 869 | } | ||
| 870 | if (cpp >= cbuf + CMD_BUFLEN) { | ||
| 871 | kdb_printf("kdb_parse: command buffer " | ||
| 872 | "overflow, command ignored\n%s\n", | ||
| 873 | cmdstr); | ||
| 874 | return KDB_NOTFOUND; | ||
| 875 | } | ||
| 876 | if (argc >= MAXARGC - 1) { | ||
| 877 | kdb_printf("kdb_parse: too many arguments, " | ||
| 878 | "command ignored\n%s\n", cmdstr); | ||
| 879 | return KDB_NOTFOUND; | ||
| 880 | } | ||
| 881 | argv[argc++] = cpp; | ||
| 882 | escaped = 0; | ||
| 883 | quoted = '\0'; | ||
| 884 | /* Copy to next unquoted and unescaped | ||
| 885 | * whitespace or '=' */ | ||
| 886 | while (*cp && *cp != '\n' && | ||
| 887 | (escaped || quoted || !isspace(*cp))) { | ||
| 888 | if (cpp >= cbuf + CMD_BUFLEN) | ||
| 889 | break; | ||
| 890 | if (escaped) { | ||
| 891 | escaped = 0; | ||
| 892 | *cpp++ = *cp++; | ||
| 893 | continue; | ||
| 894 | } | ||
| 895 | if (*cp == '\\') { | ||
| 896 | escaped = 1; | ||
| 897 | ++cp; | ||
| 898 | continue; | ||
| 899 | } | ||
| 900 | if (*cp == quoted) | ||
| 901 | quoted = '\0'; | ||
| 902 | else if (*cp == '\'' || *cp == '"') | ||
| 903 | quoted = *cp; | ||
| 904 | *cpp = *cp++; | ||
| 905 | if (*cpp == '=' && !quoted) | ||
| 906 | break; | ||
| 907 | ++cpp; | ||
| 908 | } | ||
| 909 | *cpp++ = '\0'; /* Squash a ws or '=' character */ | ||
| 910 | } | ||
| 911 | } | ||
| 912 | if (!argc) | ||
| 913 | return 0; | ||
| 914 | if (check_grep) | ||
| 915 | parse_grep(cp); | ||
| 916 | if (defcmd_in_progress) { | ||
| 917 | int result = kdb_defcmd2(cmdstr, argv[0]); | ||
| 918 | if (!defcmd_in_progress) { | ||
| 919 | argc = 0; /* avoid repeat on endefcmd */ | ||
| 920 | *(argv[0]) = '\0'; | ||
| 921 | } | ||
| 922 | return result; | ||
| 923 | } | ||
| 924 | if (argv[0][0] == '-' && argv[0][1] && | ||
| 925 | (argv[0][1] < '0' || argv[0][1] > '9')) { | ||
| 926 | ignore_errors = 1; | ||
| 927 | ++argv[0]; | ||
| 928 | } | ||
| 929 | |||
| 930 | for_each_kdbcmd(tp, i) { | ||
| 931 | if (tp->cmd_name) { | ||
| 932 | /* | ||
| 933 | * If this command is allowed to be abbreviated, | ||
| 934 | * check to see if this is it. | ||
| 935 | */ | ||
| 936 | |||
| 937 | if (tp->cmd_minlen | ||
| 938 | && (strlen(argv[0]) <= tp->cmd_minlen)) { | ||
| 939 | if (strncmp(argv[0], | ||
| 940 | tp->cmd_name, | ||
| 941 | tp->cmd_minlen) == 0) { | ||
| 942 | break; | ||
| 943 | } | ||
| 944 | } | ||
| 945 | |||
| 946 | if (strcmp(argv[0], tp->cmd_name) == 0) | ||
| 947 | break; | ||
| 948 | } | ||
| 949 | } | ||
| 950 | |||
| 951 | /* | ||
| 952 | * If we don't find a command by this name, see if the first | ||
| 953 | * few characters of this match any of the known commands. | ||
| 954 | * e.g., md1c20 should match md. | ||
| 955 | */ | ||
| 956 | if (i == kdb_max_commands) { | ||
| 957 | for_each_kdbcmd(tp, i) { | ||
| 958 | if (tp->cmd_name) { | ||
| 959 | if (strncmp(argv[0], | ||
| 960 | tp->cmd_name, | ||
| 961 | strlen(tp->cmd_name)) == 0) { | ||
| 962 | break; | ||
| 963 | } | ||
| 964 | } | ||
| 965 | } | ||
| 966 | } | ||
| 967 | |||
| 968 | if (i < kdb_max_commands) { | ||
| 969 | int result; | ||
| 970 | KDB_STATE_SET(CMD); | ||
| 971 | result = (*tp->cmd_func)(argc-1, (const char **)argv); | ||
| 972 | if (result && ignore_errors && result > KDB_CMD_GO) | ||
| 973 | result = 0; | ||
| 974 | KDB_STATE_CLEAR(CMD); | ||
| 975 | switch (tp->cmd_repeat) { | ||
| 976 | case KDB_REPEAT_NONE: | ||
| 977 | argc = 0; | ||
| 978 | if (argv[0]) | ||
| 979 | *(argv[0]) = '\0'; | ||
| 980 | break; | ||
| 981 | case KDB_REPEAT_NO_ARGS: | ||
| 982 | argc = 1; | ||
| 983 | if (argv[1]) | ||
| 984 | *(argv[1]) = '\0'; | ||
| 985 | break; | ||
| 986 | case KDB_REPEAT_WITH_ARGS: | ||
| 987 | break; | ||
| 988 | } | ||
| 989 | return result; | ||
| 990 | } | ||
| 991 | |||
| 992 | /* | ||
| 993 | * If the input with which we were presented does not | ||
| 994 | * map to an existing command, attempt to parse it as an | ||
| 995 | * address argument and display the result. Useful for | ||
| 996 | * obtaining the address of a variable, or the nearest symbol | ||
| 997 | * to an address contained in a register. | ||
| 998 | */ | ||
| 999 | { | ||
| 1000 | unsigned long value; | ||
| 1001 | char *name = NULL; | ||
| 1002 | long offset; | ||
| 1003 | int nextarg = 0; | ||
| 1004 | |||
| 1005 | if (kdbgetaddrarg(0, (const char **)argv, &nextarg, | ||
| 1006 | &value, &offset, &name)) { | ||
| 1007 | return KDB_NOTFOUND; | ||
| 1008 | } | ||
| 1009 | |||
| 1010 | kdb_printf("%s = ", argv[0]); | ||
| 1011 | kdb_symbol_print(value, NULL, KDB_SP_DEFAULT); | ||
| 1012 | kdb_printf("\n"); | ||
| 1013 | return 0; | ||
| 1014 | } | ||
| 1015 | } | ||
| 1016 | |||
| 1017 | |||
| 1018 | static int handle_ctrl_cmd(char *cmd) | ||
| 1019 | { | ||
| 1020 | #define CTRL_P 16 | ||
| 1021 | #define CTRL_N 14 | ||
| 1022 | |||
| 1023 | /* initial situation */ | ||
| 1024 | if (cmd_head == cmd_tail) | ||
| 1025 | return 0; | ||
| 1026 | switch (*cmd) { | ||
| 1027 | case CTRL_P: | ||
| 1028 | if (cmdptr != cmd_tail) | ||
| 1029 | cmdptr = (cmdptr-1) % KDB_CMD_HISTORY_COUNT; | ||
| 1030 | strncpy(cmd_cur, cmd_hist[cmdptr], CMD_BUFLEN); | ||
| 1031 | return 1; | ||
| 1032 | case CTRL_N: | ||
| 1033 | if (cmdptr != cmd_head) | ||
| 1034 | cmdptr = (cmdptr+1) % KDB_CMD_HISTORY_COUNT; | ||
| 1035 | strncpy(cmd_cur, cmd_hist[cmdptr], CMD_BUFLEN); | ||
| 1036 | return 1; | ||
| 1037 | } | ||
| 1038 | return 0; | ||
| 1039 | } | ||
| 1040 | |||
| 1041 | /* | ||
| 1042 | * kdb_reboot - This function implements the 'reboot' command. Reboot | ||
| 1043 | * the system immediately, or loop for ever on failure. | ||
| 1044 | */ | ||
| 1045 | static int kdb_reboot(int argc, const char **argv) | ||
| 1046 | { | ||
| 1047 | emergency_restart(); | ||
| 1048 | kdb_printf("Hmm, kdb_reboot did not reboot, spinning here\n"); | ||
| 1049 | while (1) | ||
| 1050 | cpu_relax(); | ||
| 1051 | /* NOTREACHED */ | ||
| 1052 | return 0; | ||
| 1053 | } | ||
| 1054 | |||
| 1055 | static void kdb_dumpregs(struct pt_regs *regs) | ||
| 1056 | { | ||
| 1057 | int old_lvl = console_loglevel; | ||
| 1058 | console_loglevel = 15; | ||
| 1059 | kdb_trap_printk++; | ||
| 1060 | show_regs(regs); | ||
| 1061 | kdb_trap_printk--; | ||
| 1062 | kdb_printf("\n"); | ||
| 1063 | console_loglevel = old_lvl; | ||
| 1064 | } | ||
| 1065 | |||
| 1066 | void kdb_set_current_task(struct task_struct *p) | ||
| 1067 | { | ||
| 1068 | kdb_current_task = p; | ||
| 1069 | |||
| 1070 | if (kdb_task_has_cpu(p)) { | ||
| 1071 | kdb_current_regs = KDB_TSKREGS(kdb_process_cpu(p)); | ||
| 1072 | return; | ||
| 1073 | } | ||
| 1074 | kdb_current_regs = NULL; | ||
| 1075 | } | ||
| 1076 | |||
| 1077 | /* | ||
| 1078 | * kdb_local - The main code for kdb. This routine is invoked on a | ||
| 1079 | * specific processor, it is not global. The main kdb() routine | ||
| 1080 | * ensures that only one processor at a time is in this routine. | ||
| 1081 | * This code is called with the real reason code on the first | ||
| 1082 | * entry to a kdb session, thereafter it is called with reason | ||
| 1083 | * SWITCH, even if the user goes back to the original cpu. | ||
| 1084 | * Inputs: | ||
| 1085 | * reason The reason KDB was invoked | ||
| 1086 | * error The hardware-defined error code | ||
| 1087 | * regs The exception frame at time of fault/breakpoint. | ||
| 1088 | * db_result Result code from the break or debug point. | ||
| 1089 | * Returns: | ||
| 1090 | * 0 KDB was invoked for an event which it wasn't responsible | ||
| 1091 | * 1 KDB handled the event for which it was invoked. | ||
| 1092 | * KDB_CMD_GO User typed 'go'. | ||
| 1093 | * KDB_CMD_CPU User switched to another cpu. | ||
| 1094 | * KDB_CMD_SS Single step. | ||
| 1095 | * KDB_CMD_SSB Single step until branch. | ||
| 1096 | */ | ||
| 1097 | static int kdb_local(kdb_reason_t reason, int error, struct pt_regs *regs, | ||
| 1098 | kdb_dbtrap_t db_result) | ||
| 1099 | { | ||
| 1100 | char *cmdbuf; | ||
| 1101 | int diag; | ||
| 1102 | struct task_struct *kdb_current = | ||
| 1103 | kdb_curr_task(raw_smp_processor_id()); | ||
| 1104 | |||
| 1105 | KDB_DEBUG_STATE("kdb_local 1", reason); | ||
| 1106 | kdb_go_count = 0; | ||
| 1107 | if (reason == KDB_REASON_DEBUG) { | ||
| 1108 | /* special case below */ | ||
| 1109 | } else { | ||
| 1110 | kdb_printf("\nEntering kdb (current=0x%p, pid %d) ", | ||
| 1111 | kdb_current, kdb_current->pid); | ||
| 1112 | #if defined(CONFIG_SMP) | ||
| 1113 | kdb_printf("on processor %d ", raw_smp_processor_id()); | ||
| 1114 | #endif | ||
| 1115 | } | ||
| 1116 | |||
| 1117 | switch (reason) { | ||
| 1118 | case KDB_REASON_DEBUG: | ||
| 1119 | { | ||
| 1120 | /* | ||
| 1121 | * If re-entering kdb after a single step | ||
| 1122 | * command, don't print the message. | ||
| 1123 | */ | ||
| 1124 | switch (db_result) { | ||
| 1125 | case KDB_DB_BPT: | ||
| 1126 | kdb_printf("\nEntering kdb (0x%p, pid %d) ", | ||
| 1127 | kdb_current, kdb_current->pid); | ||
| 1128 | #if defined(CONFIG_SMP) | ||
| 1129 | kdb_printf("on processor %d ", raw_smp_processor_id()); | ||
| 1130 | #endif | ||
| 1131 | kdb_printf("due to Debug @ " kdb_machreg_fmt "\n", | ||
| 1132 | instruction_pointer(regs)); | ||
| 1133 | break; | ||
| 1134 | case KDB_DB_SSB: | ||
| 1135 | /* | ||
| 1136 | * In the midst of ssb command. Just return. | ||
| 1137 | */ | ||
| 1138 | KDB_DEBUG_STATE("kdb_local 3", reason); | ||
| 1139 | return KDB_CMD_SSB; /* Continue with SSB command */ | ||
| 1140 | |||
| 1141 | break; | ||
| 1142 | case KDB_DB_SS: | ||
| 1143 | break; | ||
| 1144 | case KDB_DB_SSBPT: | ||
| 1145 | KDB_DEBUG_STATE("kdb_local 4", reason); | ||
| 1146 | return 1; /* kdba_db_trap did the work */ | ||
| 1147 | default: | ||
| 1148 | kdb_printf("kdb: Bad result from kdba_db_trap: %d\n", | ||
| 1149 | db_result); | ||
| 1150 | break; | ||
| 1151 | } | ||
| 1152 | |||
| 1153 | } | ||
| 1154 | break; | ||
| 1155 | case KDB_REASON_ENTER: | ||
| 1156 | if (KDB_STATE(KEYBOARD)) | ||
| 1157 | kdb_printf("due to Keyboard Entry\n"); | ||
| 1158 | else | ||
| 1159 | kdb_printf("due to KDB_ENTER()\n"); | ||
| 1160 | break; | ||
| 1161 | case KDB_REASON_KEYBOARD: | ||
| 1162 | KDB_STATE_SET(KEYBOARD); | ||
| 1163 | kdb_printf("due to Keyboard Entry\n"); | ||
| 1164 | break; | ||
| 1165 | case KDB_REASON_ENTER_SLAVE: | ||
| 1166 | /* drop through, slaves only get released via cpu switch */ | ||
| 1167 | case KDB_REASON_SWITCH: | ||
| 1168 | kdb_printf("due to cpu switch\n"); | ||
| 1169 | break; | ||
| 1170 | case KDB_REASON_OOPS: | ||
| 1171 | kdb_printf("Oops: %s\n", kdb_diemsg); | ||
| 1172 | kdb_printf("due to oops @ " kdb_machreg_fmt "\n", | ||
| 1173 | instruction_pointer(regs)); | ||
| 1174 | kdb_dumpregs(regs); | ||
| 1175 | break; | ||
| 1176 | case KDB_REASON_NMI: | ||
| 1177 | kdb_printf("due to NonMaskable Interrupt @ " | ||
| 1178 | kdb_machreg_fmt "\n", | ||
| 1179 | instruction_pointer(regs)); | ||
| 1180 | kdb_dumpregs(regs); | ||
| 1181 | break; | ||
| 1182 | case KDB_REASON_SSTEP: | ||
| 1183 | case KDB_REASON_BREAK: | ||
| 1184 | kdb_printf("due to %s @ " kdb_machreg_fmt "\n", | ||
| 1185 | reason == KDB_REASON_BREAK ? | ||
| 1186 | "Breakpoint" : "SS trap", instruction_pointer(regs)); | ||
| 1187 | /* | ||
| 1188 | * Determine if this breakpoint is one that we | ||
| 1189 | * are interested in. | ||
| 1190 | */ | ||
| 1191 | if (db_result != KDB_DB_BPT) { | ||
| 1192 | kdb_printf("kdb: error return from kdba_bp_trap: %d\n", | ||
| 1193 | db_result); | ||
| 1194 | KDB_DEBUG_STATE("kdb_local 6", reason); | ||
| 1195 | return 0; /* Not for us, dismiss it */ | ||
| 1196 | } | ||
| 1197 | break; | ||
| 1198 | case KDB_REASON_RECURSE: | ||
| 1199 | kdb_printf("due to Recursion @ " kdb_machreg_fmt "\n", | ||
| 1200 | instruction_pointer(regs)); | ||
| 1201 | break; | ||
| 1202 | default: | ||
| 1203 | kdb_printf("kdb: unexpected reason code: %d\n", reason); | ||
| 1204 | KDB_DEBUG_STATE("kdb_local 8", reason); | ||
| 1205 | return 0; /* Not for us, dismiss it */ | ||
| 1206 | } | ||
| 1207 | |||
| 1208 | while (1) { | ||
| 1209 | /* | ||
| 1210 | * Initialize pager context. | ||
| 1211 | */ | ||
| 1212 | kdb_nextline = 1; | ||
| 1213 | KDB_STATE_CLEAR(SUPPRESS); | ||
| 1214 | |||
| 1215 | cmdbuf = cmd_cur; | ||
| 1216 | *cmdbuf = '\0'; | ||
| 1217 | *(cmd_hist[cmd_head]) = '\0'; | ||
| 1218 | |||
| 1219 | if (KDB_FLAG(ONLY_DO_DUMP)) { | ||
| 1220 | /* kdb is off but a catastrophic error requires a dump. | ||
| 1221 | * Take the dump and reboot. | ||
| 1222 | * Turn on logging so the kdb output appears in the log | ||
| 1223 | * buffer in the dump. | ||
| 1224 | */ | ||
| 1225 | const char *setargs[] = { "set", "LOGGING", "1" }; | ||
| 1226 | kdb_set(2, setargs); | ||
| 1227 | kdb_reboot(0, NULL); | ||
| 1228 | /*NOTREACHED*/ | ||
| 1229 | } | ||
| 1230 | |||
| 1231 | do_full_getstr: | ||
| 1232 | #if defined(CONFIG_SMP) | ||
| 1233 | snprintf(kdb_prompt_str, CMD_BUFLEN, kdbgetenv("PROMPT"), | ||
| 1234 | raw_smp_processor_id()); | ||
| 1235 | #else | ||
| 1236 | snprintf(kdb_prompt_str, CMD_BUFLEN, kdbgetenv("PROMPT")); | ||
| 1237 | #endif | ||
| 1238 | if (defcmd_in_progress) | ||
| 1239 | strncat(kdb_prompt_str, "[defcmd]", CMD_BUFLEN); | ||
| 1240 | |||
| 1241 | /* | ||
| 1242 | * Fetch command from keyboard | ||
| 1243 | */ | ||
| 1244 | cmdbuf = kdb_getstr(cmdbuf, CMD_BUFLEN, kdb_prompt_str); | ||
| 1245 | if (*cmdbuf != '\n') { | ||
| 1246 | if (*cmdbuf < 32) { | ||
| 1247 | if (cmdptr == cmd_head) { | ||
| 1248 | strncpy(cmd_hist[cmd_head], cmd_cur, | ||
| 1249 | CMD_BUFLEN); | ||
| 1250 | *(cmd_hist[cmd_head] + | ||
| 1251 | strlen(cmd_hist[cmd_head])-1) = '\0'; | ||
| 1252 | } | ||
| 1253 | if (!handle_ctrl_cmd(cmdbuf)) | ||
| 1254 | *(cmd_cur+strlen(cmd_cur)-1) = '\0'; | ||
| 1255 | cmdbuf = cmd_cur; | ||
| 1256 | goto do_full_getstr; | ||
| 1257 | } else { | ||
| 1258 | strncpy(cmd_hist[cmd_head], cmd_cur, | ||
| 1259 | CMD_BUFLEN); | ||
| 1260 | } | ||
| 1261 | |||
| 1262 | cmd_head = (cmd_head+1) % KDB_CMD_HISTORY_COUNT; | ||
| 1263 | if (cmd_head == cmd_tail) | ||
| 1264 | cmd_tail = (cmd_tail+1) % KDB_CMD_HISTORY_COUNT; | ||
| 1265 | } | ||
| 1266 | |||
| 1267 | cmdptr = cmd_head; | ||
| 1268 | diag = kdb_parse(cmdbuf); | ||
| 1269 | if (diag == KDB_NOTFOUND) { | ||
| 1270 | kdb_printf("Unknown kdb command: '%s'\n", cmdbuf); | ||
| 1271 | diag = 0; | ||
| 1272 | } | ||
| 1273 | if (diag == KDB_CMD_GO | ||
| 1274 | || diag == KDB_CMD_CPU | ||
| 1275 | || diag == KDB_CMD_SS | ||
| 1276 | || diag == KDB_CMD_SSB | ||
| 1277 | || diag == KDB_CMD_KGDB) | ||
| 1278 | break; | ||
| 1279 | |||
| 1280 | if (diag) | ||
| 1281 | kdb_cmderror(diag); | ||
| 1282 | } | ||
| 1283 | KDB_DEBUG_STATE("kdb_local 9", diag); | ||
| 1284 | return diag; | ||
| 1285 | } | ||
| 1286 | |||
| 1287 | |||
| 1288 | /* | ||
| 1289 | * kdb_print_state - Print the state data for the current processor | ||
| 1290 | * for debugging. | ||
| 1291 | * Inputs: | ||
| 1292 | * text Identifies the debug point | ||
| 1293 | * value Any integer value to be printed, e.g. reason code. | ||
| 1294 | */ | ||
| 1295 | void kdb_print_state(const char *text, int value) | ||
| 1296 | { | ||
| 1297 | kdb_printf("state: %s cpu %d value %d initial %d state %x\n", | ||
| 1298 | text, raw_smp_processor_id(), value, kdb_initial_cpu, | ||
| 1299 | kdb_state); | ||
| 1300 | } | ||
| 1301 | |||
| 1302 | /* | ||
| 1303 | * kdb_main_loop - After initial setup and assignment of the | ||
| 1304 | * controlling cpu, all cpus are in this loop. One cpu is in | ||
| 1305 | * control and will issue the kdb prompt, the others will spin | ||
| 1306 | * until 'go' or cpu switch. | ||
| 1307 | * | ||
| 1308 | * To get a consistent view of the kernel stacks for all | ||
| 1309 | * processes, this routine is invoked from the main kdb code via | ||
| 1310 | * an architecture specific routine. kdba_main_loop is | ||
| 1311 | * responsible for making the kernel stacks consistent for all | ||
| 1312 | * processes, there should be no difference between a blocked | ||
| 1313 | * process and a running process as far as kdb is concerned. | ||
| 1314 | * Inputs: | ||
| 1315 | * reason The reason KDB was invoked | ||
| 1316 | * error The hardware-defined error code | ||
| 1317 | * reason2 kdb's current reason code. | ||
| 1318 | * Initially error but can change | ||
| 1319 | * acording to kdb state. | ||
| 1320 | * db_result Result code from break or debug point. | ||
| 1321 | * regs The exception frame at time of fault/breakpoint. | ||
| 1322 | * should always be valid. | ||
| 1323 | * Returns: | ||
| 1324 | * 0 KDB was invoked for an event which it wasn't responsible | ||
| 1325 | * 1 KDB handled the event for which it was invoked. | ||
| 1326 | */ | ||
| 1327 | int kdb_main_loop(kdb_reason_t reason, kdb_reason_t reason2, int error, | ||
| 1328 | kdb_dbtrap_t db_result, struct pt_regs *regs) | ||
| 1329 | { | ||
| 1330 | int result = 1; | ||
| 1331 | /* Stay in kdb() until 'go', 'ss[b]' or an error */ | ||
| 1332 | while (1) { | ||
| 1333 | /* | ||
| 1334 | * All processors except the one that is in control | ||
| 1335 | * will spin here. | ||
| 1336 | */ | ||
| 1337 | KDB_DEBUG_STATE("kdb_main_loop 1", reason); | ||
| 1338 | while (KDB_STATE(HOLD_CPU)) { | ||
| 1339 | /* state KDB is turned off by kdb_cpu to see if the | ||
| 1340 | * other cpus are still live, each cpu in this loop | ||
| 1341 | * turns it back on. | ||
| 1342 | */ | ||
| 1343 | if (!KDB_STATE(KDB)) | ||
| 1344 | KDB_STATE_SET(KDB); | ||
| 1345 | } | ||
| 1346 | |||
| 1347 | KDB_STATE_CLEAR(SUPPRESS); | ||
| 1348 | KDB_DEBUG_STATE("kdb_main_loop 2", reason); | ||
| 1349 | if (KDB_STATE(LEAVING)) | ||
| 1350 | break; /* Another cpu said 'go' */ | ||
| 1351 | /* Still using kdb, this processor is in control */ | ||
| 1352 | result = kdb_local(reason2, error, regs, db_result); | ||
| 1353 | KDB_DEBUG_STATE("kdb_main_loop 3", result); | ||
| 1354 | |||
| 1355 | if (result == KDB_CMD_CPU) | ||
| 1356 | break; | ||
| 1357 | |||
| 1358 | if (result == KDB_CMD_SS) { | ||
| 1359 | KDB_STATE_SET(DOING_SS); | ||
| 1360 | break; | ||
| 1361 | } | ||
| 1362 | |||
| 1363 | if (result == KDB_CMD_SSB) { | ||
| 1364 | KDB_STATE_SET(DOING_SS); | ||
| 1365 | KDB_STATE_SET(DOING_SSB); | ||
| 1366 | break; | ||
| 1367 | } | ||
| 1368 | |||
| 1369 | if (result == KDB_CMD_KGDB) { | ||
| 1370 | if (!(KDB_STATE(DOING_KGDB) || KDB_STATE(DOING_KGDB2))) | ||
| 1371 | kdb_printf("Entering please attach debugger " | ||
| 1372 | "or use $D#44+ or $3#33\n"); | ||
| 1373 | break; | ||
| 1374 | } | ||
| 1375 | if (result && result != 1 && result != KDB_CMD_GO) | ||
| 1376 | kdb_printf("\nUnexpected kdb_local return code %d\n", | ||
| 1377 | result); | ||
| 1378 | KDB_DEBUG_STATE("kdb_main_loop 4", reason); | ||
| 1379 | break; | ||
| 1380 | } | ||
| 1381 | if (KDB_STATE(DOING_SS)) | ||
| 1382 | KDB_STATE_CLEAR(SSBPT); | ||
| 1383 | |||
| 1384 | return result; | ||
| 1385 | } | ||
| 1386 | |||
| 1387 | /* | ||
| 1388 | * kdb_mdr - This function implements the guts of the 'mdr', memory | ||
| 1389 | * read command. | ||
| 1390 | * mdr <addr arg>,<byte count> | ||
| 1391 | * Inputs: | ||
| 1392 | * addr Start address | ||
| 1393 | * count Number of bytes | ||
| 1394 | * Returns: | ||
| 1395 | * Always 0. Any errors are detected and printed by kdb_getarea. | ||
| 1396 | */ | ||
| 1397 | static int kdb_mdr(unsigned long addr, unsigned int count) | ||
| 1398 | { | ||
| 1399 | unsigned char c; | ||
| 1400 | while (count--) { | ||
| 1401 | if (kdb_getarea(c, addr)) | ||
| 1402 | return 0; | ||
| 1403 | kdb_printf("%02x", c); | ||
| 1404 | addr++; | ||
| 1405 | } | ||
| 1406 | kdb_printf("\n"); | ||
| 1407 | return 0; | ||
| 1408 | } | ||
| 1409 | |||
| 1410 | /* | ||
| 1411 | * kdb_md - This function implements the 'md', 'md1', 'md2', 'md4', | ||
| 1412 | * 'md8' 'mdr' and 'mds' commands. | ||
| 1413 | * | ||
| 1414 | * md|mds [<addr arg> [<line count> [<radix>]]] | ||
| 1415 | * mdWcN [<addr arg> [<line count> [<radix>]]] | ||
| 1416 | * where W = is the width (1, 2, 4 or 8) and N is the count. | ||
| 1417 | * for eg., md1c20 reads 20 bytes, 1 at a time. | ||
| 1418 | * mdr <addr arg>,<byte count> | ||
| 1419 | */ | ||
| 1420 | static void kdb_md_line(const char *fmtstr, unsigned long addr, | ||
| 1421 | int symbolic, int nosect, int bytesperword, | ||
| 1422 | int num, int repeat, int phys) | ||
| 1423 | { | ||
| 1424 | /* print just one line of data */ | ||
| 1425 | kdb_symtab_t symtab; | ||
| 1426 | char cbuf[32]; | ||
| 1427 | char *c = cbuf; | ||
| 1428 | int i; | ||
| 1429 | unsigned long word; | ||
| 1430 | |||
| 1431 | memset(cbuf, '\0', sizeof(cbuf)); | ||
| 1432 | if (phys) | ||
| 1433 | kdb_printf("phys " kdb_machreg_fmt0 " ", addr); | ||
| 1434 | else | ||
| 1435 | kdb_printf(kdb_machreg_fmt0 " ", addr); | ||
| 1436 | |||
| 1437 | for (i = 0; i < num && repeat--; i++) { | ||
| 1438 | if (phys) { | ||
| 1439 | if (kdb_getphysword(&word, addr, bytesperword)) | ||
| 1440 | break; | ||
| 1441 | } else if (kdb_getword(&word, addr, bytesperword)) | ||
| 1442 | break; | ||
| 1443 | kdb_printf(fmtstr, word); | ||
| 1444 | if (symbolic) | ||
| 1445 | kdbnearsym(word, &symtab); | ||
| 1446 | else | ||
| 1447 | memset(&symtab, 0, sizeof(symtab)); | ||
| 1448 | if (symtab.sym_name) { | ||
| 1449 | kdb_symbol_print(word, &symtab, 0); | ||
| 1450 | if (!nosect) { | ||
| 1451 | kdb_printf("\n"); | ||
| 1452 | kdb_printf(" %s %s " | ||
| 1453 | kdb_machreg_fmt " " | ||
| 1454 | kdb_machreg_fmt " " | ||
| 1455 | kdb_machreg_fmt, symtab.mod_name, | ||
| 1456 | symtab.sec_name, symtab.sec_start, | ||
| 1457 | symtab.sym_start, symtab.sym_end); | ||
| 1458 | } | ||
| 1459 | addr += bytesperword; | ||
| 1460 | } else { | ||
| 1461 | union { | ||
| 1462 | u64 word; | ||
| 1463 | unsigned char c[8]; | ||
| 1464 | } wc; | ||
| 1465 | unsigned char *cp; | ||
| 1466 | #ifdef __BIG_ENDIAN | ||
| 1467 | cp = wc.c + 8 - bytesperword; | ||
| 1468 | #else | ||
| 1469 | cp = wc.c; | ||
| 1470 | #endif | ||
| 1471 | wc.word = word; | ||
| 1472 | #define printable_char(c) \ | ||
| 1473 | ({unsigned char __c = c; isascii(__c) && isprint(__c) ? __c : '.'; }) | ||
| 1474 | switch (bytesperword) { | ||
| 1475 | case 8: | ||
| 1476 | *c++ = printable_char(*cp++); | ||
| 1477 | *c++ = printable_char(*cp++); | ||
| 1478 | *c++ = printable_char(*cp++); | ||
| 1479 | *c++ = printable_char(*cp++); | ||
| 1480 | addr += 4; | ||
| 1481 | case 4: | ||
| 1482 | *c++ = printable_char(*cp++); | ||
| 1483 | *c++ = printable_char(*cp++); | ||
| 1484 | addr += 2; | ||
| 1485 | case 2: | ||
| 1486 | *c++ = printable_char(*cp++); | ||
| 1487 | addr++; | ||
| 1488 | case 1: | ||
| 1489 | *c++ = printable_char(*cp++); | ||
| 1490 | addr++; | ||
| 1491 | break; | ||
| 1492 | } | ||
| 1493 | #undef printable_char | ||
| 1494 | } | ||
| 1495 | } | ||
| 1496 | kdb_printf("%*s %s\n", (int)((num-i)*(2*bytesperword + 1)+1), | ||
| 1497 | " ", cbuf); | ||
| 1498 | } | ||
| 1499 | |||
| 1500 | static int kdb_md(int argc, const char **argv) | ||
| 1501 | { | ||
| 1502 | static unsigned long last_addr; | ||
| 1503 | static int last_radix, last_bytesperword, last_repeat; | ||
| 1504 | int radix = 16, mdcount = 8, bytesperword = KDB_WORD_SIZE, repeat; | ||
| 1505 | int nosect = 0; | ||
| 1506 | char fmtchar, fmtstr[64]; | ||
| 1507 | unsigned long addr; | ||
| 1508 | unsigned long word; | ||
| 1509 | long offset = 0; | ||
| 1510 | int symbolic = 0; | ||
| 1511 | int valid = 0; | ||
| 1512 | int phys = 0; | ||
| 1513 | |||
| 1514 | kdbgetintenv("MDCOUNT", &mdcount); | ||
| 1515 | kdbgetintenv("RADIX", &radix); | ||
| 1516 | kdbgetintenv("BYTESPERWORD", &bytesperword); | ||
| 1517 | |||
| 1518 | /* Assume 'md <addr>' and start with environment values */ | ||
| 1519 | repeat = mdcount * 16 / bytesperword; | ||
| 1520 | |||
| 1521 | if (strcmp(argv[0], "mdr") == 0) { | ||
| 1522 | if (argc != 2) | ||
| 1523 | return KDB_ARGCOUNT; | ||
| 1524 | valid = 1; | ||
| 1525 | } else if (isdigit(argv[0][2])) { | ||
| 1526 | bytesperword = (int)(argv[0][2] - '0'); | ||
| 1527 | if (bytesperword == 0) { | ||
| 1528 | bytesperword = last_bytesperword; | ||
| 1529 | if (bytesperword == 0) | ||
| 1530 | bytesperword = 4; | ||
| 1531 | } | ||
| 1532 | last_bytesperword = bytesperword; | ||
| 1533 | repeat = mdcount * 16 / bytesperword; | ||
| 1534 | if (!argv[0][3]) | ||
| 1535 | valid = 1; | ||
| 1536 | else if (argv[0][3] == 'c' && argv[0][4]) { | ||
| 1537 | char *p; | ||
| 1538 | repeat = simple_strtoul(argv[0] + 4, &p, 10); | ||
| 1539 | mdcount = ((repeat * bytesperword) + 15) / 16; | ||
| 1540 | valid = !*p; | ||
| 1541 | } | ||
| 1542 | last_repeat = repeat; | ||
| 1543 | } else if (strcmp(argv[0], "md") == 0) | ||
| 1544 | valid = 1; | ||
| 1545 | else if (strcmp(argv[0], "mds") == 0) | ||
| 1546 | valid = 1; | ||
| 1547 | else if (strcmp(argv[0], "mdp") == 0) { | ||
| 1548 | phys = valid = 1; | ||
| 1549 | } | ||
| 1550 | if (!valid) | ||
| 1551 | return KDB_NOTFOUND; | ||
| 1552 | |||
| 1553 | if (argc == 0) { | ||
| 1554 | if (last_addr == 0) | ||
| 1555 | return KDB_ARGCOUNT; | ||
| 1556 | addr = last_addr; | ||
| 1557 | radix = last_radix; | ||
| 1558 | bytesperword = last_bytesperword; | ||
| 1559 | repeat = last_repeat; | ||
| 1560 | mdcount = ((repeat * bytesperword) + 15) / 16; | ||
| 1561 | } | ||
| 1562 | |||
| 1563 | if (argc) { | ||
| 1564 | unsigned long val; | ||
| 1565 | int diag, nextarg = 1; | ||
| 1566 | diag = kdbgetaddrarg(argc, argv, &nextarg, &addr, | ||
| 1567 | &offset, NULL); | ||
| 1568 | if (diag) | ||
| 1569 | return diag; | ||
| 1570 | if (argc > nextarg+2) | ||
| 1571 | return KDB_ARGCOUNT; | ||
| 1572 | |||
| 1573 | if (argc >= nextarg) { | ||
| 1574 | diag = kdbgetularg(argv[nextarg], &val); | ||
| 1575 | if (!diag) { | ||
| 1576 | mdcount = (int) val; | ||
| 1577 | repeat = mdcount * 16 / bytesperword; | ||
| 1578 | } | ||
| 1579 | } | ||
| 1580 | if (argc >= nextarg+1) { | ||
| 1581 | diag = kdbgetularg(argv[nextarg+1], &val); | ||
| 1582 | if (!diag) | ||
| 1583 | radix = (int) val; | ||
| 1584 | } | ||
| 1585 | } | ||
| 1586 | |||
| 1587 | if (strcmp(argv[0], "mdr") == 0) | ||
| 1588 | return kdb_mdr(addr, mdcount); | ||
| 1589 | |||
| 1590 | switch (radix) { | ||
| 1591 | case 10: | ||
| 1592 | fmtchar = 'd'; | ||
| 1593 | break; | ||
| 1594 | case 16: | ||
| 1595 | fmtchar = 'x'; | ||
| 1596 | break; | ||
| 1597 | case 8: | ||
| 1598 | fmtchar = 'o'; | ||
| 1599 | break; | ||
| 1600 | default: | ||
| 1601 | return KDB_BADRADIX; | ||
| 1602 | } | ||
| 1603 | |||
| 1604 | last_radix = radix; | ||
| 1605 | |||
| 1606 | if (bytesperword > KDB_WORD_SIZE) | ||
| 1607 | return KDB_BADWIDTH; | ||
| 1608 | |||
| 1609 | switch (bytesperword) { | ||
| 1610 | case 8: | ||
| 1611 | sprintf(fmtstr, "%%16.16l%c ", fmtchar); | ||
| 1612 | break; | ||
| 1613 | case 4: | ||
| 1614 | sprintf(fmtstr, "%%8.8l%c ", fmtchar); | ||
| 1615 | break; | ||
| 1616 | case 2: | ||
| 1617 | sprintf(fmtstr, "%%4.4l%c ", fmtchar); | ||
| 1618 | break; | ||
| 1619 | case 1: | ||
| 1620 | sprintf(fmtstr, "%%2.2l%c ", fmtchar); | ||
| 1621 | break; | ||
| 1622 | default: | ||
| 1623 | return KDB_BADWIDTH; | ||
| 1624 | } | ||
| 1625 | |||
| 1626 | last_repeat = repeat; | ||
| 1627 | last_bytesperword = bytesperword; | ||
| 1628 | |||
| 1629 | if (strcmp(argv[0], "mds") == 0) { | ||
| 1630 | symbolic = 1; | ||
| 1631 | /* Do not save these changes as last_*, they are temporary mds | ||
| 1632 | * overrides. | ||
| 1633 | */ | ||
| 1634 | bytesperword = KDB_WORD_SIZE; | ||
| 1635 | repeat = mdcount; | ||
| 1636 | kdbgetintenv("NOSECT", &nosect); | ||
| 1637 | } | ||
| 1638 | |||
| 1639 | /* Round address down modulo BYTESPERWORD */ | ||
| 1640 | |||
| 1641 | addr &= ~(bytesperword-1); | ||
| 1642 | |||
| 1643 | while (repeat > 0) { | ||
| 1644 | unsigned long a; | ||
| 1645 | int n, z, num = (symbolic ? 1 : (16 / bytesperword)); | ||
| 1646 | |||
| 1647 | if (KDB_FLAG(CMD_INTERRUPT)) | ||
| 1648 | return 0; | ||
| 1649 | for (a = addr, z = 0; z < repeat; a += bytesperword, ++z) { | ||
| 1650 | if (phys) { | ||
| 1651 | if (kdb_getphysword(&word, a, bytesperword) | ||
| 1652 | || word) | ||
| 1653 | break; | ||
| 1654 | } else if (kdb_getword(&word, a, bytesperword) || word) | ||
| 1655 | break; | ||
| 1656 | } | ||
| 1657 | n = min(num, repeat); | ||
| 1658 | kdb_md_line(fmtstr, addr, symbolic, nosect, bytesperword, | ||
| 1659 | num, repeat, phys); | ||
| 1660 | addr += bytesperword * n; | ||
| 1661 | repeat -= n; | ||
| 1662 | z = (z + num - 1) / num; | ||
| 1663 | if (z > 2) { | ||
| 1664 | int s = num * (z-2); | ||
| 1665 | kdb_printf(kdb_machreg_fmt0 "-" kdb_machreg_fmt0 | ||
| 1666 | " zero suppressed\n", | ||
| 1667 | addr, addr + bytesperword * s - 1); | ||
| 1668 | addr += bytesperword * s; | ||
| 1669 | repeat -= s; | ||
| 1670 | } | ||
| 1671 | } | ||
| 1672 | last_addr = addr; | ||
| 1673 | |||
| 1674 | return 0; | ||
| 1675 | } | ||
| 1676 | |||
| 1677 | /* | ||
| 1678 | * kdb_mm - This function implements the 'mm' command. | ||
| 1679 | * mm address-expression new-value | ||
| 1680 | * Remarks: | ||
| 1681 | * mm works on machine words, mmW works on bytes. | ||
| 1682 | */ | ||
| 1683 | static int kdb_mm(int argc, const char **argv) | ||
| 1684 | { | ||
| 1685 | int diag; | ||
| 1686 | unsigned long addr; | ||
| 1687 | long offset = 0; | ||
| 1688 | unsigned long contents; | ||
| 1689 | int nextarg; | ||
| 1690 | int width; | ||
| 1691 | |||
| 1692 | if (argv[0][2] && !isdigit(argv[0][2])) | ||
| 1693 | return KDB_NOTFOUND; | ||
| 1694 | |||
| 1695 | if (argc < 2) | ||
| 1696 | return KDB_ARGCOUNT; | ||
| 1697 | |||
| 1698 | nextarg = 1; | ||
| 1699 | diag = kdbgetaddrarg(argc, argv, &nextarg, &addr, &offset, NULL); | ||
| 1700 | if (diag) | ||
| 1701 | return diag; | ||
| 1702 | |||
| 1703 | if (nextarg > argc) | ||
| 1704 | return KDB_ARGCOUNT; | ||
| 1705 | diag = kdbgetaddrarg(argc, argv, &nextarg, &contents, NULL, NULL); | ||
| 1706 | if (diag) | ||
| 1707 | return diag; | ||
| 1708 | |||
| 1709 | if (nextarg != argc + 1) | ||
| 1710 | return KDB_ARGCOUNT; | ||
| 1711 | |||
| 1712 | width = argv[0][2] ? (argv[0][2] - '0') : (KDB_WORD_SIZE); | ||
| 1713 | diag = kdb_putword(addr, contents, width); | ||
| 1714 | if (diag) | ||
| 1715 | return diag; | ||
| 1716 | |||
| 1717 | kdb_printf(kdb_machreg_fmt " = " kdb_machreg_fmt "\n", addr, contents); | ||
| 1718 | |||
| 1719 | return 0; | ||
| 1720 | } | ||
| 1721 | |||
| 1722 | /* | ||
| 1723 | * kdb_go - This function implements the 'go' command. | ||
| 1724 | * go [address-expression] | ||
| 1725 | */ | ||
| 1726 | static int kdb_go(int argc, const char **argv) | ||
| 1727 | { | ||
| 1728 | unsigned long addr; | ||
| 1729 | int diag; | ||
| 1730 | int nextarg; | ||
| 1731 | long offset; | ||
| 1732 | |||
| 1733 | if (argc == 1) { | ||
| 1734 | if (raw_smp_processor_id() != kdb_initial_cpu) { | ||
| 1735 | kdb_printf("go <address> must be issued from the " | ||
| 1736 | "initial cpu, do cpu %d first\n", | ||
| 1737 | kdb_initial_cpu); | ||
| 1738 | return KDB_ARGCOUNT; | ||
| 1739 | } | ||
| 1740 | nextarg = 1; | ||
| 1741 | diag = kdbgetaddrarg(argc, argv, &nextarg, | ||
| 1742 | &addr, &offset, NULL); | ||
| 1743 | if (diag) | ||
| 1744 | return diag; | ||
| 1745 | } else if (argc) { | ||
| 1746 | return KDB_ARGCOUNT; | ||
| 1747 | } | ||
| 1748 | |||
| 1749 | diag = KDB_CMD_GO; | ||
| 1750 | if (KDB_FLAG(CATASTROPHIC)) { | ||
| 1751 | kdb_printf("Catastrophic error detected\n"); | ||
| 1752 | kdb_printf("kdb_continue_catastrophic=%d, ", | ||
| 1753 | kdb_continue_catastrophic); | ||
| 1754 | if (kdb_continue_catastrophic == 0 && kdb_go_count++ == 0) { | ||
| 1755 | kdb_printf("type go a second time if you really want " | ||
| 1756 | "to continue\n"); | ||
| 1757 | return 0; | ||
| 1758 | } | ||
| 1759 | if (kdb_continue_catastrophic == 2) { | ||
| 1760 | kdb_printf("forcing reboot\n"); | ||
| 1761 | kdb_reboot(0, NULL); | ||
| 1762 | } | ||
| 1763 | kdb_printf("attempting to continue\n"); | ||
| 1764 | } | ||
| 1765 | return diag; | ||
| 1766 | } | ||
| 1767 | |||
| 1768 | /* | ||
| 1769 | * kdb_rd - This function implements the 'rd' command. | ||
| 1770 | */ | ||
| 1771 | static int kdb_rd(int argc, const char **argv) | ||
| 1772 | { | ||
| 1773 | int diag = kdb_check_regs(); | ||
| 1774 | if (diag) | ||
| 1775 | return diag; | ||
| 1776 | |||
| 1777 | kdb_dumpregs(kdb_current_regs); | ||
| 1778 | return 0; | ||
| 1779 | } | ||
| 1780 | |||
| 1781 | /* | ||
| 1782 | * kdb_rm - This function implements the 'rm' (register modify) command. | ||
| 1783 | * rm register-name new-contents | ||
| 1784 | * Remarks: | ||
| 1785 | * Currently doesn't allow modification of control or | ||
| 1786 | * debug registers. | ||
| 1787 | */ | ||
| 1788 | static int kdb_rm(int argc, const char **argv) | ||
| 1789 | { | ||
| 1790 | int diag; | ||
| 1791 | int ind = 0; | ||
| 1792 | unsigned long contents; | ||
| 1793 | |||
| 1794 | if (argc != 2) | ||
| 1795 | return KDB_ARGCOUNT; | ||
| 1796 | /* | ||
| 1797 | * Allow presence or absence of leading '%' symbol. | ||
| 1798 | */ | ||
| 1799 | if (argv[1][0] == '%') | ||
| 1800 | ind = 1; | ||
| 1801 | |||
| 1802 | diag = kdbgetularg(argv[2], &contents); | ||
| 1803 | if (diag) | ||
| 1804 | return diag; | ||
| 1805 | |||
| 1806 | diag = kdb_check_regs(); | ||
| 1807 | if (diag) | ||
| 1808 | return diag; | ||
| 1809 | kdb_printf("ERROR: Register set currently not implemented\n"); | ||
| 1810 | return 0; | ||
| 1811 | } | ||
| 1812 | |||
| 1813 | #if defined(CONFIG_MAGIC_SYSRQ) | ||
| 1814 | /* | ||
| 1815 | * kdb_sr - This function implements the 'sr' (SYSRQ key) command | ||
| 1816 | * which interfaces to the soi-disant MAGIC SYSRQ functionality. | ||
| 1817 | * sr <magic-sysrq-code> | ||
| 1818 | */ | ||
| 1819 | static int kdb_sr(int argc, const char **argv) | ||
| 1820 | { | ||
| 1821 | if (argc != 1) | ||
| 1822 | return KDB_ARGCOUNT; | ||
| 1823 | sysrq_toggle_support(1); | ||
| 1824 | kdb_trap_printk++; | ||
| 1825 | handle_sysrq(*argv[1], NULL); | ||
| 1826 | kdb_trap_printk--; | ||
| 1827 | |||
| 1828 | return 0; | ||
| 1829 | } | ||
| 1830 | #endif /* CONFIG_MAGIC_SYSRQ */ | ||
| 1831 | |||
| 1832 | /* | ||
| 1833 | * kdb_ef - This function implements the 'regs' (display exception | ||
| 1834 | * frame) command. This command takes an address and expects to | ||
| 1835 | * find an exception frame at that address, formats and prints | ||
| 1836 | * it. | ||
| 1837 | * regs address-expression | ||
| 1838 | * Remarks: | ||
| 1839 | * Not done yet. | ||
| 1840 | */ | ||
| 1841 | static int kdb_ef(int argc, const char **argv) | ||
| 1842 | { | ||
| 1843 | int diag; | ||
| 1844 | unsigned long addr; | ||
| 1845 | long offset; | ||
| 1846 | int nextarg; | ||
| 1847 | |||
| 1848 | if (argc != 1) | ||
| 1849 | return KDB_ARGCOUNT; | ||
| 1850 | |||
| 1851 | nextarg = 1; | ||
| 1852 | diag = kdbgetaddrarg(argc, argv, &nextarg, &addr, &offset, NULL); | ||
| 1853 | if (diag) | ||
| 1854 | return diag; | ||
| 1855 | show_regs((struct pt_regs *)addr); | ||
| 1856 | return 0; | ||
| 1857 | } | ||
| 1858 | |||
| 1859 | #if defined(CONFIG_MODULES) | ||
| 1860 | /* modules using other modules */ | ||
| 1861 | struct module_use { | ||
| 1862 | struct list_head list; | ||
| 1863 | struct module *module_which_uses; | ||
| 1864 | }; | ||
| 1865 | |||
| 1866 | /* | ||
| 1867 | * kdb_lsmod - This function implements the 'lsmod' command. Lists | ||
| 1868 | * currently loaded kernel modules. | ||
| 1869 | * Mostly taken from userland lsmod. | ||
| 1870 | */ | ||
| 1871 | static int kdb_lsmod(int argc, const char **argv) | ||
| 1872 | { | ||
| 1873 | struct module *mod; | ||
| 1874 | |||
| 1875 | if (argc != 0) | ||
| 1876 | return KDB_ARGCOUNT; | ||
| 1877 | |||
| 1878 | kdb_printf("Module Size modstruct Used by\n"); | ||
| 1879 | list_for_each_entry(mod, kdb_modules, list) { | ||
| 1880 | |||
| 1881 | kdb_printf("%-20s%8u 0x%p ", mod->name, | ||
| 1882 | mod->core_size, (void *)mod); | ||
| 1883 | #ifdef CONFIG_MODULE_UNLOAD | ||
| 1884 | kdb_printf("%4d ", module_refcount(mod)); | ||
| 1885 | #endif | ||
| 1886 | if (mod->state == MODULE_STATE_GOING) | ||
| 1887 | kdb_printf(" (Unloading)"); | ||
| 1888 | else if (mod->state == MODULE_STATE_COMING) | ||
| 1889 | kdb_printf(" (Loading)"); | ||
| 1890 | else | ||
| 1891 | kdb_printf(" (Live)"); | ||
| 1892 | |||
| 1893 | #ifdef CONFIG_MODULE_UNLOAD | ||
| 1894 | { | ||
| 1895 | struct module_use *use; | ||
| 1896 | kdb_printf(" [ "); | ||
| 1897 | list_for_each_entry(use, &mod->modules_which_use_me, | ||
| 1898 | list) | ||
| 1899 | kdb_printf("%s ", use->module_which_uses->name); | ||
| 1900 | kdb_printf("]\n"); | ||
| 1901 | } | ||
| 1902 | #endif | ||
| 1903 | } | ||
| 1904 | |||
| 1905 | return 0; | ||
| 1906 | } | ||
| 1907 | |||
| 1908 | #endif /* CONFIG_MODULES */ | ||
| 1909 | |||
| 1910 | /* | ||
| 1911 | * kdb_env - This function implements the 'env' command. Display the | ||
| 1912 | * current environment variables. | ||
| 1913 | */ | ||
| 1914 | |||
| 1915 | static int kdb_env(int argc, const char **argv) | ||
| 1916 | { | ||
| 1917 | int i; | ||
| 1918 | |||
| 1919 | for (i = 0; i < __nenv; i++) { | ||
| 1920 | if (__env[i]) | ||
| 1921 | kdb_printf("%s\n", __env[i]); | ||
| 1922 | } | ||
| 1923 | |||
| 1924 | if (KDB_DEBUG(MASK)) | ||
| 1925 | kdb_printf("KDBFLAGS=0x%x\n", kdb_flags); | ||
| 1926 | |||
| 1927 | return 0; | ||
| 1928 | } | ||
| 1929 | |||
| 1930 | #ifdef CONFIG_PRINTK | ||
| 1931 | /* | ||
| 1932 | * kdb_dmesg - This function implements the 'dmesg' command to display | ||
| 1933 | * the contents of the syslog buffer. | ||
| 1934 | * dmesg [lines] [adjust] | ||
| 1935 | */ | ||
| 1936 | static int kdb_dmesg(int argc, const char **argv) | ||
| 1937 | { | ||
| 1938 | char *syslog_data[4], *start, *end, c = '\0', *p; | ||
| 1939 | int diag, logging, logsize, lines = 0, adjust = 0, n; | ||
| 1940 | |||
| 1941 | if (argc > 2) | ||
| 1942 | return KDB_ARGCOUNT; | ||
| 1943 | if (argc) { | ||
| 1944 | char *cp; | ||
| 1945 | lines = simple_strtol(argv[1], &cp, 0); | ||
| 1946 | if (*cp) | ||
| 1947 | lines = 0; | ||
| 1948 | if (argc > 1) { | ||
| 1949 | adjust = simple_strtoul(argv[2], &cp, 0); | ||
| 1950 | if (*cp || adjust < 0) | ||
| 1951 | adjust = 0; | ||
| 1952 | } | ||
| 1953 | } | ||
| 1954 | |||
| 1955 | /* disable LOGGING if set */ | ||
| 1956 | diag = kdbgetintenv("LOGGING", &logging); | ||
| 1957 | if (!diag && logging) { | ||
| 1958 | const char *setargs[] = { "set", "LOGGING", "0" }; | ||
| 1959 | kdb_set(2, setargs); | ||
| 1960 | } | ||
| 1961 | |||
| 1962 | /* syslog_data[0,1] physical start, end+1. syslog_data[2,3] | ||
| 1963 | * logical start, end+1. */ | ||
| 1964 | kdb_syslog_data(syslog_data); | ||
| 1965 | if (syslog_data[2] == syslog_data[3]) | ||
| 1966 | return 0; | ||
| 1967 | logsize = syslog_data[1] - syslog_data[0]; | ||
| 1968 | start = syslog_data[2]; | ||
| 1969 | end = syslog_data[3]; | ||
| 1970 | #define KDB_WRAP(p) (((p - syslog_data[0]) % logsize) + syslog_data[0]) | ||
| 1971 | for (n = 0, p = start; p < end; ++p) { | ||
| 1972 | c = *KDB_WRAP(p); | ||
| 1973 | if (c == '\n') | ||
| 1974 | ++n; | ||
| 1975 | } | ||
| 1976 | if (c != '\n') | ||
| 1977 | ++n; | ||
| 1978 | if (lines < 0) { | ||
| 1979 | if (adjust >= n) | ||
| 1980 | kdb_printf("buffer only contains %d lines, nothing " | ||
| 1981 | "printed\n", n); | ||
| 1982 | else if (adjust - lines >= n) | ||
| 1983 | kdb_printf("buffer only contains %d lines, last %d " | ||
| 1984 | "lines printed\n", n, n - adjust); | ||
| 1985 | if (adjust) { | ||
| 1986 | for (; start < end && adjust; ++start) { | ||
| 1987 | if (*KDB_WRAP(start) == '\n') | ||
| 1988 | --adjust; | ||
| 1989 | } | ||
| 1990 | if (start < end) | ||
| 1991 | ++start; | ||
| 1992 | } | ||
| 1993 | for (p = start; p < end && lines; ++p) { | ||
| 1994 | if (*KDB_WRAP(p) == '\n') | ||
| 1995 | ++lines; | ||
| 1996 | } | ||
| 1997 | end = p; | ||
| 1998 | } else if (lines > 0) { | ||
| 1999 | int skip = n - (adjust + lines); | ||
| 2000 | if (adjust >= n) { | ||
| 2001 | kdb_printf("buffer only contains %d lines, " | ||
| 2002 | "nothing printed\n", n); | ||
| 2003 | skip = n; | ||
| 2004 | } else if (skip < 0) { | ||
| 2005 | lines += skip; | ||
| 2006 | skip = 0; | ||
| 2007 | kdb_printf("buffer only contains %d lines, first " | ||
| 2008 | "%d lines printed\n", n, lines); | ||
| 2009 | } | ||
| 2010 | for (; start < end && skip; ++start) { | ||
| 2011 | if (*KDB_WRAP(start) == '\n') | ||
| 2012 | --skip; | ||
| 2013 | } | ||
| 2014 | for (p = start; p < end && lines; ++p) { | ||
| 2015 | if (*KDB_WRAP(p) == '\n') | ||
| 2016 | --lines; | ||
| 2017 | } | ||
| 2018 | end = p; | ||
| 2019 | } | ||
| 2020 | /* Do a line at a time (max 200 chars) to reduce protocol overhead */ | ||
| 2021 | c = '\n'; | ||
| 2022 | while (start != end) { | ||
| 2023 | char buf[201]; | ||
| 2024 | p = buf; | ||
| 2025 | if (KDB_FLAG(CMD_INTERRUPT)) | ||
| 2026 | return 0; | ||
| 2027 | while (start < end && (c = *KDB_WRAP(start)) && | ||
| 2028 | (p - buf) < sizeof(buf)-1) { | ||
| 2029 | ++start; | ||
| 2030 | *p++ = c; | ||
| 2031 | if (c == '\n') | ||
| 2032 | break; | ||
| 2033 | } | ||
| 2034 | *p = '\0'; | ||
| 2035 | kdb_printf("%s", buf); | ||
| 2036 | } | ||
| 2037 | if (c != '\n') | ||
| 2038 | kdb_printf("\n"); | ||
| 2039 | |||
| 2040 | return 0; | ||
| 2041 | } | ||
| 2042 | #endif /* CONFIG_PRINTK */ | ||
| 2043 | /* | ||
| 2044 | * kdb_cpu - This function implements the 'cpu' command. | ||
| 2045 | * cpu [<cpunum>] | ||
| 2046 | * Returns: | ||
| 2047 | * KDB_CMD_CPU for success, a kdb diagnostic if error | ||
| 2048 | */ | ||
| 2049 | static void kdb_cpu_status(void) | ||
| 2050 | { | ||
| 2051 | int i, start_cpu, first_print = 1; | ||
| 2052 | char state, prev_state = '?'; | ||
| 2053 | |||
| 2054 | kdb_printf("Currently on cpu %d\n", raw_smp_processor_id()); | ||
| 2055 | kdb_printf("Available cpus: "); | ||
| 2056 | for (start_cpu = -1, i = 0; i < NR_CPUS; i++) { | ||
| 2057 | if (!cpu_online(i)) { | ||
| 2058 | state = 'F'; /* cpu is offline */ | ||
| 2059 | } else { | ||
| 2060 | state = ' '; /* cpu is responding to kdb */ | ||
| 2061 | if (kdb_task_state_char(KDB_TSK(i)) == 'I') | ||
| 2062 | state = 'I'; /* idle task */ | ||
| 2063 | } | ||
| 2064 | if (state != prev_state) { | ||
| 2065 | if (prev_state != '?') { | ||
| 2066 | if (!first_print) | ||
| 2067 | kdb_printf(", "); | ||
| 2068 | first_print = 0; | ||
| 2069 | kdb_printf("%d", start_cpu); | ||
| 2070 | if (start_cpu < i-1) | ||
| 2071 | kdb_printf("-%d", i-1); | ||
| 2072 | if (prev_state != ' ') | ||
| 2073 | kdb_printf("(%c)", prev_state); | ||
| 2074 | } | ||
| 2075 | prev_state = state; | ||
| 2076 | start_cpu = i; | ||
| 2077 | } | ||
| 2078 | } | ||
| 2079 | /* print the trailing cpus, ignoring them if they are all offline */ | ||
| 2080 | if (prev_state != 'F') { | ||
| 2081 | if (!first_print) | ||
| 2082 | kdb_printf(", "); | ||
| 2083 | kdb_printf("%d", start_cpu); | ||
| 2084 | if (start_cpu < i-1) | ||
| 2085 | kdb_printf("-%d", i-1); | ||
| 2086 | if (prev_state != ' ') | ||
| 2087 | kdb_printf("(%c)", prev_state); | ||
| 2088 | } | ||
| 2089 | kdb_printf("\n"); | ||
| 2090 | } | ||
| 2091 | |||
| 2092 | static int kdb_cpu(int argc, const char **argv) | ||
| 2093 | { | ||
| 2094 | unsigned long cpunum; | ||
| 2095 | int diag; | ||
| 2096 | |||
| 2097 | if (argc == 0) { | ||
| 2098 | kdb_cpu_status(); | ||
| 2099 | return 0; | ||
| 2100 | } | ||
| 2101 | |||
| 2102 | if (argc != 1) | ||
| 2103 | return KDB_ARGCOUNT; | ||
| 2104 | |||
| 2105 | diag = kdbgetularg(argv[1], &cpunum); | ||
| 2106 | if (diag) | ||
| 2107 | return diag; | ||
| 2108 | |||
| 2109 | /* | ||
| 2110 | * Validate cpunum | ||
| 2111 | */ | ||
| 2112 | if ((cpunum > NR_CPUS) || !cpu_online(cpunum)) | ||
| 2113 | return KDB_BADCPUNUM; | ||
| 2114 | |||
| 2115 | dbg_switch_cpu = cpunum; | ||
| 2116 | |||
| 2117 | /* | ||
| 2118 | * Switch to other cpu | ||
| 2119 | */ | ||
| 2120 | return KDB_CMD_CPU; | ||
| 2121 | } | ||
| 2122 | |||
| 2123 | /* The user may not realize that ps/bta with no parameters does not print idle | ||
| 2124 | * or sleeping system daemon processes, so tell them how many were suppressed. | ||
| 2125 | */ | ||
| 2126 | void kdb_ps_suppressed(void) | ||
| 2127 | { | ||
| 2128 | int idle = 0, daemon = 0; | ||
| 2129 | unsigned long mask_I = kdb_task_state_string("I"), | ||
| 2130 | mask_M = kdb_task_state_string("M"); | ||
| 2131 | unsigned long cpu; | ||
| 2132 | const struct task_struct *p, *g; | ||
| 2133 | for_each_online_cpu(cpu) { | ||
| 2134 | p = kdb_curr_task(cpu); | ||
| 2135 | if (kdb_task_state(p, mask_I)) | ||
| 2136 | ++idle; | ||
| 2137 | } | ||
| 2138 | kdb_do_each_thread(g, p) { | ||
| 2139 | if (kdb_task_state(p, mask_M)) | ||
| 2140 | ++daemon; | ||
| 2141 | } kdb_while_each_thread(g, p); | ||
| 2142 | if (idle || daemon) { | ||
| 2143 | if (idle) | ||
| 2144 | kdb_printf("%d idle process%s (state I)%s\n", | ||
| 2145 | idle, idle == 1 ? "" : "es", | ||
| 2146 | daemon ? " and " : ""); | ||
| 2147 | if (daemon) | ||
| 2148 | kdb_printf("%d sleeping system daemon (state M) " | ||
| 2149 | "process%s", daemon, | ||
| 2150 | daemon == 1 ? "" : "es"); | ||
| 2151 | kdb_printf(" suppressed,\nuse 'ps A' to see all.\n"); | ||
| 2152 | } | ||
| 2153 | } | ||
| 2154 | |||
| 2155 | /* | ||
| 2156 | * kdb_ps - This function implements the 'ps' command which shows a | ||
| 2157 | * list of the active processes. | ||
| 2158 | * ps [DRSTCZEUIMA] All processes, optionally filtered by state | ||
| 2159 | */ | ||
| 2160 | void kdb_ps1(const struct task_struct *p) | ||
| 2161 | { | ||
| 2162 | int cpu; | ||
| 2163 | unsigned long tmp; | ||
| 2164 | |||
| 2165 | if (!p || probe_kernel_read(&tmp, (char *)p, sizeof(unsigned long))) | ||
| 2166 | return; | ||
| 2167 | |||
| 2168 | cpu = kdb_process_cpu(p); | ||
| 2169 | kdb_printf("0x%p %8d %8d %d %4d %c 0x%p %c%s\n", | ||
| 2170 | (void *)p, p->pid, p->parent->pid, | ||
| 2171 | kdb_task_has_cpu(p), kdb_process_cpu(p), | ||
| 2172 | kdb_task_state_char(p), | ||
| 2173 | (void *)(&p->thread), | ||
| 2174 | p == kdb_curr_task(raw_smp_processor_id()) ? '*' : ' ', | ||
| 2175 | p->comm); | ||
| 2176 | if (kdb_task_has_cpu(p)) { | ||
| 2177 | if (!KDB_TSK(cpu)) { | ||
| 2178 | kdb_printf(" Error: no saved data for this cpu\n"); | ||
| 2179 | } else { | ||
| 2180 | if (KDB_TSK(cpu) != p) | ||
| 2181 | kdb_printf(" Error: does not match running " | ||
| 2182 | "process table (0x%p)\n", KDB_TSK(cpu)); | ||
| 2183 | } | ||
| 2184 | } | ||
| 2185 | } | ||
| 2186 | |||
| 2187 | static int kdb_ps(int argc, const char **argv) | ||
| 2188 | { | ||
| 2189 | struct task_struct *g, *p; | ||
| 2190 | unsigned long mask, cpu; | ||
| 2191 | |||
| 2192 | if (argc == 0) | ||
| 2193 | kdb_ps_suppressed(); | ||
| 2194 | kdb_printf("%-*s Pid Parent [*] cpu State %-*s Command\n", | ||
| 2195 | (int)(2*sizeof(void *))+2, "Task Addr", | ||
| 2196 | (int)(2*sizeof(void *))+2, "Thread"); | ||
| 2197 | mask = kdb_task_state_string(argc ? argv[1] : NULL); | ||
| 2198 | /* Run the active tasks first */ | ||
| 2199 | for_each_online_cpu(cpu) { | ||
| 2200 | if (KDB_FLAG(CMD_INTERRUPT)) | ||
| 2201 | return 0; | ||
| 2202 | p = kdb_curr_task(cpu); | ||
| 2203 | if (kdb_task_state(p, mask)) | ||
| 2204 | kdb_ps1(p); | ||
| 2205 | } | ||
| 2206 | kdb_printf("\n"); | ||
| 2207 | /* Now the real tasks */ | ||
| 2208 | kdb_do_each_thread(g, p) { | ||
| 2209 | if (KDB_FLAG(CMD_INTERRUPT)) | ||
| 2210 | return 0; | ||
| 2211 | if (kdb_task_state(p, mask)) | ||
| 2212 | kdb_ps1(p); | ||
| 2213 | } kdb_while_each_thread(g, p); | ||
| 2214 | |||
| 2215 | return 0; | ||
| 2216 | } | ||
| 2217 | |||
| 2218 | /* | ||
| 2219 | * kdb_pid - This function implements the 'pid' command which switches | ||
| 2220 | * the currently active process. | ||
| 2221 | * pid [<pid> | R] | ||
| 2222 | */ | ||
| 2223 | static int kdb_pid(int argc, const char **argv) | ||
| 2224 | { | ||
| 2225 | struct task_struct *p; | ||
| 2226 | unsigned long val; | ||
| 2227 | int diag; | ||
| 2228 | |||
| 2229 | if (argc > 1) | ||
| 2230 | return KDB_ARGCOUNT; | ||
| 2231 | |||
| 2232 | if (argc) { | ||
| 2233 | if (strcmp(argv[1], "R") == 0) { | ||
| 2234 | p = KDB_TSK(kdb_initial_cpu); | ||
| 2235 | } else { | ||
| 2236 | diag = kdbgetularg(argv[1], &val); | ||
| 2237 | if (diag) | ||
| 2238 | return KDB_BADINT; | ||
| 2239 | |||
| 2240 | p = find_task_by_pid_ns((pid_t)val, &init_pid_ns); | ||
| 2241 | if (!p) { | ||
| 2242 | kdb_printf("No task with pid=%d\n", (pid_t)val); | ||
| 2243 | return 0; | ||
| 2244 | } | ||
| 2245 | } | ||
| 2246 | kdb_set_current_task(p); | ||
| 2247 | } | ||
| 2248 | kdb_printf("KDB current process is %s(pid=%d)\n", | ||
| 2249 | kdb_current_task->comm, | ||
| 2250 | kdb_current_task->pid); | ||
| 2251 | |||
| 2252 | return 0; | ||
| 2253 | } | ||
| 2254 | |||
| 2255 | /* | ||
| 2256 | * kdb_ll - This function implements the 'll' command which follows a | ||
| 2257 | * linked list and executes an arbitrary command for each | ||
| 2258 | * element. | ||
| 2259 | */ | ||
| 2260 | static int kdb_ll(int argc, const char **argv) | ||
| 2261 | { | ||
| 2262 | int diag; | ||
| 2263 | unsigned long addr; | ||
| 2264 | long offset = 0; | ||
| 2265 | unsigned long va; | ||
| 2266 | unsigned long linkoffset; | ||
| 2267 | int nextarg; | ||
| 2268 | const char *command; | ||
| 2269 | |||
| 2270 | if (argc != 3) | ||
| 2271 | return KDB_ARGCOUNT; | ||
| 2272 | |||
| 2273 | nextarg = 1; | ||
| 2274 | diag = kdbgetaddrarg(argc, argv, &nextarg, &addr, &offset, NULL); | ||
| 2275 | if (diag) | ||
| 2276 | return diag; | ||
| 2277 | |||
| 2278 | diag = kdbgetularg(argv[2], &linkoffset); | ||
| 2279 | if (diag) | ||
| 2280 | return diag; | ||
| 2281 | |||
| 2282 | /* | ||
| 2283 | * Using the starting address as | ||
| 2284 | * the first element in the list, and assuming that | ||
| 2285 | * the list ends with a null pointer. | ||
| 2286 | */ | ||
| 2287 | |||
| 2288 | va = addr; | ||
| 2289 | command = kdb_strdup(argv[3], GFP_KDB); | ||
| 2290 | if (!command) { | ||
| 2291 | kdb_printf("%s: cannot duplicate command\n", __func__); | ||
| 2292 | return 0; | ||
| 2293 | } | ||
| 2294 | /* Recursive use of kdb_parse, do not use argv after this point */ | ||
| 2295 | argv = NULL; | ||
| 2296 | |||
| 2297 | while (va) { | ||
| 2298 | char buf[80]; | ||
| 2299 | |||
| 2300 | sprintf(buf, "%s " kdb_machreg_fmt "\n", command, va); | ||
| 2301 | diag = kdb_parse(buf); | ||
| 2302 | if (diag) | ||
| 2303 | return diag; | ||
| 2304 | |||
| 2305 | addr = va + linkoffset; | ||
| 2306 | if (kdb_getword(&va, addr, sizeof(va))) | ||
| 2307 | return 0; | ||
| 2308 | } | ||
| 2309 | kfree(command); | ||
| 2310 | |||
| 2311 | return 0; | ||
| 2312 | } | ||
| 2313 | |||
| 2314 | static int kdb_kgdb(int argc, const char **argv) | ||
| 2315 | { | ||
| 2316 | return KDB_CMD_KGDB; | ||
| 2317 | } | ||
| 2318 | |||
| 2319 | /* | ||
| 2320 | * kdb_help - This function implements the 'help' and '?' commands. | ||
| 2321 | */ | ||
| 2322 | static int kdb_help(int argc, const char **argv) | ||
| 2323 | { | ||
| 2324 | kdbtab_t *kt; | ||
| 2325 | int i; | ||
| 2326 | |||
| 2327 | kdb_printf("%-15.15s %-20.20s %s\n", "Command", "Usage", "Description"); | ||
| 2328 | kdb_printf("-----------------------------" | ||
| 2329 | "-----------------------------\n"); | ||
| 2330 | for_each_kdbcmd(kt, i) { | ||
| 2331 | if (kt->cmd_name) | ||
| 2332 | kdb_printf("%-15.15s %-20.20s %s\n", kt->cmd_name, | ||
| 2333 | kt->cmd_usage, kt->cmd_help); | ||
| 2334 | if (KDB_FLAG(CMD_INTERRUPT)) | ||
| 2335 | return 0; | ||
| 2336 | } | ||
| 2337 | return 0; | ||
| 2338 | } | ||
| 2339 | |||
| 2340 | /* | ||
| 2341 | * kdb_kill - This function implements the 'kill' commands. | ||
| 2342 | */ | ||
| 2343 | static int kdb_kill(int argc, const char **argv) | ||
| 2344 | { | ||
| 2345 | long sig, pid; | ||
| 2346 | char *endp; | ||
| 2347 | struct task_struct *p; | ||
| 2348 | struct siginfo info; | ||
| 2349 | |||
| 2350 | if (argc != 2) | ||
| 2351 | return KDB_ARGCOUNT; | ||
| 2352 | |||
| 2353 | sig = simple_strtol(argv[1], &endp, 0); | ||
| 2354 | if (*endp) | ||
| 2355 | return KDB_BADINT; | ||
| 2356 | if (sig >= 0) { | ||
| 2357 | kdb_printf("Invalid signal parameter.<-signal>\n"); | ||
| 2358 | return 0; | ||
| 2359 | } | ||
| 2360 | sig = -sig; | ||
| 2361 | |||
| 2362 | pid = simple_strtol(argv[2], &endp, 0); | ||
| 2363 | if (*endp) | ||
| 2364 | return KDB_BADINT; | ||
| 2365 | if (pid <= 0) { | ||
| 2366 | kdb_printf("Process ID must be large than 0.\n"); | ||
| 2367 | return 0; | ||
| 2368 | } | ||
| 2369 | |||
| 2370 | /* Find the process. */ | ||
| 2371 | p = find_task_by_pid_ns(pid, &init_pid_ns); | ||
| 2372 | if (!p) { | ||
| 2373 | kdb_printf("The specified process isn't found.\n"); | ||
| 2374 | return 0; | ||
| 2375 | } | ||
| 2376 | p = p->group_leader; | ||
| 2377 | info.si_signo = sig; | ||
| 2378 | info.si_errno = 0; | ||
| 2379 | info.si_code = SI_USER; | ||
| 2380 | info.si_pid = pid; /* same capabilities as process being signalled */ | ||
| 2381 | info.si_uid = 0; /* kdb has root authority */ | ||
| 2382 | kdb_send_sig_info(p, &info); | ||
| 2383 | return 0; | ||
| 2384 | } | ||
| 2385 | |||
| 2386 | struct kdb_tm { | ||
| 2387 | int tm_sec; /* seconds */ | ||
| 2388 | int tm_min; /* minutes */ | ||
| 2389 | int tm_hour; /* hours */ | ||
| 2390 | int tm_mday; /* day of the month */ | ||
| 2391 | int tm_mon; /* month */ | ||
| 2392 | int tm_year; /* year */ | ||
| 2393 | }; | ||
| 2394 | |||
| 2395 | static void kdb_gmtime(struct timespec *tv, struct kdb_tm *tm) | ||
| 2396 | { | ||
| 2397 | /* This will work from 1970-2099, 2100 is not a leap year */ | ||
| 2398 | static int mon_day[] = { 31, 29, 31, 30, 31, 30, 31, | ||
| 2399 | 31, 30, 31, 30, 31 }; | ||
| 2400 | memset(tm, 0, sizeof(*tm)); | ||
| 2401 | tm->tm_sec = tv->tv_sec % (24 * 60 * 60); | ||
| 2402 | tm->tm_mday = tv->tv_sec / (24 * 60 * 60) + | ||
| 2403 | (2 * 365 + 1); /* shift base from 1970 to 1968 */ | ||
| 2404 | tm->tm_min = tm->tm_sec / 60 % 60; | ||
| 2405 | tm->tm_hour = tm->tm_sec / 60 / 60; | ||
| 2406 | tm->tm_sec = tm->tm_sec % 60; | ||
| 2407 | tm->tm_year = 68 + 4*(tm->tm_mday / (4*365+1)); | ||
| 2408 | tm->tm_mday %= (4*365+1); | ||
| 2409 | mon_day[1] = 29; | ||
| 2410 | while (tm->tm_mday >= mon_day[tm->tm_mon]) { | ||
| 2411 | tm->tm_mday -= mon_day[tm->tm_mon]; | ||
| 2412 | if (++tm->tm_mon == 12) { | ||
| 2413 | tm->tm_mon = 0; | ||
| 2414 | ++tm->tm_year; | ||
| 2415 | mon_day[1] = 28; | ||
| 2416 | } | ||
| 2417 | } | ||
| 2418 | ++tm->tm_mday; | ||
| 2419 | } | ||
| 2420 | |||
| 2421 | /* | ||
| 2422 | * Most of this code has been lifted from kernel/timer.c::sys_sysinfo(). | ||
| 2423 | * I cannot call that code directly from kdb, it has an unconditional | ||
| 2424 | * cli()/sti() and calls routines that take locks which can stop the debugger. | ||
| 2425 | */ | ||
| 2426 | static void kdb_sysinfo(struct sysinfo *val) | ||
| 2427 | { | ||
| 2428 | struct timespec uptime; | ||
| 2429 | do_posix_clock_monotonic_gettime(&uptime); | ||
| 2430 | memset(val, 0, sizeof(*val)); | ||
| 2431 | val->uptime = uptime.tv_sec; | ||
| 2432 | val->loads[0] = avenrun[0]; | ||
| 2433 | val->loads[1] = avenrun[1]; | ||
| 2434 | val->loads[2] = avenrun[2]; | ||
| 2435 | val->procs = nr_threads-1; | ||
| 2436 | si_meminfo(val); | ||
| 2437 | |||
| 2438 | return; | ||
| 2439 | } | ||
| 2440 | |||
| 2441 | /* | ||
| 2442 | * kdb_summary - This function implements the 'summary' command. | ||
| 2443 | */ | ||
| 2444 | static int kdb_summary(int argc, const char **argv) | ||
| 2445 | { | ||
| 2446 | struct kdb_tm tm; | ||
| 2447 | struct sysinfo val; | ||
| 2448 | |||
| 2449 | if (argc) | ||
| 2450 | return KDB_ARGCOUNT; | ||
| 2451 | |||
| 2452 | kdb_printf("sysname %s\n", init_uts_ns.name.sysname); | ||
| 2453 | kdb_printf("release %s\n", init_uts_ns.name.release); | ||
| 2454 | kdb_printf("version %s\n", init_uts_ns.name.version); | ||
| 2455 | kdb_printf("machine %s\n", init_uts_ns.name.machine); | ||
| 2456 | kdb_printf("nodename %s\n", init_uts_ns.name.nodename); | ||
| 2457 | kdb_printf("domainname %s\n", init_uts_ns.name.domainname); | ||
| 2458 | kdb_printf("ccversion %s\n", __stringify(CCVERSION)); | ||
| 2459 | |||
| 2460 | kdb_gmtime(&xtime, &tm); | ||
| 2461 | kdb_printf("date %04d-%02d-%02d %02d:%02d:%02d " | ||
| 2462 | "tz_minuteswest %d\n", | ||
| 2463 | 1900+tm.tm_year, tm.tm_mon+1, tm.tm_mday, | ||
| 2464 | tm.tm_hour, tm.tm_min, tm.tm_sec, | ||
| 2465 | sys_tz.tz_minuteswest); | ||
| 2466 | |||
| 2467 | kdb_sysinfo(&val); | ||
| 2468 | kdb_printf("uptime "); | ||
| 2469 | if (val.uptime > (24*60*60)) { | ||
| 2470 | int days = val.uptime / (24*60*60); | ||
| 2471 | val.uptime %= (24*60*60); | ||
| 2472 | kdb_printf("%d day%s ", days, days == 1 ? "" : "s"); | ||
| 2473 | } | ||
| 2474 | kdb_printf("%02ld:%02ld\n", val.uptime/(60*60), (val.uptime/60)%60); | ||
| 2475 | |||
| 2476 | /* lifted from fs/proc/proc_misc.c::loadavg_read_proc() */ | ||
| 2477 | |||
| 2478 | #define LOAD_INT(x) ((x) >> FSHIFT) | ||
| 2479 | #define LOAD_FRAC(x) LOAD_INT(((x) & (FIXED_1-1)) * 100) | ||
| 2480 | kdb_printf("load avg %ld.%02ld %ld.%02ld %ld.%02ld\n", | ||
| 2481 | LOAD_INT(val.loads[0]), LOAD_FRAC(val.loads[0]), | ||
| 2482 | LOAD_INT(val.loads[1]), LOAD_FRAC(val.loads[1]), | ||
| 2483 | LOAD_INT(val.loads[2]), LOAD_FRAC(val.loads[2])); | ||
| 2484 | #undef LOAD_INT | ||
| 2485 | #undef LOAD_FRAC | ||
| 2486 | /* Display in kilobytes */ | ||
| 2487 | #define K(x) ((x) << (PAGE_SHIFT - 10)) | ||
| 2488 | kdb_printf("\nMemTotal: %8lu kB\nMemFree: %8lu kB\n" | ||
| 2489 | "Buffers: %8lu kB\n", | ||
| 2490 | val.totalram, val.freeram, val.bufferram); | ||
| 2491 | return 0; | ||
| 2492 | } | ||
| 2493 | |||
| 2494 | /* | ||
| 2495 | * kdb_per_cpu - This function implements the 'per_cpu' command. | ||
| 2496 | */ | ||
| 2497 | static int kdb_per_cpu(int argc, const char **argv) | ||
| 2498 | { | ||
| 2499 | char buf[256], fmtstr[64]; | ||
| 2500 | kdb_symtab_t symtab; | ||
| 2501 | cpumask_t suppress = CPU_MASK_NONE; | ||
| 2502 | int cpu, diag; | ||
| 2503 | unsigned long addr, val, bytesperword = 0, whichcpu = ~0UL; | ||
| 2504 | |||
| 2505 | if (argc < 1 || argc > 3) | ||
| 2506 | return KDB_ARGCOUNT; | ||
| 2507 | |||
| 2508 | snprintf(buf, sizeof(buf), "per_cpu__%s", argv[1]); | ||
| 2509 | if (!kdbgetsymval(buf, &symtab)) { | ||
| 2510 | kdb_printf("%s is not a per_cpu variable\n", argv[1]); | ||
| 2511 | return KDB_BADADDR; | ||
| 2512 | } | ||
| 2513 | if (argc >= 2) { | ||
| 2514 | diag = kdbgetularg(argv[2], &bytesperword); | ||
| 2515 | if (diag) | ||
| 2516 | return diag; | ||
| 2517 | } | ||
| 2518 | if (!bytesperword) | ||
| 2519 | bytesperword = KDB_WORD_SIZE; | ||
| 2520 | else if (bytesperword > KDB_WORD_SIZE) | ||
| 2521 | return KDB_BADWIDTH; | ||
| 2522 | sprintf(fmtstr, "%%0%dlx ", (int)(2*bytesperword)); | ||
| 2523 | if (argc >= 3) { | ||
| 2524 | diag = kdbgetularg(argv[3], &whichcpu); | ||
| 2525 | if (diag) | ||
| 2526 | return diag; | ||
| 2527 | if (!cpu_online(whichcpu)) { | ||
| 2528 | kdb_printf("cpu %ld is not online\n", whichcpu); | ||
| 2529 | return KDB_BADCPUNUM; | ||
| 2530 | } | ||
| 2531 | } | ||
| 2532 | |||
| 2533 | /* Most architectures use __per_cpu_offset[cpu], some use | ||
| 2534 | * __per_cpu_offset(cpu), smp has no __per_cpu_offset. | ||
| 2535 | */ | ||
| 2536 | #ifdef __per_cpu_offset | ||
| 2537 | #define KDB_PCU(cpu) __per_cpu_offset(cpu) | ||
| 2538 | #else | ||
| 2539 | #ifdef CONFIG_SMP | ||
| 2540 | #define KDB_PCU(cpu) __per_cpu_offset[cpu] | ||
| 2541 | #else | ||
| 2542 | #define KDB_PCU(cpu) 0 | ||
| 2543 | #endif | ||
| 2544 | #endif | ||
| 2545 | |||
| 2546 | for_each_online_cpu(cpu) { | ||
| 2547 | if (whichcpu != ~0UL && whichcpu != cpu) | ||
| 2548 | continue; | ||
| 2549 | addr = symtab.sym_start + KDB_PCU(cpu); | ||
| 2550 | diag = kdb_getword(&val, addr, bytesperword); | ||
| 2551 | if (diag) { | ||
| 2552 | kdb_printf("%5d " kdb_bfd_vma_fmt0 " - unable to " | ||
| 2553 | "read, diag=%d\n", cpu, addr, diag); | ||
| 2554 | continue; | ||
| 2555 | } | ||
| 2556 | #ifdef CONFIG_SMP | ||
| 2557 | if (!val) { | ||
| 2558 | cpu_set(cpu, suppress); | ||
| 2559 | continue; | ||
| 2560 | } | ||
| 2561 | #endif /* CONFIG_SMP */ | ||
| 2562 | kdb_printf("%5d ", cpu); | ||
| 2563 | kdb_md_line(fmtstr, addr, | ||
| 2564 | bytesperword == KDB_WORD_SIZE, | ||
| 2565 | 1, bytesperword, 1, 1, 0); | ||
| 2566 | } | ||
| 2567 | if (cpus_weight(suppress) == 0) | ||
| 2568 | return 0; | ||
| 2569 | kdb_printf("Zero suppressed cpu(s):"); | ||
| 2570 | for (cpu = first_cpu(suppress); cpu < num_possible_cpus(); | ||
| 2571 | cpu = next_cpu(cpu, suppress)) { | ||
| 2572 | kdb_printf(" %d", cpu); | ||
| 2573 | if (cpu == num_possible_cpus() - 1 || | ||
| 2574 | next_cpu(cpu, suppress) != cpu + 1) | ||
| 2575 | continue; | ||
| 2576 | while (cpu < num_possible_cpus() && | ||
| 2577 | next_cpu(cpu, suppress) == cpu + 1) | ||
| 2578 | ++cpu; | ||
| 2579 | kdb_printf("-%d", cpu); | ||
| 2580 | } | ||
| 2581 | kdb_printf("\n"); | ||
| 2582 | |||
| 2583 | #undef KDB_PCU | ||
| 2584 | |||
| 2585 | return 0; | ||
| 2586 | } | ||
| 2587 | |||
| 2588 | /* | ||
| 2589 | * display help for the use of cmd | grep pattern | ||
| 2590 | */ | ||
| 2591 | static int kdb_grep_help(int argc, const char **argv) | ||
| 2592 | { | ||
| 2593 | kdb_printf("Usage of cmd args | grep pattern:\n"); | ||
| 2594 | kdb_printf(" Any command's output may be filtered through an "); | ||
| 2595 | kdb_printf("emulated 'pipe'.\n"); | ||
| 2596 | kdb_printf(" 'grep' is just a key word.\n"); | ||
| 2597 | kdb_printf(" The pattern may include a very limited set of " | ||
| 2598 | "metacharacters:\n"); | ||
| 2599 | kdb_printf(" pattern or ^pattern or pattern$ or ^pattern$\n"); | ||
| 2600 | kdb_printf(" And if there are spaces in the pattern, you may " | ||
| 2601 | "quote it:\n"); | ||
| 2602 | kdb_printf(" \"pat tern\" or \"^pat tern\" or \"pat tern$\"" | ||
| 2603 | " or \"^pat tern$\"\n"); | ||
| 2604 | return 0; | ||
| 2605 | } | ||
| 2606 | |||
| 2607 | /* | ||
| 2608 | * kdb_register_repeat - This function is used to register a kernel | ||
| 2609 | * debugger command. | ||
| 2610 | * Inputs: | ||
| 2611 | * cmd Command name | ||
| 2612 | * func Function to execute the command | ||
| 2613 | * usage A simple usage string showing arguments | ||
| 2614 | * help A simple help string describing command | ||
| 2615 | * repeat Does the command auto repeat on enter? | ||
| 2616 | * Returns: | ||
| 2617 | * zero for success, one if a duplicate command. | ||
| 2618 | */ | ||
| 2619 | #define kdb_command_extend 50 /* arbitrary */ | ||
| 2620 | int kdb_register_repeat(char *cmd, | ||
| 2621 | kdb_func_t func, | ||
| 2622 | char *usage, | ||
| 2623 | char *help, | ||
| 2624 | short minlen, | ||
| 2625 | kdb_repeat_t repeat) | ||
| 2626 | { | ||
| 2627 | int i; | ||
| 2628 | kdbtab_t *kp; | ||
| 2629 | |||
| 2630 | /* | ||
| 2631 | * Brute force method to determine duplicates | ||
| 2632 | */ | ||
| 2633 | for_each_kdbcmd(kp, i) { | ||
| 2634 | if (kp->cmd_name && (strcmp(kp->cmd_name, cmd) == 0)) { | ||
| 2635 | kdb_printf("Duplicate kdb command registered: " | ||
| 2636 | "%s, func %p help %s\n", cmd, func, help); | ||
| 2637 | return 1; | ||
| 2638 | } | ||
| 2639 | } | ||
| 2640 | |||
| 2641 | /* | ||
| 2642 | * Insert command into first available location in table | ||
| 2643 | */ | ||
| 2644 | for_each_kdbcmd(kp, i) { | ||
| 2645 | if (kp->cmd_name == NULL) | ||
| 2646 | break; | ||
| 2647 | } | ||
| 2648 | |||
| 2649 | if (i >= kdb_max_commands) { | ||
| 2650 | kdbtab_t *new = kmalloc((kdb_max_commands - KDB_BASE_CMD_MAX + | ||
| 2651 | kdb_command_extend) * sizeof(*new), GFP_KDB); | ||
| 2652 | if (!new) { | ||
| 2653 | kdb_printf("Could not allocate new kdb_command " | ||
| 2654 | "table\n"); | ||
| 2655 | return 1; | ||
| 2656 | } | ||
| 2657 | if (kdb_commands) { | ||
| 2658 | memcpy(new, kdb_commands, | ||
| 2659 | kdb_max_commands * sizeof(*new)); | ||
| 2660 | kfree(kdb_commands); | ||
| 2661 | } | ||
| 2662 | memset(new + kdb_max_commands, 0, | ||
| 2663 | kdb_command_extend * sizeof(*new)); | ||
| 2664 | kdb_commands = new; | ||
| 2665 | kp = kdb_commands + kdb_max_commands; | ||
| 2666 | kdb_max_commands += kdb_command_extend; | ||
| 2667 | } | ||
| 2668 | |||
| 2669 | kp->cmd_name = cmd; | ||
| 2670 | kp->cmd_func = func; | ||
| 2671 | kp->cmd_usage = usage; | ||
| 2672 | kp->cmd_help = help; | ||
| 2673 | kp->cmd_flags = 0; | ||
| 2674 | kp->cmd_minlen = minlen; | ||
| 2675 | kp->cmd_repeat = repeat; | ||
| 2676 | |||
| 2677 | return 0; | ||
| 2678 | } | ||
| 2679 | |||
| 2680 | /* | ||
| 2681 | * kdb_register - Compatibility register function for commands that do | ||
| 2682 | * not need to specify a repeat state. Equivalent to | ||
| 2683 | * kdb_register_repeat with KDB_REPEAT_NONE. | ||
| 2684 | * Inputs: | ||
| 2685 | * cmd Command name | ||
| 2686 | * func Function to execute the command | ||
| 2687 | * usage A simple usage string showing arguments | ||
| 2688 | * help A simple help string describing command | ||
| 2689 | * Returns: | ||
| 2690 | * zero for success, one if a duplicate command. | ||
| 2691 | */ | ||
| 2692 | int kdb_register(char *cmd, | ||
| 2693 | kdb_func_t func, | ||
| 2694 | char *usage, | ||
| 2695 | char *help, | ||
| 2696 | short minlen) | ||
| 2697 | { | ||
| 2698 | return kdb_register_repeat(cmd, func, usage, help, minlen, | ||
| 2699 | KDB_REPEAT_NONE); | ||
| 2700 | } | ||
| 2701 | |||
| 2702 | /* | ||
| 2703 | * kdb_unregister - This function is used to unregister a kernel | ||
| 2704 | * debugger command. It is generally called when a module which | ||
| 2705 | * implements kdb commands is unloaded. | ||
| 2706 | * Inputs: | ||
| 2707 | * cmd Command name | ||
| 2708 | * Returns: | ||
| 2709 | * zero for success, one command not registered. | ||
| 2710 | */ | ||
| 2711 | int kdb_unregister(char *cmd) | ||
| 2712 | { | ||
| 2713 | int i; | ||
| 2714 | kdbtab_t *kp; | ||
| 2715 | |||
| 2716 | /* | ||
| 2717 | * find the command. | ||
| 2718 | */ | ||
| 2719 | for (i = 0, kp = kdb_commands; i < kdb_max_commands; i++, kp++) { | ||
| 2720 | if (kp->cmd_name && (strcmp(kp->cmd_name, cmd) == 0)) { | ||
| 2721 | kp->cmd_name = NULL; | ||
| 2722 | return 0; | ||
| 2723 | } | ||
| 2724 | } | ||
| 2725 | |||
| 2726 | /* Couldn't find it. */ | ||
| 2727 | return 1; | ||
| 2728 | } | ||
| 2729 | |||
| 2730 | /* Initialize the kdb command table. */ | ||
| 2731 | static void __init kdb_inittab(void) | ||
| 2732 | { | ||
| 2733 | int i; | ||
| 2734 | kdbtab_t *kp; | ||
| 2735 | |||
| 2736 | for_each_kdbcmd(kp, i) | ||
| 2737 | kp->cmd_name = NULL; | ||
| 2738 | |||
| 2739 | kdb_register_repeat("md", kdb_md, "<vaddr>", | ||
| 2740 | "Display Memory Contents, also mdWcN, e.g. md8c1", 1, | ||
| 2741 | KDB_REPEAT_NO_ARGS); | ||
| 2742 | kdb_register_repeat("mdr", kdb_md, "<vaddr> <bytes>", | ||
| 2743 | "Display Raw Memory", 0, KDB_REPEAT_NO_ARGS); | ||
| 2744 | kdb_register_repeat("mdp", kdb_md, "<paddr> <bytes>", | ||
| 2745 | "Display Physical Memory", 0, KDB_REPEAT_NO_ARGS); | ||
| 2746 | kdb_register_repeat("mds", kdb_md, "<vaddr>", | ||
| 2747 | "Display Memory Symbolically", 0, KDB_REPEAT_NO_ARGS); | ||
| 2748 | kdb_register_repeat("mm", kdb_mm, "<vaddr> <contents>", | ||
| 2749 | "Modify Memory Contents", 0, KDB_REPEAT_NO_ARGS); | ||
| 2750 | kdb_register_repeat("go", kdb_go, "[<vaddr>]", | ||
| 2751 | "Continue Execution", 1, KDB_REPEAT_NONE); | ||
| 2752 | kdb_register_repeat("rd", kdb_rd, "", | ||
| 2753 | "Display Registers", 0, KDB_REPEAT_NONE); | ||
| 2754 | kdb_register_repeat("rm", kdb_rm, "<reg> <contents>", | ||
| 2755 | "Modify Registers", 0, KDB_REPEAT_NONE); | ||
| 2756 | kdb_register_repeat("ef", kdb_ef, "<vaddr>", | ||
| 2757 | "Display exception frame", 0, KDB_REPEAT_NONE); | ||
| 2758 | kdb_register_repeat("bt", kdb_bt, "[<vaddr>]", | ||
| 2759 | "Stack traceback", 1, KDB_REPEAT_NONE); | ||
| 2760 | kdb_register_repeat("btp", kdb_bt, "<pid>", | ||
| 2761 | "Display stack for process <pid>", 0, KDB_REPEAT_NONE); | ||
| 2762 | kdb_register_repeat("bta", kdb_bt, "[DRSTCZEUIMA]", | ||
| 2763 | "Display stack all processes", 0, KDB_REPEAT_NONE); | ||
| 2764 | kdb_register_repeat("btc", kdb_bt, "", | ||
| 2765 | "Backtrace current process on each cpu", 0, KDB_REPEAT_NONE); | ||
| 2766 | kdb_register_repeat("btt", kdb_bt, "<vaddr>", | ||
| 2767 | "Backtrace process given its struct task address", 0, | ||
| 2768 | KDB_REPEAT_NONE); | ||
| 2769 | kdb_register_repeat("ll", kdb_ll, "<first-element> <linkoffset> <cmd>", | ||
| 2770 | "Execute cmd for each element in linked list", 0, KDB_REPEAT_NONE); | ||
| 2771 | kdb_register_repeat("env", kdb_env, "", | ||
| 2772 | "Show environment variables", 0, KDB_REPEAT_NONE); | ||
| 2773 | kdb_register_repeat("set", kdb_set, "", | ||
| 2774 | "Set environment variables", 0, KDB_REPEAT_NONE); | ||
| 2775 | kdb_register_repeat("help", kdb_help, "", | ||
| 2776 | "Display Help Message", 1, KDB_REPEAT_NONE); | ||
| 2777 | kdb_register_repeat("?", kdb_help, "", | ||
| 2778 | "Display Help Message", 0, KDB_REPEAT_NONE); | ||
| 2779 | kdb_register_repeat("cpu", kdb_cpu, "<cpunum>", | ||
| 2780 | "Switch to new cpu", 0, KDB_REPEAT_NONE); | ||
| 2781 | kdb_register_repeat("kgdb", kdb_kgdb, "", | ||
| 2782 | "Enter kgdb mode", 0, KDB_REPEAT_NONE); | ||
| 2783 | kdb_register_repeat("ps", kdb_ps, "[<flags>|A]", | ||
| 2784 | "Display active task list", 0, KDB_REPEAT_NONE); | ||
| 2785 | kdb_register_repeat("pid", kdb_pid, "<pidnum>", | ||
| 2786 | "Switch to another task", 0, KDB_REPEAT_NONE); | ||
| 2787 | kdb_register_repeat("reboot", kdb_reboot, "", | ||
| 2788 | "Reboot the machine immediately", 0, KDB_REPEAT_NONE); | ||
| 2789 | #if defined(CONFIG_MODULES) | ||
| 2790 | kdb_register_repeat("lsmod", kdb_lsmod, "", | ||
| 2791 | "List loaded kernel modules", 0, KDB_REPEAT_NONE); | ||
| 2792 | #endif | ||
| 2793 | #if defined(CONFIG_MAGIC_SYSRQ) | ||
| 2794 | kdb_register_repeat("sr", kdb_sr, "<key>", | ||
| 2795 | "Magic SysRq key", 0, KDB_REPEAT_NONE); | ||
| 2796 | #endif | ||
| 2797 | #if defined(CONFIG_PRINTK) | ||
| 2798 | kdb_register_repeat("dmesg", kdb_dmesg, "[lines]", | ||
| 2799 | "Display syslog buffer", 0, KDB_REPEAT_NONE); | ||
| 2800 | #endif | ||
| 2801 | kdb_register_repeat("defcmd", kdb_defcmd, "name \"usage\" \"help\"", | ||
| 2802 | "Define a set of commands, down to endefcmd", 0, KDB_REPEAT_NONE); | ||
| 2803 | kdb_register_repeat("kill", kdb_kill, "<-signal> <pid>", | ||
| 2804 | "Send a signal to a process", 0, KDB_REPEAT_NONE); | ||
| 2805 | kdb_register_repeat("summary", kdb_summary, "", | ||
| 2806 | "Summarize the system", 4, KDB_REPEAT_NONE); | ||
| 2807 | kdb_register_repeat("per_cpu", kdb_per_cpu, "", | ||
| 2808 | "Display per_cpu variables", 3, KDB_REPEAT_NONE); | ||
| 2809 | kdb_register_repeat("grephelp", kdb_grep_help, "", | ||
| 2810 | "Display help on | grep", 0, KDB_REPEAT_NONE); | ||
| 2811 | } | ||
| 2812 | |||
| 2813 | /* Execute any commands defined in kdb_cmds. */ | ||
| 2814 | static void __init kdb_cmd_init(void) | ||
| 2815 | { | ||
| 2816 | int i, diag; | ||
| 2817 | for (i = 0; kdb_cmds[i]; ++i) { | ||
| 2818 | diag = kdb_parse(kdb_cmds[i]); | ||
| 2819 | if (diag) | ||
| 2820 | kdb_printf("kdb command %s failed, kdb diag %d\n", | ||
| 2821 | kdb_cmds[i], diag); | ||
| 2822 | } | ||
| 2823 | if (defcmd_in_progress) { | ||
| 2824 | kdb_printf("Incomplete 'defcmd' set, forcing endefcmd\n"); | ||
| 2825 | kdb_parse("endefcmd"); | ||
| 2826 | } | ||
| 2827 | } | ||
| 2828 | |||
| 2829 | /* Intialize kdb_printf, breakpoint tables and kdb state */ | ||
| 2830 | void __init kdb_init(int lvl) | ||
| 2831 | { | ||
| 2832 | static int kdb_init_lvl = KDB_NOT_INITIALIZED; | ||
| 2833 | int i; | ||
| 2834 | |||
| 2835 | if (kdb_init_lvl == KDB_INIT_FULL || lvl <= kdb_init_lvl) | ||
| 2836 | return; | ||
| 2837 | for (i = kdb_init_lvl; i < lvl; i++) { | ||
| 2838 | switch (i) { | ||
| 2839 | case KDB_NOT_INITIALIZED: | ||
| 2840 | kdb_inittab(); /* Initialize Command Table */ | ||
| 2841 | kdb_initbptab(); /* Initialize Breakpoints */ | ||
| 2842 | break; | ||
| 2843 | case KDB_INIT_EARLY: | ||
| 2844 | kdb_cmd_init(); /* Build kdb_cmds tables */ | ||
| 2845 | break; | ||
| 2846 | } | ||
| 2847 | } | ||
| 2848 | kdb_init_lvl = lvl; | ||
| 2849 | } | ||
diff --git a/kernel/debug/kdb/kdb_private.h b/kernel/debug/kdb/kdb_private.h new file mode 100644 index 000000000000..97d3ba69775d --- /dev/null +++ b/kernel/debug/kdb/kdb_private.h | |||
| @@ -0,0 +1,300 @@ | |||
| 1 | #ifndef _KDBPRIVATE_H | ||
| 2 | #define _KDBPRIVATE_H | ||
| 3 | |||
| 4 | /* | ||
| 5 | * Kernel Debugger Architecture Independent Private Headers | ||
| 6 | * | ||
| 7 | * This file is subject to the terms and conditions of the GNU General Public | ||
| 8 | * License. See the file "COPYING" in the main directory of this archive | ||
| 9 | * for more details. | ||
| 10 | * | ||
| 11 | * Copyright (c) 2000-2004 Silicon Graphics, Inc. All Rights Reserved. | ||
| 12 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 13 | */ | ||
| 14 | |||
| 15 | #include <linux/kgdb.h> | ||
| 16 | #include "../debug_core.h" | ||
| 17 | |||
| 18 | /* Kernel Debugger Error codes. Must not overlap with command codes. */ | ||
| 19 | #define KDB_NOTFOUND (-1) | ||
| 20 | #define KDB_ARGCOUNT (-2) | ||
| 21 | #define KDB_BADWIDTH (-3) | ||
| 22 | #define KDB_BADRADIX (-4) | ||
| 23 | #define KDB_NOTENV (-5) | ||
| 24 | #define KDB_NOENVVALUE (-6) | ||
| 25 | #define KDB_NOTIMP (-7) | ||
| 26 | #define KDB_ENVFULL (-8) | ||
| 27 | #define KDB_ENVBUFFULL (-9) | ||
| 28 | #define KDB_TOOMANYBPT (-10) | ||
| 29 | #define KDB_TOOMANYDBREGS (-11) | ||
| 30 | #define KDB_DUPBPT (-12) | ||
| 31 | #define KDB_BPTNOTFOUND (-13) | ||
| 32 | #define KDB_BADMODE (-14) | ||
| 33 | #define KDB_BADINT (-15) | ||
| 34 | #define KDB_INVADDRFMT (-16) | ||
| 35 | #define KDB_BADREG (-17) | ||
| 36 | #define KDB_BADCPUNUM (-18) | ||
| 37 | #define KDB_BADLENGTH (-19) | ||
| 38 | #define KDB_NOBP (-20) | ||
| 39 | #define KDB_BADADDR (-21) | ||
| 40 | |||
| 41 | /* Kernel Debugger Command codes. Must not overlap with error codes. */ | ||
| 42 | #define KDB_CMD_GO (-1001) | ||
| 43 | #define KDB_CMD_CPU (-1002) | ||
| 44 | #define KDB_CMD_SS (-1003) | ||
| 45 | #define KDB_CMD_SSB (-1004) | ||
| 46 | #define KDB_CMD_KGDB (-1005) | ||
| 47 | #define KDB_CMD_KGDB2 (-1006) | ||
| 48 | |||
| 49 | /* Internal debug flags */ | ||
| 50 | #define KDB_DEBUG_FLAG_BP 0x0002 /* Breakpoint subsystem debug */ | ||
| 51 | #define KDB_DEBUG_FLAG_BB_SUMM 0x0004 /* Basic block analysis, summary only */ | ||
| 52 | #define KDB_DEBUG_FLAG_AR 0x0008 /* Activation record, generic */ | ||
| 53 | #define KDB_DEBUG_FLAG_ARA 0x0010 /* Activation record, arch specific */ | ||
| 54 | #define KDB_DEBUG_FLAG_BB 0x0020 /* All basic block analysis */ | ||
| 55 | #define KDB_DEBUG_FLAG_STATE 0x0040 /* State flags */ | ||
| 56 | #define KDB_DEBUG_FLAG_MASK 0xffff /* All debug flags */ | ||
| 57 | #define KDB_DEBUG_FLAG_SHIFT 16 /* Shift factor for dbflags */ | ||
| 58 | |||
| 59 | #define KDB_DEBUG(flag) (kdb_flags & \ | ||
| 60 | (KDB_DEBUG_FLAG_##flag << KDB_DEBUG_FLAG_SHIFT)) | ||
| 61 | #define KDB_DEBUG_STATE(text, value) if (KDB_DEBUG(STATE)) \ | ||
| 62 | kdb_print_state(text, value) | ||
| 63 | |||
| 64 | #if BITS_PER_LONG == 32 | ||
| 65 | |||
| 66 | #define KDB_PLATFORM_ENV "BYTESPERWORD=4" | ||
| 67 | |||
| 68 | #define kdb_machreg_fmt "0x%lx" | ||
| 69 | #define kdb_machreg_fmt0 "0x%08lx" | ||
| 70 | #define kdb_bfd_vma_fmt "0x%lx" | ||
| 71 | #define kdb_bfd_vma_fmt0 "0x%08lx" | ||
| 72 | #define kdb_elfw_addr_fmt "0x%x" | ||
| 73 | #define kdb_elfw_addr_fmt0 "0x%08x" | ||
| 74 | #define kdb_f_count_fmt "%d" | ||
| 75 | |||
| 76 | #elif BITS_PER_LONG == 64 | ||
| 77 | |||
| 78 | #define KDB_PLATFORM_ENV "BYTESPERWORD=8" | ||
| 79 | |||
| 80 | #define kdb_machreg_fmt "0x%lx" | ||
| 81 | #define kdb_machreg_fmt0 "0x%016lx" | ||
| 82 | #define kdb_bfd_vma_fmt "0x%lx" | ||
| 83 | #define kdb_bfd_vma_fmt0 "0x%016lx" | ||
| 84 | #define kdb_elfw_addr_fmt "0x%x" | ||
| 85 | #define kdb_elfw_addr_fmt0 "0x%016x" | ||
| 86 | #define kdb_f_count_fmt "%ld" | ||
| 87 | |||
| 88 | #endif | ||
| 89 | |||
| 90 | /* | ||
| 91 | * KDB_MAXBPT describes the total number of breakpoints | ||
| 92 | * supported by this architecure. | ||
| 93 | */ | ||
| 94 | #define KDB_MAXBPT 16 | ||
| 95 | |||
| 96 | /* Maximum number of arguments to a function */ | ||
| 97 | #define KDB_MAXARGS 16 | ||
| 98 | |||
| 99 | typedef enum { | ||
| 100 | KDB_REPEAT_NONE = 0, /* Do not repeat this command */ | ||
| 101 | KDB_REPEAT_NO_ARGS, /* Repeat the command without arguments */ | ||
| 102 | KDB_REPEAT_WITH_ARGS, /* Repeat the command including its arguments */ | ||
| 103 | } kdb_repeat_t; | ||
| 104 | |||
| 105 | typedef int (*kdb_func_t)(int, const char **); | ||
| 106 | |||
| 107 | /* Symbol table format returned by kallsyms. */ | ||
| 108 | typedef struct __ksymtab { | ||
| 109 | unsigned long value; /* Address of symbol */ | ||
| 110 | const char *mod_name; /* Module containing symbol or | ||
| 111 | * "kernel" */ | ||
| 112 | unsigned long mod_start; | ||
| 113 | unsigned long mod_end; | ||
| 114 | const char *sec_name; /* Section containing symbol */ | ||
| 115 | unsigned long sec_start; | ||
| 116 | unsigned long sec_end; | ||
| 117 | const char *sym_name; /* Full symbol name, including | ||
| 118 | * any version */ | ||
| 119 | unsigned long sym_start; | ||
| 120 | unsigned long sym_end; | ||
| 121 | } kdb_symtab_t; | ||
| 122 | extern int kallsyms_symbol_next(char *prefix_name, int flag); | ||
| 123 | extern int kallsyms_symbol_complete(char *prefix_name, int max_len); | ||
| 124 | |||
| 125 | /* Exported Symbols for kernel loadable modules to use. */ | ||
| 126 | extern int kdb_register(char *, kdb_func_t, char *, char *, short); | ||
| 127 | extern int kdb_register_repeat(char *, kdb_func_t, char *, char *, | ||
| 128 | short, kdb_repeat_t); | ||
| 129 | extern int kdb_unregister(char *); | ||
| 130 | |||
| 131 | extern int kdb_getarea_size(void *, unsigned long, size_t); | ||
| 132 | extern int kdb_putarea_size(unsigned long, void *, size_t); | ||
| 133 | |||
| 134 | /* | ||
| 135 | * Like get_user and put_user, kdb_getarea and kdb_putarea take variable | ||
| 136 | * names, not pointers. The underlying *_size functions take pointers. | ||
| 137 | */ | ||
| 138 | #define kdb_getarea(x, addr) kdb_getarea_size(&(x), addr, sizeof((x))) | ||
| 139 | #define kdb_putarea(addr, x) kdb_putarea_size(addr, &(x), sizeof((x))) | ||
| 140 | |||
| 141 | extern int kdb_getphysword(unsigned long *word, | ||
| 142 | unsigned long addr, size_t size); | ||
| 143 | extern int kdb_getword(unsigned long *, unsigned long, size_t); | ||
| 144 | extern int kdb_putword(unsigned long, unsigned long, size_t); | ||
| 145 | |||
| 146 | extern int kdbgetularg(const char *, unsigned long *); | ||
| 147 | extern int kdb_set(int, const char **); | ||
| 148 | extern char *kdbgetenv(const char *); | ||
| 149 | extern int kdbgetintenv(const char *, int *); | ||
| 150 | extern int kdbgetaddrarg(int, const char **, int*, unsigned long *, | ||
| 151 | long *, char **); | ||
| 152 | extern int kdbgetsymval(const char *, kdb_symtab_t *); | ||
| 153 | extern int kdbnearsym(unsigned long, kdb_symtab_t *); | ||
| 154 | extern void kdbnearsym_cleanup(void); | ||
| 155 | extern char *kdb_strdup(const char *str, gfp_t type); | ||
| 156 | extern void kdb_symbol_print(unsigned long, const kdb_symtab_t *, unsigned int); | ||
| 157 | |||
| 158 | /* Routine for debugging the debugger state. */ | ||
| 159 | extern void kdb_print_state(const char *, int); | ||
| 160 | |||
| 161 | extern int kdb_state; | ||
| 162 | #define KDB_STATE_KDB 0x00000001 /* Cpu is inside kdb */ | ||
| 163 | #define KDB_STATE_LEAVING 0x00000002 /* Cpu is leaving kdb */ | ||
| 164 | #define KDB_STATE_CMD 0x00000004 /* Running a kdb command */ | ||
| 165 | #define KDB_STATE_KDB_CONTROL 0x00000008 /* This cpu is under | ||
| 166 | * kdb control */ | ||
| 167 | #define KDB_STATE_HOLD_CPU 0x00000010 /* Hold this cpu inside kdb */ | ||
| 168 | #define KDB_STATE_DOING_SS 0x00000020 /* Doing ss command */ | ||
| 169 | #define KDB_STATE_DOING_SSB 0x00000040 /* Doing ssb command, | ||
| 170 | * DOING_SS is also set */ | ||
| 171 | #define KDB_STATE_SSBPT 0x00000080 /* Install breakpoint | ||
| 172 | * after one ss, independent of | ||
| 173 | * DOING_SS */ | ||
| 174 | #define KDB_STATE_REENTRY 0x00000100 /* Valid re-entry into kdb */ | ||
| 175 | #define KDB_STATE_SUPPRESS 0x00000200 /* Suppress error messages */ | ||
| 176 | #define KDB_STATE_PAGER 0x00000400 /* pager is available */ | ||
| 177 | #define KDB_STATE_GO_SWITCH 0x00000800 /* go is switching | ||
| 178 | * back to initial cpu */ | ||
| 179 | #define KDB_STATE_PRINTF_LOCK 0x00001000 /* Holds kdb_printf lock */ | ||
| 180 | #define KDB_STATE_WAIT_IPI 0x00002000 /* Waiting for kdb_ipi() NMI */ | ||
| 181 | #define KDB_STATE_RECURSE 0x00004000 /* Recursive entry to kdb */ | ||
| 182 | #define KDB_STATE_IP_ADJUSTED 0x00008000 /* Restart IP has been | ||
| 183 | * adjusted */ | ||
| 184 | #define KDB_STATE_GO1 0x00010000 /* go only releases one cpu */ | ||
| 185 | #define KDB_STATE_KEYBOARD 0x00020000 /* kdb entered via | ||
| 186 | * keyboard on this cpu */ | ||
| 187 | #define KDB_STATE_KEXEC 0x00040000 /* kexec issued */ | ||
| 188 | #define KDB_STATE_DOING_KGDB 0x00080000 /* kgdb enter now issued */ | ||
| 189 | #define KDB_STATE_DOING_KGDB2 0x00100000 /* kgdb enter now issued */ | ||
| 190 | #define KDB_STATE_KGDB_TRANS 0x00200000 /* Transition to kgdb */ | ||
| 191 | #define KDB_STATE_ARCH 0xff000000 /* Reserved for arch | ||
| 192 | * specific use */ | ||
| 193 | |||
| 194 | #define KDB_STATE(flag) (kdb_state & KDB_STATE_##flag) | ||
| 195 | #define KDB_STATE_SET(flag) ((void)(kdb_state |= KDB_STATE_##flag)) | ||
| 196 | #define KDB_STATE_CLEAR(flag) ((void)(kdb_state &= ~KDB_STATE_##flag)) | ||
| 197 | |||
| 198 | extern int kdb_nextline; /* Current number of lines displayed */ | ||
| 199 | |||
| 200 | typedef struct _kdb_bp { | ||
| 201 | unsigned long bp_addr; /* Address breakpoint is present at */ | ||
| 202 | unsigned int bp_free:1; /* This entry is available */ | ||
| 203 | unsigned int bp_enabled:1; /* Breakpoint is active in register */ | ||
| 204 | unsigned int bp_type:4; /* Uses hardware register */ | ||
| 205 | unsigned int bp_installed:1; /* Breakpoint is installed */ | ||
| 206 | unsigned int bp_delay:1; /* Do delayed bp handling */ | ||
| 207 | unsigned int bp_delayed:1; /* Delayed breakpoint */ | ||
| 208 | unsigned int bph_length; /* HW break length */ | ||
| 209 | } kdb_bp_t; | ||
| 210 | |||
| 211 | #ifdef CONFIG_KGDB_KDB | ||
| 212 | extern kdb_bp_t kdb_breakpoints[/* KDB_MAXBPT */]; | ||
| 213 | |||
| 214 | /* The KDB shell command table */ | ||
| 215 | typedef struct _kdbtab { | ||
| 216 | char *cmd_name; /* Command name */ | ||
| 217 | kdb_func_t cmd_func; /* Function to execute command */ | ||
| 218 | char *cmd_usage; /* Usage String for this command */ | ||
| 219 | char *cmd_help; /* Help message for this command */ | ||
| 220 | short cmd_flags; /* Parsing flags */ | ||
| 221 | short cmd_minlen; /* Minimum legal # command | ||
| 222 | * chars required */ | ||
| 223 | kdb_repeat_t cmd_repeat; /* Does command auto repeat on enter? */ | ||
| 224 | } kdbtab_t; | ||
| 225 | |||
| 226 | extern int kdb_bt(int, const char **); /* KDB display back trace */ | ||
| 227 | |||
| 228 | /* KDB breakpoint management functions */ | ||
| 229 | extern void kdb_initbptab(void); | ||
| 230 | extern void kdb_bp_install(struct pt_regs *); | ||
| 231 | extern void kdb_bp_remove(void); | ||
| 232 | |||
| 233 | typedef enum { | ||
| 234 | KDB_DB_BPT, /* Breakpoint */ | ||
| 235 | KDB_DB_SS, /* Single-step trap */ | ||
| 236 | KDB_DB_SSB, /* Single step to branch */ | ||
| 237 | KDB_DB_SSBPT, /* Single step over breakpoint */ | ||
| 238 | KDB_DB_NOBPT /* Spurious breakpoint */ | ||
| 239 | } kdb_dbtrap_t; | ||
| 240 | |||
| 241 | extern int kdb_main_loop(kdb_reason_t, kdb_reason_t, | ||
| 242 | int, kdb_dbtrap_t, struct pt_regs *); | ||
| 243 | |||
| 244 | /* Miscellaneous functions and data areas */ | ||
| 245 | extern int kdb_grepping_flag; | ||
| 246 | extern char kdb_grep_string[]; | ||
| 247 | extern int kdb_grep_leading; | ||
| 248 | extern int kdb_grep_trailing; | ||
| 249 | extern char *kdb_cmds[]; | ||
| 250 | extern void kdb_syslog_data(char *syslog_data[]); | ||
| 251 | extern unsigned long kdb_task_state_string(const char *); | ||
| 252 | extern char kdb_task_state_char (const struct task_struct *); | ||
| 253 | extern unsigned long kdb_task_state(const struct task_struct *p, | ||
| 254 | unsigned long mask); | ||
| 255 | extern void kdb_ps_suppressed(void); | ||
| 256 | extern void kdb_ps1(const struct task_struct *p); | ||
| 257 | extern void kdb_print_nameval(const char *name, unsigned long val); | ||
| 258 | extern void kdb_send_sig_info(struct task_struct *p, struct siginfo *info); | ||
| 259 | extern void kdb_meminfo_proc_show(void); | ||
| 260 | extern const char *kdb_walk_kallsyms(loff_t *pos); | ||
| 261 | extern char *kdb_getstr(char *, size_t, char *); | ||
| 262 | |||
| 263 | /* Defines for kdb_symbol_print */ | ||
| 264 | #define KDB_SP_SPACEB 0x0001 /* Space before string */ | ||
| 265 | #define KDB_SP_SPACEA 0x0002 /* Space after string */ | ||
| 266 | #define KDB_SP_PAREN 0x0004 /* Parenthesis around string */ | ||
| 267 | #define KDB_SP_VALUE 0x0008 /* Print the value of the address */ | ||
| 268 | #define KDB_SP_SYMSIZE 0x0010 /* Print the size of the symbol */ | ||
| 269 | #define KDB_SP_NEWLINE 0x0020 /* Newline after string */ | ||
| 270 | #define KDB_SP_DEFAULT (KDB_SP_VALUE|KDB_SP_PAREN) | ||
| 271 | |||
| 272 | #define KDB_TSK(cpu) kgdb_info[cpu].task | ||
| 273 | #define KDB_TSKREGS(cpu) kgdb_info[cpu].debuggerinfo | ||
| 274 | |||
| 275 | extern struct task_struct *kdb_curr_task(int); | ||
| 276 | |||
| 277 | #define kdb_task_has_cpu(p) (task_curr(p)) | ||
| 278 | |||
| 279 | /* Simplify coexistence with NPTL */ | ||
| 280 | #define kdb_do_each_thread(g, p) do_each_thread(g, p) | ||
| 281 | #define kdb_while_each_thread(g, p) while_each_thread(g, p) | ||
| 282 | |||
| 283 | #define GFP_KDB (in_interrupt() ? GFP_ATOMIC : GFP_KERNEL) | ||
| 284 | |||
| 285 | extern void *debug_kmalloc(size_t size, gfp_t flags); | ||
| 286 | extern void debug_kfree(void *); | ||
| 287 | extern void debug_kusage(void); | ||
| 288 | |||
| 289 | extern void kdb_set_current_task(struct task_struct *); | ||
| 290 | extern struct task_struct *kdb_current_task; | ||
| 291 | #ifdef CONFIG_MODULES | ||
| 292 | extern struct list_head *kdb_modules; | ||
| 293 | #endif /* CONFIG_MODULES */ | ||
| 294 | |||
| 295 | extern char kdb_prompt_str[]; | ||
| 296 | |||
| 297 | #define KDB_WORD_SIZE ((int)sizeof(unsigned long)) | ||
| 298 | |||
| 299 | #endif /* CONFIG_KGDB_KDB */ | ||
| 300 | #endif /* !_KDBPRIVATE_H */ | ||
diff --git a/kernel/debug/kdb/kdb_support.c b/kernel/debug/kdb/kdb_support.c new file mode 100644 index 000000000000..45344d5c53dd --- /dev/null +++ b/kernel/debug/kdb/kdb_support.c | |||
| @@ -0,0 +1,927 @@ | |||
| 1 | /* | ||
| 2 | * Kernel Debugger Architecture Independent Support Functions | ||
| 3 | * | ||
| 4 | * This file is subject to the terms and conditions of the GNU General Public | ||
| 5 | * License. See the file "COPYING" in the main directory of this archive | ||
| 6 | * for more details. | ||
| 7 | * | ||
| 8 | * Copyright (c) 1999-2004 Silicon Graphics, Inc. All Rights Reserved. | ||
| 9 | * Copyright (c) 2009 Wind River Systems, Inc. All Rights Reserved. | ||
| 10 | * 03/02/13 added new 2.5 kallsyms <xavier.bru@bull.net> | ||
| 11 | */ | ||
| 12 | |||
| 13 | #include <stdarg.h> | ||
| 14 | #include <linux/types.h> | ||
| 15 | #include <linux/sched.h> | ||
| 16 | #include <linux/mm.h> | ||
| 17 | #include <linux/kallsyms.h> | ||
| 18 | #include <linux/stddef.h> | ||
| 19 | #include <linux/vmalloc.h> | ||
| 20 | #include <linux/ptrace.h> | ||
| 21 | #include <linux/module.h> | ||
| 22 | #include <linux/highmem.h> | ||
| 23 | #include <linux/hardirq.h> | ||
| 24 | #include <linux/delay.h> | ||
| 25 | #include <linux/uaccess.h> | ||
| 26 | #include <linux/kdb.h> | ||
| 27 | #include <linux/slab.h> | ||
| 28 | #include "kdb_private.h" | ||
| 29 | |||
| 30 | /* | ||
| 31 | * kdbgetsymval - Return the address of the given symbol. | ||
| 32 | * | ||
| 33 | * Parameters: | ||
| 34 | * symname Character string containing symbol name | ||
| 35 | * symtab Structure to receive results | ||
| 36 | * Returns: | ||
| 37 | * 0 Symbol not found, symtab zero filled | ||
| 38 | * 1 Symbol mapped to module/symbol/section, data in symtab | ||
| 39 | */ | ||
| 40 | int kdbgetsymval(const char *symname, kdb_symtab_t *symtab) | ||
| 41 | { | ||
| 42 | if (KDB_DEBUG(AR)) | ||
| 43 | kdb_printf("kdbgetsymval: symname=%s, symtab=%p\n", symname, | ||
| 44 | symtab); | ||
| 45 | memset(symtab, 0, sizeof(*symtab)); | ||
| 46 | symtab->sym_start = kallsyms_lookup_name(symname); | ||
| 47 | if (symtab->sym_start) { | ||
| 48 | if (KDB_DEBUG(AR)) | ||
| 49 | kdb_printf("kdbgetsymval: returns 1, " | ||
| 50 | "symtab->sym_start=0x%lx\n", | ||
| 51 | symtab->sym_start); | ||
| 52 | return 1; | ||
| 53 | } | ||
| 54 | if (KDB_DEBUG(AR)) | ||
| 55 | kdb_printf("kdbgetsymval: returns 0\n"); | ||
| 56 | return 0; | ||
| 57 | } | ||
| 58 | EXPORT_SYMBOL(kdbgetsymval); | ||
| 59 | |||
| 60 | static char *kdb_name_table[100]; /* arbitrary size */ | ||
| 61 | |||
| 62 | /* | ||
| 63 | * kdbnearsym - Return the name of the symbol with the nearest address | ||
| 64 | * less than 'addr'. | ||
| 65 | * | ||
| 66 | * Parameters: | ||
| 67 | * addr Address to check for symbol near | ||
| 68 | * symtab Structure to receive results | ||
| 69 | * Returns: | ||
| 70 | * 0 No sections contain this address, symtab zero filled | ||
| 71 | * 1 Address mapped to module/symbol/section, data in symtab | ||
| 72 | * Remarks: | ||
| 73 | * 2.6 kallsyms has a "feature" where it unpacks the name into a | ||
| 74 | * string. If that string is reused before the caller expects it | ||
| 75 | * then the caller sees its string change without warning. To | ||
| 76 | * avoid cluttering up the main kdb code with lots of kdb_strdup, | ||
| 77 | * tests and kfree calls, kdbnearsym maintains an LRU list of the | ||
| 78 | * last few unique strings. The list is sized large enough to | ||
| 79 | * hold active strings, no kdb caller of kdbnearsym makes more | ||
| 80 | * than ~20 later calls before using a saved value. | ||
| 81 | */ | ||
| 82 | int kdbnearsym(unsigned long addr, kdb_symtab_t *symtab) | ||
| 83 | { | ||
| 84 | int ret = 0; | ||
| 85 | unsigned long symbolsize; | ||
| 86 | unsigned long offset; | ||
| 87 | #define knt1_size 128 /* must be >= kallsyms table size */ | ||
| 88 | char *knt1 = NULL; | ||
| 89 | |||
| 90 | if (KDB_DEBUG(AR)) | ||
| 91 | kdb_printf("kdbnearsym: addr=0x%lx, symtab=%p\n", addr, symtab); | ||
| 92 | memset(symtab, 0, sizeof(*symtab)); | ||
| 93 | |||
| 94 | if (addr < 4096) | ||
| 95 | goto out; | ||
| 96 | knt1 = debug_kmalloc(knt1_size, GFP_ATOMIC); | ||
| 97 | if (!knt1) { | ||
| 98 | kdb_printf("kdbnearsym: addr=0x%lx cannot kmalloc knt1\n", | ||
| 99 | addr); | ||
| 100 | goto out; | ||
| 101 | } | ||
| 102 | symtab->sym_name = kallsyms_lookup(addr, &symbolsize , &offset, | ||
| 103 | (char **)(&symtab->mod_name), knt1); | ||
| 104 | if (offset > 8*1024*1024) { | ||
| 105 | symtab->sym_name = NULL; | ||
| 106 | addr = offset = symbolsize = 0; | ||
| 107 | } | ||
| 108 | symtab->sym_start = addr - offset; | ||
| 109 | symtab->sym_end = symtab->sym_start + symbolsize; | ||
| 110 | ret = symtab->sym_name != NULL && *(symtab->sym_name) != '\0'; | ||
| 111 | |||
| 112 | if (ret) { | ||
| 113 | int i; | ||
| 114 | /* Another 2.6 kallsyms "feature". Sometimes the sym_name is | ||
| 115 | * set but the buffer passed into kallsyms_lookup is not used, | ||
| 116 | * so it contains garbage. The caller has to work out which | ||
| 117 | * buffer needs to be saved. | ||
| 118 | * | ||
| 119 | * What was Rusty smoking when he wrote that code? | ||
| 120 | */ | ||
| 121 | if (symtab->sym_name != knt1) { | ||
| 122 | strncpy(knt1, symtab->sym_name, knt1_size); | ||
| 123 | knt1[knt1_size-1] = '\0'; | ||
| 124 | } | ||
| 125 | for (i = 0; i < ARRAY_SIZE(kdb_name_table); ++i) { | ||
| 126 | if (kdb_name_table[i] && | ||
| 127 | strcmp(kdb_name_table[i], knt1) == 0) | ||
| 128 | break; | ||
| 129 | } | ||
| 130 | if (i >= ARRAY_SIZE(kdb_name_table)) { | ||
| 131 | debug_kfree(kdb_name_table[0]); | ||
| 132 | memcpy(kdb_name_table, kdb_name_table+1, | ||
| 133 | sizeof(kdb_name_table[0]) * | ||
| 134 | (ARRAY_SIZE(kdb_name_table)-1)); | ||
| 135 | } else { | ||
| 136 | debug_kfree(knt1); | ||
| 137 | knt1 = kdb_name_table[i]; | ||
| 138 | memcpy(kdb_name_table+i, kdb_name_table+i+1, | ||
| 139 | sizeof(kdb_name_table[0]) * | ||
| 140 | (ARRAY_SIZE(kdb_name_table)-i-1)); | ||
| 141 | } | ||
| 142 | i = ARRAY_SIZE(kdb_name_table) - 1; | ||
| 143 | kdb_name_table[i] = knt1; | ||
| 144 | symtab->sym_name = kdb_name_table[i]; | ||
| 145 | knt1 = NULL; | ||
| 146 | } | ||
| 147 | |||
| 148 | if (symtab->mod_name == NULL) | ||
| 149 | symtab->mod_name = "kernel"; | ||
| 150 | if (KDB_DEBUG(AR)) | ||
| 151 | kdb_printf("kdbnearsym: returns %d symtab->sym_start=0x%lx, " | ||
| 152 | "symtab->mod_name=%p, symtab->sym_name=%p (%s)\n", ret, | ||
| 153 | symtab->sym_start, symtab->mod_name, symtab->sym_name, | ||
| 154 | symtab->sym_name); | ||
| 155 | |||
| 156 | out: | ||
| 157 | debug_kfree(knt1); | ||
| 158 | return ret; | ||
| 159 | } | ||
| 160 | |||
| 161 | void kdbnearsym_cleanup(void) | ||
| 162 | { | ||
| 163 | int i; | ||
| 164 | for (i = 0; i < ARRAY_SIZE(kdb_name_table); ++i) { | ||
| 165 | if (kdb_name_table[i]) { | ||
| 166 | debug_kfree(kdb_name_table[i]); | ||
| 167 | kdb_name_table[i] = NULL; | ||
| 168 | } | ||
| 169 | } | ||
| 170 | } | ||
| 171 | |||
| 172 | static char ks_namebuf[KSYM_NAME_LEN+1], ks_namebuf_prev[KSYM_NAME_LEN+1]; | ||
| 173 | |||
| 174 | /* | ||
| 175 | * kallsyms_symbol_complete | ||
| 176 | * | ||
| 177 | * Parameters: | ||
| 178 | * prefix_name prefix of a symbol name to lookup | ||
| 179 | * max_len maximum length that can be returned | ||
| 180 | * Returns: | ||
| 181 | * Number of symbols which match the given prefix. | ||
| 182 | * Notes: | ||
| 183 | * prefix_name is changed to contain the longest unique prefix that | ||
| 184 | * starts with this prefix (tab completion). | ||
| 185 | */ | ||
| 186 | int kallsyms_symbol_complete(char *prefix_name, int max_len) | ||
| 187 | { | ||
| 188 | loff_t pos = 0; | ||
| 189 | int prefix_len = strlen(prefix_name), prev_len = 0; | ||
| 190 | int i, number = 0; | ||
| 191 | const char *name; | ||
| 192 | |||
| 193 | while ((name = kdb_walk_kallsyms(&pos))) { | ||
| 194 | if (strncmp(name, prefix_name, prefix_len) == 0) { | ||
| 195 | strcpy(ks_namebuf, name); | ||
| 196 | /* Work out the longest name that matches the prefix */ | ||
| 197 | if (++number == 1) { | ||
| 198 | prev_len = min_t(int, max_len-1, | ||
| 199 | strlen(ks_namebuf)); | ||
| 200 | memcpy(ks_namebuf_prev, ks_namebuf, prev_len); | ||
| 201 | ks_namebuf_prev[prev_len] = '\0'; | ||
| 202 | continue; | ||
| 203 | } | ||
| 204 | for (i = 0; i < prev_len; i++) { | ||
| 205 | if (ks_namebuf[i] != ks_namebuf_prev[i]) { | ||
| 206 | prev_len = i; | ||
| 207 | ks_namebuf_prev[i] = '\0'; | ||
| 208 | break; | ||
| 209 | } | ||
| 210 | } | ||
| 211 | } | ||
| 212 | } | ||
| 213 | if (prev_len > prefix_len) | ||
| 214 | memcpy(prefix_name, ks_namebuf_prev, prev_len+1); | ||
| 215 | return number; | ||
| 216 | } | ||
| 217 | |||
| 218 | /* | ||
| 219 | * kallsyms_symbol_next | ||
| 220 | * | ||
| 221 | * Parameters: | ||
| 222 | * prefix_name prefix of a symbol name to lookup | ||
| 223 | * flag 0 means search from the head, 1 means continue search. | ||
| 224 | * Returns: | ||
| 225 | * 1 if a symbol matches the given prefix. | ||
| 226 | * 0 if no string found | ||
| 227 | */ | ||
| 228 | int kallsyms_symbol_next(char *prefix_name, int flag) | ||
| 229 | { | ||
| 230 | int prefix_len = strlen(prefix_name); | ||
| 231 | static loff_t pos; | ||
| 232 | const char *name; | ||
| 233 | |||
| 234 | if (!flag) | ||
| 235 | pos = 0; | ||
| 236 | |||
| 237 | while ((name = kdb_walk_kallsyms(&pos))) { | ||
| 238 | if (strncmp(name, prefix_name, prefix_len) == 0) { | ||
| 239 | strncpy(prefix_name, name, strlen(name)+1); | ||
| 240 | return 1; | ||
| 241 | } | ||
| 242 | } | ||
| 243 | return 0; | ||
| 244 | } | ||
| 245 | |||
| 246 | /* | ||
| 247 | * kdb_symbol_print - Standard method for printing a symbol name and offset. | ||
| 248 | * Inputs: | ||
| 249 | * addr Address to be printed. | ||
| 250 | * symtab Address of symbol data, if NULL this routine does its | ||
| 251 | * own lookup. | ||
| 252 | * punc Punctuation for string, bit field. | ||
| 253 | * Remarks: | ||
| 254 | * The string and its punctuation is only printed if the address | ||
| 255 | * is inside the kernel, except that the value is always printed | ||
| 256 | * when requested. | ||
| 257 | */ | ||
| 258 | void kdb_symbol_print(unsigned long addr, const kdb_symtab_t *symtab_p, | ||
| 259 | unsigned int punc) | ||
| 260 | { | ||
| 261 | kdb_symtab_t symtab, *symtab_p2; | ||
| 262 | if (symtab_p) { | ||
| 263 | symtab_p2 = (kdb_symtab_t *)symtab_p; | ||
| 264 | } else { | ||
| 265 | symtab_p2 = &symtab; | ||
| 266 | kdbnearsym(addr, symtab_p2); | ||
| 267 | } | ||
| 268 | if (!(symtab_p2->sym_name || (punc & KDB_SP_VALUE))) | ||
| 269 | return; | ||
| 270 | if (punc & KDB_SP_SPACEB) | ||
| 271 | kdb_printf(" "); | ||
| 272 | if (punc & KDB_SP_VALUE) | ||
| 273 | kdb_printf(kdb_machreg_fmt0, addr); | ||
| 274 | if (symtab_p2->sym_name) { | ||
| 275 | if (punc & KDB_SP_VALUE) | ||
| 276 | kdb_printf(" "); | ||
| 277 | if (punc & KDB_SP_PAREN) | ||
| 278 | kdb_printf("("); | ||
| 279 | if (strcmp(symtab_p2->mod_name, "kernel")) | ||
| 280 | kdb_printf("[%s]", symtab_p2->mod_name); | ||
| 281 | kdb_printf("%s", symtab_p2->sym_name); | ||
| 282 | if (addr != symtab_p2->sym_start) | ||
| 283 | kdb_printf("+0x%lx", addr - symtab_p2->sym_start); | ||
| 284 | if (punc & KDB_SP_SYMSIZE) | ||
| 285 | kdb_printf("/0x%lx", | ||
| 286 | symtab_p2->sym_end - symtab_p2->sym_start); | ||
| 287 | if (punc & KDB_SP_PAREN) | ||
| 288 | kdb_printf(")"); | ||
| 289 | } | ||
| 290 | if (punc & KDB_SP_SPACEA) | ||
| 291 | kdb_printf(" "); | ||
| 292 | if (punc & KDB_SP_NEWLINE) | ||
| 293 | kdb_printf("\n"); | ||
| 294 | } | ||
| 295 | |||
| 296 | /* | ||
| 297 | * kdb_strdup - kdb equivalent of strdup, for disasm code. | ||
| 298 | * Inputs: | ||
| 299 | * str The string to duplicate. | ||
| 300 | * type Flags to kmalloc for the new string. | ||
| 301 | * Returns: | ||
| 302 | * Address of the new string, NULL if storage could not be allocated. | ||
| 303 | * Remarks: | ||
| 304 | * This is not in lib/string.c because it uses kmalloc which is not | ||
| 305 | * available when string.o is used in boot loaders. | ||
| 306 | */ | ||
| 307 | char *kdb_strdup(const char *str, gfp_t type) | ||
| 308 | { | ||
| 309 | int n = strlen(str)+1; | ||
| 310 | char *s = kmalloc(n, type); | ||
| 311 | if (!s) | ||
| 312 | return NULL; | ||
| 313 | return strcpy(s, str); | ||
| 314 | } | ||
| 315 | |||
| 316 | /* | ||
| 317 | * kdb_getarea_size - Read an area of data. The kdb equivalent of | ||
| 318 | * copy_from_user, with kdb messages for invalid addresses. | ||
| 319 | * Inputs: | ||
| 320 | * res Pointer to the area to receive the result. | ||
| 321 | * addr Address of the area to copy. | ||
| 322 | * size Size of the area. | ||
| 323 | * Returns: | ||
| 324 | * 0 for success, < 0 for error. | ||
| 325 | */ | ||
| 326 | int kdb_getarea_size(void *res, unsigned long addr, size_t size) | ||
| 327 | { | ||
| 328 | int ret = probe_kernel_read((char *)res, (char *)addr, size); | ||
| 329 | if (ret) { | ||
| 330 | if (!KDB_STATE(SUPPRESS)) { | ||
| 331 | kdb_printf("kdb_getarea: Bad address 0x%lx\n", addr); | ||
| 332 | KDB_STATE_SET(SUPPRESS); | ||
| 333 | } | ||
| 334 | ret = KDB_BADADDR; | ||
| 335 | } else { | ||
| 336 | KDB_STATE_CLEAR(SUPPRESS); | ||
| 337 | } | ||
| 338 | return ret; | ||
| 339 | } | ||
| 340 | |||
| 341 | /* | ||
| 342 | * kdb_putarea_size - Write an area of data. The kdb equivalent of | ||
| 343 | * copy_to_user, with kdb messages for invalid addresses. | ||
| 344 | * Inputs: | ||
| 345 | * addr Address of the area to write to. | ||
| 346 | * res Pointer to the area holding the data. | ||
| 347 | * size Size of the area. | ||
| 348 | * Returns: | ||
| 349 | * 0 for success, < 0 for error. | ||
| 350 | */ | ||
| 351 | int kdb_putarea_size(unsigned long addr, void *res, size_t size) | ||
| 352 | { | ||
| 353 | int ret = probe_kernel_read((char *)addr, (char *)res, size); | ||
| 354 | if (ret) { | ||
| 355 | if (!KDB_STATE(SUPPRESS)) { | ||
| 356 | kdb_printf("kdb_putarea: Bad address 0x%lx\n", addr); | ||
| 357 | KDB_STATE_SET(SUPPRESS); | ||
| 358 | } | ||
| 359 | ret = KDB_BADADDR; | ||
| 360 | } else { | ||
| 361 | KDB_STATE_CLEAR(SUPPRESS); | ||
| 362 | } | ||
| 363 | return ret; | ||
| 364 | } | ||
| 365 | |||
| 366 | /* | ||
| 367 | * kdb_getphys - Read data from a physical address. Validate the | ||
| 368 | * address is in range, use kmap_atomic() to get data | ||
| 369 | * similar to kdb_getarea() - but for phys addresses | ||
| 370 | * Inputs: | ||
| 371 | * res Pointer to the word to receive the result | ||
| 372 | * addr Physical address of the area to copy | ||
| 373 | * size Size of the area | ||
| 374 | * Returns: | ||
| 375 | * 0 for success, < 0 for error. | ||
| 376 | */ | ||
| 377 | static int kdb_getphys(void *res, unsigned long addr, size_t size) | ||
| 378 | { | ||
| 379 | unsigned long pfn; | ||
| 380 | void *vaddr; | ||
| 381 | struct page *page; | ||
| 382 | |||
| 383 | pfn = (addr >> PAGE_SHIFT); | ||
| 384 | if (!pfn_valid(pfn)) | ||
| 385 | return 1; | ||
| 386 | page = pfn_to_page(pfn); | ||
| 387 | vaddr = kmap_atomic(page, KM_KDB); | ||
| 388 | memcpy(res, vaddr + (addr & (PAGE_SIZE - 1)), size); | ||
| 389 | kunmap_atomic(vaddr, KM_KDB); | ||
| 390 | |||
| 391 | return 0; | ||
| 392 | } | ||
| 393 | |||
| 394 | /* | ||
| 395 | * kdb_getphysword | ||
| 396 | * Inputs: | ||
| 397 | * word Pointer to the word to receive the result. | ||
| 398 | * addr Address of the area to copy. | ||
| 399 | * size Size of the area. | ||
| 400 | * Returns: | ||
| 401 | * 0 for success, < 0 for error. | ||
| 402 | */ | ||
| 403 | int kdb_getphysword(unsigned long *word, unsigned long addr, size_t size) | ||
| 404 | { | ||
| 405 | int diag; | ||
| 406 | __u8 w1; | ||
| 407 | __u16 w2; | ||
| 408 | __u32 w4; | ||
| 409 | __u64 w8; | ||
| 410 | *word = 0; /* Default value if addr or size is invalid */ | ||
| 411 | |||
| 412 | switch (size) { | ||
| 413 | case 1: | ||
| 414 | diag = kdb_getphys(&w1, addr, sizeof(w1)); | ||
| 415 | if (!diag) | ||
| 416 | *word = w1; | ||
| 417 | break; | ||
| 418 | case 2: | ||
| 419 | diag = kdb_getphys(&w2, addr, sizeof(w2)); | ||
| 420 | if (!diag) | ||
| 421 | *word = w2; | ||
| 422 | break; | ||
| 423 | case 4: | ||
| 424 | diag = kdb_getphys(&w4, addr, sizeof(w4)); | ||
| 425 | if (!diag) | ||
| 426 | *word = w4; | ||
| 427 | break; | ||
| 428 | case 8: | ||
| 429 | if (size <= sizeof(*word)) { | ||
| 430 | diag = kdb_getphys(&w8, addr, sizeof(w8)); | ||
| 431 | if (!diag) | ||
| 432 | *word = w8; | ||
| 433 | break; | ||
| 434 | } | ||
| 435 | /* drop through */ | ||
| 436 | default: | ||
| 437 | diag = KDB_BADWIDTH; | ||
| 438 | kdb_printf("kdb_getphysword: bad width %ld\n", (long) size); | ||
| 439 | } | ||
| 440 | return diag; | ||
| 441 | } | ||
| 442 | |||
| 443 | /* | ||
| 444 | * kdb_getword - Read a binary value. Unlike kdb_getarea, this treats | ||
| 445 | * data as numbers. | ||
| 446 | * Inputs: | ||
| 447 | * word Pointer to the word to receive the result. | ||
| 448 | * addr Address of the area to copy. | ||
| 449 | * size Size of the area. | ||
| 450 | * Returns: | ||
| 451 | * 0 for success, < 0 for error. | ||
| 452 | */ | ||
| 453 | int kdb_getword(unsigned long *word, unsigned long addr, size_t size) | ||
| 454 | { | ||
| 455 | int diag; | ||
| 456 | __u8 w1; | ||
| 457 | __u16 w2; | ||
| 458 | __u32 w4; | ||
| 459 | __u64 w8; | ||
| 460 | *word = 0; /* Default value if addr or size is invalid */ | ||
| 461 | switch (size) { | ||
| 462 | case 1: | ||
| 463 | diag = kdb_getarea(w1, addr); | ||
| 464 | if (!diag) | ||
| 465 | *word = w1; | ||
| 466 | break; | ||
| 467 | case 2: | ||
| 468 | diag = kdb_getarea(w2, addr); | ||
| 469 | if (!diag) | ||
| 470 | *word = w2; | ||
| 471 | break; | ||
| 472 | case 4: | ||
| 473 | diag = kdb_getarea(w4, addr); | ||
| 474 | if (!diag) | ||
| 475 | *word = w4; | ||
| 476 | break; | ||
| 477 | case 8: | ||
| 478 | if (size <= sizeof(*word)) { | ||
| 479 | diag = kdb_getarea(w8, addr); | ||
| 480 | if (!diag) | ||
| 481 | *word = w8; | ||
| 482 | break; | ||
| 483 | } | ||
| 484 | /* drop through */ | ||
| 485 | default: | ||
| 486 | diag = KDB_BADWIDTH; | ||
| 487 | kdb_printf("kdb_getword: bad width %ld\n", (long) size); | ||
| 488 | } | ||
| 489 | return diag; | ||
| 490 | } | ||
| 491 | |||
| 492 | /* | ||
| 493 | * kdb_putword - Write a binary value. Unlike kdb_putarea, this | ||
| 494 | * treats data as numbers. | ||
| 495 | * Inputs: | ||
| 496 | * addr Address of the area to write to.. | ||
| 497 | * word The value to set. | ||
| 498 | * size Size of the area. | ||
| 499 | * Returns: | ||
| 500 | * 0 for success, < 0 for error. | ||
| 501 | */ | ||
| 502 | int kdb_putword(unsigned long addr, unsigned long word, size_t size) | ||
| 503 | { | ||
| 504 | int diag; | ||
| 505 | __u8 w1; | ||
| 506 | __u16 w2; | ||
| 507 | __u32 w4; | ||
| 508 | __u64 w8; | ||
| 509 | switch (size) { | ||
| 510 | case 1: | ||
| 511 | w1 = word; | ||
| 512 | diag = kdb_putarea(addr, w1); | ||
| 513 | break; | ||
| 514 | case 2: | ||
| 515 | w2 = word; | ||
| 516 | diag = kdb_putarea(addr, w2); | ||
| 517 | break; | ||
| 518 | case 4: | ||
| 519 | w4 = word; | ||
| 520 | diag = kdb_putarea(addr, w4); | ||
| 521 | break; | ||
| 522 | case 8: | ||
| 523 | if (size <= sizeof(word)) { | ||
| 524 | w8 = word; | ||
| 525 | diag = kdb_putarea(addr, w8); | ||
| 526 | break; | ||
| 527 | } | ||
| 528 | /* drop through */ | ||
| 529 | default: | ||
| 530 | diag = KDB_BADWIDTH; | ||
| 531 | kdb_printf("kdb_putword: bad width %ld\n", (long) size); | ||
| 532 | } | ||
| 533 | return diag; | ||
| 534 | } | ||
| 535 | |||
| 536 | /* | ||
| 537 | * kdb_task_state_string - Convert a string containing any of the | ||
| 538 | * letters DRSTCZEUIMA to a mask for the process state field and | ||
| 539 | * return the value. If no argument is supplied, return the mask | ||
| 540 | * that corresponds to environment variable PS, DRSTCZEU by | ||
| 541 | * default. | ||
| 542 | * Inputs: | ||
| 543 | * s String to convert | ||
| 544 | * Returns: | ||
| 545 | * Mask for process state. | ||
| 546 | * Notes: | ||
| 547 | * The mask folds data from several sources into a single long value, so | ||
| 548 | * be carefull not to overlap the bits. TASK_* bits are in the LSB, | ||
| 549 | * special cases like UNRUNNABLE are in the MSB. As of 2.6.10-rc1 there | ||
| 550 | * is no overlap between TASK_* and EXIT_* but that may not always be | ||
| 551 | * true, so EXIT_* bits are shifted left 16 bits before being stored in | ||
| 552 | * the mask. | ||
| 553 | */ | ||
| 554 | |||
| 555 | /* unrunnable is < 0 */ | ||
| 556 | #define UNRUNNABLE (1UL << (8*sizeof(unsigned long) - 1)) | ||
| 557 | #define RUNNING (1UL << (8*sizeof(unsigned long) - 2)) | ||
| 558 | #define IDLE (1UL << (8*sizeof(unsigned long) - 3)) | ||
| 559 | #define DAEMON (1UL << (8*sizeof(unsigned long) - 4)) | ||
| 560 | |||
| 561 | unsigned long kdb_task_state_string(const char *s) | ||
| 562 | { | ||
| 563 | long res = 0; | ||
| 564 | if (!s) { | ||
| 565 | s = kdbgetenv("PS"); | ||
| 566 | if (!s) | ||
| 567 | s = "DRSTCZEU"; /* default value for ps */ | ||
| 568 | } | ||
| 569 | while (*s) { | ||
| 570 | switch (*s) { | ||
| 571 | case 'D': | ||
| 572 | res |= TASK_UNINTERRUPTIBLE; | ||
| 573 | break; | ||
| 574 | case 'R': | ||
| 575 | res |= RUNNING; | ||
| 576 | break; | ||
| 577 | case 'S': | ||
| 578 | res |= TASK_INTERRUPTIBLE; | ||
| 579 | break; | ||
| 580 | case 'T': | ||
| 581 | res |= TASK_STOPPED; | ||
| 582 | break; | ||
| 583 | case 'C': | ||
| 584 | res |= TASK_TRACED; | ||
| 585 | break; | ||
| 586 | case 'Z': | ||
| 587 | res |= EXIT_ZOMBIE << 16; | ||
| 588 | break; | ||
| 589 | case 'E': | ||
| 590 | res |= EXIT_DEAD << 16; | ||
| 591 | break; | ||
| 592 | case 'U': | ||
| 593 | res |= UNRUNNABLE; | ||
| 594 | break; | ||
| 595 | case 'I': | ||
| 596 | res |= IDLE; | ||
| 597 | break; | ||
| 598 | case 'M': | ||
| 599 | res |= DAEMON; | ||
| 600 | break; | ||
| 601 | case 'A': | ||
| 602 | res = ~0UL; | ||
| 603 | break; | ||
| 604 | default: | ||
| 605 | kdb_printf("%s: unknown flag '%c' ignored\n", | ||
| 606 | __func__, *s); | ||
| 607 | break; | ||
| 608 | } | ||
| 609 | ++s; | ||
| 610 | } | ||
| 611 | return res; | ||
| 612 | } | ||
| 613 | |||
| 614 | /* | ||
| 615 | * kdb_task_state_char - Return the character that represents the task state. | ||
| 616 | * Inputs: | ||
| 617 | * p struct task for the process | ||
| 618 | * Returns: | ||
| 619 | * One character to represent the task state. | ||
| 620 | */ | ||
| 621 | char kdb_task_state_char (const struct task_struct *p) | ||
| 622 | { | ||
| 623 | int cpu; | ||
| 624 | char state; | ||
| 625 | unsigned long tmp; | ||
| 626 | |||
| 627 | if (!p || probe_kernel_read(&tmp, (char *)p, sizeof(unsigned long))) | ||
| 628 | return 'E'; | ||
| 629 | |||
| 630 | cpu = kdb_process_cpu(p); | ||
| 631 | state = (p->state == 0) ? 'R' : | ||
| 632 | (p->state < 0) ? 'U' : | ||
| 633 | (p->state & TASK_UNINTERRUPTIBLE) ? 'D' : | ||
| 634 | (p->state & TASK_STOPPED) ? 'T' : | ||
| 635 | (p->state & TASK_TRACED) ? 'C' : | ||
| 636 | (p->exit_state & EXIT_ZOMBIE) ? 'Z' : | ||
| 637 | (p->exit_state & EXIT_DEAD) ? 'E' : | ||
| 638 | (p->state & TASK_INTERRUPTIBLE) ? 'S' : '?'; | ||
| 639 | if (p->pid == 0) { | ||
| 640 | /* Idle task. Is it really idle, apart from the kdb | ||
| 641 | * interrupt? */ | ||
| 642 | if (!kdb_task_has_cpu(p) || kgdb_info[cpu].irq_depth == 1) { | ||
| 643 | if (cpu != kdb_initial_cpu) | ||
| 644 | state = 'I'; /* idle task */ | ||
| 645 | } | ||
| 646 | } else if (!p->mm && state == 'S') { | ||
| 647 | state = 'M'; /* sleeping system daemon */ | ||
| 648 | } | ||
| 649 | return state; | ||
| 650 | } | ||
| 651 | |||
| 652 | /* | ||
| 653 | * kdb_task_state - Return true if a process has the desired state | ||
| 654 | * given by the mask. | ||
| 655 | * Inputs: | ||
| 656 | * p struct task for the process | ||
| 657 | * mask mask from kdb_task_state_string to select processes | ||
| 658 | * Returns: | ||
| 659 | * True if the process matches at least one criteria defined by the mask. | ||
| 660 | */ | ||
| 661 | unsigned long kdb_task_state(const struct task_struct *p, unsigned long mask) | ||
| 662 | { | ||
| 663 | char state[] = { kdb_task_state_char(p), '\0' }; | ||
| 664 | return (mask & kdb_task_state_string(state)) != 0; | ||
| 665 | } | ||
| 666 | |||
| 667 | /* | ||
| 668 | * kdb_print_nameval - Print a name and its value, converting the | ||
| 669 | * value to a symbol lookup if possible. | ||
| 670 | * Inputs: | ||
| 671 | * name field name to print | ||
| 672 | * val value of field | ||
| 673 | */ | ||
| 674 | void kdb_print_nameval(const char *name, unsigned long val) | ||
| 675 | { | ||
| 676 | kdb_symtab_t symtab; | ||
| 677 | kdb_printf(" %-11.11s ", name); | ||
| 678 | if (kdbnearsym(val, &symtab)) | ||
| 679 | kdb_symbol_print(val, &symtab, | ||
| 680 | KDB_SP_VALUE|KDB_SP_SYMSIZE|KDB_SP_NEWLINE); | ||
| 681 | else | ||
| 682 | kdb_printf("0x%lx\n", val); | ||
| 683 | } | ||
| 684 | |||
| 685 | /* Last ditch allocator for debugging, so we can still debug even when | ||
| 686 | * the GFP_ATOMIC pool has been exhausted. The algorithms are tuned | ||
| 687 | * for space usage, not for speed. One smallish memory pool, the free | ||
| 688 | * chain is always in ascending address order to allow coalescing, | ||
| 689 | * allocations are done in brute force best fit. | ||
| 690 | */ | ||
| 691 | |||
| 692 | struct debug_alloc_header { | ||
| 693 | u32 next; /* offset of next header from start of pool */ | ||
| 694 | u32 size; | ||
| 695 | void *caller; | ||
| 696 | }; | ||
| 697 | |||
| 698 | /* The memory returned by this allocator must be aligned, which means | ||
| 699 | * so must the header size. Do not assume that sizeof(struct | ||
| 700 | * debug_alloc_header) is a multiple of the alignment, explicitly | ||
| 701 | * calculate the overhead of this header, including the alignment. | ||
| 702 | * The rest of this code must not use sizeof() on any header or | ||
| 703 | * pointer to a header. | ||
| 704 | */ | ||
| 705 | #define dah_align 8 | ||
| 706 | #define dah_overhead ALIGN(sizeof(struct debug_alloc_header), dah_align) | ||
| 707 | |||
| 708 | static u64 debug_alloc_pool_aligned[256*1024/dah_align]; /* 256K pool */ | ||
| 709 | static char *debug_alloc_pool = (char *)debug_alloc_pool_aligned; | ||
| 710 | static u32 dah_first, dah_first_call = 1, dah_used, dah_used_max; | ||
| 711 | |||
| 712 | /* Locking is awkward. The debug code is called from all contexts, | ||
| 713 | * including non maskable interrupts. A normal spinlock is not safe | ||
| 714 | * in NMI context. Try to get the debug allocator lock, if it cannot | ||
| 715 | * be obtained after a second then give up. If the lock could not be | ||
| 716 | * previously obtained on this cpu then only try once. | ||
| 717 | * | ||
| 718 | * sparse has no annotation for "this function _sometimes_ acquires a | ||
| 719 | * lock", so fudge the acquire/release notation. | ||
| 720 | */ | ||
| 721 | static DEFINE_SPINLOCK(dap_lock); | ||
| 722 | static int get_dap_lock(void) | ||
| 723 | __acquires(dap_lock) | ||
| 724 | { | ||
| 725 | static int dap_locked = -1; | ||
| 726 | int count; | ||
| 727 | if (dap_locked == smp_processor_id()) | ||
| 728 | count = 1; | ||
| 729 | else | ||
| 730 | count = 1000; | ||
| 731 | while (1) { | ||
| 732 | if (spin_trylock(&dap_lock)) { | ||
| 733 | dap_locked = -1; | ||
| 734 | return 1; | ||
| 735 | } | ||
| 736 | if (!count--) | ||
| 737 | break; | ||
| 738 | udelay(1000); | ||
| 739 | } | ||
| 740 | dap_locked = smp_processor_id(); | ||
| 741 | __acquire(dap_lock); | ||
| 742 | return 0; | ||
| 743 | } | ||
| 744 | |||
| 745 | void *debug_kmalloc(size_t size, gfp_t flags) | ||
| 746 | { | ||
| 747 | unsigned int rem, h_offset; | ||
| 748 | struct debug_alloc_header *best, *bestprev, *prev, *h; | ||
| 749 | void *p = NULL; | ||
| 750 | if (!get_dap_lock()) { | ||
| 751 | __release(dap_lock); /* we never actually got it */ | ||
| 752 | return NULL; | ||
| 753 | } | ||
| 754 | h = (struct debug_alloc_header *)(debug_alloc_pool + dah_first); | ||
| 755 | if (dah_first_call) { | ||
| 756 | h->size = sizeof(debug_alloc_pool_aligned) - dah_overhead; | ||
| 757 | dah_first_call = 0; | ||
| 758 | } | ||
| 759 | size = ALIGN(size, dah_align); | ||
| 760 | prev = best = bestprev = NULL; | ||
| 761 | while (1) { | ||
| 762 | if (h->size >= size && (!best || h->size < best->size)) { | ||
| 763 | best = h; | ||
| 764 | bestprev = prev; | ||
| 765 | if (h->size == size) | ||
| 766 | break; | ||
| 767 | } | ||
| 768 | if (!h->next) | ||
| 769 | break; | ||
| 770 | prev = h; | ||
| 771 | h = (struct debug_alloc_header *)(debug_alloc_pool + h->next); | ||
| 772 | } | ||
| 773 | if (!best) | ||
| 774 | goto out; | ||
| 775 | rem = best->size - size; | ||
| 776 | /* The pool must always contain at least one header */ | ||
| 777 | if (best->next == 0 && bestprev == NULL && rem < dah_overhead) | ||
| 778 | goto out; | ||
| 779 | if (rem >= dah_overhead) { | ||
| 780 | best->size = size; | ||
| 781 | h_offset = ((char *)best - debug_alloc_pool) + | ||
| 782 | dah_overhead + best->size; | ||
| 783 | h = (struct debug_alloc_header *)(debug_alloc_pool + h_offset); | ||
| 784 | h->size = rem - dah_overhead; | ||
| 785 | h->next = best->next; | ||
| 786 | } else | ||
| 787 | h_offset = best->next; | ||
| 788 | best->caller = __builtin_return_address(0); | ||
| 789 | dah_used += best->size; | ||
| 790 | dah_used_max = max(dah_used, dah_used_max); | ||
| 791 | if (bestprev) | ||
| 792 | bestprev->next = h_offset; | ||
| 793 | else | ||
| 794 | dah_first = h_offset; | ||
| 795 | p = (char *)best + dah_overhead; | ||
| 796 | memset(p, POISON_INUSE, best->size - 1); | ||
| 797 | *((char *)p + best->size - 1) = POISON_END; | ||
| 798 | out: | ||
| 799 | spin_unlock(&dap_lock); | ||
| 800 | return p; | ||
| 801 | } | ||
| 802 | |||
| 803 | void debug_kfree(void *p) | ||
| 804 | { | ||
| 805 | struct debug_alloc_header *h; | ||
| 806 | unsigned int h_offset; | ||
| 807 | if (!p) | ||
| 808 | return; | ||
| 809 | if ((char *)p < debug_alloc_pool || | ||
| 810 | (char *)p >= debug_alloc_pool + sizeof(debug_alloc_pool_aligned)) { | ||
| 811 | kfree(p); | ||
| 812 | return; | ||
| 813 | } | ||
| 814 | if (!get_dap_lock()) { | ||
| 815 | __release(dap_lock); /* we never actually got it */ | ||
| 816 | return; /* memory leak, cannot be helped */ | ||
| 817 | } | ||
| 818 | h = (struct debug_alloc_header *)((char *)p - dah_overhead); | ||
| 819 | memset(p, POISON_FREE, h->size - 1); | ||
| 820 | *((char *)p + h->size - 1) = POISON_END; | ||
| 821 | h->caller = NULL; | ||
| 822 | dah_used -= h->size; | ||
| 823 | h_offset = (char *)h - debug_alloc_pool; | ||
| 824 | if (h_offset < dah_first) { | ||
| 825 | h->next = dah_first; | ||
| 826 | dah_first = h_offset; | ||
| 827 | } else { | ||
| 828 | struct debug_alloc_header *prev; | ||
| 829 | unsigned int prev_offset; | ||
| 830 | prev = (struct debug_alloc_header *)(debug_alloc_pool + | ||
| 831 | dah_first); | ||
| 832 | while (1) { | ||
| 833 | if (!prev->next || prev->next > h_offset) | ||
| 834 | break; | ||
| 835 | prev = (struct debug_alloc_header *) | ||
| 836 | (debug_alloc_pool + prev->next); | ||
| 837 | } | ||
| 838 | prev_offset = (char *)prev - debug_alloc_pool; | ||
| 839 | if (prev_offset + dah_overhead + prev->size == h_offset) { | ||
| 840 | prev->size += dah_overhead + h->size; | ||
| 841 | memset(h, POISON_FREE, dah_overhead - 1); | ||
| 842 | *((char *)h + dah_overhead - 1) = POISON_END; | ||
| 843 | h = prev; | ||
| 844 | h_offset = prev_offset; | ||
| 845 | } else { | ||
| 846 | h->next = prev->next; | ||
| 847 | prev->next = h_offset; | ||
| 848 | } | ||
| 849 | } | ||
| 850 | if (h_offset + dah_overhead + h->size == h->next) { | ||
| 851 | struct debug_alloc_header *next; | ||
| 852 | next = (struct debug_alloc_header *) | ||
| 853 | (debug_alloc_pool + h->next); | ||
| 854 | h->size += dah_overhead + next->size; | ||
| 855 | h->next = next->next; | ||
| 856 | memset(next, POISON_FREE, dah_overhead - 1); | ||
| 857 | *((char *)next + dah_overhead - 1) = POISON_END; | ||
| 858 | } | ||
| 859 | spin_unlock(&dap_lock); | ||
| 860 | } | ||
| 861 | |||
| 862 | void debug_kusage(void) | ||
| 863 | { | ||
| 864 | struct debug_alloc_header *h_free, *h_used; | ||
| 865 | #ifdef CONFIG_IA64 | ||
| 866 | /* FIXME: using dah for ia64 unwind always results in a memory leak. | ||
| 867 | * Fix that memory leak first, then set debug_kusage_one_time = 1 for | ||
| 868 | * all architectures. | ||
| 869 | */ | ||
| 870 | static int debug_kusage_one_time; | ||
| 871 | #else | ||
| 872 | static int debug_kusage_one_time = 1; | ||
| 873 | #endif | ||
| 874 | if (!get_dap_lock()) { | ||
| 875 | __release(dap_lock); /* we never actually got it */ | ||
| 876 | return; | ||
| 877 | } | ||
| 878 | h_free = (struct debug_alloc_header *)(debug_alloc_pool + dah_first); | ||
| 879 | if (dah_first == 0 && | ||
| 880 | (h_free->size == sizeof(debug_alloc_pool_aligned) - dah_overhead || | ||
| 881 | dah_first_call)) | ||
| 882 | goto out; | ||
| 883 | if (!debug_kusage_one_time) | ||
| 884 | goto out; | ||
| 885 | debug_kusage_one_time = 0; | ||
| 886 | kdb_printf("%s: debug_kmalloc memory leak dah_first %d\n", | ||
| 887 | __func__, dah_first); | ||
| 888 | if (dah_first) { | ||
| 889 | h_used = (struct debug_alloc_header *)debug_alloc_pool; | ||
| 890 | kdb_printf("%s: h_used %p size %d\n", __func__, h_used, | ||
| 891 | h_used->size); | ||
| 892 | } | ||
| 893 | do { | ||
| 894 | h_used = (struct debug_alloc_header *) | ||
| 895 | ((char *)h_free + dah_overhead + h_free->size); | ||
| 896 | kdb_printf("%s: h_used %p size %d caller %p\n", | ||
| 897 | __func__, h_used, h_used->size, h_used->caller); | ||
| 898 | h_free = (struct debug_alloc_header *) | ||
| 899 | (debug_alloc_pool + h_free->next); | ||
| 900 | } while (h_free->next); | ||
| 901 | h_used = (struct debug_alloc_header *) | ||
| 902 | ((char *)h_free + dah_overhead + h_free->size); | ||
| 903 | if ((char *)h_used - debug_alloc_pool != | ||
| 904 | sizeof(debug_alloc_pool_aligned)) | ||
| 905 | kdb_printf("%s: h_used %p size %d caller %p\n", | ||
| 906 | __func__, h_used, h_used->size, h_used->caller); | ||
| 907 | out: | ||
| 908 | spin_unlock(&dap_lock); | ||
| 909 | } | ||
| 910 | |||
| 911 | /* Maintain a small stack of kdb_flags to allow recursion without disturbing | ||
| 912 | * the global kdb state. | ||
| 913 | */ | ||
| 914 | |||
| 915 | static int kdb_flags_stack[4], kdb_flags_index; | ||
| 916 | |||
| 917 | void kdb_save_flags(void) | ||
| 918 | { | ||
| 919 | BUG_ON(kdb_flags_index >= ARRAY_SIZE(kdb_flags_stack)); | ||
| 920 | kdb_flags_stack[kdb_flags_index++] = kdb_flags; | ||
| 921 | } | ||
| 922 | |||
| 923 | void kdb_restore_flags(void) | ||
| 924 | { | ||
| 925 | BUG_ON(kdb_flags_index <= 0); | ||
| 926 | kdb_flags = kdb_flags_stack[--kdb_flags_index]; | ||
| 927 | } | ||
diff --git a/kernel/kallsyms.c b/kernel/kallsyms.c index 13aff293f4de..6f6d091b5757 100644 --- a/kernel/kallsyms.c +++ b/kernel/kallsyms.c | |||
| @@ -16,6 +16,7 @@ | |||
| 16 | #include <linux/init.h> | 16 | #include <linux/init.h> |
| 17 | #include <linux/seq_file.h> | 17 | #include <linux/seq_file.h> |
| 18 | #include <linux/fs.h> | 18 | #include <linux/fs.h> |
| 19 | #include <linux/kdb.h> | ||
| 19 | #include <linux/err.h> | 20 | #include <linux/err.h> |
| 20 | #include <linux/proc_fs.h> | 21 | #include <linux/proc_fs.h> |
| 21 | #include <linux/sched.h> /* for cond_resched */ | 22 | #include <linux/sched.h> /* for cond_resched */ |
| @@ -516,6 +517,26 @@ static int kallsyms_open(struct inode *inode, struct file *file) | |||
| 516 | return ret; | 517 | return ret; |
| 517 | } | 518 | } |
| 518 | 519 | ||
| 520 | #ifdef CONFIG_KGDB_KDB | ||
| 521 | const char *kdb_walk_kallsyms(loff_t *pos) | ||
| 522 | { | ||
| 523 | static struct kallsym_iter kdb_walk_kallsyms_iter; | ||
| 524 | if (*pos == 0) { | ||
| 525 | memset(&kdb_walk_kallsyms_iter, 0, | ||
| 526 | sizeof(kdb_walk_kallsyms_iter)); | ||
| 527 | reset_iter(&kdb_walk_kallsyms_iter, 0); | ||
| 528 | } | ||
| 529 | while (1) { | ||
| 530 | if (!update_iter(&kdb_walk_kallsyms_iter, *pos)) | ||
| 531 | return NULL; | ||
| 532 | ++*pos; | ||
| 533 | /* Some debugging symbols have no name. Ignore them. */ | ||
| 534 | if (kdb_walk_kallsyms_iter.name[0]) | ||
| 535 | return kdb_walk_kallsyms_iter.name; | ||
| 536 | } | ||
| 537 | } | ||
| 538 | #endif /* CONFIG_KGDB_KDB */ | ||
| 539 | |||
| 519 | static const struct file_operations kallsyms_operations = { | 540 | static const struct file_operations kallsyms_operations = { |
| 520 | .open = kallsyms_open, | 541 | .open = kallsyms_open, |
| 521 | .read = seq_read, | 542 | .read = seq_read, |
diff --git a/kernel/kgdb.c b/kernel/kgdb.c deleted file mode 100644 index 11f3515ca83f..000000000000 --- a/kernel/kgdb.c +++ /dev/null | |||
| @@ -1,1764 +0,0 @@ | |||
| 1 | /* | ||
| 2 | * KGDB stub. | ||
| 3 | * | ||
| 4 | * Maintainer: Jason Wessel <jason.wessel@windriver.com> | ||
| 5 | * | ||
| 6 | * Copyright (C) 2000-2001 VERITAS Software Corporation. | ||
| 7 | * Copyright (C) 2002-2004 Timesys Corporation | ||
| 8 | * Copyright (C) 2003-2004 Amit S. Kale <amitkale@linsyssoft.com> | ||
| 9 | * Copyright (C) 2004 Pavel Machek <pavel@suse.cz> | ||
| 10 | * Copyright (C) 2004-2006 Tom Rini <trini@kernel.crashing.org> | ||
| 11 | * Copyright (C) 2004-2006 LinSysSoft Technologies Pvt. Ltd. | ||
| 12 | * Copyright (C) 2005-2008 Wind River Systems, Inc. | ||
| 13 | * Copyright (C) 2007 MontaVista Software, Inc. | ||
| 14 | * Copyright (C) 2008 Red Hat, Inc., Ingo Molnar <mingo@redhat.com> | ||
| 15 | * | ||
| 16 | * Contributors at various stages not listed above: | ||
| 17 | * Jason Wessel ( jason.wessel@windriver.com ) | ||
| 18 | * George Anzinger <george@mvista.com> | ||
| 19 | * Anurekh Saxena (anurekh.saxena@timesys.com) | ||
| 20 | * Lake Stevens Instrument Division (Glenn Engel) | ||
| 21 | * Jim Kingdon, Cygnus Support. | ||
| 22 | * | ||
| 23 | * Original KGDB stub: David Grothe <dave@gcom.com>, | ||
| 24 | * Tigran Aivazian <tigran@sco.com> | ||
| 25 | * | ||
| 26 | * This file is licensed under the terms of the GNU General Public License | ||
| 27 | * version 2. This program is licensed "as is" without any warranty of any | ||
| 28 | * kind, whether express or implied. | ||
| 29 | */ | ||
| 30 | #include <linux/pid_namespace.h> | ||
| 31 | #include <linux/clocksource.h> | ||
| 32 | #include <linux/interrupt.h> | ||
| 33 | #include <linux/spinlock.h> | ||
| 34 | #include <linux/console.h> | ||
| 35 | #include <linux/threads.h> | ||
| 36 | #include <linux/uaccess.h> | ||
| 37 | #include <linux/kernel.h> | ||
| 38 | #include <linux/module.h> | ||
| 39 | #include <linux/ptrace.h> | ||
| 40 | #include <linux/reboot.h> | ||
| 41 | #include <linux/string.h> | ||
| 42 | #include <linux/delay.h> | ||
| 43 | #include <linux/sched.h> | ||
| 44 | #include <linux/sysrq.h> | ||
| 45 | #include <linux/init.h> | ||
| 46 | #include <linux/kgdb.h> | ||
| 47 | #include <linux/pid.h> | ||
| 48 | #include <linux/smp.h> | ||
| 49 | #include <linux/mm.h> | ||
| 50 | |||
| 51 | #include <asm/cacheflush.h> | ||
| 52 | #include <asm/byteorder.h> | ||
| 53 | #include <asm/atomic.h> | ||
| 54 | #include <asm/system.h> | ||
| 55 | #include <asm/unaligned.h> | ||
| 56 | |||
| 57 | static int kgdb_break_asap; | ||
| 58 | |||
| 59 | #define KGDB_MAX_THREAD_QUERY 17 | ||
| 60 | struct kgdb_state { | ||
| 61 | int ex_vector; | ||
| 62 | int signo; | ||
| 63 | int err_code; | ||
| 64 | int cpu; | ||
| 65 | int pass_exception; | ||
| 66 | unsigned long thr_query; | ||
| 67 | unsigned long threadid; | ||
| 68 | long kgdb_usethreadid; | ||
| 69 | struct pt_regs *linux_regs; | ||
| 70 | }; | ||
| 71 | |||
| 72 | /* Exception state values */ | ||
| 73 | #define DCPU_WANT_MASTER 0x1 /* Waiting to become a master kgdb cpu */ | ||
| 74 | #define DCPU_NEXT_MASTER 0x2 /* Transition from one master cpu to another */ | ||
| 75 | #define DCPU_IS_SLAVE 0x4 /* Slave cpu enter exception */ | ||
| 76 | #define DCPU_SSTEP 0x8 /* CPU is single stepping */ | ||
| 77 | |||
| 78 | static struct debuggerinfo_struct { | ||
| 79 | void *debuggerinfo; | ||
| 80 | struct task_struct *task; | ||
| 81 | int exception_state; | ||
| 82 | } kgdb_info[NR_CPUS]; | ||
| 83 | |||
| 84 | /** | ||
| 85 | * kgdb_connected - Is a host GDB connected to us? | ||
| 86 | */ | ||
| 87 | int kgdb_connected; | ||
| 88 | EXPORT_SYMBOL_GPL(kgdb_connected); | ||
| 89 | |||
| 90 | /* All the KGDB handlers are installed */ | ||
| 91 | static int kgdb_io_module_registered; | ||
| 92 | |||
| 93 | /* Guard for recursive entry */ | ||
| 94 | static int exception_level; | ||
| 95 | |||
| 96 | static struct kgdb_io *kgdb_io_ops; | ||
| 97 | static DEFINE_SPINLOCK(kgdb_registration_lock); | ||
| 98 | |||
| 99 | /* kgdb console driver is loaded */ | ||
| 100 | static int kgdb_con_registered; | ||
| 101 | /* determine if kgdb console output should be used */ | ||
| 102 | static int kgdb_use_con; | ||
| 103 | |||
| 104 | static int __init opt_kgdb_con(char *str) | ||
| 105 | { | ||
| 106 | kgdb_use_con = 1; | ||
| 107 | return 0; | ||
| 108 | } | ||
| 109 | |||
| 110 | early_param("kgdbcon", opt_kgdb_con); | ||
| 111 | |||
| 112 | module_param(kgdb_use_con, int, 0644); | ||
| 113 | |||
| 114 | /* | ||
| 115 | * Holds information about breakpoints in a kernel. These breakpoints are | ||
| 116 | * added and removed by gdb. | ||
| 117 | */ | ||
| 118 | static struct kgdb_bkpt kgdb_break[KGDB_MAX_BREAKPOINTS] = { | ||
| 119 | [0 ... KGDB_MAX_BREAKPOINTS-1] = { .state = BP_UNDEFINED } | ||
| 120 | }; | ||
| 121 | |||
| 122 | /* | ||
| 123 | * The CPU# of the active CPU, or -1 if none: | ||
| 124 | */ | ||
| 125 | atomic_t kgdb_active = ATOMIC_INIT(-1); | ||
| 126 | |||
| 127 | /* | ||
| 128 | * We use NR_CPUs not PERCPU, in case kgdb is used to debug early | ||
| 129 | * bootup code (which might not have percpu set up yet): | ||
| 130 | */ | ||
| 131 | static atomic_t passive_cpu_wait[NR_CPUS]; | ||
| 132 | static atomic_t cpu_in_kgdb[NR_CPUS]; | ||
| 133 | atomic_t kgdb_setting_breakpoint; | ||
| 134 | |||
| 135 | struct task_struct *kgdb_usethread; | ||
| 136 | struct task_struct *kgdb_contthread; | ||
| 137 | |||
| 138 | int kgdb_single_step; | ||
| 139 | pid_t kgdb_sstep_pid; | ||
| 140 | |||
| 141 | /* Our I/O buffers. */ | ||
| 142 | static char remcom_in_buffer[BUFMAX]; | ||
| 143 | static char remcom_out_buffer[BUFMAX]; | ||
| 144 | |||
| 145 | /* Storage for the registers, in GDB format. */ | ||
| 146 | static unsigned long gdb_regs[(NUMREGBYTES + | ||
| 147 | sizeof(unsigned long) - 1) / | ||
| 148 | sizeof(unsigned long)]; | ||
| 149 | |||
| 150 | /* to keep track of the CPU which is doing the single stepping*/ | ||
| 151 | atomic_t kgdb_cpu_doing_single_step = ATOMIC_INIT(-1); | ||
| 152 | |||
| 153 | /* | ||
| 154 | * If you are debugging a problem where roundup (the collection of | ||
| 155 | * all other CPUs) is a problem [this should be extremely rare], | ||
| 156 | * then use the nokgdbroundup option to avoid roundup. In that case | ||
| 157 | * the other CPUs might interfere with your debugging context, so | ||
| 158 | * use this with care: | ||
| 159 | */ | ||
| 160 | static int kgdb_do_roundup = 1; | ||
| 161 | |||
| 162 | static int __init opt_nokgdbroundup(char *str) | ||
| 163 | { | ||
| 164 | kgdb_do_roundup = 0; | ||
| 165 | |||
| 166 | return 0; | ||
| 167 | } | ||
| 168 | |||
| 169 | early_param("nokgdbroundup", opt_nokgdbroundup); | ||
| 170 | |||
| 171 | /* | ||
| 172 | * Finally, some KGDB code :-) | ||
| 173 | */ | ||
| 174 | |||
| 175 | /* | ||
| 176 | * Weak aliases for breakpoint management, | ||
| 177 | * can be overriden by architectures when needed: | ||
| 178 | */ | ||
| 179 | int __weak kgdb_arch_set_breakpoint(unsigned long addr, char *saved_instr) | ||
| 180 | { | ||
| 181 | int err; | ||
| 182 | |||
| 183 | err = probe_kernel_read(saved_instr, (char *)addr, BREAK_INSTR_SIZE); | ||
| 184 | if (err) | ||
| 185 | return err; | ||
| 186 | |||
| 187 | return probe_kernel_write((char *)addr, arch_kgdb_ops.gdb_bpt_instr, | ||
| 188 | BREAK_INSTR_SIZE); | ||
| 189 | } | ||
| 190 | |||
| 191 | int __weak kgdb_arch_remove_breakpoint(unsigned long addr, char *bundle) | ||
| 192 | { | ||
| 193 | return probe_kernel_write((char *)addr, | ||
| 194 | (char *)bundle, BREAK_INSTR_SIZE); | ||
| 195 | } | ||
| 196 | |||
| 197 | int __weak kgdb_validate_break_address(unsigned long addr) | ||
| 198 | { | ||
| 199 | char tmp_variable[BREAK_INSTR_SIZE]; | ||
| 200 | int err; | ||
| 201 | /* Validate setting the breakpoint and then removing it. In the | ||
| 202 | * remove fails, the kernel needs to emit a bad message because we | ||
| 203 | * are deep trouble not being able to put things back the way we | ||
| 204 | * found them. | ||
| 205 | */ | ||
| 206 | err = kgdb_arch_set_breakpoint(addr, tmp_variable); | ||
| 207 | if (err) | ||
| 208 | return err; | ||
| 209 | err = kgdb_arch_remove_breakpoint(addr, tmp_variable); | ||
| 210 | if (err) | ||
| 211 | printk(KERN_ERR "KGDB: Critical breakpoint error, kernel " | ||
| 212 | "memory destroyed at: %lx", addr); | ||
| 213 | return err; | ||
| 214 | } | ||
| 215 | |||
| 216 | unsigned long __weak kgdb_arch_pc(int exception, struct pt_regs *regs) | ||
| 217 | { | ||
| 218 | return instruction_pointer(regs); | ||
| 219 | } | ||
| 220 | |||
| 221 | int __weak kgdb_arch_init(void) | ||
| 222 | { | ||
| 223 | return 0; | ||
| 224 | } | ||
| 225 | |||
| 226 | int __weak kgdb_skipexception(int exception, struct pt_regs *regs) | ||
| 227 | { | ||
| 228 | return 0; | ||
| 229 | } | ||
| 230 | |||
| 231 | void __weak | ||
| 232 | kgdb_post_primary_code(struct pt_regs *regs, int e_vector, int err_code) | ||
| 233 | { | ||
| 234 | return; | ||
| 235 | } | ||
| 236 | |||
| 237 | /** | ||
| 238 | * kgdb_disable_hw_debug - Disable hardware debugging while we in kgdb. | ||
| 239 | * @regs: Current &struct pt_regs. | ||
| 240 | * | ||
| 241 | * This function will be called if the particular architecture must | ||
| 242 | * disable hardware debugging while it is processing gdb packets or | ||
| 243 | * handling exception. | ||
| 244 | */ | ||
| 245 | void __weak kgdb_disable_hw_debug(struct pt_regs *regs) | ||
| 246 | { | ||
| 247 | } | ||
| 248 | |||
| 249 | /* | ||
| 250 | * GDB remote protocol parser: | ||
| 251 | */ | ||
| 252 | |||
| 253 | static int hex(char ch) | ||
| 254 | { | ||
| 255 | if ((ch >= 'a') && (ch <= 'f')) | ||
| 256 | return ch - 'a' + 10; | ||
| 257 | if ((ch >= '0') && (ch <= '9')) | ||
| 258 | return ch - '0'; | ||
| 259 | if ((ch >= 'A') && (ch <= 'F')) | ||
| 260 | return ch - 'A' + 10; | ||
| 261 | return -1; | ||
| 262 | } | ||
| 263 | |||
| 264 | /* scan for the sequence $<data>#<checksum> */ | ||
| 265 | static void get_packet(char *buffer) | ||
| 266 | { | ||
| 267 | unsigned char checksum; | ||
| 268 | unsigned char xmitcsum; | ||
| 269 | int count; | ||
| 270 | char ch; | ||
| 271 | |||
| 272 | do { | ||
| 273 | /* | ||
| 274 | * Spin and wait around for the start character, ignore all | ||
| 275 | * other characters: | ||
| 276 | */ | ||
| 277 | while ((ch = (kgdb_io_ops->read_char())) != '$') | ||
| 278 | /* nothing */; | ||
| 279 | |||
| 280 | kgdb_connected = 1; | ||
| 281 | checksum = 0; | ||
| 282 | xmitcsum = -1; | ||
| 283 | |||
| 284 | count = 0; | ||
| 285 | |||
| 286 | /* | ||
| 287 | * now, read until a # or end of buffer is found: | ||
| 288 | */ | ||
| 289 | while (count < (BUFMAX - 1)) { | ||
| 290 | ch = kgdb_io_ops->read_char(); | ||
| 291 | if (ch == '#') | ||
| 292 | break; | ||
| 293 | checksum = checksum + ch; | ||
| 294 | buffer[count] = ch; | ||
| 295 | count = count + 1; | ||
| 296 | } | ||
| 297 | buffer[count] = 0; | ||
| 298 | |||
| 299 | if (ch == '#') { | ||
| 300 | xmitcsum = hex(kgdb_io_ops->read_char()) << 4; | ||
| 301 | xmitcsum += hex(kgdb_io_ops->read_char()); | ||
| 302 | |||
| 303 | if (checksum != xmitcsum) | ||
| 304 | /* failed checksum */ | ||
| 305 | kgdb_io_ops->write_char('-'); | ||
| 306 | else | ||
| 307 | /* successful transfer */ | ||
| 308 | kgdb_io_ops->write_char('+'); | ||
| 309 | if (kgdb_io_ops->flush) | ||
| 310 | kgdb_io_ops->flush(); | ||
| 311 | } | ||
| 312 | } while (checksum != xmitcsum); | ||
| 313 | } | ||
| 314 | |||
| 315 | /* | ||
| 316 | * Send the packet in buffer. | ||
| 317 | * Check for gdb connection if asked for. | ||
| 318 | */ | ||
| 319 | static void put_packet(char *buffer) | ||
| 320 | { | ||
| 321 | unsigned char checksum; | ||
| 322 | int count; | ||
| 323 | char ch; | ||
| 324 | |||
| 325 | /* | ||
| 326 | * $<packet info>#<checksum>. | ||
| 327 | */ | ||
| 328 | while (1) { | ||
| 329 | kgdb_io_ops->write_char('$'); | ||
| 330 | checksum = 0; | ||
| 331 | count = 0; | ||
| 332 | |||
| 333 | while ((ch = buffer[count])) { | ||
| 334 | kgdb_io_ops->write_char(ch); | ||
| 335 | checksum += ch; | ||
| 336 | count++; | ||
| 337 | } | ||
| 338 | |||
| 339 | kgdb_io_ops->write_char('#'); | ||
| 340 | kgdb_io_ops->write_char(hex_asc_hi(checksum)); | ||
| 341 | kgdb_io_ops->write_char(hex_asc_lo(checksum)); | ||
| 342 | if (kgdb_io_ops->flush) | ||
| 343 | kgdb_io_ops->flush(); | ||
| 344 | |||
| 345 | /* Now see what we get in reply. */ | ||
| 346 | ch = kgdb_io_ops->read_char(); | ||
| 347 | |||
| 348 | if (ch == 3) | ||
| 349 | ch = kgdb_io_ops->read_char(); | ||
| 350 | |||
| 351 | /* If we get an ACK, we are done. */ | ||
| 352 | if (ch == '+') | ||
| 353 | return; | ||
| 354 | |||
| 355 | /* | ||
| 356 | * If we get the start of another packet, this means | ||
| 357 | * that GDB is attempting to reconnect. We will NAK | ||
| 358 | * the packet being sent, and stop trying to send this | ||
| 359 | * packet. | ||
| 360 | */ | ||
| 361 | if (ch == '$') { | ||
| 362 | kgdb_io_ops->write_char('-'); | ||
| 363 | if (kgdb_io_ops->flush) | ||
| 364 | kgdb_io_ops->flush(); | ||
| 365 | return; | ||
| 366 | } | ||
| 367 | } | ||
| 368 | } | ||
| 369 | |||
| 370 | /* | ||
| 371 | * Convert the memory pointed to by mem into hex, placing result in buf. | ||
| 372 | * Return a pointer to the last char put in buf (null). May return an error. | ||
| 373 | */ | ||
| 374 | int kgdb_mem2hex(char *mem, char *buf, int count) | ||
| 375 | { | ||
| 376 | char *tmp; | ||
| 377 | int err; | ||
| 378 | |||
| 379 | /* | ||
| 380 | * We use the upper half of buf as an intermediate buffer for the | ||
| 381 | * raw memory copy. Hex conversion will work against this one. | ||
| 382 | */ | ||
| 383 | tmp = buf + count; | ||
| 384 | |||
| 385 | err = probe_kernel_read(tmp, mem, count); | ||
| 386 | if (!err) { | ||
| 387 | while (count > 0) { | ||
| 388 | buf = pack_hex_byte(buf, *tmp); | ||
| 389 | tmp++; | ||
| 390 | count--; | ||
| 391 | } | ||
| 392 | |||
| 393 | *buf = 0; | ||
| 394 | } | ||
| 395 | |||
| 396 | return err; | ||
| 397 | } | ||
| 398 | |||
| 399 | /* | ||
| 400 | * Copy the binary array pointed to by buf into mem. Fix $, #, and | ||
| 401 | * 0x7d escaped with 0x7d. Return -EFAULT on failure or 0 on success. | ||
| 402 | * The input buf is overwitten with the result to write to mem. | ||
| 403 | */ | ||
| 404 | static int kgdb_ebin2mem(char *buf, char *mem, int count) | ||
| 405 | { | ||
| 406 | int size = 0; | ||
| 407 | char *c = buf; | ||
| 408 | |||
| 409 | while (count-- > 0) { | ||
| 410 | c[size] = *buf++; | ||
| 411 | if (c[size] == 0x7d) | ||
| 412 | c[size] = *buf++ ^ 0x20; | ||
| 413 | size++; | ||
| 414 | } | ||
| 415 | |||
| 416 | return probe_kernel_write(mem, c, size); | ||
| 417 | } | ||
| 418 | |||
| 419 | /* | ||
| 420 | * Convert the hex array pointed to by buf into binary to be placed in mem. | ||
| 421 | * Return a pointer to the character AFTER the last byte written. | ||
| 422 | * May return an error. | ||
| 423 | */ | ||
| 424 | int kgdb_hex2mem(char *buf, char *mem, int count) | ||
| 425 | { | ||
| 426 | char *tmp_raw; | ||
| 427 | char *tmp_hex; | ||
| 428 | |||
| 429 | /* | ||
| 430 | * We use the upper half of buf as an intermediate buffer for the | ||
| 431 | * raw memory that is converted from hex. | ||
| 432 | */ | ||
| 433 | tmp_raw = buf + count * 2; | ||
| 434 | |||
| 435 | tmp_hex = tmp_raw - 1; | ||
| 436 | while (tmp_hex >= buf) { | ||
| 437 | tmp_raw--; | ||
| 438 | *tmp_raw = hex(*tmp_hex--); | ||
| 439 | *tmp_raw |= hex(*tmp_hex--) << 4; | ||
| 440 | } | ||
| 441 | |||
| 442 | return probe_kernel_write(mem, tmp_raw, count); | ||
| 443 | } | ||
| 444 | |||
| 445 | /* | ||
| 446 | * While we find nice hex chars, build a long_val. | ||
| 447 | * Return number of chars processed. | ||
| 448 | */ | ||
| 449 | int kgdb_hex2long(char **ptr, unsigned long *long_val) | ||
| 450 | { | ||
| 451 | int hex_val; | ||
| 452 | int num = 0; | ||
| 453 | int negate = 0; | ||
| 454 | |||
| 455 | *long_val = 0; | ||
| 456 | |||
| 457 | if (**ptr == '-') { | ||
| 458 | negate = 1; | ||
| 459 | (*ptr)++; | ||
| 460 | } | ||
| 461 | while (**ptr) { | ||
| 462 | hex_val = hex(**ptr); | ||
| 463 | if (hex_val < 0) | ||
| 464 | break; | ||
| 465 | |||
| 466 | *long_val = (*long_val << 4) | hex_val; | ||
| 467 | num++; | ||
| 468 | (*ptr)++; | ||
| 469 | } | ||
| 470 | |||
| 471 | if (negate) | ||
| 472 | *long_val = -*long_val; | ||
| 473 | |||
| 474 | return num; | ||
| 475 | } | ||
| 476 | |||
| 477 | /* Write memory due to an 'M' or 'X' packet. */ | ||
| 478 | static int write_mem_msg(int binary) | ||
| 479 | { | ||
| 480 | char *ptr = &remcom_in_buffer[1]; | ||
| 481 | unsigned long addr; | ||
| 482 | unsigned long length; | ||
| 483 | int err; | ||
| 484 | |||
| 485 | if (kgdb_hex2long(&ptr, &addr) > 0 && *(ptr++) == ',' && | ||
| 486 | kgdb_hex2long(&ptr, &length) > 0 && *(ptr++) == ':') { | ||
| 487 | if (binary) | ||
| 488 | err = kgdb_ebin2mem(ptr, (char *)addr, length); | ||
| 489 | else | ||
| 490 | err = kgdb_hex2mem(ptr, (char *)addr, length); | ||
| 491 | if (err) | ||
| 492 | return err; | ||
| 493 | if (CACHE_FLUSH_IS_SAFE) | ||
| 494 | flush_icache_range(addr, addr + length); | ||
| 495 | return 0; | ||
| 496 | } | ||
| 497 | |||
| 498 | return -EINVAL; | ||
| 499 | } | ||
| 500 | |||
| 501 | static void error_packet(char *pkt, int error) | ||
| 502 | { | ||
| 503 | error = -error; | ||
| 504 | pkt[0] = 'E'; | ||
| 505 | pkt[1] = hex_asc[(error / 10)]; | ||
| 506 | pkt[2] = hex_asc[(error % 10)]; | ||
| 507 | pkt[3] = '\0'; | ||
| 508 | } | ||
| 509 | |||
| 510 | /* | ||
| 511 | * Thread ID accessors. We represent a flat TID space to GDB, where | ||
| 512 | * the per CPU idle threads (which under Linux all have PID 0) are | ||
| 513 | * remapped to negative TIDs. | ||
| 514 | */ | ||
| 515 | |||
| 516 | #define BUF_THREAD_ID_SIZE 16 | ||
| 517 | |||
| 518 | static char *pack_threadid(char *pkt, unsigned char *id) | ||
| 519 | { | ||
| 520 | char *limit; | ||
| 521 | |||
| 522 | limit = pkt + BUF_THREAD_ID_SIZE; | ||
| 523 | while (pkt < limit) | ||
| 524 | pkt = pack_hex_byte(pkt, *id++); | ||
| 525 | |||
| 526 | return pkt; | ||
| 527 | } | ||
| 528 | |||
| 529 | static void int_to_threadref(unsigned char *id, int value) | ||
| 530 | { | ||
| 531 | unsigned char *scan; | ||
| 532 | int i = 4; | ||
| 533 | |||
| 534 | scan = (unsigned char *)id; | ||
| 535 | while (i--) | ||
| 536 | *scan++ = 0; | ||
| 537 | put_unaligned_be32(value, scan); | ||
| 538 | } | ||
| 539 | |||
| 540 | static struct task_struct *getthread(struct pt_regs *regs, int tid) | ||
| 541 | { | ||
| 542 | /* | ||
| 543 | * Non-positive TIDs are remapped to the cpu shadow information | ||
| 544 | */ | ||
| 545 | if (tid == 0 || tid == -1) | ||
| 546 | tid = -atomic_read(&kgdb_active) - 2; | ||
| 547 | if (tid < -1 && tid > -NR_CPUS - 2) { | ||
| 548 | if (kgdb_info[-tid - 2].task) | ||
| 549 | return kgdb_info[-tid - 2].task; | ||
| 550 | else | ||
| 551 | return idle_task(-tid - 2); | ||
| 552 | } | ||
| 553 | if (tid <= 0) { | ||
| 554 | printk(KERN_ERR "KGDB: Internal thread select error\n"); | ||
| 555 | dump_stack(); | ||
| 556 | return NULL; | ||
| 557 | } | ||
| 558 | |||
| 559 | /* | ||
| 560 | * find_task_by_pid_ns() does not take the tasklist lock anymore | ||
| 561 | * but is nicely RCU locked - hence is a pretty resilient | ||
| 562 | * thing to use: | ||
| 563 | */ | ||
| 564 | return find_task_by_pid_ns(tid, &init_pid_ns); | ||
| 565 | } | ||
| 566 | |||
| 567 | /* | ||
| 568 | * Some architectures need cache flushes when we set/clear a | ||
| 569 | * breakpoint: | ||
| 570 | */ | ||
| 571 | static void kgdb_flush_swbreak_addr(unsigned long addr) | ||
| 572 | { | ||
| 573 | if (!CACHE_FLUSH_IS_SAFE) | ||
| 574 | return; | ||
| 575 | |||
| 576 | if (current->mm && current->mm->mmap_cache) { | ||
| 577 | flush_cache_range(current->mm->mmap_cache, | ||
| 578 | addr, addr + BREAK_INSTR_SIZE); | ||
| 579 | } | ||
| 580 | /* Force flush instruction cache if it was outside the mm */ | ||
| 581 | flush_icache_range(addr, addr + BREAK_INSTR_SIZE); | ||
| 582 | } | ||
| 583 | |||
| 584 | /* | ||
| 585 | * SW breakpoint management: | ||
| 586 | */ | ||
| 587 | static int kgdb_activate_sw_breakpoints(void) | ||
| 588 | { | ||
| 589 | unsigned long addr; | ||
| 590 | int error; | ||
| 591 | int ret = 0; | ||
| 592 | int i; | ||
| 593 | |||
| 594 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 595 | if (kgdb_break[i].state != BP_SET) | ||
| 596 | continue; | ||
| 597 | |||
| 598 | addr = kgdb_break[i].bpt_addr; | ||
| 599 | error = kgdb_arch_set_breakpoint(addr, | ||
| 600 | kgdb_break[i].saved_instr); | ||
| 601 | if (error) { | ||
| 602 | ret = error; | ||
| 603 | printk(KERN_INFO "KGDB: BP install failed: %lx", addr); | ||
| 604 | continue; | ||
| 605 | } | ||
| 606 | |||
| 607 | kgdb_flush_swbreak_addr(addr); | ||
| 608 | kgdb_break[i].state = BP_ACTIVE; | ||
| 609 | } | ||
| 610 | return ret; | ||
| 611 | } | ||
| 612 | |||
| 613 | static int kgdb_set_sw_break(unsigned long addr) | ||
| 614 | { | ||
| 615 | int err = kgdb_validate_break_address(addr); | ||
| 616 | int breakno = -1; | ||
| 617 | int i; | ||
| 618 | |||
| 619 | if (err) | ||
| 620 | return err; | ||
| 621 | |||
| 622 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 623 | if ((kgdb_break[i].state == BP_SET) && | ||
| 624 | (kgdb_break[i].bpt_addr == addr)) | ||
| 625 | return -EEXIST; | ||
| 626 | } | ||
| 627 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 628 | if (kgdb_break[i].state == BP_REMOVED && | ||
| 629 | kgdb_break[i].bpt_addr == addr) { | ||
| 630 | breakno = i; | ||
| 631 | break; | ||
| 632 | } | ||
| 633 | } | ||
| 634 | |||
| 635 | if (breakno == -1) { | ||
| 636 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 637 | if (kgdb_break[i].state == BP_UNDEFINED) { | ||
| 638 | breakno = i; | ||
| 639 | break; | ||
| 640 | } | ||
| 641 | } | ||
| 642 | } | ||
| 643 | |||
| 644 | if (breakno == -1) | ||
| 645 | return -E2BIG; | ||
| 646 | |||
| 647 | kgdb_break[breakno].state = BP_SET; | ||
| 648 | kgdb_break[breakno].type = BP_BREAKPOINT; | ||
| 649 | kgdb_break[breakno].bpt_addr = addr; | ||
| 650 | |||
| 651 | return 0; | ||
| 652 | } | ||
| 653 | |||
| 654 | static int kgdb_deactivate_sw_breakpoints(void) | ||
| 655 | { | ||
| 656 | unsigned long addr; | ||
| 657 | int error; | ||
| 658 | int ret = 0; | ||
| 659 | int i; | ||
| 660 | |||
| 661 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 662 | if (kgdb_break[i].state != BP_ACTIVE) | ||
| 663 | continue; | ||
| 664 | addr = kgdb_break[i].bpt_addr; | ||
| 665 | error = kgdb_arch_remove_breakpoint(addr, | ||
| 666 | kgdb_break[i].saved_instr); | ||
| 667 | if (error) { | ||
| 668 | printk(KERN_INFO "KGDB: BP remove failed: %lx\n", addr); | ||
| 669 | ret = error; | ||
| 670 | } | ||
| 671 | |||
| 672 | kgdb_flush_swbreak_addr(addr); | ||
| 673 | kgdb_break[i].state = BP_SET; | ||
| 674 | } | ||
| 675 | return ret; | ||
| 676 | } | ||
| 677 | |||
| 678 | static int kgdb_remove_sw_break(unsigned long addr) | ||
| 679 | { | ||
| 680 | int i; | ||
| 681 | |||
| 682 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 683 | if ((kgdb_break[i].state == BP_SET) && | ||
| 684 | (kgdb_break[i].bpt_addr == addr)) { | ||
| 685 | kgdb_break[i].state = BP_REMOVED; | ||
| 686 | return 0; | ||
| 687 | } | ||
| 688 | } | ||
| 689 | return -ENOENT; | ||
| 690 | } | ||
| 691 | |||
| 692 | int kgdb_isremovedbreak(unsigned long addr) | ||
| 693 | { | ||
| 694 | int i; | ||
| 695 | |||
| 696 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 697 | if ((kgdb_break[i].state == BP_REMOVED) && | ||
| 698 | (kgdb_break[i].bpt_addr == addr)) | ||
| 699 | return 1; | ||
| 700 | } | ||
| 701 | return 0; | ||
| 702 | } | ||
| 703 | |||
| 704 | static int remove_all_break(void) | ||
| 705 | { | ||
| 706 | unsigned long addr; | ||
| 707 | int error; | ||
| 708 | int i; | ||
| 709 | |||
| 710 | /* Clear memory breakpoints. */ | ||
| 711 | for (i = 0; i < KGDB_MAX_BREAKPOINTS; i++) { | ||
| 712 | if (kgdb_break[i].state != BP_ACTIVE) | ||
| 713 | goto setundefined; | ||
| 714 | addr = kgdb_break[i].bpt_addr; | ||
| 715 | error = kgdb_arch_remove_breakpoint(addr, | ||
| 716 | kgdb_break[i].saved_instr); | ||
| 717 | if (error) | ||
| 718 | printk(KERN_ERR "KGDB: breakpoint remove failed: %lx\n", | ||
| 719 | addr); | ||
| 720 | setundefined: | ||
| 721 | kgdb_break[i].state = BP_UNDEFINED; | ||
| 722 | } | ||
| 723 | |||
| 724 | /* Clear hardware breakpoints. */ | ||
| 725 | if (arch_kgdb_ops.remove_all_hw_break) | ||
| 726 | arch_kgdb_ops.remove_all_hw_break(); | ||
| 727 | |||
| 728 | return 0; | ||
| 729 | } | ||
| 730 | |||
| 731 | /* | ||
| 732 | * Remap normal tasks to their real PID, | ||
| 733 | * CPU shadow threads are mapped to -CPU - 2 | ||
| 734 | */ | ||
| 735 | static inline int shadow_pid(int realpid) | ||
| 736 | { | ||
| 737 | if (realpid) | ||
| 738 | return realpid; | ||
| 739 | |||
| 740 | return -raw_smp_processor_id() - 2; | ||
| 741 | } | ||
| 742 | |||
| 743 | static char gdbmsgbuf[BUFMAX + 1]; | ||
| 744 | |||
| 745 | static void kgdb_msg_write(const char *s, int len) | ||
| 746 | { | ||
| 747 | char *bufptr; | ||
| 748 | int wcount; | ||
| 749 | int i; | ||
| 750 | |||
| 751 | /* 'O'utput */ | ||
| 752 | gdbmsgbuf[0] = 'O'; | ||
| 753 | |||
| 754 | /* Fill and send buffers... */ | ||
| 755 | while (len > 0) { | ||
| 756 | bufptr = gdbmsgbuf + 1; | ||
| 757 | |||
| 758 | /* Calculate how many this time */ | ||
| 759 | if ((len << 1) > (BUFMAX - 2)) | ||
| 760 | wcount = (BUFMAX - 2) >> 1; | ||
| 761 | else | ||
| 762 | wcount = len; | ||
| 763 | |||
| 764 | /* Pack in hex chars */ | ||
| 765 | for (i = 0; i < wcount; i++) | ||
| 766 | bufptr = pack_hex_byte(bufptr, s[i]); | ||
| 767 | *bufptr = '\0'; | ||
| 768 | |||
| 769 | /* Move up */ | ||
| 770 | s += wcount; | ||
| 771 | len -= wcount; | ||
| 772 | |||
| 773 | /* Write packet */ | ||
| 774 | put_packet(gdbmsgbuf); | ||
| 775 | } | ||
| 776 | } | ||
| 777 | |||
| 778 | /* | ||
| 779 | * Return true if there is a valid kgdb I/O module. Also if no | ||
| 780 | * debugger is attached a message can be printed to the console about | ||
| 781 | * waiting for the debugger to attach. | ||
| 782 | * | ||
| 783 | * The print_wait argument is only to be true when called from inside | ||
| 784 | * the core kgdb_handle_exception, because it will wait for the | ||
| 785 | * debugger to attach. | ||
| 786 | */ | ||
| 787 | static int kgdb_io_ready(int print_wait) | ||
| 788 | { | ||
| 789 | if (!kgdb_io_ops) | ||
| 790 | return 0; | ||
| 791 | if (kgdb_connected) | ||
| 792 | return 1; | ||
| 793 | if (atomic_read(&kgdb_setting_breakpoint)) | ||
| 794 | return 1; | ||
| 795 | if (print_wait) | ||
| 796 | printk(KERN_CRIT "KGDB: Waiting for remote debugger\n"); | ||
| 797 | return 1; | ||
| 798 | } | ||
| 799 | |||
| 800 | /* | ||
| 801 | * All the functions that start with gdb_cmd are the various | ||
| 802 | * operations to implement the handlers for the gdbserial protocol | ||
| 803 | * where KGDB is communicating with an external debugger | ||
| 804 | */ | ||
| 805 | |||
| 806 | /* Handle the '?' status packets */ | ||
| 807 | static void gdb_cmd_status(struct kgdb_state *ks) | ||
| 808 | { | ||
| 809 | /* | ||
| 810 | * We know that this packet is only sent | ||
| 811 | * during initial connect. So to be safe, | ||
| 812 | * we clear out our breakpoints now in case | ||
| 813 | * GDB is reconnecting. | ||
| 814 | */ | ||
| 815 | remove_all_break(); | ||
| 816 | |||
| 817 | remcom_out_buffer[0] = 'S'; | ||
| 818 | pack_hex_byte(&remcom_out_buffer[1], ks->signo); | ||
| 819 | } | ||
| 820 | |||
| 821 | /* Handle the 'g' get registers request */ | ||
| 822 | static void gdb_cmd_getregs(struct kgdb_state *ks) | ||
| 823 | { | ||
| 824 | struct task_struct *thread; | ||
| 825 | void *local_debuggerinfo; | ||
| 826 | int i; | ||
| 827 | |||
| 828 | thread = kgdb_usethread; | ||
| 829 | if (!thread) { | ||
| 830 | thread = kgdb_info[ks->cpu].task; | ||
| 831 | local_debuggerinfo = kgdb_info[ks->cpu].debuggerinfo; | ||
| 832 | } else { | ||
| 833 | local_debuggerinfo = NULL; | ||
| 834 | for_each_online_cpu(i) { | ||
| 835 | /* | ||
| 836 | * Try to find the task on some other | ||
| 837 | * or possibly this node if we do not | ||
| 838 | * find the matching task then we try | ||
| 839 | * to approximate the results. | ||
| 840 | */ | ||
| 841 | if (thread == kgdb_info[i].task) | ||
| 842 | local_debuggerinfo = kgdb_info[i].debuggerinfo; | ||
| 843 | } | ||
| 844 | } | ||
| 845 | |||
| 846 | /* | ||
| 847 | * All threads that don't have debuggerinfo should be | ||
| 848 | * in schedule() sleeping, since all other CPUs | ||
| 849 | * are in kgdb_wait, and thus have debuggerinfo. | ||
| 850 | */ | ||
| 851 | if (local_debuggerinfo) { | ||
| 852 | pt_regs_to_gdb_regs(gdb_regs, local_debuggerinfo); | ||
| 853 | } else { | ||
| 854 | /* | ||
| 855 | * Pull stuff saved during switch_to; nothing | ||
| 856 | * else is accessible (or even particularly | ||
| 857 | * relevant). | ||
| 858 | * | ||
| 859 | * This should be enough for a stack trace. | ||
| 860 | */ | ||
| 861 | sleeping_thread_to_gdb_regs(gdb_regs, thread); | ||
| 862 | } | ||
| 863 | kgdb_mem2hex((char *)gdb_regs, remcom_out_buffer, NUMREGBYTES); | ||
| 864 | } | ||
| 865 | |||
| 866 | /* Handle the 'G' set registers request */ | ||
| 867 | static void gdb_cmd_setregs(struct kgdb_state *ks) | ||
| 868 | { | ||
| 869 | kgdb_hex2mem(&remcom_in_buffer[1], (char *)gdb_regs, NUMREGBYTES); | ||
| 870 | |||
| 871 | if (kgdb_usethread && kgdb_usethread != current) { | ||
| 872 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 873 | } else { | ||
| 874 | gdb_regs_to_pt_regs(gdb_regs, ks->linux_regs); | ||
| 875 | strcpy(remcom_out_buffer, "OK"); | ||
| 876 | } | ||
| 877 | } | ||
| 878 | |||
| 879 | /* Handle the 'm' memory read bytes */ | ||
| 880 | static void gdb_cmd_memread(struct kgdb_state *ks) | ||
| 881 | { | ||
| 882 | char *ptr = &remcom_in_buffer[1]; | ||
| 883 | unsigned long length; | ||
| 884 | unsigned long addr; | ||
| 885 | int err; | ||
| 886 | |||
| 887 | if (kgdb_hex2long(&ptr, &addr) > 0 && *ptr++ == ',' && | ||
| 888 | kgdb_hex2long(&ptr, &length) > 0) { | ||
| 889 | err = kgdb_mem2hex((char *)addr, remcom_out_buffer, length); | ||
| 890 | if (err) | ||
| 891 | error_packet(remcom_out_buffer, err); | ||
| 892 | } else { | ||
| 893 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 894 | } | ||
| 895 | } | ||
| 896 | |||
| 897 | /* Handle the 'M' memory write bytes */ | ||
| 898 | static void gdb_cmd_memwrite(struct kgdb_state *ks) | ||
| 899 | { | ||
| 900 | int err = write_mem_msg(0); | ||
| 901 | |||
| 902 | if (err) | ||
| 903 | error_packet(remcom_out_buffer, err); | ||
| 904 | else | ||
| 905 | strcpy(remcom_out_buffer, "OK"); | ||
| 906 | } | ||
| 907 | |||
| 908 | /* Handle the 'X' memory binary write bytes */ | ||
| 909 | static void gdb_cmd_binwrite(struct kgdb_state *ks) | ||
| 910 | { | ||
| 911 | int err = write_mem_msg(1); | ||
| 912 | |||
| 913 | if (err) | ||
| 914 | error_packet(remcom_out_buffer, err); | ||
| 915 | else | ||
| 916 | strcpy(remcom_out_buffer, "OK"); | ||
| 917 | } | ||
| 918 | |||
| 919 | /* Handle the 'D' or 'k', detach or kill packets */ | ||
| 920 | static void gdb_cmd_detachkill(struct kgdb_state *ks) | ||
| 921 | { | ||
| 922 | int error; | ||
| 923 | |||
| 924 | /* The detach case */ | ||
| 925 | if (remcom_in_buffer[0] == 'D') { | ||
| 926 | error = remove_all_break(); | ||
| 927 | if (error < 0) { | ||
| 928 | error_packet(remcom_out_buffer, error); | ||
| 929 | } else { | ||
| 930 | strcpy(remcom_out_buffer, "OK"); | ||
| 931 | kgdb_connected = 0; | ||
| 932 | } | ||
| 933 | put_packet(remcom_out_buffer); | ||
| 934 | } else { | ||
| 935 | /* | ||
| 936 | * Assume the kill case, with no exit code checking, | ||
| 937 | * trying to force detach the debugger: | ||
| 938 | */ | ||
| 939 | remove_all_break(); | ||
| 940 | kgdb_connected = 0; | ||
| 941 | } | ||
| 942 | } | ||
| 943 | |||
| 944 | /* Handle the 'R' reboot packets */ | ||
| 945 | static int gdb_cmd_reboot(struct kgdb_state *ks) | ||
| 946 | { | ||
| 947 | /* For now, only honor R0 */ | ||
| 948 | if (strcmp(remcom_in_buffer, "R0") == 0) { | ||
| 949 | printk(KERN_CRIT "Executing emergency reboot\n"); | ||
| 950 | strcpy(remcom_out_buffer, "OK"); | ||
| 951 | put_packet(remcom_out_buffer); | ||
| 952 | |||
| 953 | /* | ||
| 954 | * Execution should not return from | ||
| 955 | * machine_emergency_restart() | ||
| 956 | */ | ||
| 957 | machine_emergency_restart(); | ||
| 958 | kgdb_connected = 0; | ||
| 959 | |||
| 960 | return 1; | ||
| 961 | } | ||
| 962 | return 0; | ||
| 963 | } | ||
| 964 | |||
| 965 | /* Handle the 'q' query packets */ | ||
| 966 | static void gdb_cmd_query(struct kgdb_state *ks) | ||
| 967 | { | ||
| 968 | struct task_struct *g; | ||
| 969 | struct task_struct *p; | ||
| 970 | unsigned char thref[8]; | ||
| 971 | char *ptr; | ||
| 972 | int i; | ||
| 973 | int cpu; | ||
| 974 | int finished = 0; | ||
| 975 | |||
| 976 | switch (remcom_in_buffer[1]) { | ||
| 977 | case 's': | ||
| 978 | case 'f': | ||
| 979 | if (memcmp(remcom_in_buffer + 2, "ThreadInfo", 10)) { | ||
| 980 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 981 | break; | ||
| 982 | } | ||
| 983 | |||
| 984 | i = 0; | ||
| 985 | remcom_out_buffer[0] = 'm'; | ||
| 986 | ptr = remcom_out_buffer + 1; | ||
| 987 | if (remcom_in_buffer[1] == 'f') { | ||
| 988 | /* Each cpu is a shadow thread */ | ||
| 989 | for_each_online_cpu(cpu) { | ||
| 990 | ks->thr_query = 0; | ||
| 991 | int_to_threadref(thref, -cpu - 2); | ||
| 992 | pack_threadid(ptr, thref); | ||
| 993 | ptr += BUF_THREAD_ID_SIZE; | ||
| 994 | *(ptr++) = ','; | ||
| 995 | i++; | ||
| 996 | } | ||
| 997 | } | ||
| 998 | |||
| 999 | do_each_thread(g, p) { | ||
| 1000 | if (i >= ks->thr_query && !finished) { | ||
| 1001 | int_to_threadref(thref, p->pid); | ||
| 1002 | pack_threadid(ptr, thref); | ||
| 1003 | ptr += BUF_THREAD_ID_SIZE; | ||
| 1004 | *(ptr++) = ','; | ||
| 1005 | ks->thr_query++; | ||
| 1006 | if (ks->thr_query % KGDB_MAX_THREAD_QUERY == 0) | ||
| 1007 | finished = 1; | ||
| 1008 | } | ||
| 1009 | i++; | ||
| 1010 | } while_each_thread(g, p); | ||
| 1011 | |||
| 1012 | *(--ptr) = '\0'; | ||
| 1013 | break; | ||
| 1014 | |||
| 1015 | case 'C': | ||
| 1016 | /* Current thread id */ | ||
| 1017 | strcpy(remcom_out_buffer, "QC"); | ||
| 1018 | ks->threadid = shadow_pid(current->pid); | ||
| 1019 | int_to_threadref(thref, ks->threadid); | ||
| 1020 | pack_threadid(remcom_out_buffer + 2, thref); | ||
| 1021 | break; | ||
| 1022 | case 'T': | ||
| 1023 | if (memcmp(remcom_in_buffer + 1, "ThreadExtraInfo,", 16)) { | ||
| 1024 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1025 | break; | ||
| 1026 | } | ||
| 1027 | ks->threadid = 0; | ||
| 1028 | ptr = remcom_in_buffer + 17; | ||
| 1029 | kgdb_hex2long(&ptr, &ks->threadid); | ||
| 1030 | if (!getthread(ks->linux_regs, ks->threadid)) { | ||
| 1031 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1032 | break; | ||
| 1033 | } | ||
| 1034 | if ((int)ks->threadid > 0) { | ||
| 1035 | kgdb_mem2hex(getthread(ks->linux_regs, | ||
| 1036 | ks->threadid)->comm, | ||
| 1037 | remcom_out_buffer, 16); | ||
| 1038 | } else { | ||
| 1039 | static char tmpstr[23 + BUF_THREAD_ID_SIZE]; | ||
| 1040 | |||
| 1041 | sprintf(tmpstr, "shadowCPU%d", | ||
| 1042 | (int)(-ks->threadid - 2)); | ||
| 1043 | kgdb_mem2hex(tmpstr, remcom_out_buffer, strlen(tmpstr)); | ||
| 1044 | } | ||
| 1045 | break; | ||
| 1046 | } | ||
| 1047 | } | ||
| 1048 | |||
| 1049 | /* Handle the 'H' task query packets */ | ||
| 1050 | static void gdb_cmd_task(struct kgdb_state *ks) | ||
| 1051 | { | ||
| 1052 | struct task_struct *thread; | ||
| 1053 | char *ptr; | ||
| 1054 | |||
| 1055 | switch (remcom_in_buffer[1]) { | ||
| 1056 | case 'g': | ||
| 1057 | ptr = &remcom_in_buffer[2]; | ||
| 1058 | kgdb_hex2long(&ptr, &ks->threadid); | ||
| 1059 | thread = getthread(ks->linux_regs, ks->threadid); | ||
| 1060 | if (!thread && ks->threadid > 0) { | ||
| 1061 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1062 | break; | ||
| 1063 | } | ||
| 1064 | kgdb_usethread = thread; | ||
| 1065 | ks->kgdb_usethreadid = ks->threadid; | ||
| 1066 | strcpy(remcom_out_buffer, "OK"); | ||
| 1067 | break; | ||
| 1068 | case 'c': | ||
| 1069 | ptr = &remcom_in_buffer[2]; | ||
| 1070 | kgdb_hex2long(&ptr, &ks->threadid); | ||
| 1071 | if (!ks->threadid) { | ||
| 1072 | kgdb_contthread = NULL; | ||
| 1073 | } else { | ||
| 1074 | thread = getthread(ks->linux_regs, ks->threadid); | ||
| 1075 | if (!thread && ks->threadid > 0) { | ||
| 1076 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1077 | break; | ||
| 1078 | } | ||
| 1079 | kgdb_contthread = thread; | ||
| 1080 | } | ||
| 1081 | strcpy(remcom_out_buffer, "OK"); | ||
| 1082 | break; | ||
| 1083 | } | ||
| 1084 | } | ||
| 1085 | |||
| 1086 | /* Handle the 'T' thread query packets */ | ||
| 1087 | static void gdb_cmd_thread(struct kgdb_state *ks) | ||
| 1088 | { | ||
| 1089 | char *ptr = &remcom_in_buffer[1]; | ||
| 1090 | struct task_struct *thread; | ||
| 1091 | |||
| 1092 | kgdb_hex2long(&ptr, &ks->threadid); | ||
| 1093 | thread = getthread(ks->linux_regs, ks->threadid); | ||
| 1094 | if (thread) | ||
| 1095 | strcpy(remcom_out_buffer, "OK"); | ||
| 1096 | else | ||
| 1097 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1098 | } | ||
| 1099 | |||
| 1100 | /* Handle the 'z' or 'Z' breakpoint remove or set packets */ | ||
| 1101 | static void gdb_cmd_break(struct kgdb_state *ks) | ||
| 1102 | { | ||
| 1103 | /* | ||
| 1104 | * Since GDB-5.3, it's been drafted that '0' is a software | ||
| 1105 | * breakpoint, '1' is a hardware breakpoint, so let's do that. | ||
| 1106 | */ | ||
| 1107 | char *bpt_type = &remcom_in_buffer[1]; | ||
| 1108 | char *ptr = &remcom_in_buffer[2]; | ||
| 1109 | unsigned long addr; | ||
| 1110 | unsigned long length; | ||
| 1111 | int error = 0; | ||
| 1112 | |||
| 1113 | if (arch_kgdb_ops.set_hw_breakpoint && *bpt_type >= '1') { | ||
| 1114 | /* Unsupported */ | ||
| 1115 | if (*bpt_type > '4') | ||
| 1116 | return; | ||
| 1117 | } else { | ||
| 1118 | if (*bpt_type != '0' && *bpt_type != '1') | ||
| 1119 | /* Unsupported. */ | ||
| 1120 | return; | ||
| 1121 | } | ||
| 1122 | |||
| 1123 | /* | ||
| 1124 | * Test if this is a hardware breakpoint, and | ||
| 1125 | * if we support it: | ||
| 1126 | */ | ||
| 1127 | if (*bpt_type == '1' && !(arch_kgdb_ops.flags & KGDB_HW_BREAKPOINT)) | ||
| 1128 | /* Unsupported. */ | ||
| 1129 | return; | ||
| 1130 | |||
| 1131 | if (*(ptr++) != ',') { | ||
| 1132 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1133 | return; | ||
| 1134 | } | ||
| 1135 | if (!kgdb_hex2long(&ptr, &addr)) { | ||
| 1136 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1137 | return; | ||
| 1138 | } | ||
| 1139 | if (*(ptr++) != ',' || | ||
| 1140 | !kgdb_hex2long(&ptr, &length)) { | ||
| 1141 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1142 | return; | ||
| 1143 | } | ||
| 1144 | |||
| 1145 | if (remcom_in_buffer[0] == 'Z' && *bpt_type == '0') | ||
| 1146 | error = kgdb_set_sw_break(addr); | ||
| 1147 | else if (remcom_in_buffer[0] == 'z' && *bpt_type == '0') | ||
| 1148 | error = kgdb_remove_sw_break(addr); | ||
| 1149 | else if (remcom_in_buffer[0] == 'Z') | ||
| 1150 | error = arch_kgdb_ops.set_hw_breakpoint(addr, | ||
| 1151 | (int)length, *bpt_type - '0'); | ||
| 1152 | else if (remcom_in_buffer[0] == 'z') | ||
| 1153 | error = arch_kgdb_ops.remove_hw_breakpoint(addr, | ||
| 1154 | (int) length, *bpt_type - '0'); | ||
| 1155 | |||
| 1156 | if (error == 0) | ||
| 1157 | strcpy(remcom_out_buffer, "OK"); | ||
| 1158 | else | ||
| 1159 | error_packet(remcom_out_buffer, error); | ||
| 1160 | } | ||
| 1161 | |||
| 1162 | /* Handle the 'C' signal / exception passing packets */ | ||
| 1163 | static int gdb_cmd_exception_pass(struct kgdb_state *ks) | ||
| 1164 | { | ||
| 1165 | /* C09 == pass exception | ||
| 1166 | * C15 == detach kgdb, pass exception | ||
| 1167 | */ | ||
| 1168 | if (remcom_in_buffer[1] == '0' && remcom_in_buffer[2] == '9') { | ||
| 1169 | |||
| 1170 | ks->pass_exception = 1; | ||
| 1171 | remcom_in_buffer[0] = 'c'; | ||
| 1172 | |||
| 1173 | } else if (remcom_in_buffer[1] == '1' && remcom_in_buffer[2] == '5') { | ||
| 1174 | |||
| 1175 | ks->pass_exception = 1; | ||
| 1176 | remcom_in_buffer[0] = 'D'; | ||
| 1177 | remove_all_break(); | ||
| 1178 | kgdb_connected = 0; | ||
| 1179 | return 1; | ||
| 1180 | |||
| 1181 | } else { | ||
| 1182 | kgdb_msg_write("KGDB only knows signal 9 (pass)" | ||
| 1183 | " and 15 (pass and disconnect)\n" | ||
| 1184 | "Executing a continue without signal passing\n", 0); | ||
| 1185 | remcom_in_buffer[0] = 'c'; | ||
| 1186 | } | ||
| 1187 | |||
| 1188 | /* Indicate fall through */ | ||
| 1189 | return -1; | ||
| 1190 | } | ||
| 1191 | |||
| 1192 | /* | ||
| 1193 | * This function performs all gdbserial command procesing | ||
| 1194 | */ | ||
| 1195 | static int gdb_serial_stub(struct kgdb_state *ks) | ||
| 1196 | { | ||
| 1197 | int error = 0; | ||
| 1198 | int tmp; | ||
| 1199 | |||
| 1200 | /* Clear the out buffer. */ | ||
| 1201 | memset(remcom_out_buffer, 0, sizeof(remcom_out_buffer)); | ||
| 1202 | |||
| 1203 | if (kgdb_connected) { | ||
| 1204 | unsigned char thref[8]; | ||
| 1205 | char *ptr; | ||
| 1206 | |||
| 1207 | /* Reply to host that an exception has occurred */ | ||
| 1208 | ptr = remcom_out_buffer; | ||
| 1209 | *ptr++ = 'T'; | ||
| 1210 | ptr = pack_hex_byte(ptr, ks->signo); | ||
| 1211 | ptr += strlen(strcpy(ptr, "thread:")); | ||
| 1212 | int_to_threadref(thref, shadow_pid(current->pid)); | ||
| 1213 | ptr = pack_threadid(ptr, thref); | ||
| 1214 | *ptr++ = ';'; | ||
| 1215 | put_packet(remcom_out_buffer); | ||
| 1216 | } | ||
| 1217 | |||
| 1218 | kgdb_usethread = kgdb_info[ks->cpu].task; | ||
| 1219 | ks->kgdb_usethreadid = shadow_pid(kgdb_info[ks->cpu].task->pid); | ||
| 1220 | ks->pass_exception = 0; | ||
| 1221 | |||
| 1222 | while (1) { | ||
| 1223 | error = 0; | ||
| 1224 | |||
| 1225 | /* Clear the out buffer. */ | ||
| 1226 | memset(remcom_out_buffer, 0, sizeof(remcom_out_buffer)); | ||
| 1227 | |||
| 1228 | get_packet(remcom_in_buffer); | ||
| 1229 | |||
| 1230 | switch (remcom_in_buffer[0]) { | ||
| 1231 | case '?': /* gdbserial status */ | ||
| 1232 | gdb_cmd_status(ks); | ||
| 1233 | break; | ||
| 1234 | case 'g': /* return the value of the CPU registers */ | ||
| 1235 | gdb_cmd_getregs(ks); | ||
| 1236 | break; | ||
| 1237 | case 'G': /* set the value of the CPU registers - return OK */ | ||
| 1238 | gdb_cmd_setregs(ks); | ||
| 1239 | break; | ||
| 1240 | case 'm': /* mAA..AA,LLLL Read LLLL bytes at address AA..AA */ | ||
| 1241 | gdb_cmd_memread(ks); | ||
| 1242 | break; | ||
| 1243 | case 'M': /* MAA..AA,LLLL: Write LLLL bytes at address AA..AA */ | ||
| 1244 | gdb_cmd_memwrite(ks); | ||
| 1245 | break; | ||
| 1246 | case 'X': /* XAA..AA,LLLL: Write LLLL bytes at address AA..AA */ | ||
| 1247 | gdb_cmd_binwrite(ks); | ||
| 1248 | break; | ||
| 1249 | /* kill or detach. KGDB should treat this like a | ||
| 1250 | * continue. | ||
| 1251 | */ | ||
| 1252 | case 'D': /* Debugger detach */ | ||
| 1253 | case 'k': /* Debugger detach via kill */ | ||
| 1254 | gdb_cmd_detachkill(ks); | ||
| 1255 | goto default_handle; | ||
| 1256 | case 'R': /* Reboot */ | ||
| 1257 | if (gdb_cmd_reboot(ks)) | ||
| 1258 | goto default_handle; | ||
| 1259 | break; | ||
| 1260 | case 'q': /* query command */ | ||
| 1261 | gdb_cmd_query(ks); | ||
| 1262 | break; | ||
| 1263 | case 'H': /* task related */ | ||
| 1264 | gdb_cmd_task(ks); | ||
| 1265 | break; | ||
| 1266 | case 'T': /* Query thread status */ | ||
| 1267 | gdb_cmd_thread(ks); | ||
| 1268 | break; | ||
| 1269 | case 'z': /* Break point remove */ | ||
| 1270 | case 'Z': /* Break point set */ | ||
| 1271 | gdb_cmd_break(ks); | ||
| 1272 | break; | ||
| 1273 | case 'C': /* Exception passing */ | ||
| 1274 | tmp = gdb_cmd_exception_pass(ks); | ||
| 1275 | if (tmp > 0) | ||
| 1276 | goto default_handle; | ||
| 1277 | if (tmp == 0) | ||
| 1278 | break; | ||
| 1279 | /* Fall through on tmp < 0 */ | ||
| 1280 | case 'c': /* Continue packet */ | ||
| 1281 | case 's': /* Single step packet */ | ||
| 1282 | if (kgdb_contthread && kgdb_contthread != current) { | ||
| 1283 | /* Can't switch threads in kgdb */ | ||
| 1284 | error_packet(remcom_out_buffer, -EINVAL); | ||
| 1285 | break; | ||
| 1286 | } | ||
| 1287 | kgdb_activate_sw_breakpoints(); | ||
| 1288 | /* Fall through to default processing */ | ||
| 1289 | default: | ||
| 1290 | default_handle: | ||
| 1291 | error = kgdb_arch_handle_exception(ks->ex_vector, | ||
| 1292 | ks->signo, | ||
| 1293 | ks->err_code, | ||
| 1294 | remcom_in_buffer, | ||
| 1295 | remcom_out_buffer, | ||
| 1296 | ks->linux_regs); | ||
| 1297 | /* | ||
| 1298 | * Leave cmd processing on error, detach, | ||
| 1299 | * kill, continue, or single step. | ||
| 1300 | */ | ||
| 1301 | if (error >= 0 || remcom_in_buffer[0] == 'D' || | ||
| 1302 | remcom_in_buffer[0] == 'k') { | ||
| 1303 | error = 0; | ||
| 1304 | goto kgdb_exit; | ||
| 1305 | } | ||
| 1306 | |||
| 1307 | } | ||
| 1308 | |||
| 1309 | /* reply to the request */ | ||
| 1310 | put_packet(remcom_out_buffer); | ||
| 1311 | } | ||
| 1312 | |||
| 1313 | kgdb_exit: | ||
| 1314 | if (ks->pass_exception) | ||
| 1315 | error = 1; | ||
| 1316 | return error; | ||
| 1317 | } | ||
| 1318 | |||
| 1319 | static int kgdb_reenter_check(struct kgdb_state *ks) | ||
| 1320 | { | ||
| 1321 | unsigned long addr; | ||
| 1322 | |||
| 1323 | if (atomic_read(&kgdb_active) != raw_smp_processor_id()) | ||
| 1324 | return 0; | ||
| 1325 | |||
| 1326 | /* Panic on recursive debugger calls: */ | ||
| 1327 | exception_level++; | ||
| 1328 | addr = kgdb_arch_pc(ks->ex_vector, ks->linux_regs); | ||
| 1329 | kgdb_deactivate_sw_breakpoints(); | ||
| 1330 | |||
| 1331 | /* | ||
| 1332 | * If the break point removed ok at the place exception | ||
| 1333 | * occurred, try to recover and print a warning to the end | ||
| 1334 | * user because the user planted a breakpoint in a place that | ||
| 1335 | * KGDB needs in order to function. | ||
| 1336 | */ | ||
| 1337 | if (kgdb_remove_sw_break(addr) == 0) { | ||
| 1338 | exception_level = 0; | ||
| 1339 | kgdb_skipexception(ks->ex_vector, ks->linux_regs); | ||
| 1340 | kgdb_activate_sw_breakpoints(); | ||
| 1341 | printk(KERN_CRIT "KGDB: re-enter error: breakpoint removed %lx\n", | ||
| 1342 | addr); | ||
| 1343 | WARN_ON_ONCE(1); | ||
| 1344 | |||
| 1345 | return 1; | ||
| 1346 | } | ||
| 1347 | remove_all_break(); | ||
| 1348 | kgdb_skipexception(ks->ex_vector, ks->linux_regs); | ||
| 1349 | |||
| 1350 | if (exception_level > 1) { | ||
| 1351 | dump_stack(); | ||
| 1352 | panic("Recursive entry to debugger"); | ||
| 1353 | } | ||
| 1354 | |||
| 1355 | printk(KERN_CRIT "KGDB: re-enter exception: ALL breakpoints killed\n"); | ||
| 1356 | dump_stack(); | ||
| 1357 | panic("Recursive entry to debugger"); | ||
| 1358 | |||
| 1359 | return 1; | ||
| 1360 | } | ||
| 1361 | |||
| 1362 | static int kgdb_cpu_enter(struct kgdb_state *ks, struct pt_regs *regs) | ||
| 1363 | { | ||
| 1364 | unsigned long flags; | ||
| 1365 | int sstep_tries = 100; | ||
| 1366 | int error = 0; | ||
| 1367 | int i, cpu; | ||
| 1368 | int trace_on = 0; | ||
| 1369 | acquirelock: | ||
| 1370 | /* | ||
| 1371 | * Interrupts will be restored by the 'trap return' code, except when | ||
| 1372 | * single stepping. | ||
| 1373 | */ | ||
| 1374 | local_irq_save(flags); | ||
| 1375 | |||
| 1376 | cpu = ks->cpu; | ||
| 1377 | kgdb_info[cpu].debuggerinfo = regs; | ||
| 1378 | kgdb_info[cpu].task = current; | ||
| 1379 | /* | ||
| 1380 | * Make sure the above info reaches the primary CPU before | ||
| 1381 | * our cpu_in_kgdb[] flag setting does: | ||
| 1382 | */ | ||
| 1383 | atomic_inc(&cpu_in_kgdb[cpu]); | ||
| 1384 | |||
| 1385 | /* | ||
| 1386 | * CPU will loop if it is a slave or request to become a kgdb | ||
| 1387 | * master cpu and acquire the kgdb_active lock: | ||
| 1388 | */ | ||
| 1389 | while (1) { | ||
| 1390 | if (kgdb_info[cpu].exception_state & DCPU_WANT_MASTER) { | ||
| 1391 | if (atomic_cmpxchg(&kgdb_active, -1, cpu) == cpu) | ||
| 1392 | break; | ||
| 1393 | } else if (kgdb_info[cpu].exception_state & DCPU_IS_SLAVE) { | ||
| 1394 | if (!atomic_read(&passive_cpu_wait[cpu])) | ||
| 1395 | goto return_normal; | ||
| 1396 | } else { | ||
| 1397 | return_normal: | ||
| 1398 | /* Return to normal operation by executing any | ||
| 1399 | * hw breakpoint fixup. | ||
| 1400 | */ | ||
| 1401 | if (arch_kgdb_ops.correct_hw_break) | ||
| 1402 | arch_kgdb_ops.correct_hw_break(); | ||
| 1403 | if (trace_on) | ||
| 1404 | tracing_on(); | ||
| 1405 | atomic_dec(&cpu_in_kgdb[cpu]); | ||
| 1406 | touch_softlockup_watchdog_sync(); | ||
| 1407 | clocksource_touch_watchdog(); | ||
| 1408 | local_irq_restore(flags); | ||
| 1409 | return 0; | ||
| 1410 | } | ||
| 1411 | cpu_relax(); | ||
| 1412 | } | ||
| 1413 | |||
| 1414 | /* | ||
| 1415 | * For single stepping, try to only enter on the processor | ||
| 1416 | * that was single stepping. To gaurd against a deadlock, the | ||
| 1417 | * kernel will only try for the value of sstep_tries before | ||
| 1418 | * giving up and continuing on. | ||
| 1419 | */ | ||
| 1420 | if (atomic_read(&kgdb_cpu_doing_single_step) != -1 && | ||
| 1421 | (kgdb_info[cpu].task && | ||
| 1422 | kgdb_info[cpu].task->pid != kgdb_sstep_pid) && --sstep_tries) { | ||
| 1423 | atomic_set(&kgdb_active, -1); | ||
| 1424 | touch_softlockup_watchdog_sync(); | ||
| 1425 | clocksource_touch_watchdog(); | ||
| 1426 | local_irq_restore(flags); | ||
| 1427 | |||
| 1428 | goto acquirelock; | ||
| 1429 | } | ||
| 1430 | |||
| 1431 | if (!kgdb_io_ready(1)) { | ||
| 1432 | error = 1; | ||
| 1433 | goto kgdb_restore; /* No I/O connection, so resume the system */ | ||
| 1434 | } | ||
| 1435 | |||
| 1436 | /* | ||
| 1437 | * Don't enter if we have hit a removed breakpoint. | ||
| 1438 | */ | ||
| 1439 | if (kgdb_skipexception(ks->ex_vector, ks->linux_regs)) | ||
| 1440 | goto kgdb_restore; | ||
| 1441 | |||
| 1442 | /* Call the I/O driver's pre_exception routine */ | ||
| 1443 | if (kgdb_io_ops->pre_exception) | ||
| 1444 | kgdb_io_ops->pre_exception(); | ||
| 1445 | |||
| 1446 | kgdb_disable_hw_debug(ks->linux_regs); | ||
| 1447 | |||
| 1448 | /* | ||
| 1449 | * Get the passive CPU lock which will hold all the non-primary | ||
| 1450 | * CPU in a spin state while the debugger is active | ||
| 1451 | */ | ||
| 1452 | if (!kgdb_single_step) { | ||
| 1453 | for (i = 0; i < NR_CPUS; i++) | ||
| 1454 | atomic_inc(&passive_cpu_wait[i]); | ||
| 1455 | } | ||
| 1456 | |||
| 1457 | #ifdef CONFIG_SMP | ||
| 1458 | /* Signal the other CPUs to enter kgdb_wait() */ | ||
| 1459 | if ((!kgdb_single_step) && kgdb_do_roundup) | ||
| 1460 | kgdb_roundup_cpus(flags); | ||
| 1461 | #endif | ||
| 1462 | |||
| 1463 | /* | ||
| 1464 | * Wait for the other CPUs to be notified and be waiting for us: | ||
| 1465 | */ | ||
| 1466 | for_each_online_cpu(i) { | ||
| 1467 | while (!atomic_read(&cpu_in_kgdb[i])) | ||
| 1468 | cpu_relax(); | ||
| 1469 | } | ||
| 1470 | |||
| 1471 | /* | ||
| 1472 | * At this point the primary processor is completely | ||
| 1473 | * in the debugger and all secondary CPUs are quiescent | ||
| 1474 | */ | ||
| 1475 | kgdb_post_primary_code(ks->linux_regs, ks->ex_vector, ks->err_code); | ||
| 1476 | kgdb_deactivate_sw_breakpoints(); | ||
| 1477 | kgdb_single_step = 0; | ||
| 1478 | kgdb_contthread = current; | ||
| 1479 | exception_level = 0; | ||
| 1480 | trace_on = tracing_is_on(); | ||
| 1481 | if (trace_on) | ||
| 1482 | tracing_off(); | ||
| 1483 | |||
| 1484 | /* Talk to debugger with gdbserial protocol */ | ||
| 1485 | error = gdb_serial_stub(ks); | ||
| 1486 | |||
| 1487 | /* Call the I/O driver's post_exception routine */ | ||
| 1488 | if (kgdb_io_ops->post_exception) | ||
| 1489 | kgdb_io_ops->post_exception(); | ||
| 1490 | |||
| 1491 | atomic_dec(&cpu_in_kgdb[ks->cpu]); | ||
| 1492 | |||
| 1493 | if (!kgdb_single_step) { | ||
| 1494 | for (i = NR_CPUS-1; i >= 0; i--) | ||
| 1495 | atomic_dec(&passive_cpu_wait[i]); | ||
| 1496 | /* | ||
| 1497 | * Wait till all the CPUs have quit | ||
| 1498 | * from the debugger. | ||
| 1499 | */ | ||
| 1500 | for_each_online_cpu(i) { | ||
| 1501 | while (atomic_read(&cpu_in_kgdb[i])) | ||
| 1502 | cpu_relax(); | ||
| 1503 | } | ||
| 1504 | } | ||
| 1505 | |||
| 1506 | kgdb_restore: | ||
| 1507 | if (atomic_read(&kgdb_cpu_doing_single_step) != -1) { | ||
| 1508 | int sstep_cpu = atomic_read(&kgdb_cpu_doing_single_step); | ||
| 1509 | if (kgdb_info[sstep_cpu].task) | ||
| 1510 | kgdb_sstep_pid = kgdb_info[sstep_cpu].task->pid; | ||
| 1511 | else | ||
| 1512 | kgdb_sstep_pid = 0; | ||
| 1513 | } | ||
| 1514 | if (trace_on) | ||
| 1515 | tracing_on(); | ||
| 1516 | /* Free kgdb_active */ | ||
| 1517 | atomic_set(&kgdb_active, -1); | ||
| 1518 | touch_softlockup_watchdog_sync(); | ||
| 1519 | clocksource_touch_watchdog(); | ||
| 1520 | local_irq_restore(flags); | ||
| 1521 | |||
| 1522 | return error; | ||
| 1523 | } | ||
| 1524 | |||
| 1525 | /* | ||
| 1526 | * kgdb_handle_exception() - main entry point from a kernel exception | ||
| 1527 | * | ||
| 1528 | * Locking hierarchy: | ||
| 1529 | * interface locks, if any (begin_session) | ||
| 1530 | * kgdb lock (kgdb_active) | ||
| 1531 | */ | ||
| 1532 | int | ||
| 1533 | kgdb_handle_exception(int evector, int signo, int ecode, struct pt_regs *regs) | ||
| 1534 | { | ||
| 1535 | struct kgdb_state kgdb_var; | ||
| 1536 | struct kgdb_state *ks = &kgdb_var; | ||
| 1537 | int ret; | ||
| 1538 | |||
| 1539 | ks->cpu = raw_smp_processor_id(); | ||
| 1540 | ks->ex_vector = evector; | ||
| 1541 | ks->signo = signo; | ||
| 1542 | ks->ex_vector = evector; | ||
| 1543 | ks->err_code = ecode; | ||
| 1544 | ks->kgdb_usethreadid = 0; | ||
| 1545 | ks->linux_regs = regs; | ||
| 1546 | |||
| 1547 | if (kgdb_reenter_check(ks)) | ||
| 1548 | return 0; /* Ouch, double exception ! */ | ||
| 1549 | kgdb_info[ks->cpu].exception_state |= DCPU_WANT_MASTER; | ||
| 1550 | ret = kgdb_cpu_enter(ks, regs); | ||
| 1551 | kgdb_info[ks->cpu].exception_state &= ~DCPU_WANT_MASTER; | ||
| 1552 | return ret; | ||
| 1553 | } | ||
| 1554 | |||
| 1555 | int kgdb_nmicallback(int cpu, void *regs) | ||
| 1556 | { | ||
| 1557 | #ifdef CONFIG_SMP | ||
| 1558 | struct kgdb_state kgdb_var; | ||
| 1559 | struct kgdb_state *ks = &kgdb_var; | ||
| 1560 | |||
| 1561 | memset(ks, 0, sizeof(struct kgdb_state)); | ||
| 1562 | ks->cpu = cpu; | ||
| 1563 | ks->linux_regs = regs; | ||
| 1564 | |||
| 1565 | if (!atomic_read(&cpu_in_kgdb[cpu]) && | ||
| 1566 | atomic_read(&kgdb_active) != -1 && | ||
| 1567 | atomic_read(&kgdb_active) != cpu) { | ||
| 1568 | kgdb_info[cpu].exception_state |= DCPU_IS_SLAVE; | ||
| 1569 | kgdb_cpu_enter(ks, regs); | ||
| 1570 | kgdb_info[cpu].exception_state &= ~DCPU_IS_SLAVE; | ||
| 1571 | return 0; | ||
| 1572 | } | ||
| 1573 | #endif | ||
| 1574 | return 1; | ||
| 1575 | } | ||
| 1576 | |||
| 1577 | static void kgdb_console_write(struct console *co, const char *s, | ||
| 1578 | unsigned count) | ||
| 1579 | { | ||
| 1580 | unsigned long flags; | ||
| 1581 | |||
| 1582 | /* If we're debugging, or KGDB has not connected, don't try | ||
| 1583 | * and print. */ | ||
| 1584 | if (!kgdb_connected || atomic_read(&kgdb_active) != -1) | ||
| 1585 | return; | ||
| 1586 | |||
| 1587 | local_irq_save(flags); | ||
| 1588 | kgdb_msg_write(s, count); | ||
| 1589 | local_irq_restore(flags); | ||
| 1590 | } | ||
| 1591 | |||
| 1592 | static struct console kgdbcons = { | ||
| 1593 | .name = "kgdb", | ||
| 1594 | .write = kgdb_console_write, | ||
| 1595 | .flags = CON_PRINTBUFFER | CON_ENABLED, | ||
| 1596 | .index = -1, | ||
| 1597 | }; | ||
| 1598 | |||
| 1599 | #ifdef CONFIG_MAGIC_SYSRQ | ||
| 1600 | static void sysrq_handle_gdb(int key, struct tty_struct *tty) | ||
| 1601 | { | ||
| 1602 | if (!kgdb_io_ops) { | ||
| 1603 | printk(KERN_CRIT "ERROR: No KGDB I/O module available\n"); | ||
| 1604 | return; | ||
| 1605 | } | ||
| 1606 | if (!kgdb_connected) | ||
| 1607 | printk(KERN_CRIT "Entering KGDB\n"); | ||
| 1608 | |||
| 1609 | kgdb_breakpoint(); | ||
| 1610 | } | ||
| 1611 | |||
| 1612 | static struct sysrq_key_op sysrq_gdb_op = { | ||
| 1613 | .handler = sysrq_handle_gdb, | ||
| 1614 | .help_msg = "debug(G)", | ||
| 1615 | .action_msg = "DEBUG", | ||
| 1616 | }; | ||
| 1617 | #endif | ||
| 1618 | |||
| 1619 | static void kgdb_register_callbacks(void) | ||
| 1620 | { | ||
| 1621 | if (!kgdb_io_module_registered) { | ||
| 1622 | kgdb_io_module_registered = 1; | ||
| 1623 | kgdb_arch_init(); | ||
| 1624 | #ifdef CONFIG_MAGIC_SYSRQ | ||
| 1625 | register_sysrq_key('g', &sysrq_gdb_op); | ||
| 1626 | #endif | ||
| 1627 | if (kgdb_use_con && !kgdb_con_registered) { | ||
| 1628 | register_console(&kgdbcons); | ||
| 1629 | kgdb_con_registered = 1; | ||
| 1630 | } | ||
| 1631 | } | ||
| 1632 | } | ||
| 1633 | |||
| 1634 | static void kgdb_unregister_callbacks(void) | ||
| 1635 | { | ||
| 1636 | /* | ||
| 1637 | * When this routine is called KGDB should unregister from the | ||
| 1638 | * panic handler and clean up, making sure it is not handling any | ||
| 1639 | * break exceptions at the time. | ||
| 1640 | */ | ||
| 1641 | if (kgdb_io_module_registered) { | ||
| 1642 | kgdb_io_module_registered = 0; | ||
| 1643 | kgdb_arch_exit(); | ||
| 1644 | #ifdef CONFIG_MAGIC_SYSRQ | ||
| 1645 | unregister_sysrq_key('g', &sysrq_gdb_op); | ||
| 1646 | #endif | ||
| 1647 | if (kgdb_con_registered) { | ||
| 1648 | unregister_console(&kgdbcons); | ||
| 1649 | kgdb_con_registered = 0; | ||
| 1650 | } | ||
| 1651 | } | ||
| 1652 | } | ||
| 1653 | |||
| 1654 | static void kgdb_initial_breakpoint(void) | ||
| 1655 | { | ||
| 1656 | kgdb_break_asap = 0; | ||
| 1657 | |||
| 1658 | printk(KERN_CRIT "kgdb: Waiting for connection from remote gdb...\n"); | ||
| 1659 | kgdb_breakpoint(); | ||
| 1660 | } | ||
| 1661 | |||
| 1662 | /** | ||
| 1663 | * kgdb_register_io_module - register KGDB IO module | ||
| 1664 | * @new_kgdb_io_ops: the io ops vector | ||
| 1665 | * | ||
| 1666 | * Register it with the KGDB core. | ||
| 1667 | */ | ||
| 1668 | int kgdb_register_io_module(struct kgdb_io *new_kgdb_io_ops) | ||
| 1669 | { | ||
| 1670 | int err; | ||
| 1671 | |||
| 1672 | spin_lock(&kgdb_registration_lock); | ||
| 1673 | |||
| 1674 | if (kgdb_io_ops) { | ||
| 1675 | spin_unlock(&kgdb_registration_lock); | ||
| 1676 | |||
| 1677 | printk(KERN_ERR "kgdb: Another I/O driver is already " | ||
| 1678 | "registered with KGDB.\n"); | ||
| 1679 | return -EBUSY; | ||
| 1680 | } | ||
| 1681 | |||
| 1682 | if (new_kgdb_io_ops->init) { | ||
| 1683 | err = new_kgdb_io_ops->init(); | ||
| 1684 | if (err) { | ||
| 1685 | spin_unlock(&kgdb_registration_lock); | ||
| 1686 | return err; | ||
| 1687 | } | ||
| 1688 | } | ||
| 1689 | |||
| 1690 | kgdb_io_ops = new_kgdb_io_ops; | ||
| 1691 | |||
| 1692 | spin_unlock(&kgdb_registration_lock); | ||
| 1693 | |||
| 1694 | printk(KERN_INFO "kgdb: Registered I/O driver %s.\n", | ||
| 1695 | new_kgdb_io_ops->name); | ||
| 1696 | |||
| 1697 | /* Arm KGDB now. */ | ||
| 1698 | kgdb_register_callbacks(); | ||
| 1699 | |||
| 1700 | if (kgdb_break_asap) | ||
| 1701 | kgdb_initial_breakpoint(); | ||
| 1702 | |||
| 1703 | return 0; | ||
| 1704 | } | ||
| 1705 | EXPORT_SYMBOL_GPL(kgdb_register_io_module); | ||
| 1706 | |||
| 1707 | /** | ||
| 1708 | * kkgdb_unregister_io_module - unregister KGDB IO module | ||
| 1709 | * @old_kgdb_io_ops: the io ops vector | ||
| 1710 | * | ||
| 1711 | * Unregister it with the KGDB core. | ||
| 1712 | */ | ||
| 1713 | void kgdb_unregister_io_module(struct kgdb_io *old_kgdb_io_ops) | ||
| 1714 | { | ||
| 1715 | BUG_ON(kgdb_connected); | ||
| 1716 | |||
| 1717 | /* | ||
| 1718 | * KGDB is no longer able to communicate out, so | ||
| 1719 | * unregister our callbacks and reset state. | ||
| 1720 | */ | ||
| 1721 | kgdb_unregister_callbacks(); | ||
| 1722 | |||
| 1723 | spin_lock(&kgdb_registration_lock); | ||
| 1724 | |||
| 1725 | WARN_ON_ONCE(kgdb_io_ops != old_kgdb_io_ops); | ||
| 1726 | kgdb_io_ops = NULL; | ||
| 1727 | |||
| 1728 | spin_unlock(&kgdb_registration_lock); | ||
| 1729 | |||
| 1730 | printk(KERN_INFO | ||
| 1731 | "kgdb: Unregistered I/O driver %s, debugger disabled.\n", | ||
| 1732 | old_kgdb_io_ops->name); | ||
| 1733 | } | ||
| 1734 | EXPORT_SYMBOL_GPL(kgdb_unregister_io_module); | ||
| 1735 | |||
| 1736 | /** | ||
| 1737 | * kgdb_breakpoint - generate breakpoint exception | ||
| 1738 | * | ||
| 1739 | * This function will generate a breakpoint exception. It is used at the | ||
| 1740 | * beginning of a program to sync up with a debugger and can be used | ||
| 1741 | * otherwise as a quick means to stop program execution and "break" into | ||
| 1742 | * the debugger. | ||
| 1743 | */ | ||
| 1744 | void kgdb_breakpoint(void) | ||
| 1745 | { | ||
| 1746 | atomic_inc(&kgdb_setting_breakpoint); | ||
| 1747 | wmb(); /* Sync point before breakpoint */ | ||
| 1748 | arch_kgdb_breakpoint(); | ||
| 1749 | wmb(); /* Sync point after breakpoint */ | ||
| 1750 | atomic_dec(&kgdb_setting_breakpoint); | ||
| 1751 | } | ||
| 1752 | EXPORT_SYMBOL_GPL(kgdb_breakpoint); | ||
| 1753 | |||
| 1754 | static int __init opt_kgdb_wait(char *str) | ||
| 1755 | { | ||
| 1756 | kgdb_break_asap = 1; | ||
| 1757 | |||
| 1758 | if (kgdb_io_module_registered) | ||
| 1759 | kgdb_initial_breakpoint(); | ||
| 1760 | |||
| 1761 | return 0; | ||
| 1762 | } | ||
| 1763 | |||
| 1764 | early_param("kgdbwait", opt_kgdb_wait); | ||
diff --git a/kernel/module.c b/kernel/module.c index 5e14483768bb..3c4fc4bb4b82 100644 --- a/kernel/module.c +++ b/kernel/module.c | |||
| @@ -77,6 +77,10 @@ | |||
| 77 | DEFINE_MUTEX(module_mutex); | 77 | DEFINE_MUTEX(module_mutex); |
| 78 | EXPORT_SYMBOL_GPL(module_mutex); | 78 | EXPORT_SYMBOL_GPL(module_mutex); |
| 79 | static LIST_HEAD(modules); | 79 | static LIST_HEAD(modules); |
| 80 | #ifdef CONFIG_KGDB_KDB | ||
| 81 | struct list_head *kdb_modules = &modules; /* kdb needs the list of modules */ | ||
| 82 | #endif /* CONFIG_KGDB_KDB */ | ||
| 83 | |||
| 80 | 84 | ||
| 81 | /* Block module loading/unloading? */ | 85 | /* Block module loading/unloading? */ |
| 82 | int modules_disabled = 0; | 86 | int modules_disabled = 0; |
diff --git a/kernel/printk.c b/kernel/printk.c index 75077ad0b537..444b770c9595 100644 --- a/kernel/printk.c +++ b/kernel/printk.c | |||
| @@ -33,6 +33,7 @@ | |||
| 33 | #include <linux/bootmem.h> | 33 | #include <linux/bootmem.h> |
| 34 | #include <linux/syscalls.h> | 34 | #include <linux/syscalls.h> |
| 35 | #include <linux/kexec.h> | 35 | #include <linux/kexec.h> |
| 36 | #include <linux/kdb.h> | ||
| 36 | #include <linux/ratelimit.h> | 37 | #include <linux/ratelimit.h> |
| 37 | #include <linux/kmsg_dump.h> | 38 | #include <linux/kmsg_dump.h> |
| 38 | #include <linux/syslog.h> | 39 | #include <linux/syslog.h> |
| @@ -413,6 +414,22 @@ SYSCALL_DEFINE3(syslog, int, type, char __user *, buf, int, len) | |||
| 413 | return do_syslog(type, buf, len, SYSLOG_FROM_CALL); | 414 | return do_syslog(type, buf, len, SYSLOG_FROM_CALL); |
| 414 | } | 415 | } |
| 415 | 416 | ||
| 417 | #ifdef CONFIG_KGDB_KDB | ||
| 418 | /* kdb dmesg command needs access to the syslog buffer. do_syslog() | ||
| 419 | * uses locks so it cannot be used during debugging. Just tell kdb | ||
| 420 | * where the start and end of the physical and logical logs are. This | ||
| 421 | * is equivalent to do_syslog(3). | ||
| 422 | */ | ||
| 423 | void kdb_syslog_data(char *syslog_data[4]) | ||
| 424 | { | ||
| 425 | syslog_data[0] = log_buf; | ||
| 426 | syslog_data[1] = log_buf + log_buf_len; | ||
| 427 | syslog_data[2] = log_buf + log_end - | ||
| 428 | (logged_chars < log_buf_len ? logged_chars : log_buf_len); | ||
| 429 | syslog_data[3] = log_buf + log_end; | ||
| 430 | } | ||
| 431 | #endif /* CONFIG_KGDB_KDB */ | ||
| 432 | |||
| 416 | /* | 433 | /* |
| 417 | * Call the console drivers on a range of log_buf | 434 | * Call the console drivers on a range of log_buf |
| 418 | */ | 435 | */ |
| @@ -586,6 +603,14 @@ asmlinkage int printk(const char *fmt, ...) | |||
| 586 | va_list args; | 603 | va_list args; |
| 587 | int r; | 604 | int r; |
| 588 | 605 | ||
| 606 | #ifdef CONFIG_KGDB_KDB | ||
| 607 | if (unlikely(kdb_trap_printk)) { | ||
| 608 | va_start(args, fmt); | ||
| 609 | r = vkdb_printf(fmt, args); | ||
| 610 | va_end(args); | ||
| 611 | return r; | ||
| 612 | } | ||
| 613 | #endif | ||
| 589 | va_start(args, fmt); | 614 | va_start(args, fmt); |
| 590 | r = vprintk(fmt, args); | 615 | r = vprintk(fmt, args); |
| 591 | va_end(args); | 616 | va_end(args); |
diff --git a/kernel/sched.c b/kernel/sched.c index d9c0368eeb21..054a6012de99 100644 --- a/kernel/sched.c +++ b/kernel/sched.c | |||
| @@ -7759,9 +7759,9 @@ void normalize_rt_tasks(void) | |||
| 7759 | 7759 | ||
| 7760 | #endif /* CONFIG_MAGIC_SYSRQ */ | 7760 | #endif /* CONFIG_MAGIC_SYSRQ */ |
| 7761 | 7761 | ||
| 7762 | #ifdef CONFIG_IA64 | 7762 | #if defined(CONFIG_IA64) || defined(CONFIG_KGDB_KDB) |
| 7763 | /* | 7763 | /* |
| 7764 | * These functions are only useful for the IA64 MCA handling. | 7764 | * These functions are only useful for the IA64 MCA handling, or kdb. |
| 7765 | * | 7765 | * |
| 7766 | * They can only be called when the whole system has been | 7766 | * They can only be called when the whole system has been |
| 7767 | * stopped - every CPU needs to be quiescent, and no scheduling | 7767 | * stopped - every CPU needs to be quiescent, and no scheduling |
| @@ -7781,6 +7781,9 @@ struct task_struct *curr_task(int cpu) | |||
| 7781 | return cpu_curr(cpu); | 7781 | return cpu_curr(cpu); |
| 7782 | } | 7782 | } |
| 7783 | 7783 | ||
| 7784 | #endif /* defined(CONFIG_IA64) || defined(CONFIG_KGDB_KDB) */ | ||
| 7785 | |||
| 7786 | #ifdef CONFIG_IA64 | ||
| 7784 | /** | 7787 | /** |
| 7785 | * set_curr_task - set the current task for a given cpu. | 7788 | * set_curr_task - set the current task for a given cpu. |
| 7786 | * @cpu: the processor in question. | 7789 | * @cpu: the processor in question. |
diff --git a/kernel/signal.c b/kernel/signal.c index dbd7fe073c55..825a3f24ad76 100644 --- a/kernel/signal.c +++ b/kernel/signal.c | |||
| @@ -2735,3 +2735,43 @@ void __init signals_init(void) | |||
| 2735 | { | 2735 | { |
| 2736 | sigqueue_cachep = KMEM_CACHE(sigqueue, SLAB_PANIC); | 2736 | sigqueue_cachep = KMEM_CACHE(sigqueue, SLAB_PANIC); |
| 2737 | } | 2737 | } |
| 2738 | |||
| 2739 | #ifdef CONFIG_KGDB_KDB | ||
| 2740 | #include <linux/kdb.h> | ||
| 2741 | /* | ||
| 2742 | * kdb_send_sig_info - Allows kdb to send signals without exposing | ||
| 2743 | * signal internals. This function checks if the required locks are | ||
| 2744 | * available before calling the main signal code, to avoid kdb | ||
| 2745 | * deadlocks. | ||
| 2746 | */ | ||
| 2747 | void | ||
| 2748 | kdb_send_sig_info(struct task_struct *t, struct siginfo *info) | ||
| 2749 | { | ||
| 2750 | static struct task_struct *kdb_prev_t; | ||
| 2751 | int sig, new_t; | ||
| 2752 | if (!spin_trylock(&t->sighand->siglock)) { | ||
| 2753 | kdb_printf("Can't do kill command now.\n" | ||
| 2754 | "The sigmask lock is held somewhere else in " | ||
| 2755 | "kernel, try again later\n"); | ||
| 2756 | return; | ||
| 2757 | } | ||
| 2758 | spin_unlock(&t->sighand->siglock); | ||
| 2759 | new_t = kdb_prev_t != t; | ||
| 2760 | kdb_prev_t = t; | ||
| 2761 | if (t->state != TASK_RUNNING && new_t) { | ||
| 2762 | kdb_printf("Process is not RUNNING, sending a signal from " | ||
| 2763 | "kdb risks deadlock\n" | ||
| 2764 | "on the run queue locks. " | ||
| 2765 | "The signal has _not_ been sent.\n" | ||
| 2766 | "Reissue the kill command if you want to risk " | ||
| 2767 | "the deadlock.\n"); | ||
| 2768 | return; | ||
| 2769 | } | ||
| 2770 | sig = info->si_signo; | ||
| 2771 | if (send_sig_info(sig, info, t)) | ||
| 2772 | kdb_printf("Fail to deliver Signal %d to process %d.\n", | ||
| 2773 | sig, t->pid); | ||
| 2774 | else | ||
| 2775 | kdb_printf("Signal %d is sent to process %d.\n", sig, t->pid); | ||
| 2776 | } | ||
| 2777 | #endif /* CONFIG_KGDB_KDB */ | ||
diff --git a/lib/Kconfig.kgdb b/lib/Kconfig.kgdb index 9b5d1d7f2ef7..43cb93fa2651 100644 --- a/lib/Kconfig.kgdb +++ b/lib/Kconfig.kgdb | |||
| @@ -3,7 +3,7 @@ config HAVE_ARCH_KGDB | |||
| 3 | bool | 3 | bool |
| 4 | 4 | ||
| 5 | menuconfig KGDB | 5 | menuconfig KGDB |
| 6 | bool "KGDB: kernel debugging with remote gdb" | 6 | bool "KGDB: kernel debugger" |
| 7 | depends on HAVE_ARCH_KGDB | 7 | depends on HAVE_ARCH_KGDB |
| 8 | depends on DEBUG_KERNEL && EXPERIMENTAL | 8 | depends on DEBUG_KERNEL && EXPERIMENTAL |
| 9 | help | 9 | help |
| @@ -57,4 +57,26 @@ config KGDB_TESTS_BOOT_STRING | |||
| 57 | information about other strings you could use beyond the | 57 | information about other strings you could use beyond the |
| 58 | default of V1F100. | 58 | default of V1F100. |
| 59 | 59 | ||
| 60 | config KGDB_LOW_LEVEL_TRAP | ||
| 61 | bool "KGDB: Allow debugging with traps in notifiers" | ||
| 62 | depends on X86 || MIPS | ||
| 63 | default n | ||
| 64 | help | ||
| 65 | This will add an extra call back to kgdb for the breakpoint | ||
| 66 | exception handler on which will will allow kgdb to step | ||
| 67 | through a notify handler. | ||
| 68 | |||
| 69 | config KGDB_KDB | ||
| 70 | bool "KGDB_KDB: include kdb frontend for kgdb" | ||
| 71 | default n | ||
| 72 | help | ||
| 73 | KDB frontend for kernel | ||
| 74 | |||
| 75 | config KDB_KEYBOARD | ||
| 76 | bool "KGDB_KDB: keyboard as input device" | ||
| 77 | depends on VT && KGDB_KDB | ||
| 78 | default n | ||
| 79 | help | ||
| 80 | KDB can use a PS/2 type keyboard for an input device | ||
| 81 | |||
| 60 | endif # KGDB | 82 | endif # KGDB |
