Just a little cleanup
[tpg/acess2.git] / KernelLand / Kernel / vfs / open.c
1 /*
2  * Acess2 VFS
3  * - Open, Close and ChDir
4  */
5 #define DEBUG   0
6 #include <acess.h>
7 #include "vfs.h"
8 #include "vfs_int.h"
9 #include "vfs_ext.h"
10 #include <threads.h>
11
12 // === CONSTANTS ===
13 #define OPEN_MOUNT_ROOT 1
14 #define MAX_PATH_SLASHES        256
15 #define MAX_NESTED_LINKS        4
16 #define MAX_PATH_LEN    255
17
18 // === IMPORTS ===
19 extern tVFS_Mount       *gVFS_RootMount;
20 extern int      VFS_AllocHandle(int bIsUser, tVFS_Node *Node, int Mode);
21 extern tVFS_Node        *VFS_MemFile_Create(const char *Path);
22
23 // === PROTOTYPES ===
24  int    VFS_int_CreateHandle( tVFS_Node *Node, tVFS_Mount *Mount, int Mode );
25
26 // === CODE ===
27 /**
28  * \fn char *VFS_GetAbsPath(const char *Path)
29  * \brief Create an absolute path from a relative one
30  */
31 char *VFS_GetAbsPath(const char *Path)
32 {
33         char    *ret;
34          int    pathLen = strlen(Path);
35         char    *pathComps[MAX_PATH_SLASHES];
36         char    *tmpStr;
37         int             iPos = 0;
38         int             iPos2 = 0;
39         const char      *chroot = *Threads_GetChroot();
40          int    chrootLen;
41         const char      *cwd = *Threads_GetCWD();
42          int    cwdLen;
43         
44         ENTER("sPath", Path);
45         
46         // Memory File
47         if(Path[0] == '$') {
48                 ret = malloc(strlen(Path)+1);
49                 if(!ret) {
50                         Log_Warning("VFS", "VFS_GetAbsPath: malloc() returned NULL");
51                         return NULL;
52                 }
53                 strcpy(ret, Path);
54                 LEAVE('p', ret);
55                 return ret;
56         }
57         
58         // - Fetch ChRoot
59         if( chroot == NULL )
60                 chroot = "";
61         chrootLen = strlen(chroot);
62         // Trim trailing slash off chroot
63         if( chrootLen && chroot[chrootLen - 1] == '/' )
64                 chrootLen -= 1;
65         
66         // Check if the path is already absolute
67         if(Path[0] == '/') {
68                 ret = malloc(chrootLen + pathLen + 1);
69                 if(!ret) {
70                         Log_Warning("VFS", "VFS_GetAbsPath: malloc() returned NULL");
71                         return NULL;
72                 }
73                 strcpy(ret + chrootLen, Path);
74         }
75         else {
76                 if(cwd == NULL) {
77                         cwd = "/";
78                         cwdLen = 1;
79                 }
80                 else {
81                         cwdLen = strlen(cwd);
82                 }
83                 // Prepend the current directory
84                 ret = malloc(chrootLen + cwdLen + 1 + pathLen + 1 );
85                 strcpy(ret+chrootLen, cwd);
86                 ret[cwdLen] = '/';
87                 strcpy(ret+chrootLen+cwdLen+1, Path);
88                 //Log("ret = '%s'", ret);
89         }
90         
91         // Parse Path
92         pathComps[iPos++] = tmpStr = ret+chrootLen+1;
93         while(*tmpStr)
94         {
95                 if(*tmpStr++ == '/')
96                 {
97                         pathComps[iPos++] = tmpStr;
98                         if(iPos == MAX_PATH_SLASHES) {
99                                 LOG("Path '%s' has too many elements", Path);
100                                 free(ret);
101                                 LEAVE('n');
102                                 return NULL;
103                         }
104                 }
105         }
106         pathComps[iPos] = NULL;
107         
108         // Cleanup
109         iPos2 = iPos = 0;
110         while(pathComps[iPos])
111         {
112                 tmpStr = pathComps[iPos];
113                 // Always Increment iPos
114                 iPos++;
115                 // ..
116                 if(tmpStr[0] == '.' && tmpStr[1] == '.' && (tmpStr[2] == '/' || tmpStr[2] == '\0') )
117                 {
118                         if(iPos2 != 0)
119                                 iPos2 --;
120                         continue;
121                 }
122                 // .
123                 if(tmpStr[0] == '.' && (tmpStr[1] == '/' || tmpStr[1] == '\0') )
124                 {
125                         continue;
126                 }
127                 // Empty
128                 if(tmpStr[0] == '/' || tmpStr[0] == '\0')
129                 {
130                         continue;
131                 }
132                 
133                 // Set New Position
134                 pathComps[iPos2] = tmpStr;
135                 iPos2++;
136         }
137         pathComps[iPos2] = NULL;
138         
139         // Build New Path
140         iPos2 = chrootLen + 1;  iPos = 0;
141         ret[0] = '/';
142         while(pathComps[iPos])
143         {
144                 tmpStr = pathComps[iPos];
145                 while(*tmpStr && *tmpStr != '/')
146                 {
147                         ret[iPos2++] = *tmpStr;
148                         tmpStr++;
149                 }
150                 ret[iPos2++] = '/';
151                 iPos++;
152         }
153         if(iPos2 > 1)
154                 ret[iPos2-1] = 0;
155         else
156                 ret[iPos2] = 0;
157
158         // Prepend the chroot
159         if(chrootLen)
160                 memcpy( ret, chroot, chrootLen );
161         
162         LEAVE('s', ret);
163 //      Log_Debug("VFS", "VFS_GetAbsPath: RETURN '%s'", ret);
164         return ret;
165 }
166
167 /**
168  * \fn char *VFS_ParsePath(const char *Path, char **TruePath)
169  * \brief Parses a path, resolving sysmlinks and applying permissions
170  */
171 tVFS_Node *VFS_ParsePath(const char *Path, char **TruePath, tVFS_Mount **MountPoint)
172 {
173         tVFS_Mount      *mnt, *longestMount;
174          int    cmp, retLength = 0;
175          int    ofs, nextSlash;
176          int    iNestedLinks = 0;
177         tVFS_Node       *curNode, *tmpNode;
178         char    *tmp;
179         char    path_buffer[MAX_PATH_LEN+1];
180         
181         ENTER("sPath pTruePath", Path, TruePath);
182         
183         // HACK: Memory File
184         if(Threads_GetUID() == 0 && Path[0] == '$') {
185                 if(TruePath) {
186                         *TruePath = malloc(strlen(Path)+1);
187                         strcpy(*TruePath, Path);
188                 }
189                 curNode = VFS_MemFile_Create(Path);
190                 if(MountPoint) {
191                         *MountPoint = NULL;
192                 }
193                 LEAVE('p', curNode);
194                 return curNode;
195         }
196
197 restart_parse:  
198         // For root we always fast return
199         if(Path[0] == '/' && Path[1] == '\0') {
200                 if(TruePath) {
201                         *TruePath = malloc( gVFS_RootMount->MountPointLen+1 );
202                         strcpy(*TruePath, gVFS_RootMount->MountPoint);
203                 }
204                 gVFS_RootMount->OpenHandleCount ++;
205                 if(MountPoint)  *MountPoint = gVFS_RootMount;
206                 LEAVE('p', gVFS_RootMount->RootNode);
207                 return gVFS_RootMount->RootNode;
208         }
209         
210         // Check if there is anything mounted
211         if(!gVFS_Mounts) {
212                 Log_Error("VFS", "VFS_ParsePath - No filesystems mounted");
213                 return NULL;
214         }
215         
216         // Find Mountpoint
217         longestMount = gVFS_RootMount;
218         RWLock_AcquireRead( &glVFS_MountList );
219         for(mnt = gVFS_Mounts; mnt; mnt = mnt->Next)
220         {
221                 // Quick Check
222                 if( Path[mnt->MountPointLen] != '/' && Path[mnt->MountPointLen] != '\0')
223                         continue;
224                 // Length Check - If the length is smaller than the longest match sofar
225                 if(mnt->MountPointLen < longestMount->MountPointLen)    continue;
226                 // String Compare
227                 cmp = strncmp(Path, mnt->MountPoint, mnt->MountPointLen);
228                 // Not a match, continue
229                 if(cmp != 0)    continue;
230                 
231                 #if OPEN_MOUNT_ROOT
232                 // Fast Break - Request Mount Root
233                 if(Path[mnt->MountPointLen] == '\0') {
234                         if(TruePath) {
235                                 *TruePath = malloc( mnt->MountPointLen+1 );
236                                 strcpy(*TruePath, mnt->MountPoint);
237                         }
238                         if(MountPoint)
239                                 *MountPoint = mnt;
240                         RWLock_Release( &glVFS_MountList );
241                         LOG("Mount %p root", mnt);
242                         LEAVE('p', mnt->RootNode);
243                         return mnt->RootNode;
244                 }
245                 #endif
246                 longestMount = mnt;
247         }
248         longestMount->OpenHandleCount ++;       // Increment assuimg it worked
249         RWLock_Release( &glVFS_MountList );
250         
251         // Save to shorter variable
252         mnt = longestMount;
253         
254         LOG("mnt = {MountPoint:\"%s\"}", mnt->MountPoint);
255         
256         // Initialise String
257         if(TruePath)
258         {
259                 // Assumes that the resultant path (here) will not be > strlen(Path) + 1
260                 *TruePath = malloc( strlen(Path) + 1 );
261                 strcpy(*TruePath, mnt->MountPoint);
262                 retLength = mnt->MountPointLen;
263         }
264         
265         curNode = mnt->RootNode;
266         curNode->ReferenceCount ++;     
267         // Parse Path
268         ofs = mnt->MountPointLen+1;
269         for(; (nextSlash = strpos(&Path[ofs], '/')) != -1; ofs += nextSlash + 1)
270         {
271                 char    pathEle[nextSlash+1];
272                 
273                 // Empty String
274                 if(nextSlash == 0)      continue;
275                 
276                 memcpy(pathEle, &Path[ofs], nextSlash);
277                 pathEle[nextSlash] = 0;
278         
279                 // Check permissions on root of filesystem
280                 if( !VFS_CheckACL(curNode, VFS_PERM_EXECUTE) ) {
281                         LOG("Permissions failure on '%s'", Path);
282                         goto _error;
283                 }
284                 
285                 // Check if the node has a FindDir method
286                 if( !curNode->Type )
287                 {
288                         LOG("Finddir failure on '%s' - No type", Path);
289                         Log_Error("VFS", "Node at '%s' has no type (mount %s:%s)",
290                                 Path, mnt->Filesystem->Name, mnt->MountPoint);
291                         goto _error;
292                 }
293                 if( !curNode->Type->FindDir )
294                 {
295                         LOG("Finddir failure on '%s' - No FindDir method in %s", Path, curNode->Type->Name);
296                         goto _error;
297                 }
298                 LOG("FindDir{=%p}(%p, '%s')", curNode->Type->FindDir, curNode, pathEle);
299                 // Get Child Node
300                 tmpNode = curNode->Type->FindDir(curNode, pathEle);
301                 LOG("tmpNode = %p", tmpNode);
302                 _CloseNode( curNode );
303                 curNode = tmpNode;
304                 
305                 // Error Check
306                 if(!curNode) {
307                         LOG("Node '%s' not found in dir '%s'", pathEle, Path);
308                         goto _error;
309                 }
310                 
311                 // Handle Symbolic Links
312                 if(curNode->Flags & VFS_FFLAG_SYMLINK) {
313                         if(TruePath) {
314                                 free(*TruePath);
315                                 *TruePath = NULL;
316                         }
317                         if(!curNode->Type || !curNode->Type->Read) {
318                                 Log_Warning("VFS", "VFS_ParsePath - Read of symlink node %p'%s' is NULL",
319                                         curNode, Path);
320                                 goto _error;
321                         }
322                         
323                         if(iNestedLinks > MAX_NESTED_LINKS) {
324                                 Log_Notice("VFS", "VFS_ParsePath - Nested link limit exceeded");
325                                 goto _error;
326                         }
327                         
328                         // Parse Symlink Path
329                         // - Just update the path variable and restart the function
330                         // > Count nested symlinks and limit to some value (counteracts loops)
331                         {
332                                  int    remlen = strlen(Path) - (ofs + nextSlash);
333                                 if( curNode->Size + remlen > MAX_PATH_LEN ) {
334                                         Log_Warning("VFS", "VFS_ParsePath - Symlinked path too long");
335                                         goto _error;
336                                 }
337                                 curNode->Type->Read( curNode, 0, curNode->Size, path_buffer );
338                                 path_buffer[ curNode->Size ] = '\0';
339                                 LOG("path_buffer = '%s'", path_buffer);
340                                 strcat(path_buffer, Path + ofs+nextSlash);
341                                 
342                                 Path = path_buffer;
343 //                              Log_Debug("VFS", "VFS_ParsePath: Symlink translated to '%s'", Path);
344                                 iNestedLinks ++;
345                         }
346
347                         // EVIL: Goto :)
348                         LOG("Symlink -> '%s', restart", Path);
349                         mnt->OpenHandleCount --;        // Not in this mountpoint
350                         goto restart_parse;
351                 }
352                 
353                 // Handle Non-Directories
354                 if( !(curNode->Flags & VFS_FFLAG_DIRECTORY) )
355                 {
356                         Log_Warning("VFS", "VFS_ParsePath - Path segment is not a directory");
357                         goto _error;
358                 }
359                 
360                 // Check if path needs extending
361                 if(!TruePath)   continue;
362                 
363                 // Increase buffer space
364                 tmp = realloc( *TruePath, retLength + strlen(pathEle) + 1 + 1 );
365                 // Check if allocation succeeded
366                 if(!tmp) {
367                         Log_Warning("VFS", "VFS_ParsePath - Unable to reallocate true path buffer");
368                         goto _error;
369                 }
370                 *TruePath = tmp;
371                 // Append to path
372                 (*TruePath)[retLength] = '/';
373                 strcpy(*TruePath+retLength+1, pathEle);
374                 
375                 LOG("*TruePath = '%s'", *TruePath);
376                 
377                 // - Extend Path
378                 retLength += nextSlash + 1;
379         }
380
381         // Check final finddir call     
382         if( !curNode->Type || !curNode->Type->FindDir ) {
383                 Log_Warning("VFS", "VFS_ParsePath - FindDir doesn't exist for element of '%s'", Path);
384                 goto _error;
385         }
386         
387         // Get last node
388         LOG("FindDir(%p, '%s')", curNode, &Path[ofs]);
389         tmpNode = curNode->Type->FindDir(curNode, &Path[ofs]);
390         LOG("tmpNode = %p", tmpNode);
391         // Check if file was found
392         if(!tmpNode) {
393                 LOG("Node '%s' not found in dir '%s'", &Path[ofs], Path);
394                 goto _error;
395         }
396         _CloseNode( curNode );
397         
398         if(TruePath)
399         {
400                 // Increase buffer space
401                 tmp = realloc(*TruePath, retLength + strlen(&Path[ofs]) + 1 + 1);
402                 // Check if allocation succeeded
403                 if(!tmp) {
404                         Log_Warning("VFS", "VFS_ParsePath -  Unable to reallocate true path buffer");
405                         goto _error;
406                 }
407                 *TruePath = tmp;
408                 // Append to path
409                 (*TruePath)[retLength] = '/';
410                 strcpy(*TruePath + retLength + 1, &Path[ofs]);
411                 // - Extend Path
412                 //retLength += strlen(tmpNode->Name) + 1;
413         }
414
415         if( MountPoint ) {
416                 *MountPoint = mnt;
417         }
418         
419         // Leave the mointpoint's count increased
420         
421         LEAVE('p', tmpNode);
422         return tmpNode;
423
424 _error:
425         _CloseNode( curNode );
426         
427         if(TruePath && *TruePath) {
428                 free(*TruePath);
429                 *TruePath = NULL;
430         }
431         // Open failed, so decrement the open handle count
432         mnt->OpenHandleCount --;
433         
434         LEAVE('n');
435         return NULL;
436 }
437
438 /**
439  * \brief Create and return a handle number for the given node and mode
440  */
441 int VFS_int_CreateHandle( tVFS_Node *Node, tVFS_Mount *Mount, int Mode )
442 {
443          int    i;
444         
445         ENTER("pNode pMount xMode", Node, Mount, Mode);
446
447         i = 0;
448         i |= (Mode & VFS_OPENFLAG_EXEC) ? VFS_PERM_EXECUTE : 0;
449         i |= (Mode & VFS_OPENFLAG_READ) ? VFS_PERM_READ : 0;
450         i |= (Mode & VFS_OPENFLAG_WRITE) ? VFS_PERM_WRITE : 0;
451         
452         LOG("i = 0b%b", i);
453         
454         // Permissions Check
455         if( !VFS_CheckACL(Node, i) ) {
456                 _CloseNode( Node );
457                 Log_Log("VFS", "VFS_int_CreateHandle: Permissions Failed");
458                 errno = EACCES;
459                 LEAVE_RET('i', -1);
460         }
461         
462         i = VFS_AllocHandle( !!(Mode & VFS_OPENFLAG_USER), Node, Mode );
463         if( i < 0 ) {
464                 Log_Notice("VFS", "VFS_int_CreateHandle: Out of handles");
465                 errno = ENFILE;
466                 LEAVE_RET('i', -1);
467         }
468
469         VFS_GetHandle(i)->Mount = Mount;
470
471         LEAVE_RET('x', i);
472 }
473
474 /**
475  * \fn int VFS_Open(const char *Path, Uint Mode)
476  * \brief Open a file
477  */
478 int VFS_Open(const char *Path, Uint Flags)
479 {
480         return VFS_OpenEx(Path, Flags, 0);
481 }
482
483 int VFS_OpenEx(const char *Path, Uint Flags, Uint Mode)
484 {
485         tVFS_Node       *node;
486         tVFS_Mount      *mnt;
487         char    *absPath;
488         
489         ENTER("sPath xFlags oMode", Path, Flags);
490         
491         // Get absolute path
492         absPath = VFS_GetAbsPath(Path);
493         if(absPath == NULL) {
494                 Log_Warning("VFS", "VFS_Open: Path expansion failed '%s'", Path);
495                 LEAVE_RET('i', -1);
496         }
497         LOG("absPath = \"%s\"", absPath);
498         
499         // Parse path and get mount point
500         node = VFS_ParsePath(absPath, NULL, &mnt);
501         
502         // Create file if requested and it doesn't exist
503         if( !node && (Flags & VFS_OPENFLAG_CREATE) )
504         {
505                 // TODO: Translate `Mode` into ACL and node flags
506                 // Get parent, create node
507                 if( VFS_MkNod(absPath, 0) ) {
508                         free(absPath);
509                         return -1;
510                 }
511                 node = VFS_ParsePath(absPath, NULL, &mnt);
512         }
513         
514         // Free generated path
515         free(absPath);
516         
517         // Check for error
518         if(!node)
519         {
520                 LOG("Cannot find node");
521                 errno = ENOENT;
522                 LEAVE_RET('i', -1);
523         }
524         
525         // Check for symlinks
526         if( !(Flags & VFS_OPENFLAG_NOLINK) && (node->Flags & VFS_FFLAG_SYMLINK) )
527         {
528                 char    tmppath[node->Size+1];
529                 if( node->Size > MAX_PATH_LEN ) {
530                         Log_Warning("VFS", "VFS_Open - Symlink is too long (%i)", node->Size);
531                         LEAVE_RET('i', -1);
532                 }
533                 if( !node->Type || !node->Type->Read ) {
534                         Log_Warning("VFS", "VFS_Open - No read method on symlink");
535                         LEAVE_RET('i', -1);
536                 }
537                 // Read symlink's path
538                 node->Type->Read( node, 0, node->Size, tmppath );
539                 tmppath[ node->Size ] = '\0';
540                 _CloseNode( node );
541                 // Open the target
542                 node = VFS_ParsePath(tmppath, NULL, &mnt);
543                 if(!node) {
544                         LOG("Cannot find symlink target node (%s)", tmppath);
545                         errno = ENOENT;
546                         LEAVE_RET('i', -1);
547                 }
548         }
549
550         LEAVE_RET('x', VFS_int_CreateHandle(node, mnt, Flags));
551 }
552
553
554 /**
555  * \brief Open a file from an open directory
556  */
557 int VFS_OpenChild(int FD, const char *Name, Uint Mode)
558 {
559         tVFS_Handle     *h;
560         tVFS_Node       *node;
561         
562         ENTER("xFD sName xMode", FD, Name, Mode);
563
564         // Get handle
565         h = VFS_GetHandle(FD);
566         if(h == NULL) {
567                 Log_Warning("VFS", "VFS_OpenChild - Invalid file handle 0x%x", FD);
568                 errno = EINVAL;
569                 LEAVE_RET('i', -1);
570         }
571         
572         // Check for directory
573         if( !(h->Node->Flags & VFS_FFLAG_DIRECTORY) ) {
574                 Log_Warning("VFS", "VFS_OpenChild - Passed handle is not a directory");
575                 errno = ENOTDIR;
576                 LEAVE_RET('i', -1);
577         }
578
579         // Sanity check
580         if( !h->Node->Type || !h->Node->Type->FindDir ) {
581                 Log_Error("VFS", "VFS_OpenChild - Node does not have a type/is missing FindDir");
582                 errno = ENOTDIR;
583                 LEAVE_RET('i', -1);
584         }
585         
586         // Find Child
587         node = h->Node->Type->FindDir(h->Node, Name);
588         if(!node) {
589                 errno = ENOENT;
590                 LEAVE_RET('i', -1);
591         }
592
593         // Increment open handle count, no problems with the mount going away as `h` is already open on it
594         h->Mount->OpenHandleCount ++;
595
596         LEAVE_RET('x', VFS_int_CreateHandle(node, h->Mount, Mode));
597 }
598
599 int VFS_OpenInode(Uint32 Mount, Uint64 Inode, int Mode)
600 {
601         tVFS_Mount      *mnt;
602         tVFS_Node       *node;
603
604         ENTER("iMount XInode xMode", Mount, Inode, Mode);
605         
606         // Get mount point
607         mnt = VFS_GetMountByIdent(Mount);
608         if( !mnt ) {
609                 LOG("Mount point ident invalid");
610                 errno = ENOENT;
611                 LEAVE_RET('i', -1);
612         }
613         
614         // Does the filesystem support this?
615         if( !mnt->Filesystem->GetNodeFromINode ) {
616                 LOG("Filesystem does not support inode accesses");
617                 errno = ENOENT;
618                 LEAVE_RET('i', -1);
619         }
620
621         // Get node
622         node = mnt->Filesystem->GetNodeFromINode(mnt->RootNode, Inode);
623         if( !node ) {
624                 LOG("Unable to find inode");
625                 errno = ENOENT;
626                 LEAVE_RET('i', -1);
627         }
628         
629         LEAVE_RET('x', VFS_int_CreateHandle(node, mnt, Mode));
630 }
631
632 /**
633  * \fn void VFS_Close(int FD)
634  * \brief Closes an open file handle
635  */
636 void VFS_Close(int FD)
637 {
638         tVFS_Handle     *h;
639         
640         // Get handle
641         h = VFS_GetHandle(FD);
642         if(h == NULL) {
643                 Log_Warning("VFS", "Invalid file handle passed to VFS_Close, 0x%x", FD);
644                 return;
645         }
646         
647         #if VALIDATE_VFS_FUNCTIPONS
648         if(h->Node->Close && !MM_GetPhysAddr(h->Node->Close)) {
649                 Log_Warning("VFS", "Node %p's ->Close method is invalid (%p)",
650                         h->Node, h->Node->Close);
651                 return ;
652         }
653         #endif
654         
655         _CloseNode(h->Node);
656
657         if( h->Mount )
658                 h->Mount->OpenHandleCount --;   
659
660         h->Node = NULL;
661 }
662
663 /**
664  * \brief Change current working directory
665  */
666 int VFS_ChDir(const char *Dest)
667 {
668         char    *buf;
669          int    fd;
670         tVFS_Handle     *h;
671         
672         // Create Absolute
673         buf = VFS_GetAbsPath(Dest);
674         if(buf == NULL) {
675                 Log_Notice("VFS", "VFS_ChDir: Path expansion failed");
676                 return -1;
677         }
678         
679         // Check if path exists
680         fd = VFS_Open(buf, VFS_OPENFLAG_EXEC);
681         if(fd == -1) {
682                 Log_Notice("VFS", "VFS_ChDir: Path is invalid");
683                 return -1;
684         }
685         
686         // Get node so we can check for directory
687         h = VFS_GetHandle(fd);
688         if( !(h->Node->Flags & VFS_FFLAG_DIRECTORY) ) {
689                 Log("VFS_ChDir: Path is not a directory");
690                 VFS_Close(fd);
691                 return -1;
692         }
693         
694         // Close file
695         VFS_Close(fd);
696         
697         {
698                 char    **cwdptr = Threads_GetCWD();
699                 // Free old working directory
700                 if( *cwdptr )   free( *cwdptr );
701                 // Set new
702                 *cwdptr = buf;
703         }
704         
705         Log("Updated CWD to '%s'", buf);
706         
707         return 1;
708 }
709
710 /**
711  * \fn int VFS_ChRoot(char *New)
712  * \brief Change current root directory
713  */
714 int VFS_ChRoot(const char *New)
715 {
716         char    *buf;
717          int    fd;
718         tVFS_Handle     *h;
719         
720         if(New[0] == '/' && New[1] == '\0')
721                 return 1;       // What a useless thing to ask!
722         
723         // Create Absolute
724         buf = VFS_GetAbsPath(New);
725         if(buf == NULL) {
726                 LOG("Path expansion failed");
727                 return -1;
728         }
729         
730         // Check if path exists
731         fd = VFS_Open(buf, VFS_OPENFLAG_EXEC);
732         if(fd == -1) {
733                 LOG("Path is invalid");
734                 return -1;
735         }
736         
737         // Get node so we can check for directory
738         h = VFS_GetHandle(fd);
739         if( !(h->Node->Flags & VFS_FFLAG_DIRECTORY) ) {
740                 LOG("Path is not a directory");
741                 VFS_Close(fd);
742                 return -1;
743         }
744         
745         // Close file
746         VFS_Close(fd);
747
748         // Update       
749         {
750                 char    **chroot_ptr = Threads_GetChroot();
751                 if( *chroot_ptr )       free( *chroot_ptr );
752                 *chroot_ptr = buf;
753         }
754         
755         LOG("Updated Root to '%s'", buf);
756         
757         return 1;
758 }
759
760 // === EXPORTS ===
761 EXPORT(VFS_Open);
762 EXPORT(VFS_Close);

UCC git Repository :: git.ucc.asn.au