/* * CDDL HEADER START * * The contents of this file are subject to the terms of the * Common Development and Distribution License (the "License"). * You may not use this file except in compliance with the License. * * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE * or http://www.opensolaris.org/os/licensing. * See the License for the specific language governing permissions * and limitations under the License. * * When distributing Covered Code, include this CDDL HEADER in each * file and include the License file at usr/src/OPENSOLARIS.LICENSE. * If applicable, add the following below this CDDL HEADER, with the * fields enclosed by brackets "[]" replaced with your own identifying * information: Portions Copyright [yyyy] [name of copyright owner] * * CDDL HEADER END */ /* * Copyright 2007 Sun Microsystems, Inc. All rights reserved. * Use is subject to license terms. */ #pragma ident "%Z%%M% %I% %E% SMI" /* * Process switching routines. */ #if defined(__lint) #include #include #include #else /* __lint */ #include "assym.h" #endif /* __lint */ #include #include #include #include #include #include /* * resume(thread_id_t t); * * a thread can only run on one processor at a time. there * exists a window on MPs where the current thread on one * processor is capable of being dispatched by another processor. * some overlap between outgoing and incoming threads can happen * when they are the same thread. in this case where the threads * are the same, resume() on one processor will spin on the incoming * thread until resume() on the other processor has finished with * the outgoing thread. * * The MMU context changes when the resuming thread resides in a different * process. Kernel threads are known by resume to reside in process 0. * The MMU context, therefore, only changes when resuming a thread in * a process different from curproc. * * resume_from_intr() is called when the thread being resumed was not * passivated by resume (e.g. was interrupted). This means that the * resume lock is already held and that a restore context is not needed. * Also, the MMU context is not changed on the resume in this case. * * resume_from_zombie() is the same as resume except the calling thread * is a zombie and must be put on the deathrow list after the CPU is * off the stack. */ #if !defined(__lint) #if LWP_PCB_FPU != 0 #error LWP_PCB_FPU MUST be defined as 0 for code in swtch.s to work #endif /* LWP_PCB_FPU != 0 */ #endif /* !__lint */ #if defined(__amd64) /* * Save non-volatile regs other than %rsp (%rbx, %rbp, and %r12 - %r15) * * The stack frame must be created before the save of %rsp so that tracebacks * of swtch()ed-out processes show the process as having last called swtch(). */ #define SAVE_REGS(thread_t, retaddr) \ movq %rbp, T_RBP(thread_t); \ movq %rbx, T_RBX(thread_t); \ movq %r12, T_R12(thread_t); \ movq %r13, T_R13(thread_t); \ movq %r14, T_R14(thread_t); \ movq %r15, T_R15(thread_t); \ pushq %rbp; \ movq %rsp, %rbp; \ movq %rsp, T_SP(thread_t); \ movq retaddr, T_PC(thread_t); \ movq %rdi, %r12; \ call __dtrace_probe___sched_off__cpu /* * Restore non-volatile regs other than %rsp (%rbx, %rbp, and %r12 - %r15) * * We load up %rsp from the label_t as part of the context switch, so * we don't repeat that here. * * We don't do a 'leave,' because reloading %rsp/%rbp from the label_t * already has the effect of putting the stack back the way it was when * we came in. */ #define RESTORE_REGS(scratch_reg) \ movq %gs:CPU_THREAD, scratch_reg; \ movq T_RBP(scratch_reg), %rbp; \ movq T_RBX(scratch_reg), %rbx; \ movq T_R12(scratch_reg), %r12; \ movq T_R13(scratch_reg), %r13; \ movq T_R14(scratch_reg), %r14; \ movq T_R15(scratch_reg), %r15 /* * Get pointer to a thread's hat structure */ #define GET_THREAD_HATP(hatp, thread_t, scratch_reg) \ movq T_PROCP(thread_t), hatp; \ movq P_AS(hatp), scratch_reg; \ movq A_HAT(scratch_reg), hatp #if defined (__xpv) #define TSC_READ() \ call tsc_read; \ movq %rax, %r14; #else #define TSC_READ() \ rdtsc; \ shlq $32, %rdx; \ movl %eax, %r14d; \ orq %rdx, %r14 #endif /* * If we are resuming an interrupt thread, store a timestamp in the thread * structure. If an interrupt occurs between tsc_read() and its subsequent * store, the timestamp will be stale by the time it is stored. We can detect * this by doing a compare-and-swap on the thread's timestamp, since any * interrupt occurring in this window will put a new timestamp in the thread's * t_intr_start field. */ #define STORE_INTR_START(thread_t) \ testw $T_INTR_THREAD, T_FLAGS(thread_t); \ jz 1f; \ 0: \ TSC_READ(); \ movq T_INTR_START(thread_t), %rax; \ cmpxchgq %r14, T_INTR_START(thread_t); \ jnz 0b; \ 1: #elif defined (__i386) /* * Save non-volatile registers (%ebp, %esi, %edi and %ebx) * * The stack frame must be created before the save of %esp so that tracebacks * of swtch()ed-out processes show the process as having last called swtch(). */ #define SAVE_REGS(thread_t, retaddr) \ movl %ebp, T_EBP(thread_t); \ movl %ebx, T_EBX(thread_t); \ movl %esi, T_ESI(thread_t); \ movl %edi, T_EDI(thread_t); \ pushl %ebp; \ movl %esp, %ebp; \ movl %esp, T_SP(thread_t); \ movl retaddr, T_PC(thread_t); \ movl 8(%ebp), %edi; \ pushl %edi; \ call __dtrace_probe___sched_off__cpu; \ addl $CLONGSIZE, %esp /* * Restore non-volatile registers (%ebp, %esi, %edi and %ebx) * * We don't do a 'leave,' because reloading %rsp/%rbp from the label_t * already has the effect of putting the stack back the way it was when * we came in. */ #define RESTORE_REGS(scratch_reg) \ movl %gs:CPU_THREAD, scratch_reg; \ movl T_EBP(scratch_reg), %ebp; \ movl T_EBX(scratch_reg), %ebx; \ movl T_ESI(scratch_reg), %esi; \ movl T_EDI(scratch_reg), %edi /* * Get pointer to a thread's hat structure */ #define GET_THREAD_HATP(hatp, thread_t, scratch_reg) \ movl T_PROCP(thread_t), hatp; \ movl P_AS(hatp), scratch_reg; \ movl A_HAT(scratch_reg), hatp /* * If we are resuming an interrupt thread, store a timestamp in the thread * structure. If an interrupt occurs between tsc_read() and its subsequent * store, the timestamp will be stale by the time it is stored. We can detect * this by doing a compare-and-swap on the thread's timestamp, since any * interrupt occurring in this window will put a new timestamp in the thread's * t_intr_start field. */ #define STORE_INTR_START(thread_t) \ testw $T_INTR_THREAD, T_FLAGS(thread_t); \ jz 1f; \ pushl %ecx; \ 0: \ pushl T_INTR_START(thread_t); \ pushl T_INTR_START+4(thread_t); \ call tsc_read; \ movl %eax, %ebx; \ movl %edx, %ecx; \ popl %edx; \ popl %eax; \ cmpxchg8b T_INTR_START(thread_t); \ jnz 0b; \ popl %ecx; \ 1: #endif /* __amd64 */ #if defined(__lint) /* ARGSUSED */ void resume(kthread_t *t) {} #else /* __lint */ #if defined(__amd64) ENTRY(resume) movq %gs:CPU_THREAD, %rax leaq resume_return(%rip), %r11 /* * Save non-volatile registers, and set return address for current * thread to resume_return. * * %r12 = t (new thread) when done */ SAVE_REGS(%rax, %r11) LOADCPU(%r15) /* %r15 = CPU */ movq CPU_THREAD(%r15), %r13 /* %r13 = curthread */ /* * Call savectx if thread has installed context ops. * * Note that if we have floating point context, the save op * (either fpsave_begin or fpxsave_begin) will issue the * async save instruction (fnsave or fxsave respectively) * that we fwait for below. */ cmpq $0, T_CTX(%r13) /* should current thread savectx? */ je .nosavectx /* skip call when zero */ movq %r13, %rdi /* arg = thread pointer */ call savectx /* call ctx ops */ .nosavectx: /* * Call savepctx if process has installed context ops. */ movq T_PROCP(%r13), %r14 /* %r14 = proc */ cmpq $0, P_PCTX(%r14) /* should current thread savectx? */ je .nosavepctx /* skip call when zero */ movq %r14, %rdi /* arg = proc pointer */ call savepctx /* call ctx ops */ .nosavepctx: /* * Temporarily switch to the idle thread's stack */ movq CPU_IDLE_THREAD(%r15), %rax /* idle thread pointer */ /* * Set the idle thread as the current thread */ movq T_SP(%rax), %rsp /* It is safe to set rsp */ movq %rax, CPU_THREAD(%r15) /* * Switch in the hat context for the new thread * */ GET_THREAD_HATP(%rdi, %r12, %r11) call hat_switch /* * Clear and unlock previous thread's t_lock * to allow it to be dispatched by another processor. */ movb $0, T_LOCK(%r13) /* * IMPORTANT: Registers at this point must be: * %r12 = new thread * * Here we are in the idle thread, have dropped the old thread. */ ALTENTRY(_resume_from_idle) /* * spin until dispatched thread's mutex has * been unlocked. this mutex is unlocked when * it becomes safe for the thread to run. */ .lock_thread_mutex: lock btsl $0, T_LOCK(%r12) /* attempt to lock new thread's mutex */ jnc .thread_mutex_locked /* got it */ .spin_thread_mutex: pause cmpb $0, T_LOCK(%r12) /* check mutex status */ jz .lock_thread_mutex /* clear, retry lock */ jmp .spin_thread_mutex /* still locked, spin... */ .thread_mutex_locked: /* * Fix CPU structure to indicate new running thread. * Set pointer in new thread to the CPU structure. */ LOADCPU(%r13) /* load current CPU pointer */ cmpq %r13, T_CPU(%r12) je .setup_cpu /* cp->cpu_stats.sys.cpumigrate++ */ incq CPU_STATS_SYS_CPUMIGRATE(%r13) movq %r13, T_CPU(%r12) /* set new thread's CPU pointer */ .setup_cpu: /* * Setup rsp0 (kernel stack) in TSS to curthread's stack. * (Note: Since we don't have saved 'regs' structure for all * the threads we can't easily determine if we need to * change rsp0. So, we simply change the rsp0 to bottom * of the thread stack and it will work for all cases.) * * XX64 - Is this correct? */ movq CPU_TSS(%r13), %r14 movq T_STACK(%r12), %rax addq $REGSIZE+MINFRAME, %rax /* to the bottom of thread stack */ #if !defined(__xpv) movq %rax, TSS_RSP0(%r14) #else movl $KDS_SEL, %edi movq %rax, %rsi call HYPERVISOR_stack_switch #endif /* __xpv */ movq %r12, CPU_THREAD(%r13) /* set CPU's thread pointer */ xorl %ebp, %ebp /* make $cpu_stats.sys.cpumigrate++ */ addl $1, CPU_STATS_SYS_CPUMIGRATE(%esi) adcl $0, CPU_STATS_SYS_CPUMIGRATE+4(%esi) movl %esi, T_CPU(%edi) /* set new thread's CPU pointer */ jmp .L5_1 SET_SIZE(_resume_from_idle) SET_SIZE(resume) #endif /* __amd64 */ #endif /* __lint */ #if defined(__lint) /* ARGSUSED */ void resume_from_zombie(kthread_t *t) {} #else /* __lint */ #if defined(__amd64) ENTRY(resume_from_zombie) movq %gs:CPU_THREAD, %rax leaq resume_from_zombie_return(%rip), %r11 /* * Save non-volatile registers, and set return address for current * thread to resume_from_zombie_return. * * %r12 = t (new thread) when done */ SAVE_REGS(%rax, %r11) movq %gs:CPU_THREAD, %r13 /* %r13 = curthread */ /* clean up the fp unit. It might be left enabled */ #if defined(__xpv) /* XXPV XXtclayton */ /* * Remove this after bringup. * (Too many #gp's for an instrumented hypervisor.) */ STTS(%rax) #else movq %cr0, %rax testq $CR0_TS, %rax jnz .zfpu_disabled /* if TS already set, nothing to do */ fninit /* init fpu & discard pending error */ orq $CR0_TS, %rax movq %rax, %cr0 .zfpu_disabled: #endif /* __xpv */ /* * Temporarily switch to the idle thread's stack so that the zombie * thread's stack can be reclaimed by the reaper. */ movq %gs:CPU_IDLE_THREAD, %rax /* idle thread pointer */ movq T_SP(%rax), %rsp /* get onto idle thread stack */ /* * Sigh. If the idle thread has never run thread_start() * then t_sp is mis-aligned by thread_load(). */ andq $_BITNOT(STACK_ALIGN-1), %rsp /* * Set the idle thread as the current thread. */ movq %rax, %gs:CPU_THREAD /* switch in the hat context for the new thread */ GET_THREAD_HATP(%rdi, %r12, %r11) call hat_switch /* * Put the zombie on death-row. */ movq %r13, %rdi call reapq_add jmp _resume_from_idle /* finish job of resume */ resume_from_zombie_return: RESTORE_REGS(%r11) /* restore non-volatile registers */ call __dtrace_probe___sched_on__cpu /* * Remove stack frame created in SAVE_REGS() */ addq $CLONGSIZE, %rsp ret SET_SIZE(resume_from_zombie) #elif defined (__i386) ENTRY(resume_from_zombie) movl %gs:CPU_THREAD, %eax movl $resume_from_zombie_return, %ecx /* * Save non-volatile registers, and set return address for current * thread to resume_from_zombie_return. * * %edi = t (new thread) when done. */ SAVE_REGS(%eax, %ecx) #ifdef DEBUG call assert_ints_enabled /* panics if we are cli'd */ #endif movl %gs:CPU_THREAD, %esi /* %esi = curthread */ /* clean up the fp unit. It might be left enabled */ movl %cr0, %eax testl $CR0_TS, %eax jnz .zfpu_disabled /* if TS already set, nothing to do */ fninit /* init fpu & discard pending error */ orl $CR0_TS, %eax movl %eax, %cr0 .zfpu_disabled: /* * Temporarily switch to the idle thread's stack so that the zombie * thread's stack can be reclaimed by the reaper. */ movl %gs:CPU_IDLE_THREAD, %eax /* idle thread pointer */ movl T_SP(%eax), %esp /* get onto idle thread stack */ /* * Set the idle thread as the current thread. */ movl %eax, %gs:CPU_THREAD /* * switch in the hat context for the new thread */ GET_THREAD_HATP(%ecx, %edi, %ecx) pushl %ecx call hat_switch addl $4, %esp /* * Put the zombie on death-row. */ pushl %esi call reapq_add addl $4, %esp jmp _resume_from_idle /* finish job of resume */ resume_from_zombie_return: RESTORE_REGS(%ecx) /* restore non-volatile registers */ call __dtrace_probe___sched_on__cpu /* * Remove stack frame created in SAVE_REGS() */ addl $CLONGSIZE, %esp ret SET_SIZE(resume_from_zombie) #endif /* __amd64 */ #endif /* __lint */ #if defined(__lint) /* ARGSUSED */ void resume_from_intr(kthread_t *t) {} #else /* __lint */ #if defined(__amd64) ENTRY(resume_from_intr) movq %gs:CPU_THREAD, %rax leaq resume_from_intr_return(%rip), %r11 /* * Save non-volatile registers, and set return address for current * thread to resume_from_intr_return. * * %r12 = t (new thread) when done */ SAVE_REGS(%rax, %r11) movq %gs:CPU_THREAD, %r13 /* %r13 = curthread */ movq %r12, %gs:CPU_THREAD /* set CPU's thread pointer */ movq T_SP(%r12), %rsp /* restore resuming thread's sp */ xorl %ebp, %ebp /* make $