STM32F746NG fatfs library

Dependents:   DISCO-F746NG_uSD Active-WolfMan_V2-5-All-Frank-Board-Functions_copy DISCO-F746NG_uSD DISCO-F746NG_uSD

Committer:
buyukesmeli
Date:
Sat Feb 03 14:38:06 2018 +0000
Revision:
0:3a2f06aeceaf
Initial Commit

Who changed what in which revision?

UserRevisionLine numberNew contents of line
buyukesmeli 0:3a2f06aeceaf 1 /*----------------------------------------------------------------------------/
buyukesmeli 0:3a2f06aeceaf 2 / FatFs - FAT file system module R0.11 (C)ChaN, 2015
buyukesmeli 0:3a2f06aeceaf 3 /-----------------------------------------------------------------------------/
buyukesmeli 0:3a2f06aeceaf 4 / FatFs module is a free software that opened under license policy of
buyukesmeli 0:3a2f06aeceaf 5 / following conditions.
buyukesmeli 0:3a2f06aeceaf 6 /
buyukesmeli 0:3a2f06aeceaf 7 / Copyright (C) 2015, ChaN, all right reserved.
buyukesmeli 0:3a2f06aeceaf 8 /
buyukesmeli 0:3a2f06aeceaf 9 / 1. Redistributions of source code must retain the above copyright notice,
buyukesmeli 0:3a2f06aeceaf 10 / this condition and the following disclaimer.
buyukesmeli 0:3a2f06aeceaf 11 /
buyukesmeli 0:3a2f06aeceaf 12 / This software is provided by the copyright holder and contributors "AS IS"
buyukesmeli 0:3a2f06aeceaf 13 / and any warranties related to this software are DISCLAIMED.
buyukesmeli 0:3a2f06aeceaf 14 / The copyright owner or contributors be NOT LIABLE for any damages caused
buyukesmeli 0:3a2f06aeceaf 15 / by use of this software.
buyukesmeli 0:3a2f06aeceaf 16 /-----------------------------------------------------------------------------/
buyukesmeli 0:3a2f06aeceaf 17 / Feb 26,'06 R0.00 Prototype.
buyukesmeli 0:3a2f06aeceaf 18 /
buyukesmeli 0:3a2f06aeceaf 19 / Apr 29,'06 R0.01 First stable version.
buyukesmeli 0:3a2f06aeceaf 20 /
buyukesmeli 0:3a2f06aeceaf 21 / Jun 01,'06 R0.02 Added FAT12 support.
buyukesmeli 0:3a2f06aeceaf 22 / Removed unbuffered mode.
buyukesmeli 0:3a2f06aeceaf 23 / Fixed a problem on small (<32M) partition.
buyukesmeli 0:3a2f06aeceaf 24 / Jun 10,'06 R0.02a Added a configuration option (_FS_MINIMUM).
buyukesmeli 0:3a2f06aeceaf 25 /
buyukesmeli 0:3a2f06aeceaf 26 / Sep 22,'06 R0.03 Added f_rename().
buyukesmeli 0:3a2f06aeceaf 27 / Changed option _FS_MINIMUM to _FS_MINIMIZE.
buyukesmeli 0:3a2f06aeceaf 28 / Dec 11,'06 R0.03a Improved cluster scan algorithm to write files fast.
buyukesmeli 0:3a2f06aeceaf 29 / Fixed f_mkdir() creates incorrect directory on FAT32.
buyukesmeli 0:3a2f06aeceaf 30 /
buyukesmeli 0:3a2f06aeceaf 31 / Feb 04,'07 R0.04 Supported multiple drive system.
buyukesmeli 0:3a2f06aeceaf 32 / Changed some interfaces for multiple drive system.
buyukesmeli 0:3a2f06aeceaf 33 / Changed f_mountdrv() to f_mount().
buyukesmeli 0:3a2f06aeceaf 34 / Added f_mkfs().
buyukesmeli 0:3a2f06aeceaf 35 / Apr 01,'07 R0.04a Supported multiple partitions on a physical drive.
buyukesmeli 0:3a2f06aeceaf 36 / Added a capability of extending file size to f_lseek().
buyukesmeli 0:3a2f06aeceaf 37 / Added minimization level 3.
buyukesmeli 0:3a2f06aeceaf 38 / Fixed an endian sensitive code in f_mkfs().
buyukesmeli 0:3a2f06aeceaf 39 / May 05,'07 R0.04b Added a configuration option _USE_NTFLAG.
buyukesmeli 0:3a2f06aeceaf 40 / Added FSINFO support.
buyukesmeli 0:3a2f06aeceaf 41 / Fixed DBCS name can result FR_INVALID_NAME.
buyukesmeli 0:3a2f06aeceaf 42 / Fixed short seek (<= csize) collapses the file object.
buyukesmeli 0:3a2f06aeceaf 43 /
buyukesmeli 0:3a2f06aeceaf 44 / Aug 25,'07 R0.05 Changed arguments of f_read(), f_write() and f_mkfs().
buyukesmeli 0:3a2f06aeceaf 45 / Fixed f_mkfs() on FAT32 creates incorrect FSINFO.
buyukesmeli 0:3a2f06aeceaf 46 / Fixed f_mkdir() on FAT32 creates incorrect directory.
buyukesmeli 0:3a2f06aeceaf 47 / Feb 03,'08 R0.05a Added f_truncate() and f_utime().
buyukesmeli 0:3a2f06aeceaf 48 / Fixed off by one error at FAT sub-type determination.
buyukesmeli 0:3a2f06aeceaf 49 / Fixed btr in f_read() can be mistruncated.
buyukesmeli 0:3a2f06aeceaf 50 / Fixed cached sector is not flushed when create and close without write.
buyukesmeli 0:3a2f06aeceaf 51 /
buyukesmeli 0:3a2f06aeceaf 52 / Apr 01,'08 R0.06 Added fputc(), fputs(), fprintf() and fgets().
buyukesmeli 0:3a2f06aeceaf 53 / Improved performance of f_lseek() on moving to the same or following cluster.
buyukesmeli 0:3a2f06aeceaf 54 /
buyukesmeli 0:3a2f06aeceaf 55 / Apr 01,'09 R0.07 Merged Tiny-FatFs as a configuration option. (_FS_TINY)
buyukesmeli 0:3a2f06aeceaf 56 / Added long file name feature.
buyukesmeli 0:3a2f06aeceaf 57 / Added multiple code page feature.
buyukesmeli 0:3a2f06aeceaf 58 / Added re-entrancy for multitask operation.
buyukesmeli 0:3a2f06aeceaf 59 / Added auto cluster size selection to f_mkfs().
buyukesmeli 0:3a2f06aeceaf 60 / Added rewind option to f_readdir().
buyukesmeli 0:3a2f06aeceaf 61 / Changed result code of critical errors.
buyukesmeli 0:3a2f06aeceaf 62 / Renamed string functions to avoid name collision.
buyukesmeli 0:3a2f06aeceaf 63 / Apr 14,'09 R0.07a Separated out OS dependent code on reentrant cfg.
buyukesmeli 0:3a2f06aeceaf 64 / Added multiple sector size feature.
buyukesmeli 0:3a2f06aeceaf 65 / Jun 21,'09 R0.07c Fixed f_unlink() can return FR_OK on error.
buyukesmeli 0:3a2f06aeceaf 66 / Fixed wrong cache control in f_lseek().
buyukesmeli 0:3a2f06aeceaf 67 / Added relative path feature.
buyukesmeli 0:3a2f06aeceaf 68 / Added f_chdir() and f_chdrive().
buyukesmeli 0:3a2f06aeceaf 69 / Added proper case conversion to extended character.
buyukesmeli 0:3a2f06aeceaf 70 / Nov 03,'09 R0.07e Separated out configuration options from ff.h to ffconf.h.
buyukesmeli 0:3a2f06aeceaf 71 / Fixed f_unlink() fails to remove a sub-directory on _FS_RPATH.
buyukesmeli 0:3a2f06aeceaf 72 / Fixed name matching error on the 13 character boundary.
buyukesmeli 0:3a2f06aeceaf 73 / Added a configuration option, _LFN_UNICODE.
buyukesmeli 0:3a2f06aeceaf 74 / Changed f_readdir() to return the SFN with always upper case on non-LFN cfg.
buyukesmeli 0:3a2f06aeceaf 75 /
buyukesmeli 0:3a2f06aeceaf 76 / May 15,'10 R0.08 Added a memory configuration option. (_USE_LFN = 3)
buyukesmeli 0:3a2f06aeceaf 77 / Added file lock feature. (_FS_SHARE)
buyukesmeli 0:3a2f06aeceaf 78 / Added fast seek feature. (_USE_FASTSEEK)
buyukesmeli 0:3a2f06aeceaf 79 / Changed some types on the API, XCHAR->TCHAR.
buyukesmeli 0:3a2f06aeceaf 80 / Changed .fname in the FILINFO structure on Unicode cfg.
buyukesmeli 0:3a2f06aeceaf 81 / String functions support UTF-8 encoding files on Unicode cfg.
buyukesmeli 0:3a2f06aeceaf 82 / Aug 16,'10 R0.08a Added f_getcwd().
buyukesmeli 0:3a2f06aeceaf 83 / Added sector erase feature. (_USE_ERASE)
buyukesmeli 0:3a2f06aeceaf 84 / Moved file lock semaphore table from fs object to the bss.
buyukesmeli 0:3a2f06aeceaf 85 / Fixed a wrong directory entry is created on non-LFN cfg when the given name contains ';'.
buyukesmeli 0:3a2f06aeceaf 86 / Fixed f_mkfs() creates wrong FAT32 volume.
buyukesmeli 0:3a2f06aeceaf 87 / Jan 15,'11 R0.08b Fast seek feature is also applied to f_read() and f_write().
buyukesmeli 0:3a2f06aeceaf 88 / f_lseek() reports required table size on creating CLMP.
buyukesmeli 0:3a2f06aeceaf 89 / Extended format syntax of f_printf().
buyukesmeli 0:3a2f06aeceaf 90 / Ignores duplicated directory separators in given path name.
buyukesmeli 0:3a2f06aeceaf 91 /
buyukesmeli 0:3a2f06aeceaf 92 / Sep 06,'11 R0.09 f_mkfs() supports multiple partition to complete the multiple partition feature.
buyukesmeli 0:3a2f06aeceaf 93 / Added f_fdisk().
buyukesmeli 0:3a2f06aeceaf 94 / Aug 27,'12 R0.09a Changed f_open() and f_opendir() reject null object pointer to avoid crash.
buyukesmeli 0:3a2f06aeceaf 95 / Changed option name _FS_SHARE to _FS_LOCK.
buyukesmeli 0:3a2f06aeceaf 96 / Fixed assertion failure due to OS/2 EA on FAT12/16 volume.
buyukesmeli 0:3a2f06aeceaf 97 / Jan 24,'13 R0.09b Added f_setlabel() and f_getlabel().
buyukesmeli 0:3a2f06aeceaf 98 /
buyukesmeli 0:3a2f06aeceaf 99 / Oct 02,'13 R0.10 Added selection of character encoding on the file. (_STRF_ENCODE)
buyukesmeli 0:3a2f06aeceaf 100 / Added f_closedir().
buyukesmeli 0:3a2f06aeceaf 101 / Added forced full FAT scan for f_getfree(). (_FS_NOFSINFO)
buyukesmeli 0:3a2f06aeceaf 102 / Added forced mount feature with changes of f_mount().
buyukesmeli 0:3a2f06aeceaf 103 / Improved behavior of volume auto detection.
buyukesmeli 0:3a2f06aeceaf 104 / Improved write throughput of f_puts() and f_printf().
buyukesmeli 0:3a2f06aeceaf 105 / Changed argument of f_chdrive(), f_mkfs(), disk_read() and disk_write().
buyukesmeli 0:3a2f06aeceaf 106 / Fixed f_write() can be truncated when the file size is close to 4GB.
buyukesmeli 0:3a2f06aeceaf 107 / Fixed f_open(), f_mkdir() and f_setlabel() can return incorrect error code.
buyukesmeli 0:3a2f06aeceaf 108 / Jan 15,'14 R0.10a Added arbitrary strings as drive number in the path name. (_STR_VOLUME_ID)
buyukesmeli 0:3a2f06aeceaf 109 / Added a configuration option of minimum sector size. (_MIN_SS)
buyukesmeli 0:3a2f06aeceaf 110 / 2nd argument of f_rename() can have a drive number and it will be ignored.
buyukesmeli 0:3a2f06aeceaf 111 / Fixed f_mount() with forced mount fails when drive number is >= 1.
buyukesmeli 0:3a2f06aeceaf 112 / Fixed f_close() invalidates the file object without volume lock.
buyukesmeli 0:3a2f06aeceaf 113 / Fixed f_closedir() returns but the volume lock is left acquired.
buyukesmeli 0:3a2f06aeceaf 114 / Fixed creation of an entry with LFN fails on too many SFN collisions.
buyukesmeli 0:3a2f06aeceaf 115 / May 19,'14 R0.10b Fixed a hard error in the disk I/O layer can collapse the directory entry.
buyukesmeli 0:3a2f06aeceaf 116 / Fixed LFN entry is not deleted on delete/rename an object with lossy converted SFN.
buyukesmeli 0:3a2f06aeceaf 117 / Nov 9,'14 R0.10c Added a configuration option for the platforms without RTC. (_FS_NORTC)
buyukesmeli 0:3a2f06aeceaf 118 / Fixed volume label created by Mac OS X cannot be retrieved with f_getlabel(). (appeared at R0.09b)
buyukesmeli 0:3a2f06aeceaf 119 / Fixed a potential problem of FAT access that can appear on disk error.
buyukesmeli 0:3a2f06aeceaf 120 / Fixed null pointer dereference on attempting to delete the root direcotry. (appeared at R0.08)
buyukesmeli 0:3a2f06aeceaf 121 / Feb 02,'15 R0.11 Added f_findfirst() and f_findnext(). (_USE_FIND)
buyukesmeli 0:3a2f06aeceaf 122 / Fixed f_unlink() does not remove cluster chain of the file. (appeared at R0.10c)
buyukesmeli 0:3a2f06aeceaf 123 / Fixed _FS_NORTC option does not work properly. (appeared at R0.10c)
buyukesmeli 0:3a2f06aeceaf 124 /---------------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 125
buyukesmeli 0:3a2f06aeceaf 126 #include "ff.h" /* Declarations of FatFs API */
buyukesmeli 0:3a2f06aeceaf 127 #include "diskio.h" /* Declarations of disk I/O functions */
buyukesmeli 0:3a2f06aeceaf 128
buyukesmeli 0:3a2f06aeceaf 129
buyukesmeli 0:3a2f06aeceaf 130 /*--------------------------------------------------------------------------
buyukesmeli 0:3a2f06aeceaf 131
buyukesmeli 0:3a2f06aeceaf 132 Module Private Definitions
buyukesmeli 0:3a2f06aeceaf 133
buyukesmeli 0:3a2f06aeceaf 134 ---------------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 135
buyukesmeli 0:3a2f06aeceaf 136 #if _FATFS != 32020 /* Revision ID */
buyukesmeli 0:3a2f06aeceaf 137 #error Wrong include file (ff.h).
buyukesmeli 0:3a2f06aeceaf 138 #endif
buyukesmeli 0:3a2f06aeceaf 139
buyukesmeli 0:3a2f06aeceaf 140
buyukesmeli 0:3a2f06aeceaf 141 /* Reentrancy related */
buyukesmeli 0:3a2f06aeceaf 142 #if _FS_REENTRANT
buyukesmeli 0:3a2f06aeceaf 143 #if _USE_LFN == 1
buyukesmeli 0:3a2f06aeceaf 144 #error Static LFN work area cannot be used at thread-safe configuration
buyukesmeli 0:3a2f06aeceaf 145 #endif
buyukesmeli 0:3a2f06aeceaf 146 #define ENTER_FF(fs) { if (!lock_fs(fs)) return FR_TIMEOUT; }
buyukesmeli 0:3a2f06aeceaf 147 #define LEAVE_FF(fs, res) { unlock_fs(fs, res); return res; }
buyukesmeli 0:3a2f06aeceaf 148 #else
buyukesmeli 0:3a2f06aeceaf 149 #define ENTER_FF(fs)
buyukesmeli 0:3a2f06aeceaf 150 #define LEAVE_FF(fs, res) return res
buyukesmeli 0:3a2f06aeceaf 151 #endif
buyukesmeli 0:3a2f06aeceaf 152
buyukesmeli 0:3a2f06aeceaf 153 #define ABORT(fs, res) { fp->err = (BYTE)(res); LEAVE_FF(fs, res); }
buyukesmeli 0:3a2f06aeceaf 154
buyukesmeli 0:3a2f06aeceaf 155
buyukesmeli 0:3a2f06aeceaf 156 /* Definitions of sector size */
buyukesmeli 0:3a2f06aeceaf 157 #if (_MAX_SS < _MIN_SS) || (_MAX_SS != 512 && _MAX_SS != 1024 && _MAX_SS != 2048 && _MAX_SS != 4096) || (_MIN_SS != 512 && _MIN_SS != 1024 && _MIN_SS != 2048 && _MIN_SS != 4096)
buyukesmeli 0:3a2f06aeceaf 158 #error Wrong sector size configuration
buyukesmeli 0:3a2f06aeceaf 159 #endif
buyukesmeli 0:3a2f06aeceaf 160 #if _MAX_SS == _MIN_SS
buyukesmeli 0:3a2f06aeceaf 161 #define SS(fs) ((UINT)_MAX_SS) /* Fixed sector size */
buyukesmeli 0:3a2f06aeceaf 162 #else
buyukesmeli 0:3a2f06aeceaf 163 #define SS(fs) ((fs)->ssize) /* Variable sector size */
buyukesmeli 0:3a2f06aeceaf 164 #endif
buyukesmeli 0:3a2f06aeceaf 165
buyukesmeli 0:3a2f06aeceaf 166
buyukesmeli 0:3a2f06aeceaf 167 /* Timestamp feature */
buyukesmeli 0:3a2f06aeceaf 168 #if _FS_NORTC == 1
buyukesmeli 0:3a2f06aeceaf 169 #if _NORTC_YEAR < 1980 || _NORTC_YEAR > 2107 || _NORTC_MON < 1 || _NORTC_MON > 12 || _NORTC_MDAY < 1 || _NORTC_MDAY > 31
buyukesmeli 0:3a2f06aeceaf 170 #error Invalid _FS_NORTC settings
buyukesmeli 0:3a2f06aeceaf 171 #endif
buyukesmeli 0:3a2f06aeceaf 172 #define GET_FATTIME() ((DWORD)(_NORTC_YEAR - 1980) << 25 | (DWORD)_NORTC_MON << 21 | (DWORD)_NORTC_MDAY << 16)
buyukesmeli 0:3a2f06aeceaf 173 #else
buyukesmeli 0:3a2f06aeceaf 174 #define GET_FATTIME() get_fattime()
buyukesmeli 0:3a2f06aeceaf 175 #endif
buyukesmeli 0:3a2f06aeceaf 176
buyukesmeli 0:3a2f06aeceaf 177
buyukesmeli 0:3a2f06aeceaf 178 /* File access control feature */
buyukesmeli 0:3a2f06aeceaf 179 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 180 #if _FS_READONLY
buyukesmeli 0:3a2f06aeceaf 181 #error _FS_LOCK must be 0 at read-only configuration
buyukesmeli 0:3a2f06aeceaf 182 #endif
buyukesmeli 0:3a2f06aeceaf 183 typedef struct {
buyukesmeli 0:3a2f06aeceaf 184 FATFS *fs; /* Object ID 1, volume (NULL:blank entry) */
buyukesmeli 0:3a2f06aeceaf 185 DWORD clu; /* Object ID 2, directory (0:root) */
buyukesmeli 0:3a2f06aeceaf 186 WORD idx; /* Object ID 3, directory index */
buyukesmeli 0:3a2f06aeceaf 187 WORD ctr; /* Object open counter, 0:none, 0x01..0xFF:read mode open count, 0x100:write mode */
buyukesmeli 0:3a2f06aeceaf 188 } FILESEM;
buyukesmeli 0:3a2f06aeceaf 189 #endif
buyukesmeli 0:3a2f06aeceaf 190
buyukesmeli 0:3a2f06aeceaf 191
buyukesmeli 0:3a2f06aeceaf 192
buyukesmeli 0:3a2f06aeceaf 193 /* DBCS code ranges and SBCS extend character conversion table */
buyukesmeli 0:3a2f06aeceaf 194
buyukesmeli 0:3a2f06aeceaf 195 #if _CODE_PAGE == 932 /* Japanese Shift-JIS */
buyukesmeli 0:3a2f06aeceaf 196 #define _DF1S 0x81 /* DBC 1st byte range 1 start */
buyukesmeli 0:3a2f06aeceaf 197 #define _DF1E 0x9F /* DBC 1st byte range 1 end */
buyukesmeli 0:3a2f06aeceaf 198 #define _DF2S 0xE0 /* DBC 1st byte range 2 start */
buyukesmeli 0:3a2f06aeceaf 199 #define _DF2E 0xFC /* DBC 1st byte range 2 end */
buyukesmeli 0:3a2f06aeceaf 200 #define _DS1S 0x40 /* DBC 2nd byte range 1 start */
buyukesmeli 0:3a2f06aeceaf 201 #define _DS1E 0x7E /* DBC 2nd byte range 1 end */
buyukesmeli 0:3a2f06aeceaf 202 #define _DS2S 0x80 /* DBC 2nd byte range 2 start */
buyukesmeli 0:3a2f06aeceaf 203 #define _DS2E 0xFC /* DBC 2nd byte range 2 end */
buyukesmeli 0:3a2f06aeceaf 204
buyukesmeli 0:3a2f06aeceaf 205 #elif _CODE_PAGE == 936 /* Simplified Chinese GBK */
buyukesmeli 0:3a2f06aeceaf 206 #define _DF1S 0x81
buyukesmeli 0:3a2f06aeceaf 207 #define _DF1E 0xFE
buyukesmeli 0:3a2f06aeceaf 208 #define _DS1S 0x40
buyukesmeli 0:3a2f06aeceaf 209 #define _DS1E 0x7E
buyukesmeli 0:3a2f06aeceaf 210 #define _DS2S 0x80
buyukesmeli 0:3a2f06aeceaf 211 #define _DS2E 0xFE
buyukesmeli 0:3a2f06aeceaf 212
buyukesmeli 0:3a2f06aeceaf 213 #elif _CODE_PAGE == 949 /* Korean */
buyukesmeli 0:3a2f06aeceaf 214 #define _DF1S 0x81
buyukesmeli 0:3a2f06aeceaf 215 #define _DF1E 0xFE
buyukesmeli 0:3a2f06aeceaf 216 #define _DS1S 0x41
buyukesmeli 0:3a2f06aeceaf 217 #define _DS1E 0x5A
buyukesmeli 0:3a2f06aeceaf 218 #define _DS2S 0x61
buyukesmeli 0:3a2f06aeceaf 219 #define _DS2E 0x7A
buyukesmeli 0:3a2f06aeceaf 220 #define _DS3S 0x81
buyukesmeli 0:3a2f06aeceaf 221 #define _DS3E 0xFE
buyukesmeli 0:3a2f06aeceaf 222
buyukesmeli 0:3a2f06aeceaf 223 #elif _CODE_PAGE == 950 /* Traditional Chinese Big5 */
buyukesmeli 0:3a2f06aeceaf 224 #define _DF1S 0x81
buyukesmeli 0:3a2f06aeceaf 225 #define _DF1E 0xFE
buyukesmeli 0:3a2f06aeceaf 226 #define _DS1S 0x40
buyukesmeli 0:3a2f06aeceaf 227 #define _DS1E 0x7E
buyukesmeli 0:3a2f06aeceaf 228 #define _DS2S 0xA1
buyukesmeli 0:3a2f06aeceaf 229 #define _DS2E 0xFE
buyukesmeli 0:3a2f06aeceaf 230
buyukesmeli 0:3a2f06aeceaf 231 #elif _CODE_PAGE == 437 /* U.S. (OEM) */
buyukesmeli 0:3a2f06aeceaf 232 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 233 #define _EXCVT {0x80,0x9A,0x90,0x41,0x8E,0x41,0x8F,0x80,0x45,0x45,0x45,0x49,0x49,0x49,0x8E,0x8F,0x90,0x92,0x92,0x4F,0x99,0x4F,0x55,0x55,0x59,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 234 0x41,0x49,0x4F,0x55,0xA5,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0x21,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 235 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 236 0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 237
buyukesmeli 0:3a2f06aeceaf 238 #elif _CODE_PAGE == 720 /* Arabic (OEM) */
buyukesmeli 0:3a2f06aeceaf 239 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 240 #define _EXCVT {0x80,0x81,0x45,0x41,0x84,0x41,0x86,0x43,0x45,0x45,0x45,0x49,0x49,0x8D,0x8E,0x8F,0x90,0x92,0x92,0x93,0x94,0x95,0x49,0x49,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 241 0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 242 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 243 0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 244
buyukesmeli 0:3a2f06aeceaf 245 #elif _CODE_PAGE == 737 /* Greek (OEM) */
buyukesmeli 0:3a2f06aeceaf 246 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 247 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x92,0x92,0x93,0x94,0x95,0x96,0x97,0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87, \
buyukesmeli 0:3a2f06aeceaf 248 0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0xAA,0x92,0x93,0x94,0x95,0x96,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 249 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 250 0x97,0xEA,0xEB,0xEC,0xE4,0xED,0xEE,0xE7,0xE8,0xF1,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 251
buyukesmeli 0:3a2f06aeceaf 252 #elif _CODE_PAGE == 775 /* Baltic (OEM) */
buyukesmeli 0:3a2f06aeceaf 253 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 254 #define _EXCVT {0x80,0x9A,0x91,0xA0,0x8E,0x95,0x8F,0x80,0xAD,0xED,0x8A,0x8A,0xA1,0x8D,0x8E,0x8F,0x90,0x92,0x92,0xE2,0x99,0x95,0x96,0x97,0x97,0x99,0x9A,0x9D,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 255 0xA0,0xA1,0xE0,0xA3,0xA3,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 256 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xB5,0xB6,0xB7,0xB8,0xBD,0xBE,0xC6,0xC7,0xA5,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 257 0xE0,0xE1,0xE2,0xE3,0xE5,0xE5,0xE6,0xE3,0xE8,0xE8,0xEA,0xEA,0xEE,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 258
buyukesmeli 0:3a2f06aeceaf 259 #elif _CODE_PAGE == 850 /* Multilingual Latin 1 (OEM) */
buyukesmeli 0:3a2f06aeceaf 260 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 261 #define _EXCVT {0x80,0x9A,0x90,0xB6,0x8E,0xB7,0x8F,0x80,0xD2,0xD3,0xD4,0xD8,0xD7,0xDE,0x8E,0x8F,0x90,0x92,0x92,0xE2,0x99,0xE3,0xEA,0xEB,0x59,0x99,0x9A,0x9D,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 262 0xB5,0xD6,0xE0,0xE9,0xA5,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0x21,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 263 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC7,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 264 0xE0,0xE1,0xE2,0xE3,0xE5,0xE5,0xE6,0xE7,0xE7,0xE9,0xEA,0xEB,0xED,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 265
buyukesmeli 0:3a2f06aeceaf 266 #elif _CODE_PAGE == 852 /* Latin 2 (OEM) */
buyukesmeli 0:3a2f06aeceaf 267 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 268 #define _EXCVT {0x80,0x9A,0x90,0xB6,0x8E,0xDE,0x8F,0x80,0x9D,0xD3,0x8A,0x8A,0xD7,0x8D,0x8E,0x8F,0x90,0x91,0x91,0xE2,0x99,0x95,0x95,0x97,0x97,0x99,0x9A,0x9B,0x9B,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 269 0xB5,0xD6,0xE0,0xE9,0xA4,0xA4,0xA6,0xA6,0xA8,0xA8,0xAA,0x8D,0xAC,0xB8,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBD,0xBF, \
buyukesmeli 0:3a2f06aeceaf 270 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC6,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD1,0xD1,0xD2,0xD3,0xD2,0xD5,0xD6,0xD7,0xB7,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 271 0xE0,0xE1,0xE2,0xE3,0xE3,0xD5,0xE6,0xE6,0xE8,0xE9,0xE8,0xEB,0xED,0xED,0xDD,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xEB,0xFC,0xFC,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 272
buyukesmeli 0:3a2f06aeceaf 273 #elif _CODE_PAGE == 855 /* Cyrillic (OEM) */
buyukesmeli 0:3a2f06aeceaf 274 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 275 #define _EXCVT {0x81,0x81,0x83,0x83,0x85,0x85,0x87,0x87,0x89,0x89,0x8B,0x8B,0x8D,0x8D,0x8F,0x8F,0x91,0x91,0x93,0x93,0x95,0x95,0x97,0x97,0x99,0x99,0x9B,0x9B,0x9D,0x9D,0x9F,0x9F, \
buyukesmeli 0:3a2f06aeceaf 276 0xA1,0xA1,0xA3,0xA3,0xA5,0xA5,0xA7,0xA7,0xA9,0xA9,0xAB,0xAB,0xAD,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB6,0xB6,0xB8,0xB8,0xB9,0xBA,0xBB,0xBC,0xBE,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 277 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC7,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD1,0xD1,0xD3,0xD3,0xD5,0xD5,0xD7,0xD7,0xDD,0xD9,0xDA,0xDB,0xDC,0xDD,0xE0,0xDF, \
buyukesmeli 0:3a2f06aeceaf 278 0xE0,0xE2,0xE2,0xE4,0xE4,0xE6,0xE6,0xE8,0xE8,0xEA,0xEA,0xEC,0xEC,0xEE,0xEE,0xEF,0xF0,0xF2,0xF2,0xF4,0xF4,0xF6,0xF6,0xF8,0xF8,0xFA,0xFA,0xFC,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 279
buyukesmeli 0:3a2f06aeceaf 280 #elif _CODE_PAGE == 857 /* Turkish (OEM) */
buyukesmeli 0:3a2f06aeceaf 281 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 282 #define _EXCVT {0x80,0x9A,0x90,0xB6,0x8E,0xB7,0x8F,0x80,0xD2,0xD3,0xD4,0xD8,0xD7,0x98,0x8E,0x8F,0x90,0x92,0x92,0xE2,0x99,0xE3,0xEA,0xEB,0x98,0x99,0x9A,0x9D,0x9C,0x9D,0x9E,0x9E, \
buyukesmeli 0:3a2f06aeceaf 283 0xB5,0xD6,0xE0,0xE9,0xA5,0xA5,0xA6,0xA6,0xA8,0xA9,0xAA,0xAB,0xAC,0x21,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 284 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC7,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 285 0xE0,0xE1,0xE2,0xE3,0xE5,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xDE,0x59,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 286
buyukesmeli 0:3a2f06aeceaf 287 #elif _CODE_PAGE == 858 /* Multilingual Latin 1 + Euro (OEM) */
buyukesmeli 0:3a2f06aeceaf 288 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 289 #define _EXCVT {0x80,0x9A,0x90,0xB6,0x8E,0xB7,0x8F,0x80,0xD2,0xD3,0xD4,0xD8,0xD7,0xDE,0x8E,0x8F,0x90,0x92,0x92,0xE2,0x99,0xE3,0xEA,0xEB,0x59,0x99,0x9A,0x9D,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 290 0xB5,0xD6,0xE0,0xE9,0xA5,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0x21,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 291 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC7,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD1,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 292 0xE0,0xE1,0xE2,0xE3,0xE5,0xE5,0xE6,0xE7,0xE7,0xE9,0xEA,0xEB,0xED,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 293
buyukesmeli 0:3a2f06aeceaf 294 #elif _CODE_PAGE == 862 /* Hebrew (OEM) */
buyukesmeli 0:3a2f06aeceaf 295 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 296 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 297 0x41,0x49,0x4F,0x55,0xA5,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0x21,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 298 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 299 0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 300
buyukesmeli 0:3a2f06aeceaf 301 #elif _CODE_PAGE == 866 /* Russian (OEM) */
buyukesmeli 0:3a2f06aeceaf 302 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 303 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 304 0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 305 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 306 0x90,0x91,0x92,0x93,0x9d,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F,0xF0,0xF0,0xF2,0xF2,0xF4,0xF4,0xF6,0xF6,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 307
buyukesmeli 0:3a2f06aeceaf 308 #elif _CODE_PAGE == 874 /* Thai (OEM, Windows) */
buyukesmeli 0:3a2f06aeceaf 309 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 310 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 311 0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 312 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 313 0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 314
buyukesmeli 0:3a2f06aeceaf 315 #elif _CODE_PAGE == 1250 /* Central Europe (Windows) */
buyukesmeli 0:3a2f06aeceaf 316 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 317 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x8A,0x9B,0x8C,0x8D,0x8E,0x8F, \
buyukesmeli 0:3a2f06aeceaf 318 0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xA3,0xB4,0xB5,0xB6,0xB7,0xB8,0xA5,0xAA,0xBB,0xBC,0xBD,0xBC,0xAF, \
buyukesmeli 0:3a2f06aeceaf 319 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 320 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xF7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xFF}
buyukesmeli 0:3a2f06aeceaf 321
buyukesmeli 0:3a2f06aeceaf 322 #elif _CODE_PAGE == 1251 /* Cyrillic (Windows) */
buyukesmeli 0:3a2f06aeceaf 323 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 324 #define _EXCVT {0x80,0x81,0x82,0x82,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x80,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x8A,0x9B,0x8C,0x8D,0x8E,0x8F, \
buyukesmeli 0:3a2f06aeceaf 325 0xA0,0xA2,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB2,0xA5,0xB5,0xB6,0xB7,0xA8,0xB9,0xAA,0xBB,0xA3,0xBD,0xBD,0xAF, \
buyukesmeli 0:3a2f06aeceaf 326 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 327 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF}
buyukesmeli 0:3a2f06aeceaf 328
buyukesmeli 0:3a2f06aeceaf 329 #elif _CODE_PAGE == 1252 /* Latin 1 (Windows) */
buyukesmeli 0:3a2f06aeceaf 330 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 331 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0xAd,0x9B,0x8C,0x9D,0xAE,0x9F, \
buyukesmeli 0:3a2f06aeceaf 332 0xA0,0x21,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 333 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 334 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xF7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0x9F}
buyukesmeli 0:3a2f06aeceaf 335
buyukesmeli 0:3a2f06aeceaf 336 #elif _CODE_PAGE == 1253 /* Greek (Windows) */
buyukesmeli 0:3a2f06aeceaf 337 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 338 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 339 0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 340 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xA2,0xB8,0xB9,0xBA, \
buyukesmeli 0:3a2f06aeceaf 341 0xE0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xF2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xFB,0xBC,0xFD,0xBF,0xFF}
buyukesmeli 0:3a2f06aeceaf 342
buyukesmeli 0:3a2f06aeceaf 343 #elif _CODE_PAGE == 1254 /* Turkish (Windows) */
buyukesmeli 0:3a2f06aeceaf 344 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 345 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x8A,0x9B,0x8C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 346 0xA0,0x21,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 347 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 348 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xF7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0x9F}
buyukesmeli 0:3a2f06aeceaf 349
buyukesmeli 0:3a2f06aeceaf 350 #elif _CODE_PAGE == 1255 /* Hebrew (Windows) */
buyukesmeli 0:3a2f06aeceaf 351 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 352 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 353 0xA0,0x21,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 354 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 355 0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF,0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 356
buyukesmeli 0:3a2f06aeceaf 357 #elif _CODE_PAGE == 1256 /* Arabic (Windows) */
buyukesmeli 0:3a2f06aeceaf 358 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 359 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x8C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 360 0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 361 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 362 0x41,0xE1,0x41,0xE3,0xE4,0xE5,0xE6,0x43,0x45,0x45,0x45,0x45,0xEC,0xED,0x49,0x49,0xF0,0xF1,0xF2,0xF3,0x4F,0xF5,0xF6,0xF7,0xF8,0x55,0xFA,0x55,0x55,0xFD,0xFE,0xFF}
buyukesmeli 0:3a2f06aeceaf 363
buyukesmeli 0:3a2f06aeceaf 364 #elif _CODE_PAGE == 1257 /* Baltic (Windows) */
buyukesmeli 0:3a2f06aeceaf 365 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 366 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 367 0xA0,0xA1,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xA8,0xB9,0xAA,0xBB,0xBC,0xBD,0xBE,0xAF, \
buyukesmeli 0:3a2f06aeceaf 368 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 369 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xF7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xFF}
buyukesmeli 0:3a2f06aeceaf 370
buyukesmeli 0:3a2f06aeceaf 371 #elif _CODE_PAGE == 1258 /* Vietnam (OEM, Windows) */
buyukesmeli 0:3a2f06aeceaf 372 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 373 #define _EXCVT {0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F,0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0xAC,0x9D,0x9E,0x9F, \
buyukesmeli 0:3a2f06aeceaf 374 0xA0,0x21,0xA2,0xA3,0xA4,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0xAB,0xAC,0xAD,0xAE,0xAF,0xB0,0xB1,0xB2,0xB3,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0xBF, \
buyukesmeli 0:3a2f06aeceaf 375 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF,0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xDE,0xDF, \
buyukesmeli 0:3a2f06aeceaf 376 0xC0,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xEC,0xCD,0xCE,0xCF,0xD0,0xD1,0xF2,0xD3,0xD4,0xD5,0xD6,0xF7,0xD8,0xD9,0xDA,0xDB,0xDC,0xDD,0xFE,0x9F}
buyukesmeli 0:3a2f06aeceaf 377
buyukesmeli 0:3a2f06aeceaf 378 #elif _CODE_PAGE == 1 /* ASCII (for only non-LFN cfg) */
buyukesmeli 0:3a2f06aeceaf 379 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 380 #error Cannot use LFN feature without valid code page.
buyukesmeli 0:3a2f06aeceaf 381 #endif
buyukesmeli 0:3a2f06aeceaf 382 #define _DF1S 0
buyukesmeli 0:3a2f06aeceaf 383
buyukesmeli 0:3a2f06aeceaf 384 #else
buyukesmeli 0:3a2f06aeceaf 385 #error Unknown code page
buyukesmeli 0:3a2f06aeceaf 386
buyukesmeli 0:3a2f06aeceaf 387 #endif
buyukesmeli 0:3a2f06aeceaf 388
buyukesmeli 0:3a2f06aeceaf 389
buyukesmeli 0:3a2f06aeceaf 390 /* Character code support macros */
buyukesmeli 0:3a2f06aeceaf 391 #define IsUpper(c) (((c)>='A')&&((c)<='Z'))
buyukesmeli 0:3a2f06aeceaf 392 #define IsLower(c) (((c)>='a')&&((c)<='z'))
buyukesmeli 0:3a2f06aeceaf 393 #define IsDigit(c) (((c)>='0')&&((c)<='9'))
buyukesmeli 0:3a2f06aeceaf 394
buyukesmeli 0:3a2f06aeceaf 395 #if _DF1S /* Code page is DBCS */
buyukesmeli 0:3a2f06aeceaf 396
buyukesmeli 0:3a2f06aeceaf 397 #ifdef _DF2S /* Two 1st byte areas */
buyukesmeli 0:3a2f06aeceaf 398 #define IsDBCS1(c) (((BYTE)(c) >= _DF1S && (BYTE)(c) <= _DF1E) || ((BYTE)(c) >= _DF2S && (BYTE)(c) <= _DF2E))
buyukesmeli 0:3a2f06aeceaf 399 #else /* One 1st byte area */
buyukesmeli 0:3a2f06aeceaf 400 #define IsDBCS1(c) ((BYTE)(c) >= _DF1S && (BYTE)(c) <= _DF1E)
buyukesmeli 0:3a2f06aeceaf 401 #endif
buyukesmeli 0:3a2f06aeceaf 402
buyukesmeli 0:3a2f06aeceaf 403 #ifdef _DS3S /* Three 2nd byte areas */
buyukesmeli 0:3a2f06aeceaf 404 #define IsDBCS2(c) (((BYTE)(c) >= _DS1S && (BYTE)(c) <= _DS1E) || ((BYTE)(c) >= _DS2S && (BYTE)(c) <= _DS2E) || ((BYTE)(c) >= _DS3S && (BYTE)(c) <= _DS3E))
buyukesmeli 0:3a2f06aeceaf 405 #else /* Two 2nd byte areas */
buyukesmeli 0:3a2f06aeceaf 406 #define IsDBCS2(c) (((BYTE)(c) >= _DS1S && (BYTE)(c) <= _DS1E) || ((BYTE)(c) >= _DS2S && (BYTE)(c) <= _DS2E))
buyukesmeli 0:3a2f06aeceaf 407 #endif
buyukesmeli 0:3a2f06aeceaf 408
buyukesmeli 0:3a2f06aeceaf 409 #else /* Code page is SBCS */
buyukesmeli 0:3a2f06aeceaf 410
buyukesmeli 0:3a2f06aeceaf 411 #define IsDBCS1(c) 0
buyukesmeli 0:3a2f06aeceaf 412 #define IsDBCS2(c) 0
buyukesmeli 0:3a2f06aeceaf 413
buyukesmeli 0:3a2f06aeceaf 414 #endif /* _DF1S */
buyukesmeli 0:3a2f06aeceaf 415
buyukesmeli 0:3a2f06aeceaf 416
buyukesmeli 0:3a2f06aeceaf 417 /* Name status flags */
buyukesmeli 0:3a2f06aeceaf 418 #define NSFLAG 11 /* Index of name status byte in fn[] */
buyukesmeli 0:3a2f06aeceaf 419 #define NS_LOSS 0x01 /* Out of 8.3 format */
buyukesmeli 0:3a2f06aeceaf 420 #define NS_LFN 0x02 /* Force to create LFN entry */
buyukesmeli 0:3a2f06aeceaf 421 #define NS_LAST 0x04 /* Last segment */
buyukesmeli 0:3a2f06aeceaf 422 #define NS_BODY 0x08 /* Lower case flag (body) */
buyukesmeli 0:3a2f06aeceaf 423 #define NS_EXT 0x10 /* Lower case flag (ext) */
buyukesmeli 0:3a2f06aeceaf 424 #define NS_DOT 0x20 /* Dot entry */
buyukesmeli 0:3a2f06aeceaf 425
buyukesmeli 0:3a2f06aeceaf 426
buyukesmeli 0:3a2f06aeceaf 427 /* FAT sub-type boundaries (Differ from specs but correct for real DOS/Windows) */
buyukesmeli 0:3a2f06aeceaf 428 #define MIN_FAT16 4086U /* Minimum number of clusters as FAT16 */
buyukesmeli 0:3a2f06aeceaf 429 #define MIN_FAT32 65526U /* Minimum number of clusters as FAT32 */
buyukesmeli 0:3a2f06aeceaf 430
buyukesmeli 0:3a2f06aeceaf 431
buyukesmeli 0:3a2f06aeceaf 432 /* FatFs refers the members in the FAT structures as byte array instead of
buyukesmeli 0:3a2f06aeceaf 433 / structure member because the structure is not binary compatible between
buyukesmeli 0:3a2f06aeceaf 434 / different platforms */
buyukesmeli 0:3a2f06aeceaf 435
buyukesmeli 0:3a2f06aeceaf 436 #define BS_jmpBoot 0 /* x86 jump instruction (3) */
buyukesmeli 0:3a2f06aeceaf 437 #define BS_OEMName 3 /* OEM name (8) */
buyukesmeli 0:3a2f06aeceaf 438 #define BPB_BytsPerSec 11 /* Sector size [byte] (2) */
buyukesmeli 0:3a2f06aeceaf 439 #define BPB_SecPerClus 13 /* Cluster size [sector] (1) */
buyukesmeli 0:3a2f06aeceaf 440 #define BPB_RsvdSecCnt 14 /* Size of reserved area [sector] (2) */
buyukesmeli 0:3a2f06aeceaf 441 #define BPB_NumFATs 16 /* Number of FAT copies (1) */
buyukesmeli 0:3a2f06aeceaf 442 #define BPB_RootEntCnt 17 /* Number of root directory entries for FAT12/16 (2) */
buyukesmeli 0:3a2f06aeceaf 443 #define BPB_TotSec16 19 /* Volume size [sector] (2) */
buyukesmeli 0:3a2f06aeceaf 444 #define BPB_Media 21 /* Media descriptor (1) */
buyukesmeli 0:3a2f06aeceaf 445 #define BPB_FATSz16 22 /* FAT size [sector] (2) */
buyukesmeli 0:3a2f06aeceaf 446 #define BPB_SecPerTrk 24 /* Track size [sector] (2) */
buyukesmeli 0:3a2f06aeceaf 447 #define BPB_NumHeads 26 /* Number of heads (2) */
buyukesmeli 0:3a2f06aeceaf 448 #define BPB_HiddSec 28 /* Number of special hidden sectors (4) */
buyukesmeli 0:3a2f06aeceaf 449 #define BPB_TotSec32 32 /* Volume size [sector] (4) */
buyukesmeli 0:3a2f06aeceaf 450 #define BS_DrvNum 36 /* Physical drive number (2) */
buyukesmeli 0:3a2f06aeceaf 451 #define BS_BootSig 38 /* Extended boot signature (1) */
buyukesmeli 0:3a2f06aeceaf 452 #define BS_VolID 39 /* Volume serial number (4) */
buyukesmeli 0:3a2f06aeceaf 453 #define BS_VolLab 43 /* Volume label (8) */
buyukesmeli 0:3a2f06aeceaf 454 #define BS_FilSysType 54 /* File system type (1) */
buyukesmeli 0:3a2f06aeceaf 455 #define BPB_FATSz32 36 /* FAT size [sector] (4) */
buyukesmeli 0:3a2f06aeceaf 456 #define BPB_ExtFlags 40 /* Extended flags (2) */
buyukesmeli 0:3a2f06aeceaf 457 #define BPB_FSVer 42 /* File system version (2) */
buyukesmeli 0:3a2f06aeceaf 458 #define BPB_RootClus 44 /* Root directory first cluster (4) */
buyukesmeli 0:3a2f06aeceaf 459 #define BPB_FSInfo 48 /* Offset of FSINFO sector (2) */
buyukesmeli 0:3a2f06aeceaf 460 #define BPB_BkBootSec 50 /* Offset of backup boot sector (2) */
buyukesmeli 0:3a2f06aeceaf 461 #define BS_DrvNum32 64 /* Physical drive number (2) */
buyukesmeli 0:3a2f06aeceaf 462 #define BS_BootSig32 66 /* Extended boot signature (1) */
buyukesmeli 0:3a2f06aeceaf 463 #define BS_VolID32 67 /* Volume serial number (4) */
buyukesmeli 0:3a2f06aeceaf 464 #define BS_VolLab32 71 /* Volume label (8) */
buyukesmeli 0:3a2f06aeceaf 465 #define BS_FilSysType32 82 /* File system type (1) */
buyukesmeli 0:3a2f06aeceaf 466 #define FSI_LeadSig 0 /* FSI: Leading signature (4) */
buyukesmeli 0:3a2f06aeceaf 467 #define FSI_StrucSig 484 /* FSI: Structure signature (4) */
buyukesmeli 0:3a2f06aeceaf 468 #define FSI_Free_Count 488 /* FSI: Number of free clusters (4) */
buyukesmeli 0:3a2f06aeceaf 469 #define FSI_Nxt_Free 492 /* FSI: Last allocated cluster (4) */
buyukesmeli 0:3a2f06aeceaf 470 #define MBR_Table 446 /* MBR: Partition table offset (2) */
buyukesmeli 0:3a2f06aeceaf 471 #define SZ_PTE 16 /* MBR: Size of a partition table entry */
buyukesmeli 0:3a2f06aeceaf 472 #define BS_55AA 510 /* Signature word (2) */
buyukesmeli 0:3a2f06aeceaf 473
buyukesmeli 0:3a2f06aeceaf 474 #define DIR_Name 0 /* Short file name (11) */
buyukesmeli 0:3a2f06aeceaf 475 #define DIR_Attr 11 /* Attribute (1) */
buyukesmeli 0:3a2f06aeceaf 476 #define DIR_NTres 12 /* Lower case flag (1) */
buyukesmeli 0:3a2f06aeceaf 477 #define DIR_CrtTimeTenth 13 /* Created time sub-second (1) */
buyukesmeli 0:3a2f06aeceaf 478 #define DIR_CrtTime 14 /* Created time (2) */
buyukesmeli 0:3a2f06aeceaf 479 #define DIR_CrtDate 16 /* Created date (2) */
buyukesmeli 0:3a2f06aeceaf 480 #define DIR_LstAccDate 18 /* Last accessed date (2) */
buyukesmeli 0:3a2f06aeceaf 481 #define DIR_FstClusHI 20 /* Higher 16-bit of first cluster (2) */
buyukesmeli 0:3a2f06aeceaf 482 #define DIR_WrtTime 22 /* Modified time (2) */
buyukesmeli 0:3a2f06aeceaf 483 #define DIR_WrtDate 24 /* Modified date (2) */
buyukesmeli 0:3a2f06aeceaf 484 #define DIR_FstClusLO 26 /* Lower 16-bit of first cluster (2) */
buyukesmeli 0:3a2f06aeceaf 485 #define DIR_FileSize 28 /* File size (4) */
buyukesmeli 0:3a2f06aeceaf 486 #define LDIR_Ord 0 /* LFN entry order and LLE flag (1) */
buyukesmeli 0:3a2f06aeceaf 487 #define LDIR_Attr 11 /* LFN attribute (1) */
buyukesmeli 0:3a2f06aeceaf 488 #define LDIR_Type 12 /* LFN type (1) */
buyukesmeli 0:3a2f06aeceaf 489 #define LDIR_Chksum 13 /* Sum of corresponding SFN entry */
buyukesmeli 0:3a2f06aeceaf 490 #define LDIR_FstClusLO 26 /* Must be zero (0) */
buyukesmeli 0:3a2f06aeceaf 491 #define SZ_DIRE 32 /* Size of a directory entry */
buyukesmeli 0:3a2f06aeceaf 492 #define LLEF 0x40 /* Last long entry flag in LDIR_Ord */
buyukesmeli 0:3a2f06aeceaf 493 #define DDEM 0xE5 /* Deleted directory entry mark at DIR_Name[0] */
buyukesmeli 0:3a2f06aeceaf 494 #define RDDEM 0x05 /* Replacement of the character collides with DDEM */
buyukesmeli 0:3a2f06aeceaf 495
buyukesmeli 0:3a2f06aeceaf 496
buyukesmeli 0:3a2f06aeceaf 497
buyukesmeli 0:3a2f06aeceaf 498
buyukesmeli 0:3a2f06aeceaf 499 /*------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 500 /* Module private work area */
buyukesmeli 0:3a2f06aeceaf 501 /*------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 502 /* Remark: Uninitialized variables with static duration are
buyukesmeli 0:3a2f06aeceaf 503 / guaranteed zero/null at start-up. If not, either the linker
buyukesmeli 0:3a2f06aeceaf 504 / or start-up routine being used is out of ANSI-C standard.
buyukesmeli 0:3a2f06aeceaf 505 */
buyukesmeli 0:3a2f06aeceaf 506
buyukesmeli 0:3a2f06aeceaf 507 #if _VOLUMES < 1 || _VOLUMES > 9
buyukesmeli 0:3a2f06aeceaf 508 #error Wrong _VOLUMES setting
buyukesmeli 0:3a2f06aeceaf 509 #endif
buyukesmeli 0:3a2f06aeceaf 510 static FATFS *FatFs[_VOLUMES]; /* Pointer to the file system objects (logical drives) */
buyukesmeli 0:3a2f06aeceaf 511 static WORD Fsid; /* File system mount ID */
buyukesmeli 0:3a2f06aeceaf 512
buyukesmeli 0:3a2f06aeceaf 513 #if _FS_RPATH && _VOLUMES >= 2
buyukesmeli 0:3a2f06aeceaf 514 static BYTE CurrVol; /* Current drive */
buyukesmeli 0:3a2f06aeceaf 515 #endif
buyukesmeli 0:3a2f06aeceaf 516
buyukesmeli 0:3a2f06aeceaf 517 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 518 static FILESEM Files[_FS_LOCK]; /* Open object lock semaphores */
buyukesmeli 0:3a2f06aeceaf 519 #endif
buyukesmeli 0:3a2f06aeceaf 520
buyukesmeli 0:3a2f06aeceaf 521 #if _USE_LFN == 0 /* Non LFN feature */
buyukesmeli 0:3a2f06aeceaf 522 #define DEFINE_NAMEBUF BYTE sfn[12]
buyukesmeli 0:3a2f06aeceaf 523 #define INIT_BUF(dobj) (dobj).fn = sfn
buyukesmeli 0:3a2f06aeceaf 524 #define FREE_BUF()
buyukesmeli 0:3a2f06aeceaf 525 #else
buyukesmeli 0:3a2f06aeceaf 526 #if _MAX_LFN < 12 || _MAX_LFN > 255
buyukesmeli 0:3a2f06aeceaf 527 #error Wrong _MAX_LFN setting
buyukesmeli 0:3a2f06aeceaf 528 #endif
buyukesmeli 0:3a2f06aeceaf 529 #if _USE_LFN == 1 /* LFN feature with static working buffer */
buyukesmeli 0:3a2f06aeceaf 530 static WCHAR LfnBuf[_MAX_LFN + 1];
buyukesmeli 0:3a2f06aeceaf 531 #define DEFINE_NAMEBUF BYTE sfn[12]
buyukesmeli 0:3a2f06aeceaf 532 #define INIT_BUF(dobj) { (dobj).fn = sfn; (dobj).lfn = LfnBuf; }
buyukesmeli 0:3a2f06aeceaf 533 #define FREE_BUF()
buyukesmeli 0:3a2f06aeceaf 534 #elif _USE_LFN == 2 /* LFN feature with dynamic working buffer on the stack */
buyukesmeli 0:3a2f06aeceaf 535 #define DEFINE_NAMEBUF BYTE sfn[12]; WCHAR lbuf[_MAX_LFN + 1]
buyukesmeli 0:3a2f06aeceaf 536 #define INIT_BUF(dobj) { (dobj).fn = sfn; (dobj).lfn = lbuf; }
buyukesmeli 0:3a2f06aeceaf 537 #define FREE_BUF()
buyukesmeli 0:3a2f06aeceaf 538 #elif _USE_LFN == 3 /* LFN feature with dynamic working buffer on the heap */
buyukesmeli 0:3a2f06aeceaf 539 #define DEFINE_NAMEBUF BYTE sfn[12]; WCHAR *lfn
buyukesmeli 0:3a2f06aeceaf 540 #define INIT_BUF(dobj) { lfn = ff_memalloc((_MAX_LFN + 1) * 2); if (!lfn) LEAVE_FF((dobj).fs, FR_NOT_ENOUGH_CORE); (dobj).lfn = lfn; (dobj).fn = sfn; }
buyukesmeli 0:3a2f06aeceaf 541 #define FREE_BUF() ff_memfree(lfn)
buyukesmeli 0:3a2f06aeceaf 542 #else
buyukesmeli 0:3a2f06aeceaf 543 #error Wrong _USE_LFN setting
buyukesmeli 0:3a2f06aeceaf 544 #endif
buyukesmeli 0:3a2f06aeceaf 545 #endif
buyukesmeli 0:3a2f06aeceaf 546
buyukesmeli 0:3a2f06aeceaf 547 #ifdef _EXCVT
buyukesmeli 0:3a2f06aeceaf 548 static const BYTE ExCvt[] = _EXCVT; /* Upper conversion table for extended characters */
buyukesmeli 0:3a2f06aeceaf 549 #endif
buyukesmeli 0:3a2f06aeceaf 550
buyukesmeli 0:3a2f06aeceaf 551
buyukesmeli 0:3a2f06aeceaf 552
buyukesmeli 0:3a2f06aeceaf 553
buyukesmeli 0:3a2f06aeceaf 554
buyukesmeli 0:3a2f06aeceaf 555
buyukesmeli 0:3a2f06aeceaf 556 /*--------------------------------------------------------------------------
buyukesmeli 0:3a2f06aeceaf 557
buyukesmeli 0:3a2f06aeceaf 558 Module Private Functions
buyukesmeli 0:3a2f06aeceaf 559
buyukesmeli 0:3a2f06aeceaf 560 ---------------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 561 DWORD clust2sect (FATFS* fs, DWORD clst);
buyukesmeli 0:3a2f06aeceaf 562 DWORD get_fat (FATFS* fs, DWORD clst);
buyukesmeli 0:3a2f06aeceaf 563
buyukesmeli 0:3a2f06aeceaf 564 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 565 FRESULT put_fat (FATFS* fs, DWORD clst, DWORD val);
buyukesmeli 0:3a2f06aeceaf 566 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 567
buyukesmeli 0:3a2f06aeceaf 568 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 569 static void gen_numname (BYTE* dst, const BYTE* src, const WCHAR* lfn, UINT seq);
buyukesmeli 0:3a2f06aeceaf 570 #endif /* !_USE_LFN */
buyukesmeli 0:3a2f06aeceaf 571
buyukesmeli 0:3a2f06aeceaf 572
buyukesmeli 0:3a2f06aeceaf 573
buyukesmeli 0:3a2f06aeceaf 574 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 575 /* String functions */
buyukesmeli 0:3a2f06aeceaf 576 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 577
buyukesmeli 0:3a2f06aeceaf 578 /* Copy memory to memory */
buyukesmeli 0:3a2f06aeceaf 579 static
buyukesmeli 0:3a2f06aeceaf 580 void mem_cpy (void* dst, const void* src, UINT cnt) {
buyukesmeli 0:3a2f06aeceaf 581 BYTE *d = (BYTE*)dst;
buyukesmeli 0:3a2f06aeceaf 582 const BYTE *s = (const BYTE*)src;
buyukesmeli 0:3a2f06aeceaf 583
buyukesmeli 0:3a2f06aeceaf 584 #if _WORD_ACCESS == 1
buyukesmeli 0:3a2f06aeceaf 585 while (cnt >= sizeof (int)) {
buyukesmeli 0:3a2f06aeceaf 586 *(int*)d = *(int*)s;
buyukesmeli 0:3a2f06aeceaf 587 d += sizeof (int); s += sizeof (int);
buyukesmeli 0:3a2f06aeceaf 588 cnt -= sizeof (int);
buyukesmeli 0:3a2f06aeceaf 589 }
buyukesmeli 0:3a2f06aeceaf 590 #endif
buyukesmeli 0:3a2f06aeceaf 591 while (cnt--)
buyukesmeli 0:3a2f06aeceaf 592 *d++ = *s++;
buyukesmeli 0:3a2f06aeceaf 593 }
buyukesmeli 0:3a2f06aeceaf 594
buyukesmeli 0:3a2f06aeceaf 595 /* Fill memory */
buyukesmeli 0:3a2f06aeceaf 596 static
buyukesmeli 0:3a2f06aeceaf 597 void mem_set (void* dst, int val, UINT cnt) {
buyukesmeli 0:3a2f06aeceaf 598 BYTE *d = (BYTE*)dst;
buyukesmeli 0:3a2f06aeceaf 599
buyukesmeli 0:3a2f06aeceaf 600 while (cnt--)
buyukesmeli 0:3a2f06aeceaf 601 *d++ = (BYTE)val;
buyukesmeli 0:3a2f06aeceaf 602 }
buyukesmeli 0:3a2f06aeceaf 603
buyukesmeli 0:3a2f06aeceaf 604 /* Compare memory to memory */
buyukesmeli 0:3a2f06aeceaf 605 static
buyukesmeli 0:3a2f06aeceaf 606 int mem_cmp (const void* dst, const void* src, UINT cnt) {
buyukesmeli 0:3a2f06aeceaf 607 const BYTE *d = (const BYTE *)dst, *s = (const BYTE *)src;
buyukesmeli 0:3a2f06aeceaf 608 int r = 0;
buyukesmeli 0:3a2f06aeceaf 609
buyukesmeli 0:3a2f06aeceaf 610 while (cnt-- && (r = *d++ - *s++) == 0) ;
buyukesmeli 0:3a2f06aeceaf 611 return r;
buyukesmeli 0:3a2f06aeceaf 612 }
buyukesmeli 0:3a2f06aeceaf 613
buyukesmeli 0:3a2f06aeceaf 614 /* Check if chr is contained in the string */
buyukesmeli 0:3a2f06aeceaf 615 static
buyukesmeli 0:3a2f06aeceaf 616 int chk_chr (const char* str, int chr) {
buyukesmeli 0:3a2f06aeceaf 617 while (*str && *str != chr) str++;
buyukesmeli 0:3a2f06aeceaf 618 return *str;
buyukesmeli 0:3a2f06aeceaf 619 }
buyukesmeli 0:3a2f06aeceaf 620
buyukesmeli 0:3a2f06aeceaf 621
buyukesmeli 0:3a2f06aeceaf 622
buyukesmeli 0:3a2f06aeceaf 623
buyukesmeli 0:3a2f06aeceaf 624 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 625 /* Request/Release grant to access the volume */
buyukesmeli 0:3a2f06aeceaf 626 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 627 #if _FS_REENTRANT
buyukesmeli 0:3a2f06aeceaf 628 static
buyukesmeli 0:3a2f06aeceaf 629 int lock_fs (
buyukesmeli 0:3a2f06aeceaf 630 FATFS* fs /* File system object */
buyukesmeli 0:3a2f06aeceaf 631 )
buyukesmeli 0:3a2f06aeceaf 632 {
buyukesmeli 0:3a2f06aeceaf 633 return ff_req_grant(fs->sobj);
buyukesmeli 0:3a2f06aeceaf 634 }
buyukesmeli 0:3a2f06aeceaf 635
buyukesmeli 0:3a2f06aeceaf 636
buyukesmeli 0:3a2f06aeceaf 637 static
buyukesmeli 0:3a2f06aeceaf 638 void unlock_fs (
buyukesmeli 0:3a2f06aeceaf 639 FATFS* fs, /* File system object */
buyukesmeli 0:3a2f06aeceaf 640 FRESULT res /* Result code to be returned */
buyukesmeli 0:3a2f06aeceaf 641 )
buyukesmeli 0:3a2f06aeceaf 642 {
buyukesmeli 0:3a2f06aeceaf 643 if (fs &&
buyukesmeli 0:3a2f06aeceaf 644 res != FR_NOT_ENABLED &&
buyukesmeli 0:3a2f06aeceaf 645 res != FR_INVALID_DRIVE &&
buyukesmeli 0:3a2f06aeceaf 646 res != FR_INVALID_OBJECT &&
buyukesmeli 0:3a2f06aeceaf 647 res != FR_TIMEOUT) {
buyukesmeli 0:3a2f06aeceaf 648 ff_rel_grant(fs->sobj);
buyukesmeli 0:3a2f06aeceaf 649 }
buyukesmeli 0:3a2f06aeceaf 650 }
buyukesmeli 0:3a2f06aeceaf 651 #endif
buyukesmeli 0:3a2f06aeceaf 652
buyukesmeli 0:3a2f06aeceaf 653
buyukesmeli 0:3a2f06aeceaf 654
buyukesmeli 0:3a2f06aeceaf 655
buyukesmeli 0:3a2f06aeceaf 656 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 657 /* File lock control functions */
buyukesmeli 0:3a2f06aeceaf 658 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 659 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 660
buyukesmeli 0:3a2f06aeceaf 661 static
buyukesmeli 0:3a2f06aeceaf 662 FRESULT chk_lock ( /* Check if the file can be accessed */
buyukesmeli 0:3a2f06aeceaf 663 DIR_* dp, /* Directory object pointing the file to be checked */
buyukesmeli 0:3a2f06aeceaf 664 int acc /* Desired access type (0:Read, 1:Write, 2:Delete/Rename) */
buyukesmeli 0:3a2f06aeceaf 665 )
buyukesmeli 0:3a2f06aeceaf 666 {
buyukesmeli 0:3a2f06aeceaf 667 UINT i, be;
buyukesmeli 0:3a2f06aeceaf 668
buyukesmeli 0:3a2f06aeceaf 669 /* Search file semaphore table */
buyukesmeli 0:3a2f06aeceaf 670 for (i = be = 0; i < _FS_LOCK; i++) {
buyukesmeli 0:3a2f06aeceaf 671 if (Files[i].fs) { /* Existing entry */
buyukesmeli 0:3a2f06aeceaf 672 if (Files[i].fs == dp->fs && /* Check if the object matched with an open object */
buyukesmeli 0:3a2f06aeceaf 673 Files[i].clu == dp->sclust &&
buyukesmeli 0:3a2f06aeceaf 674 Files[i].idx == dp->index) break;
buyukesmeli 0:3a2f06aeceaf 675 } else { /* Blank entry */
buyukesmeli 0:3a2f06aeceaf 676 be = 1;
buyukesmeli 0:3a2f06aeceaf 677 }
buyukesmeli 0:3a2f06aeceaf 678 }
buyukesmeli 0:3a2f06aeceaf 679 if (i == _FS_LOCK) /* The object is not opened */
buyukesmeli 0:3a2f06aeceaf 680 return (be || acc == 2) ? FR_OK : FR_TOO_MANY_OPEN_FILES; /* Is there a blank entry for new object? */
buyukesmeli 0:3a2f06aeceaf 681
buyukesmeli 0:3a2f06aeceaf 682 /* The object has been opened. Reject any open against writing file and all write mode open */
buyukesmeli 0:3a2f06aeceaf 683 return (acc || Files[i].ctr == 0x100) ? FR_LOCKED : FR_OK;
buyukesmeli 0:3a2f06aeceaf 684 }
buyukesmeli 0:3a2f06aeceaf 685
buyukesmeli 0:3a2f06aeceaf 686
buyukesmeli 0:3a2f06aeceaf 687 static
buyukesmeli 0:3a2f06aeceaf 688 int enq_lock (void) /* Check if an entry is available for a new object */
buyukesmeli 0:3a2f06aeceaf 689 {
buyukesmeli 0:3a2f06aeceaf 690 UINT i;
buyukesmeli 0:3a2f06aeceaf 691
buyukesmeli 0:3a2f06aeceaf 692 for (i = 0; i < _FS_LOCK && Files[i].fs; i++) ;
buyukesmeli 0:3a2f06aeceaf 693 return (i == _FS_LOCK) ? 0 : 1;
buyukesmeli 0:3a2f06aeceaf 694 }
buyukesmeli 0:3a2f06aeceaf 695
buyukesmeli 0:3a2f06aeceaf 696
buyukesmeli 0:3a2f06aeceaf 697 static
buyukesmeli 0:3a2f06aeceaf 698 UINT inc_lock ( /* Increment object open counter and returns its index (0:Internal error) */
buyukesmeli 0:3a2f06aeceaf 699 DIR_* dp, /* Directory object pointing the file to register or increment */
buyukesmeli 0:3a2f06aeceaf 700 int acc /* Desired access (0:Read, 1:Write, 2:Delete/Rename) */
buyukesmeli 0:3a2f06aeceaf 701 )
buyukesmeli 0:3a2f06aeceaf 702 {
buyukesmeli 0:3a2f06aeceaf 703 UINT i;
buyukesmeli 0:3a2f06aeceaf 704
buyukesmeli 0:3a2f06aeceaf 705
buyukesmeli 0:3a2f06aeceaf 706 for (i = 0; i < _FS_LOCK; i++) { /* Find the object */
buyukesmeli 0:3a2f06aeceaf 707 if (Files[i].fs == dp->fs &&
buyukesmeli 0:3a2f06aeceaf 708 Files[i].clu == dp->sclust &&
buyukesmeli 0:3a2f06aeceaf 709 Files[i].idx == dp->index) break;
buyukesmeli 0:3a2f06aeceaf 710 }
buyukesmeli 0:3a2f06aeceaf 711
buyukesmeli 0:3a2f06aeceaf 712 if (i == _FS_LOCK) { /* Not opened. Register it as new. */
buyukesmeli 0:3a2f06aeceaf 713 for (i = 0; i < _FS_LOCK && Files[i].fs; i++) ;
buyukesmeli 0:3a2f06aeceaf 714 if (i == _FS_LOCK) return 0; /* No free entry to register (int err) */
buyukesmeli 0:3a2f06aeceaf 715 Files[i].fs = dp->fs;
buyukesmeli 0:3a2f06aeceaf 716 Files[i].clu = dp->sclust;
buyukesmeli 0:3a2f06aeceaf 717 Files[i].idx = dp->index;
buyukesmeli 0:3a2f06aeceaf 718 Files[i].ctr = 0;
buyukesmeli 0:3a2f06aeceaf 719 }
buyukesmeli 0:3a2f06aeceaf 720
buyukesmeli 0:3a2f06aeceaf 721 if (acc && Files[i].ctr) return 0; /* Access violation (int err) */
buyukesmeli 0:3a2f06aeceaf 722
buyukesmeli 0:3a2f06aeceaf 723 Files[i].ctr = acc ? 0x100 : Files[i].ctr + 1; /* Set semaphore value */
buyukesmeli 0:3a2f06aeceaf 724
buyukesmeli 0:3a2f06aeceaf 725 return i + 1;
buyukesmeli 0:3a2f06aeceaf 726 }
buyukesmeli 0:3a2f06aeceaf 727
buyukesmeli 0:3a2f06aeceaf 728
buyukesmeli 0:3a2f06aeceaf 729 static
buyukesmeli 0:3a2f06aeceaf 730 FRESULT dec_lock ( /* Decrement object open counter */
buyukesmeli 0:3a2f06aeceaf 731 UINT i /* Semaphore index (1..) */
buyukesmeli 0:3a2f06aeceaf 732 )
buyukesmeli 0:3a2f06aeceaf 733 {
buyukesmeli 0:3a2f06aeceaf 734 WORD n;
buyukesmeli 0:3a2f06aeceaf 735 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 736
buyukesmeli 0:3a2f06aeceaf 737
buyukesmeli 0:3a2f06aeceaf 738 if (--i < _FS_LOCK) { /* Shift index number origin from 0 */
buyukesmeli 0:3a2f06aeceaf 739 n = Files[i].ctr;
buyukesmeli 0:3a2f06aeceaf 740 if (n == 0x100) n = 0; /* If write mode open, delete the entry */
buyukesmeli 0:3a2f06aeceaf 741 if (n) n--; /* Decrement read mode open count */
buyukesmeli 0:3a2f06aeceaf 742 Files[i].ctr = n;
buyukesmeli 0:3a2f06aeceaf 743 if (!n) Files[i].fs = 0; /* Delete the entry if open count gets zero */
buyukesmeli 0:3a2f06aeceaf 744 res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 745 } else {
buyukesmeli 0:3a2f06aeceaf 746 res = FR_INT_ERR; /* Invalid index nunber */
buyukesmeli 0:3a2f06aeceaf 747 }
buyukesmeli 0:3a2f06aeceaf 748 return res;
buyukesmeli 0:3a2f06aeceaf 749 }
buyukesmeli 0:3a2f06aeceaf 750
buyukesmeli 0:3a2f06aeceaf 751
buyukesmeli 0:3a2f06aeceaf 752 static
buyukesmeli 0:3a2f06aeceaf 753 void clear_lock ( /* Clear lock entries of the volume */
buyukesmeli 0:3a2f06aeceaf 754 FATFS *fs
buyukesmeli 0:3a2f06aeceaf 755 )
buyukesmeli 0:3a2f06aeceaf 756 {
buyukesmeli 0:3a2f06aeceaf 757 UINT i;
buyukesmeli 0:3a2f06aeceaf 758
buyukesmeli 0:3a2f06aeceaf 759 for (i = 0; i < _FS_LOCK; i++) {
buyukesmeli 0:3a2f06aeceaf 760 if (Files[i].fs == fs) Files[i].fs = 0;
buyukesmeli 0:3a2f06aeceaf 761 }
buyukesmeli 0:3a2f06aeceaf 762 }
buyukesmeli 0:3a2f06aeceaf 763 #endif
buyukesmeli 0:3a2f06aeceaf 764
buyukesmeli 0:3a2f06aeceaf 765
buyukesmeli 0:3a2f06aeceaf 766
buyukesmeli 0:3a2f06aeceaf 767
buyukesmeli 0:3a2f06aeceaf 768 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 769 /* Move/Flush disk access window in the file system object */
buyukesmeli 0:3a2f06aeceaf 770 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 771 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 772 static
buyukesmeli 0:3a2f06aeceaf 773 FRESULT sync_window (
buyukesmeli 0:3a2f06aeceaf 774 FATFS* fs /* File system object */
buyukesmeli 0:3a2f06aeceaf 775 )
buyukesmeli 0:3a2f06aeceaf 776 {
buyukesmeli 0:3a2f06aeceaf 777 DWORD wsect;
buyukesmeli 0:3a2f06aeceaf 778 UINT nf;
buyukesmeli 0:3a2f06aeceaf 779 FRESULT res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 780
buyukesmeli 0:3a2f06aeceaf 781
buyukesmeli 0:3a2f06aeceaf 782 if (fs->wflag) { /* Write back the sector if it is dirty */
buyukesmeli 0:3a2f06aeceaf 783 wsect = fs->winsect; /* Current sector number */
buyukesmeli 0:3a2f06aeceaf 784 if (disk_write(fs->drv, fs->win.d8, wsect, 1) != RES_OK) {
buyukesmeli 0:3a2f06aeceaf 785 res = FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 786 } else {
buyukesmeli 0:3a2f06aeceaf 787 fs->wflag = 0;
buyukesmeli 0:3a2f06aeceaf 788 if (wsect - fs->fatbase < fs->fsize) { /* Is it in the FAT area? */
buyukesmeli 0:3a2f06aeceaf 789 for (nf = fs->n_fats; nf >= 2; nf--) { /* Reflect the change to all FAT copies */
buyukesmeli 0:3a2f06aeceaf 790 wsect += fs->fsize;
buyukesmeli 0:3a2f06aeceaf 791 disk_write(fs->drv, fs->win.d8, wsect, 1);
buyukesmeli 0:3a2f06aeceaf 792 }
buyukesmeli 0:3a2f06aeceaf 793 }
buyukesmeli 0:3a2f06aeceaf 794 }
buyukesmeli 0:3a2f06aeceaf 795 }
buyukesmeli 0:3a2f06aeceaf 796 return res;
buyukesmeli 0:3a2f06aeceaf 797 }
buyukesmeli 0:3a2f06aeceaf 798 #endif
buyukesmeli 0:3a2f06aeceaf 799
buyukesmeli 0:3a2f06aeceaf 800
buyukesmeli 0:3a2f06aeceaf 801 static
buyukesmeli 0:3a2f06aeceaf 802 FRESULT move_window (
buyukesmeli 0:3a2f06aeceaf 803 FATFS* fs, /* File system object */
buyukesmeli 0:3a2f06aeceaf 804 DWORD sector /* Sector number to make appearance in the fs->win[].d8 */
buyukesmeli 0:3a2f06aeceaf 805 )
buyukesmeli 0:3a2f06aeceaf 806 {
buyukesmeli 0:3a2f06aeceaf 807 FRESULT res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 808
buyukesmeli 0:3a2f06aeceaf 809
buyukesmeli 0:3a2f06aeceaf 810 if (sector != fs->winsect) { /* Window offset changed? */
buyukesmeli 0:3a2f06aeceaf 811 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 812 res = sync_window(fs); /* Write-back changes */
buyukesmeli 0:3a2f06aeceaf 813 #endif
buyukesmeli 0:3a2f06aeceaf 814 if (res == FR_OK) { /* Fill sector window with new data */
buyukesmeli 0:3a2f06aeceaf 815 if (disk_read(fs->drv, fs->win.d8, sector, 1) != RES_OK) {
buyukesmeli 0:3a2f06aeceaf 816 sector = 0xFFFFFFFF; /* Invalidate window if data is not reliable */
buyukesmeli 0:3a2f06aeceaf 817 res = FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 818 }
buyukesmeli 0:3a2f06aeceaf 819 fs->winsect = sector;
buyukesmeli 0:3a2f06aeceaf 820 }
buyukesmeli 0:3a2f06aeceaf 821 }
buyukesmeli 0:3a2f06aeceaf 822 return res;
buyukesmeli 0:3a2f06aeceaf 823 }
buyukesmeli 0:3a2f06aeceaf 824
buyukesmeli 0:3a2f06aeceaf 825
buyukesmeli 0:3a2f06aeceaf 826
buyukesmeli 0:3a2f06aeceaf 827
buyukesmeli 0:3a2f06aeceaf 828 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 829 /* Synchronize file system and strage device */
buyukesmeli 0:3a2f06aeceaf 830 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 831 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 832 static
buyukesmeli 0:3a2f06aeceaf 833 FRESULT sync_fs ( /* FR_OK: successful, FR_DISK_ERR: failed */
buyukesmeli 0:3a2f06aeceaf 834 FATFS* fs /* File system object */
buyukesmeli 0:3a2f06aeceaf 835 )
buyukesmeli 0:3a2f06aeceaf 836 {
buyukesmeli 0:3a2f06aeceaf 837 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 838
buyukesmeli 0:3a2f06aeceaf 839
buyukesmeli 0:3a2f06aeceaf 840 res = sync_window(fs);
buyukesmeli 0:3a2f06aeceaf 841 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 842 /* Update FSINFO sector if needed */
buyukesmeli 0:3a2f06aeceaf 843 if (fs->fs_type == FS_FAT32 && fs->fsi_flag == 1) {
buyukesmeli 0:3a2f06aeceaf 844 /* Create FSINFO structure */
buyukesmeli 0:3a2f06aeceaf 845 mem_set(fs->win.d8, 0, SS(fs));
buyukesmeli 0:3a2f06aeceaf 846 ST_WORD(fs->win.d8 + BS_55AA, 0xAA55);
buyukesmeli 0:3a2f06aeceaf 847 ST_DWORD(fs->win.d8 + FSI_LeadSig, 0x41615252);
buyukesmeli 0:3a2f06aeceaf 848 ST_DWORD(fs->win.d8 + FSI_StrucSig, 0x61417272);
buyukesmeli 0:3a2f06aeceaf 849 ST_DWORD(fs->win.d8 + FSI_Free_Count, fs->free_clust);
buyukesmeli 0:3a2f06aeceaf 850 ST_DWORD(fs->win.d8 + FSI_Nxt_Free, fs->last_clust);
buyukesmeli 0:3a2f06aeceaf 851 /* Write it into the FSINFO sector */
buyukesmeli 0:3a2f06aeceaf 852 fs->winsect = fs->volbase + 1;
buyukesmeli 0:3a2f06aeceaf 853 disk_write(fs->drv, fs->win.d8, fs->winsect, 1);
buyukesmeli 0:3a2f06aeceaf 854 fs->fsi_flag = 0;
buyukesmeli 0:3a2f06aeceaf 855 }
buyukesmeli 0:3a2f06aeceaf 856 /* Make sure that no pending write process in the physical drive */
buyukesmeli 0:3a2f06aeceaf 857 if (disk_ioctl(fs->drv, CTRL_SYNC, 0) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 858 res = FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 859 }
buyukesmeli 0:3a2f06aeceaf 860
buyukesmeli 0:3a2f06aeceaf 861 return res;
buyukesmeli 0:3a2f06aeceaf 862 }
buyukesmeli 0:3a2f06aeceaf 863 #endif
buyukesmeli 0:3a2f06aeceaf 864
buyukesmeli 0:3a2f06aeceaf 865
buyukesmeli 0:3a2f06aeceaf 866
buyukesmeli 0:3a2f06aeceaf 867
buyukesmeli 0:3a2f06aeceaf 868 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 869 /* Get sector# from cluster# */
buyukesmeli 0:3a2f06aeceaf 870 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 871 /* Hidden API for hacks and disk tools */
buyukesmeli 0:3a2f06aeceaf 872
buyukesmeli 0:3a2f06aeceaf 873 DWORD clust2sect ( /* !=0: Sector number, 0: Failed - invalid cluster# */
buyukesmeli 0:3a2f06aeceaf 874 FATFS* fs, /* File system object */
buyukesmeli 0:3a2f06aeceaf 875 DWORD clst /* Cluster# to be converted */
buyukesmeli 0:3a2f06aeceaf 876 )
buyukesmeli 0:3a2f06aeceaf 877 {
buyukesmeli 0:3a2f06aeceaf 878 clst -= 2;
buyukesmeli 0:3a2f06aeceaf 879 if (clst >= fs->n_fatent - 2) return 0; /* Invalid cluster# */
buyukesmeli 0:3a2f06aeceaf 880 return clst * fs->csize + fs->database;
buyukesmeli 0:3a2f06aeceaf 881 }
buyukesmeli 0:3a2f06aeceaf 882
buyukesmeli 0:3a2f06aeceaf 883
buyukesmeli 0:3a2f06aeceaf 884
buyukesmeli 0:3a2f06aeceaf 885
buyukesmeli 0:3a2f06aeceaf 886 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 887 /* FAT access - Read value of a FAT entry */
buyukesmeli 0:3a2f06aeceaf 888 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 889 /* Hidden API for hacks and disk tools */
buyukesmeli 0:3a2f06aeceaf 890
buyukesmeli 0:3a2f06aeceaf 891 DWORD get_fat ( /* 0xFFFFFFFF:Disk error, 1:Internal error, 2..0x0FFFFFFF:Cluster status */
buyukesmeli 0:3a2f06aeceaf 892 FATFS* fs, /* File system object */
buyukesmeli 0:3a2f06aeceaf 893 DWORD clst /* FAT index number (cluster number) to get the value */
buyukesmeli 0:3a2f06aeceaf 894 )
buyukesmeli 0:3a2f06aeceaf 895 {
buyukesmeli 0:3a2f06aeceaf 896 UINT wc, bc;
buyukesmeli 0:3a2f06aeceaf 897 BYTE *p;
buyukesmeli 0:3a2f06aeceaf 898 DWORD val;
buyukesmeli 0:3a2f06aeceaf 899
buyukesmeli 0:3a2f06aeceaf 900
buyukesmeli 0:3a2f06aeceaf 901 if (clst < 2 || clst >= fs->n_fatent) { /* Check range */
buyukesmeli 0:3a2f06aeceaf 902 val = 1; /* Internal error */
buyukesmeli 0:3a2f06aeceaf 903
buyukesmeli 0:3a2f06aeceaf 904 } else {
buyukesmeli 0:3a2f06aeceaf 905 val = 0xFFFFFFFF; /* Default value falls on disk error */
buyukesmeli 0:3a2f06aeceaf 906
buyukesmeli 0:3a2f06aeceaf 907 switch (fs->fs_type) {
buyukesmeli 0:3a2f06aeceaf 908 case FS_FAT12 :
buyukesmeli 0:3a2f06aeceaf 909 bc = (UINT)clst; bc += bc / 2;
buyukesmeli 0:3a2f06aeceaf 910 if (move_window(fs, fs->fatbase + (bc / SS(fs))) != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 911 wc = fs->win.d8[bc++ % SS(fs)];
buyukesmeli 0:3a2f06aeceaf 912 if (move_window(fs, fs->fatbase + (bc / SS(fs))) != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 913 wc |= fs->win.d8[bc % SS(fs)] << 8;
buyukesmeli 0:3a2f06aeceaf 914 val = clst & 1 ? wc >> 4 : (wc & 0xFFF);
buyukesmeli 0:3a2f06aeceaf 915 break;
buyukesmeli 0:3a2f06aeceaf 916
buyukesmeli 0:3a2f06aeceaf 917 case FS_FAT16 :
buyukesmeli 0:3a2f06aeceaf 918 if (move_window(fs, fs->fatbase + (clst / (SS(fs) / 2))) != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 919 p = &fs->win.d8[clst * 2 % SS(fs)];
buyukesmeli 0:3a2f06aeceaf 920 val = LD_WORD(p);
buyukesmeli 0:3a2f06aeceaf 921 break;
buyukesmeli 0:3a2f06aeceaf 922
buyukesmeli 0:3a2f06aeceaf 923 case FS_FAT32 :
buyukesmeli 0:3a2f06aeceaf 924 if (move_window(fs, fs->fatbase + (clst / (SS(fs) / 4))) != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 925 p = &fs->win.d8[clst * 4 % SS(fs)];
buyukesmeli 0:3a2f06aeceaf 926 val = LD_DWORD(p) & 0x0FFFFFFF;
buyukesmeli 0:3a2f06aeceaf 927 break;
buyukesmeli 0:3a2f06aeceaf 928
buyukesmeli 0:3a2f06aeceaf 929 default:
buyukesmeli 0:3a2f06aeceaf 930 val = 1; /* Internal error */
buyukesmeli 0:3a2f06aeceaf 931 }
buyukesmeli 0:3a2f06aeceaf 932 }
buyukesmeli 0:3a2f06aeceaf 933
buyukesmeli 0:3a2f06aeceaf 934 return val;
buyukesmeli 0:3a2f06aeceaf 935 }
buyukesmeli 0:3a2f06aeceaf 936
buyukesmeli 0:3a2f06aeceaf 937
buyukesmeli 0:3a2f06aeceaf 938
buyukesmeli 0:3a2f06aeceaf 939
buyukesmeli 0:3a2f06aeceaf 940 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 941 /* FAT access - Change value of a FAT entry */
buyukesmeli 0:3a2f06aeceaf 942 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 943 /* Hidden API for hacks and disk tools */
buyukesmeli 0:3a2f06aeceaf 944
buyukesmeli 0:3a2f06aeceaf 945 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 946 FRESULT put_fat (
buyukesmeli 0:3a2f06aeceaf 947 FATFS* fs, /* File system object */
buyukesmeli 0:3a2f06aeceaf 948 DWORD clst, /* FAT index number (cluster number) to be changed */
buyukesmeli 0:3a2f06aeceaf 949 DWORD val /* New value to be set to the entry */
buyukesmeli 0:3a2f06aeceaf 950 )
buyukesmeli 0:3a2f06aeceaf 951 {
buyukesmeli 0:3a2f06aeceaf 952 UINT bc;
buyukesmeli 0:3a2f06aeceaf 953 BYTE *p;
buyukesmeli 0:3a2f06aeceaf 954 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 955
buyukesmeli 0:3a2f06aeceaf 956
buyukesmeli 0:3a2f06aeceaf 957 if (clst < 2 || clst >= fs->n_fatent) { /* Check range */
buyukesmeli 0:3a2f06aeceaf 958 res = FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 959
buyukesmeli 0:3a2f06aeceaf 960 } else {
buyukesmeli 0:3a2f06aeceaf 961 switch (fs->fs_type) {
buyukesmeli 0:3a2f06aeceaf 962 case FS_FAT12 :
buyukesmeli 0:3a2f06aeceaf 963 bc = (UINT)clst; bc += bc / 2;
buyukesmeli 0:3a2f06aeceaf 964 res = move_window(fs, fs->fatbase + (bc / SS(fs)));
buyukesmeli 0:3a2f06aeceaf 965 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 966 p = &fs->win.d8[bc++ % SS(fs)];
buyukesmeli 0:3a2f06aeceaf 967 *p = (clst & 1) ? ((*p & 0x0F) | ((BYTE)val << 4)) : (BYTE)val;
buyukesmeli 0:3a2f06aeceaf 968 fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 969 res = move_window(fs, fs->fatbase + (bc / SS(fs)));
buyukesmeli 0:3a2f06aeceaf 970 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 971 p = &fs->win.d8[bc % SS(fs)];
buyukesmeli 0:3a2f06aeceaf 972 *p = (clst & 1) ? (BYTE)(val >> 4) : ((*p & 0xF0) | ((BYTE)(val >> 8) & 0x0F));
buyukesmeli 0:3a2f06aeceaf 973 fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 974 break;
buyukesmeli 0:3a2f06aeceaf 975
buyukesmeli 0:3a2f06aeceaf 976 case FS_FAT16 :
buyukesmeli 0:3a2f06aeceaf 977 res = move_window(fs, fs->fatbase + (clst / (SS(fs) / 2)));
buyukesmeli 0:3a2f06aeceaf 978 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 979 p = &fs->win.d8[clst * 2 % SS(fs)];
buyukesmeli 0:3a2f06aeceaf 980 ST_WORD(p, (WORD)val);
buyukesmeli 0:3a2f06aeceaf 981 fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 982 break;
buyukesmeli 0:3a2f06aeceaf 983
buyukesmeli 0:3a2f06aeceaf 984 case FS_FAT32 :
buyukesmeli 0:3a2f06aeceaf 985 res = move_window(fs, fs->fatbase + (clst / (SS(fs) / 4)));
buyukesmeli 0:3a2f06aeceaf 986 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 987 p = &fs->win.d8[clst * 4 % SS(fs)];
buyukesmeli 0:3a2f06aeceaf 988 val |= LD_DWORD(p) & 0xF0000000;
buyukesmeli 0:3a2f06aeceaf 989 ST_DWORD(p, val);
buyukesmeli 0:3a2f06aeceaf 990 fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 991 break;
buyukesmeli 0:3a2f06aeceaf 992
buyukesmeli 0:3a2f06aeceaf 993 default :
buyukesmeli 0:3a2f06aeceaf 994 res = FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 995 }
buyukesmeli 0:3a2f06aeceaf 996 }
buyukesmeli 0:3a2f06aeceaf 997
buyukesmeli 0:3a2f06aeceaf 998 return res;
buyukesmeli 0:3a2f06aeceaf 999 }
buyukesmeli 0:3a2f06aeceaf 1000 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 1001
buyukesmeli 0:3a2f06aeceaf 1002
buyukesmeli 0:3a2f06aeceaf 1003
buyukesmeli 0:3a2f06aeceaf 1004
buyukesmeli 0:3a2f06aeceaf 1005 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1006 /* FAT handling - Remove a cluster chain */
buyukesmeli 0:3a2f06aeceaf 1007 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1008 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 1009 static
buyukesmeli 0:3a2f06aeceaf 1010 FRESULT remove_chain (
buyukesmeli 0:3a2f06aeceaf 1011 FATFS* fs, /* File system object */
buyukesmeli 0:3a2f06aeceaf 1012 DWORD clst /* Cluster# to remove a chain from */
buyukesmeli 0:3a2f06aeceaf 1013 )
buyukesmeli 0:3a2f06aeceaf 1014 {
buyukesmeli 0:3a2f06aeceaf 1015 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 1016 DWORD nxt;
buyukesmeli 0:3a2f06aeceaf 1017 #if _USE_TRIM
buyukesmeli 0:3a2f06aeceaf 1018 DWORD scl = clst, ecl = clst, rt[2];
buyukesmeli 0:3a2f06aeceaf 1019 #endif
buyukesmeli 0:3a2f06aeceaf 1020
buyukesmeli 0:3a2f06aeceaf 1021 if (clst < 2 || clst >= fs->n_fatent) { /* Check range */
buyukesmeli 0:3a2f06aeceaf 1022 res = FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 1023
buyukesmeli 0:3a2f06aeceaf 1024 } else {
buyukesmeli 0:3a2f06aeceaf 1025 res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 1026 while (clst < fs->n_fatent) { /* Not a last link? */
buyukesmeli 0:3a2f06aeceaf 1027 nxt = get_fat(fs, clst); /* Get cluster status */
buyukesmeli 0:3a2f06aeceaf 1028 if (nxt == 0) break; /* Empty cluster? */
buyukesmeli 0:3a2f06aeceaf 1029 if (nxt == 1) { res = FR_INT_ERR; break; } /* Internal error? */
buyukesmeli 0:3a2f06aeceaf 1030 if (nxt == 0xFFFFFFFF) { res = FR_DISK_ERR; break; } /* Disk error? */
buyukesmeli 0:3a2f06aeceaf 1031 res = put_fat(fs, clst, 0); /* Mark the cluster "empty" */
buyukesmeli 0:3a2f06aeceaf 1032 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 1033 if (fs->free_clust != 0xFFFFFFFF) { /* Update FSINFO */
buyukesmeli 0:3a2f06aeceaf 1034 fs->free_clust++;
buyukesmeli 0:3a2f06aeceaf 1035 fs->fsi_flag |= 1;
buyukesmeli 0:3a2f06aeceaf 1036 }
buyukesmeli 0:3a2f06aeceaf 1037 #if _USE_TRIM
buyukesmeli 0:3a2f06aeceaf 1038 if (ecl + 1 == nxt) { /* Is next cluster contiguous? */
buyukesmeli 0:3a2f06aeceaf 1039 ecl = nxt;
buyukesmeli 0:3a2f06aeceaf 1040 } else { /* End of contiguous clusters */
buyukesmeli 0:3a2f06aeceaf 1041 rt[0] = clust2sect(fs, scl); /* Start sector */
buyukesmeli 0:3a2f06aeceaf 1042 rt[1] = clust2sect(fs, ecl) + fs->csize - 1; /* End sector */
buyukesmeli 0:3a2f06aeceaf 1043 disk_ioctl(fs->drv, CTRL_TRIM, rt); /* Erase the block */
buyukesmeli 0:3a2f06aeceaf 1044 scl = ecl = nxt;
buyukesmeli 0:3a2f06aeceaf 1045 }
buyukesmeli 0:3a2f06aeceaf 1046 #endif
buyukesmeli 0:3a2f06aeceaf 1047 clst = nxt; /* Next cluster */
buyukesmeli 0:3a2f06aeceaf 1048 }
buyukesmeli 0:3a2f06aeceaf 1049 }
buyukesmeli 0:3a2f06aeceaf 1050
buyukesmeli 0:3a2f06aeceaf 1051 return res;
buyukesmeli 0:3a2f06aeceaf 1052 }
buyukesmeli 0:3a2f06aeceaf 1053 #endif
buyukesmeli 0:3a2f06aeceaf 1054
buyukesmeli 0:3a2f06aeceaf 1055
buyukesmeli 0:3a2f06aeceaf 1056
buyukesmeli 0:3a2f06aeceaf 1057
buyukesmeli 0:3a2f06aeceaf 1058 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1059 /* FAT handling - Stretch or Create a cluster chain */
buyukesmeli 0:3a2f06aeceaf 1060 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1061 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 1062 static
buyukesmeli 0:3a2f06aeceaf 1063 DWORD create_chain ( /* 0:No free cluster, 1:Internal error, 0xFFFFFFFF:Disk error, >=2:New cluster# */
buyukesmeli 0:3a2f06aeceaf 1064 FATFS* fs, /* File system object */
buyukesmeli 0:3a2f06aeceaf 1065 DWORD clst /* Cluster# to stretch. 0 means create a new chain. */
buyukesmeli 0:3a2f06aeceaf 1066 )
buyukesmeli 0:3a2f06aeceaf 1067 {
buyukesmeli 0:3a2f06aeceaf 1068 DWORD cs, ncl, scl;
buyukesmeli 0:3a2f06aeceaf 1069 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 1070
buyukesmeli 0:3a2f06aeceaf 1071
buyukesmeli 0:3a2f06aeceaf 1072 if (clst == 0) { /* Create a new chain */
buyukesmeli 0:3a2f06aeceaf 1073 scl = fs->last_clust; /* Get suggested start point */
buyukesmeli 0:3a2f06aeceaf 1074 if (!scl || scl >= fs->n_fatent) scl = 1;
buyukesmeli 0:3a2f06aeceaf 1075 }
buyukesmeli 0:3a2f06aeceaf 1076 else { /* Stretch the current chain */
buyukesmeli 0:3a2f06aeceaf 1077 cs = get_fat(fs, clst); /* Check the cluster status */
buyukesmeli 0:3a2f06aeceaf 1078 if (cs < 2) return 1; /* Invalid value */
buyukesmeli 0:3a2f06aeceaf 1079 if (cs == 0xFFFFFFFF) return cs; /* A disk error occurred */
buyukesmeli 0:3a2f06aeceaf 1080 if (cs < fs->n_fatent) return cs; /* It is already followed by next cluster */
buyukesmeli 0:3a2f06aeceaf 1081 scl = clst;
buyukesmeli 0:3a2f06aeceaf 1082 }
buyukesmeli 0:3a2f06aeceaf 1083
buyukesmeli 0:3a2f06aeceaf 1084 ncl = scl; /* Start cluster */
buyukesmeli 0:3a2f06aeceaf 1085 for (;;) {
buyukesmeli 0:3a2f06aeceaf 1086 ncl++; /* Next cluster */
buyukesmeli 0:3a2f06aeceaf 1087 if (ncl >= fs->n_fatent) { /* Check wrap around */
buyukesmeli 0:3a2f06aeceaf 1088 ncl = 2;
buyukesmeli 0:3a2f06aeceaf 1089 if (ncl > scl) return 0; /* No free cluster */
buyukesmeli 0:3a2f06aeceaf 1090 }
buyukesmeli 0:3a2f06aeceaf 1091 cs = get_fat(fs, ncl); /* Get the cluster status */
buyukesmeli 0:3a2f06aeceaf 1092 if (cs == 0) break; /* Found a free cluster */
buyukesmeli 0:3a2f06aeceaf 1093 if (cs == 0xFFFFFFFF || cs == 1)/* An error occurred */
buyukesmeli 0:3a2f06aeceaf 1094 return cs;
buyukesmeli 0:3a2f06aeceaf 1095 if (ncl == scl) return 0; /* No free cluster */
buyukesmeli 0:3a2f06aeceaf 1096 }
buyukesmeli 0:3a2f06aeceaf 1097
buyukesmeli 0:3a2f06aeceaf 1098 res = put_fat(fs, ncl, 0x0FFFFFFF); /* Mark the new cluster "last link" */
buyukesmeli 0:3a2f06aeceaf 1099 if (res == FR_OK && clst != 0) {
buyukesmeli 0:3a2f06aeceaf 1100 res = put_fat(fs, clst, ncl); /* Link it to the previous one if needed */
buyukesmeli 0:3a2f06aeceaf 1101 }
buyukesmeli 0:3a2f06aeceaf 1102 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 1103 fs->last_clust = ncl; /* Update FSINFO */
buyukesmeli 0:3a2f06aeceaf 1104 if (fs->free_clust != 0xFFFFFFFF) {
buyukesmeli 0:3a2f06aeceaf 1105 fs->free_clust--;
buyukesmeli 0:3a2f06aeceaf 1106 fs->fsi_flag |= 1;
buyukesmeli 0:3a2f06aeceaf 1107 }
buyukesmeli 0:3a2f06aeceaf 1108 } else {
buyukesmeli 0:3a2f06aeceaf 1109 ncl = (res == FR_DISK_ERR) ? 0xFFFFFFFF : 1;
buyukesmeli 0:3a2f06aeceaf 1110 }
buyukesmeli 0:3a2f06aeceaf 1111
buyukesmeli 0:3a2f06aeceaf 1112 return ncl; /* Return new cluster number or error code */
buyukesmeli 0:3a2f06aeceaf 1113 }
buyukesmeli 0:3a2f06aeceaf 1114 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 1115
buyukesmeli 0:3a2f06aeceaf 1116
buyukesmeli 0:3a2f06aeceaf 1117
buyukesmeli 0:3a2f06aeceaf 1118
buyukesmeli 0:3a2f06aeceaf 1119 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1120 /* FAT handling - Convert offset into cluster with link map table */
buyukesmeli 0:3a2f06aeceaf 1121 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1122
buyukesmeli 0:3a2f06aeceaf 1123 #if _USE_FASTSEEK
buyukesmeli 0:3a2f06aeceaf 1124 static
buyukesmeli 0:3a2f06aeceaf 1125 DWORD clmt_clust ( /* <2:Error, >=2:Cluster number */
buyukesmeli 0:3a2f06aeceaf 1126 FIL* fp, /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 1127 DWORD ofs /* File offset to be converted to cluster# */
buyukesmeli 0:3a2f06aeceaf 1128 )
buyukesmeli 0:3a2f06aeceaf 1129 {
buyukesmeli 0:3a2f06aeceaf 1130 DWORD cl, ncl, *tbl;
buyukesmeli 0:3a2f06aeceaf 1131
buyukesmeli 0:3a2f06aeceaf 1132
buyukesmeli 0:3a2f06aeceaf 1133 tbl = fp->cltbl + 1; /* Top of CLMT */
buyukesmeli 0:3a2f06aeceaf 1134 cl = ofs / SS(fp->fs) / fp->fs->csize; /* Cluster order from top of the file */
buyukesmeli 0:3a2f06aeceaf 1135 for (;;) {
buyukesmeli 0:3a2f06aeceaf 1136 ncl = *tbl++; /* Number of cluters in the fragment */
buyukesmeli 0:3a2f06aeceaf 1137 if (!ncl) return 0; /* End of table? (error) */
buyukesmeli 0:3a2f06aeceaf 1138 if (cl < ncl) break; /* In this fragment? */
buyukesmeli 0:3a2f06aeceaf 1139 cl -= ncl; tbl++; /* Next fragment */
buyukesmeli 0:3a2f06aeceaf 1140 }
buyukesmeli 0:3a2f06aeceaf 1141 return cl + *tbl; /* Return the cluster number */
buyukesmeli 0:3a2f06aeceaf 1142 }
buyukesmeli 0:3a2f06aeceaf 1143 #endif /* _USE_FASTSEEK */
buyukesmeli 0:3a2f06aeceaf 1144
buyukesmeli 0:3a2f06aeceaf 1145
buyukesmeli 0:3a2f06aeceaf 1146
buyukesmeli 0:3a2f06aeceaf 1147
buyukesmeli 0:3a2f06aeceaf 1148 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1149 /* Directory handling - Set directory index */
buyukesmeli 0:3a2f06aeceaf 1150 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1151
buyukesmeli 0:3a2f06aeceaf 1152 static
buyukesmeli 0:3a2f06aeceaf 1153 FRESULT dir_sdi (
buyukesmeli 0:3a2f06aeceaf 1154 DIR_* dp, /* Pointer to directory object */
buyukesmeli 0:3a2f06aeceaf 1155 UINT idx /* Index of directory table */
buyukesmeli 0:3a2f06aeceaf 1156 )
buyukesmeli 0:3a2f06aeceaf 1157 {
buyukesmeli 0:3a2f06aeceaf 1158 DWORD clst, sect;
buyukesmeli 0:3a2f06aeceaf 1159 UINT ic;
buyukesmeli 0:3a2f06aeceaf 1160
buyukesmeli 0:3a2f06aeceaf 1161
buyukesmeli 0:3a2f06aeceaf 1162 dp->index = (WORD)idx; /* Current index */
buyukesmeli 0:3a2f06aeceaf 1163 clst = dp->sclust; /* Table start cluster (0:root) */
buyukesmeli 0:3a2f06aeceaf 1164 if (clst == 1 || clst >= dp->fs->n_fatent) /* Check start cluster range */
buyukesmeli 0:3a2f06aeceaf 1165 return FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 1166 if (!clst && dp->fs->fs_type == FS_FAT32) /* Replace cluster# 0 with root cluster# if in FAT32 */
buyukesmeli 0:3a2f06aeceaf 1167 clst = dp->fs->dirbase;
buyukesmeli 0:3a2f06aeceaf 1168
buyukesmeli 0:3a2f06aeceaf 1169 if (clst == 0) { /* Static table (root-directory in FAT12/16) */
buyukesmeli 0:3a2f06aeceaf 1170 if (idx >= dp->fs->n_rootdir) /* Is index out of range? */
buyukesmeli 0:3a2f06aeceaf 1171 return FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 1172 sect = dp->fs->dirbase;
buyukesmeli 0:3a2f06aeceaf 1173 }
buyukesmeli 0:3a2f06aeceaf 1174 else { /* Dynamic table (root-directory in FAT32 or sub-directory) */
buyukesmeli 0:3a2f06aeceaf 1175 ic = SS(dp->fs) / SZ_DIRE * dp->fs->csize; /* Entries per cluster */
buyukesmeli 0:3a2f06aeceaf 1176 while (idx >= ic) { /* Follow cluster chain */
buyukesmeli 0:3a2f06aeceaf 1177 clst = get_fat(dp->fs, clst); /* Get next cluster */
buyukesmeli 0:3a2f06aeceaf 1178 if (clst == 0xFFFFFFFF) return FR_DISK_ERR; /* Disk error */
buyukesmeli 0:3a2f06aeceaf 1179 if (clst < 2 || clst >= dp->fs->n_fatent) /* Reached to end of table or internal error */
buyukesmeli 0:3a2f06aeceaf 1180 return FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 1181 idx -= ic;
buyukesmeli 0:3a2f06aeceaf 1182 }
buyukesmeli 0:3a2f06aeceaf 1183 sect = clust2sect(dp->fs, clst);
buyukesmeli 0:3a2f06aeceaf 1184 }
buyukesmeli 0:3a2f06aeceaf 1185 dp->clust = clst; /* Current cluster# */
buyukesmeli 0:3a2f06aeceaf 1186 if (!sect) return FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 1187 dp->sect = sect + idx / (SS(dp->fs) / SZ_DIRE); /* Sector# of the directory entry */
buyukesmeli 0:3a2f06aeceaf 1188 dp->dir = dp->fs->win.d8 + (idx % (SS(dp->fs) / SZ_DIRE)) * SZ_DIRE; /* Ptr to the entry in the sector */
buyukesmeli 0:3a2f06aeceaf 1189
buyukesmeli 0:3a2f06aeceaf 1190 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 1191 }
buyukesmeli 0:3a2f06aeceaf 1192
buyukesmeli 0:3a2f06aeceaf 1193
buyukesmeli 0:3a2f06aeceaf 1194
buyukesmeli 0:3a2f06aeceaf 1195
buyukesmeli 0:3a2f06aeceaf 1196 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1197 /* Directory handling - Move directory table index next */
buyukesmeli 0:3a2f06aeceaf 1198 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1199
buyukesmeli 0:3a2f06aeceaf 1200 static
buyukesmeli 0:3a2f06aeceaf 1201 FRESULT dir_next ( /* FR_OK:Succeeded, FR_NO_FILE:End of table, FR_DENIED:Could not stretch */
buyukesmeli 0:3a2f06aeceaf 1202 DIR_* dp, /* Pointer to the directory object */
buyukesmeli 0:3a2f06aeceaf 1203 int stretch /* 0: Do not stretch table, 1: Stretch table if needed */
buyukesmeli 0:3a2f06aeceaf 1204 )
buyukesmeli 0:3a2f06aeceaf 1205 {
buyukesmeli 0:3a2f06aeceaf 1206 DWORD clst;
buyukesmeli 0:3a2f06aeceaf 1207 UINT i;
buyukesmeli 0:3a2f06aeceaf 1208 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 1209 UINT c;
buyukesmeli 0:3a2f06aeceaf 1210 #endif
buyukesmeli 0:3a2f06aeceaf 1211
buyukesmeli 0:3a2f06aeceaf 1212
buyukesmeli 0:3a2f06aeceaf 1213 i = dp->index + 1;
buyukesmeli 0:3a2f06aeceaf 1214 if (!(i & 0xFFFF) || !dp->sect) /* Report EOT when index has reached 65535 */
buyukesmeli 0:3a2f06aeceaf 1215 return FR_NO_FILE;
buyukesmeli 0:3a2f06aeceaf 1216
buyukesmeli 0:3a2f06aeceaf 1217 if (!(i % (SS(dp->fs) / SZ_DIRE))) { /* Sector changed? */
buyukesmeli 0:3a2f06aeceaf 1218 dp->sect++; /* Next sector */
buyukesmeli 0:3a2f06aeceaf 1219
buyukesmeli 0:3a2f06aeceaf 1220 if (!dp->clust) { /* Static table */
buyukesmeli 0:3a2f06aeceaf 1221 if (i >= dp->fs->n_rootdir) /* Report EOT if it reached end of static table */
buyukesmeli 0:3a2f06aeceaf 1222 return FR_NO_FILE;
buyukesmeli 0:3a2f06aeceaf 1223 }
buyukesmeli 0:3a2f06aeceaf 1224 else { /* Dynamic table */
buyukesmeli 0:3a2f06aeceaf 1225 if (((i / (SS(dp->fs) / SZ_DIRE)) & (dp->fs->csize - 1)) == 0) { /* Cluster changed? */
buyukesmeli 0:3a2f06aeceaf 1226 clst = get_fat(dp->fs, dp->clust); /* Get next cluster */
buyukesmeli 0:3a2f06aeceaf 1227 if (clst <= 1) return FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 1228 if (clst == 0xFFFFFFFF) return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 1229 if (clst >= dp->fs->n_fatent) { /* If it reached end of dynamic table, */
buyukesmeli 0:3a2f06aeceaf 1230 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 1231 if (!stretch) return FR_NO_FILE; /* If do not stretch, report EOT */
buyukesmeli 0:3a2f06aeceaf 1232 clst = create_chain(dp->fs, dp->clust); /* Stretch cluster chain */
buyukesmeli 0:3a2f06aeceaf 1233 if (clst == 0) return FR_DENIED; /* No free cluster */
buyukesmeli 0:3a2f06aeceaf 1234 if (clst == 1) return FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 1235 if (clst == 0xFFFFFFFF) return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 1236 /* Clean-up stretched table */
buyukesmeli 0:3a2f06aeceaf 1237 if (sync_window(dp->fs)) return FR_DISK_ERR;/* Flush disk access window */
buyukesmeli 0:3a2f06aeceaf 1238 mem_set(dp->fs->win.d8, 0, SS(dp->fs)); /* Clear window buffer */
buyukesmeli 0:3a2f06aeceaf 1239 dp->fs->winsect = clust2sect(dp->fs, clst); /* Cluster start sector */
buyukesmeli 0:3a2f06aeceaf 1240 for (c = 0; c < dp->fs->csize; c++) { /* Fill the new cluster with 0 */
buyukesmeli 0:3a2f06aeceaf 1241 dp->fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 1242 if (sync_window(dp->fs)) return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 1243 dp->fs->winsect++;
buyukesmeli 0:3a2f06aeceaf 1244 }
buyukesmeli 0:3a2f06aeceaf 1245 dp->fs->winsect -= c; /* Rewind window offset */
buyukesmeli 0:3a2f06aeceaf 1246 #else
buyukesmeli 0:3a2f06aeceaf 1247 if (!stretch) return FR_NO_FILE; /* If do not stretch, report EOT (this is to suppress warning) */
buyukesmeli 0:3a2f06aeceaf 1248 return FR_NO_FILE; /* Report EOT */
buyukesmeli 0:3a2f06aeceaf 1249 #endif
buyukesmeli 0:3a2f06aeceaf 1250 }
buyukesmeli 0:3a2f06aeceaf 1251 dp->clust = clst; /* Initialize data for new cluster */
buyukesmeli 0:3a2f06aeceaf 1252 dp->sect = clust2sect(dp->fs, clst);
buyukesmeli 0:3a2f06aeceaf 1253 }
buyukesmeli 0:3a2f06aeceaf 1254 }
buyukesmeli 0:3a2f06aeceaf 1255 }
buyukesmeli 0:3a2f06aeceaf 1256
buyukesmeli 0:3a2f06aeceaf 1257 dp->index = (WORD)i; /* Current index */
buyukesmeli 0:3a2f06aeceaf 1258 dp->dir = dp->fs->win.d8 + (i % (SS(dp->fs) / SZ_DIRE)) * SZ_DIRE; /* Current entry in the window */
buyukesmeli 0:3a2f06aeceaf 1259
buyukesmeli 0:3a2f06aeceaf 1260 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 1261 }
buyukesmeli 0:3a2f06aeceaf 1262
buyukesmeli 0:3a2f06aeceaf 1263
buyukesmeli 0:3a2f06aeceaf 1264
buyukesmeli 0:3a2f06aeceaf 1265
buyukesmeli 0:3a2f06aeceaf 1266 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1267 /* Directory handling - Reserve directory entry */
buyukesmeli 0:3a2f06aeceaf 1268 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1269
buyukesmeli 0:3a2f06aeceaf 1270 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 1271 static
buyukesmeli 0:3a2f06aeceaf 1272 FRESULT dir_alloc (
buyukesmeli 0:3a2f06aeceaf 1273 DIR_* dp, /* Pointer to the directory object */
buyukesmeli 0:3a2f06aeceaf 1274 UINT nent /* Number of contiguous entries to allocate (1-21) */
buyukesmeli 0:3a2f06aeceaf 1275 )
buyukesmeli 0:3a2f06aeceaf 1276 {
buyukesmeli 0:3a2f06aeceaf 1277 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 1278 UINT n;
buyukesmeli 0:3a2f06aeceaf 1279
buyukesmeli 0:3a2f06aeceaf 1280
buyukesmeli 0:3a2f06aeceaf 1281 res = dir_sdi(dp, 0);
buyukesmeli 0:3a2f06aeceaf 1282 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 1283 n = 0;
buyukesmeli 0:3a2f06aeceaf 1284 do {
buyukesmeli 0:3a2f06aeceaf 1285 res = move_window(dp->fs, dp->sect);
buyukesmeli 0:3a2f06aeceaf 1286 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 1287 if (dp->dir[0] == DDEM || dp->dir[0] == 0) { /* Is it a free entry? */
buyukesmeli 0:3a2f06aeceaf 1288 if (++n == nent) break; /* A block of contiguous free entries is found */
buyukesmeli 0:3a2f06aeceaf 1289 } else {
buyukesmeli 0:3a2f06aeceaf 1290 n = 0; /* Not a blank entry. Restart to search */
buyukesmeli 0:3a2f06aeceaf 1291 }
buyukesmeli 0:3a2f06aeceaf 1292 res = dir_next(dp, 1); /* Next entry with table stretch enabled */
buyukesmeli 0:3a2f06aeceaf 1293 } while (res == FR_OK);
buyukesmeli 0:3a2f06aeceaf 1294 }
buyukesmeli 0:3a2f06aeceaf 1295 if (res == FR_NO_FILE) res = FR_DENIED; /* No directory entry to allocate */
buyukesmeli 0:3a2f06aeceaf 1296 return res;
buyukesmeli 0:3a2f06aeceaf 1297 }
buyukesmeli 0:3a2f06aeceaf 1298 #endif
buyukesmeli 0:3a2f06aeceaf 1299
buyukesmeli 0:3a2f06aeceaf 1300
buyukesmeli 0:3a2f06aeceaf 1301
buyukesmeli 0:3a2f06aeceaf 1302
buyukesmeli 0:3a2f06aeceaf 1303 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1304 /* Directory handling - Load/Store start cluster number */
buyukesmeli 0:3a2f06aeceaf 1305 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1306
buyukesmeli 0:3a2f06aeceaf 1307 static
buyukesmeli 0:3a2f06aeceaf 1308 DWORD ld_clust (
buyukesmeli 0:3a2f06aeceaf 1309 FATFS* fs, /* Pointer to the fs object */
buyukesmeli 0:3a2f06aeceaf 1310 BYTE* dir /* Pointer to the directory entry */
buyukesmeli 0:3a2f06aeceaf 1311 )
buyukesmeli 0:3a2f06aeceaf 1312 {
buyukesmeli 0:3a2f06aeceaf 1313 DWORD cl;
buyukesmeli 0:3a2f06aeceaf 1314
buyukesmeli 0:3a2f06aeceaf 1315 cl = LD_WORD(dir + DIR_FstClusLO);
buyukesmeli 0:3a2f06aeceaf 1316 if (fs->fs_type == FS_FAT32)
buyukesmeli 0:3a2f06aeceaf 1317 cl |= (DWORD)LD_WORD(dir + DIR_FstClusHI) << 16;
buyukesmeli 0:3a2f06aeceaf 1318
buyukesmeli 0:3a2f06aeceaf 1319 return cl;
buyukesmeli 0:3a2f06aeceaf 1320 }
buyukesmeli 0:3a2f06aeceaf 1321
buyukesmeli 0:3a2f06aeceaf 1322
buyukesmeli 0:3a2f06aeceaf 1323 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 1324 static
buyukesmeli 0:3a2f06aeceaf 1325 void st_clust (
buyukesmeli 0:3a2f06aeceaf 1326 BYTE* dir, /* Pointer to the directory entry */
buyukesmeli 0:3a2f06aeceaf 1327 DWORD cl /* Value to be set */
buyukesmeli 0:3a2f06aeceaf 1328 )
buyukesmeli 0:3a2f06aeceaf 1329 {
buyukesmeli 0:3a2f06aeceaf 1330 ST_WORD(dir + DIR_FstClusLO, cl);
buyukesmeli 0:3a2f06aeceaf 1331 ST_WORD(dir + DIR_FstClusHI, cl >> 16);
buyukesmeli 0:3a2f06aeceaf 1332 }
buyukesmeli 0:3a2f06aeceaf 1333 #endif
buyukesmeli 0:3a2f06aeceaf 1334
buyukesmeli 0:3a2f06aeceaf 1335
buyukesmeli 0:3a2f06aeceaf 1336
buyukesmeli 0:3a2f06aeceaf 1337
buyukesmeli 0:3a2f06aeceaf 1338 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1339 /* LFN handling - Test/Pick/Fit an LFN segment from/to directory entry */
buyukesmeli 0:3a2f06aeceaf 1340 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1341 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1342 static
buyukesmeli 0:3a2f06aeceaf 1343 const BYTE LfnOfs[] = {1,3,5,7,9,14,16,18,20,22,24,28,30}; /* Offset of LFN characters in the directory entry */
buyukesmeli 0:3a2f06aeceaf 1344
buyukesmeli 0:3a2f06aeceaf 1345
buyukesmeli 0:3a2f06aeceaf 1346 static
buyukesmeli 0:3a2f06aeceaf 1347 int cmp_lfn ( /* 1:Matched, 0:Not matched */
buyukesmeli 0:3a2f06aeceaf 1348 WCHAR* lfnbuf, /* Pointer to the LFN to be compared */
buyukesmeli 0:3a2f06aeceaf 1349 BYTE* dir /* Pointer to the directory entry containing a part of LFN */
buyukesmeli 0:3a2f06aeceaf 1350 )
buyukesmeli 0:3a2f06aeceaf 1351 {
buyukesmeli 0:3a2f06aeceaf 1352 UINT i, s;
buyukesmeli 0:3a2f06aeceaf 1353 WCHAR wc, uc;
buyukesmeli 0:3a2f06aeceaf 1354
buyukesmeli 0:3a2f06aeceaf 1355
buyukesmeli 0:3a2f06aeceaf 1356 i = ((dir[LDIR_Ord] & ~LLEF) - 1) * 13; /* Get offset in the LFN buffer */
buyukesmeli 0:3a2f06aeceaf 1357 s = 0; wc = 1;
buyukesmeli 0:3a2f06aeceaf 1358 do {
buyukesmeli 0:3a2f06aeceaf 1359 uc = LD_WORD(dir + LfnOfs[s]); /* Pick an LFN character from the entry */
buyukesmeli 0:3a2f06aeceaf 1360 if (wc) { /* Last character has not been processed */
buyukesmeli 0:3a2f06aeceaf 1361 wc = ff_wtoupper(uc); /* Convert it to upper case */
buyukesmeli 0:3a2f06aeceaf 1362 if (i >= _MAX_LFN || wc != ff_wtoupper(lfnbuf[i++])) /* Compare it */
buyukesmeli 0:3a2f06aeceaf 1363 return 0; /* Not matched */
buyukesmeli 0:3a2f06aeceaf 1364 } else {
buyukesmeli 0:3a2f06aeceaf 1365 if (uc != 0xFFFF) return 0; /* Check filler */
buyukesmeli 0:3a2f06aeceaf 1366 }
buyukesmeli 0:3a2f06aeceaf 1367 } while (++s < 13); /* Repeat until all characters in the entry are checked */
buyukesmeli 0:3a2f06aeceaf 1368
buyukesmeli 0:3a2f06aeceaf 1369 if ((dir[LDIR_Ord] & LLEF) && wc && lfnbuf[i]) /* Last segment matched but different length */
buyukesmeli 0:3a2f06aeceaf 1370 return 0;
buyukesmeli 0:3a2f06aeceaf 1371
buyukesmeli 0:3a2f06aeceaf 1372 return 1; /* The part of LFN matched */
buyukesmeli 0:3a2f06aeceaf 1373 }
buyukesmeli 0:3a2f06aeceaf 1374
buyukesmeli 0:3a2f06aeceaf 1375
buyukesmeli 0:3a2f06aeceaf 1376
buyukesmeli 0:3a2f06aeceaf 1377 static
buyukesmeli 0:3a2f06aeceaf 1378 int pick_lfn ( /* 1:Succeeded, 0:Buffer overflow */
buyukesmeli 0:3a2f06aeceaf 1379 WCHAR* lfnbuf, /* Pointer to the Unicode-LFN buffer */
buyukesmeli 0:3a2f06aeceaf 1380 BYTE* dir /* Pointer to the directory entry */
buyukesmeli 0:3a2f06aeceaf 1381 )
buyukesmeli 0:3a2f06aeceaf 1382 {
buyukesmeli 0:3a2f06aeceaf 1383 UINT i, s;
buyukesmeli 0:3a2f06aeceaf 1384 WCHAR wc, uc;
buyukesmeli 0:3a2f06aeceaf 1385
buyukesmeli 0:3a2f06aeceaf 1386
buyukesmeli 0:3a2f06aeceaf 1387 i = ((dir[LDIR_Ord] & 0x3F) - 1) * 13; /* Offset in the LFN buffer */
buyukesmeli 0:3a2f06aeceaf 1388
buyukesmeli 0:3a2f06aeceaf 1389 s = 0; wc = 1;
buyukesmeli 0:3a2f06aeceaf 1390 do {
buyukesmeli 0:3a2f06aeceaf 1391 uc = LD_WORD(dir + LfnOfs[s]); /* Pick an LFN character from the entry */
buyukesmeli 0:3a2f06aeceaf 1392 if (wc) { /* Last character has not been processed */
buyukesmeli 0:3a2f06aeceaf 1393 if (i >= _MAX_LFN) return 0; /* Buffer overflow? */
buyukesmeli 0:3a2f06aeceaf 1394 lfnbuf[i++] = wc = uc; /* Store it */
buyukesmeli 0:3a2f06aeceaf 1395 } else {
buyukesmeli 0:3a2f06aeceaf 1396 if (uc != 0xFFFF) return 0; /* Check filler */
buyukesmeli 0:3a2f06aeceaf 1397 }
buyukesmeli 0:3a2f06aeceaf 1398 } while (++s < 13); /* Read all character in the entry */
buyukesmeli 0:3a2f06aeceaf 1399
buyukesmeli 0:3a2f06aeceaf 1400 if (dir[LDIR_Ord] & LLEF) { /* Put terminator if it is the last LFN part */
buyukesmeli 0:3a2f06aeceaf 1401 if (i >= _MAX_LFN) return 0; /* Buffer overflow? */
buyukesmeli 0:3a2f06aeceaf 1402 lfnbuf[i] = 0;
buyukesmeli 0:3a2f06aeceaf 1403 }
buyukesmeli 0:3a2f06aeceaf 1404
buyukesmeli 0:3a2f06aeceaf 1405 return 1;
buyukesmeli 0:3a2f06aeceaf 1406 }
buyukesmeli 0:3a2f06aeceaf 1407
buyukesmeli 0:3a2f06aeceaf 1408
buyukesmeli 0:3a2f06aeceaf 1409 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 1410 static
buyukesmeli 0:3a2f06aeceaf 1411 void fit_lfn (
buyukesmeli 0:3a2f06aeceaf 1412 const WCHAR* lfnbuf, /* Pointer to the LFN buffer */
buyukesmeli 0:3a2f06aeceaf 1413 BYTE* dir, /* Pointer to the directory entry */
buyukesmeli 0:3a2f06aeceaf 1414 BYTE ord, /* LFN order (1-20) */
buyukesmeli 0:3a2f06aeceaf 1415 BYTE sum /* SFN sum */
buyukesmeli 0:3a2f06aeceaf 1416 )
buyukesmeli 0:3a2f06aeceaf 1417 {
buyukesmeli 0:3a2f06aeceaf 1418 UINT i, s;
buyukesmeli 0:3a2f06aeceaf 1419 WCHAR wc;
buyukesmeli 0:3a2f06aeceaf 1420
buyukesmeli 0:3a2f06aeceaf 1421
buyukesmeli 0:3a2f06aeceaf 1422 dir[LDIR_Chksum] = sum; /* Set check sum */
buyukesmeli 0:3a2f06aeceaf 1423 dir[LDIR_Attr] = AM_LFN; /* Set attribute. LFN entry */
buyukesmeli 0:3a2f06aeceaf 1424 dir[LDIR_Type] = 0;
buyukesmeli 0:3a2f06aeceaf 1425 ST_WORD(dir + LDIR_FstClusLO, 0);
buyukesmeli 0:3a2f06aeceaf 1426
buyukesmeli 0:3a2f06aeceaf 1427 i = (ord - 1) * 13; /* Get offset in the LFN buffer */
buyukesmeli 0:3a2f06aeceaf 1428 s = wc = 0;
buyukesmeli 0:3a2f06aeceaf 1429 do {
buyukesmeli 0:3a2f06aeceaf 1430 if (wc != 0xFFFF) wc = lfnbuf[i++]; /* Get an effective character */
buyukesmeli 0:3a2f06aeceaf 1431 ST_WORD(dir+LfnOfs[s], wc); /* Put it */
buyukesmeli 0:3a2f06aeceaf 1432 if (!wc) wc = 0xFFFF; /* Padding characters following last character */
buyukesmeli 0:3a2f06aeceaf 1433 } while (++s < 13);
buyukesmeli 0:3a2f06aeceaf 1434 if (wc == 0xFFFF || !lfnbuf[i]) ord |= LLEF; /* Bottom LFN part is the start of LFN sequence */
buyukesmeli 0:3a2f06aeceaf 1435 dir[LDIR_Ord] = ord; /* Set the LFN order */
buyukesmeli 0:3a2f06aeceaf 1436 }
buyukesmeli 0:3a2f06aeceaf 1437
buyukesmeli 0:3a2f06aeceaf 1438 #endif
buyukesmeli 0:3a2f06aeceaf 1439 #endif
buyukesmeli 0:3a2f06aeceaf 1440
buyukesmeli 0:3a2f06aeceaf 1441
buyukesmeli 0:3a2f06aeceaf 1442
buyukesmeli 0:3a2f06aeceaf 1443
buyukesmeli 0:3a2f06aeceaf 1444 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1445 /* Create numbered name */
buyukesmeli 0:3a2f06aeceaf 1446 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1447 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1448 static
buyukesmeli 0:3a2f06aeceaf 1449 void gen_numname (
buyukesmeli 0:3a2f06aeceaf 1450 BYTE* dst, /* Pointer to the buffer to store numbered SFN */
buyukesmeli 0:3a2f06aeceaf 1451 const BYTE* src, /* Pointer to SFN */
buyukesmeli 0:3a2f06aeceaf 1452 const WCHAR* lfn, /* Pointer to LFN */
buyukesmeli 0:3a2f06aeceaf 1453 UINT seq /* Sequence number */
buyukesmeli 0:3a2f06aeceaf 1454 )
buyukesmeli 0:3a2f06aeceaf 1455 {
buyukesmeli 0:3a2f06aeceaf 1456 BYTE ns[8], c;
buyukesmeli 0:3a2f06aeceaf 1457 UINT i, j;
buyukesmeli 0:3a2f06aeceaf 1458 WCHAR wc;
buyukesmeli 0:3a2f06aeceaf 1459 DWORD sr;
buyukesmeli 0:3a2f06aeceaf 1460
buyukesmeli 0:3a2f06aeceaf 1461
buyukesmeli 0:3a2f06aeceaf 1462 mem_cpy(dst, src, 11);
buyukesmeli 0:3a2f06aeceaf 1463
buyukesmeli 0:3a2f06aeceaf 1464 if (seq > 5) { /* On many collisions, generate a hash number instead of sequential number */
buyukesmeli 0:3a2f06aeceaf 1465 sr = seq;
buyukesmeli 0:3a2f06aeceaf 1466 while (*lfn) { /* Create a CRC */
buyukesmeli 0:3a2f06aeceaf 1467 wc = *lfn++;
buyukesmeli 0:3a2f06aeceaf 1468 for (i = 0; i < 16; i++) {
buyukesmeli 0:3a2f06aeceaf 1469 sr = (sr << 1) + (wc & 1);
buyukesmeli 0:3a2f06aeceaf 1470 wc >>= 1;
buyukesmeli 0:3a2f06aeceaf 1471 if (sr & 0x10000) sr ^= 0x11021;
buyukesmeli 0:3a2f06aeceaf 1472 }
buyukesmeli 0:3a2f06aeceaf 1473 }
buyukesmeli 0:3a2f06aeceaf 1474 seq = (UINT)sr;
buyukesmeli 0:3a2f06aeceaf 1475 }
buyukesmeli 0:3a2f06aeceaf 1476
buyukesmeli 0:3a2f06aeceaf 1477 /* itoa (hexdecimal) */
buyukesmeli 0:3a2f06aeceaf 1478 i = 7;
buyukesmeli 0:3a2f06aeceaf 1479 do {
buyukesmeli 0:3a2f06aeceaf 1480 c = (seq % 16) + '0';
buyukesmeli 0:3a2f06aeceaf 1481 if (c > '9') c += 7;
buyukesmeli 0:3a2f06aeceaf 1482 ns[i--] = c;
buyukesmeli 0:3a2f06aeceaf 1483 seq /= 16;
buyukesmeli 0:3a2f06aeceaf 1484 } while (seq);
buyukesmeli 0:3a2f06aeceaf 1485 ns[i] = '~';
buyukesmeli 0:3a2f06aeceaf 1486
buyukesmeli 0:3a2f06aeceaf 1487 /* Append the number */
buyukesmeli 0:3a2f06aeceaf 1488 for (j = 0; j < i && dst[j] != ' '; j++) {
buyukesmeli 0:3a2f06aeceaf 1489 if (IsDBCS1(dst[j])) {
buyukesmeli 0:3a2f06aeceaf 1490 if (j == i - 1) break;
buyukesmeli 0:3a2f06aeceaf 1491 j++;
buyukesmeli 0:3a2f06aeceaf 1492 }
buyukesmeli 0:3a2f06aeceaf 1493 }
buyukesmeli 0:3a2f06aeceaf 1494 do {
buyukesmeli 0:3a2f06aeceaf 1495 dst[j++] = (i < 8) ? ns[i++] : ' ';
buyukesmeli 0:3a2f06aeceaf 1496 } while (j < 8);
buyukesmeli 0:3a2f06aeceaf 1497 }
buyukesmeli 0:3a2f06aeceaf 1498 #endif
buyukesmeli 0:3a2f06aeceaf 1499
buyukesmeli 0:3a2f06aeceaf 1500
buyukesmeli 0:3a2f06aeceaf 1501
buyukesmeli 0:3a2f06aeceaf 1502
buyukesmeli 0:3a2f06aeceaf 1503 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1504 /* Calculate sum of an SFN */
buyukesmeli 0:3a2f06aeceaf 1505 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1506 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1507 static
buyukesmeli 0:3a2f06aeceaf 1508 BYTE sum_sfn (
buyukesmeli 0:3a2f06aeceaf 1509 const BYTE* dir /* Pointer to the SFN entry */
buyukesmeli 0:3a2f06aeceaf 1510 )
buyukesmeli 0:3a2f06aeceaf 1511 {
buyukesmeli 0:3a2f06aeceaf 1512 BYTE sum = 0;
buyukesmeli 0:3a2f06aeceaf 1513 UINT n = 11;
buyukesmeli 0:3a2f06aeceaf 1514
buyukesmeli 0:3a2f06aeceaf 1515 do sum = (sum >> 1) + (sum << 7) + *dir++; while (--n);
buyukesmeli 0:3a2f06aeceaf 1516 return sum;
buyukesmeli 0:3a2f06aeceaf 1517 }
buyukesmeli 0:3a2f06aeceaf 1518 #endif
buyukesmeli 0:3a2f06aeceaf 1519
buyukesmeli 0:3a2f06aeceaf 1520
buyukesmeli 0:3a2f06aeceaf 1521
buyukesmeli 0:3a2f06aeceaf 1522
buyukesmeli 0:3a2f06aeceaf 1523 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1524 /* Directory handling - Find an object in the directory */
buyukesmeli 0:3a2f06aeceaf 1525 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1526
buyukesmeli 0:3a2f06aeceaf 1527 static
buyukesmeli 0:3a2f06aeceaf 1528 FRESULT dir_find (
buyukesmeli 0:3a2f06aeceaf 1529 DIR_* dp /* Pointer to the directory object linked to the file name */
buyukesmeli 0:3a2f06aeceaf 1530 )
buyukesmeli 0:3a2f06aeceaf 1531 {
buyukesmeli 0:3a2f06aeceaf 1532 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 1533 BYTE c, *dir;
buyukesmeli 0:3a2f06aeceaf 1534 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1535 BYTE a, ord, sum;
buyukesmeli 0:3a2f06aeceaf 1536 #endif
buyukesmeli 0:3a2f06aeceaf 1537
buyukesmeli 0:3a2f06aeceaf 1538 res = dir_sdi(dp, 0); /* Rewind directory object */
buyukesmeli 0:3a2f06aeceaf 1539 if (res != FR_OK) return res;
buyukesmeli 0:3a2f06aeceaf 1540
buyukesmeli 0:3a2f06aeceaf 1541 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1542 ord = sum = 0xFF; dp->lfn_idx = 0xFFFF; /* Reset LFN sequence */
buyukesmeli 0:3a2f06aeceaf 1543 #endif
buyukesmeli 0:3a2f06aeceaf 1544 do {
buyukesmeli 0:3a2f06aeceaf 1545 res = move_window(dp->fs, dp->sect);
buyukesmeli 0:3a2f06aeceaf 1546 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 1547 dir = dp->dir; /* Ptr to the directory entry of current index */
buyukesmeli 0:3a2f06aeceaf 1548 c = dir[DIR_Name];
buyukesmeli 0:3a2f06aeceaf 1549 if (c == 0) { res = FR_NO_FILE; break; } /* Reached to end of table */
buyukesmeli 0:3a2f06aeceaf 1550 #if _USE_LFN /* LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1551 a = dir[DIR_Attr] & AM_MASK;
buyukesmeli 0:3a2f06aeceaf 1552 if (c == DDEM || ((a & AM_VOL) && a != AM_LFN)) { /* An entry without valid data */
buyukesmeli 0:3a2f06aeceaf 1553 ord = 0xFF; dp->lfn_idx = 0xFFFF; /* Reset LFN sequence */
buyukesmeli 0:3a2f06aeceaf 1554 } else {
buyukesmeli 0:3a2f06aeceaf 1555 if (a == AM_LFN) { /* An LFN entry is found */
buyukesmeli 0:3a2f06aeceaf 1556 if (dp->lfn) {
buyukesmeli 0:3a2f06aeceaf 1557 if (c & LLEF) { /* Is it start of LFN sequence? */
buyukesmeli 0:3a2f06aeceaf 1558 sum = dir[LDIR_Chksum];
buyukesmeli 0:3a2f06aeceaf 1559 c &= ~LLEF; ord = c; /* LFN start order */
buyukesmeli 0:3a2f06aeceaf 1560 dp->lfn_idx = dp->index; /* Start index of LFN */
buyukesmeli 0:3a2f06aeceaf 1561 }
buyukesmeli 0:3a2f06aeceaf 1562 /* Check validity of the LFN entry and compare it with given name */
buyukesmeli 0:3a2f06aeceaf 1563 ord = (c == ord && sum == dir[LDIR_Chksum] && cmp_lfn(dp->lfn, dir)) ? ord - 1 : 0xFF;
buyukesmeli 0:3a2f06aeceaf 1564 }
buyukesmeli 0:3a2f06aeceaf 1565 } else { /* An SFN entry is found */
buyukesmeli 0:3a2f06aeceaf 1566 if (!ord && sum == sum_sfn(dir)) break; /* LFN matched? */
buyukesmeli 0:3a2f06aeceaf 1567 if (!(dp->fn[NSFLAG] & NS_LOSS) && !mem_cmp(dir, dp->fn, 11)) break; /* SFN matched? */
buyukesmeli 0:3a2f06aeceaf 1568 ord = 0xFF; dp->lfn_idx = 0xFFFF; /* Reset LFN sequence */
buyukesmeli 0:3a2f06aeceaf 1569 }
buyukesmeli 0:3a2f06aeceaf 1570 }
buyukesmeli 0:3a2f06aeceaf 1571 #else /* Non LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1572 if (!(dir[DIR_Attr] & AM_VOL) && !mem_cmp(dir, dp->fn, 11)) /* Is it a valid entry? */
buyukesmeli 0:3a2f06aeceaf 1573 break;
buyukesmeli 0:3a2f06aeceaf 1574 #endif
buyukesmeli 0:3a2f06aeceaf 1575 res = dir_next(dp, 0); /* Next entry */
buyukesmeli 0:3a2f06aeceaf 1576 } while (res == FR_OK);
buyukesmeli 0:3a2f06aeceaf 1577
buyukesmeli 0:3a2f06aeceaf 1578 return res;
buyukesmeli 0:3a2f06aeceaf 1579 }
buyukesmeli 0:3a2f06aeceaf 1580
buyukesmeli 0:3a2f06aeceaf 1581
buyukesmeli 0:3a2f06aeceaf 1582
buyukesmeli 0:3a2f06aeceaf 1583
buyukesmeli 0:3a2f06aeceaf 1584 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1585 /* Read an object from the directory */
buyukesmeli 0:3a2f06aeceaf 1586 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1587 #if _FS_MINIMIZE <= 1 || _USE_LABEL || _FS_RPATH >= 2
buyukesmeli 0:3a2f06aeceaf 1588 static
buyukesmeli 0:3a2f06aeceaf 1589 FRESULT dir_read (
buyukesmeli 0:3a2f06aeceaf 1590 DIR_* dp, /* Pointer to the directory object */
buyukesmeli 0:3a2f06aeceaf 1591 int vol /* Filtered by 0:file/directory or 1:volume label */
buyukesmeli 0:3a2f06aeceaf 1592 )
buyukesmeli 0:3a2f06aeceaf 1593 {
buyukesmeli 0:3a2f06aeceaf 1594 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 1595 BYTE a, c, *dir;
buyukesmeli 0:3a2f06aeceaf 1596 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1597 BYTE ord = 0xFF, sum = 0xFF;
buyukesmeli 0:3a2f06aeceaf 1598 #endif
buyukesmeli 0:3a2f06aeceaf 1599
buyukesmeli 0:3a2f06aeceaf 1600 res = FR_NO_FILE;
buyukesmeli 0:3a2f06aeceaf 1601 while (dp->sect) {
buyukesmeli 0:3a2f06aeceaf 1602 res = move_window(dp->fs, dp->sect);
buyukesmeli 0:3a2f06aeceaf 1603 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 1604 dir = dp->dir; /* Ptr to the directory entry of current index */
buyukesmeli 0:3a2f06aeceaf 1605 c = dir[DIR_Name];
buyukesmeli 0:3a2f06aeceaf 1606 if (c == 0) { res = FR_NO_FILE; break; } /* Reached to end of table */
buyukesmeli 0:3a2f06aeceaf 1607 a = dir[DIR_Attr] & AM_MASK;
buyukesmeli 0:3a2f06aeceaf 1608 #if _USE_LFN /* LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1609 if (c == DDEM || (!_FS_RPATH && c == '.') || (int)((a & ~AM_ARC) == AM_VOL) != vol) { /* An entry without valid data */
buyukesmeli 0:3a2f06aeceaf 1610 ord = 0xFF;
buyukesmeli 0:3a2f06aeceaf 1611 } else {
buyukesmeli 0:3a2f06aeceaf 1612 if (a == AM_LFN) { /* An LFN entry is found */
buyukesmeli 0:3a2f06aeceaf 1613 if (c & LLEF) { /* Is it start of LFN sequence? */
buyukesmeli 0:3a2f06aeceaf 1614 sum = dir[LDIR_Chksum];
buyukesmeli 0:3a2f06aeceaf 1615 c &= ~LLEF; ord = c;
buyukesmeli 0:3a2f06aeceaf 1616 dp->lfn_idx = dp->index;
buyukesmeli 0:3a2f06aeceaf 1617 }
buyukesmeli 0:3a2f06aeceaf 1618 /* Check LFN validity and capture it */
buyukesmeli 0:3a2f06aeceaf 1619 ord = (c == ord && sum == dir[LDIR_Chksum] && pick_lfn(dp->lfn, dir)) ? ord - 1 : 0xFF;
buyukesmeli 0:3a2f06aeceaf 1620 } else { /* An SFN entry is found */
buyukesmeli 0:3a2f06aeceaf 1621 if (ord || sum != sum_sfn(dir)) /* Is there a valid LFN? */
buyukesmeli 0:3a2f06aeceaf 1622 dp->lfn_idx = 0xFFFF; /* It has no LFN. */
buyukesmeli 0:3a2f06aeceaf 1623 break;
buyukesmeli 0:3a2f06aeceaf 1624 }
buyukesmeli 0:3a2f06aeceaf 1625 }
buyukesmeli 0:3a2f06aeceaf 1626 #else /* Non LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1627 if (c != DDEM && (_FS_RPATH || c != '.') && a != AM_LFN && (int)((a & ~AM_ARC) == AM_VOL) == vol) /* Is it a valid entry? */
buyukesmeli 0:3a2f06aeceaf 1628 break;
buyukesmeli 0:3a2f06aeceaf 1629 #endif
buyukesmeli 0:3a2f06aeceaf 1630 res = dir_next(dp, 0); /* Next entry */
buyukesmeli 0:3a2f06aeceaf 1631 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 1632 }
buyukesmeli 0:3a2f06aeceaf 1633
buyukesmeli 0:3a2f06aeceaf 1634 if (res != FR_OK) dp->sect = 0;
buyukesmeli 0:3a2f06aeceaf 1635
buyukesmeli 0:3a2f06aeceaf 1636 return res;
buyukesmeli 0:3a2f06aeceaf 1637 }
buyukesmeli 0:3a2f06aeceaf 1638 #endif /* _FS_MINIMIZE <= 1 || _USE_LABEL || _FS_RPATH >= 2 */
buyukesmeli 0:3a2f06aeceaf 1639
buyukesmeli 0:3a2f06aeceaf 1640
buyukesmeli 0:3a2f06aeceaf 1641
buyukesmeli 0:3a2f06aeceaf 1642
buyukesmeli 0:3a2f06aeceaf 1643 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1644 /* Register an object to the directory */
buyukesmeli 0:3a2f06aeceaf 1645 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1646 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 1647 static
buyukesmeli 0:3a2f06aeceaf 1648 FRESULT dir_register ( /* FR_OK:Successful, FR_DENIED:No free entry or too many SFN collision, FR_DISK_ERR:Disk error */
buyukesmeli 0:3a2f06aeceaf 1649 DIR_* dp /* Target directory with object name to be created */
buyukesmeli 0:3a2f06aeceaf 1650 )
buyukesmeli 0:3a2f06aeceaf 1651 {
buyukesmeli 0:3a2f06aeceaf 1652 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 1653 #if _USE_LFN /* LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1654 UINT n, nent;
buyukesmeli 0:3a2f06aeceaf 1655 BYTE sn[12], *fn, sum;
buyukesmeli 0:3a2f06aeceaf 1656 WCHAR *lfn;
buyukesmeli 0:3a2f06aeceaf 1657
buyukesmeli 0:3a2f06aeceaf 1658
buyukesmeli 0:3a2f06aeceaf 1659 fn = dp->fn; lfn = dp->lfn;
buyukesmeli 0:3a2f06aeceaf 1660 mem_cpy(sn, fn, 12);
buyukesmeli 0:3a2f06aeceaf 1661
buyukesmeli 0:3a2f06aeceaf 1662 if (_FS_RPATH && (sn[NSFLAG] & NS_DOT)) /* Cannot create dot entry */
buyukesmeli 0:3a2f06aeceaf 1663 return FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 1664
buyukesmeli 0:3a2f06aeceaf 1665 if (sn[NSFLAG] & NS_LOSS) { /* When LFN is out of 8.3 format, generate a numbered name */
buyukesmeli 0:3a2f06aeceaf 1666 fn[NSFLAG] = 0; dp->lfn = 0; /* Find only SFN */
buyukesmeli 0:3a2f06aeceaf 1667 for (n = 1; n < 100; n++) {
buyukesmeli 0:3a2f06aeceaf 1668 gen_numname(fn, sn, lfn, n); /* Generate a numbered name */
buyukesmeli 0:3a2f06aeceaf 1669 res = dir_find(dp); /* Check if the name collides with existing SFN */
buyukesmeli 0:3a2f06aeceaf 1670 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 1671 }
buyukesmeli 0:3a2f06aeceaf 1672 if (n == 100) return FR_DENIED; /* Abort if too many collisions */
buyukesmeli 0:3a2f06aeceaf 1673 if (res != FR_NO_FILE) return res; /* Abort if the result is other than 'not collided' */
buyukesmeli 0:3a2f06aeceaf 1674 fn[NSFLAG] = sn[NSFLAG]; dp->lfn = lfn;
buyukesmeli 0:3a2f06aeceaf 1675 }
buyukesmeli 0:3a2f06aeceaf 1676
buyukesmeli 0:3a2f06aeceaf 1677 if (sn[NSFLAG] & NS_LFN) { /* When LFN is to be created, allocate entries for an SFN + LFNs. */
buyukesmeli 0:3a2f06aeceaf 1678 for (n = 0; lfn[n]; n++) ;
buyukesmeli 0:3a2f06aeceaf 1679 nent = (n + 25) / 13;
buyukesmeli 0:3a2f06aeceaf 1680 } else { /* Otherwise allocate an entry for an SFN */
buyukesmeli 0:3a2f06aeceaf 1681 nent = 1;
buyukesmeli 0:3a2f06aeceaf 1682 }
buyukesmeli 0:3a2f06aeceaf 1683 res = dir_alloc(dp, nent); /* Allocate entries */
buyukesmeli 0:3a2f06aeceaf 1684
buyukesmeli 0:3a2f06aeceaf 1685 if (res == FR_OK && --nent) { /* Set LFN entry if needed */
buyukesmeli 0:3a2f06aeceaf 1686 res = dir_sdi(dp, dp->index - nent);
buyukesmeli 0:3a2f06aeceaf 1687 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 1688 sum = sum_sfn(dp->fn); /* Sum value of the SFN tied to the LFN */
buyukesmeli 0:3a2f06aeceaf 1689 do { /* Store LFN entries in bottom first */
buyukesmeli 0:3a2f06aeceaf 1690 res = move_window(dp->fs, dp->sect);
buyukesmeli 0:3a2f06aeceaf 1691 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 1692 fit_lfn(dp->lfn, dp->dir, (BYTE)nent, sum);
buyukesmeli 0:3a2f06aeceaf 1693 dp->fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 1694 res = dir_next(dp, 0); /* Next entry */
buyukesmeli 0:3a2f06aeceaf 1695 } while (res == FR_OK && --nent);
buyukesmeli 0:3a2f06aeceaf 1696 }
buyukesmeli 0:3a2f06aeceaf 1697 }
buyukesmeli 0:3a2f06aeceaf 1698 #else /* Non LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1699 res = dir_alloc(dp, 1); /* Allocate an entry for SFN */
buyukesmeli 0:3a2f06aeceaf 1700 #endif
buyukesmeli 0:3a2f06aeceaf 1701
buyukesmeli 0:3a2f06aeceaf 1702 if (res == FR_OK) { /* Set SFN entry */
buyukesmeli 0:3a2f06aeceaf 1703 res = move_window(dp->fs, dp->sect);
buyukesmeli 0:3a2f06aeceaf 1704 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 1705 mem_set(dp->dir, 0, SZ_DIRE); /* Clean the entry */
buyukesmeli 0:3a2f06aeceaf 1706 mem_cpy(dp->dir, dp->fn, 11); /* Put SFN */
buyukesmeli 0:3a2f06aeceaf 1707 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1708 dp->dir[DIR_NTres] = dp->fn[NSFLAG] & (NS_BODY | NS_EXT); /* Put NT flag */
buyukesmeli 0:3a2f06aeceaf 1709 #endif
buyukesmeli 0:3a2f06aeceaf 1710 dp->fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 1711 }
buyukesmeli 0:3a2f06aeceaf 1712 }
buyukesmeli 0:3a2f06aeceaf 1713
buyukesmeli 0:3a2f06aeceaf 1714 return res;
buyukesmeli 0:3a2f06aeceaf 1715 }
buyukesmeli 0:3a2f06aeceaf 1716 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 1717
buyukesmeli 0:3a2f06aeceaf 1718
buyukesmeli 0:3a2f06aeceaf 1719
buyukesmeli 0:3a2f06aeceaf 1720
buyukesmeli 0:3a2f06aeceaf 1721 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1722 /* Remove an object from the directory */
buyukesmeli 0:3a2f06aeceaf 1723 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1724 #if !_FS_READONLY && !_FS_MINIMIZE
buyukesmeli 0:3a2f06aeceaf 1725 static
buyukesmeli 0:3a2f06aeceaf 1726 FRESULT dir_remove ( /* FR_OK: Successful, FR_DISK_ERR: A disk error */
buyukesmeli 0:3a2f06aeceaf 1727 DIR_* dp /* Directory object pointing the entry to be removed */
buyukesmeli 0:3a2f06aeceaf 1728 )
buyukesmeli 0:3a2f06aeceaf 1729 {
buyukesmeli 0:3a2f06aeceaf 1730 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 1731 #if _USE_LFN /* LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1732 UINT i;
buyukesmeli 0:3a2f06aeceaf 1733
buyukesmeli 0:3a2f06aeceaf 1734 i = dp->index; /* SFN index */
buyukesmeli 0:3a2f06aeceaf 1735 res = dir_sdi(dp, (dp->lfn_idx == 0xFFFF) ? i : dp->lfn_idx); /* Goto the SFN or top of the LFN entries */
buyukesmeli 0:3a2f06aeceaf 1736 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 1737 do {
buyukesmeli 0:3a2f06aeceaf 1738 res = move_window(dp->fs, dp->sect);
buyukesmeli 0:3a2f06aeceaf 1739 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 1740 mem_set(dp->dir, 0, SZ_DIRE); /* Clear and mark the entry "deleted" */
buyukesmeli 0:3a2f06aeceaf 1741 *dp->dir = DDEM;
buyukesmeli 0:3a2f06aeceaf 1742 dp->fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 1743 if (dp->index >= i) break; /* When reached SFN, all entries of the object has been deleted. */
buyukesmeli 0:3a2f06aeceaf 1744 res = dir_next(dp, 0); /* Next entry */
buyukesmeli 0:3a2f06aeceaf 1745 } while (res == FR_OK);
buyukesmeli 0:3a2f06aeceaf 1746 if (res == FR_NO_FILE) res = FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 1747 }
buyukesmeli 0:3a2f06aeceaf 1748
buyukesmeli 0:3a2f06aeceaf 1749 #else /* Non LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1750 res = dir_sdi(dp, dp->index);
buyukesmeli 0:3a2f06aeceaf 1751 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 1752 res = move_window(dp->fs, dp->sect);
buyukesmeli 0:3a2f06aeceaf 1753 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 1754 mem_set(dp->dir, 0, SZ_DIRE); /* Clear and mark the entry "deleted" */
buyukesmeli 0:3a2f06aeceaf 1755 *dp->dir = DDEM;
buyukesmeli 0:3a2f06aeceaf 1756 dp->fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 1757 }
buyukesmeli 0:3a2f06aeceaf 1758 }
buyukesmeli 0:3a2f06aeceaf 1759 #endif
buyukesmeli 0:3a2f06aeceaf 1760
buyukesmeli 0:3a2f06aeceaf 1761 return res;
buyukesmeli 0:3a2f06aeceaf 1762 }
buyukesmeli 0:3a2f06aeceaf 1763 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 1764
buyukesmeli 0:3a2f06aeceaf 1765
buyukesmeli 0:3a2f06aeceaf 1766
buyukesmeli 0:3a2f06aeceaf 1767
buyukesmeli 0:3a2f06aeceaf 1768 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1769 /* Get file information from directory entry */
buyukesmeli 0:3a2f06aeceaf 1770 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1771 #if _FS_MINIMIZE <= 1 || _FS_RPATH >= 2
buyukesmeli 0:3a2f06aeceaf 1772 static
buyukesmeli 0:3a2f06aeceaf 1773 void get_fileinfo ( /* No return code */
buyukesmeli 0:3a2f06aeceaf 1774 DIR_* dp, /* Pointer to the directory object */
buyukesmeli 0:3a2f06aeceaf 1775 FILINFO* fno /* Pointer to the file information to be filled */
buyukesmeli 0:3a2f06aeceaf 1776 )
buyukesmeli 0:3a2f06aeceaf 1777 {
buyukesmeli 0:3a2f06aeceaf 1778 UINT i;
buyukesmeli 0:3a2f06aeceaf 1779 TCHAR *p, c;
buyukesmeli 0:3a2f06aeceaf 1780 BYTE *dir;
buyukesmeli 0:3a2f06aeceaf 1781 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1782 WCHAR w, *lfn;
buyukesmeli 0:3a2f06aeceaf 1783 #endif
buyukesmeli 0:3a2f06aeceaf 1784
buyukesmeli 0:3a2f06aeceaf 1785 p = fno->fname;
buyukesmeli 0:3a2f06aeceaf 1786 if (dp->sect) { /* Get SFN */
buyukesmeli 0:3a2f06aeceaf 1787 dir = dp->dir;
buyukesmeli 0:3a2f06aeceaf 1788 i = 0;
buyukesmeli 0:3a2f06aeceaf 1789 while (i < 11) { /* Copy name body and extension */
buyukesmeli 0:3a2f06aeceaf 1790 c = (TCHAR)dir[i++];
buyukesmeli 0:3a2f06aeceaf 1791 if (c == ' ') continue; /* Skip padding spaces */
buyukesmeli 0:3a2f06aeceaf 1792 if (c == RDDEM) c = (TCHAR)DDEM; /* Restore replaced DDEM character */
buyukesmeli 0:3a2f06aeceaf 1793 if (i == 9) *p++ = '.'; /* Insert a . if extension is exist */
buyukesmeli 0:3a2f06aeceaf 1794 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1795 if (IsUpper(c) && (dir[DIR_NTres] & (i >= 9 ? NS_EXT : NS_BODY)))
buyukesmeli 0:3a2f06aeceaf 1796 c += 0x20; /* To lower */
buyukesmeli 0:3a2f06aeceaf 1797 #if _LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 1798 if (IsDBCS1(c) && i != 8 && i != 11 && IsDBCS2(dir[i]))
buyukesmeli 0:3a2f06aeceaf 1799 c = c << 8 | dir[i++];
buyukesmeli 0:3a2f06aeceaf 1800 c = ff_convert(c, 1); /* OEM -> Unicode */
buyukesmeli 0:3a2f06aeceaf 1801 if (!c) c = '?';
buyukesmeli 0:3a2f06aeceaf 1802 #endif
buyukesmeli 0:3a2f06aeceaf 1803 #endif
buyukesmeli 0:3a2f06aeceaf 1804 *p++ = c;
buyukesmeli 0:3a2f06aeceaf 1805 }
buyukesmeli 0:3a2f06aeceaf 1806 fno->fattrib = dir[DIR_Attr]; /* Attribute */
buyukesmeli 0:3a2f06aeceaf 1807 fno->fsize = LD_DWORD(dir + DIR_FileSize); /* Size */
buyukesmeli 0:3a2f06aeceaf 1808 fno->fdate = LD_WORD(dir + DIR_WrtDate); /* Date */
buyukesmeli 0:3a2f06aeceaf 1809 fno->ftime = LD_WORD(dir + DIR_WrtTime); /* Time */
buyukesmeli 0:3a2f06aeceaf 1810 }
buyukesmeli 0:3a2f06aeceaf 1811 *p = 0; /* Terminate SFN string by a \0 */
buyukesmeli 0:3a2f06aeceaf 1812
buyukesmeli 0:3a2f06aeceaf 1813 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 1814 if (fno->lfname) {
buyukesmeli 0:3a2f06aeceaf 1815 i = 0; p = fno->lfname;
buyukesmeli 0:3a2f06aeceaf 1816 if (dp->sect && fno->lfsize && dp->lfn_idx != 0xFFFF) { /* Get LFN if available */
buyukesmeli 0:3a2f06aeceaf 1817 lfn = dp->lfn;
buyukesmeli 0:3a2f06aeceaf 1818 while ((w = *lfn++) != 0) { /* Get an LFN character */
buyukesmeli 0:3a2f06aeceaf 1819 #if !_LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 1820 w = ff_convert(w, 0); /* Unicode -> OEM */
buyukesmeli 0:3a2f06aeceaf 1821 if (!w) { i = 0; break; } /* No LFN if it could not be converted */
buyukesmeli 0:3a2f06aeceaf 1822 if (_DF1S && w >= 0x100) /* Put 1st byte if it is a DBC (always false on SBCS cfg) */
buyukesmeli 0:3a2f06aeceaf 1823 p[i++] = (TCHAR)(w >> 8);
buyukesmeli 0:3a2f06aeceaf 1824 #endif
buyukesmeli 0:3a2f06aeceaf 1825 if (i >= fno->lfsize - 1) { i = 0; break; } /* No LFN if buffer overflow */
buyukesmeli 0:3a2f06aeceaf 1826 p[i++] = (TCHAR)w;
buyukesmeli 0:3a2f06aeceaf 1827 }
buyukesmeli 0:3a2f06aeceaf 1828 }
buyukesmeli 0:3a2f06aeceaf 1829 p[i] = 0; /* Terminate LFN string by a \0 */
buyukesmeli 0:3a2f06aeceaf 1830 }
buyukesmeli 0:3a2f06aeceaf 1831 #endif
buyukesmeli 0:3a2f06aeceaf 1832 }
buyukesmeli 0:3a2f06aeceaf 1833 #endif /* _FS_MINIMIZE <= 1 || _FS_RPATH >= 2 */
buyukesmeli 0:3a2f06aeceaf 1834
buyukesmeli 0:3a2f06aeceaf 1835
buyukesmeli 0:3a2f06aeceaf 1836
buyukesmeli 0:3a2f06aeceaf 1837
buyukesmeli 0:3a2f06aeceaf 1838 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1839 /* Pattern matching */
buyukesmeli 0:3a2f06aeceaf 1840 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1841 #if _USE_FIND && _FS_MINIMIZE <= 1
buyukesmeli 0:3a2f06aeceaf 1842 static
buyukesmeli 0:3a2f06aeceaf 1843 WCHAR get_achar ( /* Get a character and advances ptr 1 or 2 */
buyukesmeli 0:3a2f06aeceaf 1844 const TCHAR** ptr /* Pointer to pointer to the SBCS/DBCS/Unicode string */
buyukesmeli 0:3a2f06aeceaf 1845 )
buyukesmeli 0:3a2f06aeceaf 1846 {
buyukesmeli 0:3a2f06aeceaf 1847 WCHAR chr;
buyukesmeli 0:3a2f06aeceaf 1848
buyukesmeli 0:3a2f06aeceaf 1849 #if !_LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 1850 chr = (BYTE)*(*ptr)++; /* Get a byte */
buyukesmeli 0:3a2f06aeceaf 1851 if (IsLower(chr)) chr -= 0x20; /* To upper ASCII char */
buyukesmeli 0:3a2f06aeceaf 1852 if (IsDBCS1(chr) && IsDBCS2(**ptr)) /* Get DBC 2nd byte if needed */
buyukesmeli 0:3a2f06aeceaf 1853 chr = chr << 8 | (BYTE)*(*ptr)++;
buyukesmeli 0:3a2f06aeceaf 1854 #ifdef _EXCVT
buyukesmeli 0:3a2f06aeceaf 1855 if (chr >= 0x80) chr = ExCvt[chr - 0x80]; /* To upper SBCS extended char */
buyukesmeli 0:3a2f06aeceaf 1856 #endif
buyukesmeli 0:3a2f06aeceaf 1857 #else
buyukesmeli 0:3a2f06aeceaf 1858 chr = ff_wtoupper(*(*ptr)++); /* Get a word and to upper */
buyukesmeli 0:3a2f06aeceaf 1859 #endif
buyukesmeli 0:3a2f06aeceaf 1860 return chr;
buyukesmeli 0:3a2f06aeceaf 1861 }
buyukesmeli 0:3a2f06aeceaf 1862
buyukesmeli 0:3a2f06aeceaf 1863
buyukesmeli 0:3a2f06aeceaf 1864 static
buyukesmeli 0:3a2f06aeceaf 1865 int pattern_matching ( /* Return value: 0:mismatched, 1:matched */
buyukesmeli 0:3a2f06aeceaf 1866 const TCHAR* pat, /* Matching pattern */
buyukesmeli 0:3a2f06aeceaf 1867 const TCHAR* nam, /* String to be tested */
buyukesmeli 0:3a2f06aeceaf 1868 int skip, /* Number of pre-skip chars (number of ?s) */
buyukesmeli 0:3a2f06aeceaf 1869 int inf /* Infinite search (* specified) */
buyukesmeli 0:3a2f06aeceaf 1870 )
buyukesmeli 0:3a2f06aeceaf 1871 {
buyukesmeli 0:3a2f06aeceaf 1872 const TCHAR *pp, *np;
buyukesmeli 0:3a2f06aeceaf 1873 WCHAR pc, nc;
buyukesmeli 0:3a2f06aeceaf 1874 int nm, nx;
buyukesmeli 0:3a2f06aeceaf 1875
buyukesmeli 0:3a2f06aeceaf 1876
buyukesmeli 0:3a2f06aeceaf 1877 while (skip--) { /* Pre-skip name chars */
buyukesmeli 0:3a2f06aeceaf 1878 if (!get_achar(&nam)) return 0; /* Branch mismatched if less name chars */
buyukesmeli 0:3a2f06aeceaf 1879 }
buyukesmeli 0:3a2f06aeceaf 1880 if (!*pat && inf) return 1; /* (short circuit) */
buyukesmeli 0:3a2f06aeceaf 1881
buyukesmeli 0:3a2f06aeceaf 1882 do {
buyukesmeli 0:3a2f06aeceaf 1883 pp = pat; np = nam; /* Top of pattern and name to match */
buyukesmeli 0:3a2f06aeceaf 1884 for (;;) {
buyukesmeli 0:3a2f06aeceaf 1885 if (*pp == '?' || *pp == '*') { /* Wildcard? */
buyukesmeli 0:3a2f06aeceaf 1886 nm = nx = 0;
buyukesmeli 0:3a2f06aeceaf 1887 do { /* Analyze the wildcard chars */
buyukesmeli 0:3a2f06aeceaf 1888 if (*pp++ == '?') nm++; else nx = 1;
buyukesmeli 0:3a2f06aeceaf 1889 } while (*pp == '?' || *pp == '*');
buyukesmeli 0:3a2f06aeceaf 1890 if (pattern_matching(pp, np, nm, nx)) return 1; /* Test new branch (recurs upto number of wildcard blocks in the pattern) */
buyukesmeli 0:3a2f06aeceaf 1891 nc = *np; break; /* Branch mismatched */
buyukesmeli 0:3a2f06aeceaf 1892 }
buyukesmeli 0:3a2f06aeceaf 1893 pc = get_achar(&pp); /* Get a pattern char */
buyukesmeli 0:3a2f06aeceaf 1894 nc = get_achar(&np); /* Get a name char */
buyukesmeli 0:3a2f06aeceaf 1895 if (pc != nc) break; /* Branch mismatched? */
buyukesmeli 0:3a2f06aeceaf 1896 if (!pc) return 1; /* Branch matched? (matched at end of both strings) */
buyukesmeli 0:3a2f06aeceaf 1897 }
buyukesmeli 0:3a2f06aeceaf 1898 get_achar(&nam); /* nam++ */
buyukesmeli 0:3a2f06aeceaf 1899 } while (inf && nc); /* Retry until end of name if infinite search is specified */
buyukesmeli 0:3a2f06aeceaf 1900
buyukesmeli 0:3a2f06aeceaf 1901 return 0;
buyukesmeli 0:3a2f06aeceaf 1902 }
buyukesmeli 0:3a2f06aeceaf 1903 #endif /* _USE_FIND && _FS_MINIMIZE <= 1 */
buyukesmeli 0:3a2f06aeceaf 1904
buyukesmeli 0:3a2f06aeceaf 1905
buyukesmeli 0:3a2f06aeceaf 1906
buyukesmeli 0:3a2f06aeceaf 1907
buyukesmeli 0:3a2f06aeceaf 1908 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1909 /* Pick a segment and create the object name in directory form */
buyukesmeli 0:3a2f06aeceaf 1910 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 1911
buyukesmeli 0:3a2f06aeceaf 1912 static
buyukesmeli 0:3a2f06aeceaf 1913 FRESULT create_name (
buyukesmeli 0:3a2f06aeceaf 1914 DIR_* dp, /* Pointer to the directory object */
buyukesmeli 0:3a2f06aeceaf 1915 const TCHAR** path /* Pointer to pointer to the segment in the path string */
buyukesmeli 0:3a2f06aeceaf 1916 )
buyukesmeli 0:3a2f06aeceaf 1917 {
buyukesmeli 0:3a2f06aeceaf 1918 #if _USE_LFN /* LFN configuration */
buyukesmeli 0:3a2f06aeceaf 1919 BYTE b, cf;
buyukesmeli 0:3a2f06aeceaf 1920 WCHAR w, *lfn;
buyukesmeli 0:3a2f06aeceaf 1921 UINT i, ni, si, di;
buyukesmeli 0:3a2f06aeceaf 1922 const TCHAR *p;
buyukesmeli 0:3a2f06aeceaf 1923
buyukesmeli 0:3a2f06aeceaf 1924 /* Create LFN in Unicode */
buyukesmeli 0:3a2f06aeceaf 1925 for (p = *path; *p == '/' || *p == '\\'; p++) ; /* Strip duplicated separator */
buyukesmeli 0:3a2f06aeceaf 1926 lfn = dp->lfn;
buyukesmeli 0:3a2f06aeceaf 1927 si = di = 0;
buyukesmeli 0:3a2f06aeceaf 1928 for (;;) {
buyukesmeli 0:3a2f06aeceaf 1929 w = p[si++]; /* Get a character */
buyukesmeli 0:3a2f06aeceaf 1930 if (w < ' ' || w == '/' || w == '\\') break; /* Break on end of segment */
buyukesmeli 0:3a2f06aeceaf 1931 if (di >= _MAX_LFN) /* Reject too long name */
buyukesmeli 0:3a2f06aeceaf 1932 return FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 1933 #if !_LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 1934 w &= 0xFF;
buyukesmeli 0:3a2f06aeceaf 1935 if (IsDBCS1(w)) { /* Check if it is a DBC 1st byte (always false on SBCS cfg) */
buyukesmeli 0:3a2f06aeceaf 1936 #if _DF1S
buyukesmeli 0:3a2f06aeceaf 1937 b = (BYTE)p[si++]; /* Get 2nd byte */
buyukesmeli 0:3a2f06aeceaf 1938 w = (w << 8) + b; /* Create a DBC */
buyukesmeli 0:3a2f06aeceaf 1939 if (!IsDBCS2(b))
buyukesmeli 0:3a2f06aeceaf 1940 return FR_INVALID_NAME; /* Reject invalid sequence */
buyukesmeli 0:3a2f06aeceaf 1941 #endif
buyukesmeli 0:3a2f06aeceaf 1942 }
buyukesmeli 0:3a2f06aeceaf 1943 w = ff_convert(w, 1); /* Convert ANSI/OEM to Unicode */
buyukesmeli 0:3a2f06aeceaf 1944 if (!w) return FR_INVALID_NAME; /* Reject invalid code */
buyukesmeli 0:3a2f06aeceaf 1945 #endif
buyukesmeli 0:3a2f06aeceaf 1946 if (w < 0x80 && chk_chr("\"*:<>\?|\x7F", w)) /* Reject illegal characters for LFN */
buyukesmeli 0:3a2f06aeceaf 1947 return FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 1948 lfn[di++] = w; /* Store the Unicode character */
buyukesmeli 0:3a2f06aeceaf 1949 }
buyukesmeli 0:3a2f06aeceaf 1950 *path = &p[si]; /* Return pointer to the next segment */
buyukesmeli 0:3a2f06aeceaf 1951 cf = (w < ' ') ? NS_LAST : 0; /* Set last segment flag if end of path */
buyukesmeli 0:3a2f06aeceaf 1952 #if _FS_RPATH
buyukesmeli 0:3a2f06aeceaf 1953 if ((di == 1 && lfn[di - 1] == '.') || /* Is this a dot entry? */
buyukesmeli 0:3a2f06aeceaf 1954 (di == 2 && lfn[di - 1] == '.' && lfn[di - 2] == '.')) {
buyukesmeli 0:3a2f06aeceaf 1955 lfn[di] = 0;
buyukesmeli 0:3a2f06aeceaf 1956 for (i = 0; i < 11; i++)
buyukesmeli 0:3a2f06aeceaf 1957 dp->fn[i] = (i < di) ? '.' : ' ';
buyukesmeli 0:3a2f06aeceaf 1958 dp->fn[i] = cf | NS_DOT; /* This is a dot entry */
buyukesmeli 0:3a2f06aeceaf 1959 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 1960 }
buyukesmeli 0:3a2f06aeceaf 1961 #endif
buyukesmeli 0:3a2f06aeceaf 1962 while (di) { /* Strip trailing spaces and dots */
buyukesmeli 0:3a2f06aeceaf 1963 w = lfn[di - 1];
buyukesmeli 0:3a2f06aeceaf 1964 if (w != ' ' && w != '.') break;
buyukesmeli 0:3a2f06aeceaf 1965 di--;
buyukesmeli 0:3a2f06aeceaf 1966 }
buyukesmeli 0:3a2f06aeceaf 1967 if (!di) return FR_INVALID_NAME; /* Reject nul string */
buyukesmeli 0:3a2f06aeceaf 1968
buyukesmeli 0:3a2f06aeceaf 1969 lfn[di] = 0; /* LFN is created */
buyukesmeli 0:3a2f06aeceaf 1970
buyukesmeli 0:3a2f06aeceaf 1971 /* Create SFN in directory form */
buyukesmeli 0:3a2f06aeceaf 1972 mem_set(dp->fn, ' ', 11);
buyukesmeli 0:3a2f06aeceaf 1973 for (si = 0; lfn[si] == ' ' || lfn[si] == '.'; si++) ; /* Strip leading spaces and dots */
buyukesmeli 0:3a2f06aeceaf 1974 if (si) cf |= NS_LOSS | NS_LFN;
buyukesmeli 0:3a2f06aeceaf 1975 while (di && lfn[di - 1] != '.') di--; /* Find extension (di<=si: no extension) */
buyukesmeli 0:3a2f06aeceaf 1976
buyukesmeli 0:3a2f06aeceaf 1977 b = i = 0; ni = 8;
buyukesmeli 0:3a2f06aeceaf 1978 for (;;) {
buyukesmeli 0:3a2f06aeceaf 1979 w = lfn[si++]; /* Get an LFN character */
buyukesmeli 0:3a2f06aeceaf 1980 if (!w) break; /* Break on end of the LFN */
buyukesmeli 0:3a2f06aeceaf 1981 if (w == ' ' || (w == '.' && si != di)) { /* Remove spaces and dots */
buyukesmeli 0:3a2f06aeceaf 1982 cf |= NS_LOSS | NS_LFN; continue;
buyukesmeli 0:3a2f06aeceaf 1983 }
buyukesmeli 0:3a2f06aeceaf 1984
buyukesmeli 0:3a2f06aeceaf 1985 if (i >= ni || si == di) { /* Extension or end of SFN */
buyukesmeli 0:3a2f06aeceaf 1986 if (ni == 11) { /* Long extension */
buyukesmeli 0:3a2f06aeceaf 1987 cf |= NS_LOSS | NS_LFN; break;
buyukesmeli 0:3a2f06aeceaf 1988 }
buyukesmeli 0:3a2f06aeceaf 1989 if (si != di) cf |= NS_LOSS | NS_LFN; /* Out of 8.3 format */
buyukesmeli 0:3a2f06aeceaf 1990 if (si > di) break; /* No extension */
buyukesmeli 0:3a2f06aeceaf 1991 si = di; i = 8; ni = 11; /* Enter extension section */
buyukesmeli 0:3a2f06aeceaf 1992 b <<= 2; continue;
buyukesmeli 0:3a2f06aeceaf 1993 }
buyukesmeli 0:3a2f06aeceaf 1994
buyukesmeli 0:3a2f06aeceaf 1995 if (w >= 0x80) { /* Non ASCII character */
buyukesmeli 0:3a2f06aeceaf 1996 #ifdef _EXCVT
buyukesmeli 0:3a2f06aeceaf 1997 w = ff_convert(w, 0); /* Unicode -> OEM code */
buyukesmeli 0:3a2f06aeceaf 1998 if (w) w = ExCvt[w - 0x80]; /* Convert extended character to upper (SBCS) */
buyukesmeli 0:3a2f06aeceaf 1999 #else
buyukesmeli 0:3a2f06aeceaf 2000 w = ff_convert(ff_wtoupper(w), 0); /* Upper converted Unicode -> OEM code */
buyukesmeli 0:3a2f06aeceaf 2001 #endif
buyukesmeli 0:3a2f06aeceaf 2002 cf |= NS_LFN; /* Force create LFN entry */
buyukesmeli 0:3a2f06aeceaf 2003 }
buyukesmeli 0:3a2f06aeceaf 2004
buyukesmeli 0:3a2f06aeceaf 2005 if (_DF1S && w >= 0x100) { /* DBC (always false at SBCS cfg) */
buyukesmeli 0:3a2f06aeceaf 2006 if (i >= ni - 1) {
buyukesmeli 0:3a2f06aeceaf 2007 cf |= NS_LOSS | NS_LFN; i = ni; continue;
buyukesmeli 0:3a2f06aeceaf 2008 }
buyukesmeli 0:3a2f06aeceaf 2009 dp->fn[i++] = (BYTE)(w >> 8);
buyukesmeli 0:3a2f06aeceaf 2010 } else { /* SBC */
buyukesmeli 0:3a2f06aeceaf 2011 if (!w || chk_chr("+,;=[]", w)) { /* Replace illegal characters for SFN */
buyukesmeli 0:3a2f06aeceaf 2012 w = '_'; cf |= NS_LOSS | NS_LFN;/* Lossy conversion */
buyukesmeli 0:3a2f06aeceaf 2013 } else {
buyukesmeli 0:3a2f06aeceaf 2014 if (IsUpper(w)) { /* ASCII large capital */
buyukesmeli 0:3a2f06aeceaf 2015 b |= 2;
buyukesmeli 0:3a2f06aeceaf 2016 } else {
buyukesmeli 0:3a2f06aeceaf 2017 if (IsLower(w)) { /* ASCII small capital */
buyukesmeli 0:3a2f06aeceaf 2018 b |= 1; w -= 0x20;
buyukesmeli 0:3a2f06aeceaf 2019 }
buyukesmeli 0:3a2f06aeceaf 2020 }
buyukesmeli 0:3a2f06aeceaf 2021 }
buyukesmeli 0:3a2f06aeceaf 2022 }
buyukesmeli 0:3a2f06aeceaf 2023 dp->fn[i++] = (BYTE)w;
buyukesmeli 0:3a2f06aeceaf 2024 }
buyukesmeli 0:3a2f06aeceaf 2025
buyukesmeli 0:3a2f06aeceaf 2026 if (dp->fn[0] == DDEM) dp->fn[0] = RDDEM; /* If the first character collides with deleted mark, replace it with RDDEM */
buyukesmeli 0:3a2f06aeceaf 2027
buyukesmeli 0:3a2f06aeceaf 2028 if (ni == 8) b <<= 2;
buyukesmeli 0:3a2f06aeceaf 2029 if ((b & 0x0C) == 0x0C || (b & 0x03) == 0x03) /* Create LFN entry when there are composite capitals */
buyukesmeli 0:3a2f06aeceaf 2030 cf |= NS_LFN;
buyukesmeli 0:3a2f06aeceaf 2031 if (!(cf & NS_LFN)) { /* When LFN is in 8.3 format without extended character, NT flags are created */
buyukesmeli 0:3a2f06aeceaf 2032 if ((b & 0x03) == 0x01) cf |= NS_EXT; /* NT flag (Extension has only small capital) */
buyukesmeli 0:3a2f06aeceaf 2033 if ((b & 0x0C) == 0x04) cf |= NS_BODY; /* NT flag (Filename has only small capital) */
buyukesmeli 0:3a2f06aeceaf 2034 }
buyukesmeli 0:3a2f06aeceaf 2035
buyukesmeli 0:3a2f06aeceaf 2036 dp->fn[NSFLAG] = cf; /* SFN is created */
buyukesmeli 0:3a2f06aeceaf 2037
buyukesmeli 0:3a2f06aeceaf 2038 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 2039
buyukesmeli 0:3a2f06aeceaf 2040
buyukesmeli 0:3a2f06aeceaf 2041 #else /* Non-LFN configuration */
buyukesmeli 0:3a2f06aeceaf 2042 BYTE b, c, d, *sfn;
buyukesmeli 0:3a2f06aeceaf 2043 UINT ni, si, i;
buyukesmeli 0:3a2f06aeceaf 2044 const char *p;
buyukesmeli 0:3a2f06aeceaf 2045
buyukesmeli 0:3a2f06aeceaf 2046 /* Create file name in directory form */
buyukesmeli 0:3a2f06aeceaf 2047 for (p = *path; *p == '/' || *p == '\\'; p++) ; /* Strip duplicated separator */
buyukesmeli 0:3a2f06aeceaf 2048 sfn = dp->fn;
buyukesmeli 0:3a2f06aeceaf 2049 mem_set(sfn, ' ', 11);
buyukesmeli 0:3a2f06aeceaf 2050 si = i = b = 0; ni = 8;
buyukesmeli 0:3a2f06aeceaf 2051 #if _FS_RPATH
buyukesmeli 0:3a2f06aeceaf 2052 if (p[si] == '.') { /* Is this a dot entry? */
buyukesmeli 0:3a2f06aeceaf 2053 for (;;) {
buyukesmeli 0:3a2f06aeceaf 2054 c = (BYTE)p[si++];
buyukesmeli 0:3a2f06aeceaf 2055 if (c != '.' || si >= 3) break;
buyukesmeli 0:3a2f06aeceaf 2056 sfn[i++] = c;
buyukesmeli 0:3a2f06aeceaf 2057 }
buyukesmeli 0:3a2f06aeceaf 2058 if (c != '/' && c != '\\' && c > ' ') return FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 2059 *path = &p[si]; /* Return pointer to the next segment */
buyukesmeli 0:3a2f06aeceaf 2060 sfn[NSFLAG] = (c <= ' ') ? NS_LAST | NS_DOT : NS_DOT; /* Set last segment flag if end of path */
buyukesmeli 0:3a2f06aeceaf 2061 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 2062 }
buyukesmeli 0:3a2f06aeceaf 2063 #endif
buyukesmeli 0:3a2f06aeceaf 2064 for (;;) {
buyukesmeli 0:3a2f06aeceaf 2065 c = (BYTE)p[si++];
buyukesmeli 0:3a2f06aeceaf 2066 if (c <= ' ' || c == '/' || c == '\\') break; /* Break on end of segment */
buyukesmeli 0:3a2f06aeceaf 2067 if (c == '.' || i >= ni) {
buyukesmeli 0:3a2f06aeceaf 2068 if (ni != 8 || c != '.') return FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 2069 i = 8; ni = 11;
buyukesmeli 0:3a2f06aeceaf 2070 b <<= 2; continue;
buyukesmeli 0:3a2f06aeceaf 2071 }
buyukesmeli 0:3a2f06aeceaf 2072 if (c >= 0x80) { /* Extended character? */
buyukesmeli 0:3a2f06aeceaf 2073 b |= 3; /* Eliminate NT flag */
buyukesmeli 0:3a2f06aeceaf 2074 #ifdef _EXCVT
buyukesmeli 0:3a2f06aeceaf 2075 c = ExCvt[c - 0x80]; /* To upper extended characters (SBCS cfg) */
buyukesmeli 0:3a2f06aeceaf 2076 #else
buyukesmeli 0:3a2f06aeceaf 2077 #if !_DF1S
buyukesmeli 0:3a2f06aeceaf 2078 return FR_INVALID_NAME; /* Reject extended characters (ASCII cfg) */
buyukesmeli 0:3a2f06aeceaf 2079 #endif
buyukesmeli 0:3a2f06aeceaf 2080 #endif
buyukesmeli 0:3a2f06aeceaf 2081 }
buyukesmeli 0:3a2f06aeceaf 2082 if (IsDBCS1(c)) { /* Check if it is a DBC 1st byte (always false on SBCS cfg) */
buyukesmeli 0:3a2f06aeceaf 2083 d = (BYTE)p[si++]; /* Get 2nd byte */
buyukesmeli 0:3a2f06aeceaf 2084 if (!IsDBCS2(d) || i >= ni - 1) /* Reject invalid DBC */
buyukesmeli 0:3a2f06aeceaf 2085 return FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 2086 sfn[i++] = c;
buyukesmeli 0:3a2f06aeceaf 2087 sfn[i++] = d;
buyukesmeli 0:3a2f06aeceaf 2088 } else { /* SBC */
buyukesmeli 0:3a2f06aeceaf 2089 if (chk_chr("\"*+,:;<=>\?[]|\x7F", c)) /* Reject illegal chrs for SFN */
buyukesmeli 0:3a2f06aeceaf 2090 return FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 2091 if (IsUpper(c)) { /* ASCII large capital? */
buyukesmeli 0:3a2f06aeceaf 2092 b |= 2;
buyukesmeli 0:3a2f06aeceaf 2093 } else {
buyukesmeli 0:3a2f06aeceaf 2094 if (IsLower(c)) { /* ASCII small capital? */
buyukesmeli 0:3a2f06aeceaf 2095 b |= 1; c -= 0x20;
buyukesmeli 0:3a2f06aeceaf 2096 }
buyukesmeli 0:3a2f06aeceaf 2097 }
buyukesmeli 0:3a2f06aeceaf 2098 sfn[i++] = c;
buyukesmeli 0:3a2f06aeceaf 2099 }
buyukesmeli 0:3a2f06aeceaf 2100 }
buyukesmeli 0:3a2f06aeceaf 2101 *path = &p[si]; /* Return pointer to the next segment */
buyukesmeli 0:3a2f06aeceaf 2102 c = (c <= ' ') ? NS_LAST : 0; /* Set last segment flag if end of path */
buyukesmeli 0:3a2f06aeceaf 2103
buyukesmeli 0:3a2f06aeceaf 2104 if (!i) return FR_INVALID_NAME; /* Reject nul string */
buyukesmeli 0:3a2f06aeceaf 2105 if (sfn[0] == DDEM) sfn[0] = RDDEM; /* When first character collides with DDEM, replace it with RDDEM */
buyukesmeli 0:3a2f06aeceaf 2106
buyukesmeli 0:3a2f06aeceaf 2107 if (ni == 8) b <<= 2;
buyukesmeli 0:3a2f06aeceaf 2108 if ((b & 0x03) == 0x01) c |= NS_EXT; /* NT flag (Name extension has only small capital) */
buyukesmeli 0:3a2f06aeceaf 2109 if ((b & 0x0C) == 0x04) c |= NS_BODY; /* NT flag (Name body has only small capital) */
buyukesmeli 0:3a2f06aeceaf 2110
buyukesmeli 0:3a2f06aeceaf 2111 sfn[NSFLAG] = c; /* Store NT flag, File name is created */
buyukesmeli 0:3a2f06aeceaf 2112
buyukesmeli 0:3a2f06aeceaf 2113 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 2114 #endif
buyukesmeli 0:3a2f06aeceaf 2115 }
buyukesmeli 0:3a2f06aeceaf 2116
buyukesmeli 0:3a2f06aeceaf 2117
buyukesmeli 0:3a2f06aeceaf 2118
buyukesmeli 0:3a2f06aeceaf 2119
buyukesmeli 0:3a2f06aeceaf 2120 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2121 /* Follow a file path */
buyukesmeli 0:3a2f06aeceaf 2122 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2123
buyukesmeli 0:3a2f06aeceaf 2124 static
buyukesmeli 0:3a2f06aeceaf 2125 FRESULT follow_path ( /* FR_OK(0): successful, !=0: error code */
buyukesmeli 0:3a2f06aeceaf 2126 DIR_* dp, /* Directory object to return last directory and found object */
buyukesmeli 0:3a2f06aeceaf 2127 const TCHAR* path /* Full-path string to find a file or directory */
buyukesmeli 0:3a2f06aeceaf 2128 )
buyukesmeli 0:3a2f06aeceaf 2129 {
buyukesmeli 0:3a2f06aeceaf 2130 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 2131 BYTE *dir, ns;
buyukesmeli 0:3a2f06aeceaf 2132
buyukesmeli 0:3a2f06aeceaf 2133
buyukesmeli 0:3a2f06aeceaf 2134 #if _FS_RPATH
buyukesmeli 0:3a2f06aeceaf 2135 if (*path == '/' || *path == '\\') { /* There is a heading separator */
buyukesmeli 0:3a2f06aeceaf 2136 path++; dp->sclust = 0; /* Strip it and start from the root directory */
buyukesmeli 0:3a2f06aeceaf 2137 } else { /* No heading separator */
buyukesmeli 0:3a2f06aeceaf 2138 dp->sclust = dp->fs->cdir; /* Start from the current directory */
buyukesmeli 0:3a2f06aeceaf 2139 }
buyukesmeli 0:3a2f06aeceaf 2140 #else
buyukesmeli 0:3a2f06aeceaf 2141 if (*path == '/' || *path == '\\') /* Strip heading separator if exist */
buyukesmeli 0:3a2f06aeceaf 2142 path++;
buyukesmeli 0:3a2f06aeceaf 2143 dp->sclust = 0; /* Always start from the root directory */
buyukesmeli 0:3a2f06aeceaf 2144 #endif
buyukesmeli 0:3a2f06aeceaf 2145
buyukesmeli 0:3a2f06aeceaf 2146 if ((UINT)*path < ' ') { /* Null path name is the origin directory itself */
buyukesmeli 0:3a2f06aeceaf 2147 res = dir_sdi(dp, 0);
buyukesmeli 0:3a2f06aeceaf 2148 dp->dir = 0;
buyukesmeli 0:3a2f06aeceaf 2149 } else { /* Follow path */
buyukesmeli 0:3a2f06aeceaf 2150 for (;;) {
buyukesmeli 0:3a2f06aeceaf 2151 res = create_name(dp, &path); /* Get a segment name of the path */
buyukesmeli 0:3a2f06aeceaf 2152 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 2153 res = dir_find(dp); /* Find an object with the sagment name */
buyukesmeli 0:3a2f06aeceaf 2154 ns = dp->fn[NSFLAG];
buyukesmeli 0:3a2f06aeceaf 2155 if (res != FR_OK) { /* Failed to find the object */
buyukesmeli 0:3a2f06aeceaf 2156 if (res == FR_NO_FILE) { /* Object is not found */
buyukesmeli 0:3a2f06aeceaf 2157 if (_FS_RPATH && (ns & NS_DOT)) { /* If dot entry is not exist, */
buyukesmeli 0:3a2f06aeceaf 2158 dp->sclust = 0; dp->dir = 0; /* it is the root directory and stay there */
buyukesmeli 0:3a2f06aeceaf 2159 if (!(ns & NS_LAST)) continue; /* Continue to follow if not last segment */
buyukesmeli 0:3a2f06aeceaf 2160 res = FR_OK; /* Ended at the root directroy. Function completed. */
buyukesmeli 0:3a2f06aeceaf 2161 } else { /* Could not find the object */
buyukesmeli 0:3a2f06aeceaf 2162 if (!(ns & NS_LAST)) res = FR_NO_PATH; /* Adjust error code if not last segment */
buyukesmeli 0:3a2f06aeceaf 2163 }
buyukesmeli 0:3a2f06aeceaf 2164 }
buyukesmeli 0:3a2f06aeceaf 2165 break;
buyukesmeli 0:3a2f06aeceaf 2166 }
buyukesmeli 0:3a2f06aeceaf 2167 if (ns & NS_LAST) break; /* Last segment matched. Function completed. */
buyukesmeli 0:3a2f06aeceaf 2168 dir = dp->dir; /* Follow the sub-directory */
buyukesmeli 0:3a2f06aeceaf 2169 if (!(dir[DIR_Attr] & AM_DIR)) { /* It is not a sub-directory and cannot follow */
buyukesmeli 0:3a2f06aeceaf 2170 res = FR_NO_PATH; break;
buyukesmeli 0:3a2f06aeceaf 2171 }
buyukesmeli 0:3a2f06aeceaf 2172 dp->sclust = ld_clust(dp->fs, dir);
buyukesmeli 0:3a2f06aeceaf 2173 }
buyukesmeli 0:3a2f06aeceaf 2174 }
buyukesmeli 0:3a2f06aeceaf 2175
buyukesmeli 0:3a2f06aeceaf 2176 return res;
buyukesmeli 0:3a2f06aeceaf 2177 }
buyukesmeli 0:3a2f06aeceaf 2178
buyukesmeli 0:3a2f06aeceaf 2179
buyukesmeli 0:3a2f06aeceaf 2180
buyukesmeli 0:3a2f06aeceaf 2181
buyukesmeli 0:3a2f06aeceaf 2182 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2183 /* Get logical drive number from path name */
buyukesmeli 0:3a2f06aeceaf 2184 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2185
buyukesmeli 0:3a2f06aeceaf 2186 static
buyukesmeli 0:3a2f06aeceaf 2187 int get_ldnumber ( /* Returns logical drive number (-1:invalid drive) */
buyukesmeli 0:3a2f06aeceaf 2188 const TCHAR** path /* Pointer to pointer to the path name */
buyukesmeli 0:3a2f06aeceaf 2189 )
buyukesmeli 0:3a2f06aeceaf 2190 {
buyukesmeli 0:3a2f06aeceaf 2191 const TCHAR *tp, *tt;
buyukesmeli 0:3a2f06aeceaf 2192 UINT i;
buyukesmeli 0:3a2f06aeceaf 2193 int vol = -1;
buyukesmeli 0:3a2f06aeceaf 2194 #if _STR_VOLUME_ID /* Find string drive id */
buyukesmeli 0:3a2f06aeceaf 2195 static const char* const str[] = {_VOLUME_STRS};
buyukesmeli 0:3a2f06aeceaf 2196 const char *sp;
buyukesmeli 0:3a2f06aeceaf 2197 char c;
buyukesmeli 0:3a2f06aeceaf 2198 TCHAR tc;
buyukesmeli 0:3a2f06aeceaf 2199 #endif
buyukesmeli 0:3a2f06aeceaf 2200
buyukesmeli 0:3a2f06aeceaf 2201
buyukesmeli 0:3a2f06aeceaf 2202 if (*path) { /* If the pointer is not a null */
buyukesmeli 0:3a2f06aeceaf 2203 for (tt = *path; (UINT)*tt >= (_USE_LFN ? ' ' : '!') && *tt != ':'; tt++) ; /* Find ':' in the path */
buyukesmeli 0:3a2f06aeceaf 2204 if (*tt == ':') { /* If a ':' is exist in the path name */
buyukesmeli 0:3a2f06aeceaf 2205 tp = *path;
buyukesmeli 0:3a2f06aeceaf 2206 i = *tp++ - '0';
buyukesmeli 0:3a2f06aeceaf 2207 if (i < 10 && tp == tt) { /* Is there a numeric drive id? */
buyukesmeli 0:3a2f06aeceaf 2208 if (i < _VOLUMES) { /* If a drive id is found, get the value and strip it */
buyukesmeli 0:3a2f06aeceaf 2209 vol = (int)i;
buyukesmeli 0:3a2f06aeceaf 2210 *path = ++tt;
buyukesmeli 0:3a2f06aeceaf 2211 }
buyukesmeli 0:3a2f06aeceaf 2212 }
buyukesmeli 0:3a2f06aeceaf 2213 #if _STR_VOLUME_ID
buyukesmeli 0:3a2f06aeceaf 2214 else { /* No numeric drive number, find string drive id */
buyukesmeli 0:3a2f06aeceaf 2215 i = 0; tt++;
buyukesmeli 0:3a2f06aeceaf 2216 do {
buyukesmeli 0:3a2f06aeceaf 2217 sp = str[i]; tp = *path;
buyukesmeli 0:3a2f06aeceaf 2218 do { /* Compare a string drive id with path name */
buyukesmeli 0:3a2f06aeceaf 2219 c = *sp++; tc = *tp++;
buyukesmeli 0:3a2f06aeceaf 2220 if (IsLower(tc)) tc -= 0x20;
buyukesmeli 0:3a2f06aeceaf 2221 } while (c && (TCHAR)c == tc);
buyukesmeli 0:3a2f06aeceaf 2222 } while ((c || tp != tt) && ++i < _VOLUMES); /* Repeat for each id until pattern match */
buyukesmeli 0:3a2f06aeceaf 2223 if (i < _VOLUMES) { /* If a drive id is found, get the value and strip it */
buyukesmeli 0:3a2f06aeceaf 2224 vol = (int)i;
buyukesmeli 0:3a2f06aeceaf 2225 *path = tt;
buyukesmeli 0:3a2f06aeceaf 2226 }
buyukesmeli 0:3a2f06aeceaf 2227 }
buyukesmeli 0:3a2f06aeceaf 2228 #endif
buyukesmeli 0:3a2f06aeceaf 2229 return vol;
buyukesmeli 0:3a2f06aeceaf 2230 }
buyukesmeli 0:3a2f06aeceaf 2231 #if _FS_RPATH && _VOLUMES >= 2
buyukesmeli 0:3a2f06aeceaf 2232 vol = CurrVol; /* Current drive */
buyukesmeli 0:3a2f06aeceaf 2233 #else
buyukesmeli 0:3a2f06aeceaf 2234 vol = 0; /* Drive 0 */
buyukesmeli 0:3a2f06aeceaf 2235 #endif
buyukesmeli 0:3a2f06aeceaf 2236 }
buyukesmeli 0:3a2f06aeceaf 2237 return vol;
buyukesmeli 0:3a2f06aeceaf 2238 }
buyukesmeli 0:3a2f06aeceaf 2239
buyukesmeli 0:3a2f06aeceaf 2240
buyukesmeli 0:3a2f06aeceaf 2241
buyukesmeli 0:3a2f06aeceaf 2242
buyukesmeli 0:3a2f06aeceaf 2243 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2244 /* Load a sector and check if it is an FAT boot sector */
buyukesmeli 0:3a2f06aeceaf 2245 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2246
buyukesmeli 0:3a2f06aeceaf 2247 static
buyukesmeli 0:3a2f06aeceaf 2248 BYTE check_fs ( /* 0:FAT boor sector, 1:Valid boor sector but not FAT, 2:Not a boot sector, 3:Disk error */
buyukesmeli 0:3a2f06aeceaf 2249 FATFS* fs, /* File system object */
buyukesmeli 0:3a2f06aeceaf 2250 DWORD sect /* Sector# (lba) to check if it is an FAT boot record or not */
buyukesmeli 0:3a2f06aeceaf 2251 )
buyukesmeli 0:3a2f06aeceaf 2252 {
buyukesmeli 0:3a2f06aeceaf 2253 fs->wflag = 0; fs->winsect = 0xFFFFFFFF; /* Invaidate window */
buyukesmeli 0:3a2f06aeceaf 2254 if (move_window(fs, sect) != FR_OK) /* Load boot record */
buyukesmeli 0:3a2f06aeceaf 2255 return 3;
buyukesmeli 0:3a2f06aeceaf 2256
buyukesmeli 0:3a2f06aeceaf 2257 if (LD_WORD(&fs->win.d8[BS_55AA]) != 0xAA55) /* Check boot record signature (always placed at offset 510 even if the sector size is >512) */
buyukesmeli 0:3a2f06aeceaf 2258 return 2;
buyukesmeli 0:3a2f06aeceaf 2259
buyukesmeli 0:3a2f06aeceaf 2260 if ((LD_DWORD(&fs->win.d8[BS_FilSysType]) & 0xFFFFFF) == 0x544146) /* Check "FAT" string */
buyukesmeli 0:3a2f06aeceaf 2261 return 0;
buyukesmeli 0:3a2f06aeceaf 2262 if ((LD_DWORD(&fs->win.d8[BS_FilSysType32]) & 0xFFFFFF) == 0x544146) /* Check "FAT" string */
buyukesmeli 0:3a2f06aeceaf 2263 return 0;
buyukesmeli 0:3a2f06aeceaf 2264
buyukesmeli 0:3a2f06aeceaf 2265 return 1;
buyukesmeli 0:3a2f06aeceaf 2266 }
buyukesmeli 0:3a2f06aeceaf 2267
buyukesmeli 0:3a2f06aeceaf 2268
buyukesmeli 0:3a2f06aeceaf 2269
buyukesmeli 0:3a2f06aeceaf 2270
buyukesmeli 0:3a2f06aeceaf 2271 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2272 /* Find logical drive and check if the volume is mounted */
buyukesmeli 0:3a2f06aeceaf 2273 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2274
buyukesmeli 0:3a2f06aeceaf 2275 static
buyukesmeli 0:3a2f06aeceaf 2276 FRESULT find_volume ( /* FR_OK(0): successful, !=0: any error occurred */
buyukesmeli 0:3a2f06aeceaf 2277 FATFS** rfs, /* Pointer to pointer to the found file system object */
buyukesmeli 0:3a2f06aeceaf 2278 const TCHAR** path, /* Pointer to pointer to the path name (drive number) */
buyukesmeli 0:3a2f06aeceaf 2279 BYTE wmode /* !=0: Check write protection for write access */
buyukesmeli 0:3a2f06aeceaf 2280 )
buyukesmeli 0:3a2f06aeceaf 2281 {
buyukesmeli 0:3a2f06aeceaf 2282 BYTE fmt, *pt;
buyukesmeli 0:3a2f06aeceaf 2283 int vol;
buyukesmeli 0:3a2f06aeceaf 2284 DSTATUS stat;
buyukesmeli 0:3a2f06aeceaf 2285 DWORD bsect, fasize, tsect, sysect, nclst, szbfat, br[4];
buyukesmeli 0:3a2f06aeceaf 2286 WORD nrsv;
buyukesmeli 0:3a2f06aeceaf 2287 FATFS *fs;
buyukesmeli 0:3a2f06aeceaf 2288 UINT i;
buyukesmeli 0:3a2f06aeceaf 2289
buyukesmeli 0:3a2f06aeceaf 2290
buyukesmeli 0:3a2f06aeceaf 2291 /* Get logical drive number from the path name */
buyukesmeli 0:3a2f06aeceaf 2292 *rfs = 0;
buyukesmeli 0:3a2f06aeceaf 2293 vol = get_ldnumber(path);
buyukesmeli 0:3a2f06aeceaf 2294 if (vol < 0) return FR_INVALID_DRIVE;
buyukesmeli 0:3a2f06aeceaf 2295
buyukesmeli 0:3a2f06aeceaf 2296 /* Check if the file system object is valid or not */
buyukesmeli 0:3a2f06aeceaf 2297 fs = FatFs[vol]; /* Get pointer to the file system object */
buyukesmeli 0:3a2f06aeceaf 2298 if (!fs) return FR_NOT_ENABLED; /* Is the file system object available? */
buyukesmeli 0:3a2f06aeceaf 2299
buyukesmeli 0:3a2f06aeceaf 2300 ENTER_FF(fs); /* Lock the volume */
buyukesmeli 0:3a2f06aeceaf 2301 *rfs = fs; /* Return pointer to the file system object */
buyukesmeli 0:3a2f06aeceaf 2302
buyukesmeli 0:3a2f06aeceaf 2303 if (fs->fs_type) { /* If the volume has been mounted */
buyukesmeli 0:3a2f06aeceaf 2304 stat = disk_status(fs->drv);
buyukesmeli 0:3a2f06aeceaf 2305 if (!(stat & STA_NOINIT)) { /* and the physical drive is kept initialized */
buyukesmeli 0:3a2f06aeceaf 2306 if (!_FS_READONLY && wmode && (stat & STA_PROTECT)) /* Check write protection if needed */
buyukesmeli 0:3a2f06aeceaf 2307 return FR_WRITE_PROTECTED;
buyukesmeli 0:3a2f06aeceaf 2308 return FR_OK; /* The file system object is valid */
buyukesmeli 0:3a2f06aeceaf 2309 }
buyukesmeli 0:3a2f06aeceaf 2310 }
buyukesmeli 0:3a2f06aeceaf 2311
buyukesmeli 0:3a2f06aeceaf 2312 /* The file system object is not valid. */
buyukesmeli 0:3a2f06aeceaf 2313 /* Following code attempts to mount the volume. (analyze BPB and initialize the fs object) */
buyukesmeli 0:3a2f06aeceaf 2314
buyukesmeli 0:3a2f06aeceaf 2315 fs->fs_type = 0; /* Clear the file system object */
buyukesmeli 0:3a2f06aeceaf 2316 fs->drv = LD2PD(vol); /* Bind the logical drive and a physical drive */
buyukesmeli 0:3a2f06aeceaf 2317 stat = disk_initialize(fs->drv); /* Initialize the physical drive */
buyukesmeli 0:3a2f06aeceaf 2318 if (stat & STA_NOINIT) /* Check if the initialization succeeded */
buyukesmeli 0:3a2f06aeceaf 2319 return FR_NOT_READY; /* Failed to initialize due to no medium or hard error */
buyukesmeli 0:3a2f06aeceaf 2320 if (!_FS_READONLY && wmode && (stat & STA_PROTECT)) /* Check disk write protection if needed */
buyukesmeli 0:3a2f06aeceaf 2321 return FR_WRITE_PROTECTED;
buyukesmeli 0:3a2f06aeceaf 2322 #if _MAX_SS != _MIN_SS /* Get sector size (multiple sector size cfg only) */
buyukesmeli 0:3a2f06aeceaf 2323 if (disk_ioctl(fs->drv, GET_SECTOR_SIZE, &SS(fs)) != RES_OK
buyukesmeli 0:3a2f06aeceaf 2324 || SS(fs) < _MIN_SS || SS(fs) > _MAX_SS) return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 2325 #endif
buyukesmeli 0:3a2f06aeceaf 2326 /* Find an FAT partition on the drive. Supports only generic partitioning, FDISK and SFD. */
buyukesmeli 0:3a2f06aeceaf 2327 bsect = 0;
buyukesmeli 0:3a2f06aeceaf 2328 fmt = check_fs(fs, bsect); /* Load sector 0 and check if it is an FAT boot sector as SFD */
buyukesmeli 0:3a2f06aeceaf 2329 if (fmt == 1 || (!fmt && (LD2PT(vol)))) { /* Not an FAT boot sector or forced partition number */
buyukesmeli 0:3a2f06aeceaf 2330 for (i = 0; i < 4; i++) { /* Get partition offset */
buyukesmeli 0:3a2f06aeceaf 2331 pt = fs->win.d8 + MBR_Table + i * SZ_PTE;
buyukesmeli 0:3a2f06aeceaf 2332 br[i] = pt[4] ? LD_DWORD(&pt[8]) : 0;
buyukesmeli 0:3a2f06aeceaf 2333 }
buyukesmeli 0:3a2f06aeceaf 2334 i = LD2PT(vol); /* Partition number: 0:auto, 1-4:forced */
buyukesmeli 0:3a2f06aeceaf 2335 if (i) i--;
buyukesmeli 0:3a2f06aeceaf 2336 do { /* Find an FAT volume */
buyukesmeli 0:3a2f06aeceaf 2337 bsect = br[i];
buyukesmeli 0:3a2f06aeceaf 2338 fmt = bsect ? check_fs(fs, bsect) : 2; /* Check the partition */
buyukesmeli 0:3a2f06aeceaf 2339 } while (!LD2PT(vol) && fmt && ++i < 4);
buyukesmeli 0:3a2f06aeceaf 2340 }
buyukesmeli 0:3a2f06aeceaf 2341 if (fmt == 3) return FR_DISK_ERR; /* An error occured in the disk I/O layer */
buyukesmeli 0:3a2f06aeceaf 2342 if (fmt) return FR_NO_FILESYSTEM; /* No FAT volume is found */
buyukesmeli 0:3a2f06aeceaf 2343
buyukesmeli 0:3a2f06aeceaf 2344 /* An FAT volume is found. Following code initializes the file system object */
buyukesmeli 0:3a2f06aeceaf 2345
buyukesmeli 0:3a2f06aeceaf 2346 if (LD_WORD(fs->win.d8 + BPB_BytsPerSec) != SS(fs)) /* (BPB_BytsPerSec must be equal to the physical sector size) */
buyukesmeli 0:3a2f06aeceaf 2347 return FR_NO_FILESYSTEM;
buyukesmeli 0:3a2f06aeceaf 2348
buyukesmeli 0:3a2f06aeceaf 2349 fasize = LD_WORD(fs->win.d8 + BPB_FATSz16); /* Number of sectors per FAT */
buyukesmeli 0:3a2f06aeceaf 2350 if (!fasize) fasize = LD_DWORD(fs->win.d8 + BPB_FATSz32);
buyukesmeli 0:3a2f06aeceaf 2351 fs->fsize = fasize;
buyukesmeli 0:3a2f06aeceaf 2352
buyukesmeli 0:3a2f06aeceaf 2353 fs->n_fats = fs->win.d8[BPB_NumFATs]; /* Number of FAT copies */
buyukesmeli 0:3a2f06aeceaf 2354 if (fs->n_fats != 1 && fs->n_fats != 2) /* (Must be 1 or 2) */
buyukesmeli 0:3a2f06aeceaf 2355 return FR_NO_FILESYSTEM;
buyukesmeli 0:3a2f06aeceaf 2356 fasize *= fs->n_fats; /* Number of sectors for FAT area */
buyukesmeli 0:3a2f06aeceaf 2357
buyukesmeli 0:3a2f06aeceaf 2358 fs->csize = fs->win.d8[BPB_SecPerClus]; /* Number of sectors per cluster */
buyukesmeli 0:3a2f06aeceaf 2359 if (!fs->csize || (fs->csize & (fs->csize - 1))) /* (Must be power of 2) */
buyukesmeli 0:3a2f06aeceaf 2360 return FR_NO_FILESYSTEM;
buyukesmeli 0:3a2f06aeceaf 2361
buyukesmeli 0:3a2f06aeceaf 2362 fs->n_rootdir = LD_WORD(fs->win.d8 + BPB_RootEntCnt); /* Number of root directory entries */
buyukesmeli 0:3a2f06aeceaf 2363 if (fs->n_rootdir % (SS(fs) / SZ_DIRE)) /* (Must be sector aligned) */
buyukesmeli 0:3a2f06aeceaf 2364 return FR_NO_FILESYSTEM;
buyukesmeli 0:3a2f06aeceaf 2365
buyukesmeli 0:3a2f06aeceaf 2366 tsect = LD_WORD(fs->win.d8 + BPB_TotSec16); /* Number of sectors on the volume */
buyukesmeli 0:3a2f06aeceaf 2367 if (!tsect) tsect = LD_DWORD(fs->win.d8 + BPB_TotSec32);
buyukesmeli 0:3a2f06aeceaf 2368
buyukesmeli 0:3a2f06aeceaf 2369 nrsv = LD_WORD(fs->win.d8 + BPB_RsvdSecCnt); /* Number of reserved sectors */
buyukesmeli 0:3a2f06aeceaf 2370 if (!nrsv) return FR_NO_FILESYSTEM; /* (Must not be 0) */
buyukesmeli 0:3a2f06aeceaf 2371
buyukesmeli 0:3a2f06aeceaf 2372 /* Determine the FAT sub type */
buyukesmeli 0:3a2f06aeceaf 2373 sysect = nrsv + fasize + fs->n_rootdir / (SS(fs) / SZ_DIRE); /* RSV + FAT + DIR */
buyukesmeli 0:3a2f06aeceaf 2374 if (tsect < sysect) return FR_NO_FILESYSTEM; /* (Invalid volume size) */
buyukesmeli 0:3a2f06aeceaf 2375 nclst = (tsect - sysect) / fs->csize; /* Number of clusters */
buyukesmeli 0:3a2f06aeceaf 2376 if (!nclst) return FR_NO_FILESYSTEM; /* (Invalid volume size) */
buyukesmeli 0:3a2f06aeceaf 2377 fmt = FS_FAT12;
buyukesmeli 0:3a2f06aeceaf 2378 if (nclst >= MIN_FAT16) fmt = FS_FAT16;
buyukesmeli 0:3a2f06aeceaf 2379 if (nclst >= MIN_FAT32) fmt = FS_FAT32;
buyukesmeli 0:3a2f06aeceaf 2380
buyukesmeli 0:3a2f06aeceaf 2381 /* Boundaries and Limits */
buyukesmeli 0:3a2f06aeceaf 2382 fs->n_fatent = nclst + 2; /* Number of FAT entries */
buyukesmeli 0:3a2f06aeceaf 2383 fs->volbase = bsect; /* Volume start sector */
buyukesmeli 0:3a2f06aeceaf 2384 fs->fatbase = bsect + nrsv; /* FAT start sector */
buyukesmeli 0:3a2f06aeceaf 2385 fs->database = bsect + sysect; /* Data start sector */
buyukesmeli 0:3a2f06aeceaf 2386 if (fmt == FS_FAT32) {
buyukesmeli 0:3a2f06aeceaf 2387 if (fs->n_rootdir) return FR_NO_FILESYSTEM; /* (BPB_RootEntCnt must be 0) */
buyukesmeli 0:3a2f06aeceaf 2388 fs->dirbase = LD_DWORD(fs->win.d8 + BPB_RootClus); /* Root directory start cluster */
buyukesmeli 0:3a2f06aeceaf 2389 szbfat = fs->n_fatent * 4; /* (Needed FAT size) */
buyukesmeli 0:3a2f06aeceaf 2390 } else {
buyukesmeli 0:3a2f06aeceaf 2391 if (!fs->n_rootdir) return FR_NO_FILESYSTEM; /* (BPB_RootEntCnt must not be 0) */
buyukesmeli 0:3a2f06aeceaf 2392 fs->dirbase = fs->fatbase + fasize; /* Root directory start sector */
buyukesmeli 0:3a2f06aeceaf 2393 szbfat = (fmt == FS_FAT16) ? /* (Needed FAT size) */
buyukesmeli 0:3a2f06aeceaf 2394 fs->n_fatent * 2 : fs->n_fatent * 3 / 2 + (fs->n_fatent & 1);
buyukesmeli 0:3a2f06aeceaf 2395 }
buyukesmeli 0:3a2f06aeceaf 2396 if (fs->fsize < (szbfat + (SS(fs) - 1)) / SS(fs)) /* (BPB_FATSz must not be less than the size needed) */
buyukesmeli 0:3a2f06aeceaf 2397 return FR_NO_FILESYSTEM;
buyukesmeli 0:3a2f06aeceaf 2398
buyukesmeli 0:3a2f06aeceaf 2399 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 2400 /* Initialize cluster allocation information */
buyukesmeli 0:3a2f06aeceaf 2401 fs->last_clust = fs->free_clust = 0xFFFFFFFF;
buyukesmeli 0:3a2f06aeceaf 2402
buyukesmeli 0:3a2f06aeceaf 2403 /* Get fsinfo if available */
buyukesmeli 0:3a2f06aeceaf 2404 fs->fsi_flag = 0x80;
buyukesmeli 0:3a2f06aeceaf 2405 #if (_FS_NOFSINFO & 3) != 3
buyukesmeli 0:3a2f06aeceaf 2406 if (fmt == FS_FAT32 /* Enable FSINFO only if FAT32 and BPB_FSInfo is 1 */
buyukesmeli 0:3a2f06aeceaf 2407 && LD_WORD(fs->win.d8 + BPB_FSInfo) == 1
buyukesmeli 0:3a2f06aeceaf 2408 && move_window(fs, bsect + 1) == FR_OK)
buyukesmeli 0:3a2f06aeceaf 2409 {
buyukesmeli 0:3a2f06aeceaf 2410 fs->fsi_flag = 0;
buyukesmeli 0:3a2f06aeceaf 2411 if (LD_WORD(fs->win.d8 + BS_55AA) == 0xAA55 /* Load FSINFO data if available */
buyukesmeli 0:3a2f06aeceaf 2412 && LD_DWORD(fs->win.d8 + FSI_LeadSig) == 0x41615252
buyukesmeli 0:3a2f06aeceaf 2413 && LD_DWORD(fs->win.d8 + FSI_StrucSig) == 0x61417272)
buyukesmeli 0:3a2f06aeceaf 2414 {
buyukesmeli 0:3a2f06aeceaf 2415 #if (_FS_NOFSINFO & 1) == 0
buyukesmeli 0:3a2f06aeceaf 2416 fs->free_clust = LD_DWORD(fs->win.d8 + FSI_Free_Count);
buyukesmeli 0:3a2f06aeceaf 2417 #endif
buyukesmeli 0:3a2f06aeceaf 2418 #if (_FS_NOFSINFO & 2) == 0
buyukesmeli 0:3a2f06aeceaf 2419 fs->last_clust = LD_DWORD(fs->win.d8 + FSI_Nxt_Free);
buyukesmeli 0:3a2f06aeceaf 2420 #endif
buyukesmeli 0:3a2f06aeceaf 2421 }
buyukesmeli 0:3a2f06aeceaf 2422 }
buyukesmeli 0:3a2f06aeceaf 2423 #endif
buyukesmeli 0:3a2f06aeceaf 2424 #endif
buyukesmeli 0:3a2f06aeceaf 2425 fs->fs_type = fmt; /* FAT sub-type */
buyukesmeli 0:3a2f06aeceaf 2426 fs->id = ++Fsid; /* File system mount ID */
buyukesmeli 0:3a2f06aeceaf 2427 #if _FS_RPATH
buyukesmeli 0:3a2f06aeceaf 2428 fs->cdir = 0; /* Set current directory to root */
buyukesmeli 0:3a2f06aeceaf 2429 #endif
buyukesmeli 0:3a2f06aeceaf 2430 #if _FS_LOCK /* Clear file lock semaphores */
buyukesmeli 0:3a2f06aeceaf 2431 clear_lock(fs);
buyukesmeli 0:3a2f06aeceaf 2432 #endif
buyukesmeli 0:3a2f06aeceaf 2433
buyukesmeli 0:3a2f06aeceaf 2434 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 2435 }
buyukesmeli 0:3a2f06aeceaf 2436
buyukesmeli 0:3a2f06aeceaf 2437
buyukesmeli 0:3a2f06aeceaf 2438
buyukesmeli 0:3a2f06aeceaf 2439
buyukesmeli 0:3a2f06aeceaf 2440 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2441 /* Check if the file/directory object is valid or not */
buyukesmeli 0:3a2f06aeceaf 2442 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2443
buyukesmeli 0:3a2f06aeceaf 2444 static
buyukesmeli 0:3a2f06aeceaf 2445 FRESULT validate ( /* FR_OK(0): The object is valid, !=0: Invalid */
buyukesmeli 0:3a2f06aeceaf 2446 void* obj /* Pointer to the object FIL/DIR to check validity */
buyukesmeli 0:3a2f06aeceaf 2447 )
buyukesmeli 0:3a2f06aeceaf 2448 {
buyukesmeli 0:3a2f06aeceaf 2449 FIL *fil = (FIL*)obj; /* Assuming offset of .fs and .id in the FIL/DIR structure is identical */
buyukesmeli 0:3a2f06aeceaf 2450
buyukesmeli 0:3a2f06aeceaf 2451
buyukesmeli 0:3a2f06aeceaf 2452 if (!fil || !fil->fs || !fil->fs->fs_type || fil->fs->id != fil->id || (disk_status(fil->fs->drv) & STA_NOINIT))
buyukesmeli 0:3a2f06aeceaf 2453 return FR_INVALID_OBJECT;
buyukesmeli 0:3a2f06aeceaf 2454
buyukesmeli 0:3a2f06aeceaf 2455 ENTER_FF(fil->fs); /* Lock file system */
buyukesmeli 0:3a2f06aeceaf 2456
buyukesmeli 0:3a2f06aeceaf 2457 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 2458 }
buyukesmeli 0:3a2f06aeceaf 2459
buyukesmeli 0:3a2f06aeceaf 2460
buyukesmeli 0:3a2f06aeceaf 2461
buyukesmeli 0:3a2f06aeceaf 2462
buyukesmeli 0:3a2f06aeceaf 2463 /*--------------------------------------------------------------------------
buyukesmeli 0:3a2f06aeceaf 2464
buyukesmeli 0:3a2f06aeceaf 2465 Public Functions
buyukesmeli 0:3a2f06aeceaf 2466
buyukesmeli 0:3a2f06aeceaf 2467 --------------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2468
buyukesmeli 0:3a2f06aeceaf 2469
buyukesmeli 0:3a2f06aeceaf 2470
buyukesmeli 0:3a2f06aeceaf 2471 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2472 /* Mount/Unmount a Logical Drive */
buyukesmeli 0:3a2f06aeceaf 2473 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2474
buyukesmeli 0:3a2f06aeceaf 2475 FRESULT f_mount (
buyukesmeli 0:3a2f06aeceaf 2476 FATFS* fs, /* Pointer to the file system object (NULL:unmount)*/
buyukesmeli 0:3a2f06aeceaf 2477 const TCHAR* path, /* Logical drive number to be mounted/unmounted */
buyukesmeli 0:3a2f06aeceaf 2478 BYTE opt /* 0:Do not mount (delayed mount), 1:Mount immediately */
buyukesmeli 0:3a2f06aeceaf 2479 )
buyukesmeli 0:3a2f06aeceaf 2480 {
buyukesmeli 0:3a2f06aeceaf 2481 FATFS *cfs;
buyukesmeli 0:3a2f06aeceaf 2482 int vol;
buyukesmeli 0:3a2f06aeceaf 2483 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 2484 const TCHAR *rp = path;
buyukesmeli 0:3a2f06aeceaf 2485
buyukesmeli 0:3a2f06aeceaf 2486
buyukesmeli 0:3a2f06aeceaf 2487 vol = get_ldnumber(&rp);
buyukesmeli 0:3a2f06aeceaf 2488 if (vol < 0) return FR_INVALID_DRIVE;
buyukesmeli 0:3a2f06aeceaf 2489 cfs = FatFs[vol]; /* Pointer to fs object */
buyukesmeli 0:3a2f06aeceaf 2490
buyukesmeli 0:3a2f06aeceaf 2491 if (cfs) {
buyukesmeli 0:3a2f06aeceaf 2492 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 2493 clear_lock(cfs);
buyukesmeli 0:3a2f06aeceaf 2494 #endif
buyukesmeli 0:3a2f06aeceaf 2495 #if _FS_REENTRANT /* Discard sync object of the current volume */
buyukesmeli 0:3a2f06aeceaf 2496 if (!ff_del_syncobj(cfs->sobj)) return FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 2497 #endif
buyukesmeli 0:3a2f06aeceaf 2498 cfs->fs_type = 0; /* Clear old fs object */
buyukesmeli 0:3a2f06aeceaf 2499 }
buyukesmeli 0:3a2f06aeceaf 2500
buyukesmeli 0:3a2f06aeceaf 2501 if (fs) {
buyukesmeli 0:3a2f06aeceaf 2502 fs->fs_type = 0; /* Clear new fs object */
buyukesmeli 0:3a2f06aeceaf 2503 #if _FS_REENTRANT /* Create sync object for the new volume */
buyukesmeli 0:3a2f06aeceaf 2504 if (!ff_cre_syncobj((BYTE)vol, &fs->sobj)) return FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 2505 #endif
buyukesmeli 0:3a2f06aeceaf 2506 }
buyukesmeli 0:3a2f06aeceaf 2507 FatFs[vol] = fs; /* Register new fs object */
buyukesmeli 0:3a2f06aeceaf 2508
buyukesmeli 0:3a2f06aeceaf 2509 if (!fs || opt != 1) return FR_OK; /* Do not mount now, it will be mounted later */
buyukesmeli 0:3a2f06aeceaf 2510
buyukesmeli 0:3a2f06aeceaf 2511 res = find_volume(&fs, &path, 0); /* Force mounted the volume */
buyukesmeli 0:3a2f06aeceaf 2512 LEAVE_FF(fs, res);
buyukesmeli 0:3a2f06aeceaf 2513 }
buyukesmeli 0:3a2f06aeceaf 2514
buyukesmeli 0:3a2f06aeceaf 2515
buyukesmeli 0:3a2f06aeceaf 2516
buyukesmeli 0:3a2f06aeceaf 2517
buyukesmeli 0:3a2f06aeceaf 2518 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2519 /* Open or Create a File */
buyukesmeli 0:3a2f06aeceaf 2520 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2521
buyukesmeli 0:3a2f06aeceaf 2522 FRESULT f_open (
buyukesmeli 0:3a2f06aeceaf 2523 FIL* fp, /* Pointer to the blank file object */
buyukesmeli 0:3a2f06aeceaf 2524 const TCHAR* path, /* Pointer to the file name */
buyukesmeli 0:3a2f06aeceaf 2525 BYTE mode /* Access mode and file open mode flags */
buyukesmeli 0:3a2f06aeceaf 2526 )
buyukesmeli 0:3a2f06aeceaf 2527 {
buyukesmeli 0:3a2f06aeceaf 2528 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 2529 DIR_ dj;
buyukesmeli 0:3a2f06aeceaf 2530 BYTE *dir;
buyukesmeli 0:3a2f06aeceaf 2531 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 2532 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 2533 DWORD dw, cl;
buyukesmeli 0:3a2f06aeceaf 2534 #endif
buyukesmeli 0:3a2f06aeceaf 2535
buyukesmeli 0:3a2f06aeceaf 2536
buyukesmeli 0:3a2f06aeceaf 2537 if (!fp) return FR_INVALID_OBJECT;
buyukesmeli 0:3a2f06aeceaf 2538 fp->fs = 0; /* Clear file object */
buyukesmeli 0:3a2f06aeceaf 2539
buyukesmeli 0:3a2f06aeceaf 2540 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 2541 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 2542 mode &= FA_READ | FA_WRITE | FA_CREATE_ALWAYS | FA_OPEN_ALWAYS | FA_CREATE_NEW;
buyukesmeli 0:3a2f06aeceaf 2543 res = find_volume(&dj.fs, &path, (BYTE)(mode & ~FA_READ));
buyukesmeli 0:3a2f06aeceaf 2544 #else
buyukesmeli 0:3a2f06aeceaf 2545 mode &= FA_READ;
buyukesmeli 0:3a2f06aeceaf 2546 res = find_volume(&dj.fs, &path, 0);
buyukesmeli 0:3a2f06aeceaf 2547 #endif
buyukesmeli 0:3a2f06aeceaf 2548 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2549 INIT_BUF(dj);
buyukesmeli 0:3a2f06aeceaf 2550 res = follow_path(&dj, path); /* Follow the file path */
buyukesmeli 0:3a2f06aeceaf 2551 dir = dj.dir;
buyukesmeli 0:3a2f06aeceaf 2552 #if !_FS_READONLY /* R/W configuration */
buyukesmeli 0:3a2f06aeceaf 2553 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2554 if (!dir) /* Default directory itself */
buyukesmeli 0:3a2f06aeceaf 2555 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 2556 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 2557 else
buyukesmeli 0:3a2f06aeceaf 2558 res = chk_lock(&dj, (mode & ~FA_READ) ? 1 : 0);
buyukesmeli 0:3a2f06aeceaf 2559 #endif
buyukesmeli 0:3a2f06aeceaf 2560 }
buyukesmeli 0:3a2f06aeceaf 2561 /* Create or Open a file */
buyukesmeli 0:3a2f06aeceaf 2562 if (mode & (FA_CREATE_ALWAYS | FA_OPEN_ALWAYS | FA_CREATE_NEW)) {
buyukesmeli 0:3a2f06aeceaf 2563 if (res != FR_OK) { /* No file, create new */
buyukesmeli 0:3a2f06aeceaf 2564 if (res == FR_NO_FILE) /* There is no file to open, create a new entry */
buyukesmeli 0:3a2f06aeceaf 2565 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 2566 res = enq_lock() ? dir_register(&dj) : FR_TOO_MANY_OPEN_FILES;
buyukesmeli 0:3a2f06aeceaf 2567 #else
buyukesmeli 0:3a2f06aeceaf 2568 res = dir_register(&dj);
buyukesmeli 0:3a2f06aeceaf 2569 #endif
buyukesmeli 0:3a2f06aeceaf 2570 mode |= FA_CREATE_ALWAYS; /* File is created */
buyukesmeli 0:3a2f06aeceaf 2571 dir = dj.dir; /* New entry */
buyukesmeli 0:3a2f06aeceaf 2572 }
buyukesmeli 0:3a2f06aeceaf 2573 else { /* Any object is already existing */
buyukesmeli 0:3a2f06aeceaf 2574 if (dir[DIR_Attr] & (AM_RDO | AM_DIR)) { /* Cannot overwrite it (R/O or DIR) */
buyukesmeli 0:3a2f06aeceaf 2575 res = FR_DENIED;
buyukesmeli 0:3a2f06aeceaf 2576 } else {
buyukesmeli 0:3a2f06aeceaf 2577 if (mode & FA_CREATE_NEW) /* Cannot create as new file */
buyukesmeli 0:3a2f06aeceaf 2578 res = FR_EXIST;
buyukesmeli 0:3a2f06aeceaf 2579 }
buyukesmeli 0:3a2f06aeceaf 2580 }
buyukesmeli 0:3a2f06aeceaf 2581 if (res == FR_OK && (mode & FA_CREATE_ALWAYS)) { /* Truncate it if overwrite mode */
buyukesmeli 0:3a2f06aeceaf 2582 dw = GET_FATTIME(); /* Created time */
buyukesmeli 0:3a2f06aeceaf 2583 ST_DWORD(dir + DIR_CrtTime, dw);
buyukesmeli 0:3a2f06aeceaf 2584 dir[DIR_Attr] = 0; /* Reset attribute */
buyukesmeli 0:3a2f06aeceaf 2585 ST_DWORD(dir + DIR_FileSize, 0);/* size = 0 */
buyukesmeli 0:3a2f06aeceaf 2586 cl = ld_clust(dj.fs, dir); /* Get start cluster */
buyukesmeli 0:3a2f06aeceaf 2587 st_clust(dir, 0); /* cluster = 0 */
buyukesmeli 0:3a2f06aeceaf 2588 dj.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 2589 if (cl) { /* Remove the cluster chain if exist */
buyukesmeli 0:3a2f06aeceaf 2590 dw = dj.fs->winsect;
buyukesmeli 0:3a2f06aeceaf 2591 res = remove_chain(dj.fs, cl);
buyukesmeli 0:3a2f06aeceaf 2592 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2593 dj.fs->last_clust = cl - 1; /* Reuse the cluster hole */
buyukesmeli 0:3a2f06aeceaf 2594 res = move_window(dj.fs, dw);
buyukesmeli 0:3a2f06aeceaf 2595 }
buyukesmeli 0:3a2f06aeceaf 2596 }
buyukesmeli 0:3a2f06aeceaf 2597 }
buyukesmeli 0:3a2f06aeceaf 2598 }
buyukesmeli 0:3a2f06aeceaf 2599 else { /* Open an existing file */
buyukesmeli 0:3a2f06aeceaf 2600 if (res == FR_OK) { /* Follow succeeded */
buyukesmeli 0:3a2f06aeceaf 2601 if (dir[DIR_Attr] & AM_DIR) { /* It is a directory */
buyukesmeli 0:3a2f06aeceaf 2602 res = FR_NO_FILE;
buyukesmeli 0:3a2f06aeceaf 2603 } else {
buyukesmeli 0:3a2f06aeceaf 2604 if ((mode & FA_WRITE) && (dir[DIR_Attr] & AM_RDO)) /* R/O violation */
buyukesmeli 0:3a2f06aeceaf 2605 res = FR_DENIED;
buyukesmeli 0:3a2f06aeceaf 2606 }
buyukesmeli 0:3a2f06aeceaf 2607 }
buyukesmeli 0:3a2f06aeceaf 2608 }
buyukesmeli 0:3a2f06aeceaf 2609 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2610 if (mode & FA_CREATE_ALWAYS) /* Set file change flag if created or overwritten */
buyukesmeli 0:3a2f06aeceaf 2611 mode |= FA__WRITTEN;
buyukesmeli 0:3a2f06aeceaf 2612 fp->dir_sect = dj.fs->winsect; /* Pointer to the directory entry */
buyukesmeli 0:3a2f06aeceaf 2613 fp->dir_ptr = dir;
buyukesmeli 0:3a2f06aeceaf 2614 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 2615 fp->lockid = inc_lock(&dj, (mode & ~FA_READ) ? 1 : 0);
buyukesmeli 0:3a2f06aeceaf 2616 if (!fp->lockid) res = FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 2617 #endif
buyukesmeli 0:3a2f06aeceaf 2618 }
buyukesmeli 0:3a2f06aeceaf 2619
buyukesmeli 0:3a2f06aeceaf 2620 #else /* R/O configuration */
buyukesmeli 0:3a2f06aeceaf 2621 if (res == FR_OK) { /* Follow succeeded */
buyukesmeli 0:3a2f06aeceaf 2622 dir = dj.dir;
buyukesmeli 0:3a2f06aeceaf 2623 if (!dir) { /* Current directory itself */
buyukesmeli 0:3a2f06aeceaf 2624 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 2625 } else {
buyukesmeli 0:3a2f06aeceaf 2626 if (dir[DIR_Attr] & AM_DIR) /* It is a directory */
buyukesmeli 0:3a2f06aeceaf 2627 res = FR_NO_FILE;
buyukesmeli 0:3a2f06aeceaf 2628 }
buyukesmeli 0:3a2f06aeceaf 2629 }
buyukesmeli 0:3a2f06aeceaf 2630 #endif
buyukesmeli 0:3a2f06aeceaf 2631 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 2632
buyukesmeli 0:3a2f06aeceaf 2633 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2634 fp->flag = mode; /* File access mode */
buyukesmeli 0:3a2f06aeceaf 2635 fp->err = 0; /* Clear error flag */
buyukesmeli 0:3a2f06aeceaf 2636 fp->sclust = ld_clust(dj.fs, dir); /* File start cluster */
buyukesmeli 0:3a2f06aeceaf 2637 fp->fsize = LD_DWORD(dir + DIR_FileSize); /* File size */
buyukesmeli 0:3a2f06aeceaf 2638 fp->fptr = 0; /* File pointer */
buyukesmeli 0:3a2f06aeceaf 2639 fp->dsect = 0;
buyukesmeli 0:3a2f06aeceaf 2640 #if _USE_FASTSEEK
buyukesmeli 0:3a2f06aeceaf 2641 fp->cltbl = 0; /* Normal seek mode */
buyukesmeli 0:3a2f06aeceaf 2642 #endif
buyukesmeli 0:3a2f06aeceaf 2643 fp->fs = dj.fs; /* Validate file object */
buyukesmeli 0:3a2f06aeceaf 2644 fp->id = fp->fs->id;
buyukesmeli 0:3a2f06aeceaf 2645 }
buyukesmeli 0:3a2f06aeceaf 2646 }
buyukesmeli 0:3a2f06aeceaf 2647
buyukesmeli 0:3a2f06aeceaf 2648 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 2649 }
buyukesmeli 0:3a2f06aeceaf 2650
buyukesmeli 0:3a2f06aeceaf 2651
buyukesmeli 0:3a2f06aeceaf 2652
buyukesmeli 0:3a2f06aeceaf 2653
buyukesmeli 0:3a2f06aeceaf 2654 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2655 /* Read File */
buyukesmeli 0:3a2f06aeceaf 2656 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2657
buyukesmeli 0:3a2f06aeceaf 2658 FRESULT f_read (
buyukesmeli 0:3a2f06aeceaf 2659 FIL* fp, /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 2660 void* buff, /* Pointer to data buffer */
buyukesmeli 0:3a2f06aeceaf 2661 UINT btr, /* Number of bytes to read */
buyukesmeli 0:3a2f06aeceaf 2662 UINT* br /* Pointer to number of bytes read */
buyukesmeli 0:3a2f06aeceaf 2663 )
buyukesmeli 0:3a2f06aeceaf 2664 {
buyukesmeli 0:3a2f06aeceaf 2665 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 2666 DWORD clst, sect, remain;
buyukesmeli 0:3a2f06aeceaf 2667 UINT rcnt, cc;
buyukesmeli 0:3a2f06aeceaf 2668 BYTE csect, *rbuff = (BYTE*)buff;
buyukesmeli 0:3a2f06aeceaf 2669
buyukesmeli 0:3a2f06aeceaf 2670
buyukesmeli 0:3a2f06aeceaf 2671 *br = 0; /* Clear read byte counter */
buyukesmeli 0:3a2f06aeceaf 2672
buyukesmeli 0:3a2f06aeceaf 2673 res = validate(fp); /* Check validity */
buyukesmeli 0:3a2f06aeceaf 2674 if (res != FR_OK) LEAVE_FF(fp->fs, res);
buyukesmeli 0:3a2f06aeceaf 2675 if (fp->err) /* Check error */
buyukesmeli 0:3a2f06aeceaf 2676 LEAVE_FF(fp->fs, (FRESULT)fp->err);
buyukesmeli 0:3a2f06aeceaf 2677 if (!(fp->flag & FA_READ)) /* Check access mode */
buyukesmeli 0:3a2f06aeceaf 2678 LEAVE_FF(fp->fs, FR_DENIED);
buyukesmeli 0:3a2f06aeceaf 2679 remain = fp->fsize - fp->fptr;
buyukesmeli 0:3a2f06aeceaf 2680 if (btr > remain) btr = (UINT)remain; /* Truncate btr by remaining bytes */
buyukesmeli 0:3a2f06aeceaf 2681
buyukesmeli 0:3a2f06aeceaf 2682 for ( ; btr; /* Repeat until all data read */
buyukesmeli 0:3a2f06aeceaf 2683 rbuff += rcnt, fp->fptr += rcnt, *br += rcnt, btr -= rcnt) {
buyukesmeli 0:3a2f06aeceaf 2684 if ((fp->fptr % SS(fp->fs)) == 0) { /* On the sector boundary? */
buyukesmeli 0:3a2f06aeceaf 2685 csect = (BYTE)(fp->fptr / SS(fp->fs) & (fp->fs->csize - 1)); /* Sector offset in the cluster */
buyukesmeli 0:3a2f06aeceaf 2686 if (!csect) { /* On the cluster boundary? */
buyukesmeli 0:3a2f06aeceaf 2687 if (fp->fptr == 0) { /* On the top of the file? */
buyukesmeli 0:3a2f06aeceaf 2688 clst = fp->sclust; /* Follow from the origin */
buyukesmeli 0:3a2f06aeceaf 2689 } else { /* Middle or end of the file */
buyukesmeli 0:3a2f06aeceaf 2690 #if _USE_FASTSEEK
buyukesmeli 0:3a2f06aeceaf 2691 if (fp->cltbl)
buyukesmeli 0:3a2f06aeceaf 2692 clst = clmt_clust(fp, fp->fptr); /* Get cluster# from the CLMT */
buyukesmeli 0:3a2f06aeceaf 2693 else
buyukesmeli 0:3a2f06aeceaf 2694 #endif
buyukesmeli 0:3a2f06aeceaf 2695 clst = get_fat(fp->fs, fp->clust); /* Follow cluster chain on the FAT */
buyukesmeli 0:3a2f06aeceaf 2696 }
buyukesmeli 0:3a2f06aeceaf 2697 if (clst < 2) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 2698 if (clst == 0xFFFFFFFF) ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2699 fp->clust = clst; /* Update current cluster */
buyukesmeli 0:3a2f06aeceaf 2700 }
buyukesmeli 0:3a2f06aeceaf 2701 sect = clust2sect(fp->fs, fp->clust); /* Get current sector */
buyukesmeli 0:3a2f06aeceaf 2702 if (!sect) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 2703 sect += csect;
buyukesmeli 0:3a2f06aeceaf 2704 cc = btr / SS(fp->fs); /* When remaining bytes >= sector size, */
buyukesmeli 0:3a2f06aeceaf 2705 if (cc) { /* Read maximum contiguous sectors directly */
buyukesmeli 0:3a2f06aeceaf 2706 if (csect + cc > fp->fs->csize) /* Clip at cluster boundary */
buyukesmeli 0:3a2f06aeceaf 2707 cc = fp->fs->csize - csect;
buyukesmeli 0:3a2f06aeceaf 2708 if (disk_read(fp->fs->drv, rbuff, sect, cc) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 2709 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2710 #if !_FS_READONLY && _FS_MINIMIZE <= 2 /* Replace one of the read sectors with cached data if it contains a dirty sector */
buyukesmeli 0:3a2f06aeceaf 2711 #if _FS_TINY
buyukesmeli 0:3a2f06aeceaf 2712 if (fp->fs->wflag && fp->fs->winsect - sect < cc)
buyukesmeli 0:3a2f06aeceaf 2713 mem_cpy(rbuff + ((fp->fs->winsect - sect) * SS(fp->fs)), fp->fs->win.d8, SS(fp->fs));
buyukesmeli 0:3a2f06aeceaf 2714 #else
buyukesmeli 0:3a2f06aeceaf 2715 if ((fp->flag & FA__DIRTY) && fp->dsect - sect < cc)
buyukesmeli 0:3a2f06aeceaf 2716 mem_cpy(rbuff + ((fp->dsect - sect) * SS(fp->fs)), fp->buf.d8, SS(fp->fs));
buyukesmeli 0:3a2f06aeceaf 2717 #endif
buyukesmeli 0:3a2f06aeceaf 2718 #endif
buyukesmeli 0:3a2f06aeceaf 2719 rcnt = SS(fp->fs) * cc; /* Number of bytes transferred */
buyukesmeli 0:3a2f06aeceaf 2720 continue;
buyukesmeli 0:3a2f06aeceaf 2721 }
buyukesmeli 0:3a2f06aeceaf 2722 #if !_FS_TINY
buyukesmeli 0:3a2f06aeceaf 2723 if (fp->dsect != sect) { /* Load data sector if not in cache */
buyukesmeli 0:3a2f06aeceaf 2724 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 2725 if (fp->flag & FA__DIRTY) { /* Write-back dirty sector cache */
buyukesmeli 0:3a2f06aeceaf 2726 if (disk_write(fp->fs->drv, fp->buf.d8, fp->dsect, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 2727 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2728 fp->flag &= ~FA__DIRTY;
buyukesmeli 0:3a2f06aeceaf 2729 }
buyukesmeli 0:3a2f06aeceaf 2730 #endif
buyukesmeli 0:3a2f06aeceaf 2731 if (disk_read(fp->fs->drv, fp->buf.d8, sect, 1) != RES_OK) /* Fill sector cache */
buyukesmeli 0:3a2f06aeceaf 2732 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2733 }
buyukesmeli 0:3a2f06aeceaf 2734 #endif
buyukesmeli 0:3a2f06aeceaf 2735 fp->dsect = sect;
buyukesmeli 0:3a2f06aeceaf 2736 }
buyukesmeli 0:3a2f06aeceaf 2737 rcnt = SS(fp->fs) - ((UINT)fp->fptr % SS(fp->fs)); /* Get partial sector data from sector buffer */
buyukesmeli 0:3a2f06aeceaf 2738 if (rcnt > btr) rcnt = btr;
buyukesmeli 0:3a2f06aeceaf 2739 #if _FS_TINY
buyukesmeli 0:3a2f06aeceaf 2740 if (move_window(fp->fs, fp->dsect) != FR_OK) /* Move sector window */
buyukesmeli 0:3a2f06aeceaf 2741 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2742 mem_cpy(rbuff, &fp->fs->win.d8[fp->fptr % SS(fp->fs)], rcnt); /* Pick partial sector */
buyukesmeli 0:3a2f06aeceaf 2743 #else
buyukesmeli 0:3a2f06aeceaf 2744 mem_cpy(rbuff, &fp->buf.d8[fp->fptr % SS(fp->fs)], rcnt); /* Pick partial sector */
buyukesmeli 0:3a2f06aeceaf 2745 #endif
buyukesmeli 0:3a2f06aeceaf 2746 }
buyukesmeli 0:3a2f06aeceaf 2747
buyukesmeli 0:3a2f06aeceaf 2748 LEAVE_FF(fp->fs, FR_OK);
buyukesmeli 0:3a2f06aeceaf 2749 }
buyukesmeli 0:3a2f06aeceaf 2750
buyukesmeli 0:3a2f06aeceaf 2751
buyukesmeli 0:3a2f06aeceaf 2752
buyukesmeli 0:3a2f06aeceaf 2753
buyukesmeli 0:3a2f06aeceaf 2754 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 2755 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2756 /* Write File */
buyukesmeli 0:3a2f06aeceaf 2757 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2758
buyukesmeli 0:3a2f06aeceaf 2759 FRESULT f_write (
buyukesmeli 0:3a2f06aeceaf 2760 FIL* fp, /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 2761 const void *buff, /* Pointer to the data to be written */
buyukesmeli 0:3a2f06aeceaf 2762 UINT btw, /* Number of bytes to write */
buyukesmeli 0:3a2f06aeceaf 2763 UINT* bw /* Pointer to number of bytes written */
buyukesmeli 0:3a2f06aeceaf 2764 )
buyukesmeli 0:3a2f06aeceaf 2765 {
buyukesmeli 0:3a2f06aeceaf 2766 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 2767 DWORD clst, sect;
buyukesmeli 0:3a2f06aeceaf 2768 UINT wcnt, cc;
buyukesmeli 0:3a2f06aeceaf 2769 const BYTE *wbuff = (const BYTE*)buff;
buyukesmeli 0:3a2f06aeceaf 2770 BYTE csect;
buyukesmeli 0:3a2f06aeceaf 2771
buyukesmeli 0:3a2f06aeceaf 2772
buyukesmeli 0:3a2f06aeceaf 2773 *bw = 0; /* Clear write byte counter */
buyukesmeli 0:3a2f06aeceaf 2774
buyukesmeli 0:3a2f06aeceaf 2775 res = validate(fp); /* Check validity */
buyukesmeli 0:3a2f06aeceaf 2776 if (res != FR_OK) LEAVE_FF(fp->fs, res);
buyukesmeli 0:3a2f06aeceaf 2777 if (fp->err) /* Check error */
buyukesmeli 0:3a2f06aeceaf 2778 LEAVE_FF(fp->fs, (FRESULT)fp->err);
buyukesmeli 0:3a2f06aeceaf 2779 if (!(fp->flag & FA_WRITE)) /* Check access mode */
buyukesmeli 0:3a2f06aeceaf 2780 LEAVE_FF(fp->fs, FR_DENIED);
buyukesmeli 0:3a2f06aeceaf 2781 if (fp->fptr + btw < fp->fptr) btw = 0; /* File size cannot reach 4GB */
buyukesmeli 0:3a2f06aeceaf 2782
buyukesmeli 0:3a2f06aeceaf 2783 for ( ; btw; /* Repeat until all data written */
buyukesmeli 0:3a2f06aeceaf 2784 wbuff += wcnt, fp->fptr += wcnt, *bw += wcnt, btw -= wcnt) {
buyukesmeli 0:3a2f06aeceaf 2785 if ((fp->fptr % SS(fp->fs)) == 0) { /* On the sector boundary? */
buyukesmeli 0:3a2f06aeceaf 2786 csect = (BYTE)(fp->fptr / SS(fp->fs) & (fp->fs->csize - 1)); /* Sector offset in the cluster */
buyukesmeli 0:3a2f06aeceaf 2787 if (!csect) { /* On the cluster boundary? */
buyukesmeli 0:3a2f06aeceaf 2788 if (fp->fptr == 0) { /* On the top of the file? */
buyukesmeli 0:3a2f06aeceaf 2789 clst = fp->sclust; /* Follow from the origin */
buyukesmeli 0:3a2f06aeceaf 2790 if (clst == 0) /* When no cluster is allocated, */
buyukesmeli 0:3a2f06aeceaf 2791 clst = create_chain(fp->fs, 0); /* Create a new cluster chain */
buyukesmeli 0:3a2f06aeceaf 2792 } else { /* Middle or end of the file */
buyukesmeli 0:3a2f06aeceaf 2793 #if _USE_FASTSEEK
buyukesmeli 0:3a2f06aeceaf 2794 if (fp->cltbl)
buyukesmeli 0:3a2f06aeceaf 2795 clst = clmt_clust(fp, fp->fptr); /* Get cluster# from the CLMT */
buyukesmeli 0:3a2f06aeceaf 2796 else
buyukesmeli 0:3a2f06aeceaf 2797 #endif
buyukesmeli 0:3a2f06aeceaf 2798 clst = create_chain(fp->fs, fp->clust); /* Follow or stretch cluster chain on the FAT */
buyukesmeli 0:3a2f06aeceaf 2799 }
buyukesmeli 0:3a2f06aeceaf 2800 if (clst == 0) break; /* Could not allocate a new cluster (disk full) */
buyukesmeli 0:3a2f06aeceaf 2801 if (clst == 1) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 2802 if (clst == 0xFFFFFFFF) ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2803 fp->clust = clst; /* Update current cluster */
buyukesmeli 0:3a2f06aeceaf 2804 if (fp->sclust == 0) fp->sclust = clst; /* Set start cluster if the first write */
buyukesmeli 0:3a2f06aeceaf 2805 }
buyukesmeli 0:3a2f06aeceaf 2806 #if _FS_TINY
buyukesmeli 0:3a2f06aeceaf 2807 if (fp->fs->winsect == fp->dsect && sync_window(fp->fs)) /* Write-back sector cache */
buyukesmeli 0:3a2f06aeceaf 2808 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2809 #else
buyukesmeli 0:3a2f06aeceaf 2810 if (fp->flag & FA__DIRTY) { /* Write-back sector cache */
buyukesmeli 0:3a2f06aeceaf 2811 if (disk_write(fp->fs->drv, fp->buf.d8, fp->dsect, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 2812 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2813 fp->flag &= ~FA__DIRTY;
buyukesmeli 0:3a2f06aeceaf 2814 }
buyukesmeli 0:3a2f06aeceaf 2815 #endif
buyukesmeli 0:3a2f06aeceaf 2816 sect = clust2sect(fp->fs, fp->clust); /* Get current sector */
buyukesmeli 0:3a2f06aeceaf 2817 if (!sect) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 2818 sect += csect;
buyukesmeli 0:3a2f06aeceaf 2819 cc = btw / SS(fp->fs); /* When remaining bytes >= sector size, */
buyukesmeli 0:3a2f06aeceaf 2820 if (cc) { /* Write maximum contiguous sectors directly */
buyukesmeli 0:3a2f06aeceaf 2821 if (csect + cc > fp->fs->csize) /* Clip at cluster boundary */
buyukesmeli 0:3a2f06aeceaf 2822 cc = fp->fs->csize - csect;
buyukesmeli 0:3a2f06aeceaf 2823 if (disk_write(fp->fs->drv, wbuff, sect, cc) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 2824 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2825 #if _FS_MINIMIZE <= 2
buyukesmeli 0:3a2f06aeceaf 2826 #if _FS_TINY
buyukesmeli 0:3a2f06aeceaf 2827 if (fp->fs->winsect - sect < cc) { /* Refill sector cache if it gets invalidated by the direct write */
buyukesmeli 0:3a2f06aeceaf 2828 mem_cpy(fp->fs->win.d8, wbuff + ((fp->fs->winsect - sect) * SS(fp->fs)), SS(fp->fs));
buyukesmeli 0:3a2f06aeceaf 2829 fp->fs->wflag = 0;
buyukesmeli 0:3a2f06aeceaf 2830 }
buyukesmeli 0:3a2f06aeceaf 2831 #else
buyukesmeli 0:3a2f06aeceaf 2832 if (fp->dsect - sect < cc) { /* Refill sector cache if it gets invalidated by the direct write */
buyukesmeli 0:3a2f06aeceaf 2833 mem_cpy(fp->buf.d8, wbuff + ((fp->dsect - sect) * SS(fp->fs)), SS(fp->fs));
buyukesmeli 0:3a2f06aeceaf 2834 fp->flag &= ~FA__DIRTY;
buyukesmeli 0:3a2f06aeceaf 2835 }
buyukesmeli 0:3a2f06aeceaf 2836 #endif
buyukesmeli 0:3a2f06aeceaf 2837 #endif
buyukesmeli 0:3a2f06aeceaf 2838 wcnt = SS(fp->fs) * cc; /* Number of bytes transferred */
buyukesmeli 0:3a2f06aeceaf 2839 continue;
buyukesmeli 0:3a2f06aeceaf 2840 }
buyukesmeli 0:3a2f06aeceaf 2841 #if _FS_TINY
buyukesmeli 0:3a2f06aeceaf 2842 if (fp->fptr >= fp->fsize) { /* Avoid silly cache filling at growing edge */
buyukesmeli 0:3a2f06aeceaf 2843 if (sync_window(fp->fs)) ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2844 fp->fs->winsect = sect;
buyukesmeli 0:3a2f06aeceaf 2845 }
buyukesmeli 0:3a2f06aeceaf 2846 #else
buyukesmeli 0:3a2f06aeceaf 2847 if (fp->dsect != sect) { /* Fill sector cache with file data */
buyukesmeli 0:3a2f06aeceaf 2848 if (fp->fptr < fp->fsize &&
buyukesmeli 0:3a2f06aeceaf 2849 disk_read(fp->fs->drv, fp->buf.d8, sect, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 2850 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2851 }
buyukesmeli 0:3a2f06aeceaf 2852 #endif
buyukesmeli 0:3a2f06aeceaf 2853 fp->dsect = sect;
buyukesmeli 0:3a2f06aeceaf 2854 }
buyukesmeli 0:3a2f06aeceaf 2855 wcnt = SS(fp->fs) - ((UINT)fp->fptr % SS(fp->fs));/* Put partial sector into file I/O buffer */
buyukesmeli 0:3a2f06aeceaf 2856 if (wcnt > btw) wcnt = btw;
buyukesmeli 0:3a2f06aeceaf 2857 #if _FS_TINY
buyukesmeli 0:3a2f06aeceaf 2858 if (move_window(fp->fs, fp->dsect) != FR_OK) /* Move sector window */
buyukesmeli 0:3a2f06aeceaf 2859 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2860 mem_cpy(&fp->fs->win.d8[fp->fptr % SS(fp->fs)], wbuff, wcnt); /* Fit partial sector */
buyukesmeli 0:3a2f06aeceaf 2861 fp->fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 2862 #else
buyukesmeli 0:3a2f06aeceaf 2863 mem_cpy(&fp->buf.d8[fp->fptr % SS(fp->fs)], wbuff, wcnt); /* Fit partial sector */
buyukesmeli 0:3a2f06aeceaf 2864 fp->flag |= FA__DIRTY;
buyukesmeli 0:3a2f06aeceaf 2865 #endif
buyukesmeli 0:3a2f06aeceaf 2866 }
buyukesmeli 0:3a2f06aeceaf 2867
buyukesmeli 0:3a2f06aeceaf 2868 if (fp->fptr > fp->fsize) fp->fsize = fp->fptr; /* Update file size if needed */
buyukesmeli 0:3a2f06aeceaf 2869 fp->flag |= FA__WRITTEN; /* Set file change flag */
buyukesmeli 0:3a2f06aeceaf 2870
buyukesmeli 0:3a2f06aeceaf 2871 LEAVE_FF(fp->fs, FR_OK);
buyukesmeli 0:3a2f06aeceaf 2872 }
buyukesmeli 0:3a2f06aeceaf 2873
buyukesmeli 0:3a2f06aeceaf 2874
buyukesmeli 0:3a2f06aeceaf 2875
buyukesmeli 0:3a2f06aeceaf 2876
buyukesmeli 0:3a2f06aeceaf 2877 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2878 /* Synchronize the File */
buyukesmeli 0:3a2f06aeceaf 2879 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2880
buyukesmeli 0:3a2f06aeceaf 2881 FRESULT f_sync (
buyukesmeli 0:3a2f06aeceaf 2882 FIL* fp /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 2883 )
buyukesmeli 0:3a2f06aeceaf 2884 {
buyukesmeli 0:3a2f06aeceaf 2885 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 2886 DWORD tm;
buyukesmeli 0:3a2f06aeceaf 2887 BYTE *dir;
buyukesmeli 0:3a2f06aeceaf 2888
buyukesmeli 0:3a2f06aeceaf 2889
buyukesmeli 0:3a2f06aeceaf 2890 res = validate(fp); /* Check validity of the object */
buyukesmeli 0:3a2f06aeceaf 2891 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2892 if (fp->flag & FA__WRITTEN) { /* Has the file been written? */
buyukesmeli 0:3a2f06aeceaf 2893 /* Write-back dirty buffer */
buyukesmeli 0:3a2f06aeceaf 2894 #if !_FS_TINY
buyukesmeli 0:3a2f06aeceaf 2895 if (fp->flag & FA__DIRTY) {
buyukesmeli 0:3a2f06aeceaf 2896 if (disk_write(fp->fs->drv, fp->buf.d8, fp->dsect, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 2897 LEAVE_FF(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 2898 fp->flag &= ~FA__DIRTY;
buyukesmeli 0:3a2f06aeceaf 2899 }
buyukesmeli 0:3a2f06aeceaf 2900 #endif
buyukesmeli 0:3a2f06aeceaf 2901 /* Update the directory entry */
buyukesmeli 0:3a2f06aeceaf 2902 res = move_window(fp->fs, fp->dir_sect);
buyukesmeli 0:3a2f06aeceaf 2903 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2904 dir = fp->dir_ptr;
buyukesmeli 0:3a2f06aeceaf 2905 dir[DIR_Attr] |= AM_ARC; /* Set archive bit */
buyukesmeli 0:3a2f06aeceaf 2906 ST_DWORD(dir + DIR_FileSize, fp->fsize); /* Update file size */
buyukesmeli 0:3a2f06aeceaf 2907 st_clust(dir, fp->sclust); /* Update start cluster */
buyukesmeli 0:3a2f06aeceaf 2908 tm = GET_FATTIME(); /* Update updated time */
buyukesmeli 0:3a2f06aeceaf 2909 ST_DWORD(dir + DIR_WrtTime, tm);
buyukesmeli 0:3a2f06aeceaf 2910 ST_WORD(dir + DIR_LstAccDate, 0);
buyukesmeli 0:3a2f06aeceaf 2911 fp->flag &= ~FA__WRITTEN;
buyukesmeli 0:3a2f06aeceaf 2912 fp->fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 2913 res = sync_fs(fp->fs);
buyukesmeli 0:3a2f06aeceaf 2914 }
buyukesmeli 0:3a2f06aeceaf 2915 }
buyukesmeli 0:3a2f06aeceaf 2916 }
buyukesmeli 0:3a2f06aeceaf 2917
buyukesmeli 0:3a2f06aeceaf 2918 LEAVE_FF(fp->fs, res);
buyukesmeli 0:3a2f06aeceaf 2919 }
buyukesmeli 0:3a2f06aeceaf 2920
buyukesmeli 0:3a2f06aeceaf 2921 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 2922
buyukesmeli 0:3a2f06aeceaf 2923
buyukesmeli 0:3a2f06aeceaf 2924
buyukesmeli 0:3a2f06aeceaf 2925
buyukesmeli 0:3a2f06aeceaf 2926 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2927 /* Close File */
buyukesmeli 0:3a2f06aeceaf 2928 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2929
buyukesmeli 0:3a2f06aeceaf 2930 FRESULT f_close (
buyukesmeli 0:3a2f06aeceaf 2931 FIL *fp /* Pointer to the file object to be closed */
buyukesmeli 0:3a2f06aeceaf 2932 )
buyukesmeli 0:3a2f06aeceaf 2933 {
buyukesmeli 0:3a2f06aeceaf 2934 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 2935
buyukesmeli 0:3a2f06aeceaf 2936
buyukesmeli 0:3a2f06aeceaf 2937 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 2938 res = f_sync(fp); /* Flush cached data */
buyukesmeli 0:3a2f06aeceaf 2939 if (res == FR_OK)
buyukesmeli 0:3a2f06aeceaf 2940 #endif
buyukesmeli 0:3a2f06aeceaf 2941 {
buyukesmeli 0:3a2f06aeceaf 2942 res = validate(fp); /* Lock volume */
buyukesmeli 0:3a2f06aeceaf 2943 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2944 #if _FS_REENTRANT
buyukesmeli 0:3a2f06aeceaf 2945 FATFS *fs = fp->fs;
buyukesmeli 0:3a2f06aeceaf 2946 #endif
buyukesmeli 0:3a2f06aeceaf 2947 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 2948 res = dec_lock(fp->lockid); /* Decrement file open counter */
buyukesmeli 0:3a2f06aeceaf 2949 if (res == FR_OK)
buyukesmeli 0:3a2f06aeceaf 2950 #endif
buyukesmeli 0:3a2f06aeceaf 2951 fp->fs = 0; /* Invalidate file object */
buyukesmeli 0:3a2f06aeceaf 2952 #if _FS_REENTRANT
buyukesmeli 0:3a2f06aeceaf 2953 unlock_fs(fs, FR_OK); /* Unlock volume */
buyukesmeli 0:3a2f06aeceaf 2954 #endif
buyukesmeli 0:3a2f06aeceaf 2955 }
buyukesmeli 0:3a2f06aeceaf 2956 }
buyukesmeli 0:3a2f06aeceaf 2957 return res;
buyukesmeli 0:3a2f06aeceaf 2958 }
buyukesmeli 0:3a2f06aeceaf 2959
buyukesmeli 0:3a2f06aeceaf 2960
buyukesmeli 0:3a2f06aeceaf 2961
buyukesmeli 0:3a2f06aeceaf 2962
buyukesmeli 0:3a2f06aeceaf 2963 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2964 /* Change Current Directory or Current Drive, Get Current Directory */
buyukesmeli 0:3a2f06aeceaf 2965 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 2966
buyukesmeli 0:3a2f06aeceaf 2967 #if _FS_RPATH >= 1
buyukesmeli 0:3a2f06aeceaf 2968 #if _VOLUMES >= 2
buyukesmeli 0:3a2f06aeceaf 2969 FRESULT f_chdrive (
buyukesmeli 0:3a2f06aeceaf 2970 const TCHAR* path /* Drive number */
buyukesmeli 0:3a2f06aeceaf 2971 )
buyukesmeli 0:3a2f06aeceaf 2972 {
buyukesmeli 0:3a2f06aeceaf 2973 int vol;
buyukesmeli 0:3a2f06aeceaf 2974
buyukesmeli 0:3a2f06aeceaf 2975
buyukesmeli 0:3a2f06aeceaf 2976 vol = get_ldnumber(&path);
buyukesmeli 0:3a2f06aeceaf 2977 if (vol < 0) return FR_INVALID_DRIVE;
buyukesmeli 0:3a2f06aeceaf 2978
buyukesmeli 0:3a2f06aeceaf 2979 CurrVol = (BYTE)vol;
buyukesmeli 0:3a2f06aeceaf 2980
buyukesmeli 0:3a2f06aeceaf 2981 return FR_OK;
buyukesmeli 0:3a2f06aeceaf 2982 }
buyukesmeli 0:3a2f06aeceaf 2983 #endif
buyukesmeli 0:3a2f06aeceaf 2984
buyukesmeli 0:3a2f06aeceaf 2985
buyukesmeli 0:3a2f06aeceaf 2986 FRESULT f_chdir (
buyukesmeli 0:3a2f06aeceaf 2987 const TCHAR* path /* Pointer to the directory path */
buyukesmeli 0:3a2f06aeceaf 2988 )
buyukesmeli 0:3a2f06aeceaf 2989 {
buyukesmeli 0:3a2f06aeceaf 2990 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 2991 DIR dj;
buyukesmeli 0:3a2f06aeceaf 2992 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 2993
buyukesmeli 0:3a2f06aeceaf 2994
buyukesmeli 0:3a2f06aeceaf 2995 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 2996 res = find_volume(&dj.fs, &path, 0);
buyukesmeli 0:3a2f06aeceaf 2997 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 2998 INIT_BUF(dj);
buyukesmeli 0:3a2f06aeceaf 2999 res = follow_path(&dj, path); /* Follow the path */
buyukesmeli 0:3a2f06aeceaf 3000 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3001 if (res == FR_OK) { /* Follow completed */
buyukesmeli 0:3a2f06aeceaf 3002 if (!dj.dir) {
buyukesmeli 0:3a2f06aeceaf 3003 dj.fs->cdir = dj.sclust; /* Start directory itself */
buyukesmeli 0:3a2f06aeceaf 3004 } else {
buyukesmeli 0:3a2f06aeceaf 3005 if (dj.dir[DIR_Attr] & AM_DIR) /* Reached to the directory */
buyukesmeli 0:3a2f06aeceaf 3006 dj.fs->cdir = ld_clust(dj.fs, dj.dir);
buyukesmeli 0:3a2f06aeceaf 3007 else
buyukesmeli 0:3a2f06aeceaf 3008 res = FR_NO_PATH; /* Reached but a file */
buyukesmeli 0:3a2f06aeceaf 3009 }
buyukesmeli 0:3a2f06aeceaf 3010 }
buyukesmeli 0:3a2f06aeceaf 3011 if (res == FR_NO_FILE) res = FR_NO_PATH;
buyukesmeli 0:3a2f06aeceaf 3012 }
buyukesmeli 0:3a2f06aeceaf 3013
buyukesmeli 0:3a2f06aeceaf 3014 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3015 }
buyukesmeli 0:3a2f06aeceaf 3016
buyukesmeli 0:3a2f06aeceaf 3017
buyukesmeli 0:3a2f06aeceaf 3018 #if _FS_RPATH >= 2
buyukesmeli 0:3a2f06aeceaf 3019 FRESULT f_getcwd (
buyukesmeli 0:3a2f06aeceaf 3020 TCHAR* buff, /* Pointer to the directory path */
buyukesmeli 0:3a2f06aeceaf 3021 UINT len /* Size of path */
buyukesmeli 0:3a2f06aeceaf 3022 )
buyukesmeli 0:3a2f06aeceaf 3023 {
buyukesmeli 0:3a2f06aeceaf 3024 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3025 DIR dj;
buyukesmeli 0:3a2f06aeceaf 3026 UINT i, n;
buyukesmeli 0:3a2f06aeceaf 3027 DWORD ccl;
buyukesmeli 0:3a2f06aeceaf 3028 TCHAR *tp;
buyukesmeli 0:3a2f06aeceaf 3029 FILINFO fno;
buyukesmeli 0:3a2f06aeceaf 3030 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3031
buyukesmeli 0:3a2f06aeceaf 3032
buyukesmeli 0:3a2f06aeceaf 3033 *buff = 0;
buyukesmeli 0:3a2f06aeceaf 3034 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3035 res = find_volume(&dj.fs, (const TCHAR**)&buff, 0); /* Get current volume */
buyukesmeli 0:3a2f06aeceaf 3036 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3037 INIT_BUF(dj);
buyukesmeli 0:3a2f06aeceaf 3038 i = len; /* Bottom of buffer (directory stack base) */
buyukesmeli 0:3a2f06aeceaf 3039 dj.sclust = dj.fs->cdir; /* Start to follow upper directory from current directory */
buyukesmeli 0:3a2f06aeceaf 3040 while ((ccl = dj.sclust) != 0) { /* Repeat while current directory is a sub-directory */
buyukesmeli 0:3a2f06aeceaf 3041 res = dir_sdi(&dj, 1); /* Get parent directory */
buyukesmeli 0:3a2f06aeceaf 3042 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 3043 res = dir_read(&dj, 0);
buyukesmeli 0:3a2f06aeceaf 3044 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 3045 dj.sclust = ld_clust(dj.fs, dj.dir); /* Goto parent directory */
buyukesmeli 0:3a2f06aeceaf 3046 res = dir_sdi(&dj, 0);
buyukesmeli 0:3a2f06aeceaf 3047 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 3048 do { /* Find the entry links to the child directory */
buyukesmeli 0:3a2f06aeceaf 3049 res = dir_read(&dj, 0);
buyukesmeli 0:3a2f06aeceaf 3050 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 3051 if (ccl == ld_clust(dj.fs, dj.dir)) break; /* Found the entry */
buyukesmeli 0:3a2f06aeceaf 3052 res = dir_next(&dj, 0);
buyukesmeli 0:3a2f06aeceaf 3053 } while (res == FR_OK);
buyukesmeli 0:3a2f06aeceaf 3054 if (res == FR_NO_FILE) res = FR_INT_ERR;/* It cannot be 'not found'. */
buyukesmeli 0:3a2f06aeceaf 3055 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 3056 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 3057 fno.lfname = buff;
buyukesmeli 0:3a2f06aeceaf 3058 fno.lfsize = i;
buyukesmeli 0:3a2f06aeceaf 3059 #endif
buyukesmeli 0:3a2f06aeceaf 3060 get_fileinfo(&dj, &fno); /* Get the directory name and push it to the buffer */
buyukesmeli 0:3a2f06aeceaf 3061 tp = fno.fname;
buyukesmeli 0:3a2f06aeceaf 3062 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 3063 if (*buff) tp = buff;
buyukesmeli 0:3a2f06aeceaf 3064 #endif
buyukesmeli 0:3a2f06aeceaf 3065 for (n = 0; tp[n]; n++) ;
buyukesmeli 0:3a2f06aeceaf 3066 if (i < n + 3) {
buyukesmeli 0:3a2f06aeceaf 3067 res = FR_NOT_ENOUGH_CORE; break;
buyukesmeli 0:3a2f06aeceaf 3068 }
buyukesmeli 0:3a2f06aeceaf 3069 while (n) buff[--i] = tp[--n];
buyukesmeli 0:3a2f06aeceaf 3070 buff[--i] = '/';
buyukesmeli 0:3a2f06aeceaf 3071 }
buyukesmeli 0:3a2f06aeceaf 3072 tp = buff;
buyukesmeli 0:3a2f06aeceaf 3073 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3074 #if _VOLUMES >= 2
buyukesmeli 0:3a2f06aeceaf 3075 *tp++ = '0' + CurrVol; /* Put drive number */
buyukesmeli 0:3a2f06aeceaf 3076 *tp++ = ':';
buyukesmeli 0:3a2f06aeceaf 3077 #endif
buyukesmeli 0:3a2f06aeceaf 3078 if (i == len) { /* Root-directory */
buyukesmeli 0:3a2f06aeceaf 3079 *tp++ = '/';
buyukesmeli 0:3a2f06aeceaf 3080 } else { /* Sub-directroy */
buyukesmeli 0:3a2f06aeceaf 3081 do /* Add stacked path str */
buyukesmeli 0:3a2f06aeceaf 3082 *tp++ = buff[i++];
buyukesmeli 0:3a2f06aeceaf 3083 while (i < len);
buyukesmeli 0:3a2f06aeceaf 3084 }
buyukesmeli 0:3a2f06aeceaf 3085 }
buyukesmeli 0:3a2f06aeceaf 3086 *tp = 0;
buyukesmeli 0:3a2f06aeceaf 3087 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3088 }
buyukesmeli 0:3a2f06aeceaf 3089
buyukesmeli 0:3a2f06aeceaf 3090 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3091 }
buyukesmeli 0:3a2f06aeceaf 3092 #endif /* _FS_RPATH >= 2 */
buyukesmeli 0:3a2f06aeceaf 3093 #endif /* _FS_RPATH >= 1 */
buyukesmeli 0:3a2f06aeceaf 3094
buyukesmeli 0:3a2f06aeceaf 3095
buyukesmeli 0:3a2f06aeceaf 3096
buyukesmeli 0:3a2f06aeceaf 3097 #if _FS_MINIMIZE <= 2
buyukesmeli 0:3a2f06aeceaf 3098 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3099 /* Seek File R/W Pointer */
buyukesmeli 0:3a2f06aeceaf 3100 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3101
buyukesmeli 0:3a2f06aeceaf 3102 FRESULT f_lseek (
buyukesmeli 0:3a2f06aeceaf 3103 FIL* fp, /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 3104 DWORD ofs /* File pointer from top of file */
buyukesmeli 0:3a2f06aeceaf 3105 )
buyukesmeli 0:3a2f06aeceaf 3106 {
buyukesmeli 0:3a2f06aeceaf 3107 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3108 DWORD clst, bcs, nsect, ifptr;
buyukesmeli 0:3a2f06aeceaf 3109 #if _USE_FASTSEEK
buyukesmeli 0:3a2f06aeceaf 3110 DWORD cl, pcl, ncl, tcl, dsc, tlen, ulen, *tbl;
buyukesmeli 0:3a2f06aeceaf 3111 #endif
buyukesmeli 0:3a2f06aeceaf 3112
buyukesmeli 0:3a2f06aeceaf 3113
buyukesmeli 0:3a2f06aeceaf 3114 res = validate(fp); /* Check validity of the object */
buyukesmeli 0:3a2f06aeceaf 3115 if (res != FR_OK) LEAVE_FF(fp->fs, res);
buyukesmeli 0:3a2f06aeceaf 3116 if (fp->err) /* Check error */
buyukesmeli 0:3a2f06aeceaf 3117 LEAVE_FF(fp->fs, (FRESULT)fp->err);
buyukesmeli 0:3a2f06aeceaf 3118
buyukesmeli 0:3a2f06aeceaf 3119 #if _USE_FASTSEEK
buyukesmeli 0:3a2f06aeceaf 3120 if (fp->cltbl) { /* Fast seek */
buyukesmeli 0:3a2f06aeceaf 3121 if (ofs == CREATE_LINKMAP) { /* Create CLMT */
buyukesmeli 0:3a2f06aeceaf 3122 tbl = fp->cltbl;
buyukesmeli 0:3a2f06aeceaf 3123 tlen = *tbl++; ulen = 2; /* Given table size and required table size */
buyukesmeli 0:3a2f06aeceaf 3124 cl = fp->sclust; /* Top of the chain */
buyukesmeli 0:3a2f06aeceaf 3125 if (cl) {
buyukesmeli 0:3a2f06aeceaf 3126 do {
buyukesmeli 0:3a2f06aeceaf 3127 /* Get a fragment */
buyukesmeli 0:3a2f06aeceaf 3128 tcl = cl; ncl = 0; ulen += 2; /* Top, length and used items */
buyukesmeli 0:3a2f06aeceaf 3129 do {
buyukesmeli 0:3a2f06aeceaf 3130 pcl = cl; ncl++;
buyukesmeli 0:3a2f06aeceaf 3131 cl = get_fat(fp->fs, cl);
buyukesmeli 0:3a2f06aeceaf 3132 if (cl <= 1) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 3133 if (cl == 0xFFFFFFFF) ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 3134 } while (cl == pcl + 1);
buyukesmeli 0:3a2f06aeceaf 3135 if (ulen <= tlen) { /* Store the length and top of the fragment */
buyukesmeli 0:3a2f06aeceaf 3136 *tbl++ = ncl; *tbl++ = tcl;
buyukesmeli 0:3a2f06aeceaf 3137 }
buyukesmeli 0:3a2f06aeceaf 3138 } while (cl < fp->fs->n_fatent); /* Repeat until end of chain */
buyukesmeli 0:3a2f06aeceaf 3139 }
buyukesmeli 0:3a2f06aeceaf 3140 *fp->cltbl = ulen; /* Number of items used */
buyukesmeli 0:3a2f06aeceaf 3141 if (ulen <= tlen)
buyukesmeli 0:3a2f06aeceaf 3142 *tbl = 0; /* Terminate table */
buyukesmeli 0:3a2f06aeceaf 3143 else
buyukesmeli 0:3a2f06aeceaf 3144 res = FR_NOT_ENOUGH_CORE; /* Given table size is smaller than required */
buyukesmeli 0:3a2f06aeceaf 3145
buyukesmeli 0:3a2f06aeceaf 3146 } else { /* Fast seek */
buyukesmeli 0:3a2f06aeceaf 3147 if (ofs > fp->fsize) /* Clip offset at the file size */
buyukesmeli 0:3a2f06aeceaf 3148 ofs = fp->fsize;
buyukesmeli 0:3a2f06aeceaf 3149 fp->fptr = ofs; /* Set file pointer */
buyukesmeli 0:3a2f06aeceaf 3150 if (ofs) {
buyukesmeli 0:3a2f06aeceaf 3151 fp->clust = clmt_clust(fp, ofs - 1);
buyukesmeli 0:3a2f06aeceaf 3152 dsc = clust2sect(fp->fs, fp->clust);
buyukesmeli 0:3a2f06aeceaf 3153 if (!dsc) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 3154 dsc += (ofs - 1) / SS(fp->fs) & (fp->fs->csize - 1);
buyukesmeli 0:3a2f06aeceaf 3155 if (fp->fptr % SS(fp->fs) && dsc != fp->dsect) { /* Refill sector cache if needed */
buyukesmeli 0:3a2f06aeceaf 3156 #if !_FS_TINY
buyukesmeli 0:3a2f06aeceaf 3157 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 3158 if (fp->flag & FA__DIRTY) { /* Write-back dirty sector cache */
buyukesmeli 0:3a2f06aeceaf 3159 if (disk_write(fp->fs->drv, fp->buf.d8, fp->dsect, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 3160 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 3161 fp->flag &= ~FA__DIRTY;
buyukesmeli 0:3a2f06aeceaf 3162 }
buyukesmeli 0:3a2f06aeceaf 3163 #endif
buyukesmeli 0:3a2f06aeceaf 3164 if (disk_read(fp->fs->drv, fp->buf.d8, dsc, 1) != RES_OK) /* Load current sector */
buyukesmeli 0:3a2f06aeceaf 3165 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 3166 #endif
buyukesmeli 0:3a2f06aeceaf 3167 fp->dsect = dsc;
buyukesmeli 0:3a2f06aeceaf 3168 }
buyukesmeli 0:3a2f06aeceaf 3169 }
buyukesmeli 0:3a2f06aeceaf 3170 }
buyukesmeli 0:3a2f06aeceaf 3171 } else
buyukesmeli 0:3a2f06aeceaf 3172 #endif
buyukesmeli 0:3a2f06aeceaf 3173
buyukesmeli 0:3a2f06aeceaf 3174 /* Normal Seek */
buyukesmeli 0:3a2f06aeceaf 3175 {
buyukesmeli 0:3a2f06aeceaf 3176 if (ofs > fp->fsize /* In read-only mode, clip offset with the file size */
buyukesmeli 0:3a2f06aeceaf 3177 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 3178 && !(fp->flag & FA_WRITE)
buyukesmeli 0:3a2f06aeceaf 3179 #endif
buyukesmeli 0:3a2f06aeceaf 3180 ) ofs = fp->fsize;
buyukesmeli 0:3a2f06aeceaf 3181
buyukesmeli 0:3a2f06aeceaf 3182 ifptr = fp->fptr;
buyukesmeli 0:3a2f06aeceaf 3183 fp->fptr = nsect = 0;
buyukesmeli 0:3a2f06aeceaf 3184 if (ofs) {
buyukesmeli 0:3a2f06aeceaf 3185 bcs = (DWORD)fp->fs->csize * SS(fp->fs); /* Cluster size (byte) */
buyukesmeli 0:3a2f06aeceaf 3186 if (ifptr > 0 &&
buyukesmeli 0:3a2f06aeceaf 3187 (ofs - 1) / bcs >= (ifptr - 1) / bcs) { /* When seek to same or following cluster, */
buyukesmeli 0:3a2f06aeceaf 3188 fp->fptr = (ifptr - 1) & ~(bcs - 1); /* start from the current cluster */
buyukesmeli 0:3a2f06aeceaf 3189 ofs -= fp->fptr;
buyukesmeli 0:3a2f06aeceaf 3190 clst = fp->clust;
buyukesmeli 0:3a2f06aeceaf 3191 } else { /* When seek to back cluster, */
buyukesmeli 0:3a2f06aeceaf 3192 clst = fp->sclust; /* start from the first cluster */
buyukesmeli 0:3a2f06aeceaf 3193 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 3194 if (clst == 0) { /* If no cluster chain, create a new chain */
buyukesmeli 0:3a2f06aeceaf 3195 clst = create_chain(fp->fs, 0);
buyukesmeli 0:3a2f06aeceaf 3196 if (clst == 1) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 3197 if (clst == 0xFFFFFFFF) ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 3198 fp->sclust = clst;
buyukesmeli 0:3a2f06aeceaf 3199 }
buyukesmeli 0:3a2f06aeceaf 3200 #endif
buyukesmeli 0:3a2f06aeceaf 3201 fp->clust = clst;
buyukesmeli 0:3a2f06aeceaf 3202 }
buyukesmeli 0:3a2f06aeceaf 3203 if (clst != 0) {
buyukesmeli 0:3a2f06aeceaf 3204 while (ofs > bcs) { /* Cluster following loop */
buyukesmeli 0:3a2f06aeceaf 3205 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 3206 if (fp->flag & FA_WRITE) { /* Check if in write mode or not */
buyukesmeli 0:3a2f06aeceaf 3207 clst = create_chain(fp->fs, clst); /* Force stretch if in write mode */
buyukesmeli 0:3a2f06aeceaf 3208 if (clst == 0) { /* When disk gets full, clip file size */
buyukesmeli 0:3a2f06aeceaf 3209 ofs = bcs; break;
buyukesmeli 0:3a2f06aeceaf 3210 }
buyukesmeli 0:3a2f06aeceaf 3211 } else
buyukesmeli 0:3a2f06aeceaf 3212 #endif
buyukesmeli 0:3a2f06aeceaf 3213 clst = get_fat(fp->fs, clst); /* Follow cluster chain if not in write mode */
buyukesmeli 0:3a2f06aeceaf 3214 if (clst == 0xFFFFFFFF) ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 3215 if (clst <= 1 || clst >= fp->fs->n_fatent) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 3216 fp->clust = clst;
buyukesmeli 0:3a2f06aeceaf 3217 fp->fptr += bcs;
buyukesmeli 0:3a2f06aeceaf 3218 ofs -= bcs;
buyukesmeli 0:3a2f06aeceaf 3219 }
buyukesmeli 0:3a2f06aeceaf 3220 fp->fptr += ofs;
buyukesmeli 0:3a2f06aeceaf 3221 if (ofs % SS(fp->fs)) {
buyukesmeli 0:3a2f06aeceaf 3222 nsect = clust2sect(fp->fs, clst); /* Current sector */
buyukesmeli 0:3a2f06aeceaf 3223 if (!nsect) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 3224 nsect += ofs / SS(fp->fs);
buyukesmeli 0:3a2f06aeceaf 3225 }
buyukesmeli 0:3a2f06aeceaf 3226 }
buyukesmeli 0:3a2f06aeceaf 3227 }
buyukesmeli 0:3a2f06aeceaf 3228 if (fp->fptr % SS(fp->fs) && nsect != fp->dsect) { /* Fill sector cache if needed */
buyukesmeli 0:3a2f06aeceaf 3229 #if !_FS_TINY
buyukesmeli 0:3a2f06aeceaf 3230 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 3231 if (fp->flag & FA__DIRTY) { /* Write-back dirty sector cache */
buyukesmeli 0:3a2f06aeceaf 3232 if (disk_write(fp->fs->drv, fp->buf.d8, fp->dsect, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 3233 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 3234 fp->flag &= ~FA__DIRTY;
buyukesmeli 0:3a2f06aeceaf 3235 }
buyukesmeli 0:3a2f06aeceaf 3236 #endif
buyukesmeli 0:3a2f06aeceaf 3237 if (disk_read(fp->fs->drv, fp->buf.d8, nsect, 1) != RES_OK) /* Fill sector cache */
buyukesmeli 0:3a2f06aeceaf 3238 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 3239 #endif
buyukesmeli 0:3a2f06aeceaf 3240 fp->dsect = nsect;
buyukesmeli 0:3a2f06aeceaf 3241 }
buyukesmeli 0:3a2f06aeceaf 3242 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 3243 if (fp->fptr > fp->fsize) { /* Set file change flag if the file size is extended */
buyukesmeli 0:3a2f06aeceaf 3244 fp->fsize = fp->fptr;
buyukesmeli 0:3a2f06aeceaf 3245 fp->flag |= FA__WRITTEN;
buyukesmeli 0:3a2f06aeceaf 3246 }
buyukesmeli 0:3a2f06aeceaf 3247 #endif
buyukesmeli 0:3a2f06aeceaf 3248 }
buyukesmeli 0:3a2f06aeceaf 3249
buyukesmeli 0:3a2f06aeceaf 3250 LEAVE_FF(fp->fs, res);
buyukesmeli 0:3a2f06aeceaf 3251 }
buyukesmeli 0:3a2f06aeceaf 3252
buyukesmeli 0:3a2f06aeceaf 3253
buyukesmeli 0:3a2f06aeceaf 3254
buyukesmeli 0:3a2f06aeceaf 3255 #if _FS_MINIMIZE <= 1
buyukesmeli 0:3a2f06aeceaf 3256 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3257 /* Create a Directory Object */
buyukesmeli 0:3a2f06aeceaf 3258 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3259
buyukesmeli 0:3a2f06aeceaf 3260 FRESULT f_opendir (
buyukesmeli 0:3a2f06aeceaf 3261 DIR_* dp, /* Pointer to directory object to create */
buyukesmeli 0:3a2f06aeceaf 3262 const TCHAR* path /* Pointer to the directory path */
buyukesmeli 0:3a2f06aeceaf 3263 )
buyukesmeli 0:3a2f06aeceaf 3264 {
buyukesmeli 0:3a2f06aeceaf 3265 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3266 FATFS* fs;
buyukesmeli 0:3a2f06aeceaf 3267 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3268
buyukesmeli 0:3a2f06aeceaf 3269
buyukesmeli 0:3a2f06aeceaf 3270 if (!dp) return FR_INVALID_OBJECT;
buyukesmeli 0:3a2f06aeceaf 3271
buyukesmeli 0:3a2f06aeceaf 3272 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3273 res = find_volume(&fs, &path, 0);
buyukesmeli 0:3a2f06aeceaf 3274 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3275 dp->fs = fs;
buyukesmeli 0:3a2f06aeceaf 3276 INIT_BUF(*dp);
buyukesmeli 0:3a2f06aeceaf 3277 res = follow_path(dp, path); /* Follow the path to the directory */
buyukesmeli 0:3a2f06aeceaf 3278 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3279 if (res == FR_OK) { /* Follow completed */
buyukesmeli 0:3a2f06aeceaf 3280 if (dp->dir) { /* It is not the origin directory itself */
buyukesmeli 0:3a2f06aeceaf 3281 if (dp->dir[DIR_Attr] & AM_DIR) /* The object is a sub directory */
buyukesmeli 0:3a2f06aeceaf 3282 dp->sclust = ld_clust(fs, dp->dir);
buyukesmeli 0:3a2f06aeceaf 3283 else /* The object is a file */
buyukesmeli 0:3a2f06aeceaf 3284 res = FR_NO_PATH;
buyukesmeli 0:3a2f06aeceaf 3285 }
buyukesmeli 0:3a2f06aeceaf 3286 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3287 dp->id = fs->id;
buyukesmeli 0:3a2f06aeceaf 3288 res = dir_sdi(dp, 0); /* Rewind directory */
buyukesmeli 0:3a2f06aeceaf 3289 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 3290 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3291 if (dp->sclust) {
buyukesmeli 0:3a2f06aeceaf 3292 dp->lockid = inc_lock(dp, 0); /* Lock the sub directory */
buyukesmeli 0:3a2f06aeceaf 3293 if (!dp->lockid)
buyukesmeli 0:3a2f06aeceaf 3294 res = FR_TOO_MANY_OPEN_FILES;
buyukesmeli 0:3a2f06aeceaf 3295 } else {
buyukesmeli 0:3a2f06aeceaf 3296 dp->lockid = 0; /* Root directory need not to be locked */
buyukesmeli 0:3a2f06aeceaf 3297 }
buyukesmeli 0:3a2f06aeceaf 3298 }
buyukesmeli 0:3a2f06aeceaf 3299 #endif
buyukesmeli 0:3a2f06aeceaf 3300 }
buyukesmeli 0:3a2f06aeceaf 3301 }
buyukesmeli 0:3a2f06aeceaf 3302 if (res == FR_NO_FILE) res = FR_NO_PATH;
buyukesmeli 0:3a2f06aeceaf 3303 }
buyukesmeli 0:3a2f06aeceaf 3304 if (res != FR_OK) dp->fs = 0; /* Invalidate the directory object if function faild */
buyukesmeli 0:3a2f06aeceaf 3305
buyukesmeli 0:3a2f06aeceaf 3306 LEAVE_FF(fs, res);
buyukesmeli 0:3a2f06aeceaf 3307 }
buyukesmeli 0:3a2f06aeceaf 3308
buyukesmeli 0:3a2f06aeceaf 3309
buyukesmeli 0:3a2f06aeceaf 3310
buyukesmeli 0:3a2f06aeceaf 3311
buyukesmeli 0:3a2f06aeceaf 3312 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3313 /* Close Directory */
buyukesmeli 0:3a2f06aeceaf 3314 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3315
buyukesmeli 0:3a2f06aeceaf 3316 FRESULT f_closedir (
buyukesmeli 0:3a2f06aeceaf 3317 DIR_ *dp /* Pointer to the directory object to be closed */
buyukesmeli 0:3a2f06aeceaf 3318 )
buyukesmeli 0:3a2f06aeceaf 3319 {
buyukesmeli 0:3a2f06aeceaf 3320 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3321
buyukesmeli 0:3a2f06aeceaf 3322
buyukesmeli 0:3a2f06aeceaf 3323 res = validate(dp);
buyukesmeli 0:3a2f06aeceaf 3324 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3325 #if _FS_REENTRANT
buyukesmeli 0:3a2f06aeceaf 3326 FATFS *fs = dp->fs;
buyukesmeli 0:3a2f06aeceaf 3327 #endif
buyukesmeli 0:3a2f06aeceaf 3328 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 3329 if (dp->lockid) /* Decrement sub-directory open counter */
buyukesmeli 0:3a2f06aeceaf 3330 res = dec_lock(dp->lockid);
buyukesmeli 0:3a2f06aeceaf 3331 if (res == FR_OK)
buyukesmeli 0:3a2f06aeceaf 3332 #endif
buyukesmeli 0:3a2f06aeceaf 3333 dp->fs = 0; /* Invalidate directory object */
buyukesmeli 0:3a2f06aeceaf 3334 #if _FS_REENTRANT
buyukesmeli 0:3a2f06aeceaf 3335 unlock_fs(fs, FR_OK); /* Unlock volume */
buyukesmeli 0:3a2f06aeceaf 3336 #endif
buyukesmeli 0:3a2f06aeceaf 3337 }
buyukesmeli 0:3a2f06aeceaf 3338 return res;
buyukesmeli 0:3a2f06aeceaf 3339 }
buyukesmeli 0:3a2f06aeceaf 3340
buyukesmeli 0:3a2f06aeceaf 3341
buyukesmeli 0:3a2f06aeceaf 3342
buyukesmeli 0:3a2f06aeceaf 3343
buyukesmeli 0:3a2f06aeceaf 3344 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3345 /* Read Directory Entries in Sequence */
buyukesmeli 0:3a2f06aeceaf 3346 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3347
buyukesmeli 0:3a2f06aeceaf 3348 FRESULT f_readdir (
buyukesmeli 0:3a2f06aeceaf 3349 DIR_* dp, /* Pointer to the open directory object */
buyukesmeli 0:3a2f06aeceaf 3350 FILINFO* fno /* Pointer to file information to return */
buyukesmeli 0:3a2f06aeceaf 3351 )
buyukesmeli 0:3a2f06aeceaf 3352 {
buyukesmeli 0:3a2f06aeceaf 3353 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3354 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3355
buyukesmeli 0:3a2f06aeceaf 3356
buyukesmeli 0:3a2f06aeceaf 3357 res = validate(dp); /* Check validity of the object */
buyukesmeli 0:3a2f06aeceaf 3358 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3359 if (!fno) {
buyukesmeli 0:3a2f06aeceaf 3360 res = dir_sdi(dp, 0); /* Rewind the directory object */
buyukesmeli 0:3a2f06aeceaf 3361 } else {
buyukesmeli 0:3a2f06aeceaf 3362 INIT_BUF(*dp);
buyukesmeli 0:3a2f06aeceaf 3363 res = dir_read(dp, 0); /* Read an item */
buyukesmeli 0:3a2f06aeceaf 3364 if (res == FR_NO_FILE) { /* Reached end of directory */
buyukesmeli 0:3a2f06aeceaf 3365 dp->sect = 0;
buyukesmeli 0:3a2f06aeceaf 3366 res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 3367 }
buyukesmeli 0:3a2f06aeceaf 3368 if (res == FR_OK) { /* A valid entry is found */
buyukesmeli 0:3a2f06aeceaf 3369 get_fileinfo(dp, fno); /* Get the object information */
buyukesmeli 0:3a2f06aeceaf 3370 res = dir_next(dp, 0); /* Increment index for next */
buyukesmeli 0:3a2f06aeceaf 3371 if (res == FR_NO_FILE) {
buyukesmeli 0:3a2f06aeceaf 3372 dp->sect = 0;
buyukesmeli 0:3a2f06aeceaf 3373 res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 3374 }
buyukesmeli 0:3a2f06aeceaf 3375 }
buyukesmeli 0:3a2f06aeceaf 3376 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3377 }
buyukesmeli 0:3a2f06aeceaf 3378 }
buyukesmeli 0:3a2f06aeceaf 3379
buyukesmeli 0:3a2f06aeceaf 3380 LEAVE_FF(dp->fs, res);
buyukesmeli 0:3a2f06aeceaf 3381 }
buyukesmeli 0:3a2f06aeceaf 3382
buyukesmeli 0:3a2f06aeceaf 3383
buyukesmeli 0:3a2f06aeceaf 3384
buyukesmeli 0:3a2f06aeceaf 3385 #if _USE_FIND
buyukesmeli 0:3a2f06aeceaf 3386 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3387 /* Find next file */
buyukesmeli 0:3a2f06aeceaf 3388 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3389
buyukesmeli 0:3a2f06aeceaf 3390 FRESULT f_findnext (
buyukesmeli 0:3a2f06aeceaf 3391 DIR* dp, /* Pointer to the open directory object */
buyukesmeli 0:3a2f06aeceaf 3392 FILINFO* fno /* Pointer to the file information structure */
buyukesmeli 0:3a2f06aeceaf 3393 )
buyukesmeli 0:3a2f06aeceaf 3394 {
buyukesmeli 0:3a2f06aeceaf 3395 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3396
buyukesmeli 0:3a2f06aeceaf 3397
buyukesmeli 0:3a2f06aeceaf 3398 for (;;) {
buyukesmeli 0:3a2f06aeceaf 3399 res = f_readdir(dp, fno); /* Get a directory item */
buyukesmeli 0:3a2f06aeceaf 3400 if (res != FR_OK || !fno || !fno->fname[0]) break; /* Terminate if any error or end of directory */
buyukesmeli 0:3a2f06aeceaf 3401 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 3402 if (fno->lfname && pattern_matching(dp->pat, fno->lfname, 0, 0)) break; /* Test for LFN if exist */
buyukesmeli 0:3a2f06aeceaf 3403 #endif
buyukesmeli 0:3a2f06aeceaf 3404 if (pattern_matching(dp->pat, fno->fname, 0, 0)) break; /* Test for SFN */
buyukesmeli 0:3a2f06aeceaf 3405 }
buyukesmeli 0:3a2f06aeceaf 3406 return res;
buyukesmeli 0:3a2f06aeceaf 3407
buyukesmeli 0:3a2f06aeceaf 3408 }
buyukesmeli 0:3a2f06aeceaf 3409
buyukesmeli 0:3a2f06aeceaf 3410
buyukesmeli 0:3a2f06aeceaf 3411
buyukesmeli 0:3a2f06aeceaf 3412 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3413 /* Find first file */
buyukesmeli 0:3a2f06aeceaf 3414 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3415
buyukesmeli 0:3a2f06aeceaf 3416 FRESULT f_findfirst (
buyukesmeli 0:3a2f06aeceaf 3417 DIR* dp, /* Pointer to the blank directory object */
buyukesmeli 0:3a2f06aeceaf 3418 FILINFO* fno, /* Pointer to the file information structure */
buyukesmeli 0:3a2f06aeceaf 3419 const TCHAR* path, /* Pointer to the directory to open */
buyukesmeli 0:3a2f06aeceaf 3420 const TCHAR* pattern /* Pointer to the matching pattern */
buyukesmeli 0:3a2f06aeceaf 3421 )
buyukesmeli 0:3a2f06aeceaf 3422 {
buyukesmeli 0:3a2f06aeceaf 3423 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3424
buyukesmeli 0:3a2f06aeceaf 3425
buyukesmeli 0:3a2f06aeceaf 3426 dp->pat = pattern; /* Save pointer to pattern string */
buyukesmeli 0:3a2f06aeceaf 3427 res = f_opendir(dp, path); /* Open the target directory */
buyukesmeli 0:3a2f06aeceaf 3428 if (res == FR_OK)
buyukesmeli 0:3a2f06aeceaf 3429 res = f_findnext(dp, fno); /* Find the first item */
buyukesmeli 0:3a2f06aeceaf 3430 return res;
buyukesmeli 0:3a2f06aeceaf 3431 }
buyukesmeli 0:3a2f06aeceaf 3432
buyukesmeli 0:3a2f06aeceaf 3433 #endif /* _USE_FIND */
buyukesmeli 0:3a2f06aeceaf 3434
buyukesmeli 0:3a2f06aeceaf 3435
buyukesmeli 0:3a2f06aeceaf 3436
buyukesmeli 0:3a2f06aeceaf 3437 #if _FS_MINIMIZE == 0
buyukesmeli 0:3a2f06aeceaf 3438 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3439 /* Get File Status */
buyukesmeli 0:3a2f06aeceaf 3440 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3441
buyukesmeli 0:3a2f06aeceaf 3442 FRESULT f_stat (
buyukesmeli 0:3a2f06aeceaf 3443 const TCHAR* path, /* Pointer to the file path */
buyukesmeli 0:3a2f06aeceaf 3444 FILINFO* fno /* Pointer to file information to return */
buyukesmeli 0:3a2f06aeceaf 3445 )
buyukesmeli 0:3a2f06aeceaf 3446 {
buyukesmeli 0:3a2f06aeceaf 3447 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3448 DIR_ dj;
buyukesmeli 0:3a2f06aeceaf 3449 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3450
buyukesmeli 0:3a2f06aeceaf 3451
buyukesmeli 0:3a2f06aeceaf 3452 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3453 res = find_volume(&dj.fs, &path, 0);
buyukesmeli 0:3a2f06aeceaf 3454 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3455 INIT_BUF(dj);
buyukesmeli 0:3a2f06aeceaf 3456 res = follow_path(&dj, path); /* Follow the file path */
buyukesmeli 0:3a2f06aeceaf 3457 if (res == FR_OK) { /* Follow completed */
buyukesmeli 0:3a2f06aeceaf 3458 if (dj.dir) { /* Found an object */
buyukesmeli 0:3a2f06aeceaf 3459 if (fno) get_fileinfo(&dj, fno);
buyukesmeli 0:3a2f06aeceaf 3460 } else { /* It is root directory */
buyukesmeli 0:3a2f06aeceaf 3461 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 3462 }
buyukesmeli 0:3a2f06aeceaf 3463 }
buyukesmeli 0:3a2f06aeceaf 3464 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3465 }
buyukesmeli 0:3a2f06aeceaf 3466
buyukesmeli 0:3a2f06aeceaf 3467 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3468 }
buyukesmeli 0:3a2f06aeceaf 3469
buyukesmeli 0:3a2f06aeceaf 3470
buyukesmeli 0:3a2f06aeceaf 3471
buyukesmeli 0:3a2f06aeceaf 3472 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 3473 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3474 /* Get Number of Free Clusters */
buyukesmeli 0:3a2f06aeceaf 3475 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3476
buyukesmeli 0:3a2f06aeceaf 3477 FRESULT f_getfree (
buyukesmeli 0:3a2f06aeceaf 3478 const TCHAR* path, /* Path name of the logical drive number */
buyukesmeli 0:3a2f06aeceaf 3479 DWORD* nclst, /* Pointer to a variable to return number of free clusters */
buyukesmeli 0:3a2f06aeceaf 3480 FATFS** fatfs /* Pointer to return pointer to corresponding file system object */
buyukesmeli 0:3a2f06aeceaf 3481 )
buyukesmeli 0:3a2f06aeceaf 3482 {
buyukesmeli 0:3a2f06aeceaf 3483 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3484 FATFS *fs;
buyukesmeli 0:3a2f06aeceaf 3485 DWORD n, clst, sect, stat;
buyukesmeli 0:3a2f06aeceaf 3486 UINT i;
buyukesmeli 0:3a2f06aeceaf 3487 BYTE fat, *p;
buyukesmeli 0:3a2f06aeceaf 3488
buyukesmeli 0:3a2f06aeceaf 3489
buyukesmeli 0:3a2f06aeceaf 3490 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3491 res = find_volume(fatfs, &path, 0);
buyukesmeli 0:3a2f06aeceaf 3492 fs = *fatfs;
buyukesmeli 0:3a2f06aeceaf 3493 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3494 /* If free_clust is valid, return it without full cluster scan */
buyukesmeli 0:3a2f06aeceaf 3495 if (fs->free_clust <= fs->n_fatent - 2) {
buyukesmeli 0:3a2f06aeceaf 3496 *nclst = fs->free_clust;
buyukesmeli 0:3a2f06aeceaf 3497 } else {
buyukesmeli 0:3a2f06aeceaf 3498 /* Get number of free clusters */
buyukesmeli 0:3a2f06aeceaf 3499 fat = fs->fs_type;
buyukesmeli 0:3a2f06aeceaf 3500 n = 0;
buyukesmeli 0:3a2f06aeceaf 3501 if (fat == FS_FAT12) {
buyukesmeli 0:3a2f06aeceaf 3502 clst = 2;
buyukesmeli 0:3a2f06aeceaf 3503 do {
buyukesmeli 0:3a2f06aeceaf 3504 stat = get_fat(fs, clst);
buyukesmeli 0:3a2f06aeceaf 3505 if (stat == 0xFFFFFFFF) { res = FR_DISK_ERR; break; }
buyukesmeli 0:3a2f06aeceaf 3506 if (stat == 1) { res = FR_INT_ERR; break; }
buyukesmeli 0:3a2f06aeceaf 3507 if (stat == 0) n++;
buyukesmeli 0:3a2f06aeceaf 3508 } while (++clst < fs->n_fatent);
buyukesmeli 0:3a2f06aeceaf 3509 } else {
buyukesmeli 0:3a2f06aeceaf 3510 clst = fs->n_fatent;
buyukesmeli 0:3a2f06aeceaf 3511 sect = fs->fatbase;
buyukesmeli 0:3a2f06aeceaf 3512 i = 0; p = 0;
buyukesmeli 0:3a2f06aeceaf 3513 do {
buyukesmeli 0:3a2f06aeceaf 3514 if (!i) {
buyukesmeli 0:3a2f06aeceaf 3515 res = move_window(fs, sect++);
buyukesmeli 0:3a2f06aeceaf 3516 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 3517 p = fs->win.d8;
buyukesmeli 0:3a2f06aeceaf 3518 i = SS(fs);
buyukesmeli 0:3a2f06aeceaf 3519 }
buyukesmeli 0:3a2f06aeceaf 3520 if (fat == FS_FAT16) {
buyukesmeli 0:3a2f06aeceaf 3521 if (LD_WORD(p) == 0) n++;
buyukesmeli 0:3a2f06aeceaf 3522 p += 2; i -= 2;
buyukesmeli 0:3a2f06aeceaf 3523 } else {
buyukesmeli 0:3a2f06aeceaf 3524 if ((LD_DWORD(p) & 0x0FFFFFFF) == 0) n++;
buyukesmeli 0:3a2f06aeceaf 3525 p += 4; i -= 4;
buyukesmeli 0:3a2f06aeceaf 3526 }
buyukesmeli 0:3a2f06aeceaf 3527 } while (--clst);
buyukesmeli 0:3a2f06aeceaf 3528 }
buyukesmeli 0:3a2f06aeceaf 3529 fs->free_clust = n;
buyukesmeli 0:3a2f06aeceaf 3530 fs->fsi_flag |= 1;
buyukesmeli 0:3a2f06aeceaf 3531 *nclst = n;
buyukesmeli 0:3a2f06aeceaf 3532 }
buyukesmeli 0:3a2f06aeceaf 3533 }
buyukesmeli 0:3a2f06aeceaf 3534 LEAVE_FF(fs, res);
buyukesmeli 0:3a2f06aeceaf 3535 }
buyukesmeli 0:3a2f06aeceaf 3536
buyukesmeli 0:3a2f06aeceaf 3537
buyukesmeli 0:3a2f06aeceaf 3538
buyukesmeli 0:3a2f06aeceaf 3539
buyukesmeli 0:3a2f06aeceaf 3540 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3541 /* Truncate File */
buyukesmeli 0:3a2f06aeceaf 3542 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3543
buyukesmeli 0:3a2f06aeceaf 3544 FRESULT f_truncate (
buyukesmeli 0:3a2f06aeceaf 3545 FIL* fp /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 3546 )
buyukesmeli 0:3a2f06aeceaf 3547 {
buyukesmeli 0:3a2f06aeceaf 3548 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3549 DWORD ncl;
buyukesmeli 0:3a2f06aeceaf 3550
buyukesmeli 0:3a2f06aeceaf 3551
buyukesmeli 0:3a2f06aeceaf 3552 res = validate(fp); /* Check validity of the object */
buyukesmeli 0:3a2f06aeceaf 3553 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3554 if (fp->err) { /* Check error */
buyukesmeli 0:3a2f06aeceaf 3555 res = (FRESULT)fp->err;
buyukesmeli 0:3a2f06aeceaf 3556 } else {
buyukesmeli 0:3a2f06aeceaf 3557 if (!(fp->flag & FA_WRITE)) /* Check access mode */
buyukesmeli 0:3a2f06aeceaf 3558 res = FR_DENIED;
buyukesmeli 0:3a2f06aeceaf 3559 }
buyukesmeli 0:3a2f06aeceaf 3560 }
buyukesmeli 0:3a2f06aeceaf 3561 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3562 if (fp->fsize > fp->fptr) {
buyukesmeli 0:3a2f06aeceaf 3563 fp->fsize = fp->fptr; /* Set file size to current R/W point */
buyukesmeli 0:3a2f06aeceaf 3564 fp->flag |= FA__WRITTEN;
buyukesmeli 0:3a2f06aeceaf 3565 if (fp->fptr == 0) { /* When set file size to zero, remove entire cluster chain */
buyukesmeli 0:3a2f06aeceaf 3566 res = remove_chain(fp->fs, fp->sclust);
buyukesmeli 0:3a2f06aeceaf 3567 fp->sclust = 0;
buyukesmeli 0:3a2f06aeceaf 3568 } else { /* When truncate a part of the file, remove remaining clusters */
buyukesmeli 0:3a2f06aeceaf 3569 ncl = get_fat(fp->fs, fp->clust);
buyukesmeli 0:3a2f06aeceaf 3570 res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 3571 if (ncl == 0xFFFFFFFF) res = FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 3572 if (ncl == 1) res = FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 3573 if (res == FR_OK && ncl < fp->fs->n_fatent) {
buyukesmeli 0:3a2f06aeceaf 3574 res = put_fat(fp->fs, fp->clust, 0x0FFFFFFF);
buyukesmeli 0:3a2f06aeceaf 3575 if (res == FR_OK) res = remove_chain(fp->fs, ncl);
buyukesmeli 0:3a2f06aeceaf 3576 }
buyukesmeli 0:3a2f06aeceaf 3577 }
buyukesmeli 0:3a2f06aeceaf 3578 #if !_FS_TINY
buyukesmeli 0:3a2f06aeceaf 3579 if (res == FR_OK && (fp->flag & FA__DIRTY)) {
buyukesmeli 0:3a2f06aeceaf 3580 if (disk_write(fp->fs->drv, fp->buf.d8, fp->dsect, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 3581 res = FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 3582 else
buyukesmeli 0:3a2f06aeceaf 3583 fp->flag &= ~FA__DIRTY;
buyukesmeli 0:3a2f06aeceaf 3584 }
buyukesmeli 0:3a2f06aeceaf 3585 #endif
buyukesmeli 0:3a2f06aeceaf 3586 }
buyukesmeli 0:3a2f06aeceaf 3587 if (res != FR_OK) fp->err = (FRESULT)res;
buyukesmeli 0:3a2f06aeceaf 3588 }
buyukesmeli 0:3a2f06aeceaf 3589
buyukesmeli 0:3a2f06aeceaf 3590 LEAVE_FF(fp->fs, res);
buyukesmeli 0:3a2f06aeceaf 3591 }
buyukesmeli 0:3a2f06aeceaf 3592
buyukesmeli 0:3a2f06aeceaf 3593
buyukesmeli 0:3a2f06aeceaf 3594
buyukesmeli 0:3a2f06aeceaf 3595
buyukesmeli 0:3a2f06aeceaf 3596 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3597 /* Delete a File or Directory */
buyukesmeli 0:3a2f06aeceaf 3598 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3599
buyukesmeli 0:3a2f06aeceaf 3600 FRESULT f_unlink (
buyukesmeli 0:3a2f06aeceaf 3601 const TCHAR* path /* Pointer to the file or directory path */
buyukesmeli 0:3a2f06aeceaf 3602 )
buyukesmeli 0:3a2f06aeceaf 3603 {
buyukesmeli 0:3a2f06aeceaf 3604 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3605 DIR_ dj, sdj;
buyukesmeli 0:3a2f06aeceaf 3606 BYTE *dir;
buyukesmeli 0:3a2f06aeceaf 3607 DWORD dclst = 0;
buyukesmeli 0:3a2f06aeceaf 3608 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3609
buyukesmeli 0:3a2f06aeceaf 3610
buyukesmeli 0:3a2f06aeceaf 3611 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3612 res = find_volume(&dj.fs, &path, 1);
buyukesmeli 0:3a2f06aeceaf 3613 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3614 INIT_BUF(dj);
buyukesmeli 0:3a2f06aeceaf 3615 res = follow_path(&dj, path); /* Follow the file path */
buyukesmeli 0:3a2f06aeceaf 3616 if (_FS_RPATH && res == FR_OK && (dj.fn[NSFLAG] & NS_DOT))
buyukesmeli 0:3a2f06aeceaf 3617 res = FR_INVALID_NAME; /* Cannot remove dot entry */
buyukesmeli 0:3a2f06aeceaf 3618 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 3619 if (res == FR_OK) res = chk_lock(&dj, 2); /* Cannot remove open object */
buyukesmeli 0:3a2f06aeceaf 3620 #endif
buyukesmeli 0:3a2f06aeceaf 3621 if (res == FR_OK) { /* The object is accessible */
buyukesmeli 0:3a2f06aeceaf 3622 dir = dj.dir;
buyukesmeli 0:3a2f06aeceaf 3623 if (!dir) {
buyukesmeli 0:3a2f06aeceaf 3624 res = FR_INVALID_NAME; /* Cannot remove the origin directory */
buyukesmeli 0:3a2f06aeceaf 3625 } else {
buyukesmeli 0:3a2f06aeceaf 3626 if (dir[DIR_Attr] & AM_RDO)
buyukesmeli 0:3a2f06aeceaf 3627 res = FR_DENIED; /* Cannot remove R/O object */
buyukesmeli 0:3a2f06aeceaf 3628 }
buyukesmeli 0:3a2f06aeceaf 3629 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3630 dclst = ld_clust(dj.fs, dir);
buyukesmeli 0:3a2f06aeceaf 3631 if (dclst && (dir[DIR_Attr] & AM_DIR)) { /* Is it a sub-directory ? */
buyukesmeli 0:3a2f06aeceaf 3632 #if _FS_RPATH
buyukesmeli 0:3a2f06aeceaf 3633 if (dclst == dj.fs->cdir) { /* Is it the current directory? */
buyukesmeli 0:3a2f06aeceaf 3634 res = FR_DENIED;
buyukesmeli 0:3a2f06aeceaf 3635 } else
buyukesmeli 0:3a2f06aeceaf 3636 #endif
buyukesmeli 0:3a2f06aeceaf 3637 {
buyukesmeli 0:3a2f06aeceaf 3638 mem_cpy(&sdj, &dj, sizeof (DIR_)); /* Open the sub-directory */
buyukesmeli 0:3a2f06aeceaf 3639 sdj.sclust = dclst;
buyukesmeli 0:3a2f06aeceaf 3640 res = dir_sdi(&sdj, 2);
buyukesmeli 0:3a2f06aeceaf 3641 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3642 res = dir_read(&sdj, 0); /* Read an item (excluding dot entries) */
buyukesmeli 0:3a2f06aeceaf 3643 if (res == FR_OK) res = FR_DENIED; /* Not empty? (cannot remove) */
buyukesmeli 0:3a2f06aeceaf 3644 if (res == FR_NO_FILE) res = FR_OK; /* Empty? (can remove) */
buyukesmeli 0:3a2f06aeceaf 3645 }
buyukesmeli 0:3a2f06aeceaf 3646 }
buyukesmeli 0:3a2f06aeceaf 3647 }
buyukesmeli 0:3a2f06aeceaf 3648 }
buyukesmeli 0:3a2f06aeceaf 3649 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3650 res = dir_remove(&dj); /* Remove the directory entry */
buyukesmeli 0:3a2f06aeceaf 3651 if (res == FR_OK && dclst) /* Remove the cluster chain if exist */
buyukesmeli 0:3a2f06aeceaf 3652 res = remove_chain(dj.fs, dclst);
buyukesmeli 0:3a2f06aeceaf 3653 if (res == FR_OK) res = sync_fs(dj.fs);
buyukesmeli 0:3a2f06aeceaf 3654 }
buyukesmeli 0:3a2f06aeceaf 3655 }
buyukesmeli 0:3a2f06aeceaf 3656 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3657 }
buyukesmeli 0:3a2f06aeceaf 3658
buyukesmeli 0:3a2f06aeceaf 3659 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3660 }
buyukesmeli 0:3a2f06aeceaf 3661
buyukesmeli 0:3a2f06aeceaf 3662
buyukesmeli 0:3a2f06aeceaf 3663
buyukesmeli 0:3a2f06aeceaf 3664
buyukesmeli 0:3a2f06aeceaf 3665 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3666 /* Create a Directory */
buyukesmeli 0:3a2f06aeceaf 3667 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3668
buyukesmeli 0:3a2f06aeceaf 3669 FRESULT f_mkdir (
buyukesmeli 0:3a2f06aeceaf 3670 const TCHAR* path /* Pointer to the directory path */
buyukesmeli 0:3a2f06aeceaf 3671 )
buyukesmeli 0:3a2f06aeceaf 3672 {
buyukesmeli 0:3a2f06aeceaf 3673 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3674 DIR_ dj;
buyukesmeli 0:3a2f06aeceaf 3675 BYTE *dir, n;
buyukesmeli 0:3a2f06aeceaf 3676 DWORD dsc, dcl, pcl, tm = GET_FATTIME();
buyukesmeli 0:3a2f06aeceaf 3677 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3678
buyukesmeli 0:3a2f06aeceaf 3679
buyukesmeli 0:3a2f06aeceaf 3680 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3681 res = find_volume(&dj.fs, &path, 1);
buyukesmeli 0:3a2f06aeceaf 3682 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3683 INIT_BUF(dj);
buyukesmeli 0:3a2f06aeceaf 3684 res = follow_path(&dj, path); /* Follow the file path */
buyukesmeli 0:3a2f06aeceaf 3685 if (res == FR_OK) res = FR_EXIST; /* Any object with same name is already existing */
buyukesmeli 0:3a2f06aeceaf 3686 if (_FS_RPATH && res == FR_NO_FILE && (dj.fn[NSFLAG] & NS_DOT))
buyukesmeli 0:3a2f06aeceaf 3687 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 3688 if (res == FR_NO_FILE) { /* Can create a new directory */
buyukesmeli 0:3a2f06aeceaf 3689 dcl = create_chain(dj.fs, 0); /* Allocate a cluster for the new directory table */
buyukesmeli 0:3a2f06aeceaf 3690 res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 3691 if (dcl == 0) res = FR_DENIED; /* No space to allocate a new cluster */
buyukesmeli 0:3a2f06aeceaf 3692 if (dcl == 1) res = FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 3693 if (dcl == 0xFFFFFFFF) res = FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 3694 if (res == FR_OK) /* Flush FAT */
buyukesmeli 0:3a2f06aeceaf 3695 res = sync_window(dj.fs);
buyukesmeli 0:3a2f06aeceaf 3696 if (res == FR_OK) { /* Initialize the new directory table */
buyukesmeli 0:3a2f06aeceaf 3697 dsc = clust2sect(dj.fs, dcl);
buyukesmeli 0:3a2f06aeceaf 3698 dir = dj.fs->win.d8;
buyukesmeli 0:3a2f06aeceaf 3699 mem_set(dir, 0, SS(dj.fs));
buyukesmeli 0:3a2f06aeceaf 3700 mem_set(dir + DIR_Name, ' ', 11); /* Create "." entry */
buyukesmeli 0:3a2f06aeceaf 3701 dir[DIR_Name] = '.';
buyukesmeli 0:3a2f06aeceaf 3702 dir[DIR_Attr] = AM_DIR;
buyukesmeli 0:3a2f06aeceaf 3703 ST_DWORD(dir + DIR_WrtTime, tm);
buyukesmeli 0:3a2f06aeceaf 3704 st_clust(dir, dcl);
buyukesmeli 0:3a2f06aeceaf 3705 mem_cpy(dir + SZ_DIRE, dir, SZ_DIRE); /* Create ".." entry */
buyukesmeli 0:3a2f06aeceaf 3706 dir[SZ_DIRE + 1] = '.'; pcl = dj.sclust;
buyukesmeli 0:3a2f06aeceaf 3707 if (dj.fs->fs_type == FS_FAT32 && pcl == dj.fs->dirbase)
buyukesmeli 0:3a2f06aeceaf 3708 pcl = 0;
buyukesmeli 0:3a2f06aeceaf 3709 st_clust(dir + SZ_DIRE, pcl);
buyukesmeli 0:3a2f06aeceaf 3710 for (n = dj.fs->csize; n; n--) { /* Write dot entries and clear following sectors */
buyukesmeli 0:3a2f06aeceaf 3711 dj.fs->winsect = dsc++;
buyukesmeli 0:3a2f06aeceaf 3712 dj.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 3713 res = sync_window(dj.fs);
buyukesmeli 0:3a2f06aeceaf 3714 if (res != FR_OK) break;
buyukesmeli 0:3a2f06aeceaf 3715 mem_set(dir, 0, SS(dj.fs));
buyukesmeli 0:3a2f06aeceaf 3716 }
buyukesmeli 0:3a2f06aeceaf 3717 }
buyukesmeli 0:3a2f06aeceaf 3718 if (res == FR_OK) res = dir_register(&dj); /* Register the object to the directoy */
buyukesmeli 0:3a2f06aeceaf 3719 if (res != FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3720 remove_chain(dj.fs, dcl); /* Could not register, remove cluster chain */
buyukesmeli 0:3a2f06aeceaf 3721 } else {
buyukesmeli 0:3a2f06aeceaf 3722 dir = dj.dir;
buyukesmeli 0:3a2f06aeceaf 3723 dir[DIR_Attr] = AM_DIR; /* Attribute */
buyukesmeli 0:3a2f06aeceaf 3724 ST_DWORD(dir + DIR_WrtTime, tm); /* Created time */
buyukesmeli 0:3a2f06aeceaf 3725 st_clust(dir, dcl); /* Table start cluster */
buyukesmeli 0:3a2f06aeceaf 3726 dj.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 3727 res = sync_fs(dj.fs);
buyukesmeli 0:3a2f06aeceaf 3728 }
buyukesmeli 0:3a2f06aeceaf 3729 }
buyukesmeli 0:3a2f06aeceaf 3730 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3731 }
buyukesmeli 0:3a2f06aeceaf 3732
buyukesmeli 0:3a2f06aeceaf 3733 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3734 }
buyukesmeli 0:3a2f06aeceaf 3735
buyukesmeli 0:3a2f06aeceaf 3736
buyukesmeli 0:3a2f06aeceaf 3737
buyukesmeli 0:3a2f06aeceaf 3738
buyukesmeli 0:3a2f06aeceaf 3739 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3740 /* Change Attribute */
buyukesmeli 0:3a2f06aeceaf 3741 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3742
buyukesmeli 0:3a2f06aeceaf 3743 FRESULT f_chmod (
buyukesmeli 0:3a2f06aeceaf 3744 const TCHAR* path, /* Pointer to the file path */
buyukesmeli 0:3a2f06aeceaf 3745 BYTE attr, /* Attribute bits */
buyukesmeli 0:3a2f06aeceaf 3746 BYTE mask /* Attribute mask to change */
buyukesmeli 0:3a2f06aeceaf 3747 )
buyukesmeli 0:3a2f06aeceaf 3748 {
buyukesmeli 0:3a2f06aeceaf 3749 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3750 DIR_ dj;
buyukesmeli 0:3a2f06aeceaf 3751 BYTE *dir;
buyukesmeli 0:3a2f06aeceaf 3752 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3753
buyukesmeli 0:3a2f06aeceaf 3754
buyukesmeli 0:3a2f06aeceaf 3755 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3756 res = find_volume(&dj.fs, &path, 1);
buyukesmeli 0:3a2f06aeceaf 3757 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3758 INIT_BUF(dj);
buyukesmeli 0:3a2f06aeceaf 3759 res = follow_path(&dj, path); /* Follow the file path */
buyukesmeli 0:3a2f06aeceaf 3760 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3761 if (_FS_RPATH && res == FR_OK && (dj.fn[NSFLAG] & NS_DOT))
buyukesmeli 0:3a2f06aeceaf 3762 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 3763 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3764 dir = dj.dir;
buyukesmeli 0:3a2f06aeceaf 3765 if (!dir) { /* Is it a root directory? */
buyukesmeli 0:3a2f06aeceaf 3766 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 3767 } else { /* File or sub directory */
buyukesmeli 0:3a2f06aeceaf 3768 mask &= AM_RDO|AM_HID|AM_SYS|AM_ARC; /* Valid attribute mask */
buyukesmeli 0:3a2f06aeceaf 3769 dir[DIR_Attr] = (attr & mask) | (dir[DIR_Attr] & (BYTE)~mask); /* Apply attribute change */
buyukesmeli 0:3a2f06aeceaf 3770 dj.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 3771 res = sync_fs(dj.fs);
buyukesmeli 0:3a2f06aeceaf 3772 }
buyukesmeli 0:3a2f06aeceaf 3773 }
buyukesmeli 0:3a2f06aeceaf 3774 }
buyukesmeli 0:3a2f06aeceaf 3775
buyukesmeli 0:3a2f06aeceaf 3776 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3777 }
buyukesmeli 0:3a2f06aeceaf 3778
buyukesmeli 0:3a2f06aeceaf 3779
buyukesmeli 0:3a2f06aeceaf 3780
buyukesmeli 0:3a2f06aeceaf 3781
buyukesmeli 0:3a2f06aeceaf 3782 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3783 /* Rename File/Directory */
buyukesmeli 0:3a2f06aeceaf 3784 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3785
buyukesmeli 0:3a2f06aeceaf 3786 FRESULT f_rename (
buyukesmeli 0:3a2f06aeceaf 3787 const TCHAR* path_old, /* Pointer to the object to be renamed */
buyukesmeli 0:3a2f06aeceaf 3788 const TCHAR* path_new /* Pointer to the new name */
buyukesmeli 0:3a2f06aeceaf 3789 )
buyukesmeli 0:3a2f06aeceaf 3790 {
buyukesmeli 0:3a2f06aeceaf 3791 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3792 DIR_ djo, djn;
buyukesmeli 0:3a2f06aeceaf 3793 BYTE buf[21], *dir;
buyukesmeli 0:3a2f06aeceaf 3794 DWORD dw;
buyukesmeli 0:3a2f06aeceaf 3795 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3796
buyukesmeli 0:3a2f06aeceaf 3797
buyukesmeli 0:3a2f06aeceaf 3798 /* Get logical drive number of the source object */
buyukesmeli 0:3a2f06aeceaf 3799 res = find_volume(&djo.fs, &path_old, 1);
buyukesmeli 0:3a2f06aeceaf 3800 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3801 djn.fs = djo.fs;
buyukesmeli 0:3a2f06aeceaf 3802 INIT_BUF(djo);
buyukesmeli 0:3a2f06aeceaf 3803 res = follow_path(&djo, path_old); /* Check old object */
buyukesmeli 0:3a2f06aeceaf 3804 if (_FS_RPATH && res == FR_OK && (djo.fn[NSFLAG] & NS_DOT))
buyukesmeli 0:3a2f06aeceaf 3805 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 3806 #if _FS_LOCK
buyukesmeli 0:3a2f06aeceaf 3807 if (res == FR_OK) res = chk_lock(&djo, 2);
buyukesmeli 0:3a2f06aeceaf 3808 #endif
buyukesmeli 0:3a2f06aeceaf 3809 if (res == FR_OK) { /* Old object is found */
buyukesmeli 0:3a2f06aeceaf 3810 if (!djo.dir) { /* Is root dir? */
buyukesmeli 0:3a2f06aeceaf 3811 res = FR_NO_FILE;
buyukesmeli 0:3a2f06aeceaf 3812 } else {
buyukesmeli 0:3a2f06aeceaf 3813 mem_cpy(buf, djo.dir + DIR_Attr, 21); /* Save information about object except name */
buyukesmeli 0:3a2f06aeceaf 3814 mem_cpy(&djn, &djo, sizeof (DIR_)); /* Duplicate the directory object */
buyukesmeli 0:3a2f06aeceaf 3815 if (get_ldnumber(&path_new) >= 0) /* Snip drive number off and ignore it */
buyukesmeli 0:3a2f06aeceaf 3816 res = follow_path(&djn, path_new); /* and make sure if new object name is not conflicting */
buyukesmeli 0:3a2f06aeceaf 3817 else
buyukesmeli 0:3a2f06aeceaf 3818 res = FR_INVALID_DRIVE;
buyukesmeli 0:3a2f06aeceaf 3819 if (res == FR_OK) res = FR_EXIST; /* The new object name is already existing */
buyukesmeli 0:3a2f06aeceaf 3820 if (res == FR_NO_FILE) { /* It is a valid path and no name collision */
buyukesmeli 0:3a2f06aeceaf 3821 res = dir_register(&djn); /* Register the new entry */
buyukesmeli 0:3a2f06aeceaf 3822 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3823 /* Start of critical section where any interruption can cause a cross-link */
buyukesmeli 0:3a2f06aeceaf 3824 dir = djn.dir; /* Copy information about object except name */
buyukesmeli 0:3a2f06aeceaf 3825 mem_cpy(dir + 13, buf + 2, 19);
buyukesmeli 0:3a2f06aeceaf 3826 dir[DIR_Attr] = buf[0] | AM_ARC;
buyukesmeli 0:3a2f06aeceaf 3827 djo.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 3828 if ((dir[DIR_Attr] & AM_DIR) && djo.sclust != djn.sclust) { /* Update .. entry in the sub-directory if needed */
buyukesmeli 0:3a2f06aeceaf 3829 dw = clust2sect(djo.fs, ld_clust(djo.fs, dir));
buyukesmeli 0:3a2f06aeceaf 3830 if (!dw) {
buyukesmeli 0:3a2f06aeceaf 3831 res = FR_INT_ERR;
buyukesmeli 0:3a2f06aeceaf 3832 } else {
buyukesmeli 0:3a2f06aeceaf 3833 res = move_window(djo.fs, dw);
buyukesmeli 0:3a2f06aeceaf 3834 dir = djo.fs->win.d8 + SZ_DIRE * 1; /* Ptr to .. entry */
buyukesmeli 0:3a2f06aeceaf 3835 if (res == FR_OK && dir[1] == '.') {
buyukesmeli 0:3a2f06aeceaf 3836 st_clust(dir, djn.sclust);
buyukesmeli 0:3a2f06aeceaf 3837 djo.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 3838 }
buyukesmeli 0:3a2f06aeceaf 3839 }
buyukesmeli 0:3a2f06aeceaf 3840 }
buyukesmeli 0:3a2f06aeceaf 3841 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3842 res = dir_remove(&djo); /* Remove old entry */
buyukesmeli 0:3a2f06aeceaf 3843 if (res == FR_OK)
buyukesmeli 0:3a2f06aeceaf 3844 res = sync_fs(djo.fs);
buyukesmeli 0:3a2f06aeceaf 3845 }
buyukesmeli 0:3a2f06aeceaf 3846 /* End of critical section */
buyukesmeli 0:3a2f06aeceaf 3847 }
buyukesmeli 0:3a2f06aeceaf 3848 }
buyukesmeli 0:3a2f06aeceaf 3849 }
buyukesmeli 0:3a2f06aeceaf 3850 }
buyukesmeli 0:3a2f06aeceaf 3851 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3852 }
buyukesmeli 0:3a2f06aeceaf 3853
buyukesmeli 0:3a2f06aeceaf 3854 LEAVE_FF(djo.fs, res);
buyukesmeli 0:3a2f06aeceaf 3855 }
buyukesmeli 0:3a2f06aeceaf 3856
buyukesmeli 0:3a2f06aeceaf 3857
buyukesmeli 0:3a2f06aeceaf 3858
buyukesmeli 0:3a2f06aeceaf 3859
buyukesmeli 0:3a2f06aeceaf 3860 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3861 /* Change Timestamp */
buyukesmeli 0:3a2f06aeceaf 3862 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3863
buyukesmeli 0:3a2f06aeceaf 3864 FRESULT f_utime (
buyukesmeli 0:3a2f06aeceaf 3865 const TCHAR* path, /* Pointer to the file/directory name */
buyukesmeli 0:3a2f06aeceaf 3866 const FILINFO* fno /* Pointer to the time stamp to be set */
buyukesmeli 0:3a2f06aeceaf 3867 )
buyukesmeli 0:3a2f06aeceaf 3868 {
buyukesmeli 0:3a2f06aeceaf 3869 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3870 DIR_ dj;
buyukesmeli 0:3a2f06aeceaf 3871 BYTE *dir;
buyukesmeli 0:3a2f06aeceaf 3872 DEFINE_NAMEBUF;
buyukesmeli 0:3a2f06aeceaf 3873
buyukesmeli 0:3a2f06aeceaf 3874
buyukesmeli 0:3a2f06aeceaf 3875 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3876 res = find_volume(&dj.fs, &path, 1);
buyukesmeli 0:3a2f06aeceaf 3877 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3878 INIT_BUF(dj);
buyukesmeli 0:3a2f06aeceaf 3879 res = follow_path(&dj, path); /* Follow the file path */
buyukesmeli 0:3a2f06aeceaf 3880 FREE_BUF();
buyukesmeli 0:3a2f06aeceaf 3881 if (_FS_RPATH && res == FR_OK && (dj.fn[NSFLAG] & NS_DOT))
buyukesmeli 0:3a2f06aeceaf 3882 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 3883 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3884 dir = dj.dir;
buyukesmeli 0:3a2f06aeceaf 3885 if (!dir) { /* Root directory */
buyukesmeli 0:3a2f06aeceaf 3886 res = FR_INVALID_NAME;
buyukesmeli 0:3a2f06aeceaf 3887 } else { /* File or sub-directory */
buyukesmeli 0:3a2f06aeceaf 3888 ST_WORD(dir + DIR_WrtTime, fno->ftime);
buyukesmeli 0:3a2f06aeceaf 3889 ST_WORD(dir + DIR_WrtDate, fno->fdate);
buyukesmeli 0:3a2f06aeceaf 3890 dj.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 3891 res = sync_fs(dj.fs);
buyukesmeli 0:3a2f06aeceaf 3892 }
buyukesmeli 0:3a2f06aeceaf 3893 }
buyukesmeli 0:3a2f06aeceaf 3894 }
buyukesmeli 0:3a2f06aeceaf 3895
buyukesmeli 0:3a2f06aeceaf 3896 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3897 }
buyukesmeli 0:3a2f06aeceaf 3898
buyukesmeli 0:3a2f06aeceaf 3899 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 3900 #endif /* _FS_MINIMIZE == 0 */
buyukesmeli 0:3a2f06aeceaf 3901 #endif /* _FS_MINIMIZE <= 1 */
buyukesmeli 0:3a2f06aeceaf 3902 #endif /* _FS_MINIMIZE <= 2 */
buyukesmeli 0:3a2f06aeceaf 3903
buyukesmeli 0:3a2f06aeceaf 3904
buyukesmeli 0:3a2f06aeceaf 3905
buyukesmeli 0:3a2f06aeceaf 3906
buyukesmeli 0:3a2f06aeceaf 3907 #if _USE_LABEL
buyukesmeli 0:3a2f06aeceaf 3908 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3909 /* Get volume label */
buyukesmeli 0:3a2f06aeceaf 3910 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3911
buyukesmeli 0:3a2f06aeceaf 3912 FRESULT f_getlabel (
buyukesmeli 0:3a2f06aeceaf 3913 const TCHAR* path, /* Path name of the logical drive number */
buyukesmeli 0:3a2f06aeceaf 3914 TCHAR* label, /* Pointer to a buffer to return the volume label */
buyukesmeli 0:3a2f06aeceaf 3915 DWORD* vsn /* Pointer to a variable to return the volume serial number */
buyukesmeli 0:3a2f06aeceaf 3916 )
buyukesmeli 0:3a2f06aeceaf 3917 {
buyukesmeli 0:3a2f06aeceaf 3918 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3919 DIR dj;
buyukesmeli 0:3a2f06aeceaf 3920 UINT i, j;
buyukesmeli 0:3a2f06aeceaf 3921 #if _USE_LFN && _LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 3922 WCHAR w;
buyukesmeli 0:3a2f06aeceaf 3923 #endif
buyukesmeli 0:3a2f06aeceaf 3924
buyukesmeli 0:3a2f06aeceaf 3925
buyukesmeli 0:3a2f06aeceaf 3926 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3927 res = find_volume(&dj.fs, &path, 0);
buyukesmeli 0:3a2f06aeceaf 3928
buyukesmeli 0:3a2f06aeceaf 3929 /* Get volume label */
buyukesmeli 0:3a2f06aeceaf 3930 if (res == FR_OK && label) {
buyukesmeli 0:3a2f06aeceaf 3931 dj.sclust = 0; /* Open root directory */
buyukesmeli 0:3a2f06aeceaf 3932 res = dir_sdi(&dj, 0);
buyukesmeli 0:3a2f06aeceaf 3933 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3934 res = dir_read(&dj, 1); /* Get an entry with AM_VOL */
buyukesmeli 0:3a2f06aeceaf 3935 if (res == FR_OK) { /* A volume label is exist */
buyukesmeli 0:3a2f06aeceaf 3936 #if _USE_LFN && _LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 3937 i = j = 0;
buyukesmeli 0:3a2f06aeceaf 3938 do {
buyukesmeli 0:3a2f06aeceaf 3939 w = (i < 11) ? dj.dir[i++] : ' ';
buyukesmeli 0:3a2f06aeceaf 3940 if (IsDBCS1(w) && i < 11 && IsDBCS2(dj.dir[i]))
buyukesmeli 0:3a2f06aeceaf 3941 w = w << 8 | dj.dir[i++];
buyukesmeli 0:3a2f06aeceaf 3942 label[j++] = ff_convert(w, 1); /* OEM -> Unicode */
buyukesmeli 0:3a2f06aeceaf 3943 } while (j < 11);
buyukesmeli 0:3a2f06aeceaf 3944 #else
buyukesmeli 0:3a2f06aeceaf 3945 mem_cpy(label, dj.dir, 11);
buyukesmeli 0:3a2f06aeceaf 3946 #endif
buyukesmeli 0:3a2f06aeceaf 3947 j = 11;
buyukesmeli 0:3a2f06aeceaf 3948 do {
buyukesmeli 0:3a2f06aeceaf 3949 label[j] = 0;
buyukesmeli 0:3a2f06aeceaf 3950 if (!j) break;
buyukesmeli 0:3a2f06aeceaf 3951 } while (label[--j] == ' ');
buyukesmeli 0:3a2f06aeceaf 3952 }
buyukesmeli 0:3a2f06aeceaf 3953 if (res == FR_NO_FILE) { /* No label, return nul string */
buyukesmeli 0:3a2f06aeceaf 3954 label[0] = 0;
buyukesmeli 0:3a2f06aeceaf 3955 res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 3956 }
buyukesmeli 0:3a2f06aeceaf 3957 }
buyukesmeli 0:3a2f06aeceaf 3958 }
buyukesmeli 0:3a2f06aeceaf 3959
buyukesmeli 0:3a2f06aeceaf 3960 /* Get volume serial number */
buyukesmeli 0:3a2f06aeceaf 3961 if (res == FR_OK && vsn) {
buyukesmeli 0:3a2f06aeceaf 3962 res = move_window(dj.fs, dj.fs->volbase);
buyukesmeli 0:3a2f06aeceaf 3963 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 3964 i = dj.fs->fs_type == FS_FAT32 ? BS_VolID32 : BS_VolID;
buyukesmeli 0:3a2f06aeceaf 3965 *vsn = LD_DWORD(&dj.fs->win.d8[i]);
buyukesmeli 0:3a2f06aeceaf 3966 }
buyukesmeli 0:3a2f06aeceaf 3967 }
buyukesmeli 0:3a2f06aeceaf 3968
buyukesmeli 0:3a2f06aeceaf 3969 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3970 }
buyukesmeli 0:3a2f06aeceaf 3971
buyukesmeli 0:3a2f06aeceaf 3972
buyukesmeli 0:3a2f06aeceaf 3973
buyukesmeli 0:3a2f06aeceaf 3974 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 3975 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3976 /* Set volume label */
buyukesmeli 0:3a2f06aeceaf 3977 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 3978
buyukesmeli 0:3a2f06aeceaf 3979 FRESULT f_setlabel (
buyukesmeli 0:3a2f06aeceaf 3980 const TCHAR* label /* Pointer to the volume label to set */
buyukesmeli 0:3a2f06aeceaf 3981 )
buyukesmeli 0:3a2f06aeceaf 3982 {
buyukesmeli 0:3a2f06aeceaf 3983 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 3984 DIR dj;
buyukesmeli 0:3a2f06aeceaf 3985 BYTE vn[11];
buyukesmeli 0:3a2f06aeceaf 3986 UINT i, j, sl;
buyukesmeli 0:3a2f06aeceaf 3987 WCHAR w;
buyukesmeli 0:3a2f06aeceaf 3988 DWORD tm;
buyukesmeli 0:3a2f06aeceaf 3989
buyukesmeli 0:3a2f06aeceaf 3990
buyukesmeli 0:3a2f06aeceaf 3991 /* Get logical drive number */
buyukesmeli 0:3a2f06aeceaf 3992 res = find_volume(&dj.fs, &label, 1);
buyukesmeli 0:3a2f06aeceaf 3993 if (res) LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 3994
buyukesmeli 0:3a2f06aeceaf 3995 /* Create a volume label in directory form */
buyukesmeli 0:3a2f06aeceaf 3996 vn[0] = 0;
buyukesmeli 0:3a2f06aeceaf 3997 for (sl = 0; label[sl]; sl++) ; /* Get name length */
buyukesmeli 0:3a2f06aeceaf 3998 for ( ; sl && label[sl - 1] == ' '; sl--) ; /* Remove trailing spaces */
buyukesmeli 0:3a2f06aeceaf 3999 if (sl) { /* Create volume label in directory form */
buyukesmeli 0:3a2f06aeceaf 4000 i = j = 0;
buyukesmeli 0:3a2f06aeceaf 4001 do {
buyukesmeli 0:3a2f06aeceaf 4002 #if _USE_LFN && _LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 4003 w = ff_convert(ff_wtoupper(label[i++]), 0);
buyukesmeli 0:3a2f06aeceaf 4004 #else
buyukesmeli 0:3a2f06aeceaf 4005 w = (BYTE)label[i++];
buyukesmeli 0:3a2f06aeceaf 4006 if (IsDBCS1(w))
buyukesmeli 0:3a2f06aeceaf 4007 w = (j < 10 && i < sl && IsDBCS2(label[i])) ? w << 8 | (BYTE)label[i++] : 0;
buyukesmeli 0:3a2f06aeceaf 4008 #if _USE_LFN
buyukesmeli 0:3a2f06aeceaf 4009 w = ff_convert(ff_wtoupper(ff_convert(w, 1)), 0);
buyukesmeli 0:3a2f06aeceaf 4010 #else
buyukesmeli 0:3a2f06aeceaf 4011 if (IsLower(w)) w -= 0x20; /* To upper ASCII characters */
buyukesmeli 0:3a2f06aeceaf 4012 #ifdef _EXCVT
buyukesmeli 0:3a2f06aeceaf 4013 if (w >= 0x80) w = ExCvt[w - 0x80]; /* To upper extended characters (SBCS cfg) */
buyukesmeli 0:3a2f06aeceaf 4014 #else
buyukesmeli 0:3a2f06aeceaf 4015 if (!_DF1S && w >= 0x80) w = 0; /* Reject extended characters (ASCII cfg) */
buyukesmeli 0:3a2f06aeceaf 4016 #endif
buyukesmeli 0:3a2f06aeceaf 4017 #endif
buyukesmeli 0:3a2f06aeceaf 4018 #endif
buyukesmeli 0:3a2f06aeceaf 4019 if (!w || chk_chr("\"*+,.:;<=>\?[]|\x7F", w) || j >= (UINT)((w >= 0x100) ? 10 : 11)) /* Reject invalid characters for volume label */
buyukesmeli 0:3a2f06aeceaf 4020 LEAVE_FF(dj.fs, FR_INVALID_NAME);
buyukesmeli 0:3a2f06aeceaf 4021 if (w >= 0x100) vn[j++] = (BYTE)(w >> 8);
buyukesmeli 0:3a2f06aeceaf 4022 vn[j++] = (BYTE)w;
buyukesmeli 0:3a2f06aeceaf 4023 } while (i < sl);
buyukesmeli 0:3a2f06aeceaf 4024 while (j < 11) vn[j++] = ' '; /* Fill remaining name field */
buyukesmeli 0:3a2f06aeceaf 4025 if (vn[0] == DDEM) LEAVE_FF(dj.fs, FR_INVALID_NAME); /* Reject illegal name (heading DDEM) */
buyukesmeli 0:3a2f06aeceaf 4026 }
buyukesmeli 0:3a2f06aeceaf 4027
buyukesmeli 0:3a2f06aeceaf 4028 /* Set volume label */
buyukesmeli 0:3a2f06aeceaf 4029 dj.sclust = 0; /* Open root directory */
buyukesmeli 0:3a2f06aeceaf 4030 res = dir_sdi(&dj, 0);
buyukesmeli 0:3a2f06aeceaf 4031 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 4032 res = dir_read(&dj, 1); /* Get an entry with AM_VOL */
buyukesmeli 0:3a2f06aeceaf 4033 if (res == FR_OK) { /* A volume label is found */
buyukesmeli 0:3a2f06aeceaf 4034 if (vn[0]) {
buyukesmeli 0:3a2f06aeceaf 4035 mem_cpy(dj.dir, vn, 11); /* Change the volume label name */
buyukesmeli 0:3a2f06aeceaf 4036 tm = GET_FATTIME();
buyukesmeli 0:3a2f06aeceaf 4037 ST_DWORD(dj.dir + DIR_WrtTime, tm);
buyukesmeli 0:3a2f06aeceaf 4038 } else {
buyukesmeli 0:3a2f06aeceaf 4039 dj.dir[0] = DDEM; /* Remove the volume label */
buyukesmeli 0:3a2f06aeceaf 4040 }
buyukesmeli 0:3a2f06aeceaf 4041 dj.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 4042 res = sync_fs(dj.fs);
buyukesmeli 0:3a2f06aeceaf 4043 } else { /* No volume label is found or error */
buyukesmeli 0:3a2f06aeceaf 4044 if (res == FR_NO_FILE) {
buyukesmeli 0:3a2f06aeceaf 4045 res = FR_OK;
buyukesmeli 0:3a2f06aeceaf 4046 if (vn[0]) { /* Create volume label as new */
buyukesmeli 0:3a2f06aeceaf 4047 res = dir_alloc(&dj, 1); /* Allocate an entry for volume label */
buyukesmeli 0:3a2f06aeceaf 4048 if (res == FR_OK) {
buyukesmeli 0:3a2f06aeceaf 4049 mem_set(dj.dir, 0, SZ_DIRE); /* Set volume label */
buyukesmeli 0:3a2f06aeceaf 4050 mem_cpy(dj.dir, vn, 11);
buyukesmeli 0:3a2f06aeceaf 4051 dj.dir[DIR_Attr] = AM_VOL;
buyukesmeli 0:3a2f06aeceaf 4052 tm = GET_FATTIME();
buyukesmeli 0:3a2f06aeceaf 4053 ST_DWORD(dj.dir + DIR_WrtTime, tm);
buyukesmeli 0:3a2f06aeceaf 4054 dj.fs->wflag = 1;
buyukesmeli 0:3a2f06aeceaf 4055 res = sync_fs(dj.fs);
buyukesmeli 0:3a2f06aeceaf 4056 }
buyukesmeli 0:3a2f06aeceaf 4057 }
buyukesmeli 0:3a2f06aeceaf 4058 }
buyukesmeli 0:3a2f06aeceaf 4059 }
buyukesmeli 0:3a2f06aeceaf 4060 }
buyukesmeli 0:3a2f06aeceaf 4061
buyukesmeli 0:3a2f06aeceaf 4062 LEAVE_FF(dj.fs, res);
buyukesmeli 0:3a2f06aeceaf 4063 }
buyukesmeli 0:3a2f06aeceaf 4064
buyukesmeli 0:3a2f06aeceaf 4065 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 4066 #endif /* _USE_LABEL */
buyukesmeli 0:3a2f06aeceaf 4067
buyukesmeli 0:3a2f06aeceaf 4068
buyukesmeli 0:3a2f06aeceaf 4069
buyukesmeli 0:3a2f06aeceaf 4070 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4071 /* Forward data to the stream directly (available on only tiny cfg) */
buyukesmeli 0:3a2f06aeceaf 4072 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4073 #if _USE_FORWARD && _FS_TINY
buyukesmeli 0:3a2f06aeceaf 4074
buyukesmeli 0:3a2f06aeceaf 4075 FRESULT f_forward (
buyukesmeli 0:3a2f06aeceaf 4076 FIL* fp, /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 4077 UINT (*func)(const BYTE*,UINT), /* Pointer to the streaming function */
buyukesmeli 0:3a2f06aeceaf 4078 UINT btf, /* Number of bytes to forward */
buyukesmeli 0:3a2f06aeceaf 4079 UINT* bf /* Pointer to number of bytes forwarded */
buyukesmeli 0:3a2f06aeceaf 4080 )
buyukesmeli 0:3a2f06aeceaf 4081 {
buyukesmeli 0:3a2f06aeceaf 4082 FRESULT res;
buyukesmeli 0:3a2f06aeceaf 4083 DWORD remain, clst, sect;
buyukesmeli 0:3a2f06aeceaf 4084 UINT rcnt;
buyukesmeli 0:3a2f06aeceaf 4085 BYTE csect;
buyukesmeli 0:3a2f06aeceaf 4086
buyukesmeli 0:3a2f06aeceaf 4087
buyukesmeli 0:3a2f06aeceaf 4088 *bf = 0; /* Clear transfer byte counter */
buyukesmeli 0:3a2f06aeceaf 4089
buyukesmeli 0:3a2f06aeceaf 4090 res = validate(fp); /* Check validity of the object */
buyukesmeli 0:3a2f06aeceaf 4091 if (res != FR_OK) LEAVE_FF(fp->fs, res);
buyukesmeli 0:3a2f06aeceaf 4092 if (fp->err) /* Check error */
buyukesmeli 0:3a2f06aeceaf 4093 LEAVE_FF(fp->fs, (FRESULT)fp->err);
buyukesmeli 0:3a2f06aeceaf 4094 if (!(fp->flag & FA_READ)) /* Check access mode */
buyukesmeli 0:3a2f06aeceaf 4095 LEAVE_FF(fp->fs, FR_DENIED);
buyukesmeli 0:3a2f06aeceaf 4096
buyukesmeli 0:3a2f06aeceaf 4097 remain = fp->fsize - fp->fptr;
buyukesmeli 0:3a2f06aeceaf 4098 if (btf > remain) btf = (UINT)remain; /* Truncate btf by remaining bytes */
buyukesmeli 0:3a2f06aeceaf 4099
buyukesmeli 0:3a2f06aeceaf 4100 for ( ; btf && (*func)(0, 0); /* Repeat until all data transferred or stream becomes busy */
buyukesmeli 0:3a2f06aeceaf 4101 fp->fptr += rcnt, *bf += rcnt, btf -= rcnt) {
buyukesmeli 0:3a2f06aeceaf 4102 csect = (BYTE)(fp->fptr / SS(fp->fs) & (fp->fs->csize - 1)); /* Sector offset in the cluster */
buyukesmeli 0:3a2f06aeceaf 4103 if ((fp->fptr % SS(fp->fs)) == 0) { /* On the sector boundary? */
buyukesmeli 0:3a2f06aeceaf 4104 if (!csect) { /* On the cluster boundary? */
buyukesmeli 0:3a2f06aeceaf 4105 clst = (fp->fptr == 0) ? /* On the top of the file? */
buyukesmeli 0:3a2f06aeceaf 4106 fp->sclust : get_fat(fp->fs, fp->clust);
buyukesmeli 0:3a2f06aeceaf 4107 if (clst <= 1) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 4108 if (clst == 0xFFFFFFFF) ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 4109 fp->clust = clst; /* Update current cluster */
buyukesmeli 0:3a2f06aeceaf 4110 }
buyukesmeli 0:3a2f06aeceaf 4111 }
buyukesmeli 0:3a2f06aeceaf 4112 sect = clust2sect(fp->fs, fp->clust); /* Get current data sector */
buyukesmeli 0:3a2f06aeceaf 4113 if (!sect) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 4114 sect += csect;
buyukesmeli 0:3a2f06aeceaf 4115 if (move_window(fp->fs, sect) != FR_OK) /* Move sector window */
buyukesmeli 0:3a2f06aeceaf 4116 ABORT(fp->fs, FR_DISK_ERR);
buyukesmeli 0:3a2f06aeceaf 4117 fp->dsect = sect;
buyukesmeli 0:3a2f06aeceaf 4118 rcnt = SS(fp->fs) - (WORD)(fp->fptr % SS(fp->fs)); /* Forward data from sector window */
buyukesmeli 0:3a2f06aeceaf 4119 if (rcnt > btf) rcnt = btf;
buyukesmeli 0:3a2f06aeceaf 4120 rcnt = (*func)(&fp->fs->win.d8[(WORD)fp->fptr % SS(fp->fs)], rcnt);
buyukesmeli 0:3a2f06aeceaf 4121 if (!rcnt) ABORT(fp->fs, FR_INT_ERR);
buyukesmeli 0:3a2f06aeceaf 4122 }
buyukesmeli 0:3a2f06aeceaf 4123
buyukesmeli 0:3a2f06aeceaf 4124 LEAVE_FF(fp->fs, FR_OK);
buyukesmeli 0:3a2f06aeceaf 4125 }
buyukesmeli 0:3a2f06aeceaf 4126 #endif /* _USE_FORWARD */
buyukesmeli 0:3a2f06aeceaf 4127
buyukesmeli 0:3a2f06aeceaf 4128
buyukesmeli 0:3a2f06aeceaf 4129
buyukesmeli 0:3a2f06aeceaf 4130 #if _USE_MKFS && !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 4131 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4132 /* Create file system on the logical drive */
buyukesmeli 0:3a2f06aeceaf 4133 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4134 #define N_ROOTDIR 512 /* Number of root directory entries for FAT12/16 */
buyukesmeli 0:3a2f06aeceaf 4135 #define N_FATS 1 /* Number of FATs (1 or 2) */
buyukesmeli 0:3a2f06aeceaf 4136
buyukesmeli 0:3a2f06aeceaf 4137
buyukesmeli 0:3a2f06aeceaf 4138 FRESULT f_mkfs (
buyukesmeli 0:3a2f06aeceaf 4139 const TCHAR* path, /* Logical drive number */
buyukesmeli 0:3a2f06aeceaf 4140 BYTE sfd, /* Partitioning rule 0:FDISK, 1:SFD */
buyukesmeli 0:3a2f06aeceaf 4141 UINT au /* Size of allocation unit in unit of byte or sector */
buyukesmeli 0:3a2f06aeceaf 4142 )
buyukesmeli 0:3a2f06aeceaf 4143 {
buyukesmeli 0:3a2f06aeceaf 4144 static const WORD vst[] = { 1024, 512, 256, 128, 64, 32, 16, 8, 4, 2, 0};
buyukesmeli 0:3a2f06aeceaf 4145 static const WORD cst[] = {32768, 16384, 8192, 4096, 2048, 16384, 8192, 4096, 2048, 1024, 512};
buyukesmeli 0:3a2f06aeceaf 4146 int vol;
buyukesmeli 0:3a2f06aeceaf 4147 BYTE fmt, md, sys, *tbl, pdrv, part;
buyukesmeli 0:3a2f06aeceaf 4148 DWORD n_clst, vs, n, wsect;
buyukesmeli 0:3a2f06aeceaf 4149 UINT i;
buyukesmeli 0:3a2f06aeceaf 4150 DWORD b_vol, b_fat, b_dir, b_data; /* LBA */
buyukesmeli 0:3a2f06aeceaf 4151 DWORD n_vol, n_rsv, n_fat, n_dir; /* Size */
buyukesmeli 0:3a2f06aeceaf 4152 FATFS *fs;
buyukesmeli 0:3a2f06aeceaf 4153 DSTATUS stat;
buyukesmeli 0:3a2f06aeceaf 4154 #if _USE_TRIM
buyukesmeli 0:3a2f06aeceaf 4155 DWORD eb[2];
buyukesmeli 0:3a2f06aeceaf 4156 #endif
buyukesmeli 0:3a2f06aeceaf 4157
buyukesmeli 0:3a2f06aeceaf 4158
buyukesmeli 0:3a2f06aeceaf 4159 /* Check mounted drive and clear work area */
buyukesmeli 0:3a2f06aeceaf 4160 if (sfd > 1) return FR_INVALID_PARAMETER;
buyukesmeli 0:3a2f06aeceaf 4161 vol = get_ldnumber(&path);
buyukesmeli 0:3a2f06aeceaf 4162 if (vol < 0) return FR_INVALID_DRIVE;
buyukesmeli 0:3a2f06aeceaf 4163 fs = FatFs[vol];
buyukesmeli 0:3a2f06aeceaf 4164 if (!fs) return FR_NOT_ENABLED;
buyukesmeli 0:3a2f06aeceaf 4165 fs->fs_type = 0;
buyukesmeli 0:3a2f06aeceaf 4166 pdrv = LD2PD(vol); /* Physical drive */
buyukesmeli 0:3a2f06aeceaf 4167 part = LD2PT(vol); /* Partition (0:auto detect, 1-4:get from partition table)*/
buyukesmeli 0:3a2f06aeceaf 4168
buyukesmeli 0:3a2f06aeceaf 4169 /* Get disk statics */
buyukesmeli 0:3a2f06aeceaf 4170 stat = disk_initialize(pdrv);
buyukesmeli 0:3a2f06aeceaf 4171 if (stat & STA_NOINIT) return FR_NOT_READY;
buyukesmeli 0:3a2f06aeceaf 4172 if (stat & STA_PROTECT) return FR_WRITE_PROTECTED;
buyukesmeli 0:3a2f06aeceaf 4173 #if _MAX_SS != _MIN_SS /* Get disk sector size */
buyukesmeli 0:3a2f06aeceaf 4174 if (disk_ioctl(pdrv, GET_SECTOR_SIZE, &SS(fs)) != RES_OK || SS(fs) > _MAX_SS || SS(fs) < _MIN_SS)
buyukesmeli 0:3a2f06aeceaf 4175 return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4176 #endif
buyukesmeli 0:3a2f06aeceaf 4177 if (_MULTI_PARTITION && part) {
buyukesmeli 0:3a2f06aeceaf 4178 /* Get partition information from partition table in the MBR */
buyukesmeli 0:3a2f06aeceaf 4179 if (disk_read(pdrv, fs->win.d8, 0, 1) != RES_OK) return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4180 if (LD_WORD(fs->win.d8 + BS_55AA) != 0xAA55) return FR_MKFS_ABORTED;
buyukesmeli 0:3a2f06aeceaf 4181 tbl = &fs->win.d8[MBR_Table + (part - 1) * SZ_PTE];
buyukesmeli 0:3a2f06aeceaf 4182 if (!tbl[4]) return FR_MKFS_ABORTED; /* No partition? */
buyukesmeli 0:3a2f06aeceaf 4183 b_vol = LD_DWORD(tbl + 8); /* Volume start sector */
buyukesmeli 0:3a2f06aeceaf 4184 n_vol = LD_DWORD(tbl + 12); /* Volume size */
buyukesmeli 0:3a2f06aeceaf 4185 } else {
buyukesmeli 0:3a2f06aeceaf 4186 /* Create a partition in this function */
buyukesmeli 0:3a2f06aeceaf 4187 if (disk_ioctl(pdrv, GET_SECTOR_COUNT, &n_vol) != RES_OK || n_vol < 128)
buyukesmeli 0:3a2f06aeceaf 4188 return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4189 b_vol = (sfd) ? 0 : 63; /* Volume start sector */
buyukesmeli 0:3a2f06aeceaf 4190 n_vol -= b_vol; /* Volume size */
buyukesmeli 0:3a2f06aeceaf 4191 }
buyukesmeli 0:3a2f06aeceaf 4192
buyukesmeli 0:3a2f06aeceaf 4193 if (au & (au - 1)) au = 0;
buyukesmeli 0:3a2f06aeceaf 4194 if (!au) { /* AU auto selection */
buyukesmeli 0:3a2f06aeceaf 4195 vs = n_vol / (2000 / (SS(fs) / 512));
buyukesmeli 0:3a2f06aeceaf 4196 for (i = 0; vs < vst[i]; i++) ;
buyukesmeli 0:3a2f06aeceaf 4197 au = cst[i];
buyukesmeli 0:3a2f06aeceaf 4198 }
buyukesmeli 0:3a2f06aeceaf 4199 if (au >= _MIN_SS) au /= SS(fs); /* Number of sectors per cluster */
buyukesmeli 0:3a2f06aeceaf 4200 if (!au) au = 1;
buyukesmeli 0:3a2f06aeceaf 4201 if (au > 128) au = 128;
buyukesmeli 0:3a2f06aeceaf 4202
buyukesmeli 0:3a2f06aeceaf 4203 /* Pre-compute number of clusters and FAT sub-type */
buyukesmeli 0:3a2f06aeceaf 4204 n_clst = n_vol / au;
buyukesmeli 0:3a2f06aeceaf 4205 fmt = FS_FAT12;
buyukesmeli 0:3a2f06aeceaf 4206 if (n_clst >= MIN_FAT16) fmt = FS_FAT16;
buyukesmeli 0:3a2f06aeceaf 4207 if (n_clst >= MIN_FAT32) fmt = FS_FAT32;
buyukesmeli 0:3a2f06aeceaf 4208
buyukesmeli 0:3a2f06aeceaf 4209 /* Determine offset and size of FAT structure */
buyukesmeli 0:3a2f06aeceaf 4210 if (fmt == FS_FAT32) {
buyukesmeli 0:3a2f06aeceaf 4211 n_fat = ((n_clst * 4) + 8 + SS(fs) - 1) / SS(fs);
buyukesmeli 0:3a2f06aeceaf 4212 n_rsv = 32;
buyukesmeli 0:3a2f06aeceaf 4213 n_dir = 0;
buyukesmeli 0:3a2f06aeceaf 4214 } else {
buyukesmeli 0:3a2f06aeceaf 4215 n_fat = (fmt == FS_FAT12) ? (n_clst * 3 + 1) / 2 + 3 : (n_clst * 2) + 4;
buyukesmeli 0:3a2f06aeceaf 4216 n_fat = (n_fat + SS(fs) - 1) / SS(fs);
buyukesmeli 0:3a2f06aeceaf 4217 n_rsv = 1;
buyukesmeli 0:3a2f06aeceaf 4218 n_dir = (DWORD)N_ROOTDIR * SZ_DIRE / SS(fs);
buyukesmeli 0:3a2f06aeceaf 4219 }
buyukesmeli 0:3a2f06aeceaf 4220 b_fat = b_vol + n_rsv; /* FAT area start sector */
buyukesmeli 0:3a2f06aeceaf 4221 b_dir = b_fat + n_fat * N_FATS; /* Directory area start sector */
buyukesmeli 0:3a2f06aeceaf 4222 b_data = b_dir + n_dir; /* Data area start sector */
buyukesmeli 0:3a2f06aeceaf 4223 if (n_vol < b_data + au - b_vol) return FR_MKFS_ABORTED; /* Too small volume */
buyukesmeli 0:3a2f06aeceaf 4224
buyukesmeli 0:3a2f06aeceaf 4225 /* Align data start sector to erase block boundary (for flash memory media) */
buyukesmeli 0:3a2f06aeceaf 4226 if (disk_ioctl(pdrv, GET_BLOCK_SIZE, &n) != RES_OK || !n || n > 32768) n = 1;
buyukesmeli 0:3a2f06aeceaf 4227 n = (b_data + n - 1) & ~(n - 1); /* Next nearest erase block from current data start */
buyukesmeli 0:3a2f06aeceaf 4228 n = (n - b_data) / N_FATS;
buyukesmeli 0:3a2f06aeceaf 4229 if (fmt == FS_FAT32) { /* FAT32: Move FAT offset */
buyukesmeli 0:3a2f06aeceaf 4230 n_rsv += n;
buyukesmeli 0:3a2f06aeceaf 4231 b_fat += n;
buyukesmeli 0:3a2f06aeceaf 4232 } else { /* FAT12/16: Expand FAT size */
buyukesmeli 0:3a2f06aeceaf 4233 n_fat += n;
buyukesmeli 0:3a2f06aeceaf 4234 }
buyukesmeli 0:3a2f06aeceaf 4235
buyukesmeli 0:3a2f06aeceaf 4236 /* Determine number of clusters and final check of validity of the FAT sub-type */
buyukesmeli 0:3a2f06aeceaf 4237 n_clst = (n_vol - n_rsv - n_fat * N_FATS - n_dir) / au;
buyukesmeli 0:3a2f06aeceaf 4238 if ( (fmt == FS_FAT16 && n_clst < MIN_FAT16)
buyukesmeli 0:3a2f06aeceaf 4239 || (fmt == FS_FAT32 && n_clst < MIN_FAT32))
buyukesmeli 0:3a2f06aeceaf 4240 return FR_MKFS_ABORTED;
buyukesmeli 0:3a2f06aeceaf 4241
buyukesmeli 0:3a2f06aeceaf 4242 /* Determine system ID in the partition table */
buyukesmeli 0:3a2f06aeceaf 4243 if (fmt == FS_FAT32) {
buyukesmeli 0:3a2f06aeceaf 4244 sys = 0x0C; /* FAT32X */
buyukesmeli 0:3a2f06aeceaf 4245 } else {
buyukesmeli 0:3a2f06aeceaf 4246 if (fmt == FS_FAT12 && n_vol < 0x10000) {
buyukesmeli 0:3a2f06aeceaf 4247 sys = 0x01; /* FAT12(<65536) */
buyukesmeli 0:3a2f06aeceaf 4248 } else {
buyukesmeli 0:3a2f06aeceaf 4249 sys = (n_vol < 0x10000) ? 0x04 : 0x06; /* FAT16(<65536) : FAT12/16(>=65536) */
buyukesmeli 0:3a2f06aeceaf 4250 }
buyukesmeli 0:3a2f06aeceaf 4251 }
buyukesmeli 0:3a2f06aeceaf 4252
buyukesmeli 0:3a2f06aeceaf 4253 if (_MULTI_PARTITION && part) {
buyukesmeli 0:3a2f06aeceaf 4254 /* Update system ID in the partition table */
buyukesmeli 0:3a2f06aeceaf 4255 tbl = &fs->win.d8[MBR_Table + (part - 1) * SZ_PTE];
buyukesmeli 0:3a2f06aeceaf 4256 tbl[4] = sys;
buyukesmeli 0:3a2f06aeceaf 4257 if (disk_write(pdrv, fs->win.d8, 0, 1) != RES_OK) /* Write it to teh MBR */
buyukesmeli 0:3a2f06aeceaf 4258 return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4259 md = 0xF8;
buyukesmeli 0:3a2f06aeceaf 4260 } else {
buyukesmeli 0:3a2f06aeceaf 4261 if (sfd) { /* No partition table (SFD) */
buyukesmeli 0:3a2f06aeceaf 4262 md = 0xF0;
buyukesmeli 0:3a2f06aeceaf 4263 } else { /* Create partition table (FDISK) */
buyukesmeli 0:3a2f06aeceaf 4264 mem_set(fs->win.d8, 0, SS(fs));
buyukesmeli 0:3a2f06aeceaf 4265 tbl = fs->win.d8 + MBR_Table; /* Create partition table for single partition in the drive */
buyukesmeli 0:3a2f06aeceaf 4266 tbl[1] = 1; /* Partition start head */
buyukesmeli 0:3a2f06aeceaf 4267 tbl[2] = 1; /* Partition start sector */
buyukesmeli 0:3a2f06aeceaf 4268 tbl[3] = 0; /* Partition start cylinder */
buyukesmeli 0:3a2f06aeceaf 4269 tbl[4] = sys; /* System type */
buyukesmeli 0:3a2f06aeceaf 4270 tbl[5] = 254; /* Partition end head */
buyukesmeli 0:3a2f06aeceaf 4271 n = (b_vol + n_vol) / 63 / 255;
buyukesmeli 0:3a2f06aeceaf 4272 tbl[6] = (BYTE)(n >> 2 | 63); /* Partition end sector */
buyukesmeli 0:3a2f06aeceaf 4273 tbl[7] = (BYTE)n; /* End cylinder */
buyukesmeli 0:3a2f06aeceaf 4274 ST_DWORD(tbl + 8, 63); /* Partition start in LBA */
buyukesmeli 0:3a2f06aeceaf 4275 ST_DWORD(tbl + 12, n_vol); /* Partition size in LBA */
buyukesmeli 0:3a2f06aeceaf 4276 ST_WORD(fs->win.d8 + BS_55AA, 0xAA55); /* MBR signature */
buyukesmeli 0:3a2f06aeceaf 4277 if (disk_write(pdrv, fs->win.d8, 0, 1) != RES_OK) /* Write it to the MBR */
buyukesmeli 0:3a2f06aeceaf 4278 return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4279 md = 0xF8;
buyukesmeli 0:3a2f06aeceaf 4280 }
buyukesmeli 0:3a2f06aeceaf 4281 }
buyukesmeli 0:3a2f06aeceaf 4282
buyukesmeli 0:3a2f06aeceaf 4283 /* Create BPB in the VBR */
buyukesmeli 0:3a2f06aeceaf 4284 tbl = fs->win.d8; /* Clear sector */
buyukesmeli 0:3a2f06aeceaf 4285 mem_set(tbl, 0, SS(fs));
buyukesmeli 0:3a2f06aeceaf 4286 mem_cpy(tbl, "\xEB\xFE\x90" "MSDOS5.0", 11);/* Boot jump code, OEM name */
buyukesmeli 0:3a2f06aeceaf 4287 i = SS(fs); /* Sector size */
buyukesmeli 0:3a2f06aeceaf 4288 ST_WORD(tbl + BPB_BytsPerSec, i);
buyukesmeli 0:3a2f06aeceaf 4289 tbl[BPB_SecPerClus] = (BYTE)au; /* Sectors per cluster */
buyukesmeli 0:3a2f06aeceaf 4290 ST_WORD(tbl + BPB_RsvdSecCnt, n_rsv); /* Reserved sectors */
buyukesmeli 0:3a2f06aeceaf 4291 tbl[BPB_NumFATs] = N_FATS; /* Number of FATs */
buyukesmeli 0:3a2f06aeceaf 4292 i = (fmt == FS_FAT32) ? 0 : N_ROOTDIR; /* Number of root directory entries */
buyukesmeli 0:3a2f06aeceaf 4293 ST_WORD(tbl + BPB_RootEntCnt, i);
buyukesmeli 0:3a2f06aeceaf 4294 if (n_vol < 0x10000) { /* Number of total sectors */
buyukesmeli 0:3a2f06aeceaf 4295 ST_WORD(tbl + BPB_TotSec16, n_vol);
buyukesmeli 0:3a2f06aeceaf 4296 } else {
buyukesmeli 0:3a2f06aeceaf 4297 ST_DWORD(tbl + BPB_TotSec32, n_vol);
buyukesmeli 0:3a2f06aeceaf 4298 }
buyukesmeli 0:3a2f06aeceaf 4299 tbl[BPB_Media] = md; /* Media descriptor */
buyukesmeli 0:3a2f06aeceaf 4300 ST_WORD(tbl + BPB_SecPerTrk, 63); /* Number of sectors per track */
buyukesmeli 0:3a2f06aeceaf 4301 ST_WORD(tbl + BPB_NumHeads, 255); /* Number of heads */
buyukesmeli 0:3a2f06aeceaf 4302 ST_DWORD(tbl + BPB_HiddSec, b_vol); /* Hidden sectors */
buyukesmeli 0:3a2f06aeceaf 4303 n = GET_FATTIME(); /* Use current time as VSN */
buyukesmeli 0:3a2f06aeceaf 4304 if (fmt == FS_FAT32) {
buyukesmeli 0:3a2f06aeceaf 4305 ST_DWORD(tbl + BS_VolID32, n); /* VSN */
buyukesmeli 0:3a2f06aeceaf 4306 ST_DWORD(tbl + BPB_FATSz32, n_fat); /* Number of sectors per FAT */
buyukesmeli 0:3a2f06aeceaf 4307 ST_DWORD(tbl + BPB_RootClus, 2); /* Root directory start cluster (2) */
buyukesmeli 0:3a2f06aeceaf 4308 ST_WORD(tbl + BPB_FSInfo, 1); /* FSINFO record offset (VBR + 1) */
buyukesmeli 0:3a2f06aeceaf 4309 ST_WORD(tbl + BPB_BkBootSec, 6); /* Backup boot record offset (VBR + 6) */
buyukesmeli 0:3a2f06aeceaf 4310 tbl[BS_DrvNum32] = 0x80; /* Drive number */
buyukesmeli 0:3a2f06aeceaf 4311 tbl[BS_BootSig32] = 0x29; /* Extended boot signature */
buyukesmeli 0:3a2f06aeceaf 4312 mem_cpy(tbl + BS_VolLab32, "NO NAME " "FAT32 ", 19); /* Volume label, FAT signature */
buyukesmeli 0:3a2f06aeceaf 4313 } else {
buyukesmeli 0:3a2f06aeceaf 4314 ST_DWORD(tbl + BS_VolID, n); /* VSN */
buyukesmeli 0:3a2f06aeceaf 4315 ST_WORD(tbl + BPB_FATSz16, n_fat); /* Number of sectors per FAT */
buyukesmeli 0:3a2f06aeceaf 4316 tbl[BS_DrvNum] = 0x80; /* Drive number */
buyukesmeli 0:3a2f06aeceaf 4317 tbl[BS_BootSig] = 0x29; /* Extended boot signature */
buyukesmeli 0:3a2f06aeceaf 4318 mem_cpy(tbl + BS_VolLab, "NO NAME " "FAT ", 19); /* Volume label, FAT signature */
buyukesmeli 0:3a2f06aeceaf 4319 }
buyukesmeli 0:3a2f06aeceaf 4320 ST_WORD(tbl + BS_55AA, 0xAA55); /* Signature (Offset is fixed here regardless of sector size) */
buyukesmeli 0:3a2f06aeceaf 4321 if (disk_write(pdrv, tbl, b_vol, 1) != RES_OK) /* Write it to the VBR sector */
buyukesmeli 0:3a2f06aeceaf 4322 return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4323 if (fmt == FS_FAT32) /* Write backup VBR if needed (VBR + 6) */
buyukesmeli 0:3a2f06aeceaf 4324 disk_write(pdrv, tbl, b_vol + 6, 1);
buyukesmeli 0:3a2f06aeceaf 4325
buyukesmeli 0:3a2f06aeceaf 4326 /* Initialize FAT area */
buyukesmeli 0:3a2f06aeceaf 4327 wsect = b_fat;
buyukesmeli 0:3a2f06aeceaf 4328 for (i = 0; i < N_FATS; i++) { /* Initialize each FAT copy */
buyukesmeli 0:3a2f06aeceaf 4329 mem_set(tbl, 0, SS(fs)); /* 1st sector of the FAT */
buyukesmeli 0:3a2f06aeceaf 4330 n = md; /* Media descriptor byte */
buyukesmeli 0:3a2f06aeceaf 4331 if (fmt != FS_FAT32) {
buyukesmeli 0:3a2f06aeceaf 4332 n |= (fmt == FS_FAT12) ? 0x00FFFF00 : 0xFFFFFF00;
buyukesmeli 0:3a2f06aeceaf 4333 ST_DWORD(tbl + 0, n); /* Reserve cluster #0-1 (FAT12/16) */
buyukesmeli 0:3a2f06aeceaf 4334 } else {
buyukesmeli 0:3a2f06aeceaf 4335 n |= 0xFFFFFF00;
buyukesmeli 0:3a2f06aeceaf 4336 ST_DWORD(tbl + 0, n); /* Reserve cluster #0-1 (FAT32) */
buyukesmeli 0:3a2f06aeceaf 4337 ST_DWORD(tbl + 4, 0xFFFFFFFF);
buyukesmeli 0:3a2f06aeceaf 4338 ST_DWORD(tbl + 8, 0x0FFFFFFF); /* Reserve cluster #2 for root directory */
buyukesmeli 0:3a2f06aeceaf 4339 }
buyukesmeli 0:3a2f06aeceaf 4340 if (disk_write(pdrv, tbl, wsect++, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 4341 return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4342 mem_set(tbl, 0, SS(fs)); /* Fill following FAT entries with zero */
buyukesmeli 0:3a2f06aeceaf 4343 for (n = 1; n < n_fat; n++) { /* This loop may take a time on FAT32 volume due to many single sector writes */
buyukesmeli 0:3a2f06aeceaf 4344 if (disk_write(pdrv, tbl, wsect++, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 4345 return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4346 }
buyukesmeli 0:3a2f06aeceaf 4347 }
buyukesmeli 0:3a2f06aeceaf 4348
buyukesmeli 0:3a2f06aeceaf 4349 /* Initialize root directory */
buyukesmeli 0:3a2f06aeceaf 4350 i = (fmt == FS_FAT32) ? au : (UINT)n_dir;
buyukesmeli 0:3a2f06aeceaf 4351 do {
buyukesmeli 0:3a2f06aeceaf 4352 if (disk_write(pdrv, tbl, wsect++, 1) != RES_OK)
buyukesmeli 0:3a2f06aeceaf 4353 return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4354 } while (--i);
buyukesmeli 0:3a2f06aeceaf 4355
buyukesmeli 0:3a2f06aeceaf 4356 #if _USE_TRIM /* Erase data area if needed */
buyukesmeli 0:3a2f06aeceaf 4357 {
buyukesmeli 0:3a2f06aeceaf 4358 eb[0] = wsect; eb[1] = wsect + (n_clst - ((fmt == FS_FAT32) ? 1 : 0)) * au - 1;
buyukesmeli 0:3a2f06aeceaf 4359 disk_ioctl(pdrv, CTRL_TRIM, eb);
buyukesmeli 0:3a2f06aeceaf 4360 }
buyukesmeli 0:3a2f06aeceaf 4361 #endif
buyukesmeli 0:3a2f06aeceaf 4362
buyukesmeli 0:3a2f06aeceaf 4363 /* Create FSINFO if needed */
buyukesmeli 0:3a2f06aeceaf 4364 if (fmt == FS_FAT32) {
buyukesmeli 0:3a2f06aeceaf 4365 ST_DWORD(tbl + FSI_LeadSig, 0x41615252);
buyukesmeli 0:3a2f06aeceaf 4366 ST_DWORD(tbl + FSI_StrucSig, 0x61417272);
buyukesmeli 0:3a2f06aeceaf 4367 ST_DWORD(tbl + FSI_Free_Count, n_clst - 1); /* Number of free clusters */
buyukesmeli 0:3a2f06aeceaf 4368 ST_DWORD(tbl + FSI_Nxt_Free, 2); /* Last allocated cluster# */
buyukesmeli 0:3a2f06aeceaf 4369 ST_WORD(tbl + BS_55AA, 0xAA55);
buyukesmeli 0:3a2f06aeceaf 4370 disk_write(pdrv, tbl, b_vol + 1, 1); /* Write original (VBR + 1) */
buyukesmeli 0:3a2f06aeceaf 4371 disk_write(pdrv, tbl, b_vol + 7, 1); /* Write backup (VBR + 7) */
buyukesmeli 0:3a2f06aeceaf 4372 }
buyukesmeli 0:3a2f06aeceaf 4373
buyukesmeli 0:3a2f06aeceaf 4374 return (disk_ioctl(pdrv, CTRL_SYNC, 0) == RES_OK) ? FR_OK : FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4375 }
buyukesmeli 0:3a2f06aeceaf 4376
buyukesmeli 0:3a2f06aeceaf 4377
buyukesmeli 0:3a2f06aeceaf 4378
buyukesmeli 0:3a2f06aeceaf 4379 #if _MULTI_PARTITION
buyukesmeli 0:3a2f06aeceaf 4380 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4381 /* Create partition table on the physical drive */
buyukesmeli 0:3a2f06aeceaf 4382 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4383
buyukesmeli 0:3a2f06aeceaf 4384 FRESULT f_fdisk (
buyukesmeli 0:3a2f06aeceaf 4385 BYTE pdrv, /* Physical drive number */
buyukesmeli 0:3a2f06aeceaf 4386 const DWORD szt[], /* Pointer to the size table for each partitions */
buyukesmeli 0:3a2f06aeceaf 4387 void* work /* Pointer to the working buffer */
buyukesmeli 0:3a2f06aeceaf 4388 )
buyukesmeli 0:3a2f06aeceaf 4389 {
buyukesmeli 0:3a2f06aeceaf 4390 UINT i, n, sz_cyl, tot_cyl, b_cyl, e_cyl, p_cyl;
buyukesmeli 0:3a2f06aeceaf 4391 BYTE s_hd, e_hd, *p, *buf = (BYTE*)work;
buyukesmeli 0:3a2f06aeceaf 4392 DSTATUS stat;
buyukesmeli 0:3a2f06aeceaf 4393 DWORD sz_disk, sz_part, s_part;
buyukesmeli 0:3a2f06aeceaf 4394
buyukesmeli 0:3a2f06aeceaf 4395
buyukesmeli 0:3a2f06aeceaf 4396 stat = disk_initialize(pdrv);
buyukesmeli 0:3a2f06aeceaf 4397 if (stat & STA_NOINIT) return FR_NOT_READY;
buyukesmeli 0:3a2f06aeceaf 4398 if (stat & STA_PROTECT) return FR_WRITE_PROTECTED;
buyukesmeli 0:3a2f06aeceaf 4399 if (disk_ioctl(pdrv, GET_SECTOR_COUNT, &sz_disk)) return FR_DISK_ERR;
buyukesmeli 0:3a2f06aeceaf 4400
buyukesmeli 0:3a2f06aeceaf 4401 /* Determine CHS in the table regardless of the drive geometry */
buyukesmeli 0:3a2f06aeceaf 4402 for (n = 16; n < 256 && sz_disk / n / 63 > 1024; n *= 2) ;
buyukesmeli 0:3a2f06aeceaf 4403 if (n == 256) n--;
buyukesmeli 0:3a2f06aeceaf 4404 e_hd = n - 1;
buyukesmeli 0:3a2f06aeceaf 4405 sz_cyl = 63 * n;
buyukesmeli 0:3a2f06aeceaf 4406 tot_cyl = sz_disk / sz_cyl;
buyukesmeli 0:3a2f06aeceaf 4407
buyukesmeli 0:3a2f06aeceaf 4408 /* Create partition table */
buyukesmeli 0:3a2f06aeceaf 4409 mem_set(buf, 0, _MAX_SS);
buyukesmeli 0:3a2f06aeceaf 4410 p = buf + MBR_Table; b_cyl = 0;
buyukesmeli 0:3a2f06aeceaf 4411 for (i = 0; i < 4; i++, p += SZ_PTE) {
buyukesmeli 0:3a2f06aeceaf 4412 p_cyl = (szt[i] <= 100U) ? (DWORD)tot_cyl * szt[i] / 100 : szt[i] / sz_cyl;
buyukesmeli 0:3a2f06aeceaf 4413 if (!p_cyl) continue;
buyukesmeli 0:3a2f06aeceaf 4414 s_part = (DWORD)sz_cyl * b_cyl;
buyukesmeli 0:3a2f06aeceaf 4415 sz_part = (DWORD)sz_cyl * p_cyl;
buyukesmeli 0:3a2f06aeceaf 4416 if (i == 0) { /* Exclude first track of cylinder 0 */
buyukesmeli 0:3a2f06aeceaf 4417 s_hd = 1;
buyukesmeli 0:3a2f06aeceaf 4418 s_part += 63; sz_part -= 63;
buyukesmeli 0:3a2f06aeceaf 4419 } else {
buyukesmeli 0:3a2f06aeceaf 4420 s_hd = 0;
buyukesmeli 0:3a2f06aeceaf 4421 }
buyukesmeli 0:3a2f06aeceaf 4422 e_cyl = b_cyl + p_cyl - 1;
buyukesmeli 0:3a2f06aeceaf 4423 if (e_cyl >= tot_cyl) return FR_INVALID_PARAMETER;
buyukesmeli 0:3a2f06aeceaf 4424
buyukesmeli 0:3a2f06aeceaf 4425 /* Set partition table */
buyukesmeli 0:3a2f06aeceaf 4426 p[1] = s_hd; /* Start head */
buyukesmeli 0:3a2f06aeceaf 4427 p[2] = (BYTE)((b_cyl >> 2) + 1); /* Start sector */
buyukesmeli 0:3a2f06aeceaf 4428 p[3] = (BYTE)b_cyl; /* Start cylinder */
buyukesmeli 0:3a2f06aeceaf 4429 p[4] = 0x06; /* System type (temporary setting) */
buyukesmeli 0:3a2f06aeceaf 4430 p[5] = e_hd; /* End head */
buyukesmeli 0:3a2f06aeceaf 4431 p[6] = (BYTE)((e_cyl >> 2) + 63); /* End sector */
buyukesmeli 0:3a2f06aeceaf 4432 p[7] = (BYTE)e_cyl; /* End cylinder */
buyukesmeli 0:3a2f06aeceaf 4433 ST_DWORD(p + 8, s_part); /* Start sector in LBA */
buyukesmeli 0:3a2f06aeceaf 4434 ST_DWORD(p + 12, sz_part); /* Partition size */
buyukesmeli 0:3a2f06aeceaf 4435
buyukesmeli 0:3a2f06aeceaf 4436 /* Next partition */
buyukesmeli 0:3a2f06aeceaf 4437 b_cyl += p_cyl;
buyukesmeli 0:3a2f06aeceaf 4438 }
buyukesmeli 0:3a2f06aeceaf 4439 ST_WORD(p, 0xAA55);
buyukesmeli 0:3a2f06aeceaf 4440
buyukesmeli 0:3a2f06aeceaf 4441 /* Write it to the MBR */
buyukesmeli 0:3a2f06aeceaf 4442 return (disk_write(pdrv, buf, 0, 1) != RES_OK || disk_ioctl(pdrv, CTRL_SYNC, 0) != RES_OK) ? FR_DISK_ERR : FR_OK;
buyukesmeli 0:3a2f06aeceaf 4443 }
buyukesmeli 0:3a2f06aeceaf 4444
buyukesmeli 0:3a2f06aeceaf 4445
buyukesmeli 0:3a2f06aeceaf 4446 #endif /* _MULTI_PARTITION */
buyukesmeli 0:3a2f06aeceaf 4447 #endif /* _USE_MKFS && !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 4448
buyukesmeli 0:3a2f06aeceaf 4449
buyukesmeli 0:3a2f06aeceaf 4450
buyukesmeli 0:3a2f06aeceaf 4451
buyukesmeli 0:3a2f06aeceaf 4452 #if _USE_STRFUNC
buyukesmeli 0:3a2f06aeceaf 4453 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4454 /* Get a string from the file */
buyukesmeli 0:3a2f06aeceaf 4455 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4456
buyukesmeli 0:3a2f06aeceaf 4457 TCHAR* f_gets (
buyukesmeli 0:3a2f06aeceaf 4458 TCHAR* buff, /* Pointer to the string buffer to read */
buyukesmeli 0:3a2f06aeceaf 4459 int len, /* Size of string buffer (characters) */
buyukesmeli 0:3a2f06aeceaf 4460 FIL* fp /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 4461 )
buyukesmeli 0:3a2f06aeceaf 4462 {
buyukesmeli 0:3a2f06aeceaf 4463 int n = 0;
buyukesmeli 0:3a2f06aeceaf 4464 TCHAR c, *p = buff;
buyukesmeli 0:3a2f06aeceaf 4465 BYTE s[2];
buyukesmeli 0:3a2f06aeceaf 4466 UINT rc;
buyukesmeli 0:3a2f06aeceaf 4467
buyukesmeli 0:3a2f06aeceaf 4468
buyukesmeli 0:3a2f06aeceaf 4469 while (n < len - 1) { /* Read characters until buffer gets filled */
buyukesmeli 0:3a2f06aeceaf 4470 #if _USE_LFN && _LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 4471 #if _STRF_ENCODE == 3 /* Read a character in UTF-8 */
buyukesmeli 0:3a2f06aeceaf 4472 f_read(fp, s, 1, &rc);
buyukesmeli 0:3a2f06aeceaf 4473 if (rc != 1) break;
buyukesmeli 0:3a2f06aeceaf 4474 c = s[0];
buyukesmeli 0:3a2f06aeceaf 4475 if (c >= 0x80) {
buyukesmeli 0:3a2f06aeceaf 4476 if (c < 0xC0) continue; /* Skip stray trailer */
buyukesmeli 0:3a2f06aeceaf 4477 if (c < 0xE0) { /* Two-byte sequence */
buyukesmeli 0:3a2f06aeceaf 4478 f_read(fp, s, 1, &rc);
buyukesmeli 0:3a2f06aeceaf 4479 if (rc != 1) break;
buyukesmeli 0:3a2f06aeceaf 4480 c = (c & 0x1F) << 6 | (s[0] & 0x3F);
buyukesmeli 0:3a2f06aeceaf 4481 if (c < 0x80) c = '?';
buyukesmeli 0:3a2f06aeceaf 4482 } else {
buyukesmeli 0:3a2f06aeceaf 4483 if (c < 0xF0) { /* Three-byte sequence */
buyukesmeli 0:3a2f06aeceaf 4484 f_read(fp, s, 2, &rc);
buyukesmeli 0:3a2f06aeceaf 4485 if (rc != 2) break;
buyukesmeli 0:3a2f06aeceaf 4486 c = c << 12 | (s[0] & 0x3F) << 6 | (s[1] & 0x3F);
buyukesmeli 0:3a2f06aeceaf 4487 if (c < 0x800) c = '?';
buyukesmeli 0:3a2f06aeceaf 4488 } else { /* Reject four-byte sequence */
buyukesmeli 0:3a2f06aeceaf 4489 c = '?';
buyukesmeli 0:3a2f06aeceaf 4490 }
buyukesmeli 0:3a2f06aeceaf 4491 }
buyukesmeli 0:3a2f06aeceaf 4492 }
buyukesmeli 0:3a2f06aeceaf 4493 #elif _STRF_ENCODE == 2 /* Read a character in UTF-16BE */
buyukesmeli 0:3a2f06aeceaf 4494 f_read(fp, s, 2, &rc);
buyukesmeli 0:3a2f06aeceaf 4495 if (rc != 2) break;
buyukesmeli 0:3a2f06aeceaf 4496 c = s[1] + (s[0] << 8);
buyukesmeli 0:3a2f06aeceaf 4497 #elif _STRF_ENCODE == 1 /* Read a character in UTF-16LE */
buyukesmeli 0:3a2f06aeceaf 4498 f_read(fp, s, 2, &rc);
buyukesmeli 0:3a2f06aeceaf 4499 if (rc != 2) break;
buyukesmeli 0:3a2f06aeceaf 4500 c = s[0] + (s[1] << 8);
buyukesmeli 0:3a2f06aeceaf 4501 #else /* Read a character in ANSI/OEM */
buyukesmeli 0:3a2f06aeceaf 4502 f_read(fp, s, 1, &rc);
buyukesmeli 0:3a2f06aeceaf 4503 if (rc != 1) break;
buyukesmeli 0:3a2f06aeceaf 4504 c = s[0];
buyukesmeli 0:3a2f06aeceaf 4505 if (IsDBCS1(c)) {
buyukesmeli 0:3a2f06aeceaf 4506 f_read(fp, s, 1, &rc);
buyukesmeli 0:3a2f06aeceaf 4507 if (rc != 1) break;
buyukesmeli 0:3a2f06aeceaf 4508 c = (c << 8) + s[0];
buyukesmeli 0:3a2f06aeceaf 4509 }
buyukesmeli 0:3a2f06aeceaf 4510 c = ff_convert(c, 1); /* OEM -> Unicode */
buyukesmeli 0:3a2f06aeceaf 4511 if (!c) c = '?';
buyukesmeli 0:3a2f06aeceaf 4512 #endif
buyukesmeli 0:3a2f06aeceaf 4513 #else /* Read a character without conversion */
buyukesmeli 0:3a2f06aeceaf 4514 f_read(fp, s, 1, &rc);
buyukesmeli 0:3a2f06aeceaf 4515 if (rc != 1) break;
buyukesmeli 0:3a2f06aeceaf 4516 c = s[0];
buyukesmeli 0:3a2f06aeceaf 4517 #endif
buyukesmeli 0:3a2f06aeceaf 4518 if (_USE_STRFUNC == 2 && c == '\r') continue; /* Strip '\r' */
buyukesmeli 0:3a2f06aeceaf 4519 *p++ = c;
buyukesmeli 0:3a2f06aeceaf 4520 n++;
buyukesmeli 0:3a2f06aeceaf 4521 if (c == '\n') break; /* Break on EOL */
buyukesmeli 0:3a2f06aeceaf 4522 }
buyukesmeli 0:3a2f06aeceaf 4523 *p = 0;
buyukesmeli 0:3a2f06aeceaf 4524 return n ? buff : 0; /* When no data read (eof or error), return with error. */
buyukesmeli 0:3a2f06aeceaf 4525 }
buyukesmeli 0:3a2f06aeceaf 4526
buyukesmeli 0:3a2f06aeceaf 4527
buyukesmeli 0:3a2f06aeceaf 4528
buyukesmeli 0:3a2f06aeceaf 4529
buyukesmeli 0:3a2f06aeceaf 4530 #if !_FS_READONLY
buyukesmeli 0:3a2f06aeceaf 4531 #include <stdarg.h>
buyukesmeli 0:3a2f06aeceaf 4532 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4533 /* Put a character to the file */
buyukesmeli 0:3a2f06aeceaf 4534 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4535
buyukesmeli 0:3a2f06aeceaf 4536 typedef struct {
buyukesmeli 0:3a2f06aeceaf 4537 FIL* fp;
buyukesmeli 0:3a2f06aeceaf 4538 int idx, nchr;
buyukesmeli 0:3a2f06aeceaf 4539 BYTE buf[64];
buyukesmeli 0:3a2f06aeceaf 4540 } putbuff;
buyukesmeli 0:3a2f06aeceaf 4541
buyukesmeli 0:3a2f06aeceaf 4542
buyukesmeli 0:3a2f06aeceaf 4543 static
buyukesmeli 0:3a2f06aeceaf 4544 void putc_bfd (
buyukesmeli 0:3a2f06aeceaf 4545 putbuff* pb,
buyukesmeli 0:3a2f06aeceaf 4546 TCHAR c
buyukesmeli 0:3a2f06aeceaf 4547 )
buyukesmeli 0:3a2f06aeceaf 4548 {
buyukesmeli 0:3a2f06aeceaf 4549 UINT bw;
buyukesmeli 0:3a2f06aeceaf 4550 int i;
buyukesmeli 0:3a2f06aeceaf 4551
buyukesmeli 0:3a2f06aeceaf 4552
buyukesmeli 0:3a2f06aeceaf 4553 if (_USE_STRFUNC == 2 && c == '\n') /* LF -> CRLF conversion */
buyukesmeli 0:3a2f06aeceaf 4554 putc_bfd(pb, '\r');
buyukesmeli 0:3a2f06aeceaf 4555
buyukesmeli 0:3a2f06aeceaf 4556 i = pb->idx; /* Buffer write index (-1:error) */
buyukesmeli 0:3a2f06aeceaf 4557 if (i < 0) return;
buyukesmeli 0:3a2f06aeceaf 4558
buyukesmeli 0:3a2f06aeceaf 4559 #if _USE_LFN && _LFN_UNICODE
buyukesmeli 0:3a2f06aeceaf 4560 #if _STRF_ENCODE == 3 /* Write a character in UTF-8 */
buyukesmeli 0:3a2f06aeceaf 4561 if (c < 0x80) { /* 7-bit */
buyukesmeli 0:3a2f06aeceaf 4562 pb->buf[i++] = (BYTE)c;
buyukesmeli 0:3a2f06aeceaf 4563 } else {
buyukesmeli 0:3a2f06aeceaf 4564 if (c < 0x800) { /* 11-bit */
buyukesmeli 0:3a2f06aeceaf 4565 pb->buf[i++] = (BYTE)(0xC0 | c >> 6);
buyukesmeli 0:3a2f06aeceaf 4566 } else { /* 16-bit */
buyukesmeli 0:3a2f06aeceaf 4567 pb->buf[i++] = (BYTE)(0xE0 | c >> 12);
buyukesmeli 0:3a2f06aeceaf 4568 pb->buf[i++] = (BYTE)(0x80 | (c >> 6 & 0x3F));
buyukesmeli 0:3a2f06aeceaf 4569 }
buyukesmeli 0:3a2f06aeceaf 4570 pb->buf[i++] = (BYTE)(0x80 | (c & 0x3F));
buyukesmeli 0:3a2f06aeceaf 4571 }
buyukesmeli 0:3a2f06aeceaf 4572 #elif _STRF_ENCODE == 2 /* Write a character in UTF-16BE */
buyukesmeli 0:3a2f06aeceaf 4573 pb->buf[i++] = (BYTE)(c >> 8);
buyukesmeli 0:3a2f06aeceaf 4574 pb->buf[i++] = (BYTE)c;
buyukesmeli 0:3a2f06aeceaf 4575 #elif _STRF_ENCODE == 1 /* Write a character in UTF-16LE */
buyukesmeli 0:3a2f06aeceaf 4576 pb->buf[i++] = (BYTE)c;
buyukesmeli 0:3a2f06aeceaf 4577 pb->buf[i++] = (BYTE)(c >> 8);
buyukesmeli 0:3a2f06aeceaf 4578 #else /* Write a character in ANSI/OEM */
buyukesmeli 0:3a2f06aeceaf 4579 c = ff_convert(c, 0); /* Unicode -> OEM */
buyukesmeli 0:3a2f06aeceaf 4580 if (!c) c = '?';
buyukesmeli 0:3a2f06aeceaf 4581 if (c >= 0x100)
buyukesmeli 0:3a2f06aeceaf 4582 pb->buf[i++] = (BYTE)(c >> 8);
buyukesmeli 0:3a2f06aeceaf 4583 pb->buf[i++] = (BYTE)c;
buyukesmeli 0:3a2f06aeceaf 4584 #endif
buyukesmeli 0:3a2f06aeceaf 4585 #else /* Write a character without conversion */
buyukesmeli 0:3a2f06aeceaf 4586 pb->buf[i++] = (BYTE)c;
buyukesmeli 0:3a2f06aeceaf 4587 #endif
buyukesmeli 0:3a2f06aeceaf 4588
buyukesmeli 0:3a2f06aeceaf 4589 if (i >= (int)(sizeof pb->buf) - 3) { /* Write buffered characters to the file */
buyukesmeli 0:3a2f06aeceaf 4590 f_write(pb->fp, pb->buf, (UINT)i, &bw);
buyukesmeli 0:3a2f06aeceaf 4591 i = (bw == (UINT)i) ? 0 : -1;
buyukesmeli 0:3a2f06aeceaf 4592 }
buyukesmeli 0:3a2f06aeceaf 4593 pb->idx = i;
buyukesmeli 0:3a2f06aeceaf 4594 pb->nchr++;
buyukesmeli 0:3a2f06aeceaf 4595 }
buyukesmeli 0:3a2f06aeceaf 4596
buyukesmeli 0:3a2f06aeceaf 4597
buyukesmeli 0:3a2f06aeceaf 4598
buyukesmeli 0:3a2f06aeceaf 4599 int f_putc (
buyukesmeli 0:3a2f06aeceaf 4600 TCHAR c, /* A character to be output */
buyukesmeli 0:3a2f06aeceaf 4601 FIL* fp /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 4602 )
buyukesmeli 0:3a2f06aeceaf 4603 {
buyukesmeli 0:3a2f06aeceaf 4604 putbuff pb;
buyukesmeli 0:3a2f06aeceaf 4605 UINT nw;
buyukesmeli 0:3a2f06aeceaf 4606
buyukesmeli 0:3a2f06aeceaf 4607
buyukesmeli 0:3a2f06aeceaf 4608 pb.fp = fp; /* Initialize output buffer */
buyukesmeli 0:3a2f06aeceaf 4609 pb.nchr = pb.idx = 0;
buyukesmeli 0:3a2f06aeceaf 4610
buyukesmeli 0:3a2f06aeceaf 4611 putc_bfd(&pb, c); /* Put a character */
buyukesmeli 0:3a2f06aeceaf 4612
buyukesmeli 0:3a2f06aeceaf 4613 if ( pb.idx >= 0 /* Flush buffered characters to the file */
buyukesmeli 0:3a2f06aeceaf 4614 && f_write(pb.fp, pb.buf, (UINT)pb.idx, &nw) == FR_OK
buyukesmeli 0:3a2f06aeceaf 4615 && (UINT)pb.idx == nw) return pb.nchr;
buyukesmeli 0:3a2f06aeceaf 4616 return EOF;
buyukesmeli 0:3a2f06aeceaf 4617 }
buyukesmeli 0:3a2f06aeceaf 4618
buyukesmeli 0:3a2f06aeceaf 4619
buyukesmeli 0:3a2f06aeceaf 4620
buyukesmeli 0:3a2f06aeceaf 4621
buyukesmeli 0:3a2f06aeceaf 4622 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4623 /* Put a string to the file */
buyukesmeli 0:3a2f06aeceaf 4624 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4625
buyukesmeli 0:3a2f06aeceaf 4626 int f_puts (
buyukesmeli 0:3a2f06aeceaf 4627 const TCHAR* str, /* Pointer to the string to be output */
buyukesmeli 0:3a2f06aeceaf 4628 FIL* fp /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 4629 )
buyukesmeli 0:3a2f06aeceaf 4630 {
buyukesmeli 0:3a2f06aeceaf 4631 putbuff pb;
buyukesmeli 0:3a2f06aeceaf 4632 UINT nw;
buyukesmeli 0:3a2f06aeceaf 4633
buyukesmeli 0:3a2f06aeceaf 4634
buyukesmeli 0:3a2f06aeceaf 4635 pb.fp = fp; /* Initialize output buffer */
buyukesmeli 0:3a2f06aeceaf 4636 pb.nchr = pb.idx = 0;
buyukesmeli 0:3a2f06aeceaf 4637
buyukesmeli 0:3a2f06aeceaf 4638 while (*str) /* Put the string */
buyukesmeli 0:3a2f06aeceaf 4639 putc_bfd(&pb, *str++);
buyukesmeli 0:3a2f06aeceaf 4640
buyukesmeli 0:3a2f06aeceaf 4641 if ( pb.idx >= 0 /* Flush buffered characters to the file */
buyukesmeli 0:3a2f06aeceaf 4642 && f_write(pb.fp, pb.buf, (UINT)pb.idx, &nw) == FR_OK
buyukesmeli 0:3a2f06aeceaf 4643 && (UINT)pb.idx == nw) return pb.nchr;
buyukesmeli 0:3a2f06aeceaf 4644 return EOF;
buyukesmeli 0:3a2f06aeceaf 4645 }
buyukesmeli 0:3a2f06aeceaf 4646
buyukesmeli 0:3a2f06aeceaf 4647
buyukesmeli 0:3a2f06aeceaf 4648
buyukesmeli 0:3a2f06aeceaf 4649
buyukesmeli 0:3a2f06aeceaf 4650 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4651 /* Put a formatted string to the file */
buyukesmeli 0:3a2f06aeceaf 4652 /*-----------------------------------------------------------------------*/
buyukesmeli 0:3a2f06aeceaf 4653
buyukesmeli 0:3a2f06aeceaf 4654 int f_printf (
buyukesmeli 0:3a2f06aeceaf 4655 FIL* fp, /* Pointer to the file object */
buyukesmeli 0:3a2f06aeceaf 4656 const TCHAR* fmt, /* Pointer to the format string */
buyukesmeli 0:3a2f06aeceaf 4657 ... /* Optional arguments... */
buyukesmeli 0:3a2f06aeceaf 4658 )
buyukesmeli 0:3a2f06aeceaf 4659 {
buyukesmeli 0:3a2f06aeceaf 4660 va_list arp;
buyukesmeli 0:3a2f06aeceaf 4661 BYTE f, r;
buyukesmeli 0:3a2f06aeceaf 4662 UINT nw, i, j, w;
buyukesmeli 0:3a2f06aeceaf 4663 DWORD v;
buyukesmeli 0:3a2f06aeceaf 4664 TCHAR c, d, s[16], *p;
buyukesmeli 0:3a2f06aeceaf 4665 putbuff pb;
buyukesmeli 0:3a2f06aeceaf 4666
buyukesmeli 0:3a2f06aeceaf 4667
buyukesmeli 0:3a2f06aeceaf 4668 pb.fp = fp; /* Initialize output buffer */
buyukesmeli 0:3a2f06aeceaf 4669 pb.nchr = pb.idx = 0;
buyukesmeli 0:3a2f06aeceaf 4670
buyukesmeli 0:3a2f06aeceaf 4671 va_start(arp, fmt);
buyukesmeli 0:3a2f06aeceaf 4672
buyukesmeli 0:3a2f06aeceaf 4673 for (;;) {
buyukesmeli 0:3a2f06aeceaf 4674 c = *fmt++;
buyukesmeli 0:3a2f06aeceaf 4675 if (c == 0) break; /* End of string */
buyukesmeli 0:3a2f06aeceaf 4676 if (c != '%') { /* Non escape character */
buyukesmeli 0:3a2f06aeceaf 4677 putc_bfd(&pb, c);
buyukesmeli 0:3a2f06aeceaf 4678 continue;
buyukesmeli 0:3a2f06aeceaf 4679 }
buyukesmeli 0:3a2f06aeceaf 4680 w = f = 0;
buyukesmeli 0:3a2f06aeceaf 4681 c = *fmt++;
buyukesmeli 0:3a2f06aeceaf 4682 if (c == '0') { /* Flag: '0' padding */
buyukesmeli 0:3a2f06aeceaf 4683 f = 1; c = *fmt++;
buyukesmeli 0:3a2f06aeceaf 4684 } else {
buyukesmeli 0:3a2f06aeceaf 4685 if (c == '-') { /* Flag: left justified */
buyukesmeli 0:3a2f06aeceaf 4686 f = 2; c = *fmt++;
buyukesmeli 0:3a2f06aeceaf 4687 }
buyukesmeli 0:3a2f06aeceaf 4688 }
buyukesmeli 0:3a2f06aeceaf 4689 while (IsDigit(c)) { /* Precision */
buyukesmeli 0:3a2f06aeceaf 4690 w = w * 10 + c - '0';
buyukesmeli 0:3a2f06aeceaf 4691 c = *fmt++;
buyukesmeli 0:3a2f06aeceaf 4692 }
buyukesmeli 0:3a2f06aeceaf 4693 if (c == 'l' || c == 'L') { /* Prefix: Size is long int */
buyukesmeli 0:3a2f06aeceaf 4694 f |= 4; c = *fmt++;
buyukesmeli 0:3a2f06aeceaf 4695 }
buyukesmeli 0:3a2f06aeceaf 4696 if (!c) break;
buyukesmeli 0:3a2f06aeceaf 4697 d = c;
buyukesmeli 0:3a2f06aeceaf 4698 if (IsLower(d)) d -= 0x20;
buyukesmeli 0:3a2f06aeceaf 4699 switch (d) { /* Type is... */
buyukesmeli 0:3a2f06aeceaf 4700 case 'S' : /* String */
buyukesmeli 0:3a2f06aeceaf 4701 p = va_arg(arp, TCHAR*);
buyukesmeli 0:3a2f06aeceaf 4702 for (j = 0; p[j]; j++) ;
buyukesmeli 0:3a2f06aeceaf 4703 if (!(f & 2)) {
buyukesmeli 0:3a2f06aeceaf 4704 while (j++ < w) putc_bfd(&pb, ' ');
buyukesmeli 0:3a2f06aeceaf 4705 }
buyukesmeli 0:3a2f06aeceaf 4706 while (*p) putc_bfd(&pb, *p++);
buyukesmeli 0:3a2f06aeceaf 4707 while (j++ < w) putc_bfd(&pb, ' ');
buyukesmeli 0:3a2f06aeceaf 4708 continue;
buyukesmeli 0:3a2f06aeceaf 4709 case 'C' : /* Character */
buyukesmeli 0:3a2f06aeceaf 4710 putc_bfd(&pb, (TCHAR)va_arg(arp, int)); continue;
buyukesmeli 0:3a2f06aeceaf 4711 case 'B' : /* Binary */
buyukesmeli 0:3a2f06aeceaf 4712 r = 2; break;
buyukesmeli 0:3a2f06aeceaf 4713 case 'O' : /* Octal */
buyukesmeli 0:3a2f06aeceaf 4714 r = 8; break;
buyukesmeli 0:3a2f06aeceaf 4715 case 'D' : /* Signed decimal */
buyukesmeli 0:3a2f06aeceaf 4716 case 'U' : /* Unsigned decimal */
buyukesmeli 0:3a2f06aeceaf 4717 r = 10; break;
buyukesmeli 0:3a2f06aeceaf 4718 case 'X' : /* Hexdecimal */
buyukesmeli 0:3a2f06aeceaf 4719 r = 16; break;
buyukesmeli 0:3a2f06aeceaf 4720 default: /* Unknown type (pass-through) */
buyukesmeli 0:3a2f06aeceaf 4721 putc_bfd(&pb, c); continue;
buyukesmeli 0:3a2f06aeceaf 4722 }
buyukesmeli 0:3a2f06aeceaf 4723
buyukesmeli 0:3a2f06aeceaf 4724 /* Get an argument and put it in numeral */
buyukesmeli 0:3a2f06aeceaf 4725 v = (f & 4) ? (DWORD)va_arg(arp, long) : ((d == 'D') ? (DWORD)(long)va_arg(arp, int) : (DWORD)va_arg(arp, unsigned int));
buyukesmeli 0:3a2f06aeceaf 4726 if (d == 'D' && (v & 0x80000000)) {
buyukesmeli 0:3a2f06aeceaf 4727 v = 0 - v;
buyukesmeli 0:3a2f06aeceaf 4728 f |= 8;
buyukesmeli 0:3a2f06aeceaf 4729 }
buyukesmeli 0:3a2f06aeceaf 4730 i = 0;
buyukesmeli 0:3a2f06aeceaf 4731 do {
buyukesmeli 0:3a2f06aeceaf 4732 d = (TCHAR)(v % r); v /= r;
buyukesmeli 0:3a2f06aeceaf 4733 if (d > 9) d += (c == 'x') ? 0x27 : 0x07;
buyukesmeli 0:3a2f06aeceaf 4734 s[i++] = d + '0';
buyukesmeli 0:3a2f06aeceaf 4735 } while (v && i < sizeof s / sizeof s[0]);
buyukesmeli 0:3a2f06aeceaf 4736 if (f & 8) s[i++] = '-';
buyukesmeli 0:3a2f06aeceaf 4737 j = i; d = (f & 1) ? '0' : ' ';
buyukesmeli 0:3a2f06aeceaf 4738 while (!(f & 2) && j++ < w) putc_bfd(&pb, d);
buyukesmeli 0:3a2f06aeceaf 4739 do putc_bfd(&pb, s[--i]); while (i);
buyukesmeli 0:3a2f06aeceaf 4740 while (j++ < w) putc_bfd(&pb, d);
buyukesmeli 0:3a2f06aeceaf 4741 }
buyukesmeli 0:3a2f06aeceaf 4742
buyukesmeli 0:3a2f06aeceaf 4743 va_end(arp);
buyukesmeli 0:3a2f06aeceaf 4744
buyukesmeli 0:3a2f06aeceaf 4745 if ( pb.idx >= 0 /* Flush buffered characters to the file */
buyukesmeli 0:3a2f06aeceaf 4746 && f_write(pb.fp, pb.buf, (UINT)pb.idx, &nw) == FR_OK
buyukesmeli 0:3a2f06aeceaf 4747 && (UINT)pb.idx == nw) return pb.nchr;
buyukesmeli 0:3a2f06aeceaf 4748 return EOF;
buyukesmeli 0:3a2f06aeceaf 4749 }
buyukesmeli 0:3a2f06aeceaf 4750
buyukesmeli 0:3a2f06aeceaf 4751 #endif /* !_FS_READONLY */
buyukesmeli 0:3a2f06aeceaf 4752 #endif /* _USE_STRFUNC */