lib/libc/sys-minix/stat.c

   1 #include <sys/cdefs.h>
   2 #include "namespace.h"
   3 #include <lib.h>
   4
   5 #include <sys/stat.h>
   6 #include <string.h>
   7
   8 /* XXX until that st_Xtime macroses used, we have to undefine them,
   9  * because of minix_prev_stat
  10  */
  11 #undef st_atime
  12 #undef st_ctime
  13 #undef st_mtime
  14
  15 static void prev_stat2new_stat(struct stat *new, struct minix_prev_stat *prev)
  16 {
  17   /* Copy field by field because of st_gid type mismath and
  18    * difference in order after atime.
  19    */
  20   new->st_dev = prev->st_dev;
  21   new->st_ino = prev->st_ino;
  22   new->st_mode = prev->st_mode;
  23   new->st_nlink = prev->st_nlink;
  24   new->st_uid = prev->st_uid;
  25   new->st_gid = prev->st_gid;
  26   new->st_rdev = prev->st_rdev;
  27   new->st_size = prev->st_size;
  28   new->st_atimespec.tv_sec = prev->st_atime;
  29   new->st_mtimespec.tv_sec = prev->st_mtime;
  30   new->st_ctimespec.tv_sec = prev->st_ctime;
  31 }
  32
  33 __weak_alias(_stat, __stat50);
  34 __weak_alias(_lstat, __lstat50);
  35 __weak_alias(_fstat, __fstat50);
  36
  37 int stat(const char *name, struct stat *buffer)
  38 {
  39   message m;
  40   int r;
  41   struct minix_prev_stat old_sb;
  42
  43   m.m1_i1 = strlen(name) + 1;
  44   m.m1_p1 = (char *) __UNCONST(name);
  45   m.m1_p2 = (char *) buffer;
  46
  47   if((r = _syscall(VFS_PROC_NR, STAT, &m)) >= 0 || errno != ENOSYS)
  48         return r;
  49
  50   errno = 0;
  51
  52   /* ENOSYS: new binary and old VFS, fallback to PREV_STAT.
  53    * User has struct stat (buffer), VFS still fills minix_prev_stat.
  54    */
  55   m.m1_i1 = strlen(name) + 1;
  56   m.m1_p1 = (char *) __UNCONST(name);
  57   m.m1_p2 = (char *) &old_sb;
  58
  59   if((r = _syscall(VFS_PROC_NR, PREV_STAT, &m)) < 0)
  60         return r;
  61
  62   memset(buffer, 0, sizeof(struct stat));
  63   prev_stat2new_stat(buffer, &old_sb);
  64
  65   return r;
  66 }
  67
  68 int _fstat(int fd, struct stat *buffer) { return fstat(fd, buffer); }
  69
  70 int fstat(int fd, struct stat *buffer)
  71 {
  72   message m;
  73   int r;
  74   struct minix_prev_stat old_sb;
  75
  76   m.m1_i1 = fd;
  77   m.m1_p1 = (char *) buffer;
  78
  79   if((r = _syscall(VFS_PROC_NR, FSTAT, &m)) >= 0 || errno != ENOSYS)
  80         return r;
  81
  82   errno = 0;
  83
  84   /* ENOSYS: new binary and old VFS, fallback to PREV_STAT.
  85    * User has struct stat (buffer), VFS still fills minix_prev_stat.
  86    */
  87   m.m1_i1 = fd;
  88   m.m1_p1 = (char *) &old_sb;
  89
  90   if((r = _syscall(VFS_PROC_NR, PREV_FSTAT, &m)) < 0)
  91         return r;
  92
  93   memset(buffer, 0, sizeof(struct stat));
  94   prev_stat2new_stat(buffer, &old_sb);
  95
  96   return r;
  97 }
  98
  99 int _lstat(const char *name, struct stat *buffer) { return lstat(name, buffer); }
 100
 101 int lstat(const char *name, struct stat *buffer)
 102 {
 103   message m;
 104   int r;
 105   struct minix_prev_stat old_sb;
 106
 107   m.m1_i1 = strlen(name) + 1;
 108   m.m1_p1 = (char *) __UNCONST(name);
 109   m.m1_p2 = (char *) buffer;
 110
 111   if((r = _syscall(VFS_PROC_NR, LSTAT, &m)) >= 0 || errno != ENOSYS)
 112         return r;
 113
 114   errno = 0;
 115
 116   /* ENOSYS: new binary and old VFS, fallback to PREV_STAT.
 117    * User has struct stat (buffer), VFS still fills minix_prev_stat.
 118    */
 119   m.m1_i1 = strlen(name) + 1;
 120   m.m1_p1 = (char *) __UNCONST(name);
 121   m.m1_p2 = (char *) &old_sb;
 122
 123   if((r = _syscall(VFS_PROC_NR, PREV_LSTAT, &m)) < 0)
 124         return r;
 125
 126   memset(buffer, 0, sizeof(struct stat));
 127   prev_stat2new_stat(buffer, &old_sb);
 128
 129   return r;
 130 }