2 * Copyright (c) 2003-2007 Ulrich Drepper <drepper@redhat.com>
3 * Copyright (c) 2005-2016 Dmitry V. Levin <ldv@altlinux.org>
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 print_node(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
34 if (elem_size < sizeof(long)) {
35 tprintf("%#0*x", (int) elem_size * 2 + 2,
36 * (unsigned int *) elem_buf);
38 tprintf("%#0*lx", (int) elem_size * 2 + 2,
39 * (unsigned long *) elem_buf);
46 print_nodemask(struct tcb *const tcp, const kernel_ureg_t addr,
47 const unsigned long maxnodes)
49 const unsigned long nmemb =
50 (maxnodes + 8 * current_wordsize - 2) / (8 * current_wordsize);
52 if (nmemb < maxnodes / (8 * current_wordsize) ||
53 (maxnodes && !nmemb)) {
59 print_array(tcp, addr, nmemb, &buf, current_wordsize,
60 umoven_or_printaddr, print_node, 0);
63 SYS_FUNC(migrate_pages)
65 tprintf("%d, %lu, ", (int) tcp->u_arg[0], tcp->u_arg[1]);
66 print_nodemask(tcp, tcp->u_arg[2], tcp->u_arg[1]);
68 print_nodemask(tcp, tcp->u_arg[3], tcp->u_arg[1]);
73 #include "xlat/policies.h"
74 #include "xlat/mbindflags.h"
78 printaddr(tcp->u_arg[0]);
79 tprintf(", %lu, ", tcp->u_arg[1]);
80 printxval_long(policies, tcp->u_arg[2], "MPOL_???");
82 print_nodemask(tcp, tcp->u_arg[3], tcp->u_arg[4]);
83 tprintf(", %lu, ", tcp->u_arg[4]);
84 printflags(mbindflags, tcp->u_arg[5], "MPOL_???");
89 SYS_FUNC(set_mempolicy)
91 printxval(policies, tcp->u_arg[0], "MPOL_???");
93 print_nodemask(tcp, tcp->u_arg[1], tcp->u_arg[2]);
94 tprintf(", %lu", tcp->u_arg[2]);
99 #include "xlat/mempolicyflags.h"
101 SYS_FUNC(get_mempolicy)
105 if (!umove_or_printaddr(tcp, tcp->u_arg[0], &pol)) {
107 printxval(policies, pol, "MPOL_???");
111 print_nodemask(tcp, tcp->u_arg[1], tcp->u_arg[2]);
112 tprintf(", %lu, ", tcp->u_arg[2]);
113 printaddr(tcp->u_arg[3]);
115 printflags_long(mempolicyflags, tcp->u_arg[4], "MPOL_???");
120 #include "xlat/move_pages_flags.h"
123 print_addr(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
127 if (elem_size < sizeof(long)) {
128 addr = * (unsigned int *) elem_buf;
130 addr = * (unsigned long *) elem_buf;
139 print_status(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
141 const int status = * (int *) elem_buf;
143 if (status < 0 && (unsigned) -status < nerrnos)
144 tprintf("%s", errnoent[-status]);
146 tprintf("%d", status);
152 print_int(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
154 tprintf("%d", * (int *) elem_buf);
161 const unsigned long npages = tcp->u_arg[1];
165 tprintf("%d, %lu, ", (int) tcp->u_arg[0], npages);
166 print_array(tcp, tcp->u_arg[2], npages, &buf, current_wordsize,
167 umoven_or_printaddr, print_addr, 0);
169 print_array(tcp, tcp->u_arg[3], npages, &buf, sizeof(int),
170 umoven_or_printaddr, print_int, 0);
173 print_array(tcp, tcp->u_arg[4], npages, &buf, sizeof(int),
174 umoven_or_printaddr, print_status, 0);
176 printflags(move_pages_flags, tcp->u_arg[5], "MPOL_???");