Home | History | Annotate | Line # | Download | only in i386
linux_machdep.c revision 1.102
      1  1.102      yamt /*	$NetBSD: linux_machdep.c,v 1.102 2004/01/28 10:48:55 yamt Exp $	*/
      2    1.1      fvdl 
      3   1.45      fvdl /*-
      4   1.52      fvdl  * Copyright (c) 1995, 2000 The NetBSD Foundation, Inc.
      5    1.1      fvdl  * All rights reserved.
      6    1.1      fvdl  *
      7   1.45      fvdl  * This code is derived from software contributed to The NetBSD Foundation
      8   1.45      fvdl  * by Frank van der Linden.
      9   1.45      fvdl  *
     10    1.1      fvdl  * Redistribution and use in source and binary forms, with or without
     11    1.1      fvdl  * modification, are permitted provided that the following conditions
     12    1.1      fvdl  * are met:
     13    1.1      fvdl  * 1. Redistributions of source code must retain the above copyright
     14    1.1      fvdl  *    notice, this list of conditions and the following disclaimer.
     15    1.1      fvdl  * 2. Redistributions in binary form must reproduce the above copyright
     16    1.1      fvdl  *    notice, this list of conditions and the following disclaimer in the
     17    1.1      fvdl  *    documentation and/or other materials provided with the distribution.
     18    1.1      fvdl  * 3. All advertising materials mentioning features or use of this software
     19    1.1      fvdl  *    must display the following acknowledgement:
     20   1.45      fvdl  *	This product includes software developed by the NetBSD
     21   1.45      fvdl  *	Foundation, Inc. and its contributors.
     22   1.45      fvdl  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23   1.45      fvdl  *    contributors may be used to endorse or promote products derived
     24   1.45      fvdl  *    from this software without specific prior written permission.
     25    1.1      fvdl  *
     26   1.45      fvdl  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27   1.45      fvdl  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28   1.45      fvdl  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29   1.45      fvdl  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30   1.45      fvdl  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31   1.45      fvdl  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32   1.45      fvdl  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33   1.45      fvdl  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34   1.45      fvdl  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35   1.45      fvdl  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36   1.45      fvdl  * POSSIBILITY OF SUCH DAMAGE.
     37    1.1      fvdl  */
     38   1.68     lukem 
     39   1.68     lukem #include <sys/cdefs.h>
     40  1.102      yamt __KERNEL_RCSID(0, "$NetBSD: linux_machdep.c,v 1.102 2004/01/28 10:48:55 yamt Exp $");
     41   1.35   thorpej 
     42   1.63       mrg #if defined(_KERNEL_OPT)
     43   1.35   thorpej #include "opt_vm86.h"
     44   1.36   thorpej #include "opt_user_ldt.h"
     45   1.51  jdolecek #endif
     46    1.1      fvdl 
     47    1.1      fvdl #include <sys/param.h>
     48    1.1      fvdl #include <sys/systm.h>
     49    1.1      fvdl #include <sys/signalvar.h>
     50    1.1      fvdl #include <sys/kernel.h>
     51    1.1      fvdl #include <sys/proc.h>
     52    1.1      fvdl #include <sys/user.h>
     53    1.1      fvdl #include <sys/buf.h>
     54    1.1      fvdl #include <sys/reboot.h>
     55    1.1      fvdl #include <sys/conf.h>
     56   1.31   thorpej #include <sys/exec.h>
     57    1.1      fvdl #include <sys/file.h>
     58    1.1      fvdl #include <sys/callout.h>
     59    1.1      fvdl #include <sys/malloc.h>
     60    1.1      fvdl #include <sys/mbuf.h>
     61    1.1      fvdl #include <sys/msgbuf.h>
     62    1.1      fvdl #include <sys/mount.h>
     63    1.1      fvdl #include <sys/vnode.h>
     64    1.1      fvdl #include <sys/device.h>
     65   1.85   thorpej #include <sys/sa.h>
     66    1.1      fvdl #include <sys/syscallargs.h>
     67   1.13      fvdl #include <sys/filedesc.h>
     68   1.39   mycroft #include <sys/exec_elf.h>
     69   1.52      fvdl #include <sys/disklabel.h>
     70   1.62      manu #include <sys/ioctl.h>
     71   1.52      fvdl #include <miscfs/specfs/specdev.h>
     72    1.7   mycroft 
     73   1.44  christos #include <compat/linux/common/linux_types.h>
     74   1.44  christos #include <compat/linux/common/linux_signal.h>
     75   1.44  christos #include <compat/linux/common/linux_util.h>
     76   1.44  christos #include <compat/linux/common/linux_ioctl.h>
     77   1.52      fvdl #include <compat/linux/common/linux_hdio.h>
     78   1.44  christos #include <compat/linux/common/linux_exec.h>
     79   1.44  christos #include <compat/linux/common/linux_machdep.h>
     80   1.98  jdolecek #include <compat/linux/common/linux_errno.h>
     81   1.44  christos 
     82    1.1      fvdl #include <compat/linux/linux_syscallargs.h>
     83    1.1      fvdl 
     84    1.1      fvdl #include <machine/cpu.h>
     85    1.1      fvdl #include <machine/cpufunc.h>
     86    1.1      fvdl #include <machine/psl.h>
     87    1.1      fvdl #include <machine/reg.h>
     88    1.7   mycroft #include <machine/segments.h>
     89    1.1      fvdl #include <machine/specialreg.h>
     90    1.7   mycroft #include <machine/sysarch.h>
     91   1.26   mycroft #include <machine/vm86.h>
     92   1.34   mycroft #include <machine/vmparam.h>
     93    1.1      fvdl 
     94    1.1      fvdl /*
     95   1.50     veego  * To see whether wscons is configured (for virtual console ioctl calls).
     96   1.13      fvdl  */
     97   1.63       mrg #if defined(_KERNEL_OPT)
     98   1.41  drochner #include "wsdisplay.h"
     99   1.51  jdolecek #endif
    100   1.41  drochner #if (NWSDISPLAY > 0)
    101   1.52      fvdl #include <dev/wscons/wsconsio.h>
    102   1.41  drochner #include <dev/wscons/wsdisplay_usl_io.h>
    103   1.63       mrg #if defined(_KERNEL_OPT)
    104   1.41  drochner #include "opt_xserver.h"
    105   1.51  jdolecek #endif
    106   1.41  drochner #endif
    107   1.41  drochner 
    108   1.29  christos #ifdef USER_LDT
    109   1.29  christos #include <machine/cpu.h>
    110   1.85   thorpej int linux_read_ldt __P((struct lwp *, struct linux_sys_modify_ldt_args *,
    111   1.29  christos     register_t *));
    112   1.85   thorpej int linux_write_ldt __P((struct lwp *, struct linux_sys_modify_ldt_args *,
    113   1.29  christos     register_t *));
    114   1.29  christos #endif
    115   1.29  christos 
    116   1.72  christos #ifdef DEBUG_LINUX
    117   1.72  christos #define DPRINTF(a) uprintf a
    118   1.72  christos #else
    119   1.72  christos #define DPRINTF(a)
    120   1.72  christos #endif
    121   1.72  christos 
    122   1.52      fvdl static struct biosdisk_info *fd2biosinfo __P((struct proc *, struct file *));
    123   1.52      fvdl extern struct disklist *i386_alldisks;
    124   1.90  christos static void linux_save_ucontext __P((struct lwp *, struct trapframe *,
    125   1.99  christos     const sigset_t *, struct sigaltstack *, struct linux_ucontext *));
    126   1.90  christos static void linux_save_sigcontext __P((struct lwp *, struct trapframe *,
    127   1.99  christos     const sigset_t *, struct linux_sigcontext *));
    128   1.90  christos static int linux_restore_sigcontext __P((struct lwp *,
    129   1.90  christos     struct linux_sigcontext *, register_t *));
    130   1.99  christos static void linux_rt_sendsig __P((const ksiginfo_t *, const sigset_t *));
    131   1.99  christos static void linux_old_sendsig __P((const ksiginfo_t *, const sigset_t *));
    132   1.52      fvdl 
    133   1.83  christos extern char linux_sigcode[], linux_rt_sigcode[];
    134   1.13      fvdl /*
    135    1.1      fvdl  * Deal with some i386-specific things in the Linux emulation code.
    136    1.1      fvdl  */
    137   1.37   mycroft 
    138   1.37   mycroft void
    139   1.85   thorpej linux_setregs(l, epp, stack)
    140   1.85   thorpej 	struct lwp *l;
    141   1.37   mycroft 	struct exec_package *epp;
    142   1.37   mycroft 	u_long stack;
    143   1.37   mycroft {
    144   1.85   thorpej 	struct pcb *pcb = &l->l_addr->u_pcb;
    145   1.73  christos 	struct trapframe *tf;
    146   1.73  christos 
    147   1.73  christos #if NNPX > 0
    148   1.73  christos 	/* If we were using the FPU, forget about it. */
    149   1.85   thorpej 	if (npxproc == l)
    150   1.73  christos 		npxdrop();
    151   1.73  christos #endif
    152   1.73  christos 
    153   1.73  christos #ifdef USER_LDT
    154   1.85   thorpej 	pmap_ldt_cleanup(l);
    155   1.73  christos #endif
    156   1.37   mycroft 
    157  1.102      yamt 	l->l_md.md_flags &= ~MDL_USEDFPU;
    158   1.73  christos 
    159   1.73  christos 	if (i386_use_fxsave) {
    160   1.67   thorpej 		pcb->pcb_savefpu.sv_xmm.sv_env.en_cw = __Linux_NPXCW__;
    161   1.73  christos 		pcb->pcb_savefpu.sv_xmm.sv_env.en_mxcsr = __INITIAL_MXCSR__;
    162   1.73  christos 	} else
    163   1.67   thorpej 		pcb->pcb_savefpu.sv_87.sv_env.en_cw = __Linux_NPXCW__;
    164   1.73  christos 
    165   1.85   thorpej 	tf = l->l_md.md_regs;
    166   1.73  christos 	tf->tf_gs = GSEL(GUDATA_SEL, SEL_UPL);
    167   1.73  christos 	tf->tf_fs = GSEL(GUDATA_SEL, SEL_UPL);
    168   1.73  christos 	tf->tf_es = GSEL(GUDATA_SEL, SEL_UPL);
    169   1.73  christos 	tf->tf_ds = GSEL(GUDATA_SEL, SEL_UPL);
    170   1.73  christos 	tf->tf_edi = 0;
    171   1.73  christos 	tf->tf_esi = 0;
    172   1.73  christos 	tf->tf_ebp = 0;
    173   1.85   thorpej 	tf->tf_ebx = (int)l->l_proc->p_psstr;
    174   1.73  christos 	tf->tf_edx = 0;
    175   1.73  christos 	tf->tf_ecx = 0;
    176   1.73  christos 	tf->tf_eax = 0;
    177   1.73  christos 	tf->tf_eip = epp->ep_entry;
    178   1.95       chs 	tf->tf_cs = GSEL(GUCODEBIG_SEL, SEL_UPL);
    179   1.73  christos 	tf->tf_eflags = PSL_USERSET;
    180   1.73  christos 	tf->tf_esp = stack;
    181   1.73  christos 	tf->tf_ss = GSEL(GUDATA_SEL, SEL_UPL);
    182   1.37   mycroft }
    183    1.1      fvdl 
    184    1.1      fvdl /*
    185    1.1      fvdl  * Send an interrupt to process.
    186    1.1      fvdl  *
    187    1.1      fvdl  * Stack is set up to allow sigcode stored
    188    1.1      fvdl  * in u. to call routine, followed by kcall
    189    1.1      fvdl  * to sigreturn routine below.  After sigreturn
    190    1.1      fvdl  * resets the signal mask, the stack, and the
    191    1.1      fvdl  * frame pointer, it returns to the user
    192    1.1      fvdl  * specified pc, psl.
    193    1.1      fvdl  */
    194    1.1      fvdl 
    195    1.1      fvdl void
    196   1.99  christos linux_sendsig(const ksiginfo_t *ksi, const sigset_t *mask)
    197    1.1      fvdl {
    198   1.96  christos 	if (SIGACTION(curproc, ksi->ksi_signo).sa_flags & SA_SIGINFO)
    199   1.97  christos 		linux_rt_sendsig(ksi, mask);
    200   1.83  christos 	else
    201   1.97  christos 		linux_old_sendsig(ksi, mask);
    202   1.83  christos }
    203   1.83  christos 
    204   1.83  christos 
    205   1.83  christos static void
    206   1.90  christos linux_save_ucontext(l, tf, mask, sas, uc)
    207   1.90  christos 	struct lwp *l;
    208   1.90  christos 	struct trapframe *tf;
    209   1.99  christos 	const sigset_t *mask;
    210   1.90  christos 	struct sigaltstack *sas;
    211   1.90  christos 	struct linux_ucontext *uc;
    212   1.90  christos {
    213   1.90  christos 	uc->uc_flags = 0;
    214   1.90  christos 	uc->uc_link = NULL;
    215   1.90  christos 	native_to_linux_sigaltstack(&uc->uc_stack, sas);
    216   1.90  christos 	linux_save_sigcontext(l, tf, mask, &uc->uc_mcontext);
    217   1.90  christos 	native_to_linux_sigset(&uc->uc_sigmask, mask);
    218   1.90  christos 	(void)memset(&uc->uc_fpregs_mem, 0, sizeof(uc->uc_fpregs_mem));
    219   1.90  christos }
    220   1.90  christos 
    221   1.90  christos static void
    222   1.90  christos linux_save_sigcontext(l, tf, mask, sc)
    223   1.85   thorpej 	struct lwp *l;
    224   1.83  christos 	struct trapframe *tf;
    225   1.99  christos 	const sigset_t *mask;
    226   1.83  christos 	struct linux_sigcontext *sc;
    227   1.83  christos {
    228   1.83  christos 	/* Save register context. */
    229   1.83  christos #ifdef VM86
    230   1.83  christos 	if (tf->tf_eflags & PSL_VM) {
    231   1.83  christos 		sc->sc_gs = tf->tf_vm86_gs;
    232   1.83  christos 		sc->sc_fs = tf->tf_vm86_fs;
    233   1.83  christos 		sc->sc_es = tf->tf_vm86_es;
    234   1.83  christos 		sc->sc_ds = tf->tf_vm86_ds;
    235   1.85   thorpej 		sc->sc_eflags = get_vflags(l);
    236   1.83  christos 	} else
    237   1.83  christos #endif
    238   1.83  christos 	{
    239   1.83  christos 		sc->sc_gs = tf->tf_gs;
    240   1.83  christos 		sc->sc_fs = tf->tf_fs;
    241   1.83  christos 		sc->sc_es = tf->tf_es;
    242   1.83  christos 		sc->sc_ds = tf->tf_ds;
    243   1.83  christos 		sc->sc_eflags = tf->tf_eflags;
    244   1.83  christos 	}
    245   1.83  christos 	sc->sc_edi = tf->tf_edi;
    246   1.83  christos 	sc->sc_esi = tf->tf_esi;
    247   1.83  christos 	sc->sc_esp = tf->tf_esp;
    248   1.83  christos 	sc->sc_ebp = tf->tf_ebp;
    249   1.83  christos 	sc->sc_ebx = tf->tf_ebx;
    250   1.83  christos 	sc->sc_edx = tf->tf_edx;
    251   1.83  christos 	sc->sc_ecx = tf->tf_ecx;
    252   1.83  christos 	sc->sc_eax = tf->tf_eax;
    253   1.83  christos 	sc->sc_eip = tf->tf_eip;
    254   1.83  christos 	sc->sc_cs = tf->tf_cs;
    255   1.83  christos 	sc->sc_esp_at_signal = tf->tf_esp;
    256   1.83  christos 	sc->sc_ss = tf->tf_ss;
    257   1.83  christos 	sc->sc_err = tf->tf_err;
    258   1.83  christos 	sc->sc_trapno = tf->tf_trapno;
    259   1.85   thorpej 	sc->sc_cr2 = l->l_addr->u_pcb.pcb_cr2;
    260   1.83  christos 	sc->sc_387 = NULL;
    261   1.83  christos 
    262   1.83  christos 	/* Save signal stack. */
    263   1.83  christos 	/* Linux doesn't save the onstack flag in sigframe */
    264   1.83  christos 
    265   1.83  christos 	/* Save signal mask. */
    266   1.83  christos 	native_to_linux_old_sigset(&sc->sc_mask, mask);
    267   1.83  christos }
    268   1.83  christos 
    269   1.83  christos static void
    270   1.99  christos linux_rt_sendsig(const ksiginfo_t *ksi, const sigset_t *mask)
    271   1.83  christos {
    272   1.85   thorpej 	struct lwp *l = curlwp;
    273   1.85   thorpej 	struct proc *p = l->l_proc;
    274   1.48  augustss 	struct trapframe *tf;
    275   1.83  christos 	struct linux_rt_sigframe *fp, frame;
    276   1.66  jdolecek 	int onstack;
    277   1.97  christos 	linux_siginfo_t *lsi;
    278   1.98  jdolecek 	int sig = ksi->ksi_signo;
    279   1.78   thorpej 	sig_t catcher = SIGACTION(p, sig).sa_handler;
    280   1.82  christos 	struct sigaltstack *sas = &p->p_sigctx.ps_sigstk;
    281    1.1      fvdl 
    282   1.85   thorpej 	tf = l->l_md.md_regs;
    283   1.66  jdolecek 	/* Do we need to jump onto the signal stack? */
    284   1.82  christos 	onstack = (sas->ss_flags & (SS_DISABLE | SS_ONSTACK)) == 0 &&
    285   1.66  jdolecek 	    (SIGACTION(p, sig).sa_flags & SA_ONSTACK) != 0;
    286   1.66  jdolecek 
    287   1.83  christos 
    288   1.42   mycroft 	/* Allocate space for the signal handler context. */
    289   1.66  jdolecek 	if (onstack)
    290   1.83  christos 		fp = (struct linux_rt_sigframe *)((caddr_t)sas->ss_sp +
    291   1.83  christos 		    sas->ss_size);
    292   1.66  jdolecek 	else
    293   1.83  christos 		fp = (struct linux_rt_sigframe *)tf->tf_esp;
    294   1.42   mycroft 	fp--;
    295    1.1      fvdl 
    296   1.92  christos 	DPRINTF(("rt: onstack = %d, fp = %p sig = %d eip = 0x%x cr2 = 0x%x\n",
    297   1.92  christos 	    onstack, fp, sig, tf->tf_eip, l->l_addr->u_pcb.pcb_cr2));
    298   1.83  christos 
    299   1.42   mycroft 	/* Build stack frame for signal trampoline. */
    300    1.7   mycroft 	frame.sf_handler = catcher;
    301   1.74  christos 	frame.sf_sig = native_to_linux_signo[sig];
    302   1.82  christos 	frame.sf_sip = &fp->sf_si;
    303   1.90  christos 	frame.sf_ucp = &fp->sf_uc;
    304   1.83  christos 
    305   1.82  christos 	/*
    306   1.97  christos 	 * XXX: the following code assumes that the constants for
    307   1.97  christos 	 * siginfo are the same between linux and NetBSD.
    308   1.82  christos 	 */
    309   1.97  christos 	(void)memset(lsi = &frame.sf_si, 0, sizeof(frame.sf_si));
    310   1.97  christos 	lsi->lsi_errno = native_to_linux_errno[ksi->ksi_errno];
    311   1.97  christos 	lsi->lsi_code = ksi->ksi_code;
    312   1.97  christos 	switch (lsi->lsi_signo = frame.sf_sig) {
    313   1.97  christos 	case LINUX_SIGILL:
    314   1.97  christos 	case LINUX_SIGFPE:
    315   1.90  christos 	case LINUX_SIGSEGV:
    316   1.90  christos 	case LINUX_SIGBUS:
    317   1.90  christos 	case LINUX_SIGTRAP:
    318   1.97  christos 		lsi->lsi_addr = ksi->ksi_addr;
    319   1.90  christos 		break;
    320   1.90  christos 	case LINUX_SIGCHLD:
    321   1.97  christos 		lsi->lsi_uid = ksi->ksi_uid;
    322   1.97  christos 		lsi->lsi_pid = ksi->ksi_pid;
    323   1.97  christos 		lsi->lsi_status = ksi->ksi_status;
    324   1.97  christos 		lsi->lsi_utime = ksi->ksi_utime;
    325   1.97  christos 		lsi->lsi_stime = ksi->ksi_stime;
    326   1.97  christos 		break;
    327   1.90  christos 	case LINUX_SIGIO:
    328   1.97  christos 		lsi->lsi_band = ksi->ksi_band;
    329   1.97  christos 		lsi->lsi_fd = ksi->ksi_fd;
    330   1.97  christos 		break;
    331   1.90  christos 	default:
    332   1.97  christos 		lsi->lsi_uid = ksi->ksi_uid;
    333   1.97  christos 		lsi->lsi_pid = ksi->ksi_pid;
    334   1.97  christos 		if (lsi->lsi_signo == LINUX_SIGALRM ||
    335   1.97  christos 		    lsi->lsi_signo >= LINUX_SIGRTMIN)
    336   1.98  jdolecek 			lsi->lsi_value.sival_ptr = ksi->ksi_sigval.sival_ptr;
    337   1.90  christos 		break;
    338   1.90  christos 	}
    339    1.1      fvdl 
    340   1.42   mycroft 	/* Save register context. */
    341   1.90  christos 	linux_save_ucontext(l, tf, mask, sas, &frame.sf_uc);
    342   1.83  christos 
    343   1.83  christos 	if (copyout(&frame, fp, sizeof(frame)) != 0) {
    344   1.83  christos 		/*
    345   1.83  christos 		 * Process has trashed its stack; give it an illegal
    346   1.83  christos 		 * instruction to halt it in its tracks.
    347   1.83  christos 		 */
    348   1.85   thorpej 		sigexit(l, SIGILL);
    349   1.83  christos 		/* NOTREACHED */
    350    1.4   mycroft 	}
    351    1.1      fvdl 
    352   1.83  christos 	/*
    353   1.83  christos 	 * Build context to run handler in.
    354   1.83  christos 	 */
    355   1.83  christos 	tf->tf_gs = GSEL(GUDATA_SEL, SEL_UPL);
    356   1.83  christos 	tf->tf_fs = GSEL(GUDATA_SEL, SEL_UPL);
    357   1.83  christos 	tf->tf_es = GSEL(GUDATA_SEL, SEL_UPL);
    358   1.83  christos 	tf->tf_ds = GSEL(GUDATA_SEL, SEL_UPL);
    359   1.83  christos 	tf->tf_eip = ((int)p->p_sigctx.ps_sigcode) +
    360   1.83  christos 	    (linux_rt_sigcode - linux_sigcode);
    361   1.83  christos 	tf->tf_cs = GSEL(GUCODE_SEL, SEL_UPL);
    362   1.83  christos 	tf->tf_eflags &= ~(PSL_T|PSL_VM|PSL_AC);
    363   1.83  christos 	tf->tf_esp = (int)fp;
    364   1.83  christos 	tf->tf_ss = GSEL(GUDATA_SEL, SEL_UPL);
    365   1.83  christos 
    366   1.83  christos 	/* Remember that we're now on the signal stack. */
    367   1.83  christos 	if (onstack)
    368   1.83  christos 		sas->ss_flags |= SS_ONSTACK;
    369   1.83  christos }
    370   1.83  christos 
    371   1.83  christos static void
    372   1.99  christos linux_old_sendsig(const ksiginfo_t *ksi, const sigset_t *mask)
    373   1.83  christos {
    374   1.85   thorpej 	struct lwp *l = curlwp;
    375   1.85   thorpej 	struct proc *p = l->l_proc;
    376   1.83  christos 	struct trapframe *tf;
    377   1.83  christos 	struct linux_sigframe *fp, frame;
    378   1.83  christos 	int onstack;
    379   1.97  christos 	int sig = ksi->ksi_signo;
    380   1.83  christos 	sig_t catcher = SIGACTION(p, sig).sa_handler;
    381   1.83  christos 	struct sigaltstack *sas = &p->p_sigctx.ps_sigstk;
    382   1.83  christos 
    383   1.85   thorpej 	tf = l->l_md.md_regs;
    384   1.83  christos 
    385   1.83  christos 	/* Do we need to jump onto the signal stack? */
    386   1.83  christos 	onstack = (sas->ss_flags & (SS_DISABLE | SS_ONSTACK)) == 0 &&
    387   1.83  christos 	    (SIGACTION(p, sig).sa_flags & SA_ONSTACK) != 0;
    388   1.83  christos 
    389   1.83  christos 	/* Allocate space for the signal handler context. */
    390   1.83  christos 	if (onstack)
    391   1.83  christos 		fp = (struct linux_sigframe *) ((caddr_t)sas->ss_sp +
    392   1.83  christos 		    sas->ss_size);
    393   1.83  christos 	else
    394   1.83  christos 		fp = (struct linux_sigframe *)tf->tf_esp;
    395   1.83  christos 	fp--;
    396   1.83  christos 
    397   1.92  christos 	DPRINTF(("old: onstack = %d, fp = %p sig = %d eip = 0x%x cr2 = 0x%x\n",
    398   1.92  christos 	    onstack, fp, sig, tf->tf_eip, l->l_addr->u_pcb.pcb_cr2));
    399   1.83  christos 
    400   1.83  christos 	/* Build stack frame for signal trampoline. */
    401   1.83  christos 	frame.sf_handler = catcher;
    402   1.83  christos 	frame.sf_sig = native_to_linux_signo[sig];
    403   1.42   mycroft 
    404   1.90  christos 	linux_save_sigcontext(l, tf, mask, &frame.sf_sc);
    405   1.42   mycroft 
    406    1.1      fvdl 	if (copyout(&frame, fp, sizeof(frame)) != 0) {
    407    1.1      fvdl 		/*
    408    1.1      fvdl 		 * Process has trashed its stack; give it an illegal
    409    1.1      fvdl 		 * instruction to halt it in its tracks.
    410    1.1      fvdl 		 */
    411   1.85   thorpej 		sigexit(l, SIGILL);
    412    1.1      fvdl 		/* NOTREACHED */
    413    1.1      fvdl 	}
    414    1.1      fvdl 
    415    1.1      fvdl 	/*
    416    1.1      fvdl 	 * Build context to run handler in.
    417    1.1      fvdl 	 */
    418   1.75  christos 	tf->tf_gs = GSEL(GUDATA_SEL, SEL_UPL);
    419   1.75  christos 	tf->tf_fs = GSEL(GUDATA_SEL, SEL_UPL);
    420   1.26   mycroft 	tf->tf_es = GSEL(GUDATA_SEL, SEL_UPL);
    421   1.26   mycroft 	tf->tf_ds = GSEL(GUDATA_SEL, SEL_UPL);
    422   1.56  jdolecek 	tf->tf_eip = (int)p->p_sigctx.ps_sigcode;
    423   1.95       chs 	tf->tf_cs = GSEL(GUCODEBIG_SEL, SEL_UPL);
    424   1.28   mycroft 	tf->tf_eflags &= ~(PSL_T|PSL_VM|PSL_AC);
    425   1.26   mycroft 	tf->tf_esp = (int)fp;
    426   1.23   mycroft 	tf->tf_ss = GSEL(GUDATA_SEL, SEL_UPL);
    427   1.42   mycroft 
    428   1.42   mycroft 	/* Remember that we're now on the signal stack. */
    429   1.66  jdolecek 	if (onstack)
    430   1.82  christos 		sas->ss_flags |= SS_ONSTACK;
    431    1.1      fvdl }
    432    1.1      fvdl 
    433    1.1      fvdl /*
    434    1.1      fvdl  * System call to cleanup state after a signal
    435    1.1      fvdl  * has been taken.  Reset signal mask and
    436    1.1      fvdl  * stack state from context left by sendsig (above).
    437    1.1      fvdl  * Return to previous pc and psl as specified by
    438    1.1      fvdl  * context left by sendsig. Check carefully to
    439    1.1      fvdl  * make sure that the user has not modified the
    440    1.1      fvdl  * psl to gain improper privileges or to cause
    441    1.1      fvdl  * a machine fault.
    442    1.1      fvdl  */
    443   1.43       erh int
    444   1.85   thorpej linux_sys_rt_sigreturn(l, v, retval)
    445   1.85   thorpej 	struct lwp *l;
    446   1.43       erh 	void *v;
    447   1.43       erh 	register_t *retval;
    448   1.43       erh {
    449   1.90  christos 	struct linux_sys_rt_sigreturn_args /* {
    450   1.90  christos 		syscallarg(struct linux_ucontext *) ucp;
    451   1.90  christos 	} */ *uap = v;
    452   1.90  christos 	struct linux_ucontext context, *ucp = SCARG(uap, ucp);
    453   1.90  christos 	int error;
    454   1.90  christos 
    455   1.90  christos 	/*
    456   1.90  christos 	 * The trampoline code hands us the context.
    457   1.90  christos 	 * It is unsafe to keep track of it ourselves, in the event that a
    458   1.90  christos 	 * program jumps out of a signal handler.
    459   1.90  christos 	 */
    460   1.90  christos 	if ((error = copyin(ucp, &context, sizeof(*ucp))) != 0)
    461   1.90  christos 		return error;
    462   1.90  christos 
    463   1.90  christos 	/* XXX XAX we can do better here by using more of the ucontext */
    464   1.90  christos 	return linux_restore_sigcontext(l, &context.uc_mcontext, retval);
    465   1.43       erh }
    466   1.43       erh 
    467    1.1      fvdl int
    468   1.85   thorpej linux_sys_sigreturn(l, v, retval)
    469   1.85   thorpej 	struct lwp *l;
    470   1.19   thorpej 	void *v;
    471   1.19   thorpej 	register_t *retval;
    472   1.19   thorpej {
    473   1.20   mycroft 	struct linux_sys_sigreturn_args /* {
    474    1.1      fvdl 		syscallarg(struct linux_sigcontext *) scp;
    475   1.19   thorpej 	} */ *uap = v;
    476   1.90  christos 	struct linux_sigcontext context, *scp = SCARG(uap, scp);
    477   1.90  christos 	int error;
    478    1.1      fvdl 
    479    1.1      fvdl 	/*
    480    1.1      fvdl 	 * The trampoline code hands us the context.
    481    1.1      fvdl 	 * It is unsafe to keep track of it ourselves, in the event that a
    482    1.1      fvdl 	 * program jumps out of a signal handler.
    483    1.1      fvdl 	 */
    484   1.90  christos 	if ((error = copyin((caddr_t)scp, &context, sizeof(*scp))) != 0)
    485   1.90  christos 		return error;
    486   1.90  christos 	return linux_restore_sigcontext(l, &context, retval);
    487   1.90  christos }
    488    1.1      fvdl 
    489   1.90  christos static int
    490   1.90  christos linux_restore_sigcontext(l, scp, retval)
    491   1.90  christos 	struct lwp *l;
    492   1.90  christos 	struct linux_sigcontext *scp;
    493   1.90  christos 	register_t *retval;
    494   1.90  christos {
    495   1.90  christos 	struct proc *p = l->l_proc;
    496   1.90  christos 	struct sigaltstack *sas = &p->p_sigctx.ps_sigstk;
    497   1.90  christos 	struct trapframe *tf;
    498   1.90  christos 	sigset_t mask;
    499   1.90  christos 	ssize_t ss_gap;
    500   1.42   mycroft 	/* Restore register context. */
    501   1.85   thorpej 	tf = l->l_md.md_regs;
    502   1.83  christos 
    503   1.83  christos 	DPRINTF(("sigreturn enter esp=%x eip=%x\n", tf->tf_esp, tf->tf_eip));
    504    1.4   mycroft #ifdef VM86
    505   1.90  christos 	if (scp->sc_eflags & PSL_VM) {
    506   1.94   hannken 		void syscall_vm86 __P((struct trapframe *));
    507   1.83  christos 
    508   1.90  christos 		tf->tf_vm86_gs = scp->sc_gs;
    509   1.90  christos 		tf->tf_vm86_fs = scp->sc_fs;
    510   1.90  christos 		tf->tf_vm86_es = scp->sc_es;
    511   1.90  christos 		tf->tf_vm86_ds = scp->sc_ds;
    512   1.90  christos 		set_vflags(l, scp->sc_eflags);
    513   1.83  christos 		p->p_md.md_syscall = syscall_vm86;
    514    1.4   mycroft 	} else
    515    1.4   mycroft #endif
    516    1.4   mycroft 	{
    517   1.26   mycroft 		/*
    518   1.26   mycroft 		 * Check for security violations.  If we're returning to
    519   1.26   mycroft 		 * protected mode, the CPU will validate the segment registers
    520   1.26   mycroft 		 * automatically and generate a trap on violations.  We handle
    521   1.26   mycroft 		 * the trap, rather than doing all of the checking here.
    522   1.26   mycroft 		 */
    523   1.90  christos 		if (((scp->sc_eflags ^ tf->tf_eflags) & PSL_USERSTATIC) != 0 ||
    524   1.90  christos 		    !USERMODE(scp->sc_cs, scp->sc_eflags))
    525   1.83  christos 			return EINVAL;
    526   1.26   mycroft 
    527   1.90  christos 		tf->tf_gs = scp->sc_gs;
    528   1.90  christos 		tf->tf_fs = scp->sc_fs;
    529   1.90  christos 		tf->tf_es = scp->sc_es;
    530   1.90  christos 		tf->tf_ds = scp->sc_ds;
    531   1.83  christos #ifdef VM86
    532   1.83  christos 		if (tf->tf_eflags & PSL_VM)
    533   1.83  christos 			(*p->p_emul->e_syscall_intern)(p);
    534   1.83  christos #endif
    535   1.90  christos 		tf->tf_eflags = scp->sc_eflags;
    536    1.4   mycroft 	}
    537   1.90  christos 	tf->tf_edi = scp->sc_edi;
    538   1.90  christos 	tf->tf_esi = scp->sc_esi;
    539   1.90  christos 	tf->tf_ebp = scp->sc_ebp;
    540   1.90  christos 	tf->tf_ebx = scp->sc_ebx;
    541   1.90  christos 	tf->tf_edx = scp->sc_edx;
    542   1.90  christos 	tf->tf_ecx = scp->sc_ecx;
    543   1.90  christos 	tf->tf_eax = scp->sc_eax;
    544   1.90  christos 	tf->tf_eip = scp->sc_eip;
    545   1.90  christos 	tf->tf_cs = scp->sc_cs;
    546   1.90  christos 	tf->tf_esp = scp->sc_esp_at_signal;
    547   1.90  christos 	tf->tf_ss = scp->sc_ss;
    548   1.26   mycroft 
    549   1.42   mycroft 	/* Restore signal stack. */
    550   1.66  jdolecek 	/*
    551   1.66  jdolecek 	 * Linux really does it this way; it doesn't have space in sigframe
    552   1.66  jdolecek 	 * to save the onstack flag.
    553   1.66  jdolecek 	 */
    554   1.66  jdolecek 	ss_gap = (ssize_t)
    555   1.90  christos 	    ((caddr_t) scp->sc_esp_at_signal - (caddr_t) sas->ss_sp);
    556   1.82  christos 	if (ss_gap >= 0 && ss_gap < sas->ss_size)
    557   1.82  christos 		sas->ss_flags |= SS_ONSTACK;
    558   1.66  jdolecek 	else
    559   1.82  christos 		sas->ss_flags &= ~SS_ONSTACK;
    560   1.42   mycroft 
    561   1.42   mycroft 	/* Restore signal mask. */
    562   1.90  christos 	linux_old_to_native_sigset(&mask, &scp->sc_mask);
    563   1.42   mycroft 	(void) sigprocmask1(p, SIG_SETMASK, &mask, 0);
    564   1.83  christos 	DPRINTF(("sigreturn exit esp=%x eip=%x\n", tf->tf_esp, tf->tf_eip));
    565   1.83  christos 	return EJUSTRETURN;
    566    1.6   mycroft }
    567    1.6   mycroft 
    568    1.7   mycroft #ifdef USER_LDT
    569    1.7   mycroft 
    570    1.7   mycroft int
    571   1.85   thorpej linux_read_ldt(l, uap, retval)
    572   1.85   thorpej 	struct lwp *l;
    573   1.20   mycroft 	struct linux_sys_modify_ldt_args /* {
    574    1.7   mycroft 		syscallarg(int) func;
    575    1.7   mycroft 		syscallarg(void *) ptr;
    576    1.7   mycroft 		syscallarg(size_t) bytecount;
    577    1.7   mycroft 	} */ *uap;
    578    1.7   mycroft 	register_t *retval;
    579    1.7   mycroft {
    580   1.85   thorpej 	struct proc *p = l->l_proc;
    581    1.7   mycroft 	struct i386_get_ldt_args gl;
    582    1.7   mycroft 	int error;
    583    1.7   mycroft 	caddr_t sg;
    584    1.7   mycroft 	char *parms;
    585    1.7   mycroft 
    586   1.72  christos 	DPRINTF(("linux_read_ldt!"));
    587   1.71  christos 	sg = stackgap_init(p, 0);
    588    1.7   mycroft 
    589    1.7   mycroft 	gl.start = 0;
    590    1.7   mycroft 	gl.desc = SCARG(uap, ptr);
    591    1.7   mycroft 	gl.num = SCARG(uap, bytecount) / sizeof(union descriptor);
    592    1.7   mycroft 
    593   1.71  christos 	parms = stackgap_alloc(p, &sg, sizeof(gl));
    594    1.7   mycroft 
    595   1.29  christos 	if ((error = copyout(&gl, parms, sizeof(gl))) != 0)
    596    1.7   mycroft 		return (error);
    597    1.7   mycroft 
    598   1.85   thorpej 	if ((error = i386_get_ldt(l, parms, retval)) != 0)
    599    1.7   mycroft 		return (error);
    600    1.7   mycroft 
    601    1.7   mycroft 	*retval *= sizeof(union descriptor);
    602    1.7   mycroft 	return (0);
    603    1.7   mycroft }
    604    1.7   mycroft 
    605    1.7   mycroft struct linux_ldt_info {
    606    1.7   mycroft 	u_int entry_number;
    607    1.7   mycroft 	u_long base_addr;
    608    1.7   mycroft 	u_int limit;
    609    1.7   mycroft 	u_int seg_32bit:1;
    610    1.7   mycroft 	u_int contents:2;
    611    1.7   mycroft 	u_int read_exec_only:1;
    612    1.7   mycroft 	u_int limit_in_pages:1;
    613    1.7   mycroft 	u_int seg_not_present:1;
    614   1.72  christos 	u_int useable:1;
    615    1.7   mycroft };
    616    1.7   mycroft 
    617    1.7   mycroft int
    618   1.85   thorpej linux_write_ldt(l, uap, retval)
    619   1.85   thorpej 	struct lwp *l;
    620   1.20   mycroft 	struct linux_sys_modify_ldt_args /* {
    621    1.7   mycroft 		syscallarg(int) func;
    622    1.7   mycroft 		syscallarg(void *) ptr;
    623    1.7   mycroft 		syscallarg(size_t) bytecount;
    624    1.7   mycroft 	} */ *uap;
    625    1.7   mycroft 	register_t *retval;
    626    1.7   mycroft {
    627   1.85   thorpej 	struct proc *p = l->l_proc;
    628    1.7   mycroft 	struct linux_ldt_info ldt_info;
    629    1.7   mycroft 	struct segment_descriptor sd;
    630    1.7   mycroft 	struct i386_set_ldt_args sl;
    631    1.7   mycroft 	int error;
    632    1.7   mycroft 	caddr_t sg;
    633    1.7   mycroft 	char *parms;
    634   1.72  christos 	int oldmode = (int)retval[0];
    635    1.7   mycroft 
    636   1.72  christos 	DPRINTF(("linux_write_ldt %d\n", oldmode));
    637    1.7   mycroft 	if (SCARG(uap, bytecount) != sizeof(ldt_info))
    638    1.7   mycroft 		return (EINVAL);
    639   1.29  christos 	if ((error = copyin(SCARG(uap, ptr), &ldt_info, sizeof(ldt_info))) != 0)
    640    1.7   mycroft 		return error;
    641   1.72  christos 	if (ldt_info.entry_number >= 8192)
    642    1.7   mycroft 		return (EINVAL);
    643   1.72  christos 	if (ldt_info.contents == 3) {
    644   1.72  christos 		if (oldmode)
    645   1.72  christos 			return (EINVAL);
    646   1.72  christos 		if (ldt_info.seg_not_present)
    647   1.72  christos 			return (EINVAL);
    648   1.72  christos 	}
    649    1.7   mycroft 
    650   1.72  christos 	if (ldt_info.base_addr == 0 && ldt_info.limit == 0 &&
    651   1.72  christos 	    (oldmode || (ldt_info.contents == 0 &&
    652   1.72  christos 	    ldt_info.read_exec_only == 1 && ldt_info.seg_32bit == 0 &&
    653   1.72  christos 	    ldt_info.limit_in_pages == 0 && ldt_info.seg_not_present == 1 &&
    654   1.72  christos 	    ldt_info.useable == 0))) {
    655   1.70  christos 		/* this means you should zero the ldt */
    656   1.70  christos 		(void)memset(&sd, 0, sizeof(sd));
    657   1.70  christos 	} else {
    658   1.70  christos 		sd.sd_lobase = ldt_info.base_addr & 0xffffff;
    659   1.70  christos 		sd.sd_hibase = (ldt_info.base_addr >> 24) & 0xff;
    660   1.70  christos 		sd.sd_lolimit = ldt_info.limit & 0xffff;
    661   1.70  christos 		sd.sd_hilimit = (ldt_info.limit >> 16) & 0xf;
    662   1.70  christos 		sd.sd_type = 16 | (ldt_info.contents << 2) |
    663   1.70  christos 		    (!ldt_info.read_exec_only << 1);
    664   1.70  christos 		sd.sd_dpl = SEL_UPL;
    665   1.70  christos 		sd.sd_p = !ldt_info.seg_not_present;
    666   1.70  christos 		sd.sd_def32 = ldt_info.seg_32bit;
    667   1.70  christos 		sd.sd_gran = ldt_info.limit_in_pages;
    668   1.72  christos 		if (!oldmode)
    669   1.72  christos 			sd.sd_xx = ldt_info.useable;
    670   1.73  christos 		else
    671   1.73  christos 			sd.sd_xx = 0;
    672   1.70  christos 	}
    673   1.71  christos 	sg = stackgap_init(p, 0);
    674    1.7   mycroft 	sl.start = ldt_info.entry_number;
    675   1.71  christos 	sl.desc = stackgap_alloc(p, &sg, sizeof(sd));
    676    1.7   mycroft 	sl.num = 1;
    677    1.7   mycroft 
    678   1.72  christos 	DPRINTF(("linux_write_ldt: idx=%d, base=0x%lx, limit=0x%x\n",
    679   1.72  christos 	    ldt_info.entry_number, ldt_info.base_addr, ldt_info.limit));
    680    1.7   mycroft 
    681   1.71  christos 	parms = stackgap_alloc(p, &sg, sizeof(sl));
    682    1.7   mycroft 
    683   1.29  christos 	if ((error = copyout(&sd, sl.desc, sizeof(sd))) != 0)
    684    1.7   mycroft 		return (error);
    685   1.29  christos 	if ((error = copyout(&sl, parms, sizeof(sl))) != 0)
    686    1.7   mycroft 		return (error);
    687    1.7   mycroft 
    688   1.85   thorpej 	if ((error = i386_set_ldt(l, parms, retval)) != 0)
    689    1.7   mycroft 		return (error);
    690    1.7   mycroft 
    691    1.7   mycroft 	*retval = 0;
    692    1.7   mycroft 	return (0);
    693    1.7   mycroft }
    694    1.7   mycroft 
    695    1.7   mycroft #endif /* USER_LDT */
    696    1.7   mycroft 
    697    1.6   mycroft int
    698   1.85   thorpej linux_sys_modify_ldt(l, v, retval)
    699   1.85   thorpej 	struct lwp *l;
    700   1.19   thorpej 	void *v;
    701   1.19   thorpej 	register_t *retval;
    702   1.19   thorpej {
    703   1.20   mycroft 	struct linux_sys_modify_ldt_args /* {
    704    1.6   mycroft 		syscallarg(int) func;
    705    1.6   mycroft 		syscallarg(void *) ptr;
    706    1.6   mycroft 		syscallarg(size_t) bytecount;
    707   1.19   thorpej 	} */ *uap = v;
    708    1.6   mycroft 
    709    1.6   mycroft 	switch (SCARG(uap, func)) {
    710    1.7   mycroft #ifdef USER_LDT
    711    1.6   mycroft 	case 0:
    712   1.85   thorpej 		return linux_read_ldt(l, uap, retval);
    713    1.6   mycroft 	case 1:
    714   1.72  christos 		retval[0] = 1;
    715   1.85   thorpej 		return linux_write_ldt(l, uap, retval);
    716   1.72  christos 	case 2:
    717   1.72  christos #ifdef notyet
    718   1.85   thorpej 		return (linux_read_default_ldt(l, uap, retval);
    719   1.72  christos #else
    720   1.72  christos 		return (ENOSYS);
    721   1.72  christos #endif
    722   1.72  christos 	case 0x11:
    723   1.72  christos 		retval[0] = 0;
    724   1.85   thorpej 		return linux_write_ldt(l, uap, retval);
    725    1.7   mycroft #endif /* USER_LDT */
    726    1.7   mycroft 
    727    1.6   mycroft 	default:
    728    1.6   mycroft 		return (ENOSYS);
    729    1.6   mycroft 	}
    730   1.13      fvdl }
    731   1.13      fvdl 
    732   1.13      fvdl /*
    733   1.13      fvdl  * XXX Pathetic hack to make svgalib work. This will fake the major
    734   1.13      fvdl  * device number of an opened VT so that svgalib likes it. grmbl.
    735   1.13      fvdl  * Should probably do it 'wrong the right way' and use a mapping
    736   1.13      fvdl  * array for all major device numbers, and map linux_mknod too.
    737   1.13      fvdl  */
    738   1.13      fvdl dev_t
    739   1.69  christos linux_fakedev(dev, raw)
    740   1.13      fvdl 	dev_t dev;
    741   1.69  christos 	int raw;
    742   1.13      fvdl {
    743   1.69  christos 	if (raw) {
    744   1.41  drochner #if (NWSDISPLAY > 0)
    745   1.79   gehenna 		extern const struct cdevsw wsdisplay_cdevsw;
    746   1.79   gehenna 		if (cdevsw_lookup(dev) == &wsdisplay_cdevsw)
    747   1.69  christos 			return makedev(LINUX_CONS_MAJOR, (minor(dev) + 1));
    748   1.41  drochner #endif
    749   1.69  christos 	}
    750   1.77  jdolecek 
    751   1.77  jdolecek 	return dev;
    752   1.13      fvdl }
    753   1.13      fvdl 
    754   1.49     jhawk #if (NWSDISPLAY > 0)
    755   1.41  drochner /*
    756   1.41  drochner  * That's not complete, but enough to get an X server running.
    757   1.41  drochner  */
    758   1.41  drochner #define NR_KEYS 128
    759   1.61  jdolecek static const u_short plain_map[NR_KEYS] = {
    760   1.41  drochner 	0x0200,	0x001b,	0x0031,	0x0032,	0x0033,	0x0034,	0x0035,	0x0036,
    761   1.41  drochner 	0x0037,	0x0038,	0x0039,	0x0030,	0x002d,	0x003d,	0x007f,	0x0009,
    762   1.41  drochner 	0x0b71,	0x0b77,	0x0b65,	0x0b72,	0x0b74,	0x0b79,	0x0b75,	0x0b69,
    763   1.41  drochner 	0x0b6f,	0x0b70,	0x005b,	0x005d,	0x0201,	0x0702,	0x0b61,	0x0b73,
    764   1.41  drochner 	0x0b64,	0x0b66,	0x0b67,	0x0b68,	0x0b6a,	0x0b6b,	0x0b6c,	0x003b,
    765   1.41  drochner 	0x0027,	0x0060,	0x0700,	0x005c,	0x0b7a,	0x0b78,	0x0b63,	0x0b76,
    766   1.41  drochner 	0x0b62,	0x0b6e,	0x0b6d,	0x002c,	0x002e,	0x002f,	0x0700,	0x030c,
    767   1.41  drochner 	0x0703,	0x0020,	0x0207,	0x0100,	0x0101,	0x0102,	0x0103,	0x0104,
    768   1.41  drochner 	0x0105,	0x0106,	0x0107,	0x0108,	0x0109,	0x0208,	0x0209,	0x0307,
    769   1.41  drochner 	0x0308,	0x0309,	0x030b,	0x0304,	0x0305,	0x0306,	0x030a,	0x0301,
    770   1.41  drochner 	0x0302,	0x0303,	0x0300,	0x0310,	0x0206,	0x0200,	0x003c,	0x010a,
    771   1.41  drochner 	0x010b,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    772   1.41  drochner 	0x030e,	0x0702,	0x030d,	0x001c,	0x0701,	0x0205,	0x0114,	0x0603,
    773   1.41  drochner 	0x0118,	0x0601,	0x0602,	0x0117,	0x0600,	0x0119,	0x0115,	0x0116,
    774   1.41  drochner 	0x011a,	0x010c,	0x010d,	0x011b,	0x011c,	0x0110,	0x0311,	0x011d,
    775   1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    776   1.41  drochner }, shift_map[NR_KEYS] = {
    777   1.41  drochner 	0x0200,	0x001b,	0x0021,	0x0040,	0x0023,	0x0024,	0x0025,	0x005e,
    778   1.41  drochner 	0x0026,	0x002a,	0x0028,	0x0029,	0x005f,	0x002b,	0x007f,	0x0009,
    779   1.41  drochner 	0x0b51,	0x0b57,	0x0b45,	0x0b52,	0x0b54,	0x0b59,	0x0b55,	0x0b49,
    780   1.41  drochner 	0x0b4f,	0x0b50,	0x007b,	0x007d,	0x0201,	0x0702,	0x0b41,	0x0b53,
    781   1.41  drochner 	0x0b44,	0x0b46,	0x0b47,	0x0b48,	0x0b4a,	0x0b4b,	0x0b4c,	0x003a,
    782   1.41  drochner 	0x0022,	0x007e,	0x0700,	0x007c,	0x0b5a,	0x0b58,	0x0b43,	0x0b56,
    783   1.41  drochner 	0x0b42,	0x0b4e,	0x0b4d,	0x003c,	0x003e,	0x003f,	0x0700,	0x030c,
    784   1.41  drochner 	0x0703,	0x0020,	0x0207,	0x010a,	0x010b,	0x010c,	0x010d,	0x010e,
    785   1.41  drochner 	0x010f,	0x0110,	0x0111,	0x0112,	0x0113,	0x0213,	0x0203,	0x0307,
    786   1.41  drochner 	0x0308,	0x0309,	0x030b,	0x0304,	0x0305,	0x0306,	0x030a,	0x0301,
    787   1.41  drochner 	0x0302,	0x0303,	0x0300,	0x0310,	0x0206,	0x0200,	0x003e,	0x010a,
    788   1.41  drochner 	0x010b,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    789   1.41  drochner 	0x030e,	0x0702,	0x030d,	0x0200,	0x0701,	0x0205,	0x0114,	0x0603,
    790   1.41  drochner 	0x020b,	0x0601,	0x0602,	0x0117,	0x0600,	0x020a,	0x0115,	0x0116,
    791   1.41  drochner 	0x011a,	0x010c,	0x010d,	0x011b,	0x011c,	0x0110,	0x0311,	0x011d,
    792   1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    793   1.41  drochner }, altgr_map[NR_KEYS] = {
    794   1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0040,	0x0200,	0x0024,	0x0200,	0x0200,
    795   1.41  drochner 	0x007b,	0x005b,	0x005d,	0x007d,	0x005c,	0x0200,	0x0200,	0x0200,
    796   1.41  drochner 	0x0b71,	0x0b77,	0x0918,	0x0b72,	0x0b74,	0x0b79,	0x0b75,	0x0b69,
    797   1.41  drochner 	0x0b6f,	0x0b70,	0x0200,	0x007e,	0x0201,	0x0702,	0x0914,	0x0b73,
    798   1.41  drochner 	0x0917,	0x0919,	0x0b67,	0x0b68,	0x0b6a,	0x0b6b,	0x0b6c,	0x0200,
    799   1.41  drochner 	0x0200,	0x0200,	0x0700,	0x0200,	0x0b7a,	0x0b78,	0x0916,	0x0b76,
    800   1.41  drochner 	0x0915,	0x0b6e,	0x0b6d,	0x0200,	0x0200,	0x0200,	0x0700,	0x030c,
    801   1.41  drochner 	0x0703,	0x0200,	0x0207,	0x050c,	0x050d,	0x050e,	0x050f,	0x0510,
    802   1.41  drochner 	0x0511,	0x0512,	0x0513,	0x0514,	0x0515,	0x0208,	0x0202,	0x0911,
    803   1.41  drochner 	0x0912,	0x0913,	0x030b,	0x090e,	0x090f,	0x0910,	0x030a,	0x090b,
    804   1.41  drochner 	0x090c,	0x090d,	0x090a,	0x0310,	0x0206,	0x0200,	0x007c,	0x0516,
    805   1.41  drochner 	0x0517,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    806   1.41  drochner 	0x030e,	0x0702,	0x030d,	0x0200,	0x0701,	0x0205,	0x0114,	0x0603,
    807   1.41  drochner 	0x0118,	0x0601,	0x0602,	0x0117,	0x0600,	0x0119,	0x0115,	0x0116,
    808   1.41  drochner 	0x011a,	0x010c,	0x010d,	0x011b,	0x011c,	0x0110,	0x0311,	0x011d,
    809   1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    810   1.41  drochner }, ctrl_map[NR_KEYS] = {
    811   1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0000,	0x001b,	0x001c,	0x001d,	0x001e,
    812   1.41  drochner 	0x001f,	0x007f,	0x0200,	0x0200,	0x001f,	0x0200,	0x0008,	0x0200,
    813   1.41  drochner 	0x0011,	0x0017,	0x0005,	0x0012,	0x0014,	0x0019,	0x0015,	0x0009,
    814   1.41  drochner 	0x000f,	0x0010,	0x001b,	0x001d,	0x0201,	0x0702,	0x0001,	0x0013,
    815   1.41  drochner 	0x0004,	0x0006,	0x0007,	0x0008,	0x000a,	0x000b,	0x000c,	0x0200,
    816   1.41  drochner 	0x0007,	0x0000,	0x0700,	0x001c,	0x001a,	0x0018,	0x0003,	0x0016,
    817   1.41  drochner 	0x0002,	0x000e,	0x000d,	0x0200,	0x020e,	0x007f,	0x0700,	0x030c,
    818   1.41  drochner 	0x0703,	0x0000,	0x0207,	0x0100,	0x0101,	0x0102,	0x0103,	0x0104,
    819   1.41  drochner 	0x0105,	0x0106,	0x0107,	0x0108,	0x0109,	0x0208,	0x0204,	0x0307,
    820   1.41  drochner 	0x0308,	0x0309,	0x030b,	0x0304,	0x0305,	0x0306,	0x030a,	0x0301,
    821   1.41  drochner 	0x0302,	0x0303,	0x0300,	0x0310,	0x0206,	0x0200,	0x0200,	0x010a,
    822   1.41  drochner 	0x010b,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    823   1.41  drochner 	0x030e,	0x0702,	0x030d,	0x001c,	0x0701,	0x0205,	0x0114,	0x0603,
    824   1.41  drochner 	0x0118,	0x0601,	0x0602,	0x0117,	0x0600,	0x0119,	0x0115,	0x0116,
    825   1.41  drochner 	0x011a,	0x010c,	0x010d,	0x011b,	0x011c,	0x0110,	0x0311,	0x011d,
    826   1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    827   1.41  drochner };
    828   1.41  drochner 
    829   1.61  jdolecek const u_short * const linux_keytabs[] = {
    830   1.41  drochner 	plain_map, shift_map, altgr_map, altgr_map, ctrl_map
    831   1.41  drochner };
    832   1.41  drochner #endif
    833   1.41  drochner 
    834   1.52      fvdl static struct biosdisk_info *
    835   1.52      fvdl fd2biosinfo(p, fp)
    836   1.52      fvdl 	struct proc *p;
    837   1.52      fvdl 	struct file *fp;
    838   1.52      fvdl {
    839   1.52      fvdl 	struct vnode *vp;
    840   1.52      fvdl 	const char *blkname;
    841   1.52      fvdl 	char diskname[16];
    842   1.52      fvdl 	int i;
    843   1.52      fvdl 	struct nativedisk_info *nip;
    844   1.52      fvdl 	struct disklist *dl = i386_alldisks;
    845   1.52      fvdl 
    846   1.52      fvdl 	if (fp->f_type != DTYPE_VNODE)
    847   1.52      fvdl 		return NULL;
    848   1.52      fvdl 	vp = (struct vnode *)fp->f_data;
    849   1.52      fvdl 
    850   1.52      fvdl 	if (vp->v_type != VBLK)
    851   1.52      fvdl 		return NULL;
    852   1.52      fvdl 
    853   1.79   gehenna 	blkname = devsw_blk2name(major(vp->v_rdev));
    854   1.52      fvdl 	snprintf(diskname, sizeof diskname, "%s%u", blkname,
    855   1.52      fvdl 	    DISKUNIT(vp->v_rdev));
    856   1.52      fvdl 
    857   1.52      fvdl 	for (i = 0; i < dl->dl_nnativedisks; i++) {
    858   1.52      fvdl 		nip = &dl->dl_nativedisks[i];
    859   1.52      fvdl 		if (strcmp(diskname, nip->ni_devname))
    860   1.52      fvdl 			continue;
    861   1.52      fvdl 		if (nip->ni_nmatches != 0)
    862   1.52      fvdl 			return &dl->dl_biosdisks[nip->ni_biosmatches[0]];
    863   1.52      fvdl 	}
    864   1.52      fvdl 
    865   1.52      fvdl 	return NULL;
    866   1.52      fvdl }
    867   1.52      fvdl 
    868   1.52      fvdl 
    869   1.13      fvdl /*
    870   1.13      fvdl  * We come here in a last attempt to satisfy a Linux ioctl() call
    871   1.13      fvdl  */
    872   1.13      fvdl int
    873   1.89      fvdl linux_machdepioctl(p, v, retval)
    874   1.89      fvdl 	struct proc *p;
    875   1.19   thorpej 	void *v;
    876   1.19   thorpej 	register_t *retval;
    877   1.19   thorpej {
    878   1.20   mycroft 	struct linux_sys_ioctl_args /* {
    879   1.13      fvdl 		syscallarg(int) fd;
    880   1.13      fvdl 		syscallarg(u_long) com;
    881   1.13      fvdl 		syscallarg(caddr_t) data;
    882   1.19   thorpej 	} */ *uap = v;
    883   1.29  christos 	struct sys_ioctl_args bia;
    884   1.15      fvdl 	u_long com;
    885   1.52      fvdl 	int error, error1;
    886   1.50     veego #if (NWSDISPLAY > 0)
    887   1.13      fvdl 	struct vt_mode lvt;
    888   1.13      fvdl 	caddr_t bvtp, sg;
    889   1.41  drochner 	struct kbentry kbe;
    890   1.41  drochner #endif
    891   1.52      fvdl 	struct linux_hd_geometry hdg;
    892   1.52      fvdl 	struct linux_hd_big_geometry hdg_big;
    893   1.52      fvdl 	struct biosdisk_info *bip;
    894   1.52      fvdl 	struct filedesc *fdp;
    895   1.52      fvdl 	struct file *fp;
    896   1.52      fvdl 	int fd;
    897   1.52      fvdl 	struct disklabel label, *labp;
    898   1.52      fvdl 	struct partinfo partp;
    899   1.89      fvdl 	int (*ioctlf)(struct file *, u_long, void *, struct proc *);
    900   1.52      fvdl 	u_long start, biostotal, realtotal;
    901   1.52      fvdl 	u_char heads, sectors;
    902   1.52      fvdl 	u_int cylinders;
    903   1.55      fvdl 	struct ioctl_pt pt;
    904   1.13      fvdl 
    905   1.52      fvdl 	fd = SCARG(uap, fd);
    906   1.52      fvdl 	SCARG(&bia, fd) = fd;
    907   1.13      fvdl 	SCARG(&bia, data) = SCARG(uap, data);
    908   1.13      fvdl 	com = SCARG(uap, com);
    909   1.13      fvdl 
    910   1.52      fvdl 	fdp = p->p_fd;
    911   1.52      fvdl 
    912   1.64   thorpej 	if ((fp = fd_getfile(fdp, fd)) == NULL)
    913   1.53   thorpej 		return (EBADF);
    914   1.52      fvdl 
    915   1.86      yamt 	FILE_USE(fp);
    916   1.86      yamt 
    917   1.13      fvdl 	switch (com) {
    918   1.50     veego #if (NWSDISPLAY > 0)
    919   1.13      fvdl 	case LINUX_KDGKBMODE:
    920   1.21      fvdl 		com = KDGKBMODE;
    921   1.21      fvdl 		break;
    922   1.13      fvdl 	case LINUX_KDSKBMODE:
    923   1.13      fvdl 		com = KDSKBMODE;
    924   1.13      fvdl 		if ((unsigned)SCARG(uap, data) == LINUX_K_MEDIUMRAW)
    925   1.13      fvdl 			SCARG(&bia, data) = (caddr_t)K_RAW;
    926   1.13      fvdl 		break;
    927   1.59      fvdl 	case LINUX_KIOCSOUND:
    928   1.59      fvdl 		SCARG(&bia, data) =
    929   1.59      fvdl 		    (caddr_t)(((unsigned long)SCARG(&bia, data)) & 0xffff);
    930   1.59      fvdl 		/* fall through */
    931   1.13      fvdl 	case LINUX_KDMKTONE:
    932   1.13      fvdl 		com = KDMKTONE;
    933   1.13      fvdl 		break;
    934   1.13      fvdl 	case LINUX_KDSETMODE:
    935   1.13      fvdl 		com = KDSETMODE;
    936   1.58      fvdl 		break;
    937   1.58      fvdl 	case LINUX_KDGETMODE:
    938   1.58      fvdl 		/* KD_* values are equal to the wscons numbers */
    939   1.58      fvdl 		com = WSDISPLAYIO_GMODE;
    940   1.13      fvdl 		break;
    941   1.13      fvdl 	case LINUX_KDENABIO:
    942   1.13      fvdl 		com = KDENABIO;
    943   1.13      fvdl 		break;
    944   1.13      fvdl 	case LINUX_KDDISABIO:
    945   1.13      fvdl 		com = KDDISABIO;
    946   1.13      fvdl 		break;
    947   1.13      fvdl 	case LINUX_KDGETLED:
    948   1.13      fvdl 		com = KDGETLED;
    949   1.13      fvdl 		break;
    950   1.13      fvdl 	case LINUX_KDSETLED:
    951   1.13      fvdl 		com = KDSETLED;
    952   1.13      fvdl 		break;
    953   1.13      fvdl 	case LINUX_VT_OPENQRY:
    954   1.13      fvdl 		com = VT_OPENQRY;
    955   1.13      fvdl 		break;
    956   1.13      fvdl 	case LINUX_VT_GETMODE:
    957   1.13      fvdl 		SCARG(&bia, com) = VT_GETMODE;
    958   1.85   thorpej 		/* XXX NJWLWP */
    959   1.85   thorpej 		if ((error = sys_ioctl(curlwp, &bia, retval)))
    960   1.86      yamt 			goto out;
    961   1.13      fvdl 		if ((error = copyin(SCARG(uap, data), (caddr_t)&lvt,
    962   1.13      fvdl 		    sizeof (struct vt_mode))))
    963   1.86      yamt 			goto out;
    964   1.74  christos 		lvt.relsig = native_to_linux_signo[lvt.relsig];
    965   1.74  christos 		lvt.acqsig = native_to_linux_signo[lvt.acqsig];
    966   1.74  christos 		lvt.frsig = native_to_linux_signo[lvt.frsig];
    967   1.86      yamt 		error = copyout((caddr_t)&lvt, SCARG(uap, data),
    968   1.13      fvdl 		    sizeof (struct vt_mode));
    969   1.86      yamt 		goto out;
    970   1.13      fvdl 	case LINUX_VT_SETMODE:
    971   1.13      fvdl 		com = VT_SETMODE;
    972   1.13      fvdl 		if ((error = copyin(SCARG(uap, data), (caddr_t)&lvt,
    973   1.13      fvdl 		    sizeof (struct vt_mode))))
    974   1.86      yamt 			goto out;
    975   1.74  christos 		lvt.relsig = linux_to_native_signo[lvt.relsig];
    976   1.74  christos 		lvt.acqsig = linux_to_native_signo[lvt.acqsig];
    977   1.74  christos 		lvt.frsig = linux_to_native_signo[lvt.frsig];
    978   1.71  christos 		sg = stackgap_init(p, 0);
    979   1.71  christos 		bvtp = stackgap_alloc(p, &sg, sizeof (struct vt_mode));
    980   1.13      fvdl 		if ((error = copyout(&lvt, bvtp, sizeof (struct vt_mode))))
    981   1.86      yamt 			goto out;
    982   1.13      fvdl 		SCARG(&bia, data) = bvtp;
    983   1.13      fvdl 		break;
    984   1.52      fvdl 	case LINUX_VT_DISALLOCATE:
    985   1.52      fvdl 		/* XXX should use WSDISPLAYIO_DELSCREEN */
    986   1.86      yamt 		error = 0;
    987   1.86      yamt 		goto out;
    988   1.13      fvdl 	case LINUX_VT_RELDISP:
    989   1.13      fvdl 		com = VT_RELDISP;
    990   1.13      fvdl 		break;
    991   1.13      fvdl 	case LINUX_VT_ACTIVATE:
    992   1.13      fvdl 		com = VT_ACTIVATE;
    993   1.13      fvdl 		break;
    994   1.13      fvdl 	case LINUX_VT_WAITACTIVE:
    995   1.13      fvdl 		com = VT_WAITACTIVE;
    996   1.13      fvdl 		break;
    997   1.41  drochner 	case LINUX_VT_GETSTATE:
    998   1.41  drochner 		com = VT_GETSTATE;
    999   1.41  drochner 		break;
   1000   1.41  drochner 	case LINUX_KDGKBTYPE:
   1001   1.91  jdolecek 	    {
   1002   1.91  jdolecek 		static const u_int8_t kb101 = KB_101;
   1003   1.91  jdolecek 
   1004   1.41  drochner 		/* This is what Linux does. */
   1005   1.91  jdolecek 		error = copyout(&kb101, SCARG(uap, data), 1);
   1006   1.86      yamt 		goto out;
   1007   1.91  jdolecek 	    }
   1008   1.41  drochner 	case LINUX_KDGKBENT:
   1009   1.41  drochner 		/*
   1010   1.41  drochner 		 * The Linux KDGKBENT ioctl is different from the
   1011   1.41  drochner 		 * SYSV original. So we handle it in machdep code.
   1012   1.41  drochner 		 * XXX We should use keyboard mapping information
   1013   1.41  drochner 		 * from wsdisplay, but this would be expensive.
   1014   1.41  drochner 		 */
   1015   1.41  drochner 		if ((error = copyin(SCARG(uap, data), &kbe,
   1016   1.41  drochner 				    sizeof(struct kbentry))))
   1017   1.86      yamt 			goto out;
   1018   1.41  drochner 		if (kbe.kb_table >= sizeof(linux_keytabs) / sizeof(u_short *)
   1019   1.86      yamt 		    || kbe.kb_index >= NR_KEYS) {
   1020   1.86      yamt 			error = EINVAL;
   1021   1.86      yamt 			goto out;
   1022   1.86      yamt 		}
   1023   1.41  drochner 		kbe.kb_value = linux_keytabs[kbe.kb_table][kbe.kb_index];
   1024   1.86      yamt 		error = copyout(&kbe, SCARG(uap, data),
   1025   1.86      yamt 				sizeof(struct kbentry));
   1026   1.86      yamt 		goto out;
   1027   1.54      fvdl #endif
   1028   1.52      fvdl 	case LINUX_HDIO_GETGEO:
   1029   1.52      fvdl 	case LINUX_HDIO_GETGEO_BIG:
   1030   1.52      fvdl 		/*
   1031   1.52      fvdl 		 * Try to mimic Linux behaviour: return the BIOS geometry
   1032   1.52      fvdl 		 * if possible (extending its # of cylinders if it's beyond
   1033   1.52      fvdl 		 * the 1023 limit), fall back to the MI geometry (i.e.
   1034   1.52      fvdl 		 * the real geometry) if not found, by returning an
   1035   1.52      fvdl 		 * error. See common/linux_hdio.c
   1036   1.52      fvdl 		 */
   1037   1.52      fvdl 		bip = fd2biosinfo(p, fp);
   1038   1.52      fvdl 		ioctlf = fp->f_ops->fo_ioctl;
   1039   1.89      fvdl 		error = ioctlf(fp, DIOCGDEFLABEL, (caddr_t)&label, p);
   1040   1.89      fvdl 		error1 = ioctlf(fp, DIOCGPART, (caddr_t)&partp, p);
   1041   1.86      yamt 		if (error != 0 && error1 != 0) {
   1042   1.86      yamt 			error = error1;
   1043   1.86      yamt 			goto out;
   1044   1.86      yamt 		}
   1045   1.52      fvdl 		labp = error != 0 ? &label : partp.disklab;
   1046   1.52      fvdl 		start = error1 != 0 ? partp.part->p_offset : 0;
   1047   1.52      fvdl 		if (bip != NULL && bip->bi_head != 0 && bip->bi_sec != 0
   1048   1.52      fvdl 		    && bip->bi_cyl != 0) {
   1049   1.52      fvdl 			heads = bip->bi_head;
   1050   1.52      fvdl 			sectors = bip->bi_sec;
   1051   1.52      fvdl 			cylinders = bip->bi_cyl;
   1052   1.52      fvdl 			biostotal = heads * sectors * cylinders;
   1053   1.52      fvdl 			realtotal = labp->d_ntracks * labp->d_nsectors *
   1054   1.52      fvdl 			    labp->d_ncylinders;
   1055   1.52      fvdl 			if (realtotal > biostotal)
   1056   1.52      fvdl 				cylinders = realtotal / (heads * sectors);
   1057   1.52      fvdl 		} else {
   1058   1.52      fvdl 			heads = labp->d_ntracks;
   1059   1.52      fvdl 			cylinders = labp->d_ncylinders;
   1060   1.52      fvdl 			sectors = labp->d_nsectors;
   1061   1.52      fvdl 		}
   1062   1.52      fvdl 		if (com == LINUX_HDIO_GETGEO) {
   1063   1.52      fvdl 			hdg.start = start;
   1064   1.52      fvdl 			hdg.heads = heads;
   1065   1.52      fvdl 			hdg.cylinders = cylinders;
   1066   1.52      fvdl 			hdg.sectors = sectors;
   1067   1.86      yamt 			error = copyout(&hdg, SCARG(uap, data), sizeof hdg);
   1068   1.86      yamt 			goto out;
   1069   1.52      fvdl 		} else {
   1070   1.52      fvdl 			hdg_big.start = start;
   1071   1.52      fvdl 			hdg_big.heads = heads;
   1072   1.52      fvdl 			hdg_big.cylinders = cylinders;
   1073   1.52      fvdl 			hdg_big.sectors = sectors;
   1074   1.86      yamt 			error = copyout(&hdg_big, SCARG(uap, data),
   1075   1.52      fvdl 			    sizeof hdg_big);
   1076   1.86      yamt 			goto out;
   1077   1.52      fvdl 		}
   1078   1.52      fvdl 
   1079   1.13      fvdl 	default:
   1080   1.54      fvdl 		/*
   1081   1.55      fvdl 		 * Unknown to us. If it's on a device, just pass it through
   1082   1.55      fvdl 		 * using PTIOCLINUX, the device itself might be able to
   1083   1.55      fvdl 		 * make some sense of it.
   1084   1.57      fvdl 		 * XXX hack: if the function returns EJUSTRETURN,
   1085   1.57      fvdl 		 * it has stuffed a sysctl return value in pt.data.
   1086   1.54      fvdl 		 */
   1087   1.55      fvdl 		FILE_USE(fp);
   1088   1.55      fvdl 		ioctlf = fp->f_ops->fo_ioctl;
   1089   1.55      fvdl 		pt.com = SCARG(uap, com);
   1090   1.55      fvdl 		pt.data = SCARG(uap, data);
   1091   1.89      fvdl 		error = ioctlf(fp, PTIOCLINUX, (caddr_t)&pt, p);
   1092   1.89      fvdl 		FILE_UNUSE(fp, p);
   1093   1.57      fvdl 		if (error == EJUSTRETURN) {
   1094   1.57      fvdl 			retval[0] = (register_t)pt.data;
   1095   1.57      fvdl 			error = 0;
   1096   1.57      fvdl 		}
   1097   1.55      fvdl 
   1098   1.60      fvdl 		if (error == ENOTTY)
   1099   1.72  christos 			DPRINTF(("linux_machdepioctl: invalid ioctl %08lx\n",
   1100   1.72  christos 			    com));
   1101   1.86      yamt 		goto out;
   1102   1.13      fvdl 	}
   1103   1.13      fvdl 	SCARG(&bia, com) = com;
   1104   1.85   thorpej 	/* XXX NJWLWP */
   1105   1.86      yamt 	error = sys_ioctl(curlwp, &bia, retval);
   1106   1.86      yamt out:
   1107   1.89      fvdl 	FILE_UNUSE(fp ,p);
   1108   1.86      yamt 	return error;
   1109   1.13      fvdl }
   1110   1.13      fvdl 
   1111   1.13      fvdl /*
   1112   1.13      fvdl  * Set I/O permissions for a process. Just set the maximum level
   1113   1.13      fvdl  * right away (ignoring the argument), otherwise we would have
   1114   1.13      fvdl  * to rely on I/O permission maps, which are not implemented.
   1115   1.13      fvdl  */
   1116   1.13      fvdl int
   1117   1.85   thorpej linux_sys_iopl(l, v, retval)
   1118   1.85   thorpej 	struct lwp *l;
   1119   1.19   thorpej 	void *v;
   1120   1.19   thorpej 	register_t *retval;
   1121   1.19   thorpej {
   1122   1.29  christos #if 0
   1123   1.20   mycroft 	struct linux_sys_iopl_args /* {
   1124   1.13      fvdl 		syscallarg(int) level;
   1125   1.19   thorpej 	} */ *uap = v;
   1126   1.29  christos #endif
   1127   1.85   thorpej 	struct proc *p = l->l_proc;
   1128   1.85   thorpej 	struct trapframe *fp = l->l_md.md_regs;
   1129   1.13      fvdl 
   1130   1.13      fvdl 	if (suser(p->p_ucred, &p->p_acflag) != 0)
   1131   1.13      fvdl 		return EPERM;
   1132   1.13      fvdl 	fp->tf_eflags |= PSL_IOPL;
   1133   1.13      fvdl 	*retval = 0;
   1134   1.13      fvdl 	return 0;
   1135   1.13      fvdl }
   1136   1.13      fvdl 
   1137   1.13      fvdl /*
   1138   1.13      fvdl  * See above. If a root process tries to set access to an I/O port,
   1139   1.13      fvdl  * just let it have the whole range.
   1140   1.13      fvdl  */
   1141   1.13      fvdl int
   1142   1.85   thorpej linux_sys_ioperm(l, v, retval)
   1143   1.85   thorpej 	struct lwp *l;
   1144   1.19   thorpej 	void *v;
   1145   1.19   thorpej 	register_t *retval;
   1146   1.19   thorpej {
   1147   1.20   mycroft 	struct linux_sys_ioperm_args /* {
   1148   1.13      fvdl 		syscallarg(unsigned int) lo;
   1149   1.13      fvdl 		syscallarg(unsigned int) hi;
   1150   1.13      fvdl 		syscallarg(int) val;
   1151   1.19   thorpej 	} */ *uap = v;
   1152   1.85   thorpej 	struct proc *p = l->l_proc;
   1153   1.85   thorpej 	struct trapframe *fp = l->l_md.md_regs;
   1154   1.13      fvdl 
   1155   1.13      fvdl 	if (suser(p->p_ucred, &p->p_acflag) != 0)
   1156   1.13      fvdl 		return EPERM;
   1157   1.13      fvdl 	if (SCARG(uap, val))
   1158   1.13      fvdl 		fp->tf_eflags |= PSL_IOPL;
   1159   1.13      fvdl 	*retval = 0;
   1160   1.92  christos 	return 0;
   1161   1.92  christos }
   1162   1.92  christos 
   1163   1.92  christos int
   1164   1.92  christos linux_exec_setup_stack(struct proc *p, struct exec_package *epp)
   1165   1.92  christos {
   1166   1.92  christos 	u_long max_stack_size;
   1167   1.92  christos 	u_long access_linear_min, access_size;
   1168   1.92  christos 	u_long noaccess_linear_min, noaccess_size;
   1169   1.92  christos 
   1170   1.92  christos #ifndef	USRSTACK32
   1171   1.92  christos #define USRSTACK32	(0x00000000ffffffffL&~PGOFSET)
   1172   1.92  christos #endif
   1173   1.92  christos 
   1174   1.92  christos 	if (epp->ep_flags & EXEC_32) {
   1175   1.92  christos 		epp->ep_minsaddr = USRSTACK32;
   1176   1.92  christos 		max_stack_size = MAXSSIZ;
   1177   1.92  christos 	} else {
   1178   1.92  christos 		epp->ep_minsaddr = USRSTACK;
   1179   1.92  christos 		max_stack_size = MAXSSIZ;
   1180   1.92  christos 	}
   1181   1.92  christos 
   1182   1.92  christos 	if (epp->ep_minsaddr > LINUX_USRSTACK)
   1183   1.92  christos 		epp->ep_minsaddr = LINUX_USRSTACK;
   1184   1.93  christos #ifdef DEBUG_LINUX
   1185   1.92  christos 	else {
   1186   1.92  christos 		/*
   1187   1.92  christos 		 * Someone needs to make KERNBASE and TEXTADDR
   1188   1.93  christos 		 * java versions < 1.4.2 need the stack to be
   1189   1.93  christos 		 * at 0xC0000000
   1190   1.92  christos 		 */
   1191   1.92  christos 		uprintf("Cannot setup stack to 0xC0000000, "
   1192   1.92  christos 		    "java will not work properly\n");
   1193   1.92  christos 	}
   1194   1.92  christos #endif
   1195   1.92  christos 	epp->ep_maxsaddr = (u_long)STACK_GROW(epp->ep_minsaddr,
   1196   1.92  christos 		max_stack_size);
   1197   1.92  christos 	epp->ep_ssize = p->p_rlimit[RLIMIT_STACK].rlim_cur;
   1198   1.92  christos 
   1199   1.92  christos 	/*
   1200   1.92  christos 	 * set up commands for stack.  note that this takes *two*, one to
   1201   1.92  christos 	 * map the part of the stack which we can access, and one to map
   1202   1.92  christos 	 * the part which we can't.
   1203   1.92  christos 	 *
   1204   1.92  christos 	 * arguably, it could be made into one, but that would require the
   1205   1.92  christos 	 * addition of another mapping proc, which is unnecessary
   1206   1.92  christos 	 */
   1207   1.92  christos 	access_size = epp->ep_ssize;
   1208   1.92  christos 	access_linear_min = (u_long)STACK_ALLOC(epp->ep_minsaddr, access_size);
   1209   1.92  christos 	noaccess_size = max_stack_size - access_size;
   1210   1.92  christos 	noaccess_linear_min = (u_long)STACK_ALLOC(STACK_GROW(epp->ep_minsaddr,
   1211   1.92  christos 	    access_size), noaccess_size);
   1212  1.100  christos 	if (noaccess_size > 0) {
   1213  1.100  christos 		NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, noaccess_size,
   1214  1.100  christos 		    noaccess_linear_min, NULLVP, 0, VM_PROT_NONE);
   1215  1.100  christos 	}
   1216  1.100  christos 	KASSERT(access_size > 0);
   1217   1.92  christos 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, access_size,
   1218  1.100  christos 	    access_linear_min, NULLVP, 0, VM_PROT_READ | VM_PROT_WRITE);
   1219   1.92  christos 
   1220   1.13      fvdl 	return 0;
   1221    1.1      fvdl }
   1222