]> granicus.if.org Git - strace/blob - kexec.c
x32: fix decoding of 3rd argument of preadv* and pwritev* syscalls
[strace] / kexec.c
1 /*
2  * Copyright (c) 2014-2015 Dmitry V. Levin <ldv@altlinux.org>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. The name of the author may not be used to endorse or promote products
14  *    derived from this software without specific prior written permission.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26  */
27
28 #include "defs.h"
29
30 #include "xlat/kexec_load_flags.h"
31 #include "xlat/kexec_arch_values.h"
32
33 #ifndef KEXEC_ARCH_MASK
34 # define KEXEC_ARCH_MASK 0xffff0000
35 #endif
36 #ifndef KEXEC_SEGMENT_MAX
37 # define KEXEC_SEGMENT_MAX 16
38 #endif
39
40 static bool
41 print_seg(struct tcb *tcp, void *elem_buf, size_t elem_size, void *data)
42 {
43         const unsigned long *seg;
44         unsigned long seg_buf[4];
45
46         if (elem_size < sizeof(seg_buf)) {
47                 unsigned int i;
48
49                 for (i = 0; i < ARRAY_SIZE(seg_buf); ++i)
50                         seg_buf[i] = ((unsigned int *) elem_buf)[i];
51                 seg = seg_buf;
52         } else {
53                 seg = elem_buf;
54         }
55
56         tprints("{buf=");
57         printaddr(seg[0]);
58         tprintf(", bufsz=%lu, mem=", seg[1]);
59         printaddr(seg[2]);
60         tprintf(", memsz=%lu}", seg[3]);
61
62         return true;
63 }
64
65 static void
66 print_kexec_segments(struct tcb *tcp, const unsigned long addr,
67                      const unsigned long len)
68 {
69         if (len > KEXEC_SEGMENT_MAX) {
70                 printaddr(addr);
71                 return;
72         }
73
74         unsigned long seg[4];
75         const size_t sizeof_seg = ARRAY_SIZE(seg) * current_wordsize;
76
77         print_array(tcp, addr, len, seg, sizeof_seg,
78                     umoven_or_printaddr, print_seg, 0);
79 }
80
81 SYS_FUNC(kexec_load)
82 {
83         /* entry, nr_segments */
84         printaddr(widen_to_ulong(tcp->u_arg[0]));
85         tprintf(", %lu, ", widen_to_ulong(tcp->u_arg[1]));
86
87         /* segments */
88         print_kexec_segments(tcp, widen_to_ulong(tcp->u_arg[2]),
89                              widen_to_ulong(tcp->u_arg[1]));
90         tprints(", ");
91
92         /* flags */
93         unsigned long n = widen_to_ulong(tcp->u_arg[3]);
94         printxval_long(kexec_arch_values, n & KEXEC_ARCH_MASK, "KEXEC_ARCH_???");
95         n &= ~(unsigned long) KEXEC_ARCH_MASK;
96         if (n) {
97                 tprints("|");
98                 printflags_long(kexec_load_flags, n, "KEXEC_???");
99         }
100
101         return RVAL_DECODED;
102 }
103
104 #include "xlat/kexec_file_load_flags.h"
105
106 SYS_FUNC(kexec_file_load)
107 {
108         /* kernel_fd */
109         printfd(tcp, tcp->u_arg[0]);
110         tprints(", ");
111         /* initrd_fd */
112         printfd(tcp, tcp->u_arg[1]);
113         tprints(", ");
114         /* cmdline_len */
115         tprintf("%" PRI_klu ", ", getarg_klu(tcp, 2));
116         /* cmdline */
117         printstr(tcp, tcp->u_arg[3], tcp->u_arg[2]);
118         tprints(", ");
119         /* flags */
120         printflags64(kexec_file_load_flags, getarg_klu(tcp, 4), "KEXEC_FILE_???");
121
122         return RVAL_DECODED;
123 }