Apple-2-Tools/dmolony-DiskBrowser
1
0
Fork 0
mirror of https://github.com/dmolony/DiskBrowser.git synced 2024-06-15 19:29:45 +00:00
Code Issues Projects Releases Wiki Activity

infocom table

Browse Source
This commit is contained in:
Denis Molony 2019-04-17 19:45:29 +10:00
parent e8ae7a9cb9
commit 161c57b974
3 changed files with 199 additions and 171 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/com/bytezone/diskbrowser/gui/DiskLegendPanel.java
View File

@ -76,7 +76,7 @@ class DiskLegendPanel extends DiskPanel
if (val > 0)
{
g.drawString (
val + " empty sector" + (val == 1 ? "" : "s") + " marked as unavailable", 10,
val + " unused sector" + (val == 1 ? "" : "s") + " marked as unavailable", 10,
y);
y += lineHeight;
}

19
src/com/bytezone/diskbrowser/infocom/ObjectManager.java
View File

@ -62,7 +62,7 @@ class ObjectManager extends InfocomAbstractFile implements Iterable<ZObject>
parentNode.add (child);
if (object.sibling > 0)
buildObjectTree (header.objectManager.list.get (object.sibling - 1), parentNode,
disk);
disk);
if (object.child > 0)
buildObjectTree (header.objectManager.list.get (object.child - 1), child, disk);
else
@ -77,13 +77,22 @@ class ObjectManager extends InfocomAbstractFile implements Iterable<ZObject>
@Override
public String getText ()
{
StringBuilder text =
new StringBuilder (" # Attributes Pr Sb Ch Prop Title\n--- -----------"
+ " -- -- -- ----- -----------------------------\n");
String header1 = "ID Attributes Pr Sb Ch Prop Title\n-- -----------"
+ " -- -- -- ----- -----------------------------\n";
String underline = " --------------------------";
String header2 = "ID Title Parent Sibling"
+ " Child Attributes Prop\n" + "-- "
+ underline + underline + underline + underline + " ----------- -----" + "\n";
StringBuilder text = new StringBuilder (header2);
int objectNumber = 0;
for (ZObject zo : list)
text.append (String.format ("%3d %s%n", ++objectNumber, zo));
if (false)
text.append (String.format ("%02X %s%n", ++objectNumber, zo));
else
text.append (
String.format ("%02X %s%n", ++objectNumber, zo.getDescription (list)));
text.deleteCharAt (text.length () - 1);
return text.toString ();
}

349
src/com/bytezone/diskbrowser/infocom/ZObject.java
View File

