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_for_print(struct tcb *const tcp,
39 const kernel_ulong_t addr,
40 const unsigned int len, void *const mh)
42 return (entering(tcp) || !syserror(tcp)) &&
43 fetch_struct_mmsghdr(tcp, addr, mh);
46 struct print_struct_mmsghdr_config {
47 const int *p_user_msg_namelen;
48 unsigned int msg_len_vlen;
54 print_struct_mmsghdr(struct tcb *tcp, void *elem_buf,
55 size_t elem_size, void *data)
57 const struct mmsghdr *const mmsg = elem_buf;
58 struct print_struct_mmsghdr_config *const c = data;
67 print_struct_msghdr(tcp, &mmsg->msg_hdr, c->p_user_msg_namelen,
68 c->use_msg_len ? mmsg->msg_len : (kernel_ulong_t) -1);
69 if (c->msg_len_vlen) {
70 tprintf(", msg_len=%u", mmsg->msg_len);
75 if (c->p_user_msg_namelen)
76 ++c->p_user_msg_namelen;
82 free_mmsgvec_data(void *ptr)
98 save_mmsgvec_namelen(struct tcb *const tcp, kernel_ulong_t addr,
99 unsigned int len, const char *const timeout)
104 const size_t data_size = offsetof(struct mmsgvec_data, namelen)
106 struct mmsgvec_data *const data = xmalloc(data_size);
107 data->timeout = xstrdup(timeout);
109 unsigned int i, fetched;
111 for (i = 0; i < len; ++i, addr += fetched) {
114 fetched = fetch_struct_mmsghdr(tcp, addr, &mh);
117 data->namelen[i] = mh.msg_hdr.msg_namelen;
121 set_tcb_priv_data(tcp, data, free_mmsgvec_data);
125 decode_mmsgvec(struct tcb *const tcp, const kernel_ulong_t addr,
126 const unsigned int vlen, const unsigned int msg_len_vlen,
127 const bool use_msg_len)
130 struct print_struct_mmsghdr_config c = {
131 .msg_len_vlen = msg_len_vlen,
133 .use_msg_len = use_msg_len
135 const struct mmsgvec_data *const data = get_tcb_priv_data(tcp);
138 if (data->count < c.count)
139 c.count = data->count;
140 c.p_user_msg_namelen = data->namelen;
143 print_array(tcp, addr, vlen, &mmsg, sizeof_struct_mmsghdr(),
144 fetch_struct_mmsghdr_for_print,
145 print_struct_mmsghdr, &c);
149 dumpiov_in_mmsghdr(struct tcb *const tcp, kernel_ulong_t addr)
151 unsigned int len = tcp->u_rval;
152 unsigned int i, fetched;
155 for (i = 0; i < len; ++i, addr += fetched) {
156 fetched = fetch_struct_mmsghdr(tcp, addr, &mmsg);
159 tprintf(" = %" PRI_klu " buffers in vector %u\n",
160 (kernel_ulong_t) mmsg.msg_hdr.msg_iovlen, i);
161 dumpiov_upto(tcp, mmsg.msg_hdr.msg_iovlen,
162 ptr_to_kulong(mmsg.msg_hdr.msg_iov),
171 printfd(tcp, tcp->u_arg[0]);
175 printaddr(tcp->u_arg[1]);
177 tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
179 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
183 const unsigned int msg_len_vlen =
184 syserror(tcp) ? 0 : tcp->u_rval;
186 temporarily_clear_syserror(tcp);
187 decode_mmsgvec(tcp, tcp->u_arg[1], tcp->u_arg[2],
188 msg_len_vlen, false);
189 restore_cleared_syserror(tcp);
191 tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
193 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
201 printfd(tcp, tcp->u_arg[0]);
204 save_mmsgvec_namelen(tcp, tcp->u_arg[1], tcp->u_arg[2],
205 sprint_timespec(tcp, tcp->u_arg[4]));
208 printaddr(tcp->u_arg[1]);
210 tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
212 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
214 print_timespec(tcp, tcp->u_arg[4]);
220 decode_mmsgvec(tcp, tcp->u_arg[1], tcp->u_rval,
223 tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
225 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
227 /* timeout on entrance */
228 tprints(*(const char **) get_tcb_priv_data(tcp));
232 if (tcp->u_rval == 0) {
233 tcp->auxstr = "Timeout";
236 if (!verbose(tcp) || !tcp->u_arg[4])
238 /* timeout on exit */
239 static char str[sizeof("left") + TIMESPEC_TEXT_BUFSIZE];
240 xsprintf(str, "left %s", sprint_timespec(tcp, tcp->u_arg[4]));