Heap allocation window uses the DRAM size limit option and detect if heap allocation...

[clinton/Virtual-Jaguar-Rx.git] / src / debugger / heapallocatorbrowser.cpp

//\r
// heapallocatorbrowser.cpp: Memory heap allocation\r
//\r
// by Jean-Paul Mari\r
//\r
// JPM = Jean-Paul Mari <djipi.mari@gmail.com>\r
//\r
// Who  When        What\r
// ---  ----------  -----------------------------------------------------------\r
// JPM  01/08/2017  Created this file\r
// JPM  09/05/2018  Support of the DRAM size limit option\r
// JPM  09/05/2018  Use definitions for error instead of hard values\r
// JPM  09/05/2018  Detect if heap allocation shares space with SP (Stack)\r
//\r
\r
// STILL TO DO:\r
// Better information display\r
//\r
\r
#include "settings.h"\r
#include "debugger/heapallocatorbrowser.h"\r
#include "memory.h"\r
#include "debugger/DBGManager.h"\r
#include "m68000/m68kinterface.h"\r
\r
\r
HeapAllocatorBrowserWindow::HeapAllocatorBrowserWindow(QWidget * parent/*= 0*/) : QWidget(parent, Qt::Dialog),\r
layout(new QVBoxLayout), text(new QTextBrowser),\r
Adr(0)\r
{\r
	setWindowTitle(tr("Heap Allocation"));\r
\r
	QFont fixedFont("Lucida Console", 8, QFont::Normal);\r
	fixedFont.setStyleHint(QFont::TypeWriter);\r
	text->setFont(fixedFont);\r
	setLayout(layout);\r
\r
	layout->addWidget(text);\r
}\r
\r
\r
//\r
HeapAllocatorBrowserWindow::~HeapAllocatorBrowserWindow(void)\r
{\r
}\r
\r
\r
//\r
void HeapAllocatorBrowserWindow::RefreshContents(void)\r
{\r
	char string[1024];\r
	QString HA;\r
	size_t Adr68K;\r
	size_t Error = HA_NOERROR;\r
	HeapAllocation HeapAllocation;\r
\r
	if (isVisible())\r
	{\r
		if (Adr68K = Adr)\r
		{\r
			do\r
			{\r
				if ((Adr68K >= 0x4000) && (Adr68K < vjs.DRAM_size))\r
				{\r
					if (Adr68K < m68k_get_reg(NULL, M68K_REG_SP))\r
					{\r
						memcpy(&HeapAllocation, &jaguarMainRAM[Adr68K], sizeof(HeapAllocation));\r
\r
						if (HeapAllocation.size = ((HeapAllocation.size & 0xff) << 24) + ((HeapAllocation.size & 0xff00) << 8) + ((HeapAllocation.size & 0xff0000) >> 8) + ((HeapAllocation.size & 0xff000000) >> 24))\r
						{\r
							if (HeapAllocation.size <= (vjs.DRAM_size - 0x4000))\r
							{\r
								if ((HeapAllocation.used = ((HeapAllocation.used & 0xff) << 8) + ((HeapAllocation.used & 0xff00) >> 8)) <= 1)\r
								{\r
									HeapAllocation.nextalloc = ((HeapAllocation.nextalloc & 0xff) << 24) + ((HeapAllocation.nextalloc & 0xff00) << 8) + ((HeapAllocation.nextalloc & 0xff0000) >> 8) + ((HeapAllocation.nextalloc & 0xff000000) >> 24);\r
\r
									if ((HeapAllocation.nextalloc >= 0x4000) && (HeapAllocation.nextalloc < vjs.DRAM_size))\r
									{\r
										sprintf(string, "0x%06x | 0x%06x (%zi) | %s | 0x%06x<br>", Adr68K, HeapAllocation.size - sizeof(HeapAllocation), HeapAllocation.size - sizeof(HeapAllocation), HeapAllocation.used ? "Allocated" : "Free", HeapAllocation.nextalloc);\r
										Adr68K = HeapAllocation.nextalloc;\r
									}\r
									else\r
									{\r
										sprintf(string, "<br><font color='#ff0000'><b>Unable to determine the next memory allocation</b></font>");\r
										Error = HA_UNABLENEXTMEMORYALLOC;\r
									}\r
								}\r
								else\r
								{\r
									sprintf(string, "<br><font color='#ff0000'><b>Unable to determine if the allocated memory is used or not</b></font>");\r
									Error = HA_UNABLEALLOCATEMEMORYUSAGE;\r
								}\r
							}\r
							else\r
							{\r
								sprintf(string, "<br><font color='#ff0000'><b>Memory bloc size has a problem</b></font>");\r
								Error = HA_MEMORYBLOCKSIZEPROBLEM;\r
							}\r
						}\r
						else\r
						{\r
							sprintf(string, "<br><font color='#0000ff'><b>Memory allocations browsing successfully completed</b></font>");\r
						}\r
					}\r
					else\r
					{\r
						sprintf(string, "<br><font color='#ff0000'><b>Memory allocations and Stack are sharing the same space</b></font>");\r
						Error = HA_HAANDSPSHARESPACE;\r
					}\r
				}\r
				else\r
				{\r
					sprintf(string, "<br><font color='#ff0000'><b>Memory allocations may have a problem</b></font>");\r
					Error = HA_MEMORYALLOCATIONPROBLEM;\r
				}\r
\r
				HA += QString(string);\r
\r
			}\r
			while (HeapAllocation.size && !Error);\r
		}\r
		else\r
		{\r
			if (Adr = DBGManager_GetAdrFromSymbolName((char *)"__HeapBase"))\r
			{\r
				if (Adr68K = DBGManager_GetGlobalVariableAdrFromName((char *)"alloc"))\r
				{\r
					if (!(Adr68K = (jaguarMainRAM[Adr68K] << 24) + (jaguarMainRAM[Adr68K + 1] << 16) + (jaguarMainRAM[Adr68K + 2] << 8) + (jaguarMainRAM[Adr68K + 3])) || ((Adr68K < 0x4000) || (Adr68K >= 0x200000)))\r
					{\r
						sprintf(string, "<font color='#ff0000'><b>Memory allocator not yet initialised</b></font>");\r
						Adr = 0;\r
					}\r
					else\r
					{\r
						return RefreshContents();\r
					}\r
				}\r
				else\r
				{\r
					sprintf(string, "<font color='#ff0000'><b>Memory allocator is not compatible</b></font>");\r
					Adr = 0;\r
				}\r
			}\r
			else\r
			{\r
				sprintf(string, "<font color='#ff0000'><b>Memory allocator doesn't exist</b></font>");\r
			}\r
\r
			HA += QString(string);\r
		}\r
\r
		text->clear();\r
		text->setText(HA);\r
	}\r
}\r
\r
\r
// \r
void HeapAllocatorBrowserWindow::Reset(void)\r
{\r
	size_t Adr68K;\r
\r
	if (DBGManager_GetAdrFromSymbolName((char *)"__HeapBase"))\r
	{\r
		if (Adr68K = DBGManager_GetGlobalVariableAdrFromName((char *)"alloc"))\r
		{\r
			jaguarMainRAM[Adr68K] = jaguarMainRAM[Adr68K + 1] = jaguarMainRAM[Adr68K + 2] = jaguarMainRAM[Adr68K + 3] = 0;\r
			Adr = 0;\r
		}\r
	}\r
}\r
\r
\r
// \r
void HeapAllocatorBrowserWindow::keyPressEvent(QKeyEvent * e)\r
{\r
	if (e->key() == Qt::Key_Escape)\r
	{\r
		hide();\r
	}\r
}\r
\r