sys/compat/ia32/ia32_sysvec.c

   1 /*-
   2  * Copyright (c) 2002 Doug Rabson
   3  * Copyright (c) 2003 Peter Wemm
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  25  * SUCH DAMAGE.
  26  */
  27
  28 #include <sys/cdefs.h>
  29 __FBSDID("$FreeBSD$");
  30
  31 #include "opt_compat.h"
  32
  33 #define __ELF_WORD_SIZE 32
  34
  35 #include <sys/param.h>
  36 #include <sys/exec.h>
  37 #include <sys/fcntl.h>
  38 #include <sys/imgact.h>
  39 #include <sys/kernel.h>
  40 #include <sys/lock.h>
  41 #include <sys/malloc.h>
  42 #include <sys/mutex.h>
  43 #include <sys/mman.h>
  44 #include <sys/namei.h>
  45 #include <sys/pioctl.h>
  46 #include <sys/proc.h>
  47 #include <sys/procfs.h>
  48 #include <sys/resourcevar.h>
  49 #include <sys/systm.h>
  50 #include <sys/signalvar.h>
  51 #include <sys/stat.h>
  52 #include <sys/sx.h>
  53 #include <sys/syscall.h>
  54 #include <sys/sysctl.h>
  55 #include <sys/sysent.h>
  56 #include <sys/vnode.h>
  57 #include <sys/imgact_elf.h>
  58
  59 #include <vm/vm.h>
  60 #include <vm/vm_kern.h>
  61 #include <vm/vm_param.h>
  62 #include <vm/pmap.h>
  63 #include <vm/vm_map.h>
  64 #include <vm/vm_object.h>
  65 #include <vm/vm_extern.h>
  66
  67 #include <compat/freebsd32/freebsd32_signal.h>
  68 #include <compat/freebsd32/freebsd32_util.h>
  69 #include <compat/freebsd32/freebsd32_proto.h>
  70 #include <compat/freebsd32/freebsd32_syscall.h>
  71 #include <compat/ia32/ia32_signal.h>
  72 #ifdef __amd64__
  73 #include <machine/psl.h>
  74 #include <machine/segments.h>
  75 #include <machine/specialreg.h>
  76 #else
  77 #include <i386/include/psl.h>
  78 #include <i386/include/segments.h>
  79 #include <i386/include/specialreg.h>
  80 #endif
  81 #include <machine/frame.h>
  82 #include <machine/md_var.h>
  83 #include <machine/pcb.h>
  84 #include <machine/cpufunc.h>
  85
  86 CTASSERT(sizeof(struct ia32_mcontext) == 640);
  87 CTASSERT(sizeof(struct ia32_ucontext) == 704);
  88 CTASSERT(sizeof(struct ia32_sigframe) == 800);
  89 CTASSERT(sizeof(struct siginfo32) == 64);
  90 #ifdef COMPAT_FREEBSD4
  91 CTASSERT(sizeof(struct ia32_mcontext4) == 260);
  92 CTASSERT(sizeof(struct ia32_ucontext4) == 324);
  93 CTASSERT(sizeof(struct ia32_sigframe4) == 408);
  94 #endif
  95
  96 static register_t *ia32_copyout_strings(struct image_params *imgp);
  97 static void ia32_fixlimit(struct rlimit *rl, int which);
  98
  99 SYSCTL_NODE(_compat, OID_AUTO, ia32, CTLFLAG_RW, 0, "ia32 mode");
 100
 101 static u_long   ia32_maxdsiz = IA32_MAXDSIZ;
 102 SYSCTL_ULONG(_compat_ia32, OID_AUTO, maxdsiz, CTLFLAG_RW, &ia32_maxdsiz, 0, "");
 103 TUNABLE_ULONG("compat.ia32.maxdsiz", &ia32_maxdsiz);
 104 static u_long   ia32_maxssiz = IA32_MAXSSIZ;
 105 SYSCTL_ULONG(_compat_ia32, OID_AUTO, maxssiz, CTLFLAG_RW, &ia32_maxssiz, 0, "");
 106 TUNABLE_ULONG("compat.ia32.maxssiz", &ia32_maxssiz);
 107 static u_long   ia32_maxvmem = IA32_MAXVMEM;
 108 SYSCTL_ULONG(_compat_ia32, OID_AUTO, maxvmem, CTLFLAG_RW, &ia32_maxvmem, 0, "");
 109 TUNABLE_ULONG("compat.ia32.maxvmem", &ia32_maxvmem);
 110
 111 struct sysentvec ia32_freebsd_sysvec = {
 112         .sv_size        = FREEBSD32_SYS_MAXSYSCALL,
 113         .sv_table       = freebsd32_sysent,
 114         .sv_mask        = 0,
 115         .sv_sigsize     = 0,
 116         .sv_sigtbl      = NULL,
 117         .sv_errsize     = 0,
 118         .sv_errtbl      = NULL,
 119         .sv_transtrap   = NULL,
 120         .sv_fixup       = elf32_freebsd_fixup,
 121         .sv_sendsig     = ia32_sendsig,
 122         .sv_sigcode     = ia32_sigcode,
 123         .sv_szsigcode   = &sz_ia32_sigcode,
 124         .sv_prepsyscall = NULL,
 125         .sv_name        = "FreeBSD ELF32",
 126         .sv_coredump    = elf32_coredump,
 127         .sv_imgact_try  = NULL,
 128         .sv_minsigstksz = MINSIGSTKSZ,
 129         .sv_pagesize    = IA32_PAGE_SIZE,
 130         .sv_minuser     = 0,
 131         .sv_maxuser     = FREEBSD32_USRSTACK,
 132         .sv_usrstack    = FREEBSD32_USRSTACK,
 133         .sv_psstrings   = FREEBSD32_PS_STRINGS,
 134         .sv_stackprot   = VM_PROT_ALL,
 135         .sv_copyout_strings     = ia32_copyout_strings,
 136         .sv_setregs     = ia32_setregs,
 137         .sv_fixlimit    = ia32_fixlimit,
 138         .sv_maxssiz     = &ia32_maxssiz
 139 };
 140
 141
 142 static Elf32_Brandinfo ia32_brand_info = {
 143         .brand          = ELFOSABI_FREEBSD,
 144         .machine        = EM_386,
 145         .compat_3_brand = "FreeBSD",
 146         .emul_path      = NULL,
 147         .interp_path    = "/libexec/ld-elf.so.1",
 148         .sysvec         = &ia32_freebsd_sysvec,
 149         .interp_newpath = "/libexec/ld-elf32.so.1",
 150         .brand_note     = &elf32_freebsd_brandnote,
 151         .flags          = BI_CAN_EXEC_DYN | BI_BRAND_NOTE
 152 };
 153
 154 SYSINIT(ia32, SI_SUB_EXEC, SI_ORDER_ANY,
 155         (sysinit_cfunc_t) elf32_insert_brand_entry,
 156         &ia32_brand_info);
 157
 158 static Elf32_Brandinfo ia32_brand_oinfo = {
 159         .brand          = ELFOSABI_FREEBSD,
 160         .machine        = EM_386,
 161         .compat_3_brand = "FreeBSD",
 162         .emul_path      = NULL,
 163         .interp_path    = "/usr/libexec/ld-elf.so.1",
 164         .sysvec         = &ia32_freebsd_sysvec,
 165         .interp_newpath = "/libexec/ld-elf32.so.1",
 166         .brand_note     = &elf32_freebsd_brandnote,
 167         .flags          = BI_CAN_EXEC_DYN | BI_BRAND_NOTE
 168 };
 169
 170 SYSINIT(oia32, SI_SUB_EXEC, SI_ORDER_ANY,
 171         (sysinit_cfunc_t) elf32_insert_brand_entry,
 172         &ia32_brand_oinfo);
 173
 174
 175 void
 176 elf32_dump_thread(struct thread *td __unused, void *dst __unused,
 177     size_t *off __unused)
 178 {
 179 }
 180
 181
 182 /* XXX may be freebsd32 MI */
 183 static register_t *
 184 ia32_copyout_strings(struct image_params *imgp)
 185 {
 186         int argc, envc;
 187         u_int32_t *vectp;
 188         char *stringp, *destp;
 189         u_int32_t *stack_base;
 190         struct freebsd32_ps_strings *arginfo;
 191         int szsigcode;
 192
 193         /*
 194          * Calculate string base and vector table pointers.
 195          * Also deal with signal trampoline code for this exec type.
 196          */
 197         arginfo = (struct freebsd32_ps_strings *)FREEBSD32_PS_STRINGS;
 198         szsigcode = *(imgp->proc->p_sysent->sv_szsigcode);
 199         destp = (caddr_t)arginfo - szsigcode - SPARE_USRSPACE -
 200                 roundup((ARG_MAX - imgp->args->stringspace), sizeof(char *));
 201
 202         /*
 203          * install sigcode
 204          */
 205         if (szsigcode)
 206                 copyout(imgp->proc->p_sysent->sv_sigcode,
 207                         ((caddr_t)arginfo - szsigcode), szsigcode);
 208
 209         /*
 210          * If we have a valid auxargs ptr, prepare some room
 211          * on the stack.
 212          */
 213         if (imgp->auxargs) {
 214                 /*
 215                  * 'AT_COUNT*2' is size for the ELF Auxargs data. This is for
 216                  * lower compatibility.
 217                  */
 218                 imgp->auxarg_size = (imgp->auxarg_size) ? imgp->auxarg_size
 219                         : (AT_COUNT * 2);
 220                 /*
 221                  * The '+ 2' is for the null pointers at the end of each of
 222                  * the arg and env vector sets,and imgp->auxarg_size is room
 223                  * for argument of Runtime loader.
 224                  */
 225                 vectp = (u_int32_t *) (destp - (imgp->args->argc + imgp->args->envc + 2 +
 226                                        imgp->auxarg_size) * sizeof(u_int32_t));
 227
 228         } else
 229                 /*
 230                  * The '+ 2' is for the null pointers at the end of each of
 231                  * the arg and env vector sets
 232                  */
 233                 vectp = (u_int32_t *)
 234                         (destp - (imgp->args->argc + imgp->args->envc + 2) * sizeof(u_int32_t));
 235
 236         /*
 237          * vectp also becomes our initial stack base
 238          */
 239         stack_base = vectp;
 240
 241         stringp = imgp->args->begin_argv;
 242         argc = imgp->args->argc;
 243         envc = imgp->args->envc;
 244         /*
 245          * Copy out strings - arguments and environment.
 246          */
 247         copyout(stringp, destp, ARG_MAX - imgp->args->stringspace);
 248
 249         /*
 250          * Fill in "ps_strings" struct for ps, w, etc.
 251          */
 252         suword32(&arginfo->ps_argvstr, (u_int32_t)(intptr_t)vectp);
 253         suword32(&arginfo->ps_nargvstr, argc);
 254
 255         /*
 256          * Fill in argument portion of vector table.
 257          */
 258         for (; argc > 0; --argc) {
 259                 suword32(vectp++, (u_int32_t)(intptr_t)destp);
 260                 while (*stringp++ != 0)
 261                         destp++;
 262                 destp++;
 263         }
 264
 265         /* a null vector table pointer separates the argp's from the envp's */
 266         suword32(vectp++, 0);
 267
 268         suword32(&arginfo->ps_envstr, (u_int32_t)(intptr_t)vectp);
 269         suword32(&arginfo->ps_nenvstr, envc);
 270
 271         /*
 272          * Fill in environment portion of vector table.
 273          */
 274         for (; envc > 0; --envc) {
 275                 suword32(vectp++, (u_int32_t)(intptr_t)destp);
 276                 while (*stringp++ != 0)
 277                         destp++;
 278                 destp++;
 279         }
 280
 281         /* end of vector table is a null pointer */
 282         suword32(vectp, 0);
 283
 284         return ((register_t *)stack_base);
 285 }
 286
 287 static void
 288 ia32_fixlimit(struct rlimit *rl, int which)
 289 {
 290
 291         switch (which) {
 292         case RLIMIT_DATA:
 293                 if (ia32_maxdsiz != 0) {
 294                         if (rl->rlim_cur > ia32_maxdsiz)
 295                                 rl->rlim_cur = ia32_maxdsiz;
 296                         if (rl->rlim_max > ia32_maxdsiz)
 297                                 rl->rlim_max = ia32_maxdsiz;
 298                 }
 299                 break;
 300         case RLIMIT_STACK:
 301                 if (ia32_maxssiz != 0) {
 302                         if (rl->rlim_cur > ia32_maxssiz)
 303                                 rl->rlim_cur = ia32_maxssiz;
 304                         if (rl->rlim_max > ia32_maxssiz)
 305                                 rl->rlim_max = ia32_maxssiz;
 306                 }
 307                 break;
 308         case RLIMIT_VMEM:
 309                 if (ia32_maxvmem != 0) {
 310                         if (rl->rlim_cur > ia32_maxvmem)
 311                                 rl->rlim_cur = ia32_maxvmem;
 312                         if (rl->rlim_max > ia32_maxvmem)
 313                                 rl->rlim_max = ia32_maxvmem;
 314                 }
 315                 break;
 316         }
 317 }