119 lines
5.1 KiB
C++
119 lines
5.1 KiB
C++
/*****************************************************************************
|
|
* AppleSAWS - The Apple Software Analysis WorkShop *
|
|
* Copyright (C) 2015-2021 Mark D. Long *
|
|
* *
|
|
* 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. *
|
|
* *
|
|
* 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 <https://www.gnu.org/licenses/>. *
|
|
*****************************************************************************/
|
|
|
|
#include "relocatablefile.h"
|
|
#include "util.h"
|
|
|
|
#include <QDebug>
|
|
|
|
RelocatableFile::RelocatableFile(Dos33DiskImage *image, FileDescriptiveEntry &fde)
|
|
: GenericFile(image,fde)
|
|
{
|
|
setupData();
|
|
}
|
|
|
|
void RelocatableFile::setupData()
|
|
{
|
|
|
|
// qDebug() << "setData()";
|
|
if (length() >= 6) {
|
|
quint16 starting_ram_address = rawDataWordAt(0);
|
|
setAddress(starting_ram_address);
|
|
m_ram_image_length = rawDataWordAt(2);
|
|
setLength(m_ram_image_length);
|
|
m_code_image_length = rawDataWordAt(4);
|
|
|
|
int offset = 0;
|
|
|
|
for (int idx = 6; idx < m_code_image_length+6; idx++) {
|
|
quint8 val = rawDataAt(idx);
|
|
m_binary_code_image.append(val);
|
|
}
|
|
|
|
for (int N = 0; N < (m_code_image_length/4); N++) {
|
|
offset = m_code_image_length+ 6 +(N*4);
|
|
|
|
// qDebug() << "N: " << N << uint8ToHex(m_data[offset])
|
|
// << uint8ToHex(m_data[offset+1])
|
|
// << uint8ToHex(m_data[offset+2])
|
|
// << uint8ToHex(m_data[offset+3]);
|
|
|
|
RelocatableDictItem rdi = RelocatableDictItem(
|
|
rawDataAt(offset),rawDataAt(offset+1),
|
|
rawDataAt(offset+2),rawDataAt(offset+3));
|
|
m_relocatable_dict.append(rdi);
|
|
if (rdi.isEndOfRLD()) { break; }
|
|
}
|
|
}
|
|
}
|
|
|
|
void RelocatableFile::dump()
|
|
{
|
|
qDebug() << "\nTotalLength: " << length();
|
|
qDebug() << "Starting Ram Address: " << (quint16) address() << uint16ToHex(address());
|
|
qDebug() << "Length of Ram Image: " << (quint16) m_ram_image_length << uint16ToHex(m_ram_image_length);
|
|
qDebug() << "Length of Code Image: " << (quint16) m_code_image_length << uint16ToHex(m_code_image_length);
|
|
|
|
int itemIdx = 0;
|
|
foreach (RelocatableDictItem item, m_relocatable_dict) {
|
|
Byte4ReturnType b4rt = item.getByte4();
|
|
QString typestr;
|
|
if (b4rt.first == ESDSymbol) { typestr = "ESDSymbol"; }
|
|
else if (b4rt.first == ByteHi) { typestr = "Hi Byte"; }
|
|
else { typestr = "Lo Byte"; }
|
|
quint16 fo = item.getFieldOffset();
|
|
qDebug() << " Item #" << itemIdx++
|
|
<< "Field Offset: " << uint16ToHex(fo)
|
|
<< "FieldSize: " << ((item.getFieldSize()==RFS2Byte)?"2-Byte":"1-Byte")
|
|
<< typestr << uint8ToHex(b4rt.second)
|
|
<< ((item.isNotEndOfRLD())?"NotEndOfRLD":"EndOfRLD")
|
|
<< " " << ((item.isExtern())?"Extern":"Not Extern");
|
|
}
|
|
|
|
|
|
}
|
|
|
|
QStringList RelocatableFile::decodeRelocatableDict()
|
|
{
|
|
QStringList retval;
|
|
int idx = 0;
|
|
foreach (RelocatableDictItem item, m_relocatable_dict) {
|
|
Byte4ReturnType b4rt = item.getByte4();
|
|
QString typestr;
|
|
if (b4rt.first == ESDSymbol) { typestr = "ESDSymbol"; }
|
|
else if (b4rt.first == ByteHi) { typestr = "Hi Byte"; }
|
|
else { typestr = "Lo Byte"; }
|
|
quint16 fo = item.getFieldOffset();
|
|
// qDebug() << " Item #" << idx
|
|
// << "Field Offset: " << uint16ToHex(fo)
|
|
// << "FieldSize: " << ((item.getFieldSize()==RFS2Byte)?"2-Byte":"1-Byte")
|
|
// << typestr << uint8ToHex(b4rt.second)
|
|
// << ((item.isNotEndOfRLD())?"NotEndOfRLD":"EndOfRLD")
|
|
// << " " << ((item.isExtern())?"Extern":"Not Extern");
|
|
|
|
retval.append(QString("Item %1, Offset %2, @ %3, %4 Field, %5")
|
|
.arg(idx++)
|
|
.arg(uint16ToHex(fo))
|
|
.arg(uint16ToHex(fo+address()+6))
|
|
.arg((item.getFieldSize()==RFS2Byte)?"2-Byte":"1-Byte")
|
|
.arg((item.isExtern())?"Extern":"Not Extern"));
|
|
}
|
|
|
|
return retval;
|
|
}
|