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         .sv_flags       = SV_ABI_FREEBSD | SV_IA32 | SV_ILP32
 140 };
 141
 142
 143 static Elf32_Brandinfo ia32_brand_info = {
 144         .brand          = ELFOSABI_FREEBSD,
 145         .machine        = EM_386,
 146         .compat_3_brand = "FreeBSD",
 147         .emul_path      = NULL,
 148         .interp_path    = "/libexec/ld-elf.so.1",
 149         .sysvec         = &ia32_freebsd_sysvec,
 150         .interp_newpath = "/libexec/ld-elf32.so.1",
 151         .brand_note     = &elf32_freebsd_brandnote,
 152         .flags          = BI_CAN_EXEC_DYN | BI_BRAND_NOTE
 153 };
 154
 155 SYSINIT(ia32, SI_SUB_EXEC, SI_ORDER_ANY,
 156         (sysinit_cfunc_t) elf32_insert_brand_entry,
 157         &ia32_brand_info);
 158
 159 static Elf32_Brandinfo ia32_brand_oinfo = {
 160         .brand          = ELFOSABI_FREEBSD,
 161         .machine        = EM_386,
 162         .compat_3_brand = "FreeBSD",
 163         .emul_path      = NULL,
 164         .interp_path    = "/usr/libexec/ld-elf.so.1",
 165         .sysvec         = &ia32_freebsd_sysvec,
 166         .interp_newpath = "/libexec/ld-elf32.so.1",
 167         .brand_note     = &elf32_freebsd_brandnote,
 168         .flags          = BI_CAN_EXEC_DYN | BI_BRAND_NOTE
 169 };
 170
 171 SYSINIT(oia32, SI_SUB_EXEC, SI_ORDER_ANY,
 172         (sysinit_cfunc_t) elf32_insert_brand_entry,
 173         &ia32_brand_oinfo);
 174
 175
 176 void
 177 elf32_dump_thread(struct thread *td __unused, void *dst __unused,
 178     size_t *off __unused)
 179 {
 180 }
 181
 182
 183 /* XXX may be freebsd32 MI */
 184 static register_t *
 185 ia32_copyout_strings(struct image_params *imgp)
 186 {
 187         int argc, envc;
 188         u_int32_t *vectp;
 189         char *stringp, *destp;
 190         u_int32_t *stack_base;
 191         struct freebsd32_ps_strings *arginfo;
 192         size_t execpath_len;
 193         int szsigcode;
 194
 195         /*
 196          * Calculate string base and vector table pointers.
 197          * Also deal with signal trampoline code for this exec type.
 198          */
 199         if (imgp->execpath != NULL && imgp->auxargs != NULL)
 200                 execpath_len = strlen(imgp->execpath) + 1;
 201         else
 202                 execpath_len = 0;
 203         arginfo = (struct freebsd32_ps_strings *)FREEBSD32_PS_STRINGS;
 204         szsigcode = *(imgp->proc->p_sysent->sv_szsigcode);
 205         destp = (caddr_t)arginfo - szsigcode - SPARE_USRSPACE -
 206                 roundup(execpath_len, sizeof(char *)) -
 207                 roundup((ARG_MAX - imgp->args->stringspace), sizeof(char *));
 208
 209         /*
 210          * install sigcode
 211          */
 212         if (szsigcode)
 213                 copyout(imgp->proc->p_sysent->sv_sigcode,
 214                         ((caddr_t)arginfo - szsigcode), szsigcode);
 215
 216         /*
 217          * Copy the image path for the rtld.
 218          */
 219         if (execpath_len != 0) {
 220                 imgp->execpathp = (uintptr_t)arginfo - szsigcode - execpath_len;
 221                 copyout(imgp->execpath, (void *)imgp->execpathp,
 222                     execpath_len);
 223         }
 224
 225         /*
 226          * If we have a valid auxargs ptr, prepare some room
 227          * on the stack.
 228          */
 229         if (imgp->auxargs) {
 230                 /*
 231                  * 'AT_COUNT*2' is size for the ELF Auxargs data. This is for
 232                  * lower compatibility.
 233                  */
 234                 imgp->auxarg_size = (imgp->auxarg_size) ? imgp->auxarg_size
 235                         : (AT_COUNT * 2);
 236                 /*
 237                  * The '+ 2' is for the null pointers at the end of each of
 238                  * the arg and env vector sets,and imgp->auxarg_size is room
 239                  * for argument of Runtime loader.
 240                  */
 241                 vectp = (u_int32_t *) (destp - (imgp->args->argc +
 242                     imgp->args->envc + 2 + imgp->auxarg_size + execpath_len) *
 243                     sizeof(u_int32_t));
 244         } else
 245                 /*
 246                  * The '+ 2' is for the null pointers at the end of each of
 247                  * the arg and env vector sets
 248                  */
 249                 vectp = (u_int32_t *)
 250                         (destp - (imgp->args->argc + imgp->args->envc + 2) * sizeof(u_int32_t));
 251
 252         /*
 253          * vectp also becomes our initial stack base
 254          */
 255         stack_base = vectp;
 256
 257         stringp = imgp->args->begin_argv;
 258         argc = imgp->args->argc;
 259         envc = imgp->args->envc;
 260         /*
 261          * Copy out strings - arguments and environment.
 262          */
 263         copyout(stringp, destp, ARG_MAX - imgp->args->stringspace);
 264
 265         /*
 266          * Fill in "ps_strings" struct for ps, w, etc.
 267          */
 268         suword32(&arginfo->ps_argvstr, (u_int32_t)(intptr_t)vectp);
 269         suword32(&arginfo->ps_nargvstr, argc);
 270
 271         /*
 272          * Fill in argument portion of vector table.
 273          */
 274         for (; argc > 0; --argc) {
 275                 suword32(vectp++, (u_int32_t)(intptr_t)destp);
 276                 while (*stringp++ != 0)
 277                         destp++;
 278                 destp++;
 279         }
 280
 281         /* a null vector table pointer separates the argp's from the envp's */
 282         suword32(vectp++, 0);
 283
 284         suword32(&arginfo->ps_envstr, (u_int32_t)(intptr_t)vectp);
 285         suword32(&arginfo->ps_nenvstr, envc);
 286
 287         /*
 288          * Fill in environment portion of vector table.
 289          */
 290         for (; envc > 0; --envc) {
 291                 suword32(vectp++, (u_int32_t)(intptr_t)destp);
 292                 while (*stringp++ != 0)
 293                         destp++;
 294                 destp++;
 295         }
 296
 297         /* end of vector table is a null pointer */
 298         suword32(vectp, 0);
 299
 300         return ((register_t *)stack_base);
 301 }
 302
 303 static void
 304 ia32_fixlimit(struct rlimit *rl, int which)
 305 {
 306
 307         switch (which) {
 308         case RLIMIT_DATA:
 309                 if (ia32_maxdsiz != 0) {
 310                         if (rl->rlim_cur > ia32_maxdsiz)
 311                                 rl->rlim_cur = ia32_maxdsiz;
 312                         if (rl->rlim_max > ia32_maxdsiz)
 313                                 rl->rlim_max = ia32_maxdsiz;
 314                 }
 315                 break;
 316         case RLIMIT_STACK:
 317                 if (ia32_maxssiz != 0) {
 318                         if (rl->rlim_cur > ia32_maxssiz)
 319                                 rl->rlim_cur = ia32_maxssiz;
 320                         if (rl->rlim_max > ia32_maxssiz)
 321                                 rl->rlim_max = ia32_maxssiz;
 322                 }
 323                 break;
 324         case RLIMIT_VMEM:
 325                 if (ia32_maxvmem != 0) {
 326                         if (rl->rlim_cur > ia32_maxvmem)
 327                                 rl->rlim_cur = ia32_maxvmem;
 328                         if (rl->rlim_max > ia32_maxvmem)
 329                                 rl->rlim_max = ia32_maxvmem;
 330                 }
 331                 break;
 332         }
 333 }