Function Format_ProDOS_Disk

source/ProDOS_Utils.cpp:899–962

}

void Format_ProDOS_Disk( const std::string & pathname, FrameBase *pFrame )
{
	FILE *hFile = fopen( pathname.c_str(), "r+b" );
	if (hFile)
	{
		fseek( hFile, 0, SEEK_END );
		size_t nDiskSize = ftell( hFile );
		fseek( hFile, 0, SEEK_SET );

		size_t nMaxDiskSize = HARDDISK_32M_SIZE;

		if (nDiskSize > nMaxDiskSize)
		{
			std::string sMessage(StrFormat(
					"ERROR: Disk Image Size (%zu bytes) > maximum ProDOS volume size (%zu bytes)"
				, nDiskSize
				, nMaxDiskSize
			));
			pFrame->FrameMessageBox( sMessage.c_str(), "Format", MB_ICONWARNING | MB_OK);
		}
		else
		{
			std::vector<uint8_t> pDiskBytes(nDiskSize);
			size_t nReadSize = fread( pDiskBytes.data(), 1, nDiskSize, hFile );
			assert( nReadSize == nDiskSize );

			// We can have DOS or ProDOS sector interleaving
			//     Extension  Interleave
			//     .bin       Unknown, assume DOS
			//     .dsk       DOS
			//     .po        ProDOS
			//     .hdv       ProDOS
			SectorOrder_e eSectorOrder = Util_Disk_CalculateSectorOrder( pathname );
			if (eSectorOrder == INTERLEAVE_AUTO_DETECT)
			{
				int res = pFrame->FrameMessageBox(
					"Unable to auto-detect the disk image sector order!\n"
					"\n"
					"Is this image using a ProDOS sector order?\n"
					"(No will use DOS 3.3 sector order)"
					, "Format", MB_ICONWARNING|MB_YESNO);
				eSectorOrder = (res == IDYES)
											? INTERLEAVE_PRODOS_ORDER
											: INTERLEAVE_DOS33_ORDER
												;
			}
			assert (eSectorOrder !=  INTERLEAVE_AUTO_DETECT);

			const char *pVolumeName = "BLANK";
			Util_ProDOS_ForwardSectorInterleave( pDiskBytes.data(), nDiskSize, eSectorOrder );
			Util_ProDOS_FormatFileSystem       ( pDiskBytes.data(), nDiskSize, pVolumeName  );
			Util_ProDOS_ReverseSectorInterleave( pDiskBytes.data(), nDiskSize, eSectorOrder );

			fseek( hFile, 0, SEEK_SET );
			size_t nWroteSize = fwrite( pDiskBytes.data(), 1, nReadSize, hFile );
			if (nWroteSize != nDiskSize)
			{
				pFrame->FrameMessageBox( "ERROR: Unable to write ProDOS File System", "Format", MB_ICONWARNING | MB_OK);