add support for Texas Instruments TI-99/4A TIFILES and raw disk images

This commit is contained in:
Michael Becker 2020-01-03 23:01:42 -05:00
parent 63994e09f0
commit 7af9cd8c3e
No known key found for this signature in database
GPG Key ID: 506F54899E2BFED7
8 changed files with 393 additions and 0 deletions

View File

@ -0,0 +1,25 @@
<?xml version="1.0" encoding="utf-8" ?>
<UniversalEditor Version="4.0">
<Associations>
<Association>
<Filters>
<Filter Title="Texas Instruments DSK disk image">
<FileNameFilters>
<FileNameFilter>*.dsk</FileNameFilter>
</FileNameFilters>
<MagicByteSequences>
<MagicByteSequence>
<MagicByte Type="String" Offset="13">DSK</MagicByte>
</MagicByteSequence>
</MagicByteSequences>
</Filter>
</Filters>
<ObjectModels>
<ObjectModel TypeName="UniversalEditor.ObjectModels.FileSystem.FileSystemObjectModel" />
</ObjectModels>
<DataFormats>
<DataFormat TypeName="UniversalEditor.DataFormats.FileSystem.TexasInstruments.DSK.DSKDataFormat" />
</DataFormats>
</Association>
</Associations>
</UniversalEditor>

View File

@ -0,0 +1,26 @@
<?xml version="1.0" encoding="utf-8" ?>
<UniversalEditor Version="4.0">
<Associations>
<Association>
<Filters>
<Filter Title="Texas Instruments TIFiles archive">
<FileNameFilters>
<FileNameFilter>*.tfi</FileNameFilter>
</FileNameFilters>
<MagicByteSequences>
<MagicByteSequence>
<MagicByte Type="HexString">07</MagicByte>
<MagicByte Type="String">TIFILES</MagicByte>
</MagicByteSequence>
</MagicByteSequences>
</Filter>
</Filters>
<ObjectModels>
<ObjectModel TypeName="UniversalEditor.ObjectModels.FileSystem.FileSystemObjectModel" />
</ObjectModels>
<DataFormats>
<DataFormat TypeName="UniversalEditor.DataFormats.FileSystem.TexasInstruments.TIFiles.TIFilesDataFormat" />
</DataFormats>
</Association>
</Associations>
</UniversalEditor>

View File

@ -663,6 +663,8 @@
<Content Include="Extensions\GameDeveloper\Extensions\Nintendo\Associations\Z64.uexml" />
<Content Include="Editors\Multimedia\Palette\PaletteEditor.uexml" />
<Content Include="Associations\Binary.uexml" />
<Content Include="Extensions\FileSystem\Associations\TexasInstruments\TIFiles.uexml" />
<Content Include="Extensions\FileSystem\Associations\TexasInstruments\DSK.uexml" />
</ItemGroup>
<ItemGroup>
<Content Include="Configuration\Application.upl" />
@ -691,6 +693,7 @@
<Folder Include="Extensions\GameDeveloper\Extensions\Nintendo\" />
<Folder Include="Extensions\GameDeveloper\Extensions\Nintendo\Associations\" />
<Folder Include="Editors\Multimedia\Palette\" />
<Folder Include="Extensions\FileSystem\Associations\TexasInstruments\" />
</ItemGroup>
<ItemGroup>
<Content Include="Extensions\SoftwareDeveloper\Templates\Project\Software Development\Arduino\Images\Blink.xcf" />

View File

