coregdbadapter.cpp 5.85 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33
/**************************************************************************
**
** This file is part of Qt Creator
**
** Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).
**
** Contact: Nokia Corporation (qt-info@nokia.com)
**
** Commercial Usage
**
** Licensees holding valid Qt Commercial licenses may use this file in
** accordance with the Qt Commercial License Agreement provided with the
** Software or, alternatively, in accordance with the terms contained in
** a written agreement between you and Nokia.
**
** GNU Lesser General Public License Usage
**
** Alternatively, this file may be used under the terms of the GNU Lesser
** General Public License version 2.1 as published by the Free Software
** Foundation and appearing in the file LICENSE.LGPL included in the
** packaging of this file.  Please review the following information to
** ensure the GNU Lesser General Public License version 2.1 requirements
** will be met: http://www.gnu.org/licenses/old-licenses/lgpl-2.1.html.
**
** If you are unsure which license is appropriate for your use, please
** contact the sales department at http://qt.nokia.com/contact.
**
**************************************************************************/

#include "coregdbadapter.h"

#include "debuggeractions.h"
#include "gdbengine.h"
34
#include "debuggerstringutils.h"
35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59

#include <utils/qtcassert.h>

#include <QtCore/QFileInfo>

namespace Debugger {
namespace Internal {

#define CB(callback) \
    static_cast<GdbEngine::AdapterCallback>(&CoreGdbAdapter::callback), \
    STRINGIFY(callback)

///////////////////////////////////////////////////////////////////////
//
// CoreGdbAdapter
//
///////////////////////////////////////////////////////////////////////

CoreGdbAdapter::CoreGdbAdapter(GdbEngine *engine, QObject *parent)
    : AbstractGdbAdapter(engine, parent)
{
}

void CoreGdbAdapter::startAdapter()
{
hjk's avatar
hjk committed
60
    QTC_ASSERT(state() == EngineStarting, qDebug() << state());
61 62 63
    setState(AdapterStarting);
    debugMessage(_("TRYING TO START ADAPTER"));

Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
64 65
    if (!m_engine->startGdb())
        return;
66 67 68 69 70 71

    emit adapterStarted();
}

void CoreGdbAdapter::startInferior()
{
hjk's avatar
hjk committed
72
    QTC_ASSERT(state() == InferiorStarting, qDebug() << state());
hjk's avatar
hjk committed
73 74 75 76 77 78 79 80 81 82 83 84 85 86 87
    QFileInfo fi(startParameters().coreFile);
    m_executable = startParameters().executable;
    if (m_executable.isEmpty()) {
        // Extra round trip to get executable name from core file.
        // This is sometimes not the full name, so it can't be used
        // as the generic solution.
        // Quoting core name below fails in gdb 6.8-debian.
        QString coreName = fi.absoluteFilePath();
        m_engine->postCommand(_("target core ") + coreName, CB(handleTargetCore1));
    } else {
        // Directly load symbols.
        QFileInfo fi(m_executable);
        m_engine->postCommand(_("-file-exec-and-symbols \"%1\"")
            .arg(fi.absoluteFilePath()), CB(handleFileExecAndSymbols));
    }
88 89
}

hjk's avatar
hjk committed
90
void CoreGdbAdapter::handleTargetCore1(const GdbResponse &response)
91 92 93
{
    QTC_ASSERT(state() == InferiorStarting, qDebug() << state());
    if (response.resultClass == GdbResultDone) {
hjk's avatar
hjk committed
94 95 96 97 98 99 100 101
        showStatusMessage(tr("Attached to core temporarily."));
        GdbMi console = response.data.findChild("consolestreamoutput");
        int pos1 = console.data().indexOf('`');
        int pos2 = console.data().indexOf('\'');
        if (pos1 == -1 || pos2 == -1) {
            emit inferiorStartFailed(tr("No binary found."));
        } else {
            m_executable = console.data().mid(pos1 + 1, pos2 - pos1 - 1);
102 103 104
            // Strip off command line arguments. FIXME: make robust.
            if (m_executable.contains(' '))
                m_executable = m_executable.section(' ', 0, 0);
hjk's avatar
hjk committed
105 106 107
            QTC_ASSERT(!m_executable.isEmpty(), /**/);
            // Finish extra round.
            m_engine->postCommand(_("detach"), CB(handleDetach1));
108
        }
hjk's avatar
hjk committed
109 110 111 112 113 114 115 116 117 118 119
    } else {
        const QByteArray msg = response.data.findChild("msg").data();
        emit inferiorStartFailed(msg);
    }
}

void CoreGdbAdapter::handleDetach1(const GdbResponse &response)
{
    QTC_ASSERT(state() == InferiorStarting, qDebug() << state());
    if (response.resultClass == GdbResultDone) {
        // Load symbols.
120 121 122
        QFileInfo fi(m_executable);
        m_engine->postCommand(_("-file-exec-and-symbols \"%1\"")
            .arg(fi.absoluteFilePath()), CB(handleFileExecAndSymbols));
123
    } else {
hjk's avatar
hjk committed
124
        const QByteArray msg = response.data.findChild("msg").data();
125 126 127 128
        emit inferiorStartFailed(msg);
    }
}

129 130 131 132 133
void CoreGdbAdapter::handleFileExecAndSymbols(const GdbResponse &response)
{
    QTC_ASSERT(state() == InferiorStarting, qDebug() << state());
    if (response.resultClass == GdbResultDone) {
        showStatusMessage(tr("Symbols found."));
hjk's avatar
hjk committed
134 135 136 137
        // Quoting core name below fails in gdb 6.8-debian.
        QFileInfo fi(startParameters().coreFile);
        QString coreName = fi.absoluteFilePath();
        m_engine->postCommand(_("target core ") + coreName, CB(handleTargetCore2));
138
    } else {
139 140 141 142 143 144 145 146
        QString msg = tr("Symbols not found in \"%1\" failed:\n%2")
            .arg(__(response.data.findChild("msg").data()));
        setState(InferiorUnrunnable);
        m_engine->updateAll();
       // emit inferiorStartFailed(msg);
    }
}

hjk's avatar
hjk committed
147 148 149 150 151 152 153
void CoreGdbAdapter::handleTargetCore2(const GdbResponse &response)
{
    QTC_ASSERT(state() == InferiorStarting, qDebug() << state());
    if (response.resultClass == GdbResultDone) {
        showStatusMessage(tr("Attached to core."));
        setState(InferiorUnrunnable);
        m_engine->updateAll();
154
    } else {
hjk's avatar
hjk committed
155 156 157 158 159 160 161
        QString msg = tr("Attach to core \"%1\" failed:\n%2")
            .arg(__(response.data.findChild("msg").data()));
        setState(InferiorUnrunnable);
        m_engine->updateAll();
       // emit inferiorStartFailed(msg);
    }
}
Oswald Buddenhagen's avatar
Oswald Buddenhagen committed
162

163 164 165 166 167 168 169 170
void CoreGdbAdapter::interruptInferior()
{
    // A core should never 'run'
    QTC_ASSERT(false, /**/);
}

} // namespace Internal
} // namespace Debugger