PutFile.cpp

// PutFile.cpp : インプリメンテーション ファイル
//

#include "stdafx.h"
#include "MZDiskExplorer.h"
#include "PutFile.h"
#include "MzDisk/MzDisk.hpp"
#include "MzDisk/Mz80Disk.hpp"
#include "MzDisk/Mz80SP6110Disk.hpp"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// cPutFile ダイアログ


cPutFile::cPutFile(CWnd* pParent /*=NULL*/)
	: CDialog(cPutFile::IDD, pParent)
,DataPath()
,FileName()
,Mode(0)
,Attr(0)
,Reserve(0)
,FileSize(0)
,LoadAdr(0)
,RunAdr(0)
,Year(0)
,Month(0)
,Day(0)
,Hour(0)
,Minute(0)
,FileType(0)
,Size64KBObj(false)
,MzDiskClass(NULL)
,m_Hour()
,m_Month()
,m_Minute()
,m_Day()
,m_Year()
,m_RunAdr()
,m_Mode()
,m_LoadAdr()
,m_FileSize()
,m_FileName()
,m_Attr()
{
	//{{AFX_DATA_INIT(cPutFile)
		// メモ - ClassWizard はこの位置にマッピング用のマクロを追加または削除します。
	//}}AFX_DATA_INIT
}

void cPutFile::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(cPutFile)
	DDX_Control(pDX, IDC_HOUR, m_Hour);
	DDX_Control(pDX, IDC_MONTH, m_Month);
	DDX_Control(pDX, IDC_MINUTE, m_Minute);
	DDX_Control(pDX, IDC_DAY, m_Day);
	DDX_Control(pDX, IDC_YEAR, m_Year);
	DDX_Control(pDX, IDC_RUNADR, m_RunAdr);
	DDX_Control(pDX, IDC_MODE, m_Mode);
	DDX_Control(pDX, IDC_LOADADR, m_LoadAdr);
	DDX_Control(pDX, IDC_FILESIZE, m_FileSize);
	DDX_Control(pDX, IDC_FILENAME, m_FileName);
	DDX_Control(pDX, IDC_ATTR, m_Attr);
	//}}AFX_DATA_MAP
	DDX_Control(pDX, IDC_MZT_FILENAME, m_IsMztFilename);
	DDX_Control(pDX, IDC_RESERVE, m_Reserve);
}

BEGIN_MESSAGE_MAP(cPutFile, CDialog)
	//{{AFX_MSG_MAP(cPutFile)
	ON_WM_CREATE()
	//}}AFX_MSG_MAP
	ON_BN_CLICKED(IDC_MZT_FILENAME, &cPutFile::OnClickedMztFilename)
	ON_CBN_SELCHANGE(IDC_MODE, &cPutFile::OnSelchangeMode)
END_MESSAGE_MAP()

