5128eecc9f 2011-02-23        kinaba: //--- K.I.LIB ---
5128eecc9f 2011-02-23        kinaba: // kl_file.cpp : file operations
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: #include "stdafx.h"
5128eecc9f 2011-02-23        kinaba: #include "kilib.h"
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: //--------------------------- static --------------------------//
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: unsigned long kiFile::getSize( const char* fname, unsigned long err )
5128eecc9f 2011-02-23        kinaba: {
5128eecc9f 2011-02-23        kinaba: 	HANDLE h = ::CreateFile( fname,
5128eecc9f 2011-02-23        kinaba: 				GENERIC_READ, FILE_SHARE_WRITE|FILE_SHARE_READ,
5128eecc9f 2011-02-23        kinaba: 				NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL|FILE_FLAG_SEQUENTIAL_SCAN, NULL );
5128eecc9f 2011-02-23        kinaba: 	if( h==INVALID_HANDLE_VALUE )
5128eecc9f 2011-02-23        kinaba: 		return err;
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 	unsigned long ans = ::GetFileSize( h, NULL );
5128eecc9f 2011-02-23        kinaba: 	::CloseHandle( h );
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 	return ans==0xffffffff ? err : ans;
5128eecc9f 2011-02-23        kinaba: }
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: //--------------------------- 結んで開いて --------------------------//
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: bool kiFile::open( const char* filename, bool read, bool create )
5128eecc9f 2011-02-23        kinaba: {
5128eecc9f 2011-02-23        kinaba: 	close();
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 	if( m_bReadMode = read )
5128eecc9f 2011-02-23        kinaba: 		m_hFile = ::CreateFile( filename,
5128eecc9f 2011-02-23        kinaba: 				GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING,
5128eecc9f 2011-02-23        kinaba: 				FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN, NULL );
5128eecc9f 2011-02-23        kinaba: 	else
5128eecc9f 2011-02-23        kinaba: 		m_hFile = ::CreateFile( filename,
5128eecc9f 2011-02-23        kinaba: 				GENERIC_WRITE, FILE_SHARE_READ, NULL,
5128eecc9f 2011-02-23        kinaba: 				create ? CREATE_ALWAYS : OPEN_EXISTING,
5128eecc9f 2011-02-23        kinaba: 				FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN, NULL );
5128eecc9f 2011-02-23        kinaba: 	if( m_hFile == INVALID_HANDLE_VALUE )
5128eecc9f 2011-02-23        kinaba: 		return false;
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 	m_nBufPos = 0;
5128eecc9f 2011-02-23        kinaba: 	if( m_bReadMode )
5128eecc9f 2011-02-23        kinaba: 		flush();
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 	return true;
5128eecc9f 2011-02-23        kinaba: }
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: void kiFile::close()
5128eecc9f 2011-02-23        kinaba: {
5128eecc9f 2011-02-23        kinaba: 	if( m_hFile != INVALID_HANDLE_VALUE )
5128eecc9f 2011-02-23        kinaba: 	{
5128eecc9f 2011-02-23        kinaba: 		if( !m_bReadMode )
5128eecc9f 2011-02-23        kinaba: 			flush();
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 		::CloseHandle( m_hFile );
5128eecc9f 2011-02-23        kinaba: 		m_hFile = INVALID_HANDLE_VALUE;
5128eecc9f 2011-02-23        kinaba: 	}
5128eecc9f 2011-02-23        kinaba: }
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: //-------------------------- 読み書き ----------------------------//
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: unsigned long kiFile::read( unsigned char* buf, unsigned long len )
5128eecc9f 2011-02-23        kinaba: {
5128eecc9f 2011-02-23        kinaba: 	unsigned long ans = 0;
5128eecc9f 2011-02-23        kinaba: 	if( m_nBufSize!=0 && m_hFile!=INVALID_HANDLE_VALUE && m_bReadMode )
5128eecc9f 2011-02-23        kinaba: 	{
5128eecc9f 2011-02-23        kinaba: 		while( (m_nBufSize-m_nBufPos) <= len )
5128eecc9f 2011-02-23        kinaba: 		{
5128eecc9f 2011-02-23        kinaba: 			ans += (m_nBufSize-m_nBufPos);
5128eecc9f 2011-02-23        kinaba: 			ki_memcpy( buf, m_pBuf+m_nBufPos, m_nBufSize-m_nBufPos );
5128eecc9f 2011-02-23        kinaba: 			len -= (m_nBufSize-m_nBufPos);
5128eecc9f 2011-02-23        kinaba: 			buf += (m_nBufSize-m_nBufPos);
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 			flush();
5128eecc9f 2011-02-23        kinaba: 			if( m_nBufSize == 0 )
5128eecc9f 2011-02-23        kinaba: 				return ans;
5128eecc9f 2011-02-23        kinaba: 		}
5128eecc9f 2011-02-23        kinaba: 		ans += len;
5128eecc9f 2011-02-23        kinaba: 		ki_memcpy( buf, m_pBuf+m_nBufPos, len );
5128eecc9f 2011-02-23        kinaba: 		m_nBufPos += len;
5128eecc9f 2011-02-23        kinaba: 	}
5128eecc9f 2011-02-23        kinaba: 	return ans;
5128eecc9f 2011-02-23        kinaba: }
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: void kiFile::write( const void* buf, unsigned long len )
5128eecc9f 2011-02-23        kinaba: {
5128eecc9f 2011-02-23        kinaba: 	if( m_hFile==INVALID_HANDLE_VALUE || m_bReadMode )
5128eecc9f 2011-02-23        kinaba: 		return;
5128eecc9f 2011-02-23        kinaba: 	const unsigned char* ubuf = (const unsigned char*)buf;
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 	while( (kifile_bufsize-m_nBufPos) <= len )
5128eecc9f 2011-02-23        kinaba: 	{
5128eecc9f 2011-02-23        kinaba: 		ki_memcpy( m_pBuf+m_nBufPos, buf, (kifile_bufsize-m_nBufPos) );
5128eecc9f 2011-02-23        kinaba: 		len -= (kifile_bufsize-m_nBufPos);
5128eecc9f 2011-02-23        kinaba: 		ubuf += (kifile_bufsize-m_nBufPos);
5128eecc9f 2011-02-23        kinaba: 		m_nBufPos = kifile_bufsize;
5128eecc9f 2011-02-23        kinaba: 		flush();
5128eecc9f 2011-02-23        kinaba: 	}
5128eecc9f 2011-02-23        kinaba: 	ki_memcpy( m_pBuf+m_nBufPos, ubuf, len );
5128eecc9f 2011-02-23        kinaba: 	m_nBufPos += len;
5128eecc9f 2011-02-23        kinaba: }
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: #undef putc
5128eecc9f 2011-02-23        kinaba: void kiFile::putc( unsigned char c )
5128eecc9f 2011-02-23        kinaba: {
5128eecc9f 2011-02-23        kinaba: 	if( m_hFile==INVALID_HANDLE_VALUE || m_bReadMode )
5128eecc9f 2011-02-23        kinaba: 		return;
5128eecc9f 2011-02-23        kinaba: 	if( (kifile_bufsize-m_nBufPos) <= 1 )
5128eecc9f 2011-02-23        kinaba: 		flush();
5128eecc9f 2011-02-23        kinaba: 	m_pBuf[ m_nBufPos++ ] = c;
5128eecc9f 2011-02-23        kinaba: }
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: #undef getc
5128eecc9f 2011-02-23        kinaba: int kiFile::getc()
5128eecc9f 2011-02-23        kinaba: {
5128eecc9f 2011-02-23        kinaba: 	if( m_nBufSize==0 || m_hFile==INVALID_HANDLE_VALUE || !m_bReadMode )
5128eecc9f 2011-02-23        kinaba: 		return -1;
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 	if( 0==(m_nBufSize-m_nBufPos) )
5128eecc9f 2011-02-23        kinaba: 	{
5128eecc9f 2011-02-23        kinaba: 		flush();
5128eecc9f 2011-02-23        kinaba: 		if( m_nBufSize==0 )
5128eecc9f 2011-02-23        kinaba: 			return -1;
5128eecc9f 2011-02-23        kinaba: 	}
5128eecc9f 2011-02-23        kinaba: 	if( 1==(m_nBufSize-m_nBufPos) )
5128eecc9f 2011-02-23        kinaba: 	{
5128eecc9f 2011-02-23        kinaba: 		int ans = m_pBuf[ m_nBufPos++ ];
5128eecc9f 2011-02-23        kinaba: 		flush();
5128eecc9f 2011-02-23        kinaba: 		return ans;
5128eecc9f 2011-02-23        kinaba: 	}
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: 	return m_pBuf[ m_nBufPos++ ];
5128eecc9f 2011-02-23        kinaba: }
5128eecc9f 2011-02-23        kinaba: 
5128eecc9f 2011-02-23        kinaba: void kiFile::flush()
5128eecc9f 2011-02-23        kinaba: {
5128eecc9f 2011-02-23        kinaba: 	if( m_bReadMode )
5128eecc9f 2011-02-23        kinaba: 	{
5128eecc9f 2011-02-23        kinaba: 		::ReadFile( m_hFile, m_pBuf, kifile_bufsize, &m_nBufSize, NULL );
5128eecc9f 2011-02-23        kinaba: 		m_nBufPos = 0;
5128eecc9f 2011-02-23        kinaba: 	}
5128eecc9f 2011-02-23        kinaba: 	else
5128eecc9f 2011-02-23        kinaba: 	{
5128eecc9f 2011-02-23        kinaba: 		::WriteFile( m_hFile, m_pBuf, m_nBufPos, &m_nBufSize, NULL );
5128eecc9f 2011-02-23        kinaba: 		m_nBufSize = m_nBufPos = 0;
5128eecc9f 2011-02-23        kinaba: 	}
5128eecc9f 2011-02-23        kinaba: }