You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
470 lines
12 KiB
470 lines
12 KiB
/* This file is part of KCachegrind.
|
|
Copyright (C) 2003 Josef Weidendorfer <Josef.Weidendorfer@gmx.de>
|
|
|
|
KCachegrind is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public
|
|
License as published by the Free Software Foundation, version 2.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; see the file COPYING. If not, write to
|
|
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
|
Boston, MA 02110-1301, USA.
|
|
*/
|
|
|
|
/*
|
|
* Items of instruction view.
|
|
*/
|
|
|
|
#include <tqpixmap.h>
|
|
#include <tqpainter.h>
|
|
|
|
#include <tdelocale.h>
|
|
#include <tdeapplication.h>
|
|
#include <kiconloader.h>
|
|
#include <kdebug.h>
|
|
|
|
#include "configuration.h"
|
|
#include "listutils.h"
|
|
#include "instritem.h"
|
|
#include "instrview.h"
|
|
|
|
|
|
// InstrItem
|
|
|
|
// for messages
|
|
InstrItem::InstrItem(InstrView* iv, TQListView* parent,
|
|
Addr addr, const TQString& msg)
|
|
: TQListViewItem(parent)
|
|
{
|
|
_view = iv;
|
|
_addr = addr;
|
|
_instr = 0;
|
|
_instrCall = 0;
|
|
_instrJump = 0;
|
|
_inside = false;
|
|
|
|
setText(0, addr.pretty());
|
|
setText(6, msg);
|
|
|
|
updateGroup();
|
|
updateCost();
|
|
}
|
|
|
|
// for code lines
|
|
InstrItem::InstrItem(InstrView* iv, TQListView* parent,
|
|
Addr addr, bool inside,
|
|
const TQString& code, const TQString& cmd,
|
|
const TQString& args, TraceInstr* instr)
|
|
: TQListViewItem(parent)
|
|
{
|
|
_view = iv;
|
|
_addr = addr;
|
|
_instr = instr;
|
|
_instrCall = 0;
|
|
_instrJump = 0;
|
|
_inside = inside;
|
|
|
|
if (args == "...")
|
|
setText(0, args);
|
|
else
|
|
setText(0, addr.pretty());
|
|
setText(4, code);
|
|
setText(5, cmd);
|
|
setText(6, args);
|
|
|
|
TraceLine* l;
|
|
if (instr && (l = instr->line()))
|
|
setText(7, l->name());
|
|
|
|
updateGroup();
|
|
updateCost();
|
|
}
|
|
|
|
// for call lines
|
|
InstrItem::InstrItem(InstrView* iv, TQListViewItem* parent, Addr addr,
|
|
TraceInstr* instr, TraceInstrCall* instrCall)
|
|
: TQListViewItem(parent)
|
|
{
|
|
_view = iv;
|
|
_addr = addr;
|
|
_instr = instr;
|
|
_instrCall = instrCall;
|
|
_instrJump = 0;
|
|
_inside = true;
|
|
|
|
//tqDebug("InstrItem: (file %d, line %d) Linecall to %s",
|
|
// fileno, lineno, _lineCall->call()->called()->prettyName().ascii());
|
|
|
|
SubCost cc = _instrCall->callCount();
|
|
TQString templ = " ";
|
|
if (cc==0)
|
|
templ += i18n("Active call to '%1'");
|
|
else
|
|
templ += i18n("%n call to '%1'", "%n calls to '%1'", cc);
|
|
|
|
TQString callStr = templ.arg(_instrCall->call()->calledName());
|
|
TraceFunction* calledF = _instrCall->call()->called();
|
|
calledF->addPrettyLocation(callStr);
|
|
|
|
setText(6, callStr);
|
|
|
|
updateGroup();
|
|
updateCost();
|
|
}
|
|
|
|
// for jump lines
|
|
InstrItem::InstrItem(InstrView* iv, TQListViewItem* parent, Addr addr,
|
|
TraceInstr* instr, TraceInstrJump* instrJump)
|
|
: TQListViewItem(parent)
|
|
{
|
|
_view = iv;
|
|
_addr = addr;
|
|
_inside = true;
|
|
_instr = instr;
|
|
_instrCall = 0;
|
|
_instrJump = instrJump;
|
|
|
|
//tqDebug("SourceItem: (file %d, line %d) Linecall to %s",
|
|
// fileno, lineno, _lineCall->call()->called()->prettyName().ascii());
|
|
|
|
TQString jStr;
|
|
if (_instrJump->isCondJump())
|
|
jStr = i18n("Jump %1 of %2 times to 0x%3")
|
|
.arg(_instrJump->followedCount().pretty())
|
|
.arg(_instrJump->executedCount().pretty())
|
|
.arg(_instrJump->instrTo()->addr().toString());
|
|
else
|
|
jStr = i18n("Jump %1 times to 0x%2")
|
|
.arg(_instrJump->executedCount().pretty())
|
|
.arg(_instrJump->instrTo()->addr().toString());
|
|
|
|
setText(6, jStr);
|
|
|
|
updateGroup();
|
|
updateCost();
|
|
}
|
|
|
|
|
|
void InstrItem::updateGroup()
|
|
{
|
|
if (!_instrCall) return;
|
|
|
|
TraceFunction* f = _instrCall->call()->called();
|
|
TQColor c = Configuration::functionColor(_view->groupType(), f);
|
|
setPixmap(6, colorPixmap(10, 10, c));
|
|
}
|
|
|
|
void InstrItem::updateCost()
|
|
{
|
|
_pure = SubCost(0);
|
|
_pure2 = SubCost(0);
|
|
|
|
if (!_instr) return;
|
|
if (_instrJump) return;
|
|
|
|
TraceCost* instrCost = _instrCall ?
|
|
(TraceCost*)_instrCall : (TraceCost*)_instr;
|
|
|
|
// don't show any cost inside of cycles
|
|
if (_instrCall &&
|
|
((_instrCall->call()->inCycle()>0) ||
|
|
(_instrCall->call()->isRecursion()>0))) {
|
|
TQString str;
|
|
TQPixmap p;
|
|
|
|
TQString icon = "edit-undo";
|
|
TDEIconLoader* loader = TDEApplication::kApplication()->iconLoader();
|
|
p= loader->loadIcon(icon, TDEIcon::Small, 0,
|
|
TDEIcon::DefaultState, 0, true);
|
|
if (p.isNull())
|
|
str = i18n("(cycle)");
|
|
|
|
setText(1, str);
|
|
setPixmap(1, p);
|
|
setText(2, str);
|
|
setPixmap(2, p);
|
|
return;
|
|
}
|
|
|
|
TraceCost* totalCost;
|
|
if (Configuration::showExpanded())
|
|
totalCost = _instr->function()->inclusive();
|
|
else
|
|
totalCost = _instr->function()->data();
|
|
|
|
TraceCostType *ct = _view->costType();
|
|
_pure = ct ? instrCost->subCost(ct) : SubCost(0);
|
|
if (_pure == 0) {
|
|
setText(1, TQString());
|
|
setPixmap(1, TQPixmap());
|
|
}
|
|
else {
|
|
double total = totalCost->subCost(ct);
|
|
double pure = 100.0 * _pure / total;
|
|
|
|
if (Configuration::showPercentage())
|
|
setText(1, TQString("%1")
|
|
.arg(pure, 0, 'f', Configuration::percentPrecision()));
|
|
else
|
|
setText(1, _pure.pretty());
|
|
|
|
setPixmap(1, costPixmap(ct, instrCost, total, false));
|
|
}
|
|
|
|
TraceCostType *ct2 = _view->costType2();
|
|
_pure2 = ct2 ? instrCost->subCost(ct2) : SubCost(0);
|
|
if (_pure2 == 0) {
|
|
setText(2, TQString());
|
|
setPixmap(2, TQPixmap());
|
|
}
|
|
else {
|
|
double total = totalCost->subCost(ct2);
|
|
double pure = 100.0 * _pure2 / total;
|
|
|
|
if (Configuration::showPercentage())
|
|
setText(2, TQString("%1")
|
|
.arg(pure, 0, 'f', Configuration::percentPrecision()));
|
|
else
|
|
setText(2, _pure2.pretty());
|
|
|
|
setPixmap(2, costPixmap(ct2, instrCost, total, false));
|
|
}
|
|
}
|
|
|
|
|
|
int InstrItem::compare(TQListViewItem * i, int col, bool ascending ) const
|
|
{
|
|
const InstrItem* ii1 = this;
|
|
const InstrItem* ii2 = (InstrItem*) i;
|
|
|
|
// we always want descending order
|
|
if (((col>0) && ascending) ||
|
|
((col==0) && !ascending) ) {
|
|
ii1 = ii2;
|
|
ii2 = this;
|
|
}
|
|
|
|
if (col==1) {
|
|
if (ii1->_pure < ii2->_pure) return -1;
|
|
if (ii1->_pure > ii2->_pure) return 1;
|
|
return 0;
|
|
}
|
|
if (col==2) {
|
|
if (ii1->_pure2 < ii2->_pure2) return -1;
|
|
if (ii1->_pure2 > ii2->_pure2) return 1;
|
|
return 0;
|
|
}
|
|
if (col==0) {
|
|
if (ii1->_addr < ii2->_addr) return -1;
|
|
if (ii1->_addr > ii2->_addr) return 1;
|
|
|
|
// Same address: code gets above calls/jumps
|
|
if (!ii1->_instrCall && !ii1->_instrJump) return -1;
|
|
if (!ii2->_instrCall && !ii2->_instrJump) return 1;
|
|
|
|
// calls above jumps
|
|
if (ii1->_instrCall && !ii2->_instrCall) return -1;
|
|
if (ii2->_instrCall && !ii1->_instrCall) return 1;
|
|
|
|
if (ii1->_instrCall && ii2->_instrCall) {
|
|
// Two calls: desending sort according costs
|
|
if (ii1->_pure < ii2->_pure) return 1;
|
|
if (ii1->_pure > ii2->_pure) return -1;
|
|
|
|
// Two calls: sort according function names
|
|
TraceFunction* f1 = ii1->_instrCall->call()->called();
|
|
TraceFunction* f2 = ii2->_instrCall->call()->called();
|
|
if (f1->prettyName() > f2->prettyName()) return 1;
|
|
return -1;
|
|
}
|
|
|
|
// Two jumps: descending sort according target address
|
|
if (ii1->_instrJump->instrTo()->addr() <
|
|
ii2->_instrJump->instrTo()->addr())
|
|
return -1;
|
|
if (ii1->_instrJump->instrTo()->addr() >
|
|
ii2->_instrJump->instrTo()->addr())
|
|
return 1;
|
|
return 0;
|
|
|
|
}
|
|
return TQListViewItem::compare(i, col, ascending);
|
|
}
|
|
|
|
void InstrItem::paintCell( TQPainter *p, const TQColorGroup &cg,
|
|
int column, int width, int alignment )
|
|
{
|
|
TQColorGroup _cg( cg );
|
|
|
|
if ( !_inside || ((column==1) || column==2))
|
|
_cg.setColor( TQColorGroup::Base, cg.button() );
|
|
else if ((_instrCall || _instrJump) && column>2)
|
|
_cg.setColor( TQColorGroup::Base, cg.midlight() );
|
|
|
|
if (column == 3)
|
|
paintArrows(p, _cg, width);
|
|
else
|
|
TQListViewItem::paintCell( p, _cg, column, width, alignment );
|
|
}
|
|
|
|
void InstrItem::setJumpArray(const TQMemArray<TraceInstrJump*>& a)
|
|
{
|
|
_jump.duplicate(a);
|
|
}
|
|
|
|
void InstrItem::paintArrows(TQPainter *p, const TQColorGroup &cg, int width)
|
|
{
|
|
TQListView *lv = listView();
|
|
if ( !lv ) return;
|
|
InstrView* iv = (InstrView*) lv;
|
|
|
|
const BackgroundMode bgmode = lv->viewport()->backgroundMode();
|
|
const TQColorGroup::ColorRole crole
|
|
= TQPalette::backgroundRoleFromMode( bgmode );
|
|
if ( cg.brush( crole ) != lv->colorGroup().brush( crole ) )
|
|
p->fillRect( 0, 0, width, height(), cg.brush( crole ) );
|
|
else
|
|
iv->paintEmptyArea( p, TQRect( 0, 0, width, height() ) );
|
|
|
|
if ( isSelected() && lv->allColumnsShowFocus() )
|
|
p->fillRect( 0, 0, width, height(), cg.brush( TQColorGroup::Highlight ) );
|
|
|
|
int marg = lv->itemMargin();
|
|
int yy = height()/2, y1, y2;
|
|
TQColor c;
|
|
|
|
int start = -1, end = -1;
|
|
|
|
// draw line borders, detect start/stop of a line
|
|
for(int i=0;i< (int)_jump.size();i++) {
|
|
if (_jump[i] == 0) continue;
|
|
|
|
y1 = 0;
|
|
y2 = height();
|
|
if ((_instrJump == _jump[i]) &&
|
|
(_jump[i]->instrFrom()->addr() == _addr)) {
|
|
|
|
//kdDebug() << "InstrItem " << _addr.toString() << ": start " << i << endl;
|
|
if (start<0) start = i;
|
|
if (_jump[i]->instrTo()->addr() <= _addr)
|
|
y2 = yy;
|
|
else
|
|
y1 = yy;
|
|
}
|
|
else if (!_instrJump && !_instrCall &&
|
|
(_jump[i]->instrTo()->addr() == _addr)) {
|
|
|
|
//kdDebug() << "InstrItem " << _addr.toString() << ": end " << i << endl;
|
|
if (end<0) end = i;
|
|
if (_jump[i]->instrFrom()->addr() < _addr)
|
|
y2 = yy;
|
|
else
|
|
y1 = yy;
|
|
}
|
|
|
|
c = _jump[i]->isCondJump() ? red : blue;
|
|
#if 0
|
|
if (_jump[i] == ((TraceItemView*)_view)->selectedItem()) {
|
|
p->fillRect( marg + 6*i-2, (y1==0) ? y1: y1-2,
|
|
8, (y2-y1==height())? y2:y2+2,
|
|
cg.brush( TQColorGroup::Highlight ) );
|
|
c = lv->colorGroup().highlightedText();
|
|
}
|
|
#endif
|
|
p->fillRect( marg + 6*i, y1, 4, y2, c);
|
|
p->setPen(c.light());
|
|
p->drawLine( marg + 6*i, y1, marg + 6*i, y2);
|
|
p->setPen(c.dark());
|
|
p->drawLine( marg + 6*i +3, y1, marg + 6*i +3, y2);
|
|
}
|
|
|
|
// draw start/stop horizontal line
|
|
int x, y = yy-2, w, h = 4;
|
|
if (start >= 0) {
|
|
#if 0
|
|
if (_jump[start] == ((TraceItemView*)_view)->selectedItem()) {
|
|
c = lv->colorGroup().highlightedText();
|
|
}
|
|
#endif
|
|
c = _jump[start]->isCondJump() ? red : blue;
|
|
x = marg + 6*start;
|
|
w = 6*(iv->arrowLevels() - start) + 10;
|
|
p->fillRect( x, y, w, h, c);
|
|
p->setPen(c.light());
|
|
p->drawLine(x, y, x+w-1, y);
|
|
p->drawLine(x, y, x, y+h-1);
|
|
p->setPen(c.dark());
|
|
p->drawLine(x+w-1, y, x+w-1, y+h-1);
|
|
p->drawLine(x+1, y+h-1, x+w-1, y+h-1);
|
|
}
|
|
if (end >= 0) {
|
|
c = _jump[end]->isCondJump() ? red : blue;
|
|
x = marg + 6*end;
|
|
w = 6*(iv->arrowLevels() - end) + 10;
|
|
|
|
TQPointArray a;
|
|
a.putPoints(0, 7, x, y+h,
|
|
x,y, x+w-8, y, x+w-8, y-2,
|
|
x+w, yy,
|
|
x+w-8, y+h+2, x+w-8, y+h);
|
|
p->setBrush(c);
|
|
p->drawConvexPolygon(a);
|
|
|
|
p->setPen(c.light());
|
|
p->drawPolyline(a, 0, 5);
|
|
p->setPen(c.dark());
|
|
p->drawPolyline(a, 4, 2);
|
|
p->setPen(c.light());
|
|
p->drawPolyline(a, 5, 2);
|
|
p->setPen(c.dark());
|
|
p->drawPolyline(a, 6, 2);
|
|
}
|
|
|
|
// draw inner vertical line for start/stop
|
|
// this overwrites borders of horizontal line
|
|
for(int i=0;i< (int)_jump.size();i++) {
|
|
if (_jump[i] == 0) continue;
|
|
|
|
c = _jump[i]->isCondJump() ? red : blue;
|
|
|
|
if (_jump[i]->instrFrom()->addr() == _addr) {
|
|
bool drawUp = true;
|
|
if (_jump[i]->instrTo()->addr() == _addr)
|
|
if (start<0) drawUp=false;
|
|
if (_jump[i]->instrTo()->addr() > _addr) drawUp=false;
|
|
if (drawUp)
|
|
p->fillRect( marg + 6*i +1, 0, 2, yy, c);
|
|
else
|
|
p->fillRect( marg + 6*i +1, yy, 2, height()-yy, c);
|
|
}
|
|
else if (_jump[i]->instrTo()->addr() == _addr) {
|
|
if (end<0) end = i;
|
|
if (_jump[i]->instrFrom()->addr() < _addr)
|
|
p->fillRect( marg + 6*i +1, 0, 2, yy, c);
|
|
else
|
|
p->fillRect( marg + 6*i +1, yy, 2, height()-yy, c);
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
int InstrItem::width( const TQFontMetrics& fm,
|
|
const TQListView* lv, int c ) const
|
|
{
|
|
if (c != 3) return TQListViewItem::width(fm, lv, c);
|
|
|
|
InstrView* iv = (InstrView*) lv;
|
|
int levels = iv->arrowLevels();
|
|
|
|
if (levels == 0) return 0;
|
|
|
|
// 10 pixels for the arrow
|
|
return 10 + 6*levels + lv->itemMargin() * 2;
|
|
}
|
|
|