Home | History | Annotate | Line # | Download | only in i386
linux_machdep.c revision 1.99
      1  1.99  christos /*	$NetBSD: linux_machdep.c,v 1.99 2003/09/25 22:00:02 christos 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.99  christos __KERNEL_RCSID(0, "$NetBSD: linux_machdep.c,v 1.99 2003/09/25 22:00:02 christos 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.85   thorpej 	l->l_md.md_flags &= ~MDP_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.99  christos /*###404 [cc] warning: passing arg 3 of `linux_save_sigcontext' discards qualifiers from pointer target type%%%*/
    405  1.90  christos 	linux_save_sigcontext(l, tf, mask, &frame.sf_sc);
    406  1.42   mycroft 
    407   1.1      fvdl 	if (copyout(&frame, fp, sizeof(frame)) != 0) {
    408   1.1      fvdl 		/*
    409   1.1      fvdl 		 * Process has trashed its stack; give it an illegal
    410   1.1      fvdl 		 * instruction to halt it in its tracks.
    411   1.1      fvdl 		 */
    412  1.85   thorpej 		sigexit(l, SIGILL);
    413   1.1      fvdl 		/* NOTREACHED */
    414   1.1      fvdl 	}
    415   1.1      fvdl 
    416   1.1      fvdl 	/*
    417   1.1      fvdl 	 * Build context to run handler in.
    418   1.1      fvdl 	 */
    419  1.75  christos 	tf->tf_gs = GSEL(GUDATA_SEL, SEL_UPL);
    420  1.75  christos 	tf->tf_fs = GSEL(GUDATA_SEL, SEL_UPL);
    421  1.26   mycroft 	tf->tf_es = GSEL(GUDATA_SEL, SEL_UPL);
    422  1.26   mycroft 	tf->tf_ds = GSEL(GUDATA_SEL, SEL_UPL);
    423  1.56  jdolecek 	tf->tf_eip = (int)p->p_sigctx.ps_sigcode;
    424  1.95       chs 	tf->tf_cs = GSEL(GUCODEBIG_SEL, SEL_UPL);
    425  1.28   mycroft 	tf->tf_eflags &= ~(PSL_T|PSL_VM|PSL_AC);
    426  1.26   mycroft 	tf->tf_esp = (int)fp;
    427  1.23   mycroft 	tf->tf_ss = GSEL(GUDATA_SEL, SEL_UPL);
    428  1.42   mycroft 
    429  1.42   mycroft 	/* Remember that we're now on the signal stack. */
    430  1.66  jdolecek 	if (onstack)
    431  1.82  christos 		sas->ss_flags |= SS_ONSTACK;
    432   1.1      fvdl }
    433   1.1      fvdl 
    434   1.1      fvdl /*
    435   1.1      fvdl  * System call to cleanup state after a signal
    436   1.1      fvdl  * has been taken.  Reset signal mask and
    437   1.1      fvdl  * stack state from context left by sendsig (above).
    438   1.1      fvdl  * Return to previous pc and psl as specified by
    439   1.1      fvdl  * context left by sendsig. Check carefully to
    440   1.1      fvdl  * make sure that the user has not modified the
    441   1.1      fvdl  * psl to gain improper privileges or to cause
    442   1.1      fvdl  * a machine fault.
    443   1.1      fvdl  */
    444  1.43       erh int
    445  1.85   thorpej linux_sys_rt_sigreturn(l, v, retval)
    446  1.85   thorpej 	struct lwp *l;
    447  1.43       erh 	void *v;
    448  1.43       erh 	register_t *retval;
    449  1.43       erh {
    450  1.90  christos 	struct linux_sys_rt_sigreturn_args /* {
    451  1.90  christos 		syscallarg(struct linux_ucontext *) ucp;
    452  1.90  christos 	} */ *uap = v;
    453  1.90  christos 	struct linux_ucontext context, *ucp = SCARG(uap, ucp);
    454  1.90  christos 	int error;
    455  1.90  christos 
    456  1.90  christos 	/*
    457  1.90  christos 	 * The trampoline code hands us the context.
    458  1.90  christos 	 * It is unsafe to keep track of it ourselves, in the event that a
    459  1.90  christos 	 * program jumps out of a signal handler.
    460  1.90  christos 	 */
    461  1.90  christos 	if ((error = copyin(ucp, &context, sizeof(*ucp))) != 0)
    462  1.90  christos 		return error;
    463  1.90  christos 
    464  1.90  christos 	/* XXX XAX we can do better here by using more of the ucontext */
    465  1.90  christos 	return linux_restore_sigcontext(l, &context.uc_mcontext, retval);
    466  1.43       erh }
    467  1.43       erh 
    468   1.1      fvdl int
    469  1.85   thorpej linux_sys_sigreturn(l, v, retval)
    470  1.85   thorpej 	struct lwp *l;
    471  1.19   thorpej 	void *v;
    472  1.19   thorpej 	register_t *retval;
    473  1.19   thorpej {
    474  1.20   mycroft 	struct linux_sys_sigreturn_args /* {
    475   1.1      fvdl 		syscallarg(struct linux_sigcontext *) scp;
    476  1.19   thorpej 	} */ *uap = v;
    477  1.90  christos 	struct linux_sigcontext context, *scp = SCARG(uap, scp);
    478  1.90  christos 	int error;
    479   1.1      fvdl 
    480   1.1      fvdl 	/*
    481   1.1      fvdl 	 * The trampoline code hands us the context.
    482   1.1      fvdl 	 * It is unsafe to keep track of it ourselves, in the event that a
    483   1.1      fvdl 	 * program jumps out of a signal handler.
    484   1.1      fvdl 	 */
    485  1.90  christos 	if ((error = copyin((caddr_t)scp, &context, sizeof(*scp))) != 0)
    486  1.90  christos 		return error;
    487  1.90  christos 	return linux_restore_sigcontext(l, &context, retval);
    488  1.90  christos }
    489   1.1      fvdl 
    490  1.90  christos static int
    491  1.90  christos linux_restore_sigcontext(l, scp, retval)
    492  1.90  christos 	struct lwp *l;
    493  1.90  christos 	struct linux_sigcontext *scp;
    494  1.90  christos 	register_t *retval;
    495  1.90  christos {
    496  1.90  christos 	struct proc *p = l->l_proc;
    497  1.90  christos 	struct sigaltstack *sas = &p->p_sigctx.ps_sigstk;
    498  1.90  christos 	struct trapframe *tf;
    499  1.90  christos 	sigset_t mask;
    500  1.90  christos 	ssize_t ss_gap;
    501  1.42   mycroft 	/* Restore register context. */
    502  1.85   thorpej 	tf = l->l_md.md_regs;
    503  1.83  christos 
    504  1.83  christos 	DPRINTF(("sigreturn enter esp=%x eip=%x\n", tf->tf_esp, tf->tf_eip));
    505   1.4   mycroft #ifdef VM86
    506  1.90  christos 	if (scp->sc_eflags & PSL_VM) {
    507  1.94   hannken 		void syscall_vm86 __P((struct trapframe *));
    508  1.83  christos 
    509  1.90  christos 		tf->tf_vm86_gs = scp->sc_gs;
    510  1.90  christos 		tf->tf_vm86_fs = scp->sc_fs;
    511  1.90  christos 		tf->tf_vm86_es = scp->sc_es;
    512  1.90  christos 		tf->tf_vm86_ds = scp->sc_ds;
    513  1.90  christos 		set_vflags(l, scp->sc_eflags);
    514  1.83  christos 		p->p_md.md_syscall = syscall_vm86;
    515   1.4   mycroft 	} else
    516   1.4   mycroft #endif
    517   1.4   mycroft 	{
    518  1.26   mycroft 		/*
    519  1.26   mycroft 		 * Check for security violations.  If we're returning to
    520  1.26   mycroft 		 * protected mode, the CPU will validate the segment registers
    521  1.26   mycroft 		 * automatically and generate a trap on violations.  We handle
    522  1.26   mycroft 		 * the trap, rather than doing all of the checking here.
    523  1.26   mycroft 		 */
    524  1.90  christos 		if (((scp->sc_eflags ^ tf->tf_eflags) & PSL_USERSTATIC) != 0 ||
    525  1.90  christos 		    !USERMODE(scp->sc_cs, scp->sc_eflags))
    526  1.83  christos 			return EINVAL;
    527  1.26   mycroft 
    528  1.90  christos 		tf->tf_gs = scp->sc_gs;
    529  1.90  christos 		tf->tf_fs = scp->sc_fs;
    530  1.90  christos 		tf->tf_es = scp->sc_es;
    531  1.90  christos 		tf->tf_ds = scp->sc_ds;
    532  1.83  christos #ifdef VM86
    533  1.83  christos 		if (tf->tf_eflags & PSL_VM)
    534  1.83  christos 			(*p->p_emul->e_syscall_intern)(p);
    535  1.83  christos #endif
    536  1.90  christos 		tf->tf_eflags = scp->sc_eflags;
    537   1.4   mycroft 	}
    538  1.90  christos 	tf->tf_edi = scp->sc_edi;
    539  1.90  christos 	tf->tf_esi = scp->sc_esi;
    540  1.90  christos 	tf->tf_ebp = scp->sc_ebp;
    541  1.90  christos 	tf->tf_ebx = scp->sc_ebx;
    542  1.90  christos 	tf->tf_edx = scp->sc_edx;
    543  1.90  christos 	tf->tf_ecx = scp->sc_ecx;
    544  1.90  christos 	tf->tf_eax = scp->sc_eax;
    545  1.90  christos 	tf->tf_eip = scp->sc_eip;
    546  1.90  christos 	tf->tf_cs = scp->sc_cs;
    547  1.90  christos 	tf->tf_esp = scp->sc_esp_at_signal;
    548  1.90  christos 	tf->tf_ss = scp->sc_ss;
    549  1.26   mycroft 
    550  1.42   mycroft 	/* Restore signal stack. */
    551  1.66  jdolecek 	/*
    552  1.66  jdolecek 	 * Linux really does it this way; it doesn't have space in sigframe
    553  1.66  jdolecek 	 * to save the onstack flag.
    554  1.66  jdolecek 	 */
    555  1.66  jdolecek 	ss_gap = (ssize_t)
    556  1.90  christos 	    ((caddr_t) scp->sc_esp_at_signal - (caddr_t) sas->ss_sp);
    557  1.82  christos 	if (ss_gap >= 0 && ss_gap < sas->ss_size)
    558  1.82  christos 		sas->ss_flags |= SS_ONSTACK;
    559  1.66  jdolecek 	else
    560  1.82  christos 		sas->ss_flags &= ~SS_ONSTACK;
    561  1.42   mycroft 
    562  1.42   mycroft 	/* Restore signal mask. */
    563  1.90  christos 	linux_old_to_native_sigset(&mask, &scp->sc_mask);
    564  1.42   mycroft 	(void) sigprocmask1(p, SIG_SETMASK, &mask, 0);
    565  1.83  christos 	DPRINTF(("sigreturn exit esp=%x eip=%x\n", tf->tf_esp, tf->tf_eip));
    566  1.83  christos 	return EJUSTRETURN;
    567   1.6   mycroft }
    568   1.6   mycroft 
    569   1.7   mycroft #ifdef USER_LDT
    570   1.7   mycroft 
    571   1.7   mycroft int
    572  1.85   thorpej linux_read_ldt(l, uap, retval)
    573  1.85   thorpej 	struct lwp *l;
    574  1.20   mycroft 	struct linux_sys_modify_ldt_args /* {
    575   1.7   mycroft 		syscallarg(int) func;
    576   1.7   mycroft 		syscallarg(void *) ptr;
    577   1.7   mycroft 		syscallarg(size_t) bytecount;
    578   1.7   mycroft 	} */ *uap;
    579   1.7   mycroft 	register_t *retval;
    580   1.7   mycroft {
    581  1.85   thorpej 	struct proc *p = l->l_proc;
    582   1.7   mycroft 	struct i386_get_ldt_args gl;
    583   1.7   mycroft 	int error;
    584   1.7   mycroft 	caddr_t sg;
    585   1.7   mycroft 	char *parms;
    586   1.7   mycroft 
    587  1.72  christos 	DPRINTF(("linux_read_ldt!"));
    588  1.71  christos 	sg = stackgap_init(p, 0);
    589   1.7   mycroft 
    590   1.7   mycroft 	gl.start = 0;
    591   1.7   mycroft 	gl.desc = SCARG(uap, ptr);
    592   1.7   mycroft 	gl.num = SCARG(uap, bytecount) / sizeof(union descriptor);
    593   1.7   mycroft 
    594  1.71  christos 	parms = stackgap_alloc(p, &sg, sizeof(gl));
    595   1.7   mycroft 
    596  1.29  christos 	if ((error = copyout(&gl, parms, sizeof(gl))) != 0)
    597   1.7   mycroft 		return (error);
    598   1.7   mycroft 
    599  1.85   thorpej 	if ((error = i386_get_ldt(l, parms, retval)) != 0)
    600   1.7   mycroft 		return (error);
    601   1.7   mycroft 
    602   1.7   mycroft 	*retval *= sizeof(union descriptor);
    603   1.7   mycroft 	return (0);
    604   1.7   mycroft }
    605   1.7   mycroft 
    606   1.7   mycroft struct linux_ldt_info {
    607   1.7   mycroft 	u_int entry_number;
    608   1.7   mycroft 	u_long base_addr;
    609   1.7   mycroft 	u_int limit;
    610   1.7   mycroft 	u_int seg_32bit:1;
    611   1.7   mycroft 	u_int contents:2;
    612   1.7   mycroft 	u_int read_exec_only:1;
    613   1.7   mycroft 	u_int limit_in_pages:1;
    614   1.7   mycroft 	u_int seg_not_present:1;
    615  1.72  christos 	u_int useable:1;
    616   1.7   mycroft };
    617   1.7   mycroft 
    618   1.7   mycroft int
    619  1.85   thorpej linux_write_ldt(l, uap, retval)
    620  1.85   thorpej 	struct lwp *l;
    621  1.20   mycroft 	struct linux_sys_modify_ldt_args /* {
    622   1.7   mycroft 		syscallarg(int) func;
    623   1.7   mycroft 		syscallarg(void *) ptr;
    624   1.7   mycroft 		syscallarg(size_t) bytecount;
    625   1.7   mycroft 	} */ *uap;
    626   1.7   mycroft 	register_t *retval;
    627   1.7   mycroft {
    628  1.85   thorpej 	struct proc *p = l->l_proc;
    629   1.7   mycroft 	struct linux_ldt_info ldt_info;
    630   1.7   mycroft 	struct segment_descriptor sd;
    631   1.7   mycroft 	struct i386_set_ldt_args sl;
    632   1.7   mycroft 	int error;
    633   1.7   mycroft 	caddr_t sg;
    634   1.7   mycroft 	char *parms;
    635  1.72  christos 	int oldmode = (int)retval[0];
    636   1.7   mycroft 
    637  1.72  christos 	DPRINTF(("linux_write_ldt %d\n", oldmode));
    638   1.7   mycroft 	if (SCARG(uap, bytecount) != sizeof(ldt_info))
    639   1.7   mycroft 		return (EINVAL);
    640  1.29  christos 	if ((error = copyin(SCARG(uap, ptr), &ldt_info, sizeof(ldt_info))) != 0)
    641   1.7   mycroft 		return error;
    642  1.72  christos 	if (ldt_info.entry_number >= 8192)
    643   1.7   mycroft 		return (EINVAL);
    644  1.72  christos 	if (ldt_info.contents == 3) {
    645  1.72  christos 		if (oldmode)
    646  1.72  christos 			return (EINVAL);
    647  1.72  christos 		if (ldt_info.seg_not_present)
    648  1.72  christos 			return (EINVAL);
    649  1.72  christos 	}
    650   1.7   mycroft 
    651  1.72  christos 	if (ldt_info.base_addr == 0 && ldt_info.limit == 0 &&
    652  1.72  christos 	    (oldmode || (ldt_info.contents == 0 &&
    653  1.72  christos 	    ldt_info.read_exec_only == 1 && ldt_info.seg_32bit == 0 &&
    654  1.72  christos 	    ldt_info.limit_in_pages == 0 && ldt_info.seg_not_present == 1 &&
    655  1.72  christos 	    ldt_info.useable == 0))) {
    656  1.70  christos 		/* this means you should zero the ldt */
    657  1.70  christos 		(void)memset(&sd, 0, sizeof(sd));
    658  1.70  christos 	} else {
    659  1.70  christos 		sd.sd_lobase = ldt_info.base_addr & 0xffffff;
    660  1.70  christos 		sd.sd_hibase = (ldt_info.base_addr >> 24) & 0xff;
    661  1.70  christos 		sd.sd_lolimit = ldt_info.limit & 0xffff;
    662  1.70  christos 		sd.sd_hilimit = (ldt_info.limit >> 16) & 0xf;
    663  1.70  christos 		sd.sd_type = 16 | (ldt_info.contents << 2) |
    664  1.70  christos 		    (!ldt_info.read_exec_only << 1);
    665  1.70  christos 		sd.sd_dpl = SEL_UPL;
    666  1.70  christos 		sd.sd_p = !ldt_info.seg_not_present;
    667  1.70  christos 		sd.sd_def32 = ldt_info.seg_32bit;
    668  1.70  christos 		sd.sd_gran = ldt_info.limit_in_pages;
    669  1.72  christos 		if (!oldmode)
    670  1.72  christos 			sd.sd_xx = ldt_info.useable;
    671  1.73  christos 		else
    672  1.73  christos 			sd.sd_xx = 0;
    673  1.70  christos 	}
    674  1.71  christos 	sg = stackgap_init(p, 0);
    675   1.7   mycroft 	sl.start = ldt_info.entry_number;
    676  1.71  christos 	sl.desc = stackgap_alloc(p, &sg, sizeof(sd));
    677   1.7   mycroft 	sl.num = 1;
    678   1.7   mycroft 
    679  1.72  christos 	DPRINTF(("linux_write_ldt: idx=%d, base=0x%lx, limit=0x%x\n",
    680  1.72  christos 	    ldt_info.entry_number, ldt_info.base_addr, ldt_info.limit));
    681   1.7   mycroft 
    682  1.71  christos 	parms = stackgap_alloc(p, &sg, sizeof(sl));
    683   1.7   mycroft 
    684  1.29  christos 	if ((error = copyout(&sd, sl.desc, sizeof(sd))) != 0)
    685   1.7   mycroft 		return (error);
    686  1.29  christos 	if ((error = copyout(&sl, parms, sizeof(sl))) != 0)
    687   1.7   mycroft 		return (error);
    688   1.7   mycroft 
    689  1.85   thorpej 	if ((error = i386_set_ldt(l, parms, retval)) != 0)
    690   1.7   mycroft 		return (error);
    691   1.7   mycroft 
    692   1.7   mycroft 	*retval = 0;
    693   1.7   mycroft 	return (0);
    694   1.7   mycroft }
    695   1.7   mycroft 
    696   1.7   mycroft #endif /* USER_LDT */
    697   1.7   mycroft 
    698   1.6   mycroft int
    699  1.85   thorpej linux_sys_modify_ldt(l, v, retval)
    700  1.85   thorpej 	struct lwp *l;
    701  1.19   thorpej 	void *v;
    702  1.19   thorpej 	register_t *retval;
    703  1.19   thorpej {
    704  1.20   mycroft 	struct linux_sys_modify_ldt_args /* {
    705   1.6   mycroft 		syscallarg(int) func;
    706   1.6   mycroft 		syscallarg(void *) ptr;
    707   1.6   mycroft 		syscallarg(size_t) bytecount;
    708  1.19   thorpej 	} */ *uap = v;
    709   1.6   mycroft 
    710   1.6   mycroft 	switch (SCARG(uap, func)) {
    711   1.7   mycroft #ifdef USER_LDT
    712   1.6   mycroft 	case 0:
    713  1.85   thorpej 		return linux_read_ldt(l, uap, retval);
    714   1.6   mycroft 	case 1:
    715  1.72  christos 		retval[0] = 1;
    716  1.85   thorpej 		return linux_write_ldt(l, uap, retval);
    717  1.72  christos 	case 2:
    718  1.72  christos #ifdef notyet
    719  1.85   thorpej 		return (linux_read_default_ldt(l, uap, retval);
    720  1.72  christos #else
    721  1.72  christos 		return (ENOSYS);
    722  1.72  christos #endif
    723  1.72  christos 	case 0x11:
    724  1.72  christos 		retval[0] = 0;
    725  1.85   thorpej 		return linux_write_ldt(l, uap, retval);
    726   1.7   mycroft #endif /* USER_LDT */
    727   1.7   mycroft 
    728   1.6   mycroft 	default:
    729   1.6   mycroft 		return (ENOSYS);
    730   1.6   mycroft 	}
    731  1.13      fvdl }
    732  1.13      fvdl 
    733  1.13      fvdl /*
    734  1.13      fvdl  * XXX Pathetic hack to make svgalib work. This will fake the major
    735  1.13      fvdl  * device number of an opened VT so that svgalib likes it. grmbl.
    736  1.13      fvdl  * Should probably do it 'wrong the right way' and use a mapping
    737  1.13      fvdl  * array for all major device numbers, and map linux_mknod too.
    738  1.13      fvdl  */
    739  1.13      fvdl dev_t
    740  1.69  christos linux_fakedev(dev, raw)
    741  1.13      fvdl 	dev_t dev;
    742  1.69  christos 	int raw;
    743  1.13      fvdl {
    744  1.69  christos 	if (raw) {
    745  1.41  drochner #if (NWSDISPLAY > 0)
    746  1.79   gehenna 		extern const struct cdevsw wsdisplay_cdevsw;
    747  1.79   gehenna 		if (cdevsw_lookup(dev) == &wsdisplay_cdevsw)
    748  1.69  christos 			return makedev(LINUX_CONS_MAJOR, (minor(dev) + 1));
    749  1.41  drochner #endif
    750  1.69  christos 	}
    751  1.77  jdolecek 
    752  1.77  jdolecek 	return dev;
    753  1.13      fvdl }
    754  1.13      fvdl 
    755  1.49     jhawk #if (NWSDISPLAY > 0)
    756  1.41  drochner /*
    757  1.41  drochner  * That's not complete, but enough to get an X server running.
    758  1.41  drochner  */
    759  1.41  drochner #define NR_KEYS 128
    760  1.61  jdolecek static const u_short plain_map[NR_KEYS] = {
    761  1.41  drochner 	0x0200,	0x001b,	0x0031,	0x0032,	0x0033,	0x0034,	0x0035,	0x0036,
    762  1.41  drochner 	0x0037,	0x0038,	0x0039,	0x0030,	0x002d,	0x003d,	0x007f,	0x0009,
    763  1.41  drochner 	0x0b71,	0x0b77,	0x0b65,	0x0b72,	0x0b74,	0x0b79,	0x0b75,	0x0b69,
    764  1.41  drochner 	0x0b6f,	0x0b70,	0x005b,	0x005d,	0x0201,	0x0702,	0x0b61,	0x0b73,
    765  1.41  drochner 	0x0b64,	0x0b66,	0x0b67,	0x0b68,	0x0b6a,	0x0b6b,	0x0b6c,	0x003b,
    766  1.41  drochner 	0x0027,	0x0060,	0x0700,	0x005c,	0x0b7a,	0x0b78,	0x0b63,	0x0b76,
    767  1.41  drochner 	0x0b62,	0x0b6e,	0x0b6d,	0x002c,	0x002e,	0x002f,	0x0700,	0x030c,
    768  1.41  drochner 	0x0703,	0x0020,	0x0207,	0x0100,	0x0101,	0x0102,	0x0103,	0x0104,
    769  1.41  drochner 	0x0105,	0x0106,	0x0107,	0x0108,	0x0109,	0x0208,	0x0209,	0x0307,
    770  1.41  drochner 	0x0308,	0x0309,	0x030b,	0x0304,	0x0305,	0x0306,	0x030a,	0x0301,
    771  1.41  drochner 	0x0302,	0x0303,	0x0300,	0x0310,	0x0206,	0x0200,	0x003c,	0x010a,
    772  1.41  drochner 	0x010b,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    773  1.41  drochner 	0x030e,	0x0702,	0x030d,	0x001c,	0x0701,	0x0205,	0x0114,	0x0603,
    774  1.41  drochner 	0x0118,	0x0601,	0x0602,	0x0117,	0x0600,	0x0119,	0x0115,	0x0116,
    775  1.41  drochner 	0x011a,	0x010c,	0x010d,	0x011b,	0x011c,	0x0110,	0x0311,	0x011d,
    776  1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    777  1.41  drochner }, shift_map[NR_KEYS] = {
    778  1.41  drochner 	0x0200,	0x001b,	0x0021,	0x0040,	0x0023,	0x0024,	0x0025,	0x005e,
    779  1.41  drochner 	0x0026,	0x002a,	0x0028,	0x0029,	0x005f,	0x002b,	0x007f,	0x0009,
    780  1.41  drochner 	0x0b51,	0x0b57,	0x0b45,	0x0b52,	0x0b54,	0x0b59,	0x0b55,	0x0b49,
    781  1.41  drochner 	0x0b4f,	0x0b50,	0x007b,	0x007d,	0x0201,	0x0702,	0x0b41,	0x0b53,
    782  1.41  drochner 	0x0b44,	0x0b46,	0x0b47,	0x0b48,	0x0b4a,	0x0b4b,	0x0b4c,	0x003a,
    783  1.41  drochner 	0x0022,	0x007e,	0x0700,	0x007c,	0x0b5a,	0x0b58,	0x0b43,	0x0b56,
    784  1.41  drochner 	0x0b42,	0x0b4e,	0x0b4d,	0x003c,	0x003e,	0x003f,	0x0700,	0x030c,
    785  1.41  drochner 	0x0703,	0x0020,	0x0207,	0x010a,	0x010b,	0x010c,	0x010d,	0x010e,
    786  1.41  drochner 	0x010f,	0x0110,	0x0111,	0x0112,	0x0113,	0x0213,	0x0203,	0x0307,
    787  1.41  drochner 	0x0308,	0x0309,	0x030b,	0x0304,	0x0305,	0x0306,	0x030a,	0x0301,
    788  1.41  drochner 	0x0302,	0x0303,	0x0300,	0x0310,	0x0206,	0x0200,	0x003e,	0x010a,
    789  1.41  drochner 	0x010b,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    790  1.41  drochner 	0x030e,	0x0702,	0x030d,	0x0200,	0x0701,	0x0205,	0x0114,	0x0603,
    791  1.41  drochner 	0x020b,	0x0601,	0x0602,	0x0117,	0x0600,	0x020a,	0x0115,	0x0116,
    792  1.41  drochner 	0x011a,	0x010c,	0x010d,	0x011b,	0x011c,	0x0110,	0x0311,	0x011d,
    793  1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    794  1.41  drochner }, altgr_map[NR_KEYS] = {
    795  1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0040,	0x0200,	0x0024,	0x0200,	0x0200,
    796  1.41  drochner 	0x007b,	0x005b,	0x005d,	0x007d,	0x005c,	0x0200,	0x0200,	0x0200,
    797  1.41  drochner 	0x0b71,	0x0b77,	0x0918,	0x0b72,	0x0b74,	0x0b79,	0x0b75,	0x0b69,
    798  1.41  drochner 	0x0b6f,	0x0b70,	0x0200,	0x007e,	0x0201,	0x0702,	0x0914,	0x0b73,
    799  1.41  drochner 	0x0917,	0x0919,	0x0b67,	0x0b68,	0x0b6a,	0x0b6b,	0x0b6c,	0x0200,
    800  1.41  drochner 	0x0200,	0x0200,	0x0700,	0x0200,	0x0b7a,	0x0b78,	0x0916,	0x0b76,
    801  1.41  drochner 	0x0915,	0x0b6e,	0x0b6d,	0x0200,	0x0200,	0x0200,	0x0700,	0x030c,
    802  1.41  drochner 	0x0703,	0x0200,	0x0207,	0x050c,	0x050d,	0x050e,	0x050f,	0x0510,
    803  1.41  drochner 	0x0511,	0x0512,	0x0513,	0x0514,	0x0515,	0x0208,	0x0202,	0x0911,
    804  1.41  drochner 	0x0912,	0x0913,	0x030b,	0x090e,	0x090f,	0x0910,	0x030a,	0x090b,
    805  1.41  drochner 	0x090c,	0x090d,	0x090a,	0x0310,	0x0206,	0x0200,	0x007c,	0x0516,
    806  1.41  drochner 	0x0517,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    807  1.41  drochner 	0x030e,	0x0702,	0x030d,	0x0200,	0x0701,	0x0205,	0x0114,	0x0603,
    808  1.41  drochner 	0x0118,	0x0601,	0x0602,	0x0117,	0x0600,	0x0119,	0x0115,	0x0116,
    809  1.41  drochner 	0x011a,	0x010c,	0x010d,	0x011b,	0x011c,	0x0110,	0x0311,	0x011d,
    810  1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    811  1.41  drochner }, ctrl_map[NR_KEYS] = {
    812  1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0000,	0x001b,	0x001c,	0x001d,	0x001e,
    813  1.41  drochner 	0x001f,	0x007f,	0x0200,	0x0200,	0x001f,	0x0200,	0x0008,	0x0200,
    814  1.41  drochner 	0x0011,	0x0017,	0x0005,	0x0012,	0x0014,	0x0019,	0x0015,	0x0009,
    815  1.41  drochner 	0x000f,	0x0010,	0x001b,	0x001d,	0x0201,	0x0702,	0x0001,	0x0013,
    816  1.41  drochner 	0x0004,	0x0006,	0x0007,	0x0008,	0x000a,	0x000b,	0x000c,	0x0200,
    817  1.41  drochner 	0x0007,	0x0000,	0x0700,	0x001c,	0x001a,	0x0018,	0x0003,	0x0016,
    818  1.41  drochner 	0x0002,	0x000e,	0x000d,	0x0200,	0x020e,	0x007f,	0x0700,	0x030c,
    819  1.41  drochner 	0x0703,	0x0000,	0x0207,	0x0100,	0x0101,	0x0102,	0x0103,	0x0104,
    820  1.41  drochner 	0x0105,	0x0106,	0x0107,	0x0108,	0x0109,	0x0208,	0x0204,	0x0307,
    821  1.41  drochner 	0x0308,	0x0309,	0x030b,	0x0304,	0x0305,	0x0306,	0x030a,	0x0301,
    822  1.41  drochner 	0x0302,	0x0303,	0x0300,	0x0310,	0x0206,	0x0200,	0x0200,	0x010a,
    823  1.41  drochner 	0x010b,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    824  1.41  drochner 	0x030e,	0x0702,	0x030d,	0x001c,	0x0701,	0x0205,	0x0114,	0x0603,
    825  1.41  drochner 	0x0118,	0x0601,	0x0602,	0x0117,	0x0600,	0x0119,	0x0115,	0x0116,
    826  1.41  drochner 	0x011a,	0x010c,	0x010d,	0x011b,	0x011c,	0x0110,	0x0311,	0x011d,
    827  1.41  drochner 	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,	0x0200,
    828  1.41  drochner };
    829  1.41  drochner 
    830  1.61  jdolecek const u_short * const linux_keytabs[] = {
    831  1.41  drochner 	plain_map, shift_map, altgr_map, altgr_map, ctrl_map
    832  1.41  drochner };
    833  1.41  drochner #endif
    834  1.41  drochner 
    835  1.52      fvdl static struct biosdisk_info *
    836  1.52      fvdl fd2biosinfo(p, fp)
    837  1.52      fvdl 	struct proc *p;
    838  1.52      fvdl 	struct file *fp;
    839  1.52      fvdl {
    840  1.52      fvdl 	struct vnode *vp;
    841  1.52      fvdl 	const char *blkname;
    842  1.52      fvdl 	char diskname[16];
    843  1.52      fvdl 	int i;
    844  1.52      fvdl 	struct nativedisk_info *nip;
    845  1.52      fvdl 	struct disklist *dl = i386_alldisks;
    846  1.52      fvdl 
    847  1.52      fvdl 	if (fp->f_type != DTYPE_VNODE)
    848  1.52      fvdl 		return NULL;
    849  1.52      fvdl 	vp = (struct vnode *)fp->f_data;
    850  1.52      fvdl 
    851  1.52      fvdl 	if (vp->v_type != VBLK)
    852  1.52      fvdl 		return NULL;
    853  1.52      fvdl 
    854  1.79   gehenna 	blkname = devsw_blk2name(major(vp->v_rdev));
    855  1.52      fvdl 	snprintf(diskname, sizeof diskname, "%s%u", blkname,
    856  1.52      fvdl 	    DISKUNIT(vp->v_rdev));
    857  1.52      fvdl 
    858  1.52      fvdl 	for (i = 0; i < dl->dl_nnativedisks; i++) {
    859  1.52      fvdl 		nip = &dl->dl_nativedisks[i];
    860  1.52      fvdl 		if (strcmp(diskname, nip->ni_devname))
    861  1.52      fvdl 			continue;
    862  1.52      fvdl 		if (nip->ni_nmatches != 0)
    863  1.52      fvdl 			return &dl->dl_biosdisks[nip->ni_biosmatches[0]];
    864  1.52      fvdl 	}
    865  1.52      fvdl 
    866  1.52      fvdl 	return NULL;
    867  1.52      fvdl }
    868  1.52      fvdl 
    869  1.52      fvdl 
    870  1.13      fvdl /*
    871  1.13      fvdl  * We come here in a last attempt to satisfy a Linux ioctl() call
    872  1.13      fvdl  */
    873  1.13      fvdl int
    874  1.89      fvdl linux_machdepioctl(p, v, retval)
    875  1.89      fvdl 	struct proc *p;
    876  1.19   thorpej 	void *v;
    877  1.19   thorpej 	register_t *retval;
    878  1.19   thorpej {
    879  1.20   mycroft 	struct linux_sys_ioctl_args /* {
    880  1.13      fvdl 		syscallarg(int) fd;
    881  1.13      fvdl 		syscallarg(u_long) com;
    882  1.13      fvdl 		syscallarg(caddr_t) data;
    883  1.19   thorpej 	} */ *uap = v;
    884  1.29  christos 	struct sys_ioctl_args bia;
    885  1.15      fvdl 	u_long com;
    886  1.52      fvdl 	int error, error1;
    887  1.50     veego #if (NWSDISPLAY > 0)
    888  1.13      fvdl 	struct vt_mode lvt;
    889  1.13      fvdl 	caddr_t bvtp, sg;
    890  1.41  drochner 	struct kbentry kbe;
    891  1.41  drochner #endif
    892  1.52      fvdl 	struct linux_hd_geometry hdg;
    893  1.52      fvdl 	struct linux_hd_big_geometry hdg_big;
    894  1.52      fvdl 	struct biosdisk_info *bip;
    895  1.52      fvdl 	struct filedesc *fdp;
    896  1.52      fvdl 	struct file *fp;
    897  1.52      fvdl 	int fd;
    898  1.52      fvdl 	struct disklabel label, *labp;
    899  1.52      fvdl 	struct partinfo partp;
    900  1.89      fvdl 	int (*ioctlf)(struct file *, u_long, void *, struct proc *);
    901  1.52      fvdl 	u_long start, biostotal, realtotal;
    902  1.52      fvdl 	u_char heads, sectors;
    903  1.52      fvdl 	u_int cylinders;
    904  1.55      fvdl 	struct ioctl_pt pt;
    905  1.13      fvdl 
    906  1.52      fvdl 	fd = SCARG(uap, fd);
    907  1.52      fvdl 	SCARG(&bia, fd) = fd;
    908  1.13      fvdl 	SCARG(&bia, data) = SCARG(uap, data);
    909  1.13      fvdl 	com = SCARG(uap, com);
    910  1.13      fvdl 
    911  1.52      fvdl 	fdp = p->p_fd;
    912  1.52      fvdl 
    913  1.64   thorpej 	if ((fp = fd_getfile(fdp, fd)) == NULL)
    914  1.53   thorpej 		return (EBADF);
    915  1.52      fvdl 
    916  1.86      yamt 	FILE_USE(fp);
    917  1.86      yamt 
    918  1.13      fvdl 	switch (com) {
    919  1.50     veego #if (NWSDISPLAY > 0)
    920  1.13      fvdl 	case LINUX_KDGKBMODE:
    921  1.21      fvdl 		com = KDGKBMODE;
    922  1.21      fvdl 		break;
    923  1.13      fvdl 	case LINUX_KDSKBMODE:
    924  1.13      fvdl 		com = KDSKBMODE;
    925  1.13      fvdl 		if ((unsigned)SCARG(uap, data) == LINUX_K_MEDIUMRAW)
    926  1.13      fvdl 			SCARG(&bia, data) = (caddr_t)K_RAW;
    927  1.13      fvdl 		break;
    928  1.59      fvdl 	case LINUX_KIOCSOUND:
    929  1.59      fvdl 		SCARG(&bia, data) =
    930  1.59      fvdl 		    (caddr_t)(((unsigned long)SCARG(&bia, data)) & 0xffff);
    931  1.59      fvdl 		/* fall through */
    932  1.13      fvdl 	case LINUX_KDMKTONE:
    933  1.13      fvdl 		com = KDMKTONE;
    934  1.13      fvdl 		break;
    935  1.13      fvdl 	case LINUX_KDSETMODE:
    936  1.13      fvdl 		com = KDSETMODE;
    937  1.58      fvdl 		break;
    938  1.58      fvdl 	case LINUX_KDGETMODE:
    939  1.58      fvdl 		/* KD_* values are equal to the wscons numbers */
    940  1.58      fvdl 		com = WSDISPLAYIO_GMODE;
    941  1.13      fvdl 		break;
    942  1.13      fvdl 	case LINUX_KDENABIO:
    943  1.13      fvdl 		com = KDENABIO;
    944  1.13      fvdl 		break;
    945  1.13      fvdl 	case LINUX_KDDISABIO:
    946  1.13      fvdl 		com = KDDISABIO;
    947  1.13      fvdl 		break;
    948  1.13      fvdl 	case LINUX_KDGETLED:
    949  1.13      fvdl 		com = KDGETLED;
    950  1.13      fvdl 		break;
    951  1.13      fvdl 	case LINUX_KDSETLED:
    952  1.13      fvdl 		com = KDSETLED;
    953  1.13      fvdl 		break;
    954  1.13      fvdl 	case LINUX_VT_OPENQRY:
    955  1.13      fvdl 		com = VT_OPENQRY;
    956  1.13      fvdl 		break;
    957  1.13      fvdl 	case LINUX_VT_GETMODE:
    958  1.13      fvdl 		SCARG(&bia, com) = VT_GETMODE;
    959  1.85   thorpej 		/* XXX NJWLWP */
    960  1.85   thorpej 		if ((error = sys_ioctl(curlwp, &bia, retval)))
    961  1.86      yamt 			goto out;
    962  1.13      fvdl 		if ((error = copyin(SCARG(uap, data), (caddr_t)&lvt,
    963  1.13      fvdl 		    sizeof (struct vt_mode))))
    964  1.86      yamt 			goto out;
    965  1.74  christos 		lvt.relsig = native_to_linux_signo[lvt.relsig];
    966  1.74  christos 		lvt.acqsig = native_to_linux_signo[lvt.acqsig];
    967  1.74  christos 		lvt.frsig = native_to_linux_signo[lvt.frsig];
    968  1.86      yamt 		error = copyout((caddr_t)&lvt, SCARG(uap, data),
    969  1.13      fvdl 		    sizeof (struct vt_mode));
    970  1.86      yamt 		goto out;
    971  1.13      fvdl 	case LINUX_VT_SETMODE:
    972  1.13      fvdl 		com = VT_SETMODE;
    973  1.13      fvdl 		if ((error = copyin(SCARG(uap, data), (caddr_t)&lvt,
    974  1.13      fvdl 		    sizeof (struct vt_mode))))
    975  1.86      yamt 			goto out;
    976  1.74  christos 		lvt.relsig = linux_to_native_signo[lvt.relsig];
    977  1.74  christos 		lvt.acqsig = linux_to_native_signo[lvt.acqsig];
    978  1.74  christos 		lvt.frsig = linux_to_native_signo[lvt.frsig];
    979  1.71  christos 		sg = stackgap_init(p, 0);
    980  1.71  christos 		bvtp = stackgap_alloc(p, &sg, sizeof (struct vt_mode));
    981  1.13      fvdl 		if ((error = copyout(&lvt, bvtp, sizeof (struct vt_mode))))
    982  1.86      yamt 			goto out;
    983  1.13      fvdl 		SCARG(&bia, data) = bvtp;
    984  1.13      fvdl 		break;
    985  1.52      fvdl 	case LINUX_VT_DISALLOCATE:
    986  1.52      fvdl 		/* XXX should use WSDISPLAYIO_DELSCREEN */
    987  1.86      yamt 		error = 0;
    988  1.86      yamt 		goto out;
    989  1.13      fvdl 	case LINUX_VT_RELDISP:
    990  1.13      fvdl 		com = VT_RELDISP;
    991  1.13      fvdl 		break;
    992  1.13      fvdl 	case LINUX_VT_ACTIVATE:
    993  1.13      fvdl 		com = VT_ACTIVATE;
    994  1.13      fvdl 		break;
    995  1.13      fvdl 	case LINUX_VT_WAITACTIVE:
    996  1.13      fvdl 		com = VT_WAITACTIVE;
    997  1.13      fvdl 		break;
    998  1.41  drochner 	case LINUX_VT_GETSTATE:
    999  1.41  drochner 		com = VT_GETSTATE;
   1000  1.41  drochner 		break;
   1001  1.41  drochner 	case LINUX_KDGKBTYPE:
   1002  1.91  jdolecek 	    {
   1003  1.91  jdolecek 		static const u_int8_t kb101 = KB_101;
   1004  1.91  jdolecek 
   1005  1.41  drochner 		/* This is what Linux does. */
   1006  1.91  jdolecek 		error = copyout(&kb101, SCARG(uap, data), 1);
   1007  1.86      yamt 		goto out;
   1008  1.91  jdolecek 	    }
   1009  1.41  drochner 	case LINUX_KDGKBENT:
   1010  1.41  drochner 		/*
   1011  1.41  drochner 		 * The Linux KDGKBENT ioctl is different from the
   1012  1.41  drochner 		 * SYSV original. So we handle it in machdep code.
   1013  1.41  drochner 		 * XXX We should use keyboard mapping information
   1014  1.41  drochner 		 * from wsdisplay, but this would be expensive.
   1015  1.41  drochner 		 */
   1016  1.41  drochner 		if ((error = copyin(SCARG(uap, data), &kbe,
   1017  1.41  drochner 				    sizeof(struct kbentry))))
   1018  1.86      yamt 			goto out;
   1019  1.41  drochner 		if (kbe.kb_table >= sizeof(linux_keytabs) / sizeof(u_short *)
   1020  1.86      yamt 		    || kbe.kb_index >= NR_KEYS) {
   1021  1.86      yamt 			error = EINVAL;
   1022  1.86      yamt 			goto out;
   1023  1.86      yamt 		}
   1024  1.41  drochner 		kbe.kb_value = linux_keytabs[kbe.kb_table][kbe.kb_index];
   1025  1.86      yamt 		error = copyout(&kbe, SCARG(uap, data),
   1026  1.86      yamt 				sizeof(struct kbentry));
   1027  1.86      yamt 		goto out;
   1028  1.54      fvdl #endif
   1029  1.52      fvdl 	case LINUX_HDIO_GETGEO:
   1030  1.52      fvdl 	case LINUX_HDIO_GETGEO_BIG:
   1031  1.52      fvdl 		/*
   1032  1.52      fvdl 		 * Try to mimic Linux behaviour: return the BIOS geometry
   1033  1.52      fvdl 		 * if possible (extending its # of cylinders if it's beyond
   1034  1.52      fvdl 		 * the 1023 limit), fall back to the MI geometry (i.e.
   1035  1.52      fvdl 		 * the real geometry) if not found, by returning an
   1036  1.52      fvdl 		 * error. See common/linux_hdio.c
   1037  1.52      fvdl 		 */
   1038  1.52      fvdl 		bip = fd2biosinfo(p, fp);
   1039  1.52      fvdl 		ioctlf = fp->f_ops->fo_ioctl;
   1040  1.89      fvdl 		error = ioctlf(fp, DIOCGDEFLABEL, (caddr_t)&label, p);
   1041  1.89      fvdl 		error1 = ioctlf(fp, DIOCGPART, (caddr_t)&partp, p);
   1042  1.86      yamt 		if (error != 0 && error1 != 0) {
   1043  1.86      yamt 			error = error1;
   1044  1.86      yamt 			goto out;
   1045  1.86      yamt 		}
   1046  1.52      fvdl 		labp = error != 0 ? &label : partp.disklab;
   1047  1.52      fvdl 		start = error1 != 0 ? partp.part->p_offset : 0;
   1048  1.52      fvdl 		if (bip != NULL && bip->bi_head != 0 && bip->bi_sec != 0
   1049  1.52      fvdl 		    && bip->bi_cyl != 0) {
   1050  1.52      fvdl 			heads = bip->bi_head;
   1051  1.52      fvdl 			sectors = bip->bi_sec;
   1052  1.52      fvdl 			cylinders = bip->bi_cyl;
   1053  1.52      fvdl 			biostotal = heads * sectors * cylinders;
   1054  1.52      fvdl 			realtotal = labp->d_ntracks * labp->d_nsectors *
   1055  1.52      fvdl 			    labp->d_ncylinders;
   1056  1.52      fvdl 			if (realtotal > biostotal)
   1057  1.52      fvdl 				cylinders = realtotal / (heads * sectors);
   1058  1.52      fvdl 		} else {
   1059  1.52      fvdl 			heads = labp->d_ntracks;
   1060  1.52      fvdl 			cylinders = labp->d_ncylinders;
   1061  1.52      fvdl 			sectors = labp->d_nsectors;
   1062  1.52      fvdl 		}
   1063  1.52      fvdl 		if (com == LINUX_HDIO_GETGEO) {
   1064  1.52      fvdl 			hdg.start = start;
   1065  1.52      fvdl 			hdg.heads = heads;
   1066  1.52      fvdl 			hdg.cylinders = cylinders;
   1067  1.52      fvdl 			hdg.sectors = sectors;
   1068  1.86      yamt 			error = copyout(&hdg, SCARG(uap, data), sizeof hdg);
   1069  1.86      yamt 			goto out;
   1070  1.52      fvdl 		} else {
   1071  1.52      fvdl 			hdg_big.start = start;
   1072  1.52      fvdl 			hdg_big.heads = heads;
   1073  1.52      fvdl 			hdg_big.cylinders = cylinders;
   1074  1.52      fvdl 			hdg_big.sectors = sectors;
   1075  1.86      yamt 			error = copyout(&hdg_big, SCARG(uap, data),
   1076  1.52      fvdl 			    sizeof hdg_big);
   1077  1.86      yamt 			goto out;
   1078  1.52      fvdl 		}
   1079  1.52      fvdl 
   1080  1.13      fvdl 	default:
   1081  1.54      fvdl 		/*
   1082  1.55      fvdl 		 * Unknown to us. If it's on a device, just pass it through
   1083  1.55      fvdl 		 * using PTIOCLINUX, the device itself might be able to
   1084  1.55      fvdl 		 * make some sense of it.
   1085  1.57      fvdl 		 * XXX hack: if the function returns EJUSTRETURN,
   1086  1.57      fvdl 		 * it has stuffed a sysctl return value in pt.data.
   1087  1.54      fvdl 		 */
   1088  1.55      fvdl 		FILE_USE(fp);
   1089  1.55      fvdl 		ioctlf = fp->f_ops->fo_ioctl;
   1090  1.55      fvdl 		pt.com = SCARG(uap, com);
   1091  1.55      fvdl 		pt.data = SCARG(uap, data);
   1092  1.89      fvdl 		error = ioctlf(fp, PTIOCLINUX, (caddr_t)&pt, p);
   1093  1.89      fvdl 		FILE_UNUSE(fp, p);
   1094  1.57      fvdl 		if (error == EJUSTRETURN) {
   1095  1.57      fvdl 			retval[0] = (register_t)pt.data;
   1096  1.57      fvdl 			error = 0;
   1097  1.57      fvdl 		}
   1098  1.55      fvdl 
   1099  1.60      fvdl 		if (error == ENOTTY)
   1100  1.72  christos 			DPRINTF(("linux_machdepioctl: invalid ioctl %08lx\n",
   1101  1.72  christos 			    com));
   1102  1.86      yamt 		goto out;
   1103  1.13      fvdl 	}
   1104  1.13      fvdl 	SCARG(&bia, com) = com;
   1105  1.85   thorpej 	/* XXX NJWLWP */
   1106  1.86      yamt 	error = sys_ioctl(curlwp, &bia, retval);
   1107  1.86      yamt out:
   1108  1.89      fvdl 	FILE_UNUSE(fp ,p);
   1109  1.86      yamt 	return error;
   1110  1.13      fvdl }
   1111  1.13      fvdl 
   1112  1.13      fvdl /*
   1113  1.13      fvdl  * Set I/O permissions for a process. Just set the maximum level
   1114  1.13      fvdl  * right away (ignoring the argument), otherwise we would have
   1115  1.13      fvdl  * to rely on I/O permission maps, which are not implemented.
   1116  1.13      fvdl  */
   1117  1.13      fvdl int
   1118  1.85   thorpej linux_sys_iopl(l, v, retval)
   1119  1.85   thorpej 	struct lwp *l;
   1120  1.19   thorpej 	void *v;
   1121  1.19   thorpej 	register_t *retval;
   1122  1.19   thorpej {
   1123  1.29  christos #if 0
   1124  1.20   mycroft 	struct linux_sys_iopl_args /* {
   1125  1.13      fvdl 		syscallarg(int) level;
   1126  1.19   thorpej 	} */ *uap = v;
   1127  1.29  christos #endif
   1128  1.85   thorpej 	struct proc *p = l->l_proc;
   1129  1.85   thorpej 	struct trapframe *fp = l->l_md.md_regs;
   1130  1.13      fvdl 
   1131  1.13      fvdl 	if (suser(p->p_ucred, &p->p_acflag) != 0)
   1132  1.13      fvdl 		return EPERM;
   1133  1.13      fvdl 	fp->tf_eflags |= PSL_IOPL;
   1134  1.13      fvdl 	*retval = 0;
   1135  1.13      fvdl 	return 0;
   1136  1.13      fvdl }
   1137  1.13      fvdl 
   1138  1.13      fvdl /*
   1139  1.13      fvdl  * See above. If a root process tries to set access to an I/O port,
   1140  1.13      fvdl  * just let it have the whole range.
   1141  1.13      fvdl  */
   1142  1.13      fvdl int
   1143  1.85   thorpej linux_sys_ioperm(l, v, retval)
   1144  1.85   thorpej 	struct lwp *l;
   1145  1.19   thorpej 	void *v;
   1146  1.19   thorpej 	register_t *retval;
   1147  1.19   thorpej {
   1148  1.20   mycroft 	struct linux_sys_ioperm_args /* {
   1149  1.13      fvdl 		syscallarg(unsigned int) lo;
   1150  1.13      fvdl 		syscallarg(unsigned int) hi;
   1151  1.13      fvdl 		syscallarg(int) val;
   1152  1.19   thorpej 	} */ *uap = v;
   1153  1.85   thorpej 	struct proc *p = l->l_proc;
   1154  1.85   thorpej 	struct trapframe *fp = l->l_md.md_regs;
   1155  1.13      fvdl 
   1156  1.13      fvdl 	if (suser(p->p_ucred, &p->p_acflag) != 0)
   1157  1.13      fvdl 		return EPERM;
   1158  1.13      fvdl 	if (SCARG(uap, val))
   1159  1.13      fvdl 		fp->tf_eflags |= PSL_IOPL;
   1160  1.13      fvdl 	*retval = 0;
   1161  1.92  christos 	return 0;
   1162  1.92  christos }
   1163  1.92  christos 
   1164  1.92  christos int
   1165  1.92  christos linux_exec_setup_stack(struct proc *p, struct exec_package *epp)
   1166  1.92  christos {
   1167  1.92  christos 	u_long max_stack_size;
   1168  1.92  christos 	u_long access_linear_min, access_size;
   1169  1.92  christos 	u_long noaccess_linear_min, noaccess_size;
   1170  1.92  christos 
   1171  1.92  christos #ifndef	USRSTACK32
   1172  1.92  christos #define USRSTACK32	(0x00000000ffffffffL&~PGOFSET)
   1173  1.92  christos #endif
   1174  1.92  christos 
   1175  1.92  christos 	if (epp->ep_flags & EXEC_32) {
   1176  1.92  christos 		epp->ep_minsaddr = USRSTACK32;
   1177  1.92  christos 		max_stack_size = MAXSSIZ;
   1178  1.92  christos 	} else {
   1179  1.92  christos 		epp->ep_minsaddr = USRSTACK;
   1180  1.92  christos 		max_stack_size = MAXSSIZ;
   1181  1.92  christos 	}
   1182  1.92  christos 
   1183  1.92  christos 	if (epp->ep_minsaddr > LINUX_USRSTACK)
   1184  1.92  christos 		epp->ep_minsaddr = LINUX_USRSTACK;
   1185  1.93  christos #ifdef DEBUG_LINUX
   1186  1.92  christos 	else {
   1187  1.92  christos 		/*
   1188  1.92  christos 		 * Someone needs to make KERNBASE and TEXTADDR
   1189  1.93  christos 		 * java versions < 1.4.2 need the stack to be
   1190  1.93  christos 		 * at 0xC0000000
   1191  1.92  christos 		 */
   1192  1.92  christos 		uprintf("Cannot setup stack to 0xC0000000, "
   1193  1.92  christos 		    "java will not work properly\n");
   1194  1.92  christos 	}
   1195  1.92  christos #endif
   1196  1.92  christos 	epp->ep_maxsaddr = (u_long)STACK_GROW(epp->ep_minsaddr,
   1197  1.92  christos 		max_stack_size);
   1198  1.92  christos 	epp->ep_ssize = p->p_rlimit[RLIMIT_STACK].rlim_cur;
   1199  1.92  christos 
   1200  1.92  christos 	/*
   1201  1.92  christos 	 * set up commands for stack.  note that this takes *two*, one to
   1202  1.92  christos 	 * map the part of the stack which we can access, and one to map
   1203  1.92  christos 	 * the part which we can't.
   1204  1.92  christos 	 *
   1205  1.92  christos 	 * arguably, it could be made into one, but that would require the
   1206  1.92  christos 	 * addition of another mapping proc, which is unnecessary
   1207  1.92  christos 	 */
   1208  1.92  christos 	access_size = epp->ep_ssize;
   1209  1.92  christos 	access_linear_min = (u_long)STACK_ALLOC(epp->ep_minsaddr, access_size);
   1210  1.92  christos 	noaccess_size = max_stack_size - access_size;
   1211  1.92  christos 	noaccess_linear_min = (u_long)STACK_ALLOC(STACK_GROW(epp->ep_minsaddr,
   1212  1.92  christos 	    access_size), noaccess_size);
   1213  1.92  christos 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, noaccess_size,
   1214  1.92  christos 	    noaccess_linear_min, NULLVP, 0, VM_PROT_NONE);
   1215  1.92  christos 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, access_size,
   1216  1.92  christos 	    access_linear_min, NULLVP, 0,
   1217  1.92  christos 	    VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
   1218  1.92  christos 
   1219  1.13      fvdl 	return 0;
   1220   1.1      fvdl }
   1221