1 /*
2 * Check decoding and dumping of read and write syscalls.
3 *
4 * Copyright (c) 2016 Dmitry V. Levin <ldv@altlinux.org>
5 * Copyright (c) 2016-2018 The strace developers.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. The name of the author may not be used to endorse or promote products
17 * derived from this software without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 */
30
31 #include "tests.h"
32
33 #include <fcntl.h>
34 #include <stdio.h>
35 #include <stdlib.h>
36 #include <unistd.h>
37 #include <asm/unistd.h>
38
39 static void
dump_str(const char * str,const unsigned int len)40 dump_str(const char *str, const unsigned int len)
41 {
42 static const char chars[256] =
43 "................................"
44 " !\"#$%&'()*+,-./0123456789:;<=>?"
45 "@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_"
46 "`abcdefghijklmnopqrstuvwxyz{|}~."
47 "................................"
48 "................................"
49 "................................"
50 "................................";
51 unsigned int i;
52
53 for (i = 0; i < len; i += 16) {
54 unsigned int n = len - i > 16 ? 16 : len - i;
55 const char *dump = hexdump_memdup(str + i, n);
56
57 tprintf(" | %05x %-49s %-16.*s |\n",
58 i, dump, n, chars + i);
59
60 free((void *) dump);
61 }
62 }
63
64 static void
print_hex(const char * str,const unsigned int len)65 print_hex(const char *str, const unsigned int len)
66 {
67 const unsigned char *ustr = (const unsigned char *) str;
68 unsigned int i;
69
70 tprintf("\"");
71
72 for (i = 0; i < len; ++i) {
73 unsigned int c = ustr[i];
74
75 if (i >= DEFAULT_STRLEN) {
76 tprintf("\"...");
77 return;
78 }
79
80 switch (c) {
81 case '\t':
82 tprintf("\\t"); break;
83 case '\n':
84 tprintf("\\n"); break;
85 case '\v':
86 tprintf("\\v"); break;
87 case '\f':
88 tprintf("\\f"); break;
89 case '\r':
90 tprintf("\\r"); break;
91 default:
92 tprintf("\\%o", ustr[i]);
93 }
94 }
95
96 tprintf("\"");
97 }
98
99 static long
k_read(unsigned int fd,void * buf,size_t count)100 k_read(unsigned int fd, void *buf, size_t count)
101 {
102 kernel_ulong_t kfd = (kernel_ulong_t) 0xfacefeed00000000ULL | fd;
103 return syscall(__NR_read, kfd, buf, count);
104 }
105
106 static long
k_write(unsigned int fd,const void * buf,size_t count)107 k_write(unsigned int fd, const void *buf, size_t count)
108 {
109 kernel_ulong_t kfd = (kernel_ulong_t) 0xfacefeed00000000ULL | fd;
110 return syscall(__NR_write, kfd, buf, count);
111 }
112
113 static void
test_dump(const unsigned int len,bool err_desc)114 test_dump(const unsigned int len, bool err_desc)
115 {
116 static char *buf;
117 const char *rc_str;
118 int in_fd = err_desc ? 5 : 0;
119 int out_fd = err_desc ? 4 : 1;
120
121 if (buf) {
122 size_t ps1 = get_page_size() - 1;
123 buf = (void *) (((size_t) buf + ps1) & ~ps1) - len;
124 } else {
125 buf = tail_alloc(len);
126 }
127
128 long rc = k_read(in_fd, buf, len);
129 rc_str = sprintrc(rc);
130 if (err_desc ^ (rc != (int) len))
131 perror_msg_and_fail("read: expected %d, returned %ld",
132 err_desc ? -1 : (int) len, rc);
133
134 tprintf("%s(%d, ", "read", in_fd);
135 if (!err_desc)
136 print_hex(buf, len);
137 else
138 tprintf("%p", buf);
139 tprintf(", %d) = %s\n", len, rc_str);
140 if (!err_desc)
141 dump_str(buf, len);
142
143 unsigned int i;
144 for (i = 0; i < len; ++i)
145 buf[i] = i;
146
147 rc = k_write(out_fd, buf, len);
148 rc_str = sprintrc(rc);
149 if (err_desc ^ (rc != (int) len))
150 perror_msg_and_fail("write: expected %d, returned %ld",
151 err_desc ? -1 : (int) len, rc);
152
153 tprintf("%s(%d, ", "write", out_fd);
154 print_hex(buf, len);
155 tprintf(", %d) = %s\n", len, rc_str);
156 dump_str(buf, len);
157
158 if (!len)
159 buf = 0;
160 }
161
162 int
main(void)163 main(void)
164 {
165 tprintf("%s", "");
166
167 skip_if_unavailable("/proc/self/fd/");
168
169 static const char tmp[] = "read-write-tmpfile";
170 if (open(tmp, O_CREAT|O_RDONLY|O_TRUNC, 0600) != 0)
171 perror_msg_and_fail("creat: %s", tmp);
172 if (open(tmp, O_WRONLY) != 1)
173 perror_msg_and_fail("open: %s", tmp);
174
175 static const char w_c[] = "0123456789abcde";
176 const unsigned int w_len = LENGTH_OF(w_c);
177 const char *w_d = hexdump_strdup(w_c);
178 const void *w = tail_memdup(w_c, w_len);
179
180 static const char r0_c[] = "01234567";
181 const char *r0_d = hexdump_strdup(r0_c);
182 const unsigned int r0_len = (w_len + 1) / 2;
183 void *r0 = tail_alloc(r0_len);
184
185 static const char r1_c[] = "89abcde";
186 const char *r1_d = hexdump_strdup(r1_c);
187 const unsigned int r1_len = w_len - r0_len;
188 void *r1 = tail_alloc(w_len);
189
190 void *efault = r1 - get_page_size();
191
192 long rc;
193
194 rc = k_write(1, w, 0);
195 if (rc)
196 perror_msg_and_fail("write: expected 0, returned %ld", rc);
197 tprintf("write(1, \"\", 0) = 0\n");
198
199 rc = k_write(1, efault, 1);
200 if (rc != -1)
201 perror_msg_and_fail("write: expected -1 EFAULT"
202 ", returned %ld", rc);
203 tprintf("write(1, %p, 1) = -1 EFAULT (%m)\n", efault);
204
205 rc = k_write(1, w, w_len);
206 if (rc != (int) w_len)
207 perror_msg_and_fail("write: expected %u, returned %ld",
208 w_len, rc);
209 tprintf("write(1, \"%s\", %u) = %ld\n"
210 " | 00000 %-49s %-16s |\n",
211 w_c, w_len, rc, w_d, w_c);
212 close(1);
213
214 rc = k_read(0, r0, 0);
215 if (rc)
216 perror_msg_and_fail("read: expected 0, returned %ld", rc);
217 tprintf("read(0, \"\", 0) = 0\n");
218
219 rc = k_read(0, efault, 1);
220 if (rc != -1)
221 perror_msg_and_fail("read: expected -1, returned %ld", rc);
222 tprintf("read(0, %p, 1) = -1 EFAULT (%m)\n", efault);
223
224 rc = k_read(0, r0, r0_len);
225 if (rc != (int) r0_len)
226 perror_msg_and_fail("read: expected %u, returned %ld",
227 r0_len, rc);
228 tprintf("read(0, \"%s\", %u) = %ld\n"
229 " | 00000 %-49s %-16s |\n",
230 r0_c, r0_len, rc, r0_d, r0_c);
231
232 rc = k_read(0, r1, w_len);
233 if (rc != (int) r1_len)
234 perror_msg_and_fail("read: expected %u, returned %ld",
235 r1_len, rc);
236 tprintf("read(0, \"%s\", %u) = %ld\n"
237 " | 00000 %-49s %-16s |\n",
238 r1_c, w_len, rc, r1_d, r1_c);
239 close(0);
240
241 if (open("/dev/zero", O_RDONLY))
242 perror_msg_and_fail("open");
243
244 if (open("/dev/null", O_WRONLY) != 1)
245 perror_msg_and_fail("open");
246
247 if (open("/dev/zero", O_RDONLY) != 4)
248 perror_msg_and_fail("open");
249
250 if (open("/dev/null", O_WRONLY) != 5)
251 perror_msg_and_fail("open");
252
253 unsigned int i;
254 for (i = 0; i <= DEFAULT_STRLEN; ++i)
255 test_dump(i, false);
256
257 test_dump(256, true);
258
259 tprintf("+++ exited with 0 +++\n");
260 return 0;
261 }
262