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