blob: ce787cd25fd49a13dc363dd6218169d059080b52 [file] [log] [blame]
Wichert Akkerman76baf7c1999-02-19 00:21:36 +00001/*
2 * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
3 * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
4 * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
Wichert Akkerman4dc8a2a1999-12-23 14:20:14 +00005 * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
Wichert Akkerman76baf7c1999-02-19 00:21:36 +00006 * 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.
Wichert Akkerman76baf7c1999-02-19 00:21:36 +000029 */
30
31#include "defs.h"
Wichert Akkerman76baf7c1999-02-19 00:21:36 +000032#include <fcntl.h>
Dmitry V. Levinb2fa2be2014-11-21 20:46:16 +000033#include <sys/uio.h>
Wichert Akkerman76baf7c1999-02-19 00:21:36 +000034
Dmitry V. Levina0bd3742015-04-07 01:36:50 +000035SYS_FUNC(read)
Wichert Akkerman76baf7c1999-02-19 00:21:36 +000036{
37 if (entering(tcp)) {
Dmitry V. Levin31382132011-03-04 05:08:02 +030038 printfd(tcp, tcp->u_arg[0]);
Denys Vlasenko60fe8c12011-09-01 10:00:28 +020039 tprints(", ");
Wichert Akkerman76baf7c1999-02-19 00:21:36 +000040 } else {
41 if (syserror(tcp))
Dmitry V. Levin43b5a1f2015-07-20 11:06:54 +000042 printaddr(tcp->u_arg[1]);
Wichert Akkerman76baf7c1999-02-19 00:21:36 +000043 else
44 printstr(tcp, tcp->u_arg[1], tcp->u_rval);
45 tprintf(", %lu", tcp->u_arg[2]);
46 }
47 return 0;
48}
49
Dmitry V. Levina0bd3742015-04-07 01:36:50 +000050SYS_FUNC(write)
Wichert Akkerman76baf7c1999-02-19 00:21:36 +000051{
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +000052 printfd(tcp, tcp->u_arg[0]);
53 tprints(", ");
54 printstr(tcp, tcp->u_arg[1], tcp->u_arg[2]);
55 tprintf(", %lu", tcp->u_arg[2]);
56
57 return RVAL_DECODED;
Wichert Akkerman76baf7c1999-02-19 00:21:36 +000058}
59
Denys Vlasenkoe0bc2222012-04-28 14:26:18 +020060/*
61 * data_size limits the cumulative size of printed data.
62 * Example: recvmsg returing a short read.
63 */
Wichert Akkermanbf79f2e2000-09-01 21:03:06 +000064void
Denys Vlasenkoe0bc2222012-04-28 14:26:18 +020065tprint_iov_upto(struct tcb *tcp, unsigned long len, unsigned long addr, int decode_iov, unsigned long data_size)
Wichert Akkermanbf79f2e2000-09-01 21:03:06 +000066{
Dmitry V. Levinb172a942015-09-15 02:17:32 +000067 unsigned long iov[2];
Roland McGrathaa524c82005-06-01 19:22:06 +000068 unsigned long size, cur, end, abbrev_end;
Dmitry V. Levinb172a942015-09-15 02:17:32 +000069 const unsigned long sizeof_iov = current_wordsize * 2;
Wichert Akkermanbf79f2e2000-09-01 21:03:06 +000070
71 if (!len) {
Denys Vlasenko60fe8c12011-09-01 10:00:28 +020072 tprints("[]");
Wichert Akkermanbf79f2e2000-09-01 21:03:06 +000073 return;
74 }
Dmitry V. Levin4ebb4e32006-12-13 17:08:08 +000075 size = len * sizeof_iov;
Roland McGrathaa524c82005-06-01 19:22:06 +000076 end = addr + size;
Dmitry V. Levin43b5a1f2015-07-20 11:06:54 +000077 if (!verbose(tcp) || (exiting(tcp) && syserror(tcp)) ||
78 !addr || size / sizeof_iov != len || end < addr) {
79 printaddr(addr);
Wichert Akkermanbf79f2e2000-09-01 21:03:06 +000080 return;
81 }
Roland McGrathaa524c82005-06-01 19:22:06 +000082 if (abbrev(tcp)) {
Dmitry V. Levin4ebb4e32006-12-13 17:08:08 +000083 abbrev_end = addr + max_strlen * sizeof_iov;
Roland McGrathaa524c82005-06-01 19:22:06 +000084 if (abbrev_end < addr)
85 abbrev_end = end;
Wichert Akkermanbf79f2e2000-09-01 21:03:06 +000086 } else {
Roland McGrathaa524c82005-06-01 19:22:06 +000087 abbrev_end = end;
Wichert Akkermanbf79f2e2000-09-01 21:03:06 +000088 }
Dmitry V. Levin0a9d1942016-03-30 02:22:58 +000089 if (addr >= abbrev_end) {
90 tprints("[...]");
91 return;
92 }
Dmitry V. Levin4ebb4e32006-12-13 17:08:08 +000093 for (cur = addr; cur < end; cur += sizeof_iov) {
Dmitry V. Levin0a9d1942016-03-30 02:22:58 +000094 if (cur > addr) {
Denys Vlasenko60fe8c12011-09-01 10:00:28 +020095 tprints(", ");
Dmitry V. Levin0a9d1942016-03-30 02:22:58 +000096 if (cur >= abbrev_end) {
97 tprints("...");
98 break;
99 }
Roland McGrathaa524c82005-06-01 19:22:06 +0000100 }
Dmitry V. Levinb172a942015-09-15 02:17:32 +0000101 if (umove_ulong_array_or_printaddr(tcp, cur, iov,
102 ARRAY_SIZE(iov)))
Roland McGrathaa524c82005-06-01 19:22:06 +0000103 break;
Dmitry V. Levin0a9d1942016-03-30 02:22:58 +0000104 if (cur <= addr)
105 tprints("[");
Denys Vlasenko60fe8c12011-09-01 10:00:28 +0200106 tprints("{");
Denys Vlasenkoe0bc2222012-04-28 14:26:18 +0200107 if (decode_iov) {
Dmitry V. Levinb172a942015-09-15 02:17:32 +0000108 unsigned long len = iov[1];
Denys Vlasenkoe0bc2222012-04-28 14:26:18 +0200109 if (len > data_size)
110 len = data_size;
111 data_size -= len;
Dmitry V. Levinb172a942015-09-15 02:17:32 +0000112 printstr(tcp, iov[0], len);
Denys Vlasenkoe0bc2222012-04-28 14:26:18 +0200113 } else
Dmitry V. Levinb172a942015-09-15 02:17:32 +0000114 printaddr(iov[0]);
115 tprintf(", %lu}", iov[1]);
Roland McGrathaa524c82005-06-01 19:22:06 +0000116 }
Dmitry V. Levin0a9d1942016-03-30 02:22:58 +0000117 if (cur > addr)
118 tprints("]");
Wichert Akkermanbf79f2e2000-09-01 21:03:06 +0000119}
120
Denys Vlasenkoe0bc2222012-04-28 14:26:18 +0200121void
122tprint_iov(struct tcb *tcp, unsigned long len, unsigned long addr, int decode_iov)
123{
Dmitry V. Levin043b5f82012-05-01 20:30:02 +0000124 tprint_iov_upto(tcp, len, addr, decode_iov, (unsigned long) -1L);
Denys Vlasenkoe0bc2222012-04-28 14:26:18 +0200125}
126
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000127SYS_FUNC(readv)
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000128{
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000129 if (entering(tcp)) {
Dmitry V. Levin31382132011-03-04 05:08:02 +0300130 printfd(tcp, tcp->u_arg[0]);
Denys Vlasenko60fe8c12011-09-01 10:00:28 +0200131 tprints(", ");
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000132 } else {
Dmitry V. Levin05a0af62016-01-20 00:17:02 +0000133 tprint_iov_upto(tcp, tcp->u_arg[2], tcp->u_arg[1], 1,
134 tcp->u_rval);
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000135 tprintf(", %lu", tcp->u_arg[2]);
136 }
137 return 0;
138}
139
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000140SYS_FUNC(writev)
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000141{
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000142 printfd(tcp, tcp->u_arg[0]);
143 tprints(", ");
144 tprint_iov(tcp, tcp->u_arg[2], tcp->u_arg[1], 1);
145 tprintf(", %lu", tcp->u_arg[2]);
146
147 return RVAL_DECODED;
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000148}
149
Roland McGrathc0f8bbd2003-08-21 09:58:00 +0000150/* The SH4 ABI does allow long longs in odd-numbered registers, but
151 does not allow them to be split between registers and memory - and
152 there are only four argument registers for normal functions. As a
153 result pread takes an extra padding argument before the offset. This
154 was changed late in the 2.4 series (around 2.4.20). */
155#if defined(SH)
156#define PREAD_OFFSET_ARG 4
157#else
158#define PREAD_OFFSET_ARG 3
159#endif
160
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000161SYS_FUNC(pread)
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000162{
163 if (entering(tcp)) {
Dmitry V. Levin31382132011-03-04 05:08:02 +0300164 printfd(tcp, tcp->u_arg[0]);
Denys Vlasenko60fe8c12011-09-01 10:00:28 +0200165 tprints(", ");
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000166 } else {
167 if (syserror(tcp))
Dmitry V. Levin43b5a1f2015-07-20 11:06:54 +0000168 printaddr(tcp->u_arg[1]);
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000169 else
170 printstr(tcp, tcp->u_arg[1], tcp->u_rval);
Andreas Schwabb5600fc2009-11-04 17:08:34 +0100171 tprintf(", %lu, ", tcp->u_arg[2]);
Dmitry V. Levin9f3a6af2016-04-02 01:08:24 +0000172 printllval(tcp, "%lld", PREAD_OFFSET_ARG);
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000173 }
174 return 0;
175}
176
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000177SYS_FUNC(pwrite)
Wichert Akkerman76baf7c1999-02-19 00:21:36 +0000178{
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000179 printfd(tcp, tcp->u_arg[0]);
180 tprints(", ");
181 printstr(tcp, tcp->u_arg[1], tcp->u_arg[2]);
182 tprintf(", %lu, ", tcp->u_arg[2]);
Dmitry V. Levin9f3a6af2016-04-02 01:08:24 +0000183 printllval(tcp, "%lld", PREAD_OFFSET_ARG);
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000184
185 return RVAL_DECODED;
Wichert Akkerman2e2553a1999-05-09 00:29:58 +0000186}
187
Dmitry V. Levin3c49b022014-08-07 00:07:28 +0000188static void
Dmitry V. Levind4611512016-03-30 03:54:21 +0000189print_lld_from_low_high_val(struct tcb *tcp, int arg)
Dmitry V. Levin3c49b022014-08-07 00:07:28 +0000190{
191#if SIZEOF_LONG == SIZEOF_LONG_LONG
Dmitry V. Levin5de5a7a2015-01-23 20:04:37 +0000192# if SUPPORTED_PERSONALITIES > 1
Dmitry V. Levinc6e5e2c2015-11-26 20:29:25 +0000193# ifdef X86_64
194 if (current_personality != 1)
195# else
Dmitry V. Levin5de5a7a2015-01-23 20:04:37 +0000196 if (current_wordsize == sizeof(long))
Dmitry V. Levinc6e5e2c2015-11-26 20:29:25 +0000197# endif
Dmitry V. Levin5de5a7a2015-01-23 20:04:37 +0000198# endif
Dmitry V. Levind4611512016-03-30 03:54:21 +0000199 tprintf("%ld", tcp->u_arg[arg]);
Dmitry V. Levin5de5a7a2015-01-23 20:04:37 +0000200# if SUPPORTED_PERSONALITIES > 1
201 else
Dmitry V. Levind4611512016-03-30 03:54:21 +0000202 tprintf("%ld",
Dmitry V. Levin5de5a7a2015-01-23 20:04:37 +0000203 ((unsigned long) tcp->u_arg[arg + 1] << current_wordsize * 8)
204 | (unsigned long) tcp->u_arg[arg]);
205# endif
Dmitry V. Levin3c49b022014-08-07 00:07:28 +0000206#else
207# ifdef X32
208 if (current_personality == 0)
Dmitry V. Levind4611512016-03-30 03:54:21 +0000209 tprintf("%lld", tcp->ext_arg[arg]);
Dmitry V. Levin3c49b022014-08-07 00:07:28 +0000210 else
211# endif
Dmitry V. Levind4611512016-03-30 03:54:21 +0000212 tprintf("%lld",
Dmitry V. Levin20b84a62014-08-07 11:42:46 +0000213 ((unsigned long long) (unsigned long) tcp->u_arg[arg + 1] << sizeof(long) * 8)
214 | (unsigned long long) (unsigned long) tcp->u_arg[arg]);
Dmitry V. Levin3c49b022014-08-07 00:07:28 +0000215#endif
216}
217
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000218SYS_FUNC(preadv)
Damir Shayhutdinov3087dd62011-05-12 16:57:40 +0400219{
220 if (entering(tcp)) {
221 printfd(tcp, tcp->u_arg[0]);
Denys Vlasenko60fe8c12011-09-01 10:00:28 +0200222 tprints(", ");
Damir Shayhutdinov3087dd62011-05-12 16:57:40 +0400223 } else {
Dmitry V. Levinc98ab882016-03-30 18:04:00 +0000224 tprint_iov_upto(tcp, tcp->u_arg[2], tcp->u_arg[1], 1,
225 tcp->u_rval);
Damir Shayhutdinov3087dd62011-05-12 16:57:40 +0400226 tprintf(", %lu, ", tcp->u_arg[2]);
Dmitry V. Levind4611512016-03-30 03:54:21 +0000227 print_lld_from_low_high_val(tcp, 3);
Damir Shayhutdinov3087dd62011-05-12 16:57:40 +0400228 }
229 return 0;
230}
231
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000232SYS_FUNC(pwritev)
Damir Shayhutdinov3087dd62011-05-12 16:57:40 +0400233{
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000234 printfd(tcp, tcp->u_arg[0]);
235 tprints(", ");
236 tprint_iov(tcp, tcp->u_arg[2], tcp->u_arg[1], 1);
237 tprintf(", %lu, ", tcp->u_arg[2]);
Dmitry V. Levind4611512016-03-30 03:54:21 +0000238 print_lld_from_low_high_val(tcp, 3);
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000239
240 return RVAL_DECODED;
Damir Shayhutdinov3087dd62011-05-12 16:57:40 +0400241}
Damir Shayhutdinov3087dd62011-05-12 16:57:40 +0400242
Dmitry V. Levin0ed617b2014-04-25 23:30:54 +0000243#include "xlat/splice_flags.h"
Dmitry V. Levind99e48c2011-10-11 17:07:05 +0000244
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000245SYS_FUNC(tee)
Dmitry V. Levind99e48c2011-10-11 17:07:05 +0000246{
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000247 /* int fd_in */
248 printfd(tcp, tcp->u_arg[0]);
249 tprints(", ");
250 /* int fd_out */
251 printfd(tcp, tcp->u_arg[1]);
252 tprints(", ");
253 /* size_t len */
254 tprintf("%lu, ", tcp->u_arg[2]);
255 /* unsigned int flags */
256 printflags(splice_flags, tcp->u_arg[3], "SPLICE_F_???");
257
258 return RVAL_DECODED;
Dmitry V. Levind99e48c2011-10-11 17:07:05 +0000259}
260
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000261SYS_FUNC(splice)
Dmitry V. Levind99e48c2011-10-11 17:07:05 +0000262{
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000263 /* int fd_in */
264 printfd(tcp, tcp->u_arg[0]);
265 tprints(", ");
266 /* loff_t *off_in */
Dmitry V. Levin16a52b42016-02-13 22:31:30 +0000267 printnum_int64(tcp, tcp->u_arg[1], "%" PRId64);
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000268 tprints(", ");
269 /* int fd_out */
270 printfd(tcp, tcp->u_arg[2]);
271 tprints(", ");
272 /* loff_t *off_out */
Dmitry V. Levin16a52b42016-02-13 22:31:30 +0000273 printnum_int64(tcp, tcp->u_arg[3], "%" PRId64);
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000274 tprints(", ");
275 /* size_t len */
276 tprintf("%lu, ", tcp->u_arg[4]);
277 /* unsigned int flags */
278 printflags(splice_flags, tcp->u_arg[5], "SPLICE_F_???");
279
280 return RVAL_DECODED;
Dmitry V. Levind99e48c2011-10-11 17:07:05 +0000281}
282
Dmitry V. Levina0bd3742015-04-07 01:36:50 +0000283SYS_FUNC(vmsplice)
Dmitry V. Levind99e48c2011-10-11 17:07:05 +0000284{
Dmitry V. Levin1f255fd2015-07-20 11:19:30 +0000285 /* int fd */
286 printfd(tcp, tcp->u_arg[0]);
287 tprints(", ");
288 /* const struct iovec *iov, unsigned long nr_segs */
289 tprint_iov(tcp, tcp->u_arg[2], tcp->u_arg[1], 1);
290 tprintf(", %lu, ", tcp->u_arg[2]);
291 /* unsigned int flags */
292 printflags(splice_flags, tcp->u_arg[3], "SPLICE_F_???");
293
294 return RVAL_DECODED;
Dmitry V. Levind99e48c2011-10-11 17:07:05 +0000295}