mescc: Mes C Library: Populate with function tests from scaffold.
[mes.git] / lib / tests / io / 90-stat.c
1 /* -*-comment-start: "//";comment-end:""-*-
2  * GNU Mes --- Maxwell Equations of Software
3  * Copyright © 2018 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
4  *
5  * This file is part of GNU Mes.
6  *
7  * GNU Mes is free software; you can redistribute it and/or modify it
8  * under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or (at
10  * your option) any later version.
11  *
12  * GNU Mes is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 #include <errno.h>
22 #include <stdio.h>
23 #include <string.h>
24 #include <sys/stat.h>
25
26
27 #if __i386__
28 #define stat xstat
29
30 struct stat
31 {
32   unsigned long  st_dev;
33   unsigned long  st_ino;
34   unsigned short st_mode;
35   unsigned short st_nlink;
36   unsigned short st_uid;
37   unsigned short st_gid;
38   unsigned long  st_rdev;
39   long           st_size;
40   unsigned int   st_blksize;
41   unsigned int   st_blocks;
42   long           st_atime;
43   unsigned long  st_atime_usec;
44   long           st_mtime;
45   unsigned long  st_mtime_usec;
46   long           st_ctime;
47   unsigned long  st_ctime_usec;
48   unsigned int   __foo0;
49   unsigned int   __foo1;
50 };
51 #endif
52
53 int
54 main ()
55 {
56   // char buf[20];
57   // strcpy (buf, "Hello");
58   // eputs ("buf="); eputs (buf); eputs ("\n");
59   // strcat (buf, ", ");
60   // eputs ("buf="); eputs (buf); eputs ("\n");
61   // strncat (buf, "world!XXX", 6);
62   // eputs ("buf="); eputs (buf); eputs ("\n");
63   // if (strcmp (buf, "Hello, world!"))
64   //   return 1;
65
66   // char *name = "boo";
67   // errno = 0;
68   // fprintf (stderr, "%s: %s\n", name, strerror (errno));
69   int fd = open ("COPYING", 0);
70
71   struct stat sbuf;
72
73   int r = fstat (fd, &sbuf);
74   if (r < 0)
75     return 1;
76
77   eputs ("st_dev="); eputs (itoa (sbuf.st_dev)); eputs ("\n");
78   eputs ("st_ino="); eputs (itoa (sbuf.st_ino)); eputs ("\n");
79   eputs ("st_mode="); eputs (itoa (sbuf.st_mode)); eputs ("\n");
80   eputs ("st_nlink="); eputs (itoa (sbuf.st_nlink)); eputs ("\n");
81   eputs ("st_uid="); eputs (itoa (sbuf.st_uid)); eputs ("\n");
82   eputs ("st_gid="); eputs (itoa (sbuf.st_gid)); eputs ("\n");
83   eputs ("st_rdev="); eputs (itoa (sbuf.st_rdev)); eputs ("\n");
84   eputs ("st_size="); eputs (itoa (sbuf.st_size)); eputs ("\n");
85
86   eputs ("st_blksize="); eputs (itoa (sbuf.st_blksize)); eputs ("\n");
87   eputs ("st_blocks="); eputs (itoa (sbuf.st_blocks)); eputs ("\n");
88
89   eputs ("st_atime="); eputs (itoa (sbuf.st_atime)); eputs ("\n");
90   //eputs ("st_atime_nsec="); eputs (itoa (sbuf.st_atime_nsec)); eputs ("\n");
91
92   eputs ("st_mtime="); eputs (itoa (sbuf.st_mtime)); eputs ("\n");
93   //eputs ("st_mtime_nsec="); eputs (itoa (sbuf.st_mtime_nsec)); eputs ("\n");
94
95   eputs ("st_ctime="); eputs (itoa (sbuf.st_ctime)); eputs ("\n");
96   //eputs ("st_ctime_nsec="); eputs (itoa (sbuf.st_ctime_nsec)); eputs ("\n");
97
98   eputs ("size:"); eputs (itoa (sizeof (struct stat))); eputs ("\n");
99   return 0;
100 }