debug.cc revision 5619:4b50a0d875da
15882Snate@binkert.org/*
25882Snate@binkert.org * Copyright (c) 2003-2005 The Regents of The University of Michigan
35882Snate@binkert.org * All rights reserved.
45882Snate@binkert.org *
55882Snate@binkert.org * Redistribution and use in source and binary forms, with or without
65882Snate@binkert.org * modification, are permitted provided that the following conditions are
75882Snate@binkert.org * met: redistributions of source code must retain the above copyright
85882Snate@binkert.org * notice, this list of conditions and the following disclaimer;
95882Snate@binkert.org * redistributions in binary form must reproduce the above copyright
105882Snate@binkert.org * notice, this list of conditions and the following disclaimer in the
115882Snate@binkert.org * documentation and/or other materials provided with the distribution;
125882Snate@binkert.org * neither the name of the copyright holders nor the names of its
135882Snate@binkert.org * contributors may be used to endorse or promote products derived from
145882Snate@binkert.org * this software without specific prior written permission.
155882Snate@binkert.org *
165882Snate@binkert.org * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
175882Snate@binkert.org * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
185882Snate@binkert.org * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
195882Snate@binkert.org * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
205882Snate@binkert.org * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
215882Snate@binkert.org * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
225882Snate@binkert.org * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
235882Snate@binkert.org * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
245882Snate@binkert.org * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
255882Snate@binkert.org * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
265882Snate@binkert.org * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
275882Snate@binkert.org *
285882Snate@binkert.org * Authors: Nathan Binkert
295882Snate@binkert.org *          Steve Reinhardt
305882Snate@binkert.org */
315882Snate@binkert.org
325882Snate@binkert.org#include <Python.h>
335882Snate@binkert.org#include <sys/types.h>
345882Snate@binkert.org#include <signal.h>
355882Snate@binkert.org#include <unistd.h>
365882Snate@binkert.org
375882Snate@binkert.org#include <string>
385882Snate@binkert.org#include <vector>
395882Snate@binkert.org
405882Snate@binkert.org#include "sim/debug.hh"
415882Snate@binkert.org#include "sim/eventq.hh"
425882Snate@binkert.org#include "sim/sim_events.hh"
435882Snate@binkert.org
445882Snate@binkert.orgusing namespace std;
455882Snate@binkert.org
46void
47debug_break()
48{
49#ifndef NDEBUG
50    kill(getpid(), SIGTRAP);
51#else
52    cprintf("debug_break suppressed, compiled with NDEBUG\n");
53#endif
54}
55
56//
57// Debug event: place a breakpoint on the process function and
58// schedule the event to break at a particular cycle
59//
60struct DebugBreakEvent : public Event
61{
62    DebugBreakEvent();
63    void process();     // process event
64    virtual const char *description() const;
65};
66
67//
68// constructor: schedule at specified time
69//
70DebugBreakEvent::DebugBreakEvent()
71    : Event(Debug_Break_Pri)
72{
73    setFlags(AutoDelete);
74}
75
76//
77// handle debug event: set debugger breakpoint on this function
78//
79void
80DebugBreakEvent::process()
81{
82    debug_break();
83}
84
85
86const char *
87DebugBreakEvent::description() const
88{
89    return "debug break";
90}
91
92//
93// handy function to schedule DebugBreakEvent on main event queue
94// (callable from debugger)
95//
96void
97schedBreakCycle(Tick when)
98{
99    mainEventQueue.schedule(new DebugBreakEvent, when);
100    warn("need to stop all queues");
101}
102
103void
104eventqDump()
105{
106    mainEventQueue.dump();
107    warn("need to dump all queues");
108}
109
110void
111py_interact()
112{
113    PyObject *globals;
114    PyObject *locals;
115
116    globals = PyEval_GetGlobals();
117    Py_INCREF(globals);
118    locals = PyDict_New();
119    PyRun_String("import code", Py_file_input, globals, locals);
120    PyRun_String("code.interact(local=globals())", Py_file_input,
121                 globals, locals);
122    Py_DECREF(globals);
123    Py_DECREF(locals);
124}
125
126int remote_gdb_base_port = 7000;
127
128int
129getRemoteGDBPort()
130{
131    return remote_gdb_base_port;
132}
133
134// Set remote GDB base port.  0 means disable remote GDB.
135// Callable from python.
136void
137setRemoteGDBPort(int port)
138{
139    remote_gdb_base_port = port;
140}
141
142