/**************************************************************************** * * fn_initvolume * * initiate a volume, this function has to be called 1st to set physical * driver function to a given volume * * RETURNS * * error code or zero if successful * ***************************************************************************/ unsigned char fn_initvolume ( F_DRIVERINIT initfunc ) { #if F_FS_THREAD_AWARE == 1 { extern xSemaphoreHandle fs_lock_semaphore; if( fs_lock_semaphore == NULL ) { fs_lock_semaphore = xSemaphoreCreateMutex(); if( fs_lock_semaphore == NULL ) { return F_ERR_OS; } } } #endif /* F_FS_THREAD_AWARE */ gl_volume.state = F_STATE_NONE; mdrv = initfunc( 0 ); if ( mdrv == NULL ) { return F_ERR_INITFUNC; } gl_volume.state = F_STATE_NEEDMOUNT; #if F_FILE_CHANGED_EVENT f_filechangedevent = 0; #endif return _f_getvolume(); } /* fn_initvolume */
/**************************************************************************** * * fn_flush * * flush a previously opened file * * INPUTS * * filehandle - which file needs to be closed * * RETURNS * * error code or zero if successful * ***************************************************************************/ unsigned char fn_flush ( F_FILE * f ) { unsigned char ret; if ( !f ) { return F_ERR_NOTOPEN; } ret = _f_getvolume(); if ( ret ) { return ret; } if ( gl_file.mode == F_FILE_CLOSE ) { return F_ERR_NOTOPEN; } else if ( gl_file.mode != F_FILE_RD ) { if ( gl_file.modified ) { if ( _f_writeglsector( (unsigned long)-1 ) ) { (void)_f_updatefileentry( 1 ); return F_ERR_WRITE; } } return _f_updatefileentry( 0 ); } return F_NO_ERROR; } /* fn_flush */
/**************************************************************************** * * fn_hardformat * * Making a complete format on media, independently from master boot record, * according to media physical * * INPUTS * fattype - one of this definitions F_FAT12_MEDIA,F_FAT16_MEDIA,F_FAT32_MEDIA * * RETURNS * error code or zero if successful * ***************************************************************************/ unsigned char fn_hardformat ( unsigned char fattype ) { unsigned char ret; int mdrv_ret; F_PHY phy; ret = _f_getvolume(); if ( ret && ( ret != F_ERR_NOTFORMATTED ) ) { return ret; } gl_volume.state = F_STATE_NEEDMOUNT; psp_memset( &phy, 0, sizeof( F_PHY ) ); mdrv_ret = mdrv->getphy( mdrv, &phy ); if ( mdrv_ret ) { return F_ERR_ONDRIVE; } ret = _f_prepareformat( &phy, fattype ); /*no partition*/ if ( ret ) { return ret; } return _f_postformat( &phy, fattype ); } /* fn_hardformat */
unsigned char fn_seek ( F_FILE * f, long offset, unsigned char whence ) { unsigned char ret; if ( !f ) { return F_ERR_NOTOPEN; } if ( ( gl_file.mode & ( F_FILE_RD | F_FILE_WR | F_FILE_A | F_FILE_RDP | F_FILE_WRP | F_FILE_AP ) ) == 0 ) { return F_ERR_NOTOPEN; } ret = _f_getvolume(); if ( ret ) { return ret; } if ( whence == F_SEEK_CUR ) { return _f_fseek( (long)( gl_file.abspos + gl_file.relpos + offset ) ); } else if ( whence == F_SEEK_END ) { return _f_fseek( (long)( gl_file.filesize + offset ) ); } else if ( whence == F_SEEK_SET ) { return _f_fseek( offset ); } return F_ERR_NOTUSEABLE; } /* fn_seek */
/**************************************************************************** * * fn_getfreespace * * get total/free/used/bad diskspace * * INPUTS * pspace - pointer where to store the information * * RETURNS * error code * ***************************************************************************/ unsigned char fn_getfreespace ( F_SPACE * pspace ) { unsigned char ret; unsigned long a; unsigned long clustersize; ret = _f_getvolume(); if ( ret ) { return ret; } psp_memset( pspace, 0, sizeof( F_SPACE ) ); pspace->total = gl_volume.maxcluster; gl_volume.fatsector = (unsigned long)-1; for ( a = 2 ; a < gl_volume.maxcluster + 2 ; a++ ) { unsigned long value; ret = _f_getclustervalue( a, &value ); if ( ret ) { return ret; } if ( !value ) { ++( pspace->free ); } else if ( value == F_CLUSTER_BAD ) { ++( pspace->bad ); } else { ++( pspace->used ); } } clustersize = (unsigned long)( gl_volume.bootrecord.sector_per_cluster * F_SECTOR_SIZE ); for ( a = 0 ; ( clustersize & 1 ) == 0 ; a++ ) { clustersize >>= 1; } pspace->total_high = ( pspace->total ) >> ( 32 - a ); pspace->total <<= a; pspace->free_high = ( pspace->free ) >> ( 32 - a ); pspace->free <<= a; pspace->used_high = ( pspace->used ) >> ( 32 - a ); pspace->used <<= a; pspace->bad_high = ( pspace->bad ) >> ( 32 - a ); pspace->bad <<= a; return F_NO_ERROR; } /* fn_getfreespace */
/**************************************************************************** * * fn_getserial * * get serial number * * INPUTS * serial - pointer where to store the serial number * * RETURNS * error code * ***************************************************************************/ unsigned char fn_getserial ( unsigned long * serial ) { unsigned char ret; ret = _f_getvolume(); if ( ret ) { return ret; } *serial = gl_volume.bootrecord.serial_number; return 0; }
long fn_filelength ( const char * filename ) { F_POS pos; F_DIRENTRY * de; F_NAME fsname; if ( _f_setfsname( filename, &fsname ) ) { return 0; /*invalid name*/ } if ( _f_checknamewc( fsname.filename, fsname.fileext ) ) { return 0; /*invalid name*/ } if ( _f_getvolume() ) { return 0; /*can't get the size*/ } if ( !_f_findpath( &fsname, &pos ) ) { return 0; } if ( !_f_findfilewc( fsname.filename, fsname.fileext, &pos, &de, 0 ) ) { return 0; } if ( de->attr & F_ATTR_DIR ) { return 0; /*directory*/ } return (long)_f_getlong( &de->filesize ); } /* fn_filelength */
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 */
/**************************************************************************** * * fn_close * * close a previously opened file * * INPUTS * * filehandle - which file needs to be closed * * RETURNS * * error code or zero if successful * ***************************************************************************/ unsigned char fn_close ( F_FILE * f ) { unsigned char ret; #if F_FILE_CHANGED_EVENT unsigned char mode; #endif if ( !f ) { return F_ERR_NOTOPEN; } ret = _f_getvolume(); if ( ret ) { return ret; } if ( gl_file.mode == F_FILE_CLOSE ) { return F_ERR_NOTOPEN; } else if ( gl_file.mode == F_FILE_RD ) { gl_file.mode = F_FILE_CLOSE; return F_NO_ERROR; } else { #if F_FILE_CHANGED_EVENT mode = f->mode; #endif gl_file.mode = F_FILE_CLOSE; if ( gl_file.modified ) { if ( _f_writeglsector( (unsigned long)-1 ) ) { (void)_f_updatefileentry( 1 ); return F_ERR_WRITE; } } ret = _f_updatefileentry( 0 ); #if F_FILE_CHANGED_EVENT if ( f_filechangedevent && !ret ) { ST_FILE_CHANGED fc; if ( ( mode == F_FILE_WR ) || ( mode == F_FILE_WRP ) ) { fc.action = FACTION_ADDED; fc.flags = FFLAGS_FILE_NAME; } else if ( ( mode == F_FILE_A ) || ( mode == F_FILE_RDP ) ) { fc.action = FACTION_MODIFIED; fc.flags = FFLAGS_FILE_NAME | FFLAGS_SIZE; } strcpy( fc.filename, f->filename ); if ( f->filename[0] ) { f_filechangedevent( &fc ); } f->filename[0] = '\0'; } #endif /* if F_FILE_CHANGED_EVENT */ return ret; } } /* fn_close */
/**************************************************************************** * * fn_open * * open a file for reading/writing/appending * * INPUTS * * filename - which file need to be opened * mode - string how to open ("r"-read, "w"-write, "w+"-overwrite, "a"-append * * RETURNS * * F_FILE pointer if successfully * 0 - if any error * ***************************************************************************/ F_FILE * fn_open ( const char * filename, const char * mode ) { F_DIRENTRY * de; F_NAME fsname; unsigned short date; unsigned short time; unsigned char m_mode = F_FILE_CLOSE; if ( mode[1] == 0 ) { if ( mode[0] == 'r' ) { m_mode = F_FILE_RD; } if ( mode[0] == 'w' ) { m_mode = F_FILE_WR; } if ( mode[0] == 'a' ) { m_mode = F_FILE_A; } } if ( ( mode[1] == '+' ) && ( mode[2] == 0 ) ) { if ( mode[0] == 'r' ) { m_mode = F_FILE_RDP; } if ( mode[0] == 'w' ) { m_mode = F_FILE_WRP; } if ( mode[0] == 'a' ) { m_mode = F_FILE_AP; } } if ( m_mode == F_FILE_CLOSE ) { return 0; /*invalid mode*/ } if ( _f_setfsname( filename, &fsname ) ) { return 0; /*invalid name*/ } if ( _f_checknamewc( fsname.filename, fsname.fileext ) ) { return 0; /*invalid name*/ } if ( fsname.filename[0] == '.' ) { return 0; } if ( _f_getvolume() ) { return 0; /*cant open any*/ } if ( gl_file.mode != F_FILE_CLOSE ) { return 0; } psp_memset( &gl_file, 0, sizeof( F_FILE ) ); if ( !_f_findpath( &fsname, &gl_file.dirpos ) ) { return 0; } switch ( m_mode ) { case F_FILE_RDP: /*r*/ case F_FILE_RD: /*r*/ if ( !_f_findfilewc( fsname.filename, fsname.fileext, &gl_file.dirpos, &de, 0 ) ) { return 0; } if ( de->attr & F_ATTR_DIR ) { return 0; /*directory*/ } gl_file.startcluster = _f_getdecluster( de ); if ( gl_file.startcluster ) { _f_clustertopos( gl_file.startcluster, &gl_file.pos ); gl_file.filesize = _f_getlong( &de->filesize ); gl_file.abspos = (unsigned long) (-1 * (long) F_SECTOR_SIZE); if ( _f_fseek( 0 ) ) { return 0; } } #if F_FILE_CHANGED_EVENT if ( m_mode == F_FILE_RDP ) { _f_createfullname( gl_file.filename, sizeof( gl_file.filename ), fsname.path, fsname.filename, fsname.fileext ); } #endif break; case F_FILE_AP: case F_FILE_A: /*a*/ psp_memcpy( &( gl_file.pos ), &( gl_file.dirpos ), sizeof( F_POS ) ); if ( _f_findfilewc( fsname.filename, fsname.fileext, &gl_file.dirpos, &de, 0 ) ) { if ( de->attr & ( F_ATTR_DIR | F_ATTR_READONLY ) ) { return 0; } gl_file.startcluster = _f_getdecluster( de ); gl_file.filesize = _f_getlong( &de->filesize ); if ( gl_file.startcluster ) { _f_clustertopos( gl_file.startcluster, &gl_file.pos ); gl_file.abspos = (unsigned long) (-1 * (long) F_SECTOR_SIZE); /*forcing seek to read 1st sector! abspos=0;*/ if ( _f_fseek( (long)gl_file.filesize ) ) { gl_file.mode = F_FILE_CLOSE; return 0; } } } else { psp_memcpy( &( gl_file.dirpos ), &( gl_file.pos ), sizeof( F_POS ) ); _f_clustertopos( gl_file.dirpos.cluster, &gl_file.pos ); if ( _f_addentry( &fsname, &gl_file.dirpos, &de ) ) { return 0; /*couldnt be added*/ } de->attr |= F_ATTR_ARC; /*set as archiv*/ if ( _f_writeglsector( (unsigned long)-1 ) ) { return 0; } } #if F_FILE_CHANGED_EVENT _f_createfullname( gl_file.filename, sizeof( gl_file.filename ), fsname.path, fsname.filename, fsname.fileext ); #endif break; case F_FILE_WR: /*w*/ case F_FILE_WRP: /*w+*/ _f_clustertopos( gl_file.dirpos.cluster, &gl_file.pos ); if ( _f_findfilewc( fsname.filename, fsname.fileext, &gl_file.pos, &de, 0 ) ) { unsigned long cluster = _f_getdecluster( de ); /*exist*/ if ( de->attr & ( F_ATTR_DIR | F_ATTR_READONLY ) ) { return 0; } psp_memcpy( &( gl_file.dirpos ), &( gl_file.pos ), sizeof( F_POS ) ); _f_setlong( de->filesize, 0 ); /*reset size;*/ de->attr |= F_ATTR_ARC; /*set as archiv*/ _f_setword( de->clusterlo, 0 ); /*no points anywhere*/ _f_setword( de->clusterhi, 0 ); if ( gl_volume.mediatype == F_FAT32_MEDIA ) { f_igettimedate( &time, &date ); _f_setword( &de->crtdate, date ); /*if there is realtime clock then creation date could be set from*/ _f_setword( &de->crttime, time ); /*if there is realtime clock then creation time could be set from*/ _f_setword( &de->lastaccessdate, date ); /*if there is realtime clock then creation date could be set from*/ } if ( _f_writeglsector( (unsigned long)-1 ) ) { return 0; } if ( _f_removechain( cluster ) ) { return 0; /*remove */ } } else { if ( _f_addentry( &fsname, &gl_file.dirpos, &de ) ) { return 0; /*couldnt be added*/ } psp_memset( &gl_file, 0, 21 ); de->attr |= F_ATTR_ARC; /*set as archiv*/ if ( _f_writeglsector( (unsigned long)-1 ) ) { return 0; } } #if F_FILE_CHANGED_EVENT _f_createfullname( gl_file.filename, sizeof( gl_file.filename ), fsname.path, fsname.filename, fsname.fileext ); #endif break; default: return 0; /*invalid mode*/ } /* switch */ gl_file.mode = m_mode; /* lock it */ return (F_FILE *)1; } /* fn_open */
/**************************************************************************** * * fn_delete * * delete a file * * INPUTS * * filename - file which wanted to be deleted (with or without path) * * RETURNS * * error code or zero if successful * ***************************************************************************/ unsigned char fn_delete ( const char * filename ) { F_POS pos; F_DIRENTRY * de; F_NAME fsname; unsigned char ret; if ( _f_setfsname( filename, &fsname ) ) { return F_ERR_INVALIDNAME; /*invalid name*/ } if ( _f_checknamewc( fsname.filename, fsname.fileext ) ) { return F_ERR_INVALIDNAME; /*invalid name*/ } if ( fsname.filename[0] == '.' ) { return F_ERR_NOTFOUND; } ret = _f_getvolume(); if ( ret ) { return ret; } if ( !( _f_findpath( &fsname, &pos ) ) ) { return F_ERR_INVALIDDIR; } if ( !_f_findfilewc( fsname.filename, fsname.fileext, &pos, &de, 0 ) ) { return F_ERR_NOTFOUND; } if ( de->attr & F_ATTR_DIR ) { return F_ERR_INVALIDDIR; /*directory*/ } if ( de->attr & F_ATTR_READONLY ) { return F_ERR_ACCESSDENIED; /*readonly*/ } if ( ( gl_file.mode != F_FILE_CLOSE ) && ( gl_file.dirpos.sector == pos.sector ) && ( gl_file.dirpos.pos == pos.pos ) ) { return F_ERR_LOCKED; } de->name[0] = (unsigned char)0xe5; /*removes it*/ ret = _f_writeglsector( (unsigned long)-1 ); if ( ret ) { return ret; } ret = _f_removechain( _f_getdecluster( de ) ); #if F_FILE_CHANGED_EVENT if ( f_filechangedevent && !ret ) { ST_FILE_CHANGED fc; fc.action = FACTION_REMOVED; fc.flags = FFLAGS_FILE_NAME; if ( !_f_createfullname( fc.filename, sizeof( fc.filename ), fsname.path, fsname.filename, fsname.fileext ) ) { f_filechangedevent( &fc ); } } #endif return ret; } /* fn_delete */