arch/x86/entry/common.c

   1 // SPDX-License-Identifier: GPL-2.0-only
   2 /*
   3  * common.c - C code for kernel entry and exit
   4  * Copyright (c) 2015 Andrew Lutomirski
   5  *
   6  * Based on asm and ptrace code by many authors.  The code here originated
   7  * in ptrace.c and signal.c.
   8  */
   9
  10 #include <linux/kernel.h>
  11 #include <linux/sched.h>
  12 #include <linux/sched/task_stack.h>
  13 #include <linux/entry-common.h>
  14 #include <linux/mm.h>
  15 #include <linux/smp.h>
  16 #include <linux/errno.h>
  17 #include <linux/ptrace.h>
  18 #include <linux/export.h>
  19 #include <linux/nospec.h>
  20 #include <linux/syscalls.h>
  21 #include <linux/uaccess.h>
  22
  23 #ifdef CONFIG_XEN_PV
  24 #include <xen/xen-ops.h>
  25 #include <xen/events.h>
  26 #endif
  27
  28 #include <asm/desc.h>
  29 #include <asm/traps.h>
  30 #include <asm/vdso.h>
  31 #include <asm/cpufeature.h>
  32 #include <asm/fpu/api.h>
  33 #include <asm/nospec-branch.h>
  34 #include <asm/io_bitmap.h>
  35 #include <asm/syscall.h>
  36 #include <asm/irq_stack.h>
  37
  38 #ifdef CONFIG_X86_64
  39 __visible noinstr void do_syscall_64(unsigned long nr, struct pt_regs *regs)
  40 {
  41         nr = syscall_enter_from_user_mode(regs, nr);
  42
  43         instrumentation_begin();
  44         if (likely(nr < NR_syscalls)) {
  45                 nr = array_index_nospec(nr, NR_syscalls);
  46                 regs->ax = sys_call_table[nr](regs);
  47 #ifdef CONFIG_X86_X32_ABI
  48         } else if (likely((nr & __X32_SYSCALL_BIT) &&
  49                           (nr & ~__X32_SYSCALL_BIT) < X32_NR_syscalls)) {
  50                 nr = array_index_nospec(nr & ~__X32_SYSCALL_BIT,
  51                                         X32_NR_syscalls);
  52                 regs->ax = x32_sys_call_table[nr](regs);
  53 #endif
  54         }
  55         instrumentation_end();
  56         syscall_exit_to_user_mode(regs);
  57 }
  58 #endif
  59
  60 #if defined(CONFIG_X86_32) || defined(CONFIG_IA32_EMULATION)
  61 static __always_inline unsigned int syscall_32_enter(struct pt_regs *regs)
  62 {
  63         unsigned int nr = (unsigned int)regs->orig_ax;
  64
  65         if (IS_ENABLED(CONFIG_IA32_EMULATION))
  66                 current_thread_info()->status |= TS_COMPAT;
  67         /*
  68          * Subtlety here: if ptrace pokes something larger than 2^32-1 into
  69          * orig_ax, the unsigned int return value truncates it.  This may
  70          * or may not be necessary, but it matches the old asm behavior.
  71          */
  72         return (unsigned int)syscall_enter_from_user_mode(regs, nr);
  73 }
  74
  75 /*
  76  * Invoke a 32-bit syscall.  Called with IRQs on in CONTEXT_KERNEL.
  77  */
  78 static __always_inline void do_syscall_32_irqs_on(struct pt_regs *regs,
  79                                                   unsigned int nr)
  80 {
  81         if (likely(nr < IA32_NR_syscalls)) {
  82                 instrumentation_begin();
  83                 nr = array_index_nospec(nr, IA32_NR_syscalls);
  84                 regs->ax = ia32_sys_call_table[nr](regs);
  85                 instrumentation_end();
  86         }
  87 }
  88
  89 /* Handles int $0x80 */
  90 __visible noinstr void do_int80_syscall_32(struct pt_regs *regs)
  91 {
  92         unsigned int nr = syscall_32_enter(regs);
  93
  94         do_syscall_32_irqs_on(regs, nr);
  95         syscall_exit_to_user_mode(regs);
  96 }
  97
  98 static noinstr bool __do_fast_syscall_32(struct pt_regs *regs)
  99 {
 100         unsigned int nr = syscall_32_enter(regs);
 101         int res;
 102
 103         instrumentation_begin();
 104         /* Fetch EBP from where the vDSO stashed it. */
 105         if (IS_ENABLED(CONFIG_X86_64)) {
 106                 /*
 107                  * Micro-optimization: the pointer we're following is
 108                  * explicitly 32 bits, so it can't be out of range.
 109                  */
 110                 res = __get_user(*(u32 *)&regs->bp,
 111                          (u32 __user __force *)(unsigned long)(u32)regs->sp);
 112         } else {
 113                 res = get_user(*(u32 *)&regs->bp,
 114                        (u32 __user __force *)(unsigned long)(u32)regs->sp);
 115         }
 116         instrumentation_end();
 117
 118         if (res) {
 119                 /* User code screwed up. */
 120                 regs->ax = -EFAULT;
 121                 syscall_exit_to_user_mode(regs);
 122                 return false;
 123         }
 124
 125         /* Now this is just like a normal syscall. */
 126         do_syscall_32_irqs_on(regs, nr);
 127         syscall_exit_to_user_mode(regs);
 128         return true;
 129 }
 130
 131 /* Returns 0 to return using IRET or 1 to return using SYSEXIT/SYSRETL. */
 132 __visible noinstr long do_fast_syscall_32(struct pt_regs *regs)
 133 {
 134         /*
 135          * Called using the internal vDSO SYSENTER/SYSCALL32 calling
 136          * convention.  Adjust regs so it looks like we entered using int80.
 137          */
 138         unsigned long landing_pad = (unsigned long)current->mm->context.vdso +
 139                                         vdso_image_32.sym_int80_landing_pad;
 140
 141         /*
 142          * SYSENTER loses EIP, and even SYSCALL32 needs us to skip forward
 143          * so that 'regs->ip -= 2' lands back on an int $0x80 instruction.
 144          * Fix it up.
 145          */
 146         regs->ip = landing_pad;
 147
 148         /* Invoke the syscall. If it failed, keep it simple: use IRET. */
 149         if (!__do_fast_syscall_32(regs))
 150                 return 0;
 151
 152 #ifdef CONFIG_X86_64
 153         /*
 154          * Opportunistic SYSRETL: if possible, try to return using SYSRETL.
 155          * SYSRETL is available on all 64-bit CPUs, so we don't need to
 156          * bother with SYSEXIT.
 157          *
 158          * Unlike 64-bit opportunistic SYSRET, we can't check that CX == IP,
 159          * because the ECX fixup above will ensure that this is essentially
 160          * never the case.
 161          */
 162         return regs->cs == __USER32_CS && regs->ss == __USER_DS &&
 163                 regs->ip == landing_pad &&
 164                 (regs->flags & (X86_EFLAGS_RF | X86_EFLAGS_TF)) == 0;
 165 #else
 166         /*
 167          * Opportunistic SYSEXIT: if possible, try to return using SYSEXIT.
 168          *
 169          * Unlike 64-bit opportunistic SYSRET, we can't check that CX == IP,
 170          * because the ECX fixup above will ensure that this is essentially
 171          * never the case.
 172          *
 173          * We don't allow syscalls at all from VM86 mode, but we still
 174          * need to check VM, because we might be returning from sys_vm86.
 175          */
 176         return static_cpu_has(X86_FEATURE_SEP) &&
 177                 regs->cs == __USER_CS && regs->ss == __USER_DS &&
 178                 regs->ip == landing_pad &&
 179                 (regs->flags & (X86_EFLAGS_RF | X86_EFLAGS_TF | X86_EFLAGS_VM)) == 0;
 180 #endif
 181 }
 182
 183 /* Returns 0 to return using IRET or 1 to return using SYSEXIT/SYSRETL. */
 184 __visible noinstr long do_SYSENTER_32(struct pt_regs *regs)
 185 {
 186         /* SYSENTER loses RSP, but the vDSO saved it in RBP. */
 187         regs->sp = regs->bp;
 188
 189         /* SYSENTER clobbers EFLAGS.IF.  Assume it was set in usermode. */
 190         regs->flags |= X86_EFLAGS_IF;
 191
 192         return do_fast_syscall_32(regs);
 193 }
 194 #endif
 195
 196 SYSCALL_DEFINE0(ni_syscall)
 197 {
 198         return -ENOSYS;
 199 }
 200
 201 #ifdef CONFIG_XEN_PV
 202 #ifndef CONFIG_PREEMPTION
 203 /*
 204  * Some hypercalls issued by the toolstack can take many 10s of
 205  * seconds. Allow tasks running hypercalls via the privcmd driver to
 206  * be voluntarily preempted even if full kernel preemption is
 207  * disabled.
 208  *
 209  * Such preemptible hypercalls are bracketed by
 210  * xen_preemptible_hcall_begin() and xen_preemptible_hcall_end()
 211  * calls.
 212  */
 213 DEFINE_PER_CPU(bool, xen_in_preemptible_hcall);
 214 EXPORT_SYMBOL_GPL(xen_in_preemptible_hcall);
 215
 216 /*
 217  * In case of scheduling the flag must be cleared and restored after
 218  * returning from schedule as the task might move to a different CPU.
 219  */
 220 static __always_inline bool get_and_clear_inhcall(void)
 221 {
 222         bool inhcall = __this_cpu_read(xen_in_preemptible_hcall);
 223
 224         __this_cpu_write(xen_in_preemptible_hcall, false);
 225         return inhcall;
 226 }
 227
 228 static __always_inline void restore_inhcall(bool inhcall)
 229 {
 230         __this_cpu_write(xen_in_preemptible_hcall, inhcall);
 231 }
 232 #else
 233 static __always_inline bool get_and_clear_inhcall(void) { return false; }
 234 static __always_inline void restore_inhcall(bool inhcall) { }
 235 #endif
 236
 237 static void __xen_pv_evtchn_do_upcall(void)
 238 {
 239         irq_enter_rcu();
 240         inc_irq_stat(irq_hv_callback_count);
 241
 242         xen_hvm_evtchn_do_upcall();
 243
 244         irq_exit_rcu();
 245 }
 246
 247 __visible noinstr void xen_pv_evtchn_do_upcall(struct pt_regs *regs)
 248 {
 249         struct pt_regs *old_regs;
 250         bool inhcall;
 251         idtentry_state_t state;
 252
 253         state = idtentry_enter(regs);
 254         old_regs = set_irq_regs(regs);
 255
 256         instrumentation_begin();
 257         run_on_irqstack_cond(__xen_pv_evtchn_do_upcall, NULL, regs);
 258         instrumentation_begin();
 259
 260         set_irq_regs(old_regs);
 261
 262         inhcall = get_and_clear_inhcall();
 263         if (inhcall && !WARN_ON_ONCE(state.exit_rcu)) {
 264                 instrumentation_begin();
 265                 irqentry_exit_cond_resched();
 266                 instrumentation_end();
 267                 restore_inhcall(inhcall);
 268         } else {
 269                 idtentry_exit(regs, state);
 270         }
 271 }
 272 #endif /* CONFIG_XEN_PV */