ftruncate_test.c revision 319301
1/*-
2 * Copyright (c) 2006 Robert N. M. Watson
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 *
26 * $FreeBSD: stable/10/tests/sys/file/ftruncate_test.c 319301 2017-05-31 08:36:47Z ngie $
27 */
28
29/*
30 * Very simple regression test.
31 *
32 * Future tests that might be of interest:
33 *
34 * - Make sure we get EISDIR on a directory.
35 */
36
37#include <sys/types.h>
38#include <sys/event.h>
39#include <sys/socket.h>
40#include <sys/stat.h>
41
42#include <err.h>
43#include <errno.h>
44#include <fcntl.h>
45#include <inttypes.h>
46#include <limits.h>
47#include <stdio.h>
48#include <unistd.h>
49
50/*
51 * Select various potentially interesting lengths at and around power of 2
52 * edges.
53 */
54static off_t lengths[] = {0, 1, 2, 3, 4, 127, 128, 129, 511, 512, 513, 1023,
55    1024, 1025, 2047, 2048, 2049, 4095, 4096, 4097, 8191, 8192, 8193, 16383,
56    16384, 16385};
57static int lengths_count = sizeof(lengths) / sizeof(off_t);
58
59int
60main(void)
61{
62	int error, fd, fds[2], i, read_only_fd;
63	char path[] = "ftruncate_file";
64	struct stat sb;
65	ssize_t size;
66	off_t len;
67	char ch;
68
69	/*
70	 * Tests using a writable file: grow and then shrink a file
71	 * using ftruncate and various lengths.  Make sure that a negative
72	 * file length is rejected.  Make sure that when we grow the file,
73	 * bytes now in the range of the file size return 0.
74	 *
75	 * Save a read-only reference to the file to use later for read-only
76	 * descriptor tests.
77	 */
78	fd = open(path, O_RDWR|O_CREAT, 0600);
79	if (fd < 0)
80		err(1, "open(%s, O_RDWR|O_CREAT, 0600)", path);
81	read_only_fd = open(path, O_RDONLY);
82	if (read_only_fd < 0) {
83		error = errno;
84		(void)unlink(path);
85		errno = error;
86		err(1, "open(%s, O_RDONLY)", path);
87	}
88	(void)unlink(path);
89
90	if (ftruncate(fd, -1) == 0)
91		errx(1, "ftruncate(fd, -1) succeeded unexpectedly");
92	if (errno != EINVAL)
93		err(1, "ftruncate(fd, -1) returned wrong error");
94
95	for (i = 0; i < lengths_count; i++) {
96		len = lengths[i];
97		if (ftruncate(fd, len) < 0)
98			err(1, "ftruncate(%jd) up", (intmax_t)len);
99		if (fstat(fd, &sb) < 0)
100			err(1, "stat");
101		if (sb.st_size != len)
102			errx(-1, "fstat with len=%jd returned len %jd up",
103			    (intmax_t)len, (intmax_t)sb.st_size);
104		if (len != 0) {
105			size = pread(fd, &ch, sizeof(ch), len - 1);
106			if (size < 0)
107				err(1, "pread on len %jd up", (intmax_t)len);
108			if (size != sizeof(ch))
109				errx(-1, "pread len %jd size %jd up",
110				    (intmax_t)len, (intmax_t)size);
111			if (ch != 0)
112				errx(-1,
113				    "pread length %jd size %jd ch %d up",
114				    (intmax_t)len, (intmax_t)size, ch);
115		}
116	}
117
118	for (i = lengths_count - 1; i >= 0; i--) {
119		len = lengths[i];
120		if (ftruncate(fd, len) < 0)
121			err(1, "ftruncate(%jd) down", (intmax_t)len);
122		if (fstat(fd, &sb) < 0)
123			err(1, "stat");
124		if (sb.st_size != len)
125			errx(-1, "fstat(%jd) returned %jd down", (intmax_t)len,
126			    sb.st_size);
127	}
128	close(fd);
129
130	/*
131	 * Make sure that a read-only descriptor can't be truncated.
132	 */
133	if (ftruncate(read_only_fd, 0) == 0)
134		errx(-1, "ftruncate(read_only_fd) succeeded");
135	if (errno != EINVAL)
136		err(1, "ftruncate(read_only_fd) returned wrong error");
137	close(read_only_fd);
138
139	/*
140	 * Make sure that ftruncate on sockets doesn't work.
141	 */
142	fd = socket(PF_UNIX, SOCK_STREAM, 0);
143	if (fd < 0)
144		err(1, "socket(PF_UNIX, SOCK_STREAM, 0)");
145	if (ftruncate(fd, 0) == 0)
146		errx(-1, "ftruncate(socket) succeeded");
147	if (errno != EINVAL)
148		err(1, "ftruncate(socket) returned wrong error");
149	close(fd);
150
151	/*
152	 * Make sure that ftruncate on pipes doesn't work.
153	 */
154	if (pipe(fds) < 0)
155		err(1, "pipe");
156	if (ftruncate(fds[0], 0) == 0)
157		errx(-1, "ftruncate(pipe) succeeded");
158	if (errno != EINVAL)
159		err(1, "ftruncate(pipe) returned wrong error");
160	close(fds[0]);
161	close(fds[1]);
162
163	/*
164	 * Make sure that ftruncate on kqueues doesn't work.
165	 */
166	fd = kqueue();
167	if (fd < 0)
168		err(1, "kqueue");
169	if (ftruncate(fds[0], 0) == 0)
170		errx(-1, "ftruncate(kqueue) succeeded");
171	if (errno != EINVAL)
172		err(1, "ftruncate(kqueue) returned wrong error");
173	close(fd);
174
175	return (0);
176}
177