maint: update copyright
[gnulib.git] / tests / test-lseek.c
1 /* Test of lseek() function.
2    Copyright (C) 2007-2014 Free Software Foundation, Inc.
3
4    This program is free software: you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 3 of the License, or
7    (at your option) any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
16
17 /* Written by Eric Blake, 2007.  */
18
19 #include <config.h>
20
21 #include <unistd.h>
22
23 #include "signature.h"
24 SIGNATURE_CHECK (lseek, off_t, (int, off_t, int));
25
26 #include <errno.h>
27
28 #include "macros.h"
29
30 /* ARGC must be 2; *ARGV[1] is '0' if stdin and stdout are files, '1'
31    if they are pipes, and '2' if they are closed.  Check for proper
32    semantics of lseek.  */
33 int
34 main (int argc, char **argv)
35 {
36   if (argc != 2)
37     return 2;
38   switch (*argv[1])
39     {
40     case '0': /* regular files */
41       ASSERT (lseek (0, (off_t)2, SEEK_SET) == 2);
42       ASSERT (lseek (0, (off_t)-4, SEEK_CUR) == -1);
43       ASSERT (errno == EINVAL);
44       errno = 0;
45 #if ! defined __BEOS__
46       /* POSIX says that the last lseek call, when failing, does not change
47          the current offset.  But BeOS sets it to 0.  */
48       ASSERT (lseek (0, (off_t)0, SEEK_CUR) == 2);
49 #endif
50 #if 0 /* leads to SIGSYS on IRIX 6.5 */
51       ASSERT (lseek (0, (off_t)0, (SEEK_SET | SEEK_CUR | SEEK_END) + 1) == -1);
52       ASSERT (errno == EINVAL);
53 #endif
54       ASSERT (lseek (1, (off_t)2, SEEK_SET) == 2);
55       errno = 0;
56       ASSERT (lseek (1, (off_t)-4, SEEK_CUR) == -1);
57       ASSERT (errno == EINVAL);
58       errno = 0;
59 #if ! defined __BEOS__
60       /* POSIX says that the last lseek call, when failing, does not change
61          the current offset.  But BeOS sets it to 0.  */
62       ASSERT (lseek (1, (off_t)0, SEEK_CUR) == 2);
63 #endif
64 #if 0 /* leads to SIGSYS on IRIX 6.5 */
65       ASSERT (lseek (1, (off_t)0, (SEEK_SET | SEEK_CUR | SEEK_END) + 1) == -1);
66       ASSERT (errno == EINVAL);
67 #endif
68       break;
69
70     case '1': /* pipes */
71       errno = 0;
72       ASSERT (lseek (0, (off_t)0, SEEK_CUR) == -1);
73       ASSERT (errno == ESPIPE);
74       errno = 0;
75       ASSERT (lseek (1, (off_t)0, SEEK_CUR) == -1);
76       ASSERT (errno == ESPIPE);
77       break;
78
79     case '2': /* closed */
80       /* Explicitly close file descriptors 0 and 1.  The <&- and >&- in the
81          invoking shell are not enough on HP-UX.  */
82       close (0);
83       close (1);
84
85       errno = 0;
86       ASSERT (lseek (0, (off_t)0, SEEK_CUR) == -1);
87       ASSERT (errno == EBADF);
88
89       errno = 0;
90       ASSERT (lseek (1, (off_t)0, SEEK_CUR) == -1);
91       ASSERT (errno == EBADF);
92
93       /* Test behaviour for invalid file descriptors.  */
94       errno = 0;
95       ASSERT (lseek (-1, (off_t)0, SEEK_CUR) == -1);
96       ASSERT (errno == EBADF);
97
98       close (99);
99       errno = 0;
100       ASSERT (lseek (99, (off_t)0, SEEK_CUR) == -1);
101       ASSERT (errno == EBADF);
102
103       break;
104
105     default:
106       return 1;
107     }
108   return 0;
109 }