#include "defs.h"
-static void
-print_nodemask(struct tcb *tcp, unsigned long addr, unsigned long maxnodes)
+static bool
+print_node(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
{
- const unsigned long nlongs =
- (maxnodes + 8 * current_wordsize - 2) / (8 * current_wordsize);
- const unsigned long size = nlongs * current_wordsize;
- const unsigned long end = addr + size;
-
- if (!verbose(tcp) || (exiting(tcp) && syserror(tcp))
- || end <= addr || size / current_wordsize != nlongs
- || nlongs < maxnodes / (8 * current_wordsize)) {
- printaddr(addr);
- return;
+ if (elem_size < sizeof(kernel_ulong_t)) {
+ tprintf("%#0*x", (int) elem_size * 2 + 2,
+ * (unsigned int *) elem_buf);
+ } else {
+ tprintf("%#0*" PRI_klx, (int) elem_size * 2 + 2,
+ * (kernel_ulong_t *) elem_buf);
}
- const unsigned long abbrev_end =
- (abbrev(tcp) && max_strlen < nlongs) ?
- addr + max_strlen * current_wordsize : end;
- unsigned long cur;
- for (cur = addr; cur < end; cur += current_wordsize) {
- if (cur != addr)
- tprints(", ");
-
- unsigned long n;
- if (umove_ulong_or_printaddr(tcp, cur, &n))
- break;
-
- if (cur == addr)
- tprints("[");
+ return true;
+}
- if (cur >= abbrev_end) {
- tprints("...");
- cur = end;
- break;
- }
+static void
+print_nodemask(struct tcb *const tcp, const kernel_ulong_t addr,
+ const kernel_ulong_t maxnodes)
+{
+ const unsigned int bits_per_long = 8 * current_wordsize;
+ const kernel_ulong_t nmemb =
+ (maxnodes + bits_per_long - 2) / bits_per_long;
- tprintf("%#0*lx", (int) current_wordsize * 2 + 2, n);
+ if (nmemb < maxnodes / bits_per_long ||
+ (maxnodes && !nmemb)) {
+ printaddr(addr);
+ return;
}
- if (cur != addr)
- tprints("]");
+
+ kernel_ulong_t buf;
+ print_array(tcp, addr, nmemb, &buf, current_wordsize,
+ umoven_or_printaddr, print_node, 0);
}
SYS_FUNC(migrate_pages)
{
- tprintf("%d, ", (int) tcp->u_arg[0]);
+ tprintf("%d, %" PRI_klu ", ", (int) tcp->u_arg[0], tcp->u_arg[1]);
print_nodemask(tcp, tcp->u_arg[2], tcp->u_arg[1]);
- tprintf(", %lu, ", tcp->u_arg[1]);
+ tprints(", ");
print_nodemask(tcp, tcp->u_arg[3], tcp->u_arg[1]);
- tprintf(", %lu", tcp->u_arg[1]);
return RVAL_DECODED;
}
SYS_FUNC(mbind)
{
printaddr(tcp->u_arg[0]);
- tprintf(", %lu, ", tcp->u_arg[1]);
- printxval(policies, tcp->u_arg[2], "MPOL_???");
+ tprintf(", %" PRI_klu ", ", tcp->u_arg[1]);
+ printxval64(policies, tcp->u_arg[2], "MPOL_???");
tprints(", ");
print_nodemask(tcp, tcp->u_arg[3], tcp->u_arg[4]);
- tprintf(", %lu, ", tcp->u_arg[4]);
+ tprintf(", %" PRI_klu ", ", tcp->u_arg[4]);
printflags(mbindflags, tcp->u_arg[5], "MPOL_???");
return RVAL_DECODED;
printxval(policies, tcp->u_arg[0], "MPOL_???");
tprints(", ");
print_nodemask(tcp, tcp->u_arg[1], tcp->u_arg[2]);
- tprintf(", %lu", tcp->u_arg[2]);
+ tprintf(", %" PRI_klu, tcp->u_arg[2]);
return RVAL_DECODED;
}
}
tprints(", ");
print_nodemask(tcp, tcp->u_arg[1], tcp->u_arg[2]);
- tprintf(", %lu, ", tcp->u_arg[2]);
+ tprintf(", %" PRI_klu ", ", tcp->u_arg[2]);
printaddr(tcp->u_arg[3]);
tprints(", ");
- printflags(mempolicyflags, tcp->u_arg[4], "MPOL_???");
+ printflags64(mempolicyflags, tcp->u_arg[4], "MPOL_???");
}
return 0;
}
#include "xlat/move_pages_flags.h"
+static bool
+print_addr(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
+{
+ kernel_ulong_t addr;
+
+ if (elem_size < sizeof(addr)) {
+ addr = * (unsigned int *) elem_buf;
+ } else {
+ addr = * (kernel_ulong_t *) elem_buf;
+ }
+
+ printaddr(addr);
+
+ return true;
+}
+
+static bool
+print_status(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
+{
+ const int status = * (int *) elem_buf;
+
+ if (status < 0 && (unsigned) -status < nerrnos)
+ tprintf("-%s", errnoent[-status]);
+ else
+ tprintf("%d", status);
+
+ return true;
+}
+
+static bool
+print_int(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
+{
+ tprintf("%d", * (int *) elem_buf);
+
+ return true;
+}
+
SYS_FUNC(move_pages)
{
+ const kernel_ulong_t npages = tcp->u_arg[1];
+ kernel_ulong_t buf;
+
if (entering(tcp)) {
- unsigned long npages = tcp->u_arg[1];
- tprintf("%ld, %lu, ", tcp->u_arg[0], npages);
- if (tcp->u_arg[2] == 0)
- tprints("NULL, ");
- else {
- unsigned int i;
- long puser = tcp->u_arg[2];
- tprints("{");
- for (i = 0; i < npages; ++i) {
- void *p;
- if (i > 0)
- tprints(", ");
- if (umove(tcp, puser, &p) < 0) {
- tprints("???");
- break;
- }
- tprintf("%p", p);
- puser += sizeof(void *);
- }
- tprints("}, ");
- }
- if (tcp->u_arg[3] == 0)
- tprints("NULL, ");
- else {
- unsigned int i;
- long nodeuser = tcp->u_arg[3];
- tprints("{");
- for (i = 0; i < npages; ++i) {
- int node;
- if (i > 0)
- tprints(", ");
- if (umove(tcp, nodeuser, &node) < 0) {
- tprints("???");
- break;
- }
- tprintf("%#x", node);
- nodeuser += sizeof(int);
- }
- tprints("}, ");
- }
+ tprintf("%d, %" PRI_klu ", ", (int) tcp->u_arg[0], npages);
+ print_array(tcp, tcp->u_arg[2], npages, &buf, current_wordsize,
+ umoven_or_printaddr, print_addr, 0);
+ tprints(", ");
+ print_array(tcp, tcp->u_arg[3], npages, &buf, sizeof(int),
+ umoven_or_printaddr, print_int, 0);
+ tprints(", ");
} else {
- unsigned long npages = tcp->u_arg[1];
- if (tcp->u_arg[4] == 0)
- tprints("NULL, ");
- else {
- unsigned int i;
- long statususer = tcp->u_arg[4];
- tprints("{");
- for (i = 0; i < npages; ++i) {
- int status;
- if (i > 0)
- tprints(", ");
- if (umove(tcp, statususer, &status) < 0) {
- tprints("???");
- break;
- }
- tprintf("%#x", status);
- statususer += sizeof(int);
- }
- tprints("}, ");
- }
+ print_array(tcp, tcp->u_arg[4], npages, &buf, sizeof(int),
+ umoven_or_printaddr, print_status, 0);
+ tprints(", ");
printflags(move_pages_flags, tcp->u_arg[5], "MPOL_???");
}
return 0;
projects / strace / blobdiff