@ -0,0 +1,197 @@
using System;
using UniversalEditor.IO;
using UniversalEditor.ObjectModels.FileSystem;
namespace UniversalEditor.DataFormats.FileSystem.TexasInstruments.DSK
{
public class DSKDataFormat : DataFormat
{
private static DataFormatReference _dfr = null;
protected override DataFormatReference MakeReferenceInternal()
{
if (_dfr == null)
{
_dfr = base.MakeReferenceInternal();
_dfr.Capabilities.Add(typeof(FileSystemObjectModel), DataFormatCapabilities.All);
}
return _dfr;
}
/// <summary>
/// Gets or sets the name of the volume. The volume name must have at least one non-space character, and can be any combination of ten ASCII characters except for space, '.', or NULL.
/// </summary>
/// <value>The name of the volume.</value>
[CustomOptionText("_Volume name")]
public string VolumeName { get; set; } = null;
/// <summary>
/// Gets or sets the total number of allocation units on the volume.
/// </summary>
/// <value>The total number of allocation units on the volume.</value>
public short TotalAllocationUnits { get; set; } = 360;
/// <summary>
/// Gets or sets the sectors per track.
/// </summary>
/// <value>The sectors per track.</value>
public byte SectorsPerTrack { get; set; } = 9;
/// <summary>
/// Gets or sets a value indicating whether this <see cref="DSKDataFormat"/> is Proprietary Protected.
/// </summary>
/// <value><c>true</c> if protected; otherwise, <c>false</c>.</value>
[CustomOptionBoolean("_Proprietary protected")]
public bool Protected { get; set; } = false;
public byte TracksPerSide { get; set; } = 40;
public byte NumberOfFormattedSides { get; set; } = 1;
public byte Density { get; set; } = 1;
public int SectorSize { get; set; } = 256;
private long start = 0;
protected override void LoadInternal(ref ObjectModel objectModel)
{
FileSystemObjectModel fsom = (objectModel as FileSystemObjectModel);
if (fsom == null)
throw new ObjectModelNotSupportedException();
Reader reader = Accessor.Reader;
start = Accessor.Position;
reader.Endianness = Endianness.BigEndian;
string volumeName = reader.ReadFixedLengthString(10);
volumeName = volumeName.Trim(); // it is space-filled to the right
VolumeName = volumeName;
TotalAllocationUnits = reader.ReadInt16();
SectorsPerTrack = reader.ReadByte();
string signature = reader.ReadFixedLengthString(3);
if (signature != "DSK")
throw new InvalidDataFormatException("file does not contain 'DSK' signature");
char protection = reader.ReadChar();
if (protection == 'P')
Protected = true;
TracksPerSide = reader.ReadByte();
NumberOfFormattedSides = reader.ReadByte();
Density = reader.ReadByte();
reader.Seek(start + 56, SeekOrigin.Begin);
byte[] allocationBitmap = reader.ReadBytes(200); // The map can control up to 1600 256-byte sectors
// ===== FILE DESCRIPTOR INDEX RECORD, (Sector l) =====
//
// This sector contains up to 127 two-byte entries. Each of these points to a File Descriptor Record, and are alphabetically sorted according
// to the file name in the File Descriptor Record. The list starts at the beginning of the block, and ends with a zero entry.
//
// As the file descriptors are alphabetically sorted, a binary search can be used to find any given filename. This limits the maximum number
// of searches to 7 if more than 63 files are defined. Generally if between 2 * *(N - 1) and 2 * *n files are defined, a file search will take
// at the most N disc searches. To obtain faster directory response times, data blocks are normally allocated in the area above sector 222, the
// area below this being used for file descriptors and only used for file data when there are no more sectors available above > 22.
SeekToSector(1);
int totalIndices = 0;
short[] indices = new short[127];
for (int i = 0; i < 127; i++)
{
short index = reader.ReadInt16();
indices[i] = index;
if (index == 0)
break;
totalIndices++;
}
// we should be at offset 256 by now
for (int i = 0; i < totalIndices; i++)
{
SeekToSector(indices[i]);
string filename = reader.ReadFixedLengthString(10);
filename = filename.Trim();
// reserved for an extension of the number of data chain pointers - never implemented, so always 0.
ushort reserved1 = reader.ReadUInt16();
DSKFileStatusFlags flags = (DSKFileStatusFlags)reader.ReadByte();
byte nRecordsPerAU = reader.ReadByte();
ushort nL2RecordsAllocated = reader.ReadUInt16();
byte eofOffset = reader.ReadByte();
byte logicalRecordSize = reader.ReadByte();
ushort nL3RecordsAllocated = reader.ReadUInt16();
reader.Seek(8, SeekOrigin.Current); // reserved
long offset = 0;
long length = 0;
for (int j = 0; j < 76; j++)
{
byte b1 = reader.ReadByte();
byte b2 = reader.ReadByte();
long sectorOffset = (long)b1 | (byte)((long)b2 << 4);
if (offset == 0)
offset = sectorOffset;
byte b3 = reader.ReadByte();
if (b1 == 0 && b2 == 0 && b3 == 0)
break;
long sectorCount = (long)((byte)(b3 << 4) | b2 >> 4) + 1;
Console.WriteLine("adding file {0} : start {1} length {2} end {3}", filename, sectorOffset, sectorCount, sectorOffset + sectorCount);
length = sectorCount;
}
File file = fsom.AddFile(filename);
file.Size = (length * 256);
file.Properties.Add("reader", reader);
file.Properties.Add("offset", offset * 256);
file.Properties.Add("length", length * 256);
file.DataRequest += File_DataRequest;
}
}
void File_DataRequest(object sender, DataRequestEventArgs e)
{
File file = (sender as File);
long offset = (long)file.Properties["offset"];
long length = (long)file.Properties["length"];
Reader reader = (Reader)file.Properties["reader"];
reader.Seek(offset, SeekOrigin.Begin);
e.Data = reader.ReadBytes(length);
}
private void SeekToSector(long sector)
{
Accessor.Seek(start + (sector * SectorSize), SeekOrigin.Begin);
}
protected override void SaveInternal(ObjectModel objectModel)
{
FileSystemObjectModel fsom = (objectModel as FileSystemObjectModel);
if (fsom == null)
throw new ObjectModelNotSupportedException();
Writer writer = Accessor.Writer;
writer.Endianness = Endianness.BigEndian;
writer.WriteFixedLengthString(VolumeName, 10, ' ');
writer.WriteInt16(TotalAllocationUnits);
writer.WriteByte(SectorsPerTrack);
writer.WriteFixedLengthString("DSK");
if (Protected)
writer.WriteChar('P');
else
writer.WriteChar(' ');
writer.WriteByte(TracksPerSide);
}
}
}

