2 * Acess2 Native Kernel
\r
3 * - Acess kernel emulation on another OS using SDL and UDP
\r
6 * - Host filesystem access
\r
9 #define off_t _acess_off_t
\r
10 #include <acess.h> // Acess
\r
11 #include <vfs.h> // Acess
\r
13 #include <dirent.h> // Posix
\r
14 #include <sys/stat.h> // Posix
\r
15 #include <stdio.h> // Posix
\r
18 // tVFS_Node->ImplPtr is a pointer to the filesystem flags (tNativeFS)
\r
19 // tVFS_Node->Data is the path string (heap string)
\r
20 // tVFS_Node->ImplInt is the path length
\r
22 // === STRUCTURES ===
\r
29 // === PROTOTYPES ===
\r
30 int NativeFS_Install(char **Arguments);
\r
31 tVFS_Node *NativeFS_Mount(const char *Device, const char **Arguments);
\r
32 void NativeFS_Unmount(tVFS_Node *Node);
\r
33 tVFS_Node *NativeFS_FindDir(tVFS_Node *Node, const char *Name);
\r
34 char *NativeFS_ReadDir(tVFS_Node *Node, int Position);
\r
35 size_t NativeFS_Read(tVFS_Node *Node, _acess_off_t Offset, size_t Length, void *Buffer);
\r
36 size_t NativeFS_Write(tVFS_Node *Node, _acess_off_t Offset, size_t Length, const void *Buffer);
\r
39 tVFS_NodeType gNativeFS_FileNodeType = {
\r
40 .Read = NativeFS_Read,
\r
41 .Write = NativeFS_Write,
\r
43 tVFS_NodeType gNativeFS_DirNodeType = {
\r
44 .FindDir = NativeFS_FindDir,
\r
45 .ReadDir = NativeFS_ReadDir,
\r
47 tVFS_Driver gNativeFS_Driver = {
\r
49 NativeFS_Mount, NativeFS_Unmount,
\r
54 int NativeFS_Install(char **Arguments)
\r
56 VFS_AddDriver(&gNativeFS_Driver);
\r
60 tVFS_Node *NativeFS_Mount(const char *Device, const char **Arguments)
\r
66 dp = opendir(Device);
\r
68 Log_Warning("NativeFS", "ERROR: Unable to open device root '%s'", Device);
\r
72 // Check if directory exists
\r
73 // Parse flags from arguments
\r
74 info = malloc(sizeof(tNativeFS));
\r
75 info->InodeHandle = Inode_GetHandle();
\r
76 info->bReadOnly = 0;
\r
78 ret = malloc(sizeof(tVFS_Node));
\r
79 memset(ret, 0, sizeof(tVFS_Node));
\r
80 ret->Data = strdup(Device);
\r
81 ret->ImplInt = strlen(ret->Data);
\r
82 ret->ImplPtr = info;
\r
83 ret->Inode = (Uint64)(tVAddr)dp;
\r
84 ret->Flags = VFS_FFLAG_DIRECTORY;
\r
86 ret->Type = &gNativeFS_DirNodeType;
\r
91 void NativeFS_Unmount(tVFS_Node *Node)
\r
93 tNativeFS *info = Node->ImplPtr;
\r
94 Inode_ClearCache( info->InodeHandle );
\r
95 closedir( (void *)(tVAddr)Node->Inode );
\r
101 void NativeFS_Close(tVFS_Node *Node)
\r
103 tNativeFS *info = Node->ImplPtr;
\r
104 Inode_UncacheNode( info->InodeHandle, Node->Inode );
\r
107 tVFS_Node *NativeFS_FindDir(tVFS_Node *Node, const char *Name)
\r
109 char *path = malloc(Node->ImplInt + 1 + strlen(Name) + 1);
\r
110 tNativeFS *info = Node->ImplPtr;
\r
112 struct stat statbuf;
\r
114 ENTER("pNode sName", Node, Name);
\r
117 strcpy(path, Node->Data);
\r
118 path[Node->ImplInt] = '/';
\r
119 strcpy(path + Node->ImplInt + 1, Name);
\r
121 LOG("path = '%s'", path);
\r
123 // Check if file exists
\r
124 if( stat(path, &statbuf) ) {
\r
126 LOG("Doesn't exist");
\r
131 memset(&baseRet, 0, sizeof(tVFS_Node));
\r
134 if( S_ISDIR(statbuf.st_mode) )
\r
137 baseRet.Inode = (Uint64)(tVAddr) opendir(path);
\r
138 baseRet.Type = &gNativeFS_DirNodeType;
\r
139 baseRet.Flags |= VFS_FFLAG_DIRECTORY;
\r
145 baseRet.Inode = (Uint64)(tVAddr) fopen(path, "r+");
\r
146 baseRet.Type = &gNativeFS_FileNodeType;
\r
148 fseek( (FILE*)(tVAddr)baseRet.Inode, 0, SEEK_END );
\r
149 baseRet.Size = ftell( (FILE*)(tVAddr)baseRet.Inode );
\r
153 baseRet.ImplPtr = info;
\r
154 baseRet.ImplInt = strlen(path);
\r
155 baseRet.Data = path;
\r
158 return Inode_CacheNode(info->InodeHandle, &baseRet);
\r
161 char *NativeFS_ReadDir(tVFS_Node *Node, int Position)
\r
163 struct dirent *ent;
\r
164 DIR *dp = (void*)(tVAddr)Node->Inode;
\r
167 ENTER("pNode iPosition", Node, Position);
\r
169 // TODO: Keep track of current position in the directory
\r
170 // TODO: Lock node during this
\r
174 } while(Position-- && ent);
\r
181 ret = strdup(ent->d_name);
\r
183 // TODO: Unlock node
\r
189 size_t NativeFS_Read(tVFS_Node *Node, _acess_off_t Offset, size_t Length, void *Buffer)
\r
191 ENTER("pNode XOffset xLength pBuffer", Node, Offset, Length, Buffer);
\r
192 if( fseek( (FILE *)(tVAddr)Node->Inode, Offset, SEEK_SET ) != 0 )
\r
198 return fread( Buffer, 1, Length, (FILE *)(tVAddr)Node->Inode );
\r
201 size_t NativeFS_Write(tVFS_Node *Node, _acess_off_t Offset, size_t Length, const void *Buffer)
\r
203 FILE *fp = (FILE *)(tVAddr)Node->Inode;
\r
204 ENTER("pNode XOffset xLength pBuffer", Node, Offset, Length, Buffer);
\r
205 if( fseek( fp, Offset, SEEK_SET ) != 0 )
\r
210 size_t ret = fwrite( Buffer, 1, Length, fp );
\r