/*\r
* Acess 2\r
* FAT12/16/32 Driver Version (Incl LFN)\r
+ * \r
+ * NOTE: This driver will only support _reading_ long file names, not\r
+ * writing. I don't even know why I'm adding write-support. FAT sucks.\r
+ * \r
+ * Known Bugs:\r
+ * - LFN Is buggy in FAT_ReadDir\r
+ * \r
+ * Notes:\r
+ * - There's hard-coded 512 byte sectors everywhere, that needs to be\r
+ * cleaned.\r
+ * - Thread safety is out the window with the write and LFN code\r
+ */\r
+/**\r
+ * \todo Implement changing of the parent directory when a file is written to\r
+ * \todo Implement file creation / deletion\r
*/\r
#define DEBUG 0\r
#define VERBOSE 1\r
\r
-#define CACHE_FAT 1 //!< Caches the FAT in memory\r
+#define CACHE_FAT 0 //!< Caches the FAT in memory\r
#define USE_LFN 1 //!< Enables the use of Long File Names\r
+#define SUPPORT_WRITE 0 //!< Enables write support\r
\r
#include <acess.h>\r
#include <modules.h>\r
#include <vfs.h>\r
#include "fs_fat.h"\r
\r
+#define FAT_FLAG_DIRTY 0x10000\r
+#define FAT_FLAG_DELETE 0x20000\r
\r
// === TYPES ===\r
#if USE_LFN\r
-typedef struct s_lfncache\r
+/**\r
+ * \brief Long-Filename cache entry\r
+ */\r
+typedef struct sFAT_LFNCacheEnt\r
{\r
- Uint Inode;\r
- tFAT_VolInfo *Disk;\r
- int id;\r
- char Name[256];\r
- struct s_lfncache *Next;\r
-} t_lfncache;\r
+ int ID;\r
+ char Data[256];\r
+} tFAT_LFNCacheEnt;\r
+/**\r
+ * \brief Long-Filename cache\r
+ */\r
+typedef struct sFAT_LFNCache\r
+{\r
+ int NumEntries;\r
+ tFAT_LFNCacheEnt Entries[];\r
+} tFAT_LFNCache;\r
#endif\r
\r
// === PROTOTYPES ===\r
+// --- Driver Core\r
int FAT_Install(char **Arguments);\r
tVFS_Node *FAT_InitDevice(char *device, char **options);\r
void FAT_Unmount(tVFS_Node *Node);\r
-\r
+// --- Helpers\r
+ int FAT_int_GetAddress(tVFS_Node *Node, Uint64 Offset, Uint64 *Addr, Uint32 *Cluster);\r
Uint32 FAT_int_GetFatValue(tFAT_VolInfo *Disk, Uint32 Cluster);\r
+#if SUPPORT_WRITE\r
Uint32 FAT_int_AllocateCluster(tFAT_VolInfo *Disk, Uint32 Previous);\r
-\r
+Uint32 FAT_int_FreeCluster(tFAT_VolInfo *Disk, Uint32 Cluster);\r
+#endif\r
void FAT_int_ReadCluster(tFAT_VolInfo *Disk, Uint32 Cluster, int Length, void *Buffer);\r
-void FAT_int_WriteCluster(tFAT_VolInfo *Disk, Uint32 Cluster, void *Buffer);\r
-\r
+// --- File IO\r
Uint64 FAT_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);\r
+#if SUPPORT_WRITE\r
+void FAT_int_WriteCluster(tFAT_VolInfo *Disk, Uint32 Cluster, void *Buffer);\r
Uint64 FAT_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);\r
+#endif\r
+// --- Directory IO\r
char *FAT_ReadDir(tVFS_Node *Node, int ID);\r
-tVFS_Node *FAT_FindDir(tVFS_Node *Node, char *Name);\r
- int FAT_Mknod(tVFS_Node *Node, char *Name, Uint Flags);\r
- int FAT_Relink(tVFS_Node *node, char *OldName, char *NewName);\r
+tVFS_Node *FAT_FindDir(tVFS_Node *Node, const char *Name);\r
+#if SUPPORT_WRITE\r
+ int FAT_Mknod(tVFS_Node *Node, const char *Name, Uint Flags);\r
+ int FAT_Relink(tVFS_Node *node, const char *OldName, const char *NewName);\r
+#endif\r
void FAT_CloseFile(tVFS_Node *node);\r
\r
+// === Options ===\r
+ int giFAT_MaxCachedClusters = 1024*512/4;\r
+\r
// === SEMI-GLOBALS ===\r
MODULE_DEFINE(0, (0<<8)|50 /*v0.50*/, VFAT, FAT_Install, NULL, NULL);\r
tFAT_VolInfo gFAT_Disks[8];\r
int giFAT_PartCount = 0;\r
-#if USE_LFN\r
-t_lfncache *fat_lfncache;\r
-#endif\r
tVFS_Driver gFAT_FSInfo = {"fat", 0, FAT_InitDevice, FAT_Unmount, NULL};\r
\r
// === CODE ===\r
/**\r
* \fn int FAT_Install(char **Arguments)\r
- * \brief \r
+ * \brief Install the FAT Driver\r
*/\r
int FAT_Install(char **Arguments)\r
{\r
// Temporary Pointer\r
bs = &diskInfo->bootsect;\r
\r
- //Open device and read boot sector\r
+ // Open device and read boot sector\r
diskInfo->fileHandle = VFS_Open(Device, VFS_OPENFLAG_READ|VFS_OPENFLAG_WRITE);\r
if(diskInfo->fileHandle == -1) {\r
- Log_Warning("FAT", "Unable to open device '%s'", Device);\r
+ Log_Notice("FAT", "Unable to open device '%s'", Device);\r
return NULL;\r
}\r
\r
VFS_ReadAt(diskInfo->fileHandle, 0, 512, bs);\r
\r
if(bs->bps == 0 || bs->spc == 0) {\r
- Log_Warning("FAT", "Error in FAT Boot Sector\n");\r
+ Log_Notice("FAT", "Error in FAT Boot Sector");\r
return NULL;\r
}\r
\r
sSize = "GiB";\r
iSize >>= 20;\r
}\r
- Log_Log("FAT", "'%s' %s, %i %s", Device, sFatType, iSize, sSize);\r
+ Log_Notice("FAT", "'%s' %s, %i %s", Device, sFatType, iSize, sSize);\r
}\r
#endif\r
\r
\r
//Allow for Caching the FAT\r
#if CACHE_FAT\r
+ if( diskInfo->ClusterCount <= giFAT_MaxCachedClusters )\r
{\r
- Uint32 Ofs;\r
- diskInfo->FATCache = (Uint32*)malloc(sizeof(Uint32)*diskInfo->ClusterCount);\r
- if(diskInfo->FATCache == NULL) {\r
- Log_Warning("FAT", "Heap Exhausted\n");\r
- return NULL;\r
- }\r
- Ofs = bs->resvSectCount*512;\r
- if(diskInfo->type == FAT12)\r
- {\r
- Uint32 val;\r
- int j;\r
- char buf[1536];\r
- for(i = 0; i < diskInfo->ClusterCount/2; i++) {\r
- j = i & 511; //%512\r
- if( j == 0 ) {\r
- VFS_ReadAt(diskInfo->fileHandle, Ofs, 3*512, buf);\r
- Ofs += 3*512;\r
+ Uint32 Ofs;\r
+ diskInfo->FATCache = (Uint32*)malloc(sizeof(Uint32)*diskInfo->ClusterCount);\r
+ if(diskInfo->FATCache == NULL) {\r
+ Log_Warning("FAT", "Heap Exhausted");\r
+ return NULL;\r
+ }\r
+ Ofs = bs->resvSectCount*512;\r
+ if(diskInfo->type == FAT12)\r
+ {\r
+ Uint32 val;\r
+ int j;\r
+ char buf[1536];\r
+ for(i = 0; i < diskInfo->ClusterCount/2; i++) {\r
+ j = i & 511; //%512\r
+ if( j == 0 ) {\r
+ VFS_ReadAt(diskInfo->fileHandle, Ofs, 3*512, buf);\r
+ Ofs += 3*512;\r
+ }\r
+ val = *((int*)(buf+j*3));\r
+ diskInfo->FATCache[i*2] = val & 0xFFF;\r
+ diskInfo->FATCache[i*2+1] = (val>>12) & 0xFFF;\r
}\r
- val = *((int*)(buf+j*3));\r
- diskInfo->FATCache[i*2] = val & 0xFFF;\r
- diskInfo->FATCache[i*2+1] = (val>>12) & 0xFFF;\r
}\r
- }\r
- else if(diskInfo->type == FAT16)\r
- {\r
- Uint16 buf[256];\r
- for(i=0;i<diskInfo->ClusterCount;i++) {\r
- if( (i & 255) == 0 ) {\r
- VFS_ReadAt(diskInfo->fileHandle, Ofs, 512, buf);\r
- Ofs += 512;\r
+ else if(diskInfo->type == FAT16)\r
+ {\r
+ Uint16 buf[256];\r
+ for(i=0;i<diskInfo->ClusterCount;i++) {\r
+ if( (i & 255) == 0 ) {\r
+ VFS_ReadAt(diskInfo->fileHandle, Ofs, 512, buf);\r
+ Ofs += 512;\r
+ }\r
+ diskInfo->FATCache[i] = buf[i&255];\r
}\r
- diskInfo->FATCache[i] = buf[i&255];\r
}\r
- }\r
- else if(diskInfo->type == FAT32)\r
- {\r
- Uint32 buf[128];\r
- for(i=0;i<diskInfo->ClusterCount;i++) {\r
- if( (i & 127) == 0 ) {\r
- VFS_ReadAt(diskInfo->fileHandle, Ofs, 512, buf);\r
- Ofs += 512;\r
+ else if(diskInfo->type == FAT32)\r
+ {\r
+ Uint32 buf[128];\r
+ for(i=0;i<diskInfo->ClusterCount;i++) {\r
+ if( (i & 127) == 0 ) {\r
+ VFS_ReadAt(diskInfo->fileHandle, Ofs, 512, buf);\r
+ Ofs += 512;\r
+ }\r
+ diskInfo->FATCache[i] = buf[i&127];\r
}\r
- diskInfo->FATCache[i] = buf[i&127];\r
}\r
- }\r
- LOG("FAT Fully Cached");\r
+ LOG("FAT Fully Cached");\r
}\r
#endif /*CACHE_FAT*/\r
\r
\r
// == VFS Interface\r
node = &diskInfo->rootNode;\r
- node->Size = bs->files_in_root;\r
+ //node->Size = bs->files_in_root;\r
+ node->Size = -1;\r
node->Inode = diskInfo->rootOffset; // 0:31 - Cluster, 32:63 - Parent Directory Cluster\r
node->ImplPtr = diskInfo; // Disk info pointer\r
- node->ImplInt = 0; // 0:15 - Directory Index, 16: Dirty Flag\r
+ node->ImplInt = 0; // 0:15 - Directory Index, 16: Dirty Flag, 17: Deletion Flag\r
\r
node->ReferenceCount = 1;\r
\r
node->Read = node->Write = NULL;\r
node->ReadDir = FAT_ReadDir;\r
node->FindDir = FAT_FindDir;\r
+ #if SUPPORT_WRITE\r
node->Relink = FAT_Relink;\r
node->MkNod = FAT_Mknod;\r
+ #else\r
+ node->Relink = NULL;\r
+ node->MkNod = NULL;\r
+ #endif\r
//node->Close = FAT_Unmount;\r
\r
giFAT_PartCount ++;\r
return;\r
}\r
\r
+/**\r
+ * \brief Converts an offset in a file into a disk address\r
+ * \param Node File (or directory) node\r
+ * \param Offset Offset in the file\r
+ * \param Addr Return Address\r
+ * \param Cluster Set to the current cluster (or the last one if \a Offset\r
+ * is past EOC) - Not touched if the node is the root\r
+ * directory.\r
+ * \return Zero on success, non-zero on error\r
+ */\r
+int FAT_int_GetAddress(tVFS_Node *Node, Uint64 Offset, Uint64 *Addr, Uint32 *Cluster)\r
+{\r
+ Uint32 cluster;\r
+ Uint64 addr;\r
+ int skip;\r
+ tFAT_VolInfo *disk = Node->ImplPtr;\r
+ \r
+ ENTER("pNode XOffset", Node, Offset);\r
+ \r
+ cluster = Node->Inode & 0xFFFFFFFF; // Cluster ID\r
+ LOG("cluster = %08x", cluster);\r
+ \r
+ // Do Cluster Skip\r
+ // - Pre FAT32 had a reserved area for the root.\r
+ if( disk->type == FAT32 || cluster != disk->rootOffset )\r
+ {\r
+ skip = Offset / disk->BytesPerCluster;\r
+ LOG("skip = %i", skip);\r
+ // Skip previous clusters\r
+ for(; skip-- ; )\r
+ {\r
+ if(Cluster) *Cluster = cluster;\r
+ cluster = FAT_int_GetFatValue(disk, cluster);\r
+ // Check for end of cluster chain\r
+ if(cluster == 0xFFFFFFFF) { LEAVE('i', 1); return 1;}\r
+ }\r
+ if(Cluster) *Cluster = cluster;\r
+ }\r
+ else {\r
+ // Increment by clusters in offset\r
+ cluster += Offset / disk->BytesPerCluster;\r
+ }\r
+ \r
+ LOG("cluster = %08x", cluster);\r
+ \r
+ // Bounds Checking (Used to spot corruption)\r
+ if(cluster > disk->ClusterCount + 2)\r
+ {\r
+ Log_Warning("FAT", "Cluster ID is over cluster count (0x%x>0x%x)",\r
+ cluster, disk->ClusterCount+2);\r
+ LEAVE('i', 1);\r
+ return 1;\r
+ }\r
+ \r
+ // Compute Offsets\r
+ // - Pre FAT32 cluster base (in sectors)\r
+ if( cluster == disk->rootOffset && disk->type != FAT32 ) {\r
+ addr = disk->bootsect.resvSectCount * disk->bootsect.bps;\r
+ addr += cluster * disk->BytesPerCluster;\r
+ }\r
+ else {\r
+ addr = disk->firstDataSect * disk->bootsect.bps;\r
+ addr += (cluster - 2) * disk->BytesPerCluster;\r
+ }\r
+ // In-cluster offset\r
+ addr += Offset % disk->BytesPerCluster;\r
+ \r
+ LOG("addr = 0x%08x", addr);\r
+ *Addr = addr;\r
+ LEAVE('i', 0);\r
+ return 0;\r
+}\r
+\r
/*\r
- * === FILE IO ===\r
+ * ====================\r
+ * FAT Manipulation\r
+ * ====================\r
*/\r
/**\r
* \fn Uint32 FAT_int_GetFatValue(tFAT_VolInfo *Disk, Uint32 cluster)\r
Uint32 FAT_int_GetFatValue(tFAT_VolInfo *Disk, Uint32 cluster)\r
{\r
Uint32 val = 0;\r
- #if !CACHE_FAT\r
- Uint32 ofs = Disk->bootsect.resvSectCount*512;\r
- #endif\r
+ Uint32 ofs;\r
ENTER("pDisk xCluster", Disk, cluster);\r
- LOCK( &Disk->lFAT );\r
+ Mutex_Acquire( &Disk->lFAT );\r
+ #if CACHE_FAT\r
+ if( Disk->ClusterCount <= giFAT_MaxCachedClusters )\r
+ {\r
+ val = Disk->FATCache[cluster];\r
+ if(Disk->type == FAT12 && val == EOC_FAT12) val = -1;\r
+ if(Disk->type == FAT16 && val == EOC_FAT16) val = -1;\r
+ if(Disk->type == FAT32 && val == EOC_FAT32) val = -1;\r
+ }\r
+ else\r
+ {\r
+ #endif\r
+ ofs = Disk->bootsect.resvSectCount*512;\r
+ if(Disk->type == FAT12) {\r
+ VFS_ReadAt(Disk->fileHandle, ofs+(cluster/2)*3, 3, &val);\r
+ val = (cluster & 1 ? val>>12 : val & 0xFFF);\r
+ if(val == EOC_FAT12) val = -1;\r
+ } else if(Disk->type == FAT16) {\r
+ VFS_ReadAt(Disk->fileHandle, ofs+cluster*2, 2, &val);\r
+ if(val == EOC_FAT16) val = -1;\r
+ } else {\r
+ VFS_ReadAt(Disk->fileHandle, ofs+cluster*4, 4, &val);\r
+ if(val == EOC_FAT32) val = -1;\r
+ }\r
#if CACHE_FAT\r
- val = Disk->FATCache[cluster];\r
- if(Disk->type == FAT12 && val == EOC_FAT12) val = -1;\r
- if(Disk->type == FAT16 && val == EOC_FAT16) val = -1;\r
- if(Disk->type == FAT32 && val == EOC_FAT32) val = -1;\r
- #else\r
- if(Disk->type == FAT12) {\r
- VFS_ReadAt(Disk->fileHandle, ofs+(cluster>>1)*3, 3, &val);\r
- val = (cluster&1 ? val&0xFFF : val>>12);\r
- if(val == EOC_FAT12) val = -1;\r
- } else if(Disk->type == FAT16) {\r
- VFS_ReadAt(Disk->fileHandle, ofs+cluster*2, 2, &val);\r
- if(val == EOC_FAT16) val = -1;\r
- } else {\r
- VFS_ReadAt(Disk->fileHandle, ofs+cluster*4, 4, &val);\r
- if(val == EOC_FAT32) val = -1;\r
}\r
#endif /*CACHE_FAT*/\r
- RELEASE( &Disk->lFAT );\r
+ Mutex_Release( &Disk->lFAT );\r
LEAVE('x', val);\r
return val;\r
}\r
\r
+#if SUPPORT_WRITE\r
/**\r
* \brief Allocate a new cluster\r
*/\r
{\r
Uint32 ret = Previous;\r
#if CACHE_FAT\r
- Uint32 eoc;\r
- \r
- LOCK(Disk->lFAT);\r
- for(ret = Previous; ret < Disk->ClusterCount; ret++)\r
+ if( Disk->ClusterCount <= giFAT_MaxCachedClusters )\r
{\r
- if(Disk->FATCache[ret] == 0)\r
- goto append;\r
+ Uint32 eoc;\r
+ \r
+ LOCK(Disk->lFAT);\r
+ for(ret = Previous; ret < Disk->ClusterCount; ret++)\r
+ {\r
+ if(Disk->FATCache[ret] == 0)\r
+ goto append;\r
+ }\r
+ for(ret = 0; ret < Previous; ret++)\r
+ {\r
+ if(Disk->FATCache[ret] == 0)\r
+ goto append;\r
+ }\r
+ \r
+ RELEASE(Disk->lFAT);\r
+ return 0;\r
+ \r
+ append:\r
+ switch(Disk->type)\r
+ {\r
+ case FAT12: eoc = EOC_FAT12; break;\r
+ case FAT16: eoc = EOC_FAT16; break;\r
+ case FAT32: eoc = EOC_FAT32; break;\r
+ default: return 0;\r
+ }\r
+ \r
+ Disk->FATCache[ret] = eoc;\r
+ Disk->FATCache[Previous] = ret;\r
+ \r
+ RELEASE(Disk->lFAT);\r
+ return ret;\r
}\r
- for(ret = 0; ret < Previous; ret++)\r
+ else\r
{\r
- if(Disk->FATCache[ret] == 0)\r
- goto append;\r
+ #endif\r
+ Uint32 val;\r
+ Uint32 ofs = Disk->bootsect.resvSectCount*512;\r
+ Log_Warning("FAT", "TODO: Implement cluster allocation with non cached FAT");\r
+ return 0;\r
+ \r
+ switch(Disk->type)\r
+ {\r
+ case FAT12:\r
+ VFS_ReadAt(Disk->fileHandle, ofs+(Previous>>1)*3, 3, &val);\r
+ if( Previous & 1 ) {\r
+ val &= 0xFFF000;\r
+ val |= ret;\r
+ }\r
+ else {\r
+ val &= 0xFFF;\r
+ val |= ret<<12;\r
+ }\r
+ VFS_WriteAt(Disk->fileHandle, ofs+(Previous>>1)*3, 3, &val);\r
+ \r
+ VFS_ReadAt(Disk->fileHandle, ofs+(ret>>1)*3, 3, &val);\r
+ if( Cluster & 1 ) {\r
+ val &= 0xFFF000;\r
+ val |= eoc;\r
+ }\r
+ else {\r
+ val &= 0x000FFF;\r
+ val |= eoc<<12;\r
+ }\r
+ VFS_WriteAt(Disk->fileHandle, ofs+(ret>>1)*3, 3, &val);\r
+ break;\r
+ case FAT16:\r
+ VFS_ReadAt(Disk->fileHandle, ofs+Previous*2, 2, &ret);\r
+ VFS_WriteAt(Disk->fileHandle, ofs+ret*2, 2, &eoc);\r
+ break;\r
+ case FAT32:\r
+ VFS_ReadAt(Disk->fileHandle, ofs+Previous*4, 4, &ret);\r
+ VFS_WriteAt(Disk->fileHandle, ofs+ret*4, 4, &eoc);\r
+ break;\r
+ }\r
+ return ret;\r
+ #if CACHE_FAT\r
}\r
- \r
- RELEASE(Disk->lFAT);\r
- return 0;\r
- \r
-append:\r
- switch(Disk->type)\r
+ #endif\r
+}\r
+\r
+/**\r
+ * \brief Free's a cluster\r
+ * \return The original contents of the cluster\r
+ */\r
+Uint32 FAT_int_FreeCluster(tFAT_VolInfo *Disk, Uint32 Cluster)\r
+{\r
+ Uint32 ret;\r
+ #if CACHE_FAT\r
+ if( Disk->ClusterCount <= giFAT_MaxCachedClusters )\r
{\r
- case FAT12: eoc = EOC_FAT12; break;\r
- case FAT16: eoc = EOC_FAT16; break;\r
- case FAT32: eoc = EOC_FAT32; break;\r
- default: return 0;\r
- }\r
- \r
- Disk->FATCache[ret] = eoc;\r
- Disk->FATCache[Previous] = ret;\r
- \r
- RELEASE(Disk->lFAT);\r
- return ret;\r
- #else\r
- Uint32 val;\r
- //Uint8 buf[512];\r
- Log_Warning("FAT", "TODO: Implement cluster allocation with non cached FAT");\r
- return 0;\r
- \r
- if(Disk->type == FAT12) {\r
- VFS_ReadAt(Disk->fileHandle, ofs+(Previous>>1)*3, 3, &val);\r
- if( Previous & 1 ) {\r
- val &= 0xFFF000;\r
- val |= ret;\r
- }\r
- else {\r
- val &= 0xFFF;\r
- val |= ret<<12;\r
- }\r
- VFS_WriteAt(Disk->fileHandle, ofs+(Previous>>1)*3, 3, &val);\r
+ LOCK(Disk->lFAT);\r
\r
- VFS_ReadAt(Disk->fileHandle, ofs+(Cluster>>1)*3, 3, &val);\r
- if( Cluster & 1 ) {\r
- val &= 0xFFF000;\r
- val |= eoc;\r
- }\r
- else {\r
- val &= 0x000FFF;\r
- val |= eoc<<12;\r
+ ret = Disk->FATCache[Cluster];\r
+ Disk->FATCache[Cluster] = 0;\r
+ \r
+ RELEASE(Disk->lFAT);\r
+ }\r
+ else\r
+ {\r
+ #endif\r
+ Uint32 val;\r
+ Uint32 ofs = Disk->bootsect.resvSectCount*512;\r
+ LOCK(Disk->lFAT);\r
+ switch(Disk->type)\r
+ {\r
+ case FAT12:\r
+ VFS_ReadAt(Disk->fileHandle, ofs+(Cluster>>1)*3, 3, &val);\r
+ if( Cluster & 1 ) {\r
+ ret = val & 0xFFF0000;\r
+ val &= 0xFFF;\r
+ }\r
+ else {\r
+ ret = val & 0xFFF;\r
+ val &= 0xFFF000;\r
+ }\r
+ VFS_WriteAt(Disk->fileHandle, ofs+(Previous>>1)*3, 3, &val);\r
+ break;\r
+ case FAT16:\r
+ VFS_ReadAt(Disk->fileHandle, ofs+Previous*2, 2, &ret);\r
+ val = 0;\r
+ VFS_WriteAt(Disk->fileHandle, ofs+Cluster*2, 2, &val);\r
+ break;\r
+ case FAT32:\r
+ VFS_ReadAt(Disk->fileHandle, ofs+Previous*4, 4, &ret);\r
+ val = 0;\r
+ VFS_WriteAt(Disk->fileHandle, ofs+Cluster*2, 2, &val);\r
+ break;\r
}\r
- VFS_WriteAt(Disk->fileHandle, ofs+(Cluster>>1)*3, 3, &val);\r
- } else if(Disk->type == FAT16) {\r
- VFS_ReadAt(Disk->fileHandle, ofs+Previous*2, 2, &ret);\r
- VFS_ReadAt(Disk->fileHandle, ofs+Cluster*2, 2, &eoc);\r
- } else {\r
- VFS_ReadAt(Disk->fileHandle, ofs+Previous*4, 4, &ret);\r
- VFS_ReadAt(Disk->fileHandle, ofs+Cluster*4, 4, &eoc);\r
+ RELEASE(Disk->lFAT);\r
+ #if CACHE_FAT\r
}\r
- return ret;\r
#endif\r
+ if(Disk->type == FAT12 && ret == EOC_FAT12) ret = -1;\r
+ if(Disk->type == FAT16 && ret == EOC_FAT16) ret = -1;\r
+ if(Disk->type == FAT32 && ret == EOC_FAT32) ret = -1;\r
+ return ret;\r
}\r
+#endif\r
\r
+/*\r
+ * ====================\r
+ * Cluster IO\r
+ * ====================\r
+ */\r
/**\r
* \brief Read a cluster\r
+ * \param Disk Disk (Volume) to read from\r
+ * \param Length Length to read\r
+ * \param Buffer Destination for read data\r
*/\r
void FAT_int_ReadCluster(tFAT_VolInfo *Disk, Uint32 Cluster, int Length, void *Buffer)\r
{\r
ENTER("pDisk xCluster iLength pBuffer", Disk, Cluster, Length, Buffer);\r
- //Log("Cluster = %i (0x%x)", Cluster, Cluster);\r
VFS_ReadAt(\r
Disk->fileHandle,\r
(Disk->firstDataSect + (Cluster-2)*Disk->bootsect.spc )\r
LEAVE('-');\r
}\r
\r
-/**\r
- * \brief Write a cluster to disk\r
+/* ====================\r
+ * File IO\r
+ * ====================\r
*/\r
-void FAT_int_WriteCluster(tFAT_VolInfo *Disk, Uint32 Cluster, void *Buffer)\r
-{\r
- ENTER("pDisk xCluster pBuffer", Disk, Cluster, Buffer);\r
- VFS_ReadAt(\r
- Disk->fileHandle,\r
- (Disk->firstDataSect + (Cluster-2)*Disk->bootsect.spc )\r
- * Disk->bootsect.bps,\r
- Disk->BytesPerCluster,\r
- Buffer\r
- );\r
- LEAVE('-');\r
-}\r
-\r
/**\r
* \fn Uint64 FAT_Read(tVFS_Node *node, Uint64 offset, Uint64 length, void *buffer)\r
* \brief Reads data from a specified file\r
*/\r
-Uint64 FAT_Read(tVFS_Node *Node, Uint64 offset, Uint64 length, void *buffer)\r
+Uint64 FAT_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)\r
{\r
int preSkip, count;\r
int i, cluster, pos;\r
void *tmpBuf;\r
tFAT_VolInfo *disk = Node->ImplPtr;\r
\r
- ENTER("pNode Xoffset Xlength pbuffer", Node, offset, length, buffer);\r
+ ENTER("pNode Xoffset Xlength pbuffer", Node, Offset, Length, Buffer);\r
+ \r
+ // Sanity Check offset\r
+ if(Offset > Node->Size) {\r
+ LOG("Reading past EOF (%i > %i)", Offset, Node->Size);\r
+ LEAVE('i', 0);\r
+ return 0;\r
+ }\r
\r
// Calculate and Allocate Bytes Per Cluster\r
bpc = disk->BytesPerCluster;\r
tmpBuf = (void*) malloc(bpc);\r
if( !tmpBuf ) return 0;\r
\r
- // Cluster is stored in Inode Field\r
+ // Cluster is stored in the low 32-bits of the Inode field\r
cluster = Node->Inode & 0xFFFFFFFF;\r
\r
- // Sanity Check offset\r
- if(offset > Node->Size) {\r
- //LOG("Reading past EOF (%i > %i)", offset, node->Size);\r
- LEAVE('i', 0);\r
- return 0;\r
- }\r
// Clamp Size\r
- if(offset + length > Node->Size) {\r
- //LOG("Reading past EOF (%lli + %lli > %lli), clamped to %lli",\r
- // offset, length, node->Size, node->Size - offset);\r
- length = Node->Size - offset;\r
+ if(Offset >= Node->Size || Offset + Length > Node->Size) {\r
+ LOG("Reading past EOF (%lli + %lli > %lli), clamped to %lli",\r
+ Offset, Length, Node->Size, Node->Size - Offset);\r
+ Length = Node->Size - Offset;\r
}\r
\r
- // Single Cluster including offset\r
- if(length + offset < bpc)\r
+ // Reading from within the first cluster only?\r
+ if((int)Offset + (int)Length < bpc)\r
{\r
+ LOG("First cluster only");\r
FAT_int_ReadCluster(disk, cluster, bpc, tmpBuf);\r
- memcpy( buffer, (void*)( tmpBuf + offset%bpc ), length );\r
+ memcpy( Buffer, (void*)( tmpBuf + Offset%bpc ), Length );\r
free(tmpBuf);\r
+ #if DEBUG\r
+ //Debug_HexDump("FAT_Read", Buffer, Length);\r
+ #endif\r
LEAVE('i', 1);\r
- return length;\r
+ return Length;\r
}\r
\r
- preSkip = offset / bpc;\r
- \r
- //Skip previous clusters\r
- for(i=preSkip;i--;) {\r
+ // Skip previous clusters\r
+ preSkip = Offset / bpc;\r
+ for(i = preSkip; i--; ) {\r
cluster = FAT_int_GetFatValue(disk, cluster);\r
if(cluster == -1) {\r
- Warning("FAT_Read - Offset is past end of cluster chain mark");\r
+ Log_Warning("FAT", "Offset is past end of cluster chain mark");\r
+ free(tmpBuf);\r
LEAVE('i', 0);\r
return 0;\r
}\r
}\r
\r
// Get Count of Clusters to read\r
- count = ((offset%bpc+length) / bpc) + 1;\r
+ count = ((Offset%bpc + Length) / bpc) + 1;\r
\r
// Get buffer Position after 1st cluster\r
- pos = bpc - offset%bpc;\r
- \r
- // Read 1st Cluster\r
- FAT_int_ReadCluster(disk, cluster, bpc, tmpBuf);\r
- memcpy(\r
- buffer,\r
- (void*)( tmpBuf + (bpc-pos) ),\r
- (pos < length ? pos : length)\r
- );\r
+ pos = bpc - Offset%bpc;\r
\r
- if (count == 1) {\r
+ // Read 1st Cluster (performs alignment for us)\r
+ if( pos == bpc && (int)Length >= bpc ) {\r
+ FAT_int_ReadCluster(disk, cluster, bpc, Buffer);\r
+ }\r
+ else {\r
+ FAT_int_ReadCluster(disk, cluster, bpc, tmpBuf);\r
+ memcpy(\r
+ Buffer,\r
+ (void*)( tmpBuf + (bpc-pos) ),\r
+ (pos < (int)Length ? (Uint)pos : Length)\r
+ );\r
+ }\r
+ \r
+ // Simple return\r
+ if( count == 1 ) {\r
+ #if DEBUG\r
+ //Debug_HexDump("FAT_Read", Buffer, Length);\r
+ #endif\r
free(tmpBuf);\r
LEAVE('i', 1);\r
- return length;\r
+ return Length;\r
}\r
\r
- cluster = FAT_int_GetFatValue(disk, cluster);\r
- \r
#if DEBUG\r
- LOG("pos=%i\n", pos);\r
- LOG("Reading the rest of the clusters\n");\r
+ LOG("pos = %i", pos);\r
+ LOG("Reading the rest of the clusters");\r
#endif\r
\r
- \r
- //Read the rest of the cluster data\r
+ // Read the rest of the cluster data\r
for( i = 1; i < count-1; i++ )\r
{\r
- FAT_int_ReadCluster(disk, cluster, bpc, tmpBuf);\r
- memcpy((void*)(buffer+pos), tmpBuf, bpc);\r
- pos += bpc;\r
+ // Get next cluster in the chain\r
cluster = FAT_int_GetFatValue(disk, cluster);\r
if(cluster == -1) {\r
Warning("FAT_Read - Read past End of Cluster Chain");\r
LEAVE('i', 0);\r
return 0;\r
}\r
+ // Read cluster\r
+ FAT_int_ReadCluster(disk, cluster, bpc, (void*)(Buffer+pos));\r
+ pos += bpc;\r
+ }\r
+ \r
+ // Get next cluster in the chain\r
+ cluster = FAT_int_GetFatValue(disk, cluster);\r
+ if(cluster == -1) {\r
+ Warning("FAT_Read - Read past End of Cluster Chain");\r
+ free(tmpBuf);\r
+ LEAVE('i', 0);\r
+ return 0;\r
}\r
\r
- FAT_int_ReadCluster(disk, cluster, bpc, tmpBuf);\r
- memcpy((void*)(buffer+pos), tmpBuf, length-pos);\r
+ // Read final cluster\r
+ if( (int)Length - pos == bpc )\r
+ {\r
+ FAT_int_ReadCluster( disk, cluster, bpc, (void*)(Buffer+pos) );\r
+ }\r
+ else {\r
+ FAT_int_ReadCluster( disk, cluster, bpc, tmpBuf );\r
+ memcpy( (void*)(Buffer+pos), tmpBuf, Length-pos );\r
+ }\r
\r
#if DEBUG\r
- LOG("Free tmpBuf(0x%x) and Return\n", tmpBuf);\r
+ LOG("Free tmpBuf(0x%x) and Return", tmpBuf);\r
+ //Debug_HexDump("FAT_Read", Buffer, Length);\r
#endif\r
\r
free(tmpBuf);\r
- LEAVE('X', length);\r
- return length;\r
+ LEAVE('X', Length);\r
+ return Length;\r
+}\r
+\r
+#if SUPPORT_WRITE\r
+/**\r
+ * \brief Write a cluster to disk\r
+ */\r
+void FAT_int_WriteCluster(tFAT_VolInfo *Disk, Uint32 Cluster, void *Buffer)\r
+{\r
+ ENTER("pDisk xCluster pBuffer", Disk, Cluster, Buffer);\r
+ VFS_ReadAt(\r
+ Disk->fileHandle,\r
+ (Disk->firstDataSect + (Cluster-2)*Disk->bootsect.spc )\r
+ * Disk->bootsect.bps,\r
+ Disk->BytesPerCluster,\r
+ Buffer\r
+ );\r
+ LEAVE('-');\r
}\r
\r
/**\r
\r
return Length;\r
}\r
+#endif\r
\r
+/* ====================\r
+ * File Names & Nodes\r
+ * ====================\r
+ */\r
/**\r
- * \fn void FAT_int_ProperFilename(char *dest, char *src)\r
* \brief Converts a FAT directory entry name into a proper filename\r
+ * \param dest Destination array (must be at least 13 bytes in size)\r
+ * \param src 8.3 filename (concatenated, e.g 'FILE1 TXT')\r
*/\r
-void FAT_int_ProperFilename(char *dest, char *src)\r
+void FAT_int_ProperFilename(char *dest, const char *src)\r
{\r
- int a, b;\r
+ int inpos, outpos;\r
\r
- for( a = 0; a < 8; a++) {\r
- if(src[a] == ' ') break;\r
- dest[a] = src[a];\r
+ // Name\r
+ outpos = 0;\r
+ for( inpos = 0; inpos < 8; inpos++ ) {\r
+ if(src[inpos] == ' ') break;\r
+ dest[outpos++] = src[inpos];\r
}\r
- b = a;\r
- a = 8;\r
+ inpos = 8;\r
+ // Check for empty extensions\r
if(src[8] != ' ')\r
- dest[b++] = '.';\r
- for( ; a < 11; a++, b++) {\r
- if(src[a] == ' ') break;\r
- dest[b] = src[a];\r
+ {\r
+ dest[outpos++] = '.';\r
+ for( ; inpos < 11; inpos++) {\r
+ if(src[inpos] == ' ') break;\r
+ dest[outpos++] = src[inpos];\r
+ }\r
}\r
- dest[b] = '\0';\r
- #if DEBUG\r
+ dest[outpos++] = '\0';\r
+ \r
//LOG("dest='%s'", dest);\r
- #endif\r
}\r
\r
/**\r
- * \fn char *FAT_int_CreateName(tVFS_Node *parent, fat_filetable *ft, char *LongFileName)\r
+ * \fn char *FAT_int_CreateName(fat_filetable *ft, char *LongFileName)\r
* \brief Converts either a LFN or a 8.3 Name into a proper name\r
+ * \param ft Pointer to the file's entry in the parent directory\r
+ * \param LongFileName Long file name pointer\r
+ * \return Filename as a heap string\r
*/\r
-char *FAT_int_CreateName(tVFS_Node *parent, fat_filetable *ft, char *LongFileName)\r
+char *FAT_int_CreateName(fat_filetable *ft, char *LongFileName)\r
{\r
char *ret;\r
- int len;\r
+ ENTER("pft sLongFileName", ft, LongFileName);\r
#if USE_LFN\r
if(LongFileName && LongFileName[0] != '\0')\r
{ \r
- len = strlen(LongFileName);\r
- ret = malloc(len+1);\r
- strcpy(ret, LongFileName);\r
+ ret = strdup(LongFileName);\r
}\r
else\r
{\r
#endif\r
ret = (char*) malloc(13);\r
- memset(ret, 13, '\0');\r
FAT_int_ProperFilename(ret, ft->name);\r
#if USE_LFN\r
}\r
#endif\r
+ LEAVE('s', ret);\r
return ret;\r
}\r
\r
/**\r
- * \fn tVFS_Node *FAT_int_CreateNode(tVFS_Node *parent, fat_filetable *ft, char *LongFileName)\r
* \brief Creates a tVFS_Node structure for a given file entry\r
+ * \param Parent Parent directory VFS node\r
+ * \param Entry File table entry for the new node\r
+ * \param Pos Position in the parent of the new node\r
*/\r
-tVFS_Node *FAT_int_CreateNode(tVFS_Node *parent, fat_filetable *ft, char *LongFileName)\r
+tVFS_Node *FAT_int_CreateNode(tVFS_Node *Parent, fat_filetable *Entry, int Pos)\r
{\r
- tVFS_Node node = {0};\r
+ tVFS_Node node;\r
tVFS_Node *ret;\r
- tFAT_VolInfo *disk = parent->ImplPtr;\r
+ tFAT_VolInfo *disk = Parent->ImplPtr;\r
+ \r
+ ENTER("pParent pFT", Parent, Entry);\r
\r
- ENTER("pParent pFT sLongFileName", parent, ft, LongFileName);\r
+ memset(&node, 0, sizeof(tVFS_Node));\r
\r
// Set Other Data\r
- node.Inode = ft->cluster | (ft->clusterHi<<16);\r
- node.Size = ft->size;\r
- LOG("ft->size = %i", ft->size);\r
- node.ImplPtr = parent->ImplPtr;\r
+ // 0-31: Cluster, 32-63: Parent Cluster\r
+ node.Inode = Entry->cluster | (Entry->clusterHi<<16) | (Parent->Inode << 32);\r
+ LOG("node.Inode = %llx", node.Inode);\r
+ // Position in parent directory\r
+ node.ImplInt = Pos & 0xFFFF;\r
+ // Disk Pointer\r
+ node.ImplPtr = disk;\r
+ node.Size = Entry->size;\r
+ LOG("Entry->size = %i", Entry->size);\r
+ // root:root\r
node.UID = 0; node.GID = 0;\r
node.NumACLs = 1;\r
\r
node.Flags = 0;\r
- if(ft->attrib & ATTR_DIRECTORY) node.Flags |= VFS_FFLAG_DIRECTORY;\r
- if(ft->attrib & ATTR_READONLY) {\r
+ if(Entry->attrib & ATTR_DIRECTORY) node.Flags |= VFS_FFLAG_DIRECTORY;\r
+ if(Entry->attrib & ATTR_READONLY) {\r
node.Flags |= VFS_FFLAG_READONLY;\r
node.ACLs = &gVFS_ACL_EveryoneRX; // R-XR-XR-X\r
}\r
node.ACLs = &gVFS_ACL_EveryoneRWX; // RWXRWXRWX\r
}\r
\r
+ // Create timestamps\r
node.ATime = timestamp(0,0,0,\r
- ((ft->adate&0x1F)-1), //Days\r
- ((ft->adate&0x1E0)-1), //Months\r
- 1980+((ft->adate&0xFF00)>>8)); //Years\r
+ ((Entry->adate&0x1F) - 1), // Days\r
+ ((Entry->adate&0x1E0) - 1), // Months\r
+ 1980+((Entry->adate&0xFF00)>>8) // Years\r
+ );\r
\r
- node.CTime = ft->ctimems * 10; //Miliseconds\r
+ node.CTime = Entry->ctimems * 10; // Miliseconds\r
node.CTime += timestamp(\r
- (ft->ctime&0x1F)<<1, //Seconds\r
- ((ft->ctime&0x3F0)>>5), //Minutes\r
- ((ft->ctime&0xF800)>>11), //Hours\r
- ((ft->cdate&0x1F)-1), //Days\r
- ((ft->cdate&0x1E0)-1), //Months\r
- 1980+((ft->cdate&0xFF00)>>8)); //Years\r
+ ((Entry->ctime&0x1F)<<1), // Seconds\r
+ ((Entry->ctime&0x3F0)>>5), // Minutes\r
+ ((Entry->ctime&0xF800)>>11), // Hours\r
+ ((Entry->cdate&0x1F)-1), // Days\r
+ ((Entry->cdate&0x1E0)-1), // Months\r
+ 1980+((Entry->cdate&0xFF00)>>8) // Years\r
+ );\r
\r
node.MTime = timestamp(\r
- (ft->mtime&0x1F)<<1, //Seconds\r
- ((ft->mtime&0x3F0)>>5), //Minuites\r
- ((ft->mtime&0xF800)>>11), //Hours\r
- ((ft->mdate&0x1F)-1), //Days\r
- ((ft->mdate&0x1E0)-1), //Months\r
- 1980+((ft->mdate&0xFF00)>>8)); //Years\r
- \r
+ ((Entry->mtime&0x1F)<<1), // Seconds\r
+ ((Entry->mtime&0x3F0)>>5), // Minutes\r
+ ((Entry->mtime&0xF800)>>11), // Hours\r
+ ((Entry->mdate&0x1F)-1), // Days\r
+ ((Entry->mdate&0x1E0)-1), // Months\r
+ 1980+((Entry->mdate&0xFF00)>>8) // Years\r
+ );\r
+ \r
+ // Set pointers\r
if(node.Flags & VFS_FFLAG_DIRECTORY) {\r
+ //Log_Debug("FAT", "Directory %08x has size 0x%x", node.Inode, node.Size);\r
node.ReadDir = FAT_ReadDir;\r
node.FindDir = FAT_FindDir;\r
+ #if SUPPORT_WRITE\r
node.MkNod = FAT_Mknod;\r
+ node.Relink = FAT_Relink;\r
+ #endif\r
node.Size = -1;\r
- } else {\r
+ }\r
+ else {\r
node.Read = FAT_Read;\r
+ #if SUPPORT_WRITE\r
node.Write = FAT_Write;\r
+ #endif\r
}\r
node.Close = FAT_CloseFile;\r
- node.Relink = FAT_Relink;\r
\r
ret = Inode_CacheNode(disk->inodeHandle, &node);\r
LEAVE('p', ret);\r
return ret;\r
}\r
\r
-#if USE_LFN\r
+/* \r
+ * ====================\r
+ * Directory IO\r
+ * ====================\r
+ */\r
+\r
/**\r
- \fn char *FAT_int_GetLFN(tVFS_Node *node)\r
- \brief Return pointer to LFN cache entry\r
+ * \brief Reads a sector from the disk\r
+ * \param Node Directory node to read\r
+ * \param Sector Sector number in the directory to read\r
+ * \param Buffer Destination buffer for the read data\r
*/\r
-char *FAT_int_GetLFN(tVFS_Node *node)\r
+int FAT_int_ReadDirSector(tVFS_Node *Node, int Sector, fat_filetable *Buffer)\r
{\r
- t_lfncache *tmp;\r
- tmp = fat_lfncache;\r
- while(tmp)\r
+ Uint64 addr;\r
+ tFAT_VolInfo *disk = Node->ImplPtr;\r
+ \r
+ ENTER("pNode iSector pEntry", Node, Sector, Buffer);\r
+ \r
+ // Parse address\r
+ if(FAT_int_GetAddress(Node, Sector * 512, &addr, NULL))\r
{\r
- if(tmp->Inode == node->Inode && tmp->Disk == node->ImplPtr)\r
- return tmp->Name;\r
- tmp = tmp->Next;\r
+ LEAVE('i', 1);\r
+ return 1;\r
}\r
- tmp = malloc(sizeof(t_lfncache));\r
- tmp->Inode = node->Inode;\r
- tmp->Disk = node->ImplPtr;\r
- memset(tmp->Name, 0, 256);\r
\r
- tmp->Next = fat_lfncache;\r
- fat_lfncache = tmp;\r
+ LOG("addr = 0x%llx", addr);\r
+ // Read Sector\r
+ if(VFS_ReadAt(disk->fileHandle, addr, 512, Buffer) != 512)\r
+ {\r
+ LEAVE('i', 1);\r
+ return 1;\r
+ }\r
\r
- return tmp->Name;\r
+ LEAVE('i', 0);\r
+ return 0;\r
}\r
\r
+#if SUPPORT_WRITE\r
/**\r
- \fn void FAT_int_DelLFN(tVFS_Node *node)\r
- \brief Delete a LFN cache entry\r
-*/\r
-void FAT_int_DelLFN(tVFS_Node *node)\r
+ * \brief Writes an entry to the disk\r
+ * \todo Support expanding a directory\r
+ * \param Node Directory node\r
+ * \param ID ID of entry to update\r
+ * \param Entry Entry data\r
+ * \return Zero on success, non-zero on error\r
+ */\r
+int FAT_int_WriteDirEntry(tVFS_Node *Node, int ID, fat_filetable *Entry)\r
{\r
- t_lfncache *tmp;\r
+ Uint64 addr = 0;\r
+ int tmp;\r
+ Uint32 cluster = 0;\r
+ tFAT_VolInfo *disk = Node->ImplPtr;\r
\r
- if(!fat_lfncache) return;\r
+ ENTER("pNode iID pEntry", Node, ID, Entry);\r
\r
- if(!fat_lfncache->Next)\r
+ tmp = FAT_int_GetAddress(Node, ID * sizeof(fat_filetable), &addr, &cluster);\r
+ if( tmp )\r
{\r
- tmp = fat_lfncache;\r
- fat_lfncache = tmp->Next;\r
- free(tmp);\r
- return;\r
+ //TODO: Allocate a cluster\r
+ cluster = FAT_int_AllocateCluster(Node->ImplPtr, cluster);\r
+ if(cluster == -1) {\r
+ Log_Warning("FAT", "Unable to allocate an other cluster for %p", Node);\r
+ LEAVE('i', 1);\r
+ return 1;\r
+ }\r
+ FAT_int_GetAddress(Node, ID * sizeof(fat_filetable), &addr, &cluster);\r
+ }\r
+ \r
+\r
+ LOG("addr = 0x%llx", addr);\r
+ \r
+ // Read Sector\r
+ VFS_WriteAt(disk->fileHandle, addr, sizeof(fat_filetable), Entry); // Read Dir Data\r
+ \r
+ LEAVE('i', 0);\r
+ return 0;\r
+}\r
+#endif\r
+\r
+#if USE_LFN\r
+// I should probably more tightly associate the LFN cache with the node\r
+// somehow, maybe by adding a field to tVFS_Node before locking it\r
+// Maybe .Cache or something like that (something that is free'd by the\r
+// Inode_UncacheNode function)\r
+ \r
+/**\r
+ * \fn char *FAT_int_GetLFN(tVFS_Node *node)\r
+ * \brief Return pointer to LFN cache entry\r
+ * \param Node Directory node\r
+ * \param ID ID of the short name\r
+ * \return Pointer to the LFN cache entry\r
+ */\r
+char *FAT_int_GetLFN(tVFS_Node *Node, int ID)\r
+{\r
+ tFAT_LFNCache *cache;\r
+ int i, firstFree;\r
+ \r
+ // TODO: Thread Safety (Lock things)\r
+ cache = Node->Data;\r
+ \r
+ // Create a cache if it isn't there\r
+ if(!cache) {\r
+ cache = Node->Data = malloc( sizeof(tFAT_LFNCache) + sizeof(tFAT_LFNCacheEnt) );\r
+ cache->NumEntries = 1;\r
+ cache->Entries[0].ID = ID;\r
+ cache->Entries[0].Data[0] = '\0';\r
+ return cache->Entries[0].Data;\r
}\r
- tmp = fat_lfncache;\r
- while(tmp && tmp->Next)\r
+ \r
+ // Scan for a current entry\r
+ firstFree = -1;\r
+ for( i = 0; i < cache->NumEntries; i++ )\r
{\r
- if(tmp->Inode == node->Inode && tmp->Disk == node->ImplPtr)\r
- {\r
- free(tmp->Next);\r
- tmp->Next = tmp->Next->Next;\r
- return;\r
+ if( cache->Entries[i].ID == ID )\r
+ return cache->Entries[i].Data;\r
+ if( cache->Entries[i].ID == -1 && firstFree == -1 )\r
+ firstFree = i;\r
+ }\r
+ \r
+ if(firstFree == -1) {\r
+ // Use `i` for temp length\r
+ i = sizeof(tFAT_LFNCache) + (cache->NumEntries+1)*sizeof(tFAT_LFNCacheEnt);\r
+ Node->Data = realloc( Node->Data, i );\r
+ if( !Node->Data ) {\r
+ Log_Error("FAT", "malloc() fail, unable to allocate %i for LFN cache", i);\r
+ return NULL;\r
}\r
- tmp = tmp->Next;\r
+ cache = Node->Data;\r
+ i = cache->NumEntries;\r
+ cache->NumEntries ++;\r
+ }\r
+ else {\r
+ i = firstFree;\r
+ }\r
+ \r
+ // Create new entry\r
+ cache->Entries[ i ].ID = ID;\r
+ cache->Entries[ i ].Data[0] = '\0';\r
+ \r
+ //TODO: Unlock\r
+ return cache->Entries[ i ].Data;\r
+}\r
+\r
+/**\r
+ * \fn void FAT_int_DelLFN(tVFS_Node *node)\r
+ * \brief Delete a LFN cache entry\r
+ * \param Node Directory node\r
+ * \param ID File Entry ID\r
+ */\r
+void FAT_int_DelLFN(tVFS_Node *Node, int ID)\r
+{\r
+ tFAT_LFNCache *cache = Node->Data;\r
+ int i;\r
+ \r
+ // Fast return\r
+ if(!cache) return;\r
+ \r
+ // Scan for a current entry\r
+ for( i = 0; i < cache->NumEntries; i++ )\r
+ {\r
+ if( cache->Entries[i].ID == ID )\r
+ cache->Entries[i].ID = -1;\r
}\r
+ return ;\r
}\r
#endif\r
\r
/**\r
- \fn char *FAT_ReadDir(tVFS_Node *Node, int ID)\r
- \param Node Node structure of directory\r
- \param ID Directory position\r
-**/\r
+ * \fn char *FAT_ReadDir(tVFS_Node *Node, int ID)\r
+ * \param Node Node structure of directory\r
+ * \param ID Directory position\r
+ * \return Filename as a heap string, NULL or VFS_SKIP\r
+ */\r
char *FAT_ReadDir(tVFS_Node *Node, int ID)\r
{\r
- fat_filetable fileinfo[16]; //Sizeof=32, 16 per sector\r
- int a=0;\r
- tFAT_VolInfo *disk = Node->ImplPtr;\r
- Uint32 cluster, offset;\r
- int preSkip;\r
+ fat_filetable fileinfo[16]; // sizeof(fat_filetable)=32, so 16 per sector\r
+ int a = 0;\r
char *ret;\r
#if USE_LFN\r
char *lfn = NULL;\r
\r
ENTER("pNode iID", Node, ID);\r
\r
- // Get Byte Offset and skip\r
- offset = ID * sizeof(fat_filetable);\r
- preSkip = offset / (512 * disk->bootsect.spc);\r
- LOG("disk->bootsect.spc = %i", disk->bootsect.spc);\r
- LOG("Node->size = %i", Node->Size);\r
- cluster = Node->Inode & 0xFFFFFFFF; // Cluster ID\r
- \r
- // Do Cluster Skip\r
- // - Pre FAT32 had a reserved area for the root.\r
- if( disk->type == FAT32 || cluster != disk->rootOffset )\r
- {\r
- //Skip previous clusters\r
- for(a=preSkip;a--;) {\r
- cluster = FAT_int_GetFatValue(disk, cluster);\r
- // Check for end of cluster chain\r
- if(cluster == -1) { LEAVE('n'); return NULL;}\r
- }\r
- }\r
- \r
- // Bounds Checking (Used to spot heap overflows)\r
- if(cluster > disk->ClusterCount + 2)\r
+ if(FAT_int_ReadDirSector(Node, ID/16, fileinfo))\r
{\r
- Log_Warning("FAT", "Cluster ID is over cluster count (0x%x>0x%x)",\r
- cluster, disk->ClusterCount+2);\r
+ LOG("End of chain, end of dir");\r
LEAVE('n');\r
return NULL;\r
}\r
\r
- LOG("cluster=0x%x, ID=%i", cluster, ID);\r
- \r
- // Compute Offsets\r
- // - Pre FAT32 cluster base (in sectors)\r
- if( cluster == disk->rootOffset && disk->type != FAT32 )\r
- offset = disk->bootsect.resvSectCount + cluster*disk->bootsect.spc;\r
- else\r
- { // FAT32 cluster base (in sectors)\r
- offset = disk->firstDataSect;\r
- offset += (cluster - 2) * disk->bootsect.spc;\r
- }\r
- // Sector in cluster\r
- if(disk->bootsect.spc != 1)\r
- offset += (ID / 16) % disk->bootsect.spc;\r
// Offset in sector\r
a = ID % 16;\r
\r
- LOG("offset=%i, a=%i", offset, a);\r
+ LOG("fileinfo[%i].name[0] = 0x%x", a, (Uint8)fileinfo[a].name[0]);\r
\r
- // Read Sector\r
- VFS_ReadAt(disk->fileHandle, offset*512, 512, fileinfo); // Read Dir Data\r
- \r
- LOG("name[0] = 0x%x", (Uint8)fileinfo[a].name[0]);\r
- //Check if this is the last entry\r
+ // Check if this is the last entry\r
if( fileinfo[a].name[0] == '\0' ) {\r
Node->Size = ID;\r
LOG("End of list");\r
// Check for empty entry\r
if( (Uint8)fileinfo[a].name[0] == 0xE5 ) {\r
LOG("Empty Entry");\r
+ #if 0 // Stop on empty entry?\r
+ LEAVE('n');\r
+ return NULL; // Stop\r
+ #else\r
LEAVE('p', VFS_SKIP);\r
return VFS_SKIP; // Skip\r
+ #endif\r
}\r
\r
#if USE_LFN\r
// Get Long File Name Cache\r
- lfn = FAT_int_GetLFN(Node);\r
if(fileinfo[a].attrib == ATTR_LFN)\r
{\r
fat_longfilename *lfnInfo;\r
int len;\r
\r
lfnInfo = (fat_longfilename *) &fileinfo[a];\r
+ \r
+ // Get cache for corresponding file\r
+ lfn = FAT_int_GetLFN( Node, ID + (lfnInfo->id & 0x3F) );\r
+ \r
+ // Bit 6 indicates the start of an entry\r
if(lfnInfo->id & 0x40) memset(lfn, 0, 256);\r
+ \r
// Get the current length\r
len = strlen(lfn);\r
\r
- // Sanity Check (FAT implementations should not allow >255 bytes)\r
+ // Sanity Check (FAT implementations should not allow >255 character names)\r
if(len + 13 > 255) return VFS_SKIP;\r
// Rebase all bytes\r
for(a=len+1;a--;) lfn[a+13] = lfn[a];\r
lfn[ 7] = lfnInfo->name2[2]; lfn[ 8] = lfnInfo->name2[3];\r
lfn[ 9] = lfnInfo->name2[4]; lfn[10] = lfnInfo->name2[5];\r
lfn[11] = lfnInfo->name3[0]; lfn[12] = lfnInfo->name3[1];\r
+ LOG("lfn = '%s'", lfn);\r
LEAVE('p', VFS_SKIP);\r
return VFS_SKIP;\r
}\r
#endif\r
\r
- //Check if it is a volume entry\r
+ // Check if it is a volume entry\r
if(fileinfo[a].attrib & 0x08) {\r
LEAVE('p', VFS_SKIP);\r
return VFS_SKIP;\r
return VFS_SKIP;\r
} \r
\r
- LOG("name='%c%c%c%c%c%c%c%c.%c%c%c'\n",\r
+ LOG("name='%c%c%c%c%c%c%c%c.%c%c%c'",\r
fileinfo[a].name[0], fileinfo[a].name[1], fileinfo[a].name[2], fileinfo[a].name[3],\r
fileinfo[a].name[4], fileinfo[a].name[5], fileinfo[a].name[6], fileinfo[a].name[7],\r
fileinfo[a].name[8], fileinfo[a].name[9], fileinfo[a].name[10] );\r
\r
#if USE_LFN\r
- //node = FAT_int_CreateNode(Node, &fileinfo[a], lfn);\r
- ret = FAT_int_CreateName(Node, &fileinfo[a], lfn);\r
- lfn[0] = '\0';\r
+ lfn = FAT_int_GetLFN(Node, ID);\r
+ ret = FAT_int_CreateName(&fileinfo[a], lfn);\r
#else\r
- //node = FAT_int_CreateNode(Node, &fileinfo[a], NULL);\r
- ret = FAT_int_CreateName(Node, &fileinfo[a], NULL);\r
+ ret = FAT_int_CreateName(&fileinfo[a], NULL);\r
#endif\r
\r
LEAVE('s', ret);\r
* \fn tVFS_Node *FAT_FindDir(tVFS_Node *node, char *name)\r
* \brief Finds an entry in the current directory\r
*/\r
-tVFS_Node *FAT_FindDir(tVFS_Node *Node, char *name)\r
+tVFS_Node *FAT_FindDir(tVFS_Node *Node, const char *Name)\r
{\r
fat_filetable fileinfo[16];\r
- char tmpName[11];\r
+ char tmpName[13];\r
#if USE_LFN\r
fat_longfilename *lfnInfo;\r
- char *lfn = NULL;\r
+ char lfn[256];\r
int lfnPos=255, lfnId = -1;\r
#endif\r
- int i=0;\r
+ int i;\r
tVFS_Node *tmpNode;\r
- Uint64 diskOffset;\r
tFAT_VolInfo *disk = Node->ImplPtr;\r
- Uint32 dirCluster;\r
Uint32 cluster;\r
\r
- ENTER("pNode sname", Node, name);\r
+ ENTER("pNode sname", Node, Name);\r
\r
// Fast Returns\r
- if(!name || name[0] == '\0') {\r
+ if(!Name || Name[0] == '\0') {\r
LEAVE('n');\r
return NULL;\r
}\r
\r
- #if USE_LFN\r
- lfn = FAT_int_GetLFN(Node);\r
- #endif\r
- \r
- dirCluster = Node->Inode & 0xFFFFFFFF;\r
- // Seek to Directory\r
- if( dirCluster == disk->rootOffset && disk->type != FAT32 )\r
- diskOffset = (disk->bootsect.resvSectCount+dirCluster*disk->bootsect.spc) << 9;\r
- else\r
- diskOffset = (disk->firstDataSect+(dirCluster-2)*disk->bootsect.spc) << 9;\r
- \r
- for(;;i++)\r
+ for( i = 0; ; i++ )\r
{\r
- // Load sector\r
if((i & 0xF) == 0) {\r
- //Log("FAT_FindDir: diskOffset = 0x%x", diskOffset);\r
- VFS_ReadAt(disk->fileHandle, diskOffset, 512, fileinfo);\r
- diskOffset += 512;\r
+ if(FAT_int_ReadDirSector(Node, i/16, fileinfo))\r
+ {\r
+ LEAVE('n');\r
+ return NULL;\r
+ }\r
}\r
\r
//Check if the files are free\r
- if(fileinfo[i&0xF].name[0] == '\0') break; //Free and last\r
- if(fileinfo[i&0xF].name[0] == '\xE5') goto loadCluster; //Free\r
+ if(fileinfo[i&0xF].name[0] == '\0') break; // End of List marker\r
+ if(fileinfo[i&0xF].name[0] == '\xE5') continue; // Free entry\r
\r
\r
#if USE_LFN\r
// Long File Name Entry\r
- if(fileinfo[i&0xF].attrib == ATTR_LFN)\r
+ if(fileinfo[i & 0xF].attrib == ATTR_LFN)\r
{\r
lfnInfo = (fat_longfilename *) &fileinfo[i&0xF];\r
if(lfnInfo->id & 0x40) {\r
{\r
// Remove LFN if it does not apply\r
if(lfnId != i) lfn[0] = '\0';\r
+ #else\r
+ if(fileinfo[i&0xF].attrib == ATTR_LFN) continue;\r
#endif\r
// Get Real Filename\r
FAT_int_ProperFilename(tmpName, fileinfo[i&0xF].name);\r
- \r
LOG("tmpName = '%s'", tmpName);\r
\r
- //Only Long name is case sensitive, 8.3 is not\r
+ // Only the long name is case sensitive, 8.3 is not\r
#if USE_LFN\r
- if(strucmp(tmpName, name) == 0 || strcmp(lfn, name) == 0) {\r
+ if(strucmp(tmpName, Name) == 0 || strcmp(lfn, Name) == 0)\r
#else\r
- if(strucmp(tmpName, name) == 0) {\r
+ if(strucmp(tmpName, Name) == 0)\r
#endif\r
+ {\r
cluster = fileinfo[i&0xF].cluster | (fileinfo[i&0xF].clusterHi << 16);\r
tmpNode = Inode_GetCache(disk->inodeHandle, cluster);\r
if(tmpNode == NULL) // Node is not cached\r
{\r
- #if USE_LFN\r
- tmpNode = FAT_int_CreateNode(Node, &fileinfo[i&0xF], lfn);\r
- #else\r
- tmpNode = FAT_int_CreateNode(Node, &fileinfo[i&0xF], NULL);\r
- #endif\r
+ tmpNode = FAT_int_CreateNode(Node, &fileinfo[i&0xF], i);\r
}\r
- #if USE_LFN\r
- lfn[0] = '\0';\r
- #endif\r
LEAVE('p', tmpNode);\r
return tmpNode;\r
}\r
#if USE_LFN\r
}\r
#endif\r
- \r
- loadCluster:\r
- //Load Next cluster?\r
- if( ((i+1) >> 4) % disk->bootsect.spc == 0 && ((i+1) & 0xF) == 0)\r
- {\r
- if( dirCluster == disk->rootOffset && disk->type != FAT32 )\r
- continue;\r
- dirCluster = FAT_int_GetFatValue(disk, dirCluster);\r
- if(dirCluster == -1) break;\r
- diskOffset = (disk->firstDataSect+(dirCluster-2)*disk->bootsect.spc)*512;\r
- }\r
}\r
\r
LEAVE('n');\r
return NULL;\r
}\r
\r
+#if SUPPORT_WRITE\r
/**\r
* \fn int FAT_Mknod(tVFS_Node *Node, char *Name, Uint Flags)\r
* \brief Create a new node\r
*/\r
int FAT_Relink(tVFS_Node *Node, char *OldName, char *NewName)\r
{\r
- return 0;\r
+ tVFS_Node *child;\r
+ fat_filetable ft = {0};\r
+ int ret;\r
+ \r
+ child = FAT_FindDir(Node, OldName);\r
+ if(!child) return ENOTFOUND;\r
+ \r
+ // Delete?\r
+ if( NewName == NULL )\r
+ {\r
+ child->ImplInt |= FAT_FLAG_DELETE; // Mark for deletion on close\r
+ \r
+ // Delete from the directory\r
+ ft.name[0] = '\xE9';\r
+ FAT_int_WriteDirEntry(Node, child->ImplInt & 0xFFFF, &ft);\r
+ \r
+ // Return success\r
+ ret = EOK;\r
+ }\r
+ // Rename\r
+ else\r
+ {\r
+ Log_Warning("FAT", "Renaming no yet supported %p ('%s' => '%s')",\r
+ Node, OldName, NewName);\r
+ ret = ENOTIMPL;\r
+ }\r
+ \r
+ // Close child\r
+ child->Close( child );\r
+ return ret;\r
}\r
+#endif\r
\r
/**\r
* \fn void FAT_CloseFile(tVFS_Node *Node)\r
tFAT_VolInfo *disk = Node->ImplPtr;\r
if(Node == NULL) return ;\r
\r
- Inode_UncacheNode(disk->inodeHandle, Node->Inode);\r
- #if USE_LFN\r
- // If node has been uncached and is a directory, delete the LFN cache\r
- if( !Inode_GetCache(disk->inodeHandle, Node->Inode) && Node->Flags & VFS_FFLAG_DIRECTORY)\r
- FAT_int_DelLFN(Node);\r
- else // Get Cache references the node, so dereference it\r
- Inode_UncacheNode(disk->inodeHandle, Node->Inode);\r
+ #if SUPPORT_WRITE\r
+ // Update the node if it's dirty (don't bother if it's marked for\r
+ // deletion)\r
+ if( (Node->ImplInt & FAT_FLAG_DIRTY) && !(Node->ImplInt & FAT_FLAG_DELETE) )\r
+ {\r
+ tFAT_VolInfo buf[16];\r
+ tFAT_VolInfo *ft = &buf[ (Node->ImplInt & 0xFFFF) % 16 ];\r
+ \r
+ FAT_int_ReadDirSector(Node, (Node->ImplInt & 0xFFFF)/16, buf);\r
+ ft->size = Node->Size;\r
+ // TODO: update adate, mtime, mdate\r
+ FAT_int_WriteDirEntry(Node, Node->ImplInt & 0xFFFF, ft);\r
+ \r
+ Node->ImplInt &= ~FAT_FLAG_DIRTY;\r
+ }\r
#endif\r
+ \r
+ // TODO: Make this more thread safe somehow, probably by moving the\r
+ // Inode_UncacheNode higher up and saving the cluster value somewhere\r
+ if( Node->ReferenceCount == 1 )\r
+ { \r
+ #if SUPPORT_WRITE\r
+ // Delete File\r
+ if( Node->ImplInt & FAT_FLAG_DELETE ) {\r
+ // Since the node is marked, we only need to remove it's data\r
+ Uint32 cluster = Node->Inode & 0xFFFFFFFF;\r
+ while( cluster != -1 )\r
+ cluster = FAT_int_FreeCluster(Node->ImplPtr, cluster);\r
+ }\r
+ #endif\r
+ }\r
+ \r
+ Inode_UncacheNode(disk->inodeHandle, Node->Inode);\r
return ;\r
}\r