View File

@ -0,0 +1,37 @@
using System;
namespace UniversalEditor.DataFormats.FileSystem.TexasInstruments.DSK
{
[Flags()]
public enum DSKFileStatusFlags
{
/*
* Bit No. Description
0 ... File type indicator.
........ 0 = Data file
........ 1 = Program file
1 ... Data type indicator
........ 0 = ASCII data (DISPLAY file)
........ 1 = Binary data (INTERNAL or PROGRAM file)
2 ... This bit was reserved for expansion of the data
... type indicator.
3 ... PROTECT FLAG
........ 0 = NOT protected
........ 1 = Protected
4,5 and 6 These bits were reserved for expansion of ????
7 .... Fixed/variable flag
........ 0 = Fixed record lengths
........ 1 = Variable record lengths
*/
None = 0x00,
Program = 0x01,
Binary = 0x02,
Protected = 0x08,
/*
Reserved1 = 0x10,
Reserved2 = 0x20,
Reserved3 = 0x40,
*/
Variable = 0x80
}
}

View File

@ -0,0 +1,90 @@
using System;
using UniversalEditor.IO;
using UniversalEditor.ObjectModels.FileSystem;
namespace UniversalEditor.DataFormats.FileSystem.TexasInstruments
{
public class TIFilesDataFormat : DataFormat
{
private static DataFormatReference _dfr = null;
protected override DataFormatReference MakeReferenceInternal()
{
if (_dfr == null)
{
_dfr = base.MakeReferenceInternal();
_dfr.Capabilities.Add(typeof(FileSystemObjectModel), DataFormatCapabilities.All);
}
return _dfr;
}
protected override void LoadInternal(ref ObjectModel objectModel)
{
FileSystemObjectModel fsom = (objectModel as FileSystemObjectModel);
if (fsom == null)
throw new ObjectModelNotSupportedException();
Reader reader = Accessor.Reader;
reader.Endianness = Endianness.BigEndian;
byte isMultiTransfer = reader.ReadByte();
string signature = reader.ReadFixedLengthString(7);
if (signature != "TIFILES")
throw new InvalidDataFormatException("file does not contain 'TIFILES' signature");
if (isMultiTransfer == 0x07)
{
}
else if (isMultiTransfer == 0x08)
{
throw new InvalidDataFormatException("MXT YModem multiple file transfer not supported");
}
else
{
throw new InvalidDataFormatException("first byte of file unrecognized (0x07 = normal, 0x08 = MXT YModem multiple file transfer)");
}
ushort sectorCount = reader.ReadUInt16();
TIFilesFlags flags = (TIFilesFlags) reader.ReadByte();
byte recordsPerSector = reader.ReadByte();
byte eofOffset = reader.ReadByte();
byte recordLength = reader.ReadByte();
ushort level3RecordCount = reader.ReadUInt16();
string fileName = reader.ReadFixedLengthString(10);
fileName = fileName.TrimNull();
if (String.IsNullOrEmpty(fileName))
{
fileName = System.IO.Path.GetFileNameWithoutExtension(Accessor.GetFileName()).ToUpper();
}
byte mxt = reader.ReadByte();
byte reserved1 = reader.ReadByte();
ushort extendedHeader = reader.ReadUInt16();
uint creationTimestamp = reader.ReadUInt32();
uint modificationTimestamp = reader.ReadUInt32();
File f = fsom.AddFile(fileName);
f.DataRequest += F_DataRequest;
f.Properties.Add("offset", reader.Accessor.Position);
f.Properties.Add("reader", reader);
}
void F_DataRequest(object sender, DataRequestEventArgs e)
{
File f = (sender as File);
Reader reader = (Reader)f.Properties["reader"];
long offset = (long)f.Properties["offset"];
reader.Seek(offset, SeekOrigin.Begin);
e.Data = reader.ReadToEnd();
}
protected override void SaveInternal(ObjectModel objectModel)
{
FileSystemObjectModel fsom = (objectModel as FileSystemObjectModel);
if (fsom == null)
throw new ObjectModelNotSupportedException();
}
}
}

