compiler/posixc/lstat.c

   1 /*
   2     Copyright © 1995-2013, 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 "__posixc_intbase.h"
  13 #include "__stat.h"
  14 #include "__upath.h"
  15
  16 /* like Dos_Lock() but no automatic soft link resolution */
  17 static BPTR __lock(
  18     const char* name,
  19     LONG        accessMode);
  20
  21 /*****************************************************************************
  22
  23     NAME */
  24
  25 #include <sys/stat.h>
  26
  27         int lstat(
  28
  29 /*  SYNOPSIS */
  30         const char  *path,
  31         struct stat *sb)
  32
  33 /*  FUNCTION
  34         Returns information about a file like stat does except that lstat
  35         does not follow symbolic links. Information is stored in stat
  36         structure. Consult stat() documentation for detailed description
  37         of that structure.
  38
  39     INPUTS
  40         path - Pathname of the file
  41         sb - Pointer to stat structure that will be filled by the lstat() call.
  42
  43     RESULT
  44         0 on success and -1 on error. If an error occurred, the global
  45         variable errno is set.
  46
  47     NOTES
  48
  49     EXAMPLE
  50
  51     BUGS
  52
  53     SEE ALSO
  54         stat(), fstat()
  55
  56     INTERNALS
  57         Consult stat() documentation for details.
  58
  59 ******************************************************************************/
  60 {
  61     struct PosixCIntBase *PosixCBase =
  62         (struct PosixCIntBase *)__aros_getbase_PosixCBase();
  63     int res = 0;
  64     BPTR lock;
  65
  66     /* check for empty path before potential conversion from "." to "" */
  67     if (PosixCBase->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 = __stdc_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 }