2 * Copyright (c) 2010 Andreas Schwab <schwab@linux-m68k.org>
3 * Copyright (c) 2012-2013 Denys Vlasenko <vda.linux@googlemail.com>
4 * Copyright (c) 2014 Masatake YAMATO <yamato@redhat.com>
5 * Copyright (c) 2010-2016 Dmitry V. Levin <ldv@altlinux.org>
6 * Copyright (c) 2016-2018 The strace developers.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. The name of the author may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
38 fetch_struct_mmsghdr_or_printaddr(struct tcb *const tcp,
39 const kernel_ulong_t addr,
40 const unsigned int len, void *const mh)
42 if ((entering(tcp) || !syserror(tcp))
43 && fetch_struct_mmsghdr(tcp, addr, mh)) {
51 struct print_struct_mmsghdr_config {
52 const int *p_user_msg_namelen;
53 unsigned int msg_len_vlen;
59 print_struct_mmsghdr(struct tcb *tcp, void *elem_buf,
60 size_t elem_size, void *data)
62 const struct mmsghdr *const mmsg = elem_buf;
63 struct print_struct_mmsghdr_config *const c = data;
72 print_struct_msghdr(tcp, &mmsg->msg_hdr, c->p_user_msg_namelen,
73 c->use_msg_len ? mmsg->msg_len : (kernel_ulong_t) -1);
74 if (c->msg_len_vlen) {
75 tprintf(", msg_len=%u", mmsg->msg_len);
80 if (c->p_user_msg_namelen)
81 ++c->p_user_msg_namelen;
87 free_mmsgvec_data(void *ptr)
103 save_mmsgvec_namelen(struct tcb *const tcp, kernel_ulong_t addr,
104 unsigned int len, const char *const timeout)
109 const size_t data_size = offsetof(struct mmsgvec_data, namelen)
111 struct mmsgvec_data *const data = xmalloc(data_size);
112 data->timeout = xstrdup(timeout);
114 unsigned int i, fetched;
116 for (i = 0; i < len; ++i, addr += fetched) {
119 fetched = fetch_struct_mmsghdr(tcp, addr, &mh);
122 data->namelen[i] = mh.msg_hdr.msg_namelen;
126 set_tcb_priv_data(tcp, data, free_mmsgvec_data);
130 decode_mmsgvec(struct tcb *const tcp, const kernel_ulong_t addr,
131 const unsigned int vlen, const unsigned int msg_len_vlen,
132 const bool use_msg_len)
135 struct print_struct_mmsghdr_config c = {
136 .msg_len_vlen = msg_len_vlen,
138 .use_msg_len = use_msg_len
140 const struct mmsgvec_data *const data = get_tcb_priv_data(tcp);
143 if (data->count < c.count)
144 c.count = data->count;
145 c.p_user_msg_namelen = data->namelen;
148 print_array(tcp, addr, vlen, &mmsg, sizeof_struct_mmsghdr(),
149 fetch_struct_mmsghdr_or_printaddr,
150 print_struct_mmsghdr, &c);
154 dumpiov_in_mmsghdr(struct tcb *const tcp, kernel_ulong_t addr)
156 unsigned int len = tcp->u_rval;
157 unsigned int i, fetched;
160 for (i = 0; i < len; ++i, addr += fetched) {
161 fetched = fetch_struct_mmsghdr(tcp, addr, &mmsg);
164 tprintf(" = %" PRI_klu " buffers in vector %u\n",
165 (kernel_ulong_t) mmsg.msg_hdr.msg_iovlen, i);
166 dumpiov_upto(tcp, mmsg.msg_hdr.msg_iovlen,
167 ptr_to_kulong(mmsg.msg_hdr.msg_iov),
176 printfd(tcp, tcp->u_arg[0]);
180 printaddr(tcp->u_arg[1]);
182 tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
184 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
188 const unsigned int msg_len_vlen =
189 syserror(tcp) ? 0 : tcp->u_rval;
191 temporarily_clear_syserror(tcp);
192 decode_mmsgvec(tcp, tcp->u_arg[1], tcp->u_arg[2],
193 msg_len_vlen, false);
194 restore_cleared_syserror(tcp);
196 tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
198 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
206 printfd(tcp, tcp->u_arg[0]);
209 save_mmsgvec_namelen(tcp, tcp->u_arg[1], tcp->u_arg[2],
210 sprint_timespec(tcp, tcp->u_arg[4]));
213 printaddr(tcp->u_arg[1]);
215 tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
217 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
219 print_timespec(tcp, tcp->u_arg[4]);
225 decode_mmsgvec(tcp, tcp->u_arg[1], tcp->u_rval,
228 tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
230 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
232 /* timeout on entrance */
233 tprints(*(const char **) get_tcb_priv_data(tcp));
237 if (tcp->u_rval == 0) {
238 tcp->auxstr = "Timeout";
241 if (!verbose(tcp) || !tcp->u_arg[4])
243 /* timeout on exit */
244 static char str[sizeof("left") + TIMESPEC_TEXT_BUFSIZE];
245 xsprintf(str, "left %s", sprint_timespec(tcp, tcp->u_arg[4]));