HCoop / clinton / Virtual-Jaguar-Rx.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Local browser window displays register name used for local variables
[clinton/Virtual-Jaguar-Rx.git] / src / debugger / localbrowser.cpp
CommitLineData
0203b5fd
JPM		 1//\r
2// localbrowser.cpp - Local variables\r
3//\r
4// by Jean-Paul Mari\r
5//\r
6// JPM = Jean-Paul Mari <djipi.mari@gmail.com>\r
7//\r
8// Who When What\r
9// --- ---------- -----------------------------------------------------------\r
10// JPM 11/03/2017 Created this file\r
11//\r
12\r
13\r
14#include "debugger/localbrowser.h"\r
15#include "memory.h"\r
16#include "debugger/DBGManager.h"\r
17#include "settings.h"\r
18#include "m68000/m68kinterface.h"\r
19\r
20\r
21// \r
22LocalBrowserWindow::LocalBrowserWindow(QWidget * parent/*= 0*/) : QWidget(parent, Qt::Dialog),\r
23 layout(new QVBoxLayout), text(new QTextBrowser),\r
24// layout(new QVBoxLayout), text(new QLabel),\r
25// refresh(new QPushButton(tr("Refresh"))),\r
26// address(new QLineEdit),\r
27// go(new QPushButton(tr("Go"))),\r
28// memBase(0),\r
29 NbLocal(0),\r
30 FuncName((char *)calloc(1, 1)),\r
31 LocalInfo(NULL)\r
32{\r
33 setWindowTitle(tr("Local"));\r
34\r
35// address->setInputMask("hhhhhh");\r
36// QHBoxLayout * hbox1 = new QHBoxLayout;\r
37// hbox1->addWidget(refresh);\r
38// hbox1->addWidget(address);\r
39// hbox1->addWidget(go);\r
40\r
41 // Need to set the size as well...\r
42// resize(560, 480);\r
43\r
44 QFont fixedFont("Lucida Console", 8, QFont::Normal);\r
45// QFont fixedFont("", 8, QFont::Normal);\r
46 fixedFont.setStyleHint(QFont::TypeWriter);\r
47 text->setFont(fixedFont);\r
48//// layout->setSizeConstraint(QLayout::SetFixedSize);\r
49 setLayout(layout);\r
50\r
51 layout->addWidget(text);\r
52// layout->addWidget(refresh);\r
53// layout->addLayout(hbox1);\r
54\r
55// connect(refresh, SIGNAL(clicked()), this, SLOT(RefreshContents()));\r
56// connect(go, SIGNAL(clicked()), this, SLOT(GoToAddress()));\r
57}\r
58\r
59\r
60//\r
61LocalBrowserWindow::~LocalBrowserWindow(void)\r
62{\r
63 free(LocalInfo);\r
64 free(FuncName);\r
65// NbLocal = 0;\r
66}\r
67\r
68\r
69//\r
70bool LocalBrowserWindow::UpdateInfos(void)\r
71{\r
72 size_t Adr;\r
73 char *Ptr;\r
74\r
75 if (NbLocal = DBGManager_GetNbLocalVariables(Adr = m68k_get_reg(NULL, M68K_REG_PC)))\r
76 {\r
77 if (Ptr = DBGManager_GetFunctionName(Adr))\r
78 {\r
79 if (strcmp(FuncName, Ptr))\r
80 {\r
81 FuncName = (char *)realloc(FuncName, strlen(Ptr) + 1);\r
82 strcpy(FuncName, Ptr);\r
83\r
84 LocalInfo = (WatchInfo *)realloc(LocalInfo, (sizeof(WatchInfo) * NbLocal));\r
85 for (size_t i = 0; i < NbLocal; i++)\r
86 {\r
87 if (LocalInfo[i].PtrVariableName = DBGManager_GetLocalVariableName(Adr, i + 1))\r
88 {\r
89 LocalInfo[i].Op = DBGManager_GetLocalVariableOp(Adr, i + 1);\r
90 LocalInfo[i].Adr = NULL;\r
e857856a 91 LocalInfo[i].PtrCPURegisterName = NULL;\r
0203b5fd
JPM		 92 LocalInfo[i].TypeTag = DBGManager_GetLocalVariableTypeTag(Adr, i + 1);\r
93 LocalInfo[i].PtrVariableBaseTypeName = DBGManager_GetLocalVariableTypeName(Adr, i + 1);\r
94 LocalInfo[i].TypeEncoding = DBGManager_GetLocalVariableTypeEncoding(Adr, i + 1);\r
95 LocalInfo[i].TypeByteSize = DBGManager_GetLocalVariableTypeByteSize(Adr, i + 1);\r
96 LocalInfo[i].Offset = DBGManager_GetLocalVariableOffset(Adr, i + 1);\r
97 }\r
98 }\r
99 }\r
100\r
101 return true;\r
102 }\r
103 }\r
104\r
105 *FuncName = 0;\r
106\r
107 return false;\r
108}\r
109\r
110\r
111//\r
112void LocalBrowserWindow::RefreshContents(void)\r
113{\r
114 char string[1024];\r
115// char buf[64];\r
116 QString Local;\r
117 char Value[100];\r
118 char *PtrValue;\r
119// size_t NbWatch, Adr;\r
120// WatchInfo PtrLocalInfo;\r
121\r
e857856a
JPM		 122 const char *CPURegName[] = { "D0", "D1", "D2", "D3", "D4", "D5", "D6", "D7", "A0", "A1", "A2", "A3", "A4", "A5", "A6", "A7" };\r
123\r
0203b5fd
JPM		 124 if (isVisible())\r
125 {\r
126 if (UpdateInfos())\r
127 {\r
128//#ifdef _MSC_VER\r
129 //#pragma message("Warning: !!! Need to check the memory desalocation for LocalInfo !!!")\r
130//#else\r
131 //#warning "!!! Need to do the memory desalocation for LocalInfo !!!"\r
132//#endif // _MSC_VER\r
133//#ifdef _MSC_VER\r
134 //#pragma message("Warning: !!! Need to check the memory desalocation for FuncName !!!")\r
135//#else\r
136 //#warning "!!! Need to do the memory desalocation for FuncName !!!"\r
137//#endif // _MSC_VER\r
138\r
139 for (size_t i = 0; i < NbLocal; i++)\r
140 {\r
141 if (LocalInfo[i].PtrVariableName)\r
142 {\r
143 if (((LocalInfo[i].Op >= DBG_OP_breg0) && (LocalInfo[i].Op <= DBG_OP_breg31)))\r
144 {\r
145 LocalInfo[i].Adr = m68k_get_reg(NULL, M68K_REG_A6) + LocalInfo[i].Offset;\r
146\r
147 if ((LocalInfo[i].Adr >= 0) && (LocalInfo[i].Adr < vjs.DRAM_size))\r
148 {\r
149 PtrValue = DBGManager_GetVariableValueFromAdr(LocalInfo[i].Adr, LocalInfo[i].TypeEncoding, LocalInfo[i].TypeByteSize);\r
150 }\r
151 else\r
152 {\r
153 PtrValue = NULL;\r
154 }\r
155 }\r
156 else\r
157 {\r
e857856a 158 // Value from CPU register\r
0203b5fd
JPM		 159 if ((LocalInfo[i].Op >= DBG_OP_reg0) && (LocalInfo[i].Op <= DBG_OP_reg31))\r
160 {\r
e857856a 161 LocalInfo[i].PtrCPURegisterName = (char *)CPURegName[(LocalInfo[i].Op - DBG_OP_reg0)];\r
0203b5fd
JPM		 162 PtrValue = itoa(m68k_get_reg(NULL, (m68k_register_t)((size_t)M68K_REG_D0 + (LocalInfo[i].Op - DBG_OP_reg0))), Value, 10);\r
163 }\r
164 else\r
165 {\r
166 PtrValue = NULL;\r
167 }\r
168 }\r
169\r
170 sprintf(string, "%i : %s | %s | ", (i + 1), (LocalInfo[i].PtrVariableBaseTypeName ? LocalInfo[i].PtrVariableBaseTypeName : (char *)"<font color='#ff0000'>N/A</font>"), LocalInfo[i].PtrVariableName);\r
171 Local += QString(string);\r
172 if ((unsigned int)LocalInfo[i].Adr)\r
173 {\r
174 sprintf(string, "0x%06X", (unsigned int)LocalInfo[i].Adr);\r
175 }\r
176 else\r
177 {\r
e857856a
JPM		 178 if (LocalInfo[i].PtrCPURegisterName)\r
179 {\r
180 sprintf(string, "<font color='#0000FF'>%s</font>", LocalInfo[i].PtrCPURegisterName);\r
181 }\r
182 else\r
183 {\r
184 sprintf(string, "%s", (char *)"<font color='#ff0000'>N/A</font>");\r
185 } \r
0203b5fd
JPM		 186 }\r
187 Local += QString(string);\r
188 sprintf(string, " | %s", (!PtrValue ? (char *)"<font color='#ff0000'>N/A</font>" : PtrValue));\r
189 Local += QString(string);\r
190 sprintf(string, "<br>");\r
191 Local += QString(string);\r
192 }\r
193 }\r
194\r
195 text->clear();\r
196 text->setText(Local);\r
197 }\r
198 else\r
199 {\r
200 text->clear();\r
201 }\r
202 }\r
203}\r
204\r
205\r
206#if 0\r
207void LocalBrowserWindow::keyPressEvent(QKeyEvent * e)\r
208{\r
209 if (e->key() == Qt::Key_Escape)\r
210 hide();\r
211 else if (e->key() == Qt::Key_PageUp)\r
212 {\r
213 memBase -= 480;\r
214\r
215 if (memBase < 0)\r
216 memBase = 0;\r
217\r
218 RefreshContents();\r
219 }\r
220 else if (e->key() == Qt::Key_PageDown)\r
221 {\r
222 memBase += 480;\r
223\r
224 if (memBase > (0x200000 - 480))\r
225 memBase = 0x200000 - 480;\r
226\r
227 RefreshContents();\r
228 }\r
229 else if (e->key() == Qt::Key_Up || e->key() == Qt::Key_Minus)\r
230 {\r
231 memBase -= 16;\r
232\r
233 if (memBase < 0)\r
234 memBase = 0;\r
235\r
236 RefreshContents();\r
237 }\r
238 else if (e->key() == Qt::Key_Down || e->key() == Qt::Key_Equal)\r
239 {\r
240 memBase += 16;\r
241\r
242 if (memBase > (0x200000 - 480))\r
243 memBase = 0x200000 - 480;\r
244\r
245 RefreshContents();\r
246 }\r
247}\r
248#endif\r
249\r
250\r
251#if 0\r
252void LocalBrowserWindow::GoToAddress(void)\r
253{\r
254 bool ok;\r
255 QString newAddress = address->text();\r
256 memBase = newAddress.toUInt(&ok, 16);\r
257 RefreshContents();\r
258}\r
259#endif\r
260\r
Unnamed repository; edit this file 'description' to name the repository.