BOOL cPutFile::OnInitDialog() 
{
	char temp[ 20 ];
	CDialog::OnInitDialog();
	
	// TODO: この位置に初期化の補足処理を追加してください
	m_FileName.SetSel( 0, -1, FALSE );
	m_FileName.Clear();
	m_FileName.ReplaceSel( FileName.GetBuffer( 260 ) );
	if ( FileType != 0 )
	{
		// MZT
		m_IsMztFilename.SetCheck(BST_CHECKED);
		m_IsMztFilename.EnableWindow(TRUE);
		m_FileName.EnableWindow(FALSE);
	}
	else
	{
		m_IsMztFilename.SetCheck(BST_UNCHECKED);
		m_IsMztFilename.EnableWindow(FALSE);
		m_FileName.EnableWindow(TRUE);
	}
	m_Mode.SetCurSel( Mode - 1 );
	m_Attr.SetCurSel( Attr & 1 );
	m_Reserve.SetSel( 0, -1, FALSE );
	m_Reserve.Clear();
	sprintf_s( temp, sizeof(temp), "%02X", Reserve );
	m_Reserve.ReplaceSel( temp );
	m_FileSize.SetSel( 0, -1, FALSE );
	m_FileSize.Clear();
	sprintf_s( temp, sizeof(temp), "%d", FileSize );
	m_FileSize.ReplaceSel( temp );
	m_LoadAdr.SetSel( 0, -1, FALSE );
	m_LoadAdr.Clear();
	sprintf_s( temp, sizeof(temp), "%04X", LoadAdr );
	m_LoadAdr.ReplaceSel( temp );
	m_RunAdr.SetSel( 0, -1, FALSE );
	m_RunAdr.Clear();
	sprintf_s( temp, sizeof(temp), "%04X", RunAdr );
	m_RunAdr.ReplaceSel( temp );
	m_Year.Clear();
	sprintf_s( temp, sizeof(temp), "%02d", Year );
	m_Year.ReplaceSel( temp );
	m_Month.Clear();
	sprintf_s( temp, sizeof(temp), "%02d", Month );
	m_Month.ReplaceSel( temp );
	m_Day.Clear();
	sprintf_s( temp, sizeof(temp), "%02d", Day );
	m_Day.ReplaceSel( temp );
	m_Hour.Clear();
	sprintf_s( temp, sizeof(temp), "%02d", Hour );
	m_Hour.ReplaceSel( temp );
	m_Minute.Clear();
	sprintf_s( temp, sizeof(temp), "%02d", Minute );
	m_Minute.ReplaceSel( temp );
	if((MzDiskClass->DiskType() == Disk::MZ80K_SP6010) || (MzDiskClass->DiskType() == Disk::MZ80K_SP6110))
	{
		m_Reserve.EnableWindow(FALSE);
		m_Year.EnableWindow(FALSE);
		m_Month.EnableWindow(FALSE);
		m_Day.EnableWindow(FALSE);
		m_Hour.EnableWindow(FALSE);
		m_Minute.EnableWindow(FALSE);
	}
	else
	{
		m_Reserve.EnableWindow(TRUE);
		m_Year.EnableWindow(TRUE);
		m_Month.EnableWindow(TRUE);
		m_Day.EnableWindow(TRUE);
		m_Hour.EnableWindow(TRUE);
		m_Minute.EnableWindow(TRUE);
	}
	return TRUE;  // コントロールにフォーカスを設定しないとき、戻り値は TRUE となります
	              // 例外: OCX プロパティ ページの戻り値は FALSE となります
}

