/****************************************************************************
*
* _f_extend
*
* Extend file to a certain size
*
***************************************************************************/
static unsigned char _f_extend ( long size )
{
unsigned long _size;
unsigned char rc;
size -= gl_file.filesize;
_size = (unsigned long)size;
rc = _f_getcurrsector();
if ( rc )
{
return rc;
}
psp_memset( gl_sector + gl_file.relpos, 0, ( F_SECTOR_SIZE - gl_file.relpos ) );
if ( gl_file.relpos + _size > F_SECTOR_SIZE )
{
_size -= ( F_SECTOR_SIZE - gl_file.relpos );
while ( _size )
{
if ( _f_emptywritebuffer() )
{
return F_ERR_WRITE;
}
psp_memset( gl_sector, 0, F_SECTOR_SIZE );
_size -= ( _size > F_SECTOR_SIZE ? F_SECTOR_SIZE : _size );
}
}
else
{
_size += gl_file.relpos;
}
gl_file.modified = 1;
gl_file.filesize += size;
gl_file.abspos = gl_file.filesize & ( ~( F_SECTOR_SIZE - 1 ) );
gl_file.relpos = _size;
return F_NO_ERROR;
} /* _f_extend */
long fn_write ( const void * buf, long size, long _size_st, F_FILE * f )
{
char * buffer = (char *)buf;
long retsize;
long ret = 0;
if ( !f )
{
return 0;
}
if ( ( gl_file.mode & ( F_FILE_WR | F_FILE_A | F_FILE_RDP | F_FILE_WRP | F_FILE_AP ) ) == 0 )
{
return 0;
}
retsize = size;
size *= _size_st;
_size_st = retsize;
retsize = 0;
if ( size == 0 )
{
return 0;
}
if ( _f_getvolume() )
{
return 0; /*can't write*/
}
if ( ( gl_file.mode ) & ( F_FILE_A | F_FILE_AP ) )
{
if ( _f_fseek( (long)gl_file.filesize ) )
{
gl_file.mode = F_FILE_CLOSE;
return 0;
}
}
if ( gl_file.startcluster == 0 )
{
if ( _f_stepnextsector() )
{
gl_file.mode = F_FILE_CLOSE;
return 0;
}
}
else
{
if ( _f_getcurrsector() )
{
gl_file.mode = F_FILE_CLOSE;
return 0;
}
}
for( ; ; )
{
unsigned long wrsize = (unsigned long)size;
if ( gl_file.relpos == F_SECTOR_SIZE )
{ /*now full*/
if ( gl_file.modified )
{
if ( _f_writeglsector( gl_file.pos.sector ) )
{
gl_file.mode = F_FILE_CLOSE;
if ( _f_updatefileentry( 0 ) == 0 )
{
return retsize;
}
else
{
return 0;
}
}
gl_file.modified = 0;
}
if ( _f_stepnextsector() )
{
gl_file.mode = F_FILE_CLOSE;
if ( _f_updatefileentry( 0 ) == 0 )
{
return retsize;
}
else
{
return 0;
}
}
gl_file.abspos += gl_file.relpos;
gl_file.relpos = 0;
if ( wrsize && ( wrsize < F_SECTOR_SIZE ) )
{
ret = _f_getcurrsector();
if ( ret )
{
if ( ret != F_ERR_EOF )
{
gl_file.mode = F_FILE_CLOSE; /*no more read allowed*/
return retsize;
}
}
}
}
if ( !size )
{
break;
}
if ( wrsize >= F_SECTOR_SIZE - gl_file.relpos )
{
wrsize = (unsigned long)( F_SECTOR_SIZE - gl_file.relpos );
}
psp_memcpy( gl_sector + gl_file.relpos, buffer, wrsize );
gl_file.modified = 1; /*sector is modified*/
buffer += wrsize;
gl_file.relpos += wrsize;
size -= wrsize;
retsize += wrsize;
if ( gl_file.filesize < gl_file.abspos + gl_file.relpos )
{
gl_file.filesize = gl_file.abspos + gl_file.relpos;
}
}
return retsize / _size_st;
} /* fn_write */
/****************************************************************************
*
* fn_read
*
* read data from file
*
* INPUTS
*
* buf - where the store data
* size - size of items to be read
* _size_t - number of items need to be read
* filehandle - file where to read from
*
* RETURNS
*
* with the number of read bytes
*
***************************************************************************/
long fn_read ( void * buf, long size, long _size_st, F_FILE * f )
{
char * buffer = (char *)buf;
long retsize;
if ( !f )
{
return 0;
}
if ( ( gl_file.mode & ( F_FILE_RD | F_FILE_RDP | F_FILE_WRP | F_FILE_AP ) ) == 0 )
{
return 0;
}
retsize = size;
size *= _size_st;
_size_st = retsize;
retsize = 0;
if ( _f_getvolume() )
{
return 0; /*cant read any*/
}
if ( size + gl_file.relpos + gl_file.abspos >= gl_file.filesize ) /*read len longer than the file*/
{
size = (long)( ( gl_file.filesize ) - ( gl_file.relpos ) - ( gl_file.abspos ) ); /*calculate new size*/
}
if ( size <= 0 )
{
return 0;
}
if ( _f_getcurrsector() )
{
gl_file.mode = F_FILE_CLOSE; /*no more read allowed*/
return 0;
}
for( ; ; )
{
unsigned long rdsize = (unsigned long)size;
if ( gl_file.relpos == F_SECTOR_SIZE )
{
unsigned char ret;
gl_file.abspos += gl_file.relpos;
gl_file.relpos = 0;
if ( gl_file.modified )
{
ret = _f_writeglsector( (unsigned long)-1 ); /*empty write buffer */
if ( ret )
{
gl_file.mode = F_FILE_CLOSE; /*no more read allowed*/
return retsize;
}
}
gl_file.pos.sector++; /*goto next*/
ret = _f_getcurrsector();
if ( ( ret == F_ERR_EOF ) && ( !size ) )
{
return retsize;
}
if ( ret )
{
gl_file.mode = F_FILE_CLOSE; /*no more read allowed*/
return retsize;
}
}
if ( !size )
{
break;
}
if ( rdsize >= F_SECTOR_SIZE - gl_file.relpos )
{
rdsize = (unsigned long)( F_SECTOR_SIZE - gl_file.relpos );
}
psp_memcpy( buffer, gl_sector + gl_file.relpos, rdsize ); /*always less than 512*/
buffer += rdsize;
gl_file.relpos += rdsize;
size -= rdsize;
retsize += rdsize;
}
return retsize / _size_st;
} /* fn_read */
/****************************************************************************
*
* _f_extend
*
* Extend file to a certain size
*
***************************************************************************/
static unsigned char _f_extend ( long size )
{
unsigned long _size;
unsigned char rc;
size -= gl_file.filesize;
_size = (unsigned long)size;
if ( gl_file.startcluster == 0 )
{
if ( _f_stepnextsector() )
{
return F_ERR_WRITE;
}
}
else
{
if ( ( gl_file.relpos > 0 ) && ( gl_file.relpos < F_SECTOR_SIZE ) )
{
rc = _f_getcurrsector();
if ( rc )
{
return rc;
}
}
}
if ( gl_file.relpos + _size >= F_SECTOR_SIZE )
{
if ( gl_file.relpos < F_SECTOR_SIZE )
{
psp_memset( gl_sector + gl_file.relpos, 0, ( F_SECTOR_SIZE - gl_file.relpos ) );
_size -= ( F_SECTOR_SIZE - gl_file.relpos );
if ( _f_writeglsector( gl_file.pos.sector ) )
{
return F_ERR_WRITE;
}
}
if ( _f_stepnextsector() )
{
return F_ERR_WRITE;
}
psp_memset( gl_sector, 0, F_SECTOR_SIZE );
while ( _size >= F_SECTOR_SIZE )
{
if ( _f_writeglsector( gl_file.pos.sector ) )
{
return F_ERR_WRITE;
}
if ( _f_stepnextsector() )
{
return F_ERR_WRITE;
}
psp_memset( gl_sector, 0, F_SECTOR_SIZE );
_size -= F_SECTOR_SIZE;
}
}
else
{
psp_memset( gl_sector + gl_file.relpos, 0, ( F_SECTOR_SIZE - gl_file.relpos ) );
_size += gl_file.relpos;
}
gl_file.modified = 1;
gl_file.filesize += size;
gl_file.abspos = gl_file.filesize & ( ~( F_SECTOR_SIZE - 1 ) );
gl_file.relpos = _size;
return F_NO_ERROR;
} /* _f_extend */
