Linux-libre 5.3.12-gnu
[librecmc/linux-libre.git] / tools / testing / selftests / x86 / syscall_arg_fault.c
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * syscall_arg_fault.c - tests faults 32-bit fast syscall stack args
4  * Copyright (c) 2015 Andrew Lutomirski
5  */
6
7 #define _GNU_SOURCE
8
9 #include <stdlib.h>
10 #include <stdio.h>
11 #include <string.h>
12 #include <sys/signal.h>
13 #include <sys/ucontext.h>
14 #include <err.h>
15 #include <setjmp.h>
16 #include <errno.h>
17
18 #ifdef __x86_64__
19 # define WIDTH "q"
20 #else
21 # define WIDTH "l"
22 #endif
23
24 /* Our sigaltstack scratch space. */
25 static unsigned char altstack_data[SIGSTKSZ];
26
27 static unsigned long get_eflags(void)
28 {
29         unsigned long eflags;
30         asm volatile ("pushf" WIDTH "\n\tpop" WIDTH " %0" : "=rm" (eflags));
31         return eflags;
32 }
33
34 static void set_eflags(unsigned long eflags)
35 {
36         asm volatile ("push" WIDTH " %0\n\tpopf" WIDTH
37                       : : "rm" (eflags) : "flags");
38 }
39
40 #define X86_EFLAGS_TF (1UL << 8)
41
42 static void sethandler(int sig, void (*handler)(int, siginfo_t *, void *),
43                        int flags)
44 {
45         struct sigaction sa;
46         memset(&sa, 0, sizeof(sa));
47         sa.sa_sigaction = handler;
48         sa.sa_flags = SA_SIGINFO | flags;
49         sigemptyset(&sa.sa_mask);
50         if (sigaction(sig, &sa, 0))
51                 err(1, "sigaction");
52 }
53
54 static volatile sig_atomic_t sig_traps;
55 static sigjmp_buf jmpbuf;
56
57 static volatile sig_atomic_t n_errs;
58
59 #ifdef __x86_64__
60 #define REG_AX REG_RAX
61 #define REG_IP REG_RIP
62 #else
63 #define REG_AX REG_EAX
64 #define REG_IP REG_EIP
65 #endif
66
67 static void sigsegv_or_sigbus(int sig, siginfo_t *info, void *ctx_void)
68 {
69         ucontext_t *ctx = (ucontext_t*)ctx_void;
70         long ax = (long)ctx->uc_mcontext.gregs[REG_AX];
71
72         if (ax != -EFAULT && ax != -ENOSYS) {
73                 printf("[FAIL]\tAX had the wrong value: 0x%lx\n",
74                        (unsigned long)ax);
75                 n_errs++;
76         } else {
77                 printf("[OK]\tSeems okay\n");
78         }
79
80         siglongjmp(jmpbuf, 1);
81 }
82
83 static volatile sig_atomic_t sigtrap_consecutive_syscalls;
84
85 static void sigtrap(int sig, siginfo_t *info, void *ctx_void)
86 {
87         /*
88          * KVM has some bugs that can cause us to stop making progress.
89          * detect them and complain, but don't infinite loop or fail the
90          * test.
91          */
92
93         ucontext_t *ctx = (ucontext_t*)ctx_void;
94         unsigned short *ip = (unsigned short *)ctx->uc_mcontext.gregs[REG_IP];
95
96         if (*ip == 0x340f || *ip == 0x050f) {
97                 /* The trap was on SYSCALL or SYSENTER */
98                 sigtrap_consecutive_syscalls++;
99                 if (sigtrap_consecutive_syscalls > 3) {
100                         printf("[WARN]\tGot stuck single-stepping -- you probably have a KVM bug\n");
101                         siglongjmp(jmpbuf, 1);
102                 }
103         } else {
104                 sigtrap_consecutive_syscalls = 0;
105         }
106 }
107
108 static void sigill(int sig, siginfo_t *info, void *ctx_void)
109 {
110         ucontext_t *ctx = (ucontext_t*)ctx_void;
111         unsigned short *ip = (unsigned short *)ctx->uc_mcontext.gregs[REG_IP];
112
113         if (*ip == 0x0b0f) {
114                 /* one of the ud2 instructions faulted */
115                 printf("[OK]\tSYSCALL returned normally\n");
116         } else {
117                 printf("[SKIP]\tIllegal instruction\n");
118         }
119         siglongjmp(jmpbuf, 1);
120 }
121
122 int main()
123 {
124         stack_t stack = {
125                 .ss_sp = altstack_data,
126                 .ss_size = SIGSTKSZ,
127         };
128         if (sigaltstack(&stack, NULL) != 0)
129                 err(1, "sigaltstack");
130
131         sethandler(SIGSEGV, sigsegv_or_sigbus, SA_ONSTACK);
132         /*
133          * The actual exception can vary.  On Atom CPUs, we get #SS
134          * instead of #PF when the vDSO fails to access the stack when
135          * ESP is too close to 2^32, and #SS causes SIGBUS.
136          */
137         sethandler(SIGBUS, sigsegv_or_sigbus, SA_ONSTACK);
138         sethandler(SIGILL, sigill, SA_ONSTACK);
139
140         /*
141          * Exercise another nasty special case.  The 32-bit SYSCALL
142          * and SYSENTER instructions (even in compat mode) each
143          * clobber one register.  A Linux system call has a syscall
144          * number and six arguments, and the user stack pointer
145          * needs to live in some register on return.  That means
146          * that we need eight registers, but SYSCALL and SYSENTER
147          * only preserve seven registers.  As a result, one argument
148          * ends up on the stack.  The stack is user memory, which
149          * means that the kernel can fail to read it.
150          *
151          * The 32-bit fast system calls don't have a defined ABI:
152          * we're supposed to invoke them through the vDSO.  So we'll
153          * fudge it: we set all regs to invalid pointer values and
154          * invoke the entry instruction.  The return will fail no
155          * matter what, and we completely lose our program state,
156          * but we can fix it up with a signal handler.
157          */
158
159         printf("[RUN]\tSYSENTER with invalid state\n");
160         if (sigsetjmp(jmpbuf, 1) == 0) {
161                 asm volatile (
162                         "movl $-1, %%eax\n\t"
163                         "movl $-1, %%ebx\n\t"
164                         "movl $-1, %%ecx\n\t"
165                         "movl $-1, %%edx\n\t"
166                         "movl $-1, %%esi\n\t"
167                         "movl $-1, %%edi\n\t"
168                         "movl $-1, %%ebp\n\t"
169                         "movl $-1, %%esp\n\t"
170                         "sysenter"
171                         : : : "memory", "flags");
172         }
173
174         printf("[RUN]\tSYSCALL with invalid state\n");
175         if (sigsetjmp(jmpbuf, 1) == 0) {
176                 asm volatile (
177                         "movl $-1, %%eax\n\t"
178                         "movl $-1, %%ebx\n\t"
179                         "movl $-1, %%ecx\n\t"
180                         "movl $-1, %%edx\n\t"
181                         "movl $-1, %%esi\n\t"
182                         "movl $-1, %%edi\n\t"
183                         "movl $-1, %%ebp\n\t"
184                         "movl $-1, %%esp\n\t"
185                         "syscall\n\t"
186                         "ud2"           /* make sure we recover cleanly */
187                         : : : "memory", "flags");
188         }
189
190         printf("[RUN]\tSYSENTER with TF and invalid state\n");
191         sethandler(SIGTRAP, sigtrap, SA_ONSTACK);
192
193         if (sigsetjmp(jmpbuf, 1) == 0) {
194                 sigtrap_consecutive_syscalls = 0;
195                 set_eflags(get_eflags() | X86_EFLAGS_TF);
196                 asm volatile (
197                         "movl $-1, %%eax\n\t"
198                         "movl $-1, %%ebx\n\t"
199                         "movl $-1, %%ecx\n\t"
200                         "movl $-1, %%edx\n\t"
201                         "movl $-1, %%esi\n\t"
202                         "movl $-1, %%edi\n\t"
203                         "movl $-1, %%ebp\n\t"
204                         "movl $-1, %%esp\n\t"
205                         "sysenter"
206                         : : : "memory", "flags");
207         }
208         set_eflags(get_eflags() & ~X86_EFLAGS_TF);
209
210         printf("[RUN]\tSYSCALL with TF and invalid state\n");
211         if (sigsetjmp(jmpbuf, 1) == 0) {
212                 sigtrap_consecutive_syscalls = 0;
213                 set_eflags(get_eflags() | X86_EFLAGS_TF);
214                 asm volatile (
215                         "movl $-1, %%eax\n\t"
216                         "movl $-1, %%ebx\n\t"
217                         "movl $-1, %%ecx\n\t"
218                         "movl $-1, %%edx\n\t"
219                         "movl $-1, %%esi\n\t"
220                         "movl $-1, %%edi\n\t"
221                         "movl $-1, %%ebp\n\t"
222                         "movl $-1, %%esp\n\t"
223                         "syscall\n\t"
224                         "ud2"           /* make sure we recover cleanly */
225                         : : : "memory", "flags");
226         }
227         set_eflags(get_eflags() & ~X86_EFLAGS_TF);
228
229         return 0;
230 }