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 extern struct sysent freebsd32_sysent[];
 100
 101 SYSCTL_NODE(_compat, OID_AUTO, ia32, CTLFLAG_RW, 0, "ia32 mode");
 102
 103 static u_long   ia32_maxdsiz = IA32_MAXDSIZ;
 104 SYSCTL_ULONG(_compat_ia32, OID_AUTO, maxdsiz, CTLFLAG_RW, &ia32_maxdsiz, 0, "");
 105 TUNABLE_ULONG("compat.ia32.maxdsiz", &ia32_maxdsiz);
 106 static u_long   ia32_maxssiz = IA32_MAXSSIZ;
 107 SYSCTL_ULONG(_compat_ia32, OID_AUTO, maxssiz, CTLFLAG_RW, &ia32_maxssiz, 0, "");
 108 TUNABLE_ULONG("compat.ia32.maxssiz", &ia32_maxssiz);
 109 static u_long   ia32_maxvmem = IA32_MAXVMEM;
 110 SYSCTL_ULONG(_compat_ia32, OID_AUTO, maxvmem, CTLFLAG_RW, &ia32_maxvmem, 0, "");
 111 TUNABLE_ULONG("compat.ia32.maxvmem", &ia32_maxvmem);
 112
 113 struct sysentvec ia32_freebsd_sysvec = {
 114         FREEBSD32_SYS_MAXSYSCALL,
 115         freebsd32_sysent,
 116         0,
 117         0,
 118         NULL,
 119         0,
 120         NULL,
 121         NULL,
 122         elf32_freebsd_fixup,
 123         ia32_sendsig,
 124         ia32_sigcode,
 125         &sz_ia32_sigcode,
 126         NULL,
 127         "FreeBSD ELF32",
 128         elf32_coredump,
 129         NULL,
 130         MINSIGSTKSZ,
 131         IA32_PAGE_SIZE,
 132         0,
 133         FREEBSD32_USRSTACK,
 134         FREEBSD32_USRSTACK,
 135         FREEBSD32_PS_STRINGS,
 136         VM_PROT_ALL,
 137         ia32_copyout_strings,
 138         ia32_setregs,
 139         ia32_fixlimit,
 140         &ia32_maxssiz
 141 };
 142
 143
 144 static Elf32_Brandinfo ia32_brand_info = {
 145                                                 ELFOSABI_FREEBSD,
 146                                                 EM_386,
 147                                                 "FreeBSD",
 148                                                 NULL,
 149                                                 "/libexec/ld-elf.so.1",
 150                                                 &ia32_freebsd_sysvec,
 151                                                 "/libexec/ld-elf32.so.1",
 152                                                 BI_CAN_EXEC_DYN,
 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                                                 ELFOSABI_FREEBSD,
 161                                                 EM_386,
 162                                                 "FreeBSD",
 163                                                 NULL,
 164                                                 "/usr/libexec/ld-elf.so.1",
 165                                                 &ia32_freebsd_sysvec,
 166                                                 "/libexec/ld-elf32.so.1",
 167                                                 BI_CAN_EXEC_DYN,
 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 }