Remove pre-ISO C support
[platform/upstream/glibc.git] / dirent / opendir-tst1.c
1 /* Copyright (C) 1998, 2000 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with the GNU C Library; if not, write to the Free
17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18    02111-1307 USA.  */
19
20 #include <dirent.h>
21 #include <errno.h>
22 #include <fcntl.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <unistd.h>
27
28 /* Name of the FIFO.  */
29 char tmpname[] = "fifoXXXXXX";
30
31
32 /* Do the real work.  */
33 static int
34 real_test (void)
35 {
36   DIR *dirp;
37
38   /* This should not block for an FIFO.  */
39   dirp = opendir (tmpname);
40
41   /* Successful.  */
42   if (dirp != NULL)
43     {
44       /* Oh, oh, how can this work?  */
45       fputs ("`opendir' succeeded on a FIFO???\n", stdout);
46       closedir (dirp);
47       return 1;
48     }
49
50   if (errno != ENOTDIR)
51     {
52       fprintf (stdout, "`opendir' return error `%s' instead of `%s'\n",
53                strerror (errno), strerror (ENOTDIR));
54       return 1;
55     }
56
57   return 0;
58 }
59
60
61 static int
62 do_test (int argc, char *argv[])
63 {
64   int retval;
65
66   if (mktemp (tmpname) == NULL)
67     {
68       perror ("mktemp");
69       return 1;
70     }
71
72   /* Try to generate a FIFO.  */
73   if (mknod (tmpname, 0600 | S_IFIFO, 0) < 0)
74     {
75       perror ("mknod");
76       /* We cannot make this an error.  */
77       return 0;
78     }
79
80   retval = real_test ();
81
82   remove (tmpname);
83
84   return retval;
85 }
86
87
88 static void
89 do_cleanup (void)
90 {
91   remove (tmpname);
92 }
93 #define CLEANUP_HANDLER do_cleanup ()
94
95
96 /* Include the test skeleton.  */
97 #include <test-skeleton.c>