compiler/clib/lstat.c

   1 /*
   2     Copyright © 1995-2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #include <aros/debug.h>
   7
   8 #include <proto/dos.h>
   9
  10 #include <errno.h>
  11
  12 #include "__arosc_privdata.h"
  13 #include "__filesystem_support.h"
  14 #include "__stat.h"
  15 #include "__upath.h"
  16
  17 /* like Dos_Lock() but no automatic soft link resolution */
  18 static BPTR __lock(
  19     const char* name,
  20     LONG        accessMode);
  21
  22 /*****************************************************************************
  23
  24     NAME */
  25
  26 #include <sys/stat.h>
  27
  28         int lstat(
  29
  30 /*  SYNOPSIS */
  31         const char  *path,
  32         struct stat *sb)
  33
  34 /*  FUNCTION
  35         Returns information about a file like stat does except that lstat
  36         does not follow symbolic links. Information is stored in stat
  37         structure. Consult stat() documentation for detailed description
  38         of that structure.
  39
  40     INPUTS
  41         path - Pathname of the file
  42         sb - Pointer to stat structure that will be filled by the lstat() call.
  43
  44     RESULT
  45         0 on success and -1 on error. If an error occurred, the global
  46         variable errno is set.
  47
  48     NOTES
  49
  50     EXAMPLE
  51
  52     BUGS
  53
  54     SEE ALSO
  55         stat(), fstat()
  56
  57     INTERNALS
  58         Consult stat() documentation for details.
  59
  60 ******************************************************************************/
  61 {
  62     struct aroscbase *aroscbase = __aros_getbase();
  63     int res = 0;
  64     BPTR lock;
  65
  66     /* check for empty path before potential conversion from "." to "" */
  67     if (aroscbase->acb_doupath && path && *path == '\0')
  68     {
  69         errno = ENOENT;
  70         return -1;
  71     }
  72
  73     path = __path_u2a(path);
  74     if (path == NULL)
  75         return -1;
  76
  77     lock = __lock(path, SHARED_LOCK);
  78     if (!lock)
  79     {
  80         if (   IoErr() == ERROR_IS_SOFT_LINK
  81             || IoErr() == ERROR_OBJECT_IN_USE)
  82         {
  83             /* either the file is already locked exclusively
  84                or it is a soft link, in both cases only way
  85                to get info about it is to find it in the
  86                parent directory with the ExNext() function
  87             */
  88
  89             SetIoErr(0);
  90             return __stat_from_path(path, sb);
  91         }
  92
  93         errno = __arosc_ioerr2errno(IoErr());
  94         return -1;
  95     }
  96     else
  97         res = __stat(lock, sb, FALSE);
  98
  99     UnLock(lock);
 100
 101     return res;
 102 }
 103
 104 static BPTR __lock(
 105     const char* name,
 106     LONG        accessMode)
 107 {
 108     return Lock(name, accessMode);
 109 }