View File

@ -0,0 +1,8 @@
using System;
namespace UniversalEditor.DataFormats.FileSystem.TexasInstruments
{
public enum TIFilesFlags : byte
{
None = 0x00
}
}

View File

@ -233,6 +233,10 @@
<Compile Include="DataFormats\FileSystem\WinAce\ACEHeaderFlags.cs" />
<Compile Include="DataFormats\FileSystem\SlightlyMadStudios\BFFDataFormat.cs" />
<Compile Include="DataFormats\FileSystem\SlightlyMadStudios\BFFCompressionType.cs" />
<Compile Include="DataFormats\FileSystem\TexasInstruments\TIFiles\TIFilesDataFormat.cs" />
<Compile Include="DataFormats\FileSystem\TexasInstruments\TIFiles\TIFilesFlags.cs" />
<Compile Include="DataFormats\FileSystem\TexasInstruments\DSK\DSKDataFormat.cs" />
<Compile Include="DataFormats\FileSystem\TexasInstruments\DSK\DSKFileStatusFlags.cs" />
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\..\Libraries\UniversalEditor.Core\UniversalEditor.Core.csproj">
@ -271,6 +275,9 @@
<Folder Include="DataFormats\FileSystem\HA\" />
<Folder Include="DataFormats\FileSystem\HyperArchiver\" />
<Folder Include="DataFormats\FileSystem\SlightlyMadStudios\" />
<Folder Include="DataFormats\FileSystem\TexasInstruments\" />
<Folder Include="DataFormats\FileSystem\TexasInstruments\TIFiles\" />
<Folder Include="DataFormats\FileSystem\TexasInstruments\DSK\" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.