void cPutFile::OnOK() 
{
	// TODO: この位置にその他の検証用のコードを追加してください
	if(MzDiskClass->DiskType() == Disk::MZ2000)
	{
		MzDisk::DIRECTORY dir;
		int i;
		char temp[ 261 ];
		char *temp2;
		int mode = 0;
		m_FileName.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		int size = m_FileName.GetLine( 0, temp, 16 );
		temp[size] = '\0';
		FileName = temp;
		Mode = m_Mode.GetCurSel() + 1;
		if( 1 == m_Attr.GetCurSel() )
		{
			Attr |= 0x1;
		}
		ZeroMemory( temp, sizeof( temp ) );
		size = m_Reserve.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		Reserve = (unsigned char)strtol( temp, &temp2, 16 );
		m_FileSize.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		size = m_FileSize.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		FileSize = atoi( temp );
		m_LoadAdr.SetSel( 0, -1, FALSE );
		temp[size] = '\0';
		ZeroMemory( temp, sizeof( temp ) );
		size = m_LoadAdr.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		LoadAdr = (unsigned short)strtol( temp, &temp2, 16 );
		m_RunAdr.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		size = m_RunAdr.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		RunAdr = (unsigned short)strtol( temp, &temp2, 16 );
		// 日付
		size = m_Year.GetLine(0, temp, 260);
		temp[size] = '\0';
		Year = (int)strtol(temp, &temp2, 10);
		size = m_Month.GetLine(0, temp, 260);
		temp[size] = '\0';
		Month = (int)strtol(temp, &temp2, 10);
		size = m_Day.GetLine(0, temp, 260);
		temp[size] = '\0';
		Day = (int)strtol(temp, &temp2, 10);
		size = m_Hour.GetLine(0, temp, 260);
		temp[size] = '\0';
		Hour = (int)strtol(temp, &temp2, 10);
		size = m_Minute.GetLine(0, temp, 260);
		temp[size] = '\0';
		Minute = (int)strtol(temp, &temp2, 10);
		ZeroMemory( &dir, sizeof( dir ) );
		dir.mode = Mode;
		if( 5 == dir.mode )
		{
			dir.mode = 3;
		}
		if ((FileType != 0) && (m_IsMztFilename.GetCheck() == BST_CHECKED))
		{
			// MZTのファイル名を使用する
			ZeroMemory(dir.filename, sizeof(dir.filename));
			memcpy_s(dir.filename, sizeof(dir.filename), &mztFilename[0], 16);
		}
		else
		{
			// 入力されたファイル名を使用する
			std::string filename = FileName.GetBuffer( 16 );
			std::string mzFilename = MzDiskClass->ConvertMzText(filename);
			mzFilename.resize(17);
			strncpy_s( dir.filename, sizeof(dir.filename), &mzFilename[0], 16 );
		}
		for ( i = 0; i < 17; i ++ )
		{
			if ( '\0' == dir.filename[ i ] )
			{
				dir.filename[ i ] = '\xD';
				break;
			}
		}
		dir.attr = Attr;
		if(dir.mode == 4)
		{
			dir.size = FileSize / 32;
		}
		else
		{
			dir.size = FileSize;
		}
		dir.loadAdr = LoadAdr;
		dir.runAdr = RunAdr;
		dir.reserve = Reserve;
		dir.date = ( ( ( Year % 100 ) / 10 ) << 28 ) +
					( ( ( Year % 100 ) % 10 ) << 24 ) +
					( ( Month / 10 ) << 23 ) +
					( ( Month % 10 ) << 19 ) +
					( ( Day / 10 ) << 17 ) +
					( ( Day % 10 ) << 13 ) +
					( ( Hour / 10 ) << 11 ) +
					( ( Hour % 10 ) << 7 ) +
					( ( Minute / 10 ) << 4 ) +
					( ( Minute % 10 ) );
		dir.date = ( dir.date >> 24 ) + ( ( dir.date >> 8 ) & 0xFF00 ) + ( ( dir.date << 8 ) & 0xFF0000 ) + ( ( dir.date << 24 ) & 0xFF000000 );
		int result;
		if ( 0 == FileType )
		{
			result = MzDiskClass->PutFile( DataPath.GetBuffer( 260 ), &dir, Disk::FILEMODE_BIN, Mode );
		}
		else
		{
			result = MzDiskClass->PutFile( DataPath.GetBuffer( 260 ), &dir, Disk::FILEMODE_MZT, Mode );
		}
		if( 1 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nディレクトリに空きがありません.", "エラー", MB_OK );
		}
		else if( ( 2 == result ) || ( 3 == result ) )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nファイルを読み込むことができません.", "エラー", MB_OK );
		}
		else if( 4 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nビットマップの空きがありません.", "エラー", MB_OK );
		}
		else if( 5 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \n同じファイル名がすでに存在します.", "エラー", MB_OK );
		}
		else if( 0 != result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \n原因は不明です.", "エラー", MB_OK );
		}
	}
	else if(MzDiskClass->DiskType() == Disk::MZ80K_SP6010)
	{
		Mz80Disk::DIRECTORY dir;
		int i;
		char temp[ 261 ];
		char *temp2;
		int mode = 0;
		m_FileName.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		int size = m_FileName.GetLine( 0, temp, 16 );
		temp[size] = '\0';
		FileName = temp;
		Mode = m_Mode.GetCurSel() + 1;
		if( 1 == m_Attr.GetCurSel() )
		{
			Attr |= 0x1;
		}
		m_FileSize.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		size = m_FileSize.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		FileSize = atoi( temp );
		m_LoadAdr.SetSel( 0, -1, FALSE );
		temp[size] = '\0';
		ZeroMemory( temp, sizeof( temp ) );
		size = m_LoadAdr.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		LoadAdr = (unsigned short)strtol( temp, &temp2, 16 );
		m_RunAdr.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		size = m_RunAdr.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		size = RunAdr = (unsigned short)strtol( temp, &temp2, 16 );

		ZeroMemory( &dir, sizeof( dir ) );
		dir.mode = Mode;
		if( dir.mode >= 2 )
		{
			dir.mode = 0;
		}
		if ((FileType != 0) && (m_IsMztFilename.GetCheck() == BST_CHECKED))
		{
			// MZTのファイル名を使用する
			ZeroMemory(dir.filename, sizeof(dir.filename));
			memcpy_s(dir.filename, sizeof(dir.filename), &mztFilename[0], 16);
		}
		else
		{
			// 入力されたファイル名を使用する
			std::string filename = FileName.GetBuffer( 16 );
			std::string mzFilename = MzDiskClass->ConvertMzText(filename);
			mzFilename.resize(17);
			strncpy_s( dir.filename, sizeof(dir.filename), &mzFilename[0], 16 );
		}
		for ( i = 0; i < 17; i ++ )
		{
			if ( '\0' == dir.filename[ i ] )
			{
				dir.filename[ i ] = '\xD';
				break;
			}
		}
		dir.attr = Attr;
		if(dir.mode == 4)
		{
			dir.size = FileSize / 32;
		}
		else
		{
			dir.size = FileSize;
		}
		dir.loadAdr = LoadAdr;
		dir.runAdr = RunAdr;
		int result;
		if ( 0 == FileType )
		{
			result = MzDiskClass->PutFile( DataPath.GetBuffer( 260 ), &dir, Disk::FILEMODE_BIN, Mode );
		}
		else
		{
			result = MzDiskClass->PutFile( DataPath.GetBuffer( 260 ), &dir, Disk::FILEMODE_MZT, Mode );
		}
		if( 1 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nディレクトリに空きがありません.", "エラー", MB_OK );
		}
		else if( ( 2 == result ) || ( 3 == result ) )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nファイルを読み込むことができません.", "エラー", MB_OK );
		}
		else if( 4 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nビットマップの空きがありません.", "エラー", MB_OK );
		}
		else if( 5 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \n同じファイル名がすでに存在します.", "エラー", MB_OK );
		}
		else if( 0 != result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \n原因は不明です.", "エラー", MB_OK );
		}
	}
	else if(MzDiskClass->DiskType() == Disk::MZ80K_SP6110)
	{
		MzDisk::DIRECTORY dir;
		int i;
		char temp[ 261 ];
		char *temp2;
		int mode = 0;
		m_FileName.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		int size = m_FileName.GetLine( 0, temp, 16 );
		temp[size] = '\0';
		FileName = temp;
		Mode = m_Mode.GetCurSel() + 1;
		if( 1 == m_Attr.GetCurSel() )
		{
			Attr |= 0x1;
		}
		m_FileSize.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		size = m_FileSize.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		FileSize = atoi( temp );
		m_LoadAdr.SetSel( 0, -1, FALSE );
		temp[size] = '\0';
		ZeroMemory( temp, sizeof( temp ) );
		size = m_LoadAdr.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		LoadAdr = (unsigned short)strtol( temp, &temp2, 16 );
		m_RunAdr.SetSel( 0, -1, FALSE );
		ZeroMemory( temp, sizeof( temp ) );
		size = m_RunAdr.GetLine( 0, temp, 260 );
		temp[size] = '\0';
		RunAdr = (unsigned short)strtol( temp, &temp2, 16 );
		// 日付
		size = m_Year.GetLine(0, temp, 260);
		temp[size] = '\0';
		Year = (int)strtol(temp, &temp2, 10);
		size = m_Month.GetLine(0, temp, 260);
		temp[size] = '\0';
		Month = (int)strtol(temp, &temp2, 10);
		size = m_Day.GetLine(0, temp, 260);
		temp[size] = '\0';
		Day = (int)strtol(temp, &temp2, 10);
		size = m_Hour.GetLine(0, temp, 260);
		temp[size] = '\0';
		Hour = (int)strtol(temp, &temp2, 10);
		size = m_Minute.GetLine(0, temp, 260);
		temp[size] = '\0';
		Minute = (int)strtol(temp, &temp2, 10);

		ZeroMemory( &dir, sizeof( dir ) );
		dir.mode = Mode;
		if( 5 == dir.mode )
		{
			dir.mode = 3;
		}
		if ((FileType != 0) && (m_IsMztFilename.GetCheck() == BST_CHECKED))
		{
			// MZTのファイル名を使用する
			ZeroMemory(dir.filename, sizeof(dir.filename));
			memcpy_s(dir.filename, sizeof(dir.filename), &mztFilename[0], 16);
		}
		else
		{
			// 入力されたファイル名を使用する
			std::string filename = FileName.GetBuffer( 16 );
			std::string mzFilename = MzDiskClass->ConvertMzText(filename);
			mzFilename.resize(17);
			strncpy_s( dir.filename, sizeof(dir.filename), &mzFilename[0], 16 );
		}
		for ( i = 0; i < 17; i ++ )
		{
			if ( '\0' == dir.filename[ i ] )
			{
				dir.filename[ i ] = '\xD';
				break;
			}
		}
		dir.attr = Attr;
		if(dir.mode == 4)
		{
			dir.size = FileSize / 32;
		}
		else
		{
			dir.size = FileSize;
		}
		dir.loadAdr = LoadAdr;
		dir.runAdr = RunAdr;
		dir.date = 0;
		int result;
		if ( 0 == FileType )
		{
			result = MzDiskClass->PutFile( DataPath.GetBuffer( 260 ), &dir, Disk::FILEMODE_BIN, Mode );
		}
		else
		{
			result = MzDiskClass->PutFile( DataPath.GetBuffer( 260 ), &dir, Disk::FILEMODE_MZT, Mode );
		}
		if( 1 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nディレクトリに空きがありません.", "エラー", MB_OK );
		}
		else if( ( 2 == result ) || ( 3 == result ) )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nファイルを読み込むことができません.", "エラー", MB_OK );
		}
		else if( 4 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \nビットマップの空きがありません.", "エラー", MB_OK );
		}
		else if( 5 == result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \n同じファイル名がすでに存在します.", "エラー", MB_OK );
		}
		else if( 0 != result )
		{
			MessageBox( "ディスクイメージへのファイル書き込みに失敗しました. \n原因は不明です.", "エラー", MB_OK );
		}
	}
	CDialog::OnOK();
}

void cPutFile::OnClickedMztFilename()
{
	// TODO: ここにコントロール通知ハンドラー コードを追加します。
	if (m_IsMztFilename.GetCheck() == BST_CHECKED)
	{
		m_FileName.EnableWindow(FALSE);
	}
	else
	{
		m_FileName.EnableWindow(TRUE);
	}
}


void cPutFile::OnSelchangeMode()
{
	// TODO: ここにコントロール通知ハンドラー コードを追加します。
	Mode = m_Mode.GetCurSel() + 1;
	if(Mode == 4)
	{
		if(Size64KBObj == true)
		{
			FileSize = 65536;
		}
	}
	else
	{
		if(Size64KBObj == true)
		{
			FileSize = 65535;
		}
	}
	char temp[ 20 ];
	m_FileSize.SetSel( 0, -1, FALSE );
	m_FileSize.Clear();
	sprintf_s( temp, sizeof(temp), "%d", FileSize );
	m_FileSize.ReplaceSel( temp );
}