Function New_DOSProDOS_Disk

source/ProDOS_Utils.cpp:758–815

// public functions

void New_DOSProDOS_Disk( const char * pTitle, const std::string & pathname, const size_t nDiskSize,
	const bool bIsDOS33, const bool bNewDiskCopyBitsyBoot, const bool bNewDiskCopyBitsyBye, const bool bNewDiskCopyBASIC, const bool bNewDiskCopyProDOS,
	FrameBase *pFrame )
{
	FILE *hFile = fopen( pathname.c_str(), "wb");
	if (hFile)
	{
		std::vector<uint8_t> pDiskBytes(nDiskSize, 0);

		if (bIsDOS33)
		{
			// File System
			int VTOC_TRACK = 0x11; // TODO: Allow user to over-ride via command-line argument? --vtoc 17
			Util_DOS33_FormatFileSystem( pDiskBytes.data(), nDiskSize, VTOC_TRACK );
			
			// Boot Sector + OS
			const size_t nDOS33Size = 3 * 16 * 256; // First 3 tracks * 16 sectors/track * 256 bytes/sector
			const BYTE  *pDOS33Data = pFrame->GetResource(IDR_OS_DOS33, "FIRMWARE", nDOS33Size);
			if (pDOS33Data)
			{
				memcpy( pDiskBytes.data(), pDOS33Data, nDOS33Size );

				// DOS 3.3 resides on Track 0, 1, 2
				// Track 0 was already reserved when the file system was formatted.
				Util_DOS33_SetTrackUsed( pDiskBytes.data(), VTOC_TRACK, 1 );
				Util_DOS33_SetTrackUsed( pDiskBytes.data(), VTOC_TRACK, 2 );
			}
			else
			{
				pFrame->FrameMessageBox( "WARNING: Could't find built-in DOS 3.3 Operating System!\n\nDisk will have no boot sector.", pTitle, MB_OK|MB_ICONINFORMATION);
			}
		}
		else // ProDOS
		{
			const size_t   nBootSectorsSize = 2 * 512;
			const uint8_t *pBootSectorsData = (uint8_t*) pFrame->GetResource(IDR_BOOT_SECTOR_PRODOS243, "FIRMWARE", nBootSectorsSize);
			assert(pBootSectorsData);

			SectorOrder_e eSectorOrder = INTERLEAVE_PRODOS_ORDER;
			const char *pVolumeName = "BLANK";
			Util_ProDOS_ForwardSectorInterleave( pDiskBytes.data(), nDiskSize, eSectorOrder );
			Util_ProDOS_FormatFileSystem       ( pDiskBytes.data(), nDiskSize, pVolumeName  );
			memcpy(pDiskBytes.data(), pBootSectorsData, nBootSectorsSize);
			if (bNewDiskCopyBitsyBoot) Util_ProDOS_CopyBitsyBoot( pDiskBytes.data(), nDiskSize, pVolumeName, pFrame );
			if (bNewDiskCopyBitsyBye)  Util_ProDOS_CopyBitsyBye ( pDiskBytes.data(), nDiskSize, pVolumeName, pFrame );
			if (bNewDiskCopyBASIC)     Util_ProDOS_CopyBASIC    ( pDiskBytes.data(), nDiskSize, pVolumeName, pFrame );
			if (bNewDiskCopyProDOS)    Util_ProDOS_CopyDOS      ( pDiskBytes.data(), nDiskSize, pVolumeName, pFrame );
			Util_ProDOS_ReverseSectorInterleave( pDiskBytes.data(), nDiskSize, eSectorOrder );
		}

		fwrite( pDiskBytes.data(), 1, nDiskSize, hFile );
		fclose( hFile );
	}
	else
	{
		pFrame->FrameMessageBox( "ERROR: Couldn't open new disk image.", pTitle, MB_OK );
	}
}