HCoop / clinton / Virtual-Jaguar-Rx.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
ROM cartridge writing detection
[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
169c1409 87 // Get local variable name and his information\r
0203b5fd
JPM		 88 if (LocalInfo[i].PtrVariableName = DBGManager_GetLocalVariableName(Adr, i + 1))\r
89 {\r
90 LocalInfo[i].Op = DBGManager_GetLocalVariableOp(Adr, i + 1);\r
91 LocalInfo[i].Adr = NULL;\r
e857856a 92 LocalInfo[i].PtrCPURegisterName = NULL;\r
0203b5fd
JPM		 93 LocalInfo[i].TypeTag = DBGManager_GetLocalVariableTypeTag(Adr, i + 1);\r
94 LocalInfo[i].PtrVariableBaseTypeName = DBGManager_GetLocalVariableTypeName(Adr, i + 1);\r
95 LocalInfo[i].TypeEncoding = DBGManager_GetLocalVariableTypeEncoding(Adr, i + 1);\r
96 LocalInfo[i].TypeByteSize = DBGManager_GetLocalVariableTypeByteSize(Adr, i + 1);\r
97 LocalInfo[i].Offset = DBGManager_GetLocalVariableOffset(Adr, i + 1);\r
98 }\r
99 }\r
100 }\r
101\r
102 return true;\r
103 }\r
104 }\r
105\r
106 *FuncName = 0;\r
107\r
108 return false;\r
109}\r
110\r
111\r
112//\r
113void LocalBrowserWindow::RefreshContents(void)\r
114{\r
115 char string[1024];\r
116// char buf[64];\r
117 QString Local;\r
118 char Value[100];\r
119 char *PtrValue;\r
120// size_t NbWatch, Adr;\r
121// WatchInfo PtrLocalInfo;\r
122\r
e857856a
JPM		 123 const char *CPURegName[] = { "D0", "D1", "D2", "D3", "D4", "D5", "D6", "D7", "A0", "A1", "A2", "A3", "A4", "A5", "A6", "A7" };\r
124\r
0203b5fd
JPM		 125 if (isVisible())\r
126 {\r
127 if (UpdateInfos())\r
128 {\r
129//#ifdef _MSC_VER\r
130 //#pragma message("Warning: !!! Need to check the memory desalocation for LocalInfo !!!")\r
131//#else\r
132 //#warning "!!! Need to do the memory desalocation for LocalInfo !!!"\r
133//#endif // _MSC_VER\r
134//#ifdef _MSC_VER\r
135 //#pragma message("Warning: !!! Need to check the memory desalocation for FuncName !!!")\r
136//#else\r
137 //#warning "!!! Need to do the memory desalocation for FuncName !!!"\r
138//#endif // _MSC_VER\r
139\r
140 for (size_t i = 0; i < NbLocal; i++)\r
141 {\r
142 if (LocalInfo[i].PtrVariableName)\r
143 {\r
169c1409
JPM		 144 // Local or parameters variables\r
145 if (((LocalInfo[i].Op >= DBG_OP_breg0) && (LocalInfo[i].Op <= DBG_OP_breg31)) || (LocalInfo[i].Op == DBG_OP_fbreg))\r
0203b5fd
JPM		 146 {\r
147 LocalInfo[i].Adr = m68k_get_reg(NULL, M68K_REG_A6) + LocalInfo[i].Offset;\r
148\r
169c1409
JPM		 149 if ((LocalInfo[i].Op == DBG_OP_fbreg))\r
150 {\r
151 LocalInfo[i].Adr += 8;\r
152 }\r
153\r
0203b5fd
JPM		 154 if ((LocalInfo[i].Adr >= 0) && (LocalInfo[i].Adr < vjs.DRAM_size))\r
155 {\r
156 PtrValue = DBGManager_GetVariableValueFromAdr(LocalInfo[i].Adr, LocalInfo[i].TypeEncoding, LocalInfo[i].TypeByteSize);\r
157 }\r
158 else\r
159 {\r
160 PtrValue = NULL;\r
161 }\r
162 }\r
163 else\r
164 {\r
e857856a 165 // Value from CPU register\r
0203b5fd
JPM		 166 if ((LocalInfo[i].Op >= DBG_OP_reg0) && (LocalInfo[i].Op <= DBG_OP_reg31))\r
167 {\r
e857856a 168 LocalInfo[i].PtrCPURegisterName = (char *)CPURegName[(LocalInfo[i].Op - DBG_OP_reg0)];\r
0203b5fd
JPM		 169 PtrValue = itoa(m68k_get_reg(NULL, (m68k_register_t)((size_t)M68K_REG_D0 + (LocalInfo[i].Op - DBG_OP_reg0))), Value, 10);\r
170 }\r
171 else\r
172 {\r
173 PtrValue = NULL;\r
174 }\r
175 }\r
176\r
177 sprintf(string, "%i : %s | %s | ", (i + 1), (LocalInfo[i].PtrVariableBaseTypeName ? LocalInfo[i].PtrVariableBaseTypeName : (char *)"<font color='#ff0000'>N/A</font>"), LocalInfo[i].PtrVariableName);\r
178 Local += QString(string);\r
179 if ((unsigned int)LocalInfo[i].Adr)\r
180 {\r
181 sprintf(string, "0x%06X", (unsigned int)LocalInfo[i].Adr);\r
182 }\r
183 else\r
184 {\r
e857856a
JPM		 185 if (LocalInfo[i].PtrCPURegisterName)\r
186 {\r
187 sprintf(string, "<font color='#0000FF'>%s</font>", LocalInfo[i].PtrCPURegisterName);\r
188 }\r
189 else\r
190 {\r
191 sprintf(string, "%s", (char *)"<font color='#ff0000'>N/A</font>");\r
192 } \r
0203b5fd
JPM		 193 }\r
194 Local += QString(string);\r
195 sprintf(string, " | %s", (!PtrValue ? (char *)"<font color='#ff0000'>N/A</font>" : PtrValue));\r
196 Local += QString(string);\r
197 sprintf(string, "<br>");\r
198 Local += QString(string);\r
199 }\r
200 }\r
201\r
202 text->clear();\r
203 text->setText(Local);\r
204 }\r
205 else\r
206 {\r
207 text->clear();\r
208 }\r
209 }\r
210}\r
211\r
212\r
213#if 0\r
214void LocalBrowserWindow::keyPressEvent(QKeyEvent * e)\r
215{\r
216 if (e->key() == Qt::Key_Escape)\r
217 hide();\r
218 else if (e->key() == Qt::Key_PageUp)\r
219 {\r
220 memBase -= 480;\r
221\r
222 if (memBase < 0)\r
223 memBase = 0;\r
224\r
225 RefreshContents();\r
226 }\r
227 else if (e->key() == Qt::Key_PageDown)\r
228 {\r
229 memBase += 480;\r
230\r
231 if (memBase > (0x200000 - 480))\r
232 memBase = 0x200000 - 480;\r
233\r
234 RefreshContents();\r
235 }\r
236 else if (e->key() == Qt::Key_Up || e->key() == Qt::Key_Minus)\r
237 {\r
238 memBase -= 16;\r
239\r
240 if (memBase < 0)\r
241 memBase = 0;\r
242\r
243 RefreshContents();\r
244 }\r
245 else if (e->key() == Qt::Key_Down || e->key() == Qt::Key_Equal)\r
246 {\r
247 memBase += 16;\r
248\r
249 if (memBase > (0x200000 - 480))\r
250 memBase = 0x200000 - 480;\r
251\r
252 RefreshContents();\r
253 }\r
254}\r
255#endif\r
256\r
257\r
258#if 0\r
259void LocalBrowserWindow::GoToAddress(void)\r
260{\r
261 bool ok;\r
262 QString newAddress = address->text();\r
263 memBase = newAddress.toUInt(&ok, 16);\r
264 RefreshContents();\r
265}\r
266#endif\r
267\r
Unnamed repository; edit this file 'description' to name the repository.