remote_gdb.cc revision 8783:8cd08c045cab
1/* 2 * Copyright (c) 2002-2005 The Regents of The University of Michigan 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions are 7 * met: redistributions of source code must retain the above copyright 8 * notice, this list of conditions and the following disclaimer; 9 * redistributions in binary form must reproduce the above copyright 10 * notice, this list of conditions and the following disclaimer in the 11 * documentation and/or other materials provided with the distribution; 12 * neither the name of the copyright holders nor the names of its 13 * contributors may be used to endorse or promote products derived from 14 * this software without specific prior written permission. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 17 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 18 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR 19 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT 20 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 21 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT 22 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 * 28 * Authors: Nathan Binkert 29 */ 30 31/* 32 * Copyright (c) 1990, 1993 The Regents of the University of California 33 * All rights reserved 34 * 35 * This software was developed by the Computer Systems Engineering group 36 * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and 37 * contributed to Berkeley. 38 * 39 * All advertising materials mentioning features or use of this software 40 * must display the following acknowledgement: 41 * This product includes software developed by the University of 42 * California, Lawrence Berkeley Laboratories. 43 * 44 * Redistribution and use in source and binary forms, with or without 45 * modification, are permitted provided that the following conditions 46 * are met: 47 * 1. Redistributions of source code must retain the above copyright 48 * notice, this list of conditions and the following disclaimer. 49 * 2. Redistributions in binary form must reproduce the above copyright 50 * notice, this list of conditions and the following disclaimer in the 51 * documentation and/or other materials provided with the distribution. 52 * 3. All advertising materials mentioning features or use of this software 53 * must display the following acknowledgement: 54 * This product includes software developed by the University of 55 * California, Berkeley and its contributors. 56 * 4. Neither the name of the University nor the names of its contributors 57 * may be used to endorse or promote products derived from this software 58 * without specific prior written permission. 59 * 60 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 61 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 62 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 63 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 64 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 65 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 66 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 67 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 68 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 69 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 70 * SUCH DAMAGE. 71 * 72 * @(#)kgdb_stub.c 8.4 (Berkeley) 1/12/94 73 */ 74 75/*- 76 * Copyright (c) 2001 The NetBSD Foundation, Inc. 77 * All rights reserved. 78 * 79 * This code is derived from software contributed to The NetBSD Foundation 80 * by Jason R. Thorpe. 81 * 82 * Redistribution and use in source and binary forms, with or without 83 * modification, are permitted provided that the following conditions 84 * are met: 85 * 1. Redistributions of source code must retain the above copyright 86 * notice, this list of conditions and the following disclaimer. 87 * 2. Redistributions in binary form must reproduce the above copyright 88 * notice, this list of conditions and the following disclaimer in the 89 * documentation and/or other materials provided with the distribution. 90 * 3. All advertising materials mentioning features or use of this software 91 * must display the following acknowledgement: 92 * This product includes software developed by the NetBSD 93 * Foundation, Inc. and its contributors. 94 * 4. Neither the name of The NetBSD Foundation nor the names of its 95 * contributors may be used to endorse or promote products derived 96 * from this software without specific prior written permission. 97 * 98 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 99 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 100 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 101 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 102 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 103 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 104 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 105 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 106 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 107 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 108 * POSSIBILITY OF SUCH DAMAGE. 109 */ 110 111/* 112 * $NetBSD: kgdb_stub.c,v 1.8 2001/07/07 22:58:00 wdk Exp $ 113 * 114 * Taken from NetBSD 115 * 116 * "Stub" to allow remote cpu to debug over a serial line using gdb. 117 */ 118 119#include <sys/signal.h> 120#include <unistd.h> 121 122#include <cstdio> 123#include <string> 124 125#include "arch/vtophys.hh" 126#include "base/intmath.hh" 127#include "base/remote_gdb.hh" 128#include "base/socket.hh" 129#include "base/trace.hh" 130#include "config/the_isa.hh" 131#include "cpu/static_inst.hh" 132#include "cpu/thread_context.hh" 133#include "debug/GDBAll.hh" 134#include "mem/port.hh" 135#include "mem/translating_port.hh" 136#include "mem/vport.hh" 137#include "sim/system.hh" 138 139using namespace std; 140using namespace Debug; 141using namespace TheISA; 142 143#ifndef NDEBUG 144vector<BaseRemoteGDB *> debuggers; 145 146void 147debugger() 148{ 149 static int current_debugger = -1; 150 if (current_debugger >= 0 && current_debugger < (int)debuggers.size()) { 151 BaseRemoteGDB *gdb = debuggers[current_debugger]; 152 if (!gdb->isattached()) 153 gdb->listener->accept(); 154 if (gdb->isattached()) 155 gdb->trap(SIGILL); 156 } 157} 158#endif 159 160/////////////////////////////////////////////////////////// 161// 162// 163// 164 165GDBListener::Event::Event(GDBListener *l, int fd, int e) 166 : PollEvent(fd, e), listener(l) 167{} 168 169void 170GDBListener::Event::process(int revent) 171{ 172 listener->accept(); 173} 174 175GDBListener::GDBListener(BaseRemoteGDB *g, int p) 176 : event(NULL), gdb(g), port(p) 177{ 178 assert(!gdb->listener); 179 gdb->listener = this; 180} 181 182GDBListener::~GDBListener() 183{ 184 if (event) 185 delete event; 186} 187 188string 189GDBListener::name() 190{ 191 return gdb->name() + ".listener"; 192} 193 194void 195GDBListener::listen() 196{ 197 if (ListenSocket::allDisabled()) { 198 warn_once("Sockets disabled, not accepting gdb connections"); 199 return; 200 } 201 202 while (!listener.listen(port, true)) { 203 DPRINTF(GDBMisc, "Can't bind port %d\n", port); 204 port++; 205 } 206 207 event = new Event(this, listener.getfd(), POLLIN); 208 pollQueue.schedule(event); 209 210#ifndef NDEBUG 211 gdb->number = debuggers.size(); 212 debuggers.push_back(gdb); 213#endif 214 215#ifndef NDEBUG 216 ccprintf(cerr, "%d: %s: listening for remote gdb #%d on port %d\n", 217 curTick(), name(), gdb->number, port); 218#else 219 ccprintf(cerr, "%d: %s: listening for remote gdb on port %d\n", 220 curTick(), name(), port); 221#endif 222} 223 224void 225GDBListener::accept() 226{ 227 if (!listener.islistening()) 228 panic("GDBListener::accept(): cannot accept if we're not listening!"); 229 230 int sfd = listener.accept(true); 231 232 if (sfd != -1) { 233 if (gdb->isattached()) 234 close(sfd); 235 else 236 gdb->attach(sfd); 237 } 238} 239 240BaseRemoteGDB::Event::Event(BaseRemoteGDB *g, int fd, int e) 241 : PollEvent(fd, e), gdb(g) 242{} 243 244void 245BaseRemoteGDB::Event::process(int revent) 246{ 247 if (revent & POLLIN) 248 gdb->trap(SIGILL); 249 else if (revent & POLLNVAL) 250 gdb->detach(); 251} 252 253BaseRemoteGDB::BaseRemoteGDB(System *_system, ThreadContext *c, size_t cacheSize) 254 : event(NULL), listener(NULL), number(-1), fd(-1), 255 active(false), attached(false), 256 system(_system), pmem(_system->physmem), context(c), 257 gdbregs(cacheSize) 258{ 259 memset(gdbregs.regs, 0, gdbregs.bytes()); 260} 261 262BaseRemoteGDB::~BaseRemoteGDB() 263{ 264 if (event) 265 delete event; 266} 267 268string 269BaseRemoteGDB::name() 270{ 271 return system->name() + ".remote_gdb"; 272} 273 274bool 275BaseRemoteGDB::isattached() 276{ return attached; } 277 278void 279BaseRemoteGDB::attach(int f) 280{ 281 fd = f; 282 283 event = new Event(this, fd, POLLIN); 284 pollQueue.schedule(event); 285 286 attached = true; 287 DPRINTFN("remote gdb attached\n"); 288} 289 290void 291BaseRemoteGDB::detach() 292{ 293 attached = false; 294 close(fd); 295 fd = -1; 296 297 pollQueue.remove(event); 298 DPRINTFN("remote gdb detached\n"); 299} 300 301const char * 302BaseRemoteGDB::gdb_command(char cmd) 303{ 304 switch (cmd) { 305 case GDBSignal: return "KGDB_SIGNAL"; 306 case GDBSetBaud: return "KGDB_SET_BAUD"; 307 case GDBSetBreak: return "KGDB_SET_BREAK"; 308 case GDBCont: return "KGDB_CONT"; 309 case GDBAsyncCont: return "KGDB_ASYNC_CONT"; 310 case GDBDebug: return "KGDB_DEBUG"; 311 case GDBDetach: return "KGDB_DETACH"; 312 case GDBRegR: return "KGDB_REG_R"; 313 case GDBRegW: return "KGDB_REG_W"; 314 case GDBSetThread: return "KGDB_SET_THREAD"; 315 case GDBCycleStep: return "KGDB_CYCLE_STEP"; 316 case GDBSigCycleStep: return "KGDB_SIG_CYCLE_STEP"; 317 case GDBKill: return "KGDB_KILL"; 318 case GDBMemW: return "KGDB_MEM_W"; 319 case GDBMemR: return "KGDB_MEM_R"; 320 case GDBSetReg: return "KGDB_SET_REG"; 321 case GDBReadReg: return "KGDB_READ_REG"; 322 case GDBQueryVar: return "KGDB_QUERY_VAR"; 323 case GDBSetVar: return "KGDB_SET_VAR"; 324 case GDBReset: return "KGDB_RESET"; 325 case GDBStep: return "KGDB_STEP"; 326 case GDBAsyncStep: return "KGDB_ASYNC_STEP"; 327 case GDBThreadAlive: return "KGDB_THREAD_ALIVE"; 328 case GDBTargetExit: return "KGDB_TARGET_EXIT"; 329 case GDBBinaryDload: return "KGDB_BINARY_DLOAD"; 330 case GDBClrHwBkpt: return "KGDB_CLR_HW_BKPT"; 331 case GDBSetHwBkpt: return "KGDB_SET_HW_BKPT"; 332 case GDBStart: return "KGDB_START"; 333 case GDBEnd: return "KGDB_END"; 334 case GDBGoodP: return "KGDB_GOODP"; 335 case GDBBadP: return "KGDB_BADP"; 336 default: return "KGDB_UNKNOWN"; 337 } 338} 339 340///////////////////////// 341// 342// 343 344uint8_t 345BaseRemoteGDB::getbyte() 346{ 347 uint8_t b; 348 if (::read(fd, &b, 1) != 1) 349 warn("could not read byte from debugger"); 350 return b; 351} 352 353void 354BaseRemoteGDB::putbyte(uint8_t b) 355{ 356 if (::write(fd, &b, 1) != 1) 357 warn("could not write byte to debugger"); 358} 359 360// Send a packet to gdb 361void 362BaseRemoteGDB::send(const char *bp) 363{ 364 const char *p; 365 uint8_t csum, c; 366 367 DPRINTF(GDBSend, "send: %s\n", bp); 368 369 do { 370 p = bp; 371 //Start sending a packet 372 putbyte(GDBStart); 373 //Send the contents, and also keep a check sum. 374 for (csum = 0; (c = *p); p++) { 375 putbyte(c); 376 csum += c; 377 } 378 //Send the ending character. 379 putbyte(GDBEnd); 380 //Sent the checksum. 381 putbyte(i2digit(csum >> 4)); 382 putbyte(i2digit(csum)); 383 //Try transmitting over and over again until the other end doesn't send an 384 //error back. 385 } while ((c = getbyte() & 0x7f) == GDBBadP); 386} 387 388// Receive a packet from gdb 389int 390BaseRemoteGDB::recv(char *bp, int maxlen) 391{ 392 char *p; 393 int c, csum; 394 int len; 395 396 do { 397 p = bp; 398 csum = len = 0; 399 //Find the beginning of a packet 400 while ((c = getbyte()) != GDBStart) 401 ; 402 403 //Read until you find the end of the data in the packet, and keep 404 //track of the check sum. 405 while ((c = getbyte()) != GDBEnd && len < maxlen) { 406 c &= 0x7f; 407 csum += c; 408 *p++ = c; 409 len++; 410 } 411 412 //Mask the check sum, and terminate the command string. 413 csum &= 0xff; 414 *p = '\0'; 415 416 //If the command was too long, report an error. 417 if (len >= maxlen) { 418 putbyte(GDBBadP); 419 continue; 420 } 421 422 //Bring in the checksum. If the check sum matches, csum will be 0. 423 csum -= digit2i(getbyte()) * 16; 424 csum -= digit2i(getbyte()); 425 426 //If the check sum was correct 427 if (csum == 0) { 428 //Report that the packet was received correctly 429 putbyte(GDBGoodP); 430 // Sequence present? 431 if (bp[2] == ':') { 432 putbyte(bp[0]); 433 putbyte(bp[1]); 434 len -= 3; 435 memcpy(bp, bp+3, len); 436 } 437 break; 438 } 439 //Otherwise, report that there was a mistake. 440 putbyte(GDBBadP); 441 } while (1); 442 443 DPRINTF(GDBRecv, "recv: %s: %s\n", gdb_command(*bp), bp); 444 445 return (len); 446} 447 448// Read bytes from kernel address space for debugger. 449bool 450BaseRemoteGDB::read(Addr vaddr, size_t size, char *data) 451{ 452 static Addr lastaddr = 0; 453 static size_t lastsize = 0; 454 455 if (vaddr < 10) { 456 DPRINTF(GDBRead, "read: reading memory location zero!\n"); 457 vaddr = lastaddr + lastsize; 458 } 459 460 DPRINTF(GDBRead, "read: addr=%#x, size=%d", vaddr, size); 461 462 if (FullSystem) { 463 VirtualPort *port = context->getVirtPort(); 464 port->readBlob(vaddr, (uint8_t*)data, size); 465 } else { 466 TranslatingPort *port = context->getMemPort(); 467 port->readBlob(vaddr, (uint8_t*)data, size); 468 } 469 470#if TRACING_ON 471 if (DTRACE(GDBRead)) { 472 if (DTRACE(GDBExtra)) { 473 char buf[1024]; 474 mem2hex(buf, data, size); 475 DPRINTFNR(": %s\n", buf); 476 } else 477 DPRINTFNR("\n"); 478 } 479#endif 480 481 return true; 482} 483 484// Write bytes to kernel address space for debugger. 485bool 486BaseRemoteGDB::write(Addr vaddr, size_t size, const char *data) 487{ 488 static Addr lastaddr = 0; 489 static size_t lastsize = 0; 490 491 if (vaddr < 10) { 492 DPRINTF(GDBWrite, "write: writing memory location zero!\n"); 493 vaddr = lastaddr + lastsize; 494 } 495 496 if (DTRACE(GDBWrite)) { 497 DPRINTFN("write: addr=%#x, size=%d", vaddr, size); 498 if (DTRACE(GDBExtra)) { 499 char buf[1024]; 500 mem2hex(buf, data, size); 501 DPRINTFNR(": %s\n", buf); 502 } else 503 DPRINTFNR("\n"); 504 } 505 if (FullSystem) { 506 VirtualPort *port = context->getVirtPort(); 507 port->writeBlob(vaddr, (uint8_t*)data, size); 508 } else { 509 TranslatingPort *port = context->getMemPort(); 510 port->writeBlob(vaddr, (uint8_t*)data, size); 511 delete port; 512 } 513 514 return true; 515} 516 517PCEventQueue *BaseRemoteGDB::getPcEventQueue() 518{ 519 return &system->pcEventQueue; 520} 521 522BaseRemoteGDB::HardBreakpoint::HardBreakpoint(BaseRemoteGDB *_gdb, Addr pc) 523 : PCEvent(_gdb->getPcEventQueue(), "HardBreakpoint Event", pc), 524 gdb(_gdb), refcount(0) 525{ 526 DPRINTF(GDBMisc, "creating hardware breakpoint at %#x\n", evpc); 527} 528 529void 530BaseRemoteGDB::HardBreakpoint::process(ThreadContext *tc) 531{ 532 DPRINTF(GDBMisc, "handling hardware breakpoint at %#x\n", pc()); 533 534 if (tc == gdb->context) 535 gdb->trap(SIGTRAP); 536} 537 538bool 539BaseRemoteGDB::insertSoftBreak(Addr addr, size_t len) 540{ 541 if (len != sizeof(TheISA::MachInst)) 542 panic("invalid length\n"); 543 544 return insertHardBreak(addr, len); 545} 546 547bool 548BaseRemoteGDB::removeSoftBreak(Addr addr, size_t len) 549{ 550 if (len != sizeof(MachInst)) 551 panic("invalid length\n"); 552 553 return removeHardBreak(addr, len); 554} 555 556bool 557BaseRemoteGDB::insertHardBreak(Addr addr, size_t len) 558{ 559 if (len != sizeof(MachInst)) 560 panic("invalid length\n"); 561 562 DPRINTF(GDBMisc, "inserting hardware breakpoint at %#x\n", addr); 563 564 HardBreakpoint *&bkpt = hardBreakMap[addr]; 565 if (bkpt == 0) 566 bkpt = new HardBreakpoint(this, addr); 567 568 bkpt->refcount++; 569 570 return true; 571} 572 573bool 574BaseRemoteGDB::removeHardBreak(Addr addr, size_t len) 575{ 576 if (len != sizeof(MachInst)) 577 panic("invalid length\n"); 578 579 DPRINTF(GDBMisc, "removing hardware breakpoint at %#x\n", addr); 580 581 break_iter_t i = hardBreakMap.find(addr); 582 if (i == hardBreakMap.end()) 583 return false; 584 585 HardBreakpoint *hbp = (*i).second; 586 if (--hbp->refcount == 0) { 587 delete hbp; 588 hardBreakMap.erase(i); 589 } 590 591 return true; 592} 593 594void 595BaseRemoteGDB::setTempBreakpoint(Addr bkpt) 596{ 597 DPRINTF(GDBMisc, "setTempBreakpoint: addr=%#x\n", bkpt); 598 insertHardBreak(bkpt, sizeof(TheISA::MachInst)); 599} 600 601void 602BaseRemoteGDB::clearTempBreakpoint(Addr &bkpt) 603{ 604 DPRINTF(GDBMisc, "setTempBreakpoint: addr=%#x\n", bkpt); 605 removeHardBreak(bkpt, sizeof(TheISA::MachInst)); 606 bkpt = 0; 607} 608 609const char * 610BaseRemoteGDB::break_type(char c) 611{ 612 switch(c) { 613 case '0': return "software breakpoint"; 614 case '1': return "hardware breakpoint"; 615 case '2': return "write watchpoint"; 616 case '3': return "read watchpoint"; 617 case '4': return "access watchpoint"; 618 default: return "unknown breakpoint/watchpoint"; 619 } 620} 621 622// This function does all command processing for interfacing to a 623// remote gdb. Note that the error codes are ignored by gdb at 624// present, but might eventually become meaningful. (XXX) It might 625// makes sense to use POSIX errno values, because that is what the 626// gdb/remote.c functions want to return. 627bool 628BaseRemoteGDB::trap(int type) 629{ 630 uint64_t val; 631 size_t datalen, len; 632 char data[GDBPacketBufLen + 1]; 633 char *buffer; 634 size_t bufferSize; 635 const char *p; 636 char command, subcmd; 637 string var; 638 bool ret; 639 640 if (!attached) 641 return false; 642 643 bufferSize = gdbregs.bytes() * 2 + 256; 644 buffer = (char*)malloc(bufferSize); 645 646 TheISA::PCState pc = context->pcState(); 647 DPRINTF(GDBMisc, "trap: PC=%s\n", pc); 648 649 clearSingleStep(); 650 651 /* 652 * The first entry to this function is normally through 653 * a breakpoint trap in kgdb_connect(), in which case we 654 * must advance past the breakpoint because gdb will not. 655 * 656 * On the first entry here, we expect that gdb is not yet 657 * listening to us, so just enter the interaction loop. 658 * After the debugger is "active" (connected) it will be 659 * waiting for a "signaled" message from us. 660 */ 661 if (!active) 662 active = true; 663 else 664 // Tell remote host that an exception has occurred. 665 snprintf((char *)buffer, bufferSize, "S%02x", type); 666 send(buffer); 667 668 // Stick frame regs into our reg cache. 669 getregs(); 670 671 for (;;) { 672 datalen = recv(data, sizeof(data)); 673 data[sizeof(data) - 1] = 0; // Sentinel 674 command = data[0]; 675 subcmd = 0; 676 p = data + 1; 677 switch (command) { 678 679 case GDBSignal: 680 // if this command came from a running gdb, answer it -- 681 // the other guy has no way of knowing if we're in or out 682 // of this loop when he issues a "remote-signal". 683 snprintf((char *)buffer, bufferSize, 684 "S%02x", type); 685 send(buffer); 686 continue; 687 688 case GDBRegR: 689 if (2 * gdbregs.bytes() > bufferSize) 690 panic("buffer too small"); 691 692 mem2hex(buffer, gdbregs.regs, gdbregs.bytes()); 693 send(buffer); 694 continue; 695 696 case GDBRegW: 697 p = hex2mem(gdbregs.regs, p, gdbregs.bytes()); 698 if (p == NULL || *p != '\0') 699 send("E01"); 700 else { 701 setregs(); 702 send("OK"); 703 } 704 continue; 705 706#if 0 707 case GDBSetReg: 708 val = hex2i(&p); 709 if (*p++ != '=') { 710 send("E01"); 711 continue; 712 } 713 if (val < 0 && val >= KGDB_NUMREGS) { 714 send("E01"); 715 continue; 716 } 717 718 gdbregs.regs[val] = hex2i(&p); 719 setregs(); 720 send("OK"); 721 722 continue; 723#endif 724 725 case GDBMemR: 726 val = hex2i(&p); 727 if (*p++ != ',') { 728 send("E02"); 729 continue; 730 } 731 len = hex2i(&p); 732 if (*p != '\0') { 733 send("E03"); 734 continue; 735 } 736 if (len > bufferSize) { 737 send("E04"); 738 continue; 739 } 740 if (!acc(val, len)) { 741 send("E05"); 742 continue; 743 } 744 745 if (read(val, (size_t)len, (char *)buffer)) { 746 // variable length array would be nice, but C++ doesn't 747 // officially support those... 748 char *temp = new char[2*len+1]; 749 mem2hex(temp, buffer, len); 750 send(temp); 751 delete [] temp; 752 } else { 753 send("E05"); 754 } 755 continue; 756 757 case GDBMemW: 758 val = hex2i(&p); 759 if (*p++ != ',') { 760 send("E06"); 761 continue; 762 } 763 len = hex2i(&p); 764 if (*p++ != ':') { 765 send("E07"); 766 continue; 767 } 768 if (len > datalen - (p - data)) { 769 send("E08"); 770 continue; 771 } 772 p = hex2mem(buffer, p, bufferSize); 773 if (p == NULL) { 774 send("E09"); 775 continue; 776 } 777 if (!acc(val, len)) { 778 send("E0A"); 779 continue; 780 } 781 if (write(val, (size_t)len, (char *)buffer)) 782 send("OK"); 783 else 784 send("E0B"); 785 continue; 786 787 case GDBSetThread: 788 subcmd = *p++; 789 val = hex2i(&p); 790 if (val == 0) 791 send("OK"); 792 else 793 send("E01"); 794 continue; 795 796 case GDBDetach: 797 case GDBKill: 798 active = false; 799 clearSingleStep(); 800 detach(); 801 goto out; 802 803 case GDBAsyncCont: 804 subcmd = hex2i(&p); 805 if (*p++ == ';') { 806 val = hex2i(&p); 807 context->pcState(val); 808 } 809 clearSingleStep(); 810 goto out; 811 812 case GDBCont: 813 if (p - data < (ptrdiff_t)datalen) { 814 val = hex2i(&p); 815 context->pcState(val); 816 } 817 clearSingleStep(); 818 goto out; 819 820 case GDBAsyncStep: 821 subcmd = hex2i(&p); 822 if (*p++ == ';') { 823 val = hex2i(&p); 824 context->pcState(val); 825 } 826 setSingleStep(); 827 goto out; 828 829 case GDBStep: 830 if (p - data < (ptrdiff_t)datalen) { 831 val = hex2i(&p); 832 context->pcState(val); 833 } 834 setSingleStep(); 835 goto out; 836 837 case GDBClrHwBkpt: 838 subcmd = *p++; 839 if (*p++ != ',') send("E0D"); 840 val = hex2i(&p); 841 if (*p++ != ',') send("E0D"); 842 len = hex2i(&p); 843 844 DPRINTF(GDBMisc, "clear %s, addr=%#x, len=%d\n", 845 break_type(subcmd), val, len); 846 847 ret = false; 848 849 switch (subcmd) { 850 case '0': // software breakpoint 851 ret = removeSoftBreak(val, len); 852 break; 853 854 case '1': // hardware breakpoint 855 ret = removeHardBreak(val, len); 856 break; 857 858 case '2': // write watchpoint 859 case '3': // read watchpoint 860 case '4': // access watchpoint 861 default: // unknown 862 send(""); 863 break; 864 } 865 866 send(ret ? "OK" : "E0C"); 867 continue; 868 869 case GDBSetHwBkpt: 870 subcmd = *p++; 871 if (*p++ != ',') send("E0D"); 872 val = hex2i(&p); 873 if (*p++ != ',') send("E0D"); 874 len = hex2i(&p); 875 876 DPRINTF(GDBMisc, "set %s, addr=%#x, len=%d\n", 877 break_type(subcmd), val, len); 878 879 ret = false; 880 881 switch (subcmd) { 882 case '0': // software breakpoint 883 ret = insertSoftBreak(val, len); 884 break; 885 886 case '1': // hardware breakpoint 887 ret = insertHardBreak(val, len); 888 break; 889 890 case '2': // write watchpoint 891 case '3': // read watchpoint 892 case '4': // access watchpoint 893 default: // unknown 894 send(""); 895 break; 896 } 897 898 send(ret ? "OK" : "E0C"); 899 continue; 900 901 case GDBQueryVar: 902 var = string(p, datalen - 1); 903 if (var == "C") 904 send("QC0"); 905 else 906 send(""); 907 continue; 908 909 case GDBSetBaud: 910 case GDBSetBreak: 911 case GDBDebug: 912 case GDBCycleStep: 913 case GDBSigCycleStep: 914 case GDBReadReg: 915 case GDBSetVar: 916 case GDBReset: 917 case GDBThreadAlive: 918 case GDBTargetExit: 919 case GDBBinaryDload: 920 // Unsupported command 921 DPRINTF(GDBMisc, "Unsupported command: %s\n", 922 gdb_command(command)); 923 DDUMP(GDBMisc, (uint8_t *)data, datalen); 924 send(""); 925 continue; 926 927 default: 928 // Unknown command. 929 DPRINTF(GDBMisc, "Unknown command: %c(%#x)\n", 930 command, command); 931 send(""); 932 continue; 933 934 935 } 936 } 937 938 out: 939 free(buffer); 940 return true; 941} 942 943// Convert a hex digit into an integer. 944// This returns -1 if the argument passed is no valid hex digit. 945int 946BaseRemoteGDB::digit2i(char c) 947{ 948 if (c >= '0' && c <= '9') 949 return (c - '0'); 950 else if (c >= 'a' && c <= 'f') 951 return (c - 'a' + 10); 952 else if (c >= 'A' && c <= 'F') 953 954 return (c - 'A' + 10); 955 else 956 return (-1); 957} 958 959// Convert the low 4 bits of an integer into an hex digit. 960char 961BaseRemoteGDB::i2digit(int n) 962{ 963 return ("0123456789abcdef"[n & 0x0f]); 964} 965 966// Convert a byte array into an hex string. 967void 968BaseRemoteGDB::mem2hex(void *vdst, const void *vsrc, int len) 969{ 970 char *dst = (char *)vdst; 971 const char *src = (const char *)vsrc; 972 973 while (len--) { 974 *dst++ = i2digit(*src >> 4); 975 *dst++ = i2digit(*src++); 976 } 977 *dst = '\0'; 978} 979 980// Convert an hex string into a byte array. 981// This returns a pointer to the character following the last valid 982// hex digit. If the string ends in the middle of a byte, NULL is 983// returned. 984const char * 985BaseRemoteGDB::hex2mem(void *vdst, const char *src, int maxlen) 986{ 987 char *dst = (char *)vdst; 988 int msb, lsb; 989 990 while (*src && maxlen--) { 991 msb = digit2i(*src++); 992 if (msb < 0) 993 return (src - 1); 994 lsb = digit2i(*src++); 995 if (lsb < 0) 996 return (NULL); 997 *dst++ = (msb << 4) | lsb; 998 } 999 return (src); 1000} 1001 1002// Convert an hex string into an integer. 1003// This returns a pointer to the character following the last valid 1004// hex digit. 1005Addr 1006BaseRemoteGDB::hex2i(const char **srcp) 1007{ 1008 const char *src = *srcp; 1009 Addr r = 0; 1010 int nibble; 1011 1012 while ((nibble = digit2i(*src)) >= 0) { 1013 r *= 16; 1014 r += nibble; 1015 src++; 1016 } 1017 *srcp = src; 1018 return (r); 1019} 1020 1021