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
34
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
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
/*
* RTFL
*
* Copyright 2014, 2015 Sebastian Geerken <sgeerken@dillo.org>
*
* This program 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; either version 3 of the License, or
* (at your option) any later version; with the following exception:
*
* The copyright holders of RTFL give you permission to link this file
* statically or dynamically against all versions of the graphviz
* library, which are published by AT&T Corp. under one of the following
* licenses:
*
* - Common Public License version 1.0 as published by International
* Business Machines Corporation (IBM), or
* - Eclipse Public License version 1.0 as published by the Eclipse
* Foundation.
*
* 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. If not, see <http://www.gnu.org/licenses/>.
*/
#include "objview_stacktrace.hh"
#include "config.h"
#include <FL/Fl_Button.H>
#include <FL/Fl_Return_Button.H>
namespace rtfl {
namespace objects {
ObjViewStacktraceWindow::ObjViewStacktraceWindow (ObjViewFunction *topFunction,
ObjViewListener *listener) :
Fl_Window (WIDTH, HEIGHT, "RTFL: Stack trace")
{
callback(windowCallback, this);
browser =
new Fl_Hold_Browser (SPACE, SPACE, WIDTH - 2 * SPACE,
HEIGHT - 3 * SPACE - BUTTON_HEIGHT, NULL);
Fl_Button *jumpTo =
new Fl_Button(WIDTH - 2 * BUTTON_WIDTH - 2 * SPACE,
HEIGHT - BUTTON_HEIGHT - SPACE, BUTTON_WIDTH,
BUTTON_HEIGHT, "Jump to");
jumpTo->callback (ObjViewStacktraceWindow::jumpTo, this);
Fl_Return_Button *close =
new Fl_Return_Button(WIDTH - BUTTON_WIDTH - SPACE,
HEIGHT - BUTTON_HEIGHT - SPACE, BUTTON_WIDTH,
BUTTON_HEIGHT, "Close");
close->callback (ObjViewStacktraceWindow::close, this);
resizable (browser);
this->topFunction = topFunction;
this->listener = listener;
}
ObjViewStacktraceWindow::~ObjViewStacktraceWindow ()
{
}
void ObjViewStacktraceWindow::update ()
{
browser->clear ();
for (ObjViewFunction *fun = topFunction; fun;
fun = fun->getParent ()) {
char *name = fun->createName ();
char name2[1024];
name2[0] = 0;
if (!fun->isSelectable ()) {
strcpy (name2, "@i");
}
sprintf (name2 + strlen (name2), "@B%ld@.",
((long)fun->getColor ()) << 8);
char *s = name2 + strlen (name2);
for (int i = 0; name[i]; i++) {
if (name[i] == '@')
*(s++) = '@';
*(s++) = name[i];
}
*s = 0;
browser->add (name2, NULL);
fun->freeName (name);
}
}
void ObjViewStacktraceWindow::windowCallback (Fl_Widget *widget, void *data)
{
close (widget, data);
}
void ObjViewStacktraceWindow::jumpTo (Fl_Widget *widget, void *data)
{
ObjViewStacktraceWindow *win = (ObjViewStacktraceWindow*)data;
ObjViewFunction *fun = win->topFunction;
for (int i = 1; fun; fun = fun->getParent (), i++) {
if (win->browser->selected (i) && fun->isSelectable ())
fun->select ();
}
}
void ObjViewStacktraceWindow::close (Fl_Widget *widget, void *data)
{
ObjViewStacktraceWindow *win = (ObjViewStacktraceWindow*)data;
win->listener->close (win);
}
} // namespace objects
} // namespace rtfl
|
