-//\r
-// m68kDasmWin.cpp - M68K disassembly window\r
-//\r
-// by Jean-Paul Mari\r
-//\r
-// JPM = Jean-Paul Mari <djipi.mari@gmail.com>\r
-//\r
-// Who When What\r
-// --- ---------- -------------------------------------------------------------\r
-// JPM 06/27/2016 Created this file\r
-// JPM 12/04/2016 Suport ELF debug information\r
-// JPM Replacing the ELF support by the debugger information manager calls\r
-//\r
-\r
-// STILL TO DO:\r
-//\r
-\r
-#include <stdlib.h>\r
-#include "debugger/m68kDasmWin.h"\r
-//#include "memory.h"\r
-#include "m68000/m68kinterface.h"\r
-#include "dsp.h"\r
-#include "gpu.h"\r
-//#include "jaguar.h"\r
-//#include "ELFManager.h"\r
-#include "DBGManager.h"\r
-//extern jaguarRunAddress;\r
-#include "settings.h"\r
-\r
-\r
-// \r
-m68KDasmWindow::m68KDasmWindow(QWidget * parent/*= 0*/): QWidget(parent, Qt::Dialog),\r
- layout(new QVBoxLayout), text(new QTextBrowser),\r
-// layout(new QTabWidget), text(new QLabel),\r
-#if 0\r
- refresh(new QPushButton(tr("Refresh"))),\r
- address(new QLineEdit),\r
- go(new QPushButton(tr("Go"))),\r
-#endif\r
-// memBase(0x4000)\r
- //sb(new QScrollBar),\r
- memBase(0)\r
-{\r
-// m68kDasmWindow *m68kDasmWin = new m68kDasmWindow();\r
-// setWindowTitle(tr("Jaguar Disassembly Window"));\r
-// layout->addTab(new m68KDasmWindow(), tr("M68K Disassembly"));\r
- //layout = new QTabWidget;\r
- //layout->QWidget();\r
-\r
-#if 0\r
- address->setInputMask("hhhhhh");\r
- QHBoxLayout * hbox1 = new QHBoxLayout;\r
- hbox1->addWidget(refresh);\r
- hbox1->addWidget(address);\r
- hbox1->addWidget(go);\r
-#endif\r
-\r
- // Need to set the size as well...\r
-// resize(560, 480);\r
-\r
- QFont fixedFont("Lucida Console", 8, QFont::Normal);\r
-// QFont fixedFont("", 8, QFont::Normal);\r
- fixedFont.setStyleHint(QFont::Monospace); //TypeWriter\r
- fixedFont.setLetterSpacing(QFont::PercentageSpacing, 100);\r
- text->setFont(fixedFont);\r
-// sb = layout->text->verticalScrollBar();\r
-// text->setStyleSheet("background-color: DeepSkyBlue;");\r
-//// layout->setSizeConstraint(QLayout::SetFixedSize);\r
- setLayout(layout);\r
-\r
- layout->addWidget(text);\r
-// layout->addWidget(refresh);\r
-#if 0\r
- layout->addLayout(hbox1);\r
-#endif\r
-\r
-#if 0\r
- connect(refresh, SIGNAL(clicked()), this, SLOT(RefreshContents()));\r
- connect(go, SIGNAL(clicked()), this, SLOT(GoToAddress()));\r
-#endif\r
-}\r
-\r
-\r
-//\r
-void m68KDasmWindow::RefreshContents(void)\r
-{\r
- //char ; //, buf[64];\r
- QString s;\r
- char buffer[1024], string[1024], adresse[16];\r
- size_t pc = memBase, oldpc;\r
- size_t m68kPC = m68k_get_reg(NULL, M68K_REG_PC);\r
- size_t m68KPCNbrDisasmLines = 0;\r
- char *Symbol = NULL, *LineSrc, *CurrentLineSrc = NULL;\r
- bool m68kPCShow = false;\r
- bool constant, adr, equal, Error;\r
- size_t j, i;\r
- size_t nbr = vjs.nbrdisasmlines;\r
- char *PtrFullSource, *CurrentPtrFullSource = (char *)calloc(1, 1);\r
- size_t NumLine; // , CurrentNumLine = 0;\r
-// size_t CurrentNumLine = DBGManager_GetNumLineFromAdr(pc, DBG_NO_TAG) - 1;\r
- size_t CurrentNumLine;\r
- char singleCharString[2] = { 0, 0 };\r
-\r
- //text->clear();\r
-\r
- for (i = 0; i < nbr; i++)\r
- {\r
- //sb->setValue(sb->maximum());\r
- //j = text->verticalScrollBar()->maximum();\r
- //text->verticalScrollBar()->setValue(text->verticalScrollBar()->maximum());\r
- //if (text->verticalScrollBar()->value())\r
- //{\r
- // j = 1;\r
- //}\r
-\r
- oldpc = pc;\r
-// WriteLog("%06X: %s\n", oldpc, buffer);\r
- adr = constant = equal = false;\r
-\r
- // Display source filename based on the program address\r
- if (vjs.displayFullSourceFilename && (PtrFullSource = DBGManager_GetFullSourceFilenameFromAdr(oldpc, &Error)) && strcmp(CurrentPtrFullSource, PtrFullSource))\r
- {\r
-#if 0\r
- if (strcmp(OldPtrFullSource, PtrFullSource))\r
-#endif\r
- {\r
-#if 1\r
- if (i)\r
- {\r
- nbr++;\r
- s += QString("<br>");\r
- }\r
-#endif\r
- CurrentNumLine = DBGManager_GetNumLineFromAdr(pc, DBG_NO_TAG) - 1;\r
- nbr++;\r
- CurrentPtrFullSource = (char *)realloc(CurrentPtrFullSource, strlen(PtrFullSource) + 1);\r
- strcpy(CurrentPtrFullSource, PtrFullSource);\r
- if (!Error)\r
- {\r
- sprintf(string, "<font color='#ff0000'><b>%s</b></font><br>", PtrFullSource);\r
- }\r
- else\r
- {\r
- sprintf(string, "<font color='#00ff00'><b>%s</b></font><br>", PtrFullSource);\r
- }\r
- s += QString(string);\r
- }\r
- }\r
-\r
- // Display line number based on the program address\r
- if ((NumLine = DBGManager_GetNumLineFromAdr(oldpc, DBG_NO_TAG)) && ((signed)NumLine > (signed)CurrentNumLine))\r
- {\r
- if ((signed)CurrentNumLine < 0)\r
- {\r
- CurrentNumLine = NumLine - 1;\r
- }\r
- sprintf(string, "| <font color='#006400'>%5u</font> | ", (unsigned int)++CurrentNumLine); // (CurrentNumLine = NumLine));\r
- }\r
- else\r
- {\r
- sprintf(string, "| | ");\r
- }\r
- s += QString(string);\r
-\r
- // Display line source based on the program address\r
- if (((signed)CurrentNumLine > 0) && (LineSrc = DBGManager_GetLineSrcFromNumLineBaseAdr(oldpc, CurrentNumLine)) && (LineSrc != CurrentLineSrc))\r
- {\r
- sprintf(string, "<font color='#006400'>%s</font><br>", (CurrentLineSrc = LineSrc));\r
- s += QString(string);\r
- nbr++;\r
- }\r
- else\r
- {\r
- // Display symbol, or line source, based on the program address\r
- if (!CurrentLineSrc && !Symbol && (Symbol = DBGManager_GetSymbolNameFromAdr(oldpc)))\r
- {\r
- sprintf(string, "%s:<br>", Symbol);\r
- s += QString(string);\r
- nbr++;\r
- }\r
- // Display the assembly line based on the current PC\r
- else\r
- {\r
- pc += m68k_disassemble(buffer, (unsigned int)pc, 0, vjs.disasmopcodes);\r
-\r
- if (m68kPC == oldpc)\r
- {\r
- sprintf(string, "-> <u>%06X: %s</u><br>", (unsigned int)oldpc, buffer);\r
- m68kPCShow = true;\r
- m68KPCNbrDisasmLines = i;\r
- }\r
- else\r
- {\r
- sprintf(string, " %06X: %s<br>", (unsigned int)oldpc, buffer);\r
- }\r
-\r
- buffer[0] = 0; // Clear string\r
- //char singleCharString[2] = { 0, 0 };\r
-\r
- for (j = 0; j < strlen(string); j++)\r
- {\r
- if (string[j] == ' ')\r
- {\r
- strcat(buffer, " ");\r
- adr = constant = false;\r
- }\r
- else\r
- {\r
- switch (string[j])\r
- {\r
- case '#':\r
- constant = true;\r
- break;\r
-\r
- case '$':\r
- adr = true;\r
- break;\r
-\r
- case ',':\r
- constant = adr = equal = false;\r
- break;\r
-\r
- case '=':\r
- equal = true;\r
- break;\r
- }\r
-\r
- if (!constant && adr && !equal)\r
- {\r
- int l = 0;\r
- char *p;\r
- do\r
- {\r
- adresse[l++] = string[++j];\r
- } while ((string[(j + 1)] >= '0') && (string[(j + 1)] <= '9') || (string[(j + 1)] >= 'A') && (string[(j + 1)] <= 'F'));\r
- adresse[l] = 0;\r
-\r
- if (Symbol = DBGManager_GetSymbolNameFromAdr(strtoul(adresse, &p, 16)))\r
- {\r
- strcat(buffer, Symbol);\r
- }\r
- else\r
- {\r
- strcat(buffer, "$");\r
- strcat(buffer, adresse);\r
- }\r
-\r
- adr = false;\r
- }\r
- else\r
- {\r
- singleCharString[0] = string[j];\r
- strcat(buffer, singleCharString);\r
- }\r
- }\r
- }\r
-\r
- Symbol = NULL;\r
- // s += QString(string);\r
- s += QString(buffer);\r
- // text->setStyleSheet("QLabel { background-color : red; color : blue; }");\r
- }\r
- }\r
- }\r
-\r
- // Display generated text\r
- text->clear();\r
- if (m68kPCShow)\r
- {\r
- text->setText(s);\r
- }\r
- else\r
- {\r
- Use68KPCAddress();\r
- RefreshContents();\r
- }\r
-\r
- // Set the scrollbar position in accordance of the M68K PC pointer \r
- if (m68KPCNbrDisasmLines > (nbr / 2))\r
- {\r
- text->verticalScrollBar()->setValue(text->verticalScrollBar()->maximum());\r
- }\r
- else\r
- {\r
- text->verticalScrollBar()->setValue(text->verticalScrollBar()->minimum());\r
- }\r
-\r
- free(CurrentPtrFullSource);\r
-}\r
-\r
-\r
-#if 0\r
-// \r
-void m68KDasmWindow::keyPressEvent(QKeyEvent * e)\r
-{\r
-// if (e->key() == Qt::Key_Escape || e->key() == Qt::Key_Return)\r
-// hide();\r
-#if 0\r
- else if (e->key() == Qt::Key_PageUp)\r
- {\r
- memBase -= 64;\r
-\r
- if (memBase < 0)\r
- memBase = 0;\r
-\r
- RefreshContents();\r
- }\r
- else if (e->key() == Qt::Key_PageDown)\r
- {\r
- memBase += 64;\r
-\r
- if (memBase > (0xF00000 - 64))\r
- memBase = 0xF00000 - 64;\r
-\r
- RefreshContents();\r
- }\r
- else if (e->key() == Qt::Key_Up || e->key() == Qt::Key_Minus)\r
- {\r
- memBase -= 16;\r
-\r
- if (memBase < 0)\r
- memBase = 0;\r
-\r
- RefreshContents();\r
- }\r
- else if (e->key() == Qt::Key_Down || e->key() == Qt::Key_Equal)\r
- {\r
- memBase += 16;\r
-\r
- if (memBase > (0xF00000 - 64))\r
- memBase = 0xF00000 - 64;\r
-\r
- RefreshContents();\r
- }\r
-#endif\r
-}\r
-#endif\r
-\r
-\r
-// Set mem base PC address using the 68K pc current address\r
-void m68KDasmWindow::Use68KPCAddress(void)\r
-{\r
- memBase = m68k_get_reg(NULL, M68K_REG_PC);\r
-}\r
-\r
-\r
-// Set mem base PC address\r
-void m68KDasmWindow::SetAddress(int address)\r
-{\r
- memBase = address;\r
-// RefreshContents();\r
-}\r
-\r
-\r
-#if 0\r
-// Set mem base PC address based on user interaction\r
-void m68KDasmWindow::GoToAddress(void)\r
-{\r
- bool ok;\r
-\r
- QString newAddress = address->text();\r
- memBase = newAddress.toUInt(&ok, 16);\r
- RefreshContents();\r
-}\r
-#endif\r
+//\r
+// m68kDasmWin.cpp - M68K disassembly window\r
+//\r
+// by Jean-Paul Mari\r
+//\r
+// JPM = Jean-Paul Mari <djipi.mari@gmail.com>\r
+//\r
+// Who When What\r
+// --- ---------- -------------------------------------------------------------\r
+// JPM 06/27/2016 Created this file\r
+// JPM 12/04/2016 Suport ELF debug information\r
+// JPM Replacing the ELF support by the debugger information manager calls\r
+// JPM Aug./2020 Display only the code related to the traced function, added different layouts & a status bar, Qt/HTML text format support\r
+//\r
+\r
+// STILL TO DO:\r
+//\r
+\r
+#include <stdlib.h>\r
+#include "debugger/m68kDasmWin.h"\r
+#include "m68000/m68kinterface.h"\r
+#include "dsp.h"\r
+#include "gpu.h"\r
+#include "DBGManager.h"\r
+#include "settings.h"\r
+\r
+\r
+// \r
+m68KDasmWindow::m68KDasmWindow(QWidget * parent/*= 0*/): QWidget(parent, Qt::Dialog),\r
+layout(new QVBoxLayout),\r
+#if MD_LAYOUTFILE == 1\r
+statusbar(new QStatusBar),\r
+#endif\r
+#ifdef MD_LAYOUTTEXTS\r
+text(new QTextBrowser),\r
+#endif\r
+memBase(0)\r
+{\r
+ // Set font\r
+ QFont fixedFont("Lucida Console", 8, QFont::Normal);\r
+ fixedFont.setStyleHint(QFont::Monospace); //TypeWriter\r
+ fixedFont.setLetterSpacing(QFont::PercentageSpacing, 100);\r
+\r
+ // Set text in layout\r
+#ifdef MD_LAYOUTTEXTS\r
+ text->setFont(fixedFont);\r
+ layout->addWidget(text);\r
+#endif\r
+\r
+ // Status bar\r
+#if MD_LAYOUTFILE == 1\r
+ layout->addWidget(statusbar);\r
+ setLayout(layout);\r
+#endif\r
+\r
+ // Set layout\r
+ setLayout(layout);\r
+}\r
+\r
+\r
+//\r
+void m68KDasmWindow::RefreshContents(void)\r
+{\r
+ QString s;\r
+ char buffer[1024], string[1024], adresse[16];\r
+ size_t pc = memBase, oldpc;\r
+ size_t m68kPC = m68k_get_reg(NULL, M68K_REG_PC);\r
+ size_t m68KPCNbrDisasmLines = 0;\r
+ char *Symbol = NULL, *LineSrc, *CurrentLineSrc = NULL;\r
+ bool m68kPCShow = false;\r
+ bool constant, adr, equal;\r
+ DBGstatus Status;\r
+ size_t j, i;\r
+ size_t nbr = vjs.nbrdisasmlines;\r
+ char *PtrFullSource, *CurrentPtrFullSource = (char *)calloc(1, 1);\r
+ size_t NumLine; // , CurrentNumLine = 0;\r
+ size_t CurrentNumLine;\r
+ char singleCharString[2] = { 0, 0 };\r
+#if MD_LAYOUTFILE == 1\r
+ bool In = true;\r
+#else\r
+#define In true\r
+#endif\r
+\r
+ for (i = 0; (i < nbr) && In; i++)\r
+ {\r
+ oldpc = pc;\r
+ adr = constant = equal = false;\r
+\r
+ // Display source filename based on the program address\r
+ if (vjs.displayFullSourceFilename && (PtrFullSource = DBGManager_GetFullSourceFilenameFromAdr(oldpc, &Status)) && strcmp(CurrentPtrFullSource, PtrFullSource))\r
+ {\r
+#if defined(MD_LAYOUTFILE)\r
+ if (i)\r
+#if MD_LAYOUTFILE != 1\r
+ {\r
+ // add an empty line for the display of the new filename\r
+ nbr++;\r
+ s += QString("<br>");\r
+ }\r
+#else\r
+ {\r
+ In = false;\r
+ }\r
+ else\r
+#endif\r
+#endif\r
+ {\r
+ CurrentNumLine = DBGManager_GetNumLineFromAdr(pc, DBG_NO_TAG) - 1;\r
+ CurrentPtrFullSource = (char *)realloc(CurrentPtrFullSource, strlen(PtrFullSource) + 1);\r
+ strcpy(CurrentPtrFullSource, PtrFullSource);\r
+#if defined(MD_LAYOUTFILE)\r
+ if (Status)\r
+ {\r
+ // Referenced filename doesn't exist\r
+ sprintf(string, "<font color='#ff0000'><b>%s</b></font><br>", PtrFullSource);\r
+#if MD_LAYOUTFILE == 1\r
+ // Display status bar\r
+ if ((Status & DBGSTATUS_OUTDATEDFILE))\r
+ {\r
+ statusbar->setStyleSheet("background-color: lightyellow; font: bold");\r
+ statusbar->showMessage(QString("Outdated source file"));\r
+ }\r
+ else\r
+ {\r
+ statusbar->setStyleSheet("background-color: tomato; font: bold");\r
+ statusbar->showMessage(QString("Unavailable source file"));\r
+ }\r
+#endif\r
+ }\r
+ else\r
+ {\r
+ // Referenced filename does exist\r
+ sprintf(string, "<font color='#00ff00'><b>%s</b></font><br>", PtrFullSource);\r
+#if MD_LAYOUTFILE == 1\r
+ // Display status bar\r
+ statusbar->setStyleSheet("background-color: transparent; font: bold");\r
+ statusbar->showMessage(QString(""));\r
+#endif\r
+ }\r
+ nbr++;\r
+ s += QString(string);\r
+#endif\r
+ }\r
+ }\r
+ else\r
+ {\r
+ // Display line number based on the program address\r
+ if ((NumLine = DBGManager_GetNumLineFromAdr(oldpc, DBG_NO_TAG)) && ((signed)NumLine > (signed)CurrentNumLine) && !Status)\r
+ {\r
+#if MD_LAYOUTFILE != 1\r
+ if ((signed)CurrentNumLine < 0)\r
+ {\r
+ CurrentNumLine = NumLine - 1;\r
+ }\r
+#endif\r
+ sprintf(string, "| <font color='#006400'>%5u</font> | ", (unsigned int)++CurrentNumLine); // (CurrentNumLine = NumLine));\r
+ }\r
+ else\r
+ {\r
+ sprintf(string, "| | ");\r
+ }\r
+ s += QString(string);\r
+\r
+ // Display line source based on the program address\r
+ if (((signed)CurrentNumLine > 0) && (LineSrc = DBGManager_GetLineSrcFromNumLineBaseAdr(oldpc, CurrentNumLine)) && (LineSrc != CurrentLineSrc))\r
+ {\r
+#if 0\r
+ // add a color on the line text\r
+ sprintf(string, "<font color='#006400'>%s</font><br>", (CurrentLineSrc = LineSrc));\r
+ s += QString(string);\r
+#else\r
+ // add a color on the line text with HTML encoding\r
+ s += QString("<font color='#006400'>");\r
+ s += QString(QString((CurrentLineSrc = LineSrc)).toHtmlEscaped());\r
+ s += QString("</font><br>");\r
+#endif\r
+ nbr++;\r
+ }\r
+ else\r
+ {\r
+ // Display symbol, or line source, based on the program address\r
+ if (!CurrentLineSrc && !Symbol && (Symbol = DBGManager_GetSymbolNameFromAdr(oldpc)))\r
+ {\r
+ sprintf(string, "%s:<br>", Symbol);\r
+ s += QString(string);\r
+ nbr++;\r
+ }\r
+ // Display the assembly line based on the current PC\r
+ else\r
+ {\r
+ pc += m68k_disassemble(buffer, (unsigned int)pc, 0, vjs.disasmopcodes);\r
+\r
+ if (m68kPC == oldpc)\r
+ {\r
+ sprintf(string, "-> <u>%06X: %s</u><br>", (unsigned int)oldpc, buffer);\r
+ m68kPCShow = true;\r
+ m68KPCNbrDisasmLines = i;\r
+ }\r
+ else\r
+ {\r
+ sprintf(string, " %06X: %s<br>", (unsigned int)oldpc, buffer);\r
+ }\r
+\r
+ buffer[0] = 0; // Clear string\r
+\r
+ for (j = 0; j < strlen(string); j++)\r
+ {\r
+ if (string[j] == ' ')\r
+ {\r
+ strcat(buffer, " ");\r
+ adr = constant = false;\r
+ }\r
+ else\r
+ {\r
+ switch (string[j])\r
+ {\r
+ case '#':\r
+ constant = true;\r
+ break;\r
+\r
+ case '$':\r
+ adr = true;\r
+ break;\r
+\r
+ case ',':\r
+ constant = adr = equal = false;\r
+ break;\r
+\r
+ case '=':\r
+ equal = true;\r
+ break;\r
+ }\r
+\r
+ if (!constant && adr && !equal)\r
+ {\r
+ int l = 0;\r
+ char *p;\r
+ do\r
+ {\r
+ adresse[l++] = string[++j];\r
+ } while ((string[(j + 1)] >= '0') && (string[(j + 1)] <= '9') || (string[(j + 1)] >= 'A') && (string[(j + 1)] <= 'F'));\r
+ adresse[l] = 0;\r
+\r
+ if (Symbol = DBGManager_GetSymbolNameFromAdr(strtoul(adresse, &p, 16)))\r
+ {\r
+ strcat(buffer, Symbol);\r
+ }\r
+ else\r
+ {\r
+ strcat(buffer, "$");\r
+ strcat(buffer, adresse);\r
+ }\r
+\r
+ adr = false;\r
+ }\r
+ else\r
+ {\r
+ singleCharString[0] = string[j];\r
+ strcat(buffer, singleCharString);\r
+ }\r
+ }\r
+ }\r
+\r
+ Symbol = NULL;\r
+ s += QString(buffer);\r
+ }\r
+ }\r
+ }\r
+ }\r
+\r
+ // Display generated text\r
+ text->clear();\r
+ if (m68kPCShow)\r
+ {\r
+ text->setText(s);\r
+ }\r
+ else\r
+ {\r
+ Use68KPCAddress();\r
+ RefreshContents();\r
+ }\r
+\r
+ // Set the scrollbar position in accordance of the M68K PC pointer \r
+ if (m68KPCNbrDisasmLines > (nbr / 2))\r
+ {\r
+ text->verticalScrollBar()->setValue(text->verticalScrollBar()->maximum());\r
+ }\r
+ else\r
+ {\r
+ text->verticalScrollBar()->setValue(text->verticalScrollBar()->minimum());\r
+ }\r
+\r
+ free(CurrentPtrFullSource);\r
+}\r
+\r
+\r
+// Set mem base PC address using the 68K pc current address\r
+void m68KDasmWindow::Use68KPCAddress(void)\r
+{\r
+ memBase = m68k_get_reg(NULL, M68K_REG_PC);\r
+}\r
+\r
+\r
+// Set mem base PC address\r
+void m68KDasmWindow::SetAddress(int address)\r
+{\r
+ memBase = address;\r
+}\r
HCoop / clinton / Virtual-Jaguar-Rx.git / blobdiff