@ -9,195 +9,214 @@ import com.bytezone.diskbrowser.utilities.HexFormatter;
class ZObject extends AbstractFile
{
static final int HEADER_SIZE = 9;
static final int HEADER_SIZE = 9;
int id;
int startPtr;
int propertyTablePtr;
int propertyTableLength;
int parent, sibling, child;
List<Property> properties = new ArrayList<Property> ();
Header header;
BitSet attributes = new BitSet (32);
int id;
int startPtr;
int propertyTablePtr;
int propertyTableLength;
int parent, sibling, child;
List<Property> properties = new ArrayList<Property> ();
Header header;
BitSet attributes = new BitSet (32);
public ZObject (String name, byte[] buffer, int offset, int seq, Header header)
{
super (name, buffer);
this.header = header;
public ZObject (String name, byte[] buffer, int offset, int seq, Header header)
{
super (name, buffer);
startPtr = offset;
id = seq;
this.header = header;
this.startPtr = offset;
id = seq;
// attributes
int bitIndex = 0;
for (int i = 0; i < 4; i++)
{
byte b = buffer[offset + i];
for (int j = 0; j < 8; j++)
{
if ((b & 0x80) == 0x80)
attributes.set (bitIndex);
b <<= 1;
++bitIndex;
}
}
// attributes
int bitIndex = 0;
for (int i = 0; i < 4; i++)
{
byte b = buffer[offset + i];
for (int j = 0; j < 8; j++)
{
if ((b & 0x80) == 0x80)
attributes.set (bitIndex);
b <<= 1;
++bitIndex;
}
}
// object's relatives
parent = header.getByte (offset + 4);
sibling = header.getByte (offset + 5);
child = header.getByte (offset + 6);
// object's relatives
parent = header.getByte (offset + 4);
sibling = header.getByte (offset + 5);
child = header.getByte (offset + 6);
// the property header contains the object's short name
propertyTablePtr = header.getWord (offset + 7);
int ptr = propertyTablePtr;
int nameLength = header.getByte (ptr) * 2;
this.name = nameLength == 0 ? "<<none>>" : new ZString (buffer, ++ptr, header).value;
ptr += nameLength;
// the property header contains the object's short name
propertyTablePtr = header.getWord (offset + 7);
int ptr = propertyTablePtr;
int nameLength = header.getByte (ptr) * 2;
this.name = nameLength == 0 ? "<<none>>" : new ZString (buffer, ++ptr, header).value;
ptr += nameLength;
// read each property
while (buffer[ptr] != 0)
{
Property p = new Property (buffer, ptr);
properties.add (p);
ptr += p.length + 1;
}
propertyTableLength = ptr - propertyTablePtr;
}
// read each property
while (buffer[ptr] != 0)
{
Property p = new Property (buffer, ptr);
properties.add (p);
ptr += p.length + 1;
}
propertyTableLength = ptr - propertyTablePtr;
}
@Override
public String getText ()
{
StringBuilder text = new StringBuilder ();
@Override
public String getText ()
{
StringBuilder text = new StringBuilder ();
text.append (String.format ("ID : %3d %s%n%nAttributes : ", id, name));
text.append (HexFormatter.getHexString (buffer, startPtr, 4));
text.append (" " + attributes.toString ());
text.append (String.format ("ID : %3d %s%n%nAttributes : ", id, name));
text.append (HexFormatter.getHexString (buffer, startPtr, 4));
text.append (" " + attributes.toString ());
String obj1 = parent == 0 ? "" : header.objectManager.list.get (parent - 1).name;
String obj2 = sibling == 0 ? "" : header.objectManager.list.get (sibling - 1).name;
String obj3 = child == 0 ? "" : header.objectManager.list.get (child - 1).name;
String obj1 = parent == 0 ? "" : header.objectManager.list.get (parent - 1).name;
String obj2 = sibling == 0 ? "" : header.objectManager.list.get (sibling - 1).name;
String obj3 = child == 0 ? "" : header.objectManager.list.get (child - 1).name;
text.append (String.format ("%n%nParent : %02X (%3d) %s%n", parent, parent, obj1));
text.append (String.format ("Sibling : %02X (%3d) %s%n", sibling, sibling, obj2));
text.append (String.format ("Child : %02X (%3d) %s%n%n", child, child, obj3));
text.append (
String.format ("%n%nParent : %02X (%3d) %s%n", parent, parent, obj1));
text.append (String.format ("Sibling : %02X (%3d) %s%n", sibling, sibling, obj2));
text.append (String.format ("Child : %02X (%3d) %s%n%n", child, child, obj3));
for (Property prop : properties)
text.append (prop + "\n");
for (Property prop : properties)
text.append (prop + "\n");
return text.toString ();
}
return text.toString ();
}
@Override
public String getHexDump ()
{
StringBuilder text = new StringBuilder ("Header :\n\n");
text.append (HexFormatter.formatNoHeader (buffer, startPtr, HEADER_SIZE));
text.append ("\n\nProperty table:\n\n");
text.append (HexFormatter.formatNoHeader (buffer, propertyTablePtr, propertyTableLength));
return text.toString ();
}
@Override
public String getHexDump ()
{
StringBuilder text = new StringBuilder ("Header :\n\n");
text.append (HexFormatter.formatNoHeader (buffer, startPtr, HEADER_SIZE));
text.append ("\n\nProperty table:\n\n");
text.append (
HexFormatter.formatNoHeader (buffer, propertyTablePtr, propertyTableLength));
return text.toString ();
}
Property getProperty (int id)
{
for (Property p : properties)
if (p.propertyNumber == id)
return p;
return null;
}
Property getProperty (int id)
{
for (Property p : properties)
if (p.propertyNumber == id)
return p;
return null;
}
@Override
public String toString ()
{
return HexFormatter.getHexString (buffer, startPtr, HEADER_SIZE) + " " + name;
}
@Override
public String toString ()
{
return HexFormatter.getHexString (buffer, startPtr, HEADER_SIZE) + " " + name;
}
class Property
{
int propertyNumber;
int ptr;
int length;
public String getDescription (List<ZObject> list)
{
StringBuilder text = new StringBuilder (String.format (" %-26s", getName ()));
int offset; // only used if length == 2
for (int i = 4; i < 7; i++)
{
int index = buffer[startPtr + i] & 0xFF;
String name = index > 0 ? list.get (index - 1).getName () : "";
text.append (String.format (" %-26s", name));
}
public Property (byte[] buffer, int ptr)
{
this.ptr = ptr;
length = header.getByte (ptr) / 32 + 1;
propertyNumber = header.getByte (ptr) % 32;
text.append (" ");
text.append (HexFormatter.getHexString (buffer, startPtr, 4));
text.append (" ");
text.append (HexFormatter.getHexString (buffer, startPtr + 7, 2));
if (length == 2)
offset = header.getWord (ptr + 1) * 2;
}
return text.toString ();
}
private ZObject getObject ()
{
return header.objectManager.list.get ((buffer[ptr + 1] & 0xFF) - 1);
}
class Property
{
int propertyNumber;
int ptr;
int length;
int offset; // only used if length == 2
@Override
public String toString ()
{
StringBuilder text =
new StringBuilder (String.format ("%5s : ", header.propertyNames[propertyNumber]));
public Property (byte[] buffer, int ptr)
{
this.ptr = ptr;
length = header.getByte (ptr) / 32 + 1;
propertyNumber = header.getByte (ptr) % 32;
String propertyType = header.propertyNames[propertyNumber];
if (length == 2)
offset = header.getWord (ptr + 1) * 2;
}
if (!propertyType.equals ("DICT") && !propertyType.contains ("STR"))
text.append (String.format ("%-20s", HexFormatter.getHexString (buffer, ptr + 1, length)));
private ZObject getObject ()
{
return header.objectManager.list.get ((buffer[ptr + 1] & 0xFF) - 1);
}
if (propertyType.charAt (0) >= 'a') // directions are in lowercase
{
switch (length)
{
case 1:
text.append (getObject ().name);
break;
case 2:
text.append ("\"" + header.stringManager.stringAt (offset) + "\"");
break;
case 3:
int address = header.getWord (ptr + 1) * 2;
text.append (String.format ("R:%05X", address));
break;
case 4:
address = header.getWord (ptr + 3) * 2;
if (address > 0)
text.append ("\"" + header.stringManager.stringAt (address) + "\"");
break;
default:
break;
}
}
else if (propertyType.equals ("DICT"))
{
for (int i = 1; i <= length; i += 2)
{
int address = header.getWord (ptr + i);
text.append (header.wordAt (address) + ", ");
}
text.deleteCharAt (text.length () - 1);
text.deleteCharAt (text.length () - 1);
}
else if (propertyType.startsWith ("CODE"))
{
if (offset > 0) // cretin contains 00 00
{
Routine r = header.codeManager.getRoutine (offset);
if (r != null)
text.append ("\n\n" + r.getText ());
else
// this can happen if the property is mislabelled as code
text.append ("\n\n****** null routine\n");
}
}
else if (propertyType.startsWith ("STR"))
{
text
.append (String.format ("(%4X) \"%s\"", offset, header.stringManager
.stringAt (offset)));
}
@Override
public String toString ()
{
StringBuilder text = new StringBuilder (
String.format ("%5s : ", header.propertyNames[propertyNumber]));
return text.toString ();
}
}
String propertyType = header.propertyNames[propertyNumber];
if (!propertyType.equals ("DICT") && !propertyType.contains ("STR"))
text.append (
String.format ("%-20s", HexFormatter.getHexString (buffer, ptr + 1, length)));
if (propertyType.charAt (0) >= 'a') // directions are in lowercase
{
switch (length)
{
case 1:
text.append (getObject ().name);
break;
case 2:
text.append ("\"" + header.stringManager.stringAt (offset) + "\"");
break;
case 3:
int address = header.getWord (ptr + 1) * 2;
text.append (String.format ("R:%05X", address));
break;
case 4:
address = header.getWord (ptr + 3) * 2;
if (address > 0)
text.append ("\"" + header.stringManager.stringAt (address) + "\"");
break;
default:
break;
}
}
else if (propertyType.equals ("DICT"))
{
for (int i = 1; i <= length; i += 2)
{
int address = header.getWord (ptr + i);
text.append (header.wordAt (address) + ", ");
}
text.deleteCharAt (text.length () - 1);
text.deleteCharAt (text.length () - 1);
}
else if (propertyType.startsWith ("CODE"))
{
if (offset > 0) // cretin contains 00 00
{
Routine r = header.codeManager.getRoutine (offset);
if (r != null)
text.append ("\n\n" + r.getText ());
else // this can happen if the property is mislabelled as code
text.append ("\n\n****** null routine\n");
}
}
else if (propertyType.startsWith ("STR"))
{
text.append (String.format ("(%4X) \"%s\"", offset,
header.stringManager.stringAt (offset)));
}
return text.toString ();
}
}
}