mirror of
https://github.com/marketideas/qasm.git
synced 2024-12-28 06:29:58 +00:00
492 lines
17 KiB
C++
492 lines
17 KiB
C++
/*
|
|
* CiderPress
|
|
* Copyright (C) 2007 by faddenSoft, LLC. All Rights Reserved.
|
|
* See the file LICENSE for distribution terms.
|
|
*/
|
|
/*
|
|
* Convert from one image format to another.
|
|
*/
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <unistd.h>
|
|
#include <memory.h>
|
|
#include <assert.h>
|
|
#include "../diskimg/DiskImg.h"
|
|
#include "../nufxlib/NufxLib.h"
|
|
|
|
using namespace DiskImgLib;
|
|
|
|
#define nil NULL
|
|
#define ASSERT assert
|
|
#define NELEM(x) (sizeof(x) / sizeof((x)[0]))
|
|
|
|
FILE* gLog = nil;
|
|
pid_t gPid = getpid();
|
|
|
|
|
|
/*
|
|
* Handle a debug message from the DiskImg library.
|
|
*/
|
|
/*static*/ void
|
|
MsgHandler(const char* file, int line, const char* msg)
|
|
{
|
|
ASSERT(file != nil);
|
|
ASSERT(msg != nil);
|
|
|
|
fprintf(gLog, "%05u %s", gPid, msg);
|
|
}
|
|
/*
|
|
* Handle a global error message from the NufxLib library by shoving it
|
|
* through the DiskImgLib message function.
|
|
*/
|
|
NuResult
|
|
NufxErrorMsgHandler(NuArchive* /*pArchive*/, void* vErrorMessage)
|
|
{
|
|
const NuErrorMessage* pErrorMessage = (const NuErrorMessage*) vErrorMessage;
|
|
|
|
if (pErrorMessage->isDebug) {
|
|
Global::PrintDebugMsg(pErrorMessage->file, pErrorMessage->line,
|
|
"<nufxlib> [D] %s\n", pErrorMessage->message);
|
|
} else {
|
|
Global::PrintDebugMsg(pErrorMessage->file, pErrorMessage->line,
|
|
"<nufxlib> %s\n", pErrorMessage->message);
|
|
}
|
|
|
|
return kNuOK;
|
|
}
|
|
|
|
/*
|
|
* Convert one disk image to another.
|
|
*/
|
|
DIError
|
|
Convert(const char* infile, const char* outfile)
|
|
{
|
|
DIError dierr = kDIErrNone;
|
|
DiskImg srcImg, dstImg;
|
|
const char* storageName = nil;
|
|
|
|
printf("Converting in='%s' out='%s'\n", infile, outfile);
|
|
|
|
/*
|
|
* Prepare the source image.
|
|
*/
|
|
dierr = srcImg.OpenImage(infile, '/', true);
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr, "Unable to open disk image: %s.\n",
|
|
DiskImgLib::DIStrError(dierr));
|
|
goto bail;
|
|
}
|
|
|
|
dierr = srcImg.AnalyzeImage();
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr, "Unable to determine source image format.\n");
|
|
goto bail;
|
|
}
|
|
|
|
if (!srcImg.GetHasBlocks() && !srcImg.GetHasSectors()) {
|
|
/* add nibble tracks someday */
|
|
fprintf(stderr,
|
|
"Sorry, only block- or sector-addressable images allowed.\n");
|
|
dierr = kDIErrUnsupportedPhysicalFmt;
|
|
goto bail;
|
|
}
|
|
if (srcImg.GetHasBlocks()) {
|
|
assert(srcImg.GetNumBlocks() > 0);
|
|
} else {
|
|
assert(srcImg.GetNumTracks() > 0);
|
|
}
|
|
|
|
if (srcImg.GetSectorOrder() == DiskImg::kSectorOrderUnknown) {
|
|
fprintf(stderr, "(QUERY) don't know sector order\n");
|
|
dierr = kDIErrFilesystemNotFound;
|
|
goto bail;
|
|
}
|
|
|
|
storageName = "MyHappyDisk";
|
|
|
|
/* force the access to be ProDOS-ordered */
|
|
dierr = srcImg.OverrideFormat(srcImg.GetPhysicalFormat(),
|
|
DiskImg::kFormatGenericProDOSOrd, srcImg.GetSectorOrder());
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr, "Couldn't switch to generic ProDOS: %s.\n",
|
|
DiskImgLib::DIStrError(dierr));
|
|
goto bail;
|
|
}
|
|
|
|
/* transfer the DOS volume num, if one was set */
|
|
printf("DOS volume number set to %d\n", srcImg.GetDOSVolumeNum());
|
|
dstImg.SetDOSVolumeNum(srcImg.GetDOSVolumeNum());
|
|
|
|
const DiskImg::NibbleDescr* pNibbleDescr;
|
|
pNibbleDescr = nil;
|
|
|
|
/*
|
|
* Prepare the destination image.
|
|
*
|
|
* We *always* use DiskImg::kFormatGenericProDOSOrd here, because it
|
|
* must match up with what we selected above.
|
|
*
|
|
* We could enable "skipFormat" on all of these but the nibble images,
|
|
* but we go ahead and set it to "false" on all of them just for fun.
|
|
*/
|
|
switch (18) {
|
|
case 0:
|
|
/* 16-sector nibble image, by blocks */
|
|
pNibbleDescr= DiskImg::GetStdNibbleDescr(DiskImg::kNibbleDescrDOS33Std);
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatNib525_6656,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderPhysical,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 1:
|
|
/* 16-sector nibble image, by tracks/sectors */
|
|
pNibbleDescr= DiskImg::GetStdNibbleDescr(DiskImg::kNibbleDescrDOS33Std);
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatNib525_6656,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderPhysical,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
35, 16,
|
|
false);
|
|
break;
|
|
case 2:
|
|
/* 16-sector NB2 nibble image, by tracks/sectors */
|
|
pNibbleDescr= DiskImg::GetStdNibbleDescr(DiskImg::kNibbleDescrDOS33Std);
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatNib525_6384,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderPhysical,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
35, 16,
|
|
false);
|
|
break;
|
|
case 3:
|
|
/* 13-sector nibble image, by tracks/sectors */
|
|
pNibbleDescr= DiskImg::GetStdNibbleDescr(DiskImg::kNibbleDescrDOS32Std);
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatNib525_6656,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderPhysical,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
35, 13,
|
|
false);
|
|
break;
|
|
case 4:
|
|
/* 16-sector nb2 image, by tracks/sectors */
|
|
pNibbleDescr= DiskImg::GetStdNibbleDescr(DiskImg::kNibbleDescrDOS33Std);
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatNib525_6384,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderPhysical,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
35, 16,
|
|
false);
|
|
break;
|
|
case 5:
|
|
/* sector image, by blocks, ProDOS order */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 6:
|
|
/* sector image, by blocks, DOS order */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 7:
|
|
/* sector image, by blocks, ProDOS order, Sim2e */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatSim2eHDV,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 8:
|
|
/* odd-length HUGE sector image, by blocks */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
65535,
|
|
false);
|
|
break;
|
|
case 9:
|
|
/* sector image, by blocks, physical order, with gzip */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatGzip,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderPhysical,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 10:
|
|
/* sector image, by blocks, ProDOS order, with gzip */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatGzip,
|
|
DiskImg::kFileFormatSim2eHDV,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 11:
|
|
/* sector image, by blocks, ProDOS order, 2MG */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormat2MG,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 12:
|
|
/* 16-sector nibble image, by tracks/sectors, 2MG */
|
|
pNibbleDescr= DiskImg::GetStdNibbleDescr(DiskImg::kNibbleDescrDOS33Std);
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormat2MG,
|
|
DiskImg::kPhysicalFormatNib525_6656,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderPhysical,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
35, 16,
|
|
false);
|
|
break;
|
|
case 13:
|
|
/* 16-sector nibble image, by tracks/sectors, 2MG, gzip */
|
|
pNibbleDescr= DiskImg::GetStdNibbleDescr(DiskImg::kNibbleDescrDOS33Std);
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatGzip,
|
|
DiskImg::kFileFormat2MG,
|
|
DiskImg::kPhysicalFormatNib525_6656,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderPhysical,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
35, 16,
|
|
false);
|
|
break;
|
|
case 14:
|
|
/* sector image, by blocks, for DC42 (800K only) */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatDiskCopy42,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 15:
|
|
/* sector image, by blocks, for NuFX */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatNuFX,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 16:
|
|
/* sector image, by blocks, for DDD */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatDDD,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 17:
|
|
/* sector image, by blocks, ProDOS order, stored in ZIP (.po.zip) */
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatZip,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
srcImg.GetNumBlocks(),
|
|
false);
|
|
break;
|
|
case 18:
|
|
/* 13-sector nibble image, by tracks/sectors */
|
|
pNibbleDescr= DiskImg::GetStdNibbleDescr(DiskImg::kNibbleDescrDOS33Std);
|
|
dierr = dstImg.CreateImage(outfile, storageName,
|
|
DiskImg::kOuterFormatNone,
|
|
DiskImg::kFileFormatUnadorned,
|
|
DiskImg::kPhysicalFormatSectors,
|
|
pNibbleDescr,
|
|
DiskImg::kSectorOrderProDOS,
|
|
DiskImg::kFormatGenericProDOSOrd,
|
|
35, 13,
|
|
false);
|
|
break;
|
|
default:
|
|
fprintf(stderr, "UNEXPECTED NUMBER\n");
|
|
abort();
|
|
}
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr, "Couldn't create new image file '%s': %s.\n",
|
|
outfile, DiskImgLib::DIStrError(dierr));
|
|
goto bail;
|
|
}
|
|
|
|
/*
|
|
* Copy blocks or sectors from source to destination.
|
|
*/
|
|
if (srcImg.GetHasBlocks()) {
|
|
int numBlocks;
|
|
numBlocks = srcImg.GetNumBlocks();
|
|
if (dstImg.GetNumBlocks() < srcImg.GetNumBlocks())
|
|
numBlocks = dstImg.GetNumBlocks();
|
|
printf("Copying %d blocks\n", numBlocks);
|
|
|
|
unsigned char blkBuf[512];
|
|
for (int block = 0; block < numBlocks; block++) {
|
|
dierr = srcImg.ReadBlock(block, blkBuf);
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr, "ERROR: ReadBlock failed (err=%d)\n", dierr);
|
|
goto bail;
|
|
}
|
|
dierr = dstImg.WriteBlock(block, blkBuf);
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr, "ERROR: WriteBlock failed (err=%d)\n", dierr);
|
|
goto bail;
|
|
}
|
|
}
|
|
} else {
|
|
int numTracks, numSectPerTrack;
|
|
numTracks = srcImg.GetNumTracks();
|
|
numSectPerTrack = srcImg.GetNumSectPerTrack();
|
|
if (dstImg.GetNumTracks() < srcImg.GetNumTracks())
|
|
numTracks = dstImg.GetNumTracks();
|
|
if (dstImg.GetNumSectPerTrack() < srcImg.GetNumSectPerTrack())
|
|
numSectPerTrack = dstImg.GetNumSectPerTrack();
|
|
printf("Copying %d tracks of %d sectors\n", numTracks, numSectPerTrack);
|
|
|
|
unsigned char sctBuf[256];
|
|
for (int track = 0; track < numTracks; track++) {
|
|
for (int sector = 0; sector < numSectPerTrack; sector++) {
|
|
dierr = srcImg.ReadTrackSector(track, sector, sctBuf);
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr,
|
|
"WARNING: ReadTrackSector failed on T=%d S=%d (err=%d)\n",
|
|
track, sector, dierr);
|
|
dierr = kDIErrNone; // allow bad blocks
|
|
memset(sctBuf, 0, sizeof(sctBuf));
|
|
}
|
|
dierr = dstImg.WriteTrackSector(track, sector, sctBuf);
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr,
|
|
"ERROR: WriteBlock failed on T=%d S=%d (err=%d)\n",
|
|
track, sector, dierr);
|
|
goto bail;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
dierr = srcImg.CloseImage();
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr, "ERROR: srcImg close failed?!\n");
|
|
goto bail;
|
|
}
|
|
|
|
dierr = dstImg.CloseImage();
|
|
if (dierr != kDIErrNone) {
|
|
fprintf(stderr, "ERROR: dstImg close failed (err=%d)\n", dierr);
|
|
goto bail;
|
|
}
|
|
|
|
assert(dierr == kDIErrNone);
|
|
bail:
|
|
return dierr;
|
|
}
|
|
|
|
/*
|
|
* Process every argument.
|
|
*/
|
|
int
|
|
main(int argc, char** argv)
|
|
{
|
|
const char* kLogFile = "iconv-log.txt";
|
|
|
|
if (argc != 3) {
|
|
fprintf(stderr, "%s: infile outfile\n", argv[0]);
|
|
exit(2);
|
|
}
|
|
|
|
gLog = fopen(kLogFile, "w");
|
|
if (gLog == nil) {
|
|
fprintf(stderr, "ERROR: unable to open log file\n");
|
|
exit(1);
|
|
}
|
|
|
|
printf("Image Converter for Linux v1.0\n");
|
|
printf("Copyright (C) 2014 by faddenSoft. All rights reserved.\n");
|
|
int32_t major, minor, bug;
|
|
Global::GetVersion(&major, &minor, &bug);
|
|
printf("Linked against DiskImg library v%d.%d.%d\n",
|
|
major, minor, bug);
|
|
printf("Log file is '%s'\n", kLogFile);
|
|
printf("\n");
|
|
|
|
Global::SetDebugMsgHandler(MsgHandler);
|
|
Global::AppInit();
|
|
|
|
NuSetGlobalErrorMessageHandler(NufxErrorMsgHandler);
|
|
|
|
Convert(argv[1], argv[2]);
|
|
|
|
Global::AppCleanup();
|
|
fclose(gLog);
|
|
|
|
exit(0);
|
|
}
|
|
|