]> granicus.if.org Git - strace/blob - process_vm.c
Introduce generic STRINGIFY and STRINGIFY_VAL macros
[strace] / process_vm.c
1 /*
2  * Copyright (c) 2012 Denys Vlasenko <vda.linux@googlemail.com>
3  * Copyright (c) 2012-2015 Dmitry V. Levin <ldv@altlinux.org>
4  * Copyright (c) 2014-2017 The strace developers.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. The name of the author may not be used to endorse or promote products
16  *    derived from this software without specific prior written permission.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29
30 #include "defs.h"
31
32 SYS_FUNC(process_vm_readv)
33 {
34         if (entering(tcp)) {
35                 /* arg 1: pid */
36                 tprintf("%d, ", (int) tcp->u_arg[0]);
37         } else {
38                 kernel_ulong_t local_iovcnt = tcp->u_arg[2];
39                 kernel_ulong_t remote_iovcnt = tcp->u_arg[4];
40                 kernel_ulong_t flags = tcp->u_arg[5];
41
42                 /* arg 2: local iov */
43                 tprint_iov_upto(tcp, local_iovcnt, tcp->u_arg[1],
44                            syserror(tcp) ? IOV_DECODE_ADDR : IOV_DECODE_STR,
45                            tcp->u_rval);
46                 /* arg 3: local iovcnt */
47                 tprintf(", %" PRI_klu ", ", local_iovcnt);
48                 /* arg 4: remote iov */
49                 tprint_iov(tcp, remote_iovcnt, tcp->u_arg[3],
50                            IOV_DECODE_ADDR);
51                 /* arg 5: remote iovcnt */
52                 /* arg 6: flags */
53                 tprintf(", %" PRI_klu ", %" PRI_klu, remote_iovcnt, flags);
54         }
55         return 0;
56 }
57
58 SYS_FUNC(process_vm_writev)
59 {
60         kernel_ulong_t local_iovcnt = tcp->u_arg[2];
61         kernel_ulong_t remote_iovcnt = tcp->u_arg[4];
62         kernel_ulong_t flags = tcp->u_arg[5];
63
64         /* arg 1: pid */
65         tprintf("%d, ", (int) tcp->u_arg[0]);
66         /* arg 2: local iov */
67         tprint_iov(tcp, local_iovcnt, tcp->u_arg[1], IOV_DECODE_STR);
68         /* arg 3: local iovcnt */
69         tprintf(", %" PRI_klu ", ", local_iovcnt);
70         /* arg 4: remote iov */
71         tprint_iov(tcp, remote_iovcnt, tcp->u_arg[3], IOV_DECODE_ADDR);
72         /* arg 5: remote iovcnt */
73         /* arg 6: flags */
74         tprintf(", %" PRI_klu ", %" PRI_klu, remote_iovcnt, flags);
75
76         return RVAL_DECODED;
77 }