sys/compat/netbsd32/netbsd32_exec_elf32.c

   1 /*      $NetBSD: netbsd32_exec_elf32.c,v 1.31 2009/12/14 00:47:11 matt Exp $    */
   2 /*      from: NetBSD: exec_aout.c,v 1.15 1996/09/26 23:34:46 cgd Exp */
   3
   4 /*
   5  * Copyright (c) 1998, 2001 Matthew R. Green.
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  */
  28
  29 /*
  30  * Copyright (c) 1993, 1994 Christopher G. Demetriou
  31  * All rights reserved.
  32  *
  33  * Redistribution and use in source and binary forms, with or without
  34  * modification, are permitted provided that the following conditions
  35  * are met:
  36  * 1. Redistributions of source code must retain the above copyright
  37  *    notice, this list of conditions and the following disclaimer.
  38  * 2. Redistributions in binary form must reproduce the above copyright
  39  *    notice, this list of conditions and the following disclaimer in the
  40  *    documentation and/or other materials provided with the distribution.
  41  * 3. All advertising materials mentioning features or use of this software
  42  *    must display the following acknowledgement:
  43  *      This product includes software developed by Christopher G. Demetriou.
  44  * 4. The name of the author may not be used to endorse or promote products
  45  *    derived from this software without specific prior written permission
  46  *
  47  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  48  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  49  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  50  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  51  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  52  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  53  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  54  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  55  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  56  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  57  */
  58
  59 #include <sys/cdefs.h>
  60 __KERNEL_RCSID(0, "$NetBSD: netbsd32_exec_elf32.c,v 1.31 2009/12/14 00:47:11 matt Exp $");
  61
  62 #define ELFSIZE         32
  63
  64 #include <sys/param.h>
  65 #include <sys/systm.h>
  66 #include <sys/proc.h>
  67 #include <sys/malloc.h>
  68 #include <sys/vnode.h>
  69 #include <sys/exec.h>
  70 #include <sys/exec_elf.h>
  71 #include <sys/resourcevar.h>
  72 #include <sys/signal.h>
  73 #include <sys/signalvar.h>
  74 #include <sys/kauth.h>
  75 #include <sys/namei.h>
  76
  77 #include <compat/common/compat_util.h>
  78
  79 #include <compat/netbsd32/netbsd32.h>
  80 #include <compat/netbsd32/netbsd32_exec.h>
  81
  82 #include <machine/netbsd32_machdep.h>
  83
  84 int netbsd32_copyinargs(struct exec_package *, struct ps_strings *,
  85                         void *, size_t, const void *, const void *);
  86 int ELFNAME2(netbsd32,probe_noteless)(struct lwp *, struct exec_package *epp,
  87                                       void *eh, char *itp, vaddr_t *pos);
  88 extern int ELFNAME2(netbsd,signature)(struct lwp *, struct exec_package *,
  89                                       Elf_Ehdr *);
  90
  91 int
  92 ELFNAME2(netbsd32,probe)(struct lwp *l, struct exec_package *epp,
  93                          void *eh, char *itp, vaddr_t *pos)
  94 {
  95         int error;
  96
  97         if ((error = ELFNAME2(netbsd,signature)(l, epp, eh)) != 0)
  98                 return error;
  99
 100 #ifdef ELF_MD_PROBE_FUNC
 101         if ((error = ELF_MD_PROBE_FUNC(l, epp, eh, itp, pos)) != 0)
 102                 return error;
 103 #elif defined(ELF_INTERP_NON_RELOCATABLE)
 104         *pos = ELF_LINK_ADDR;
 105 #endif
 106
 107         return ELFNAME2(netbsd32,probe_noteless)(l, epp, eh, itp, pos);
 108 }
 109
 110 int
 111 ELFNAME2(netbsd32,probe_noteless)(struct lwp *l, struct exec_package *epp,
 112                                   void *eh, char *itp, vaddr_t *pos)
 113 {
 114         if (itp && epp->ep_interp == NULL) {
 115                 extern const char machine32[];
 116                 (void)compat_elf_check_interp(epp, itp, machine32);
 117         }
 118         epp->ep_flags |= EXEC_32;
 119         epp->ep_vm_minaddr = VM_MIN_ADDRESS;
 120         epp->ep_vm_maxaddr = USRSTACK32;
 121 #ifdef ELF_INTERP_NON_RELOCATABLE
 122         *pos = ELF_LINK_ADDR;
 123 #endif
 124         return 0;
 125 }
 126
 127 /* round up and down to page boundaries. */
 128 #define ELF_ROUND(a, b)         (((a) + (b) - 1) & ~((b) - 1))
 129 #define ELF_TRUNC(a, b)         ((a) & ~((b) - 1))
 130
 131 /*
 132  * Copy arguments onto the stack in the normal way, but add some
 133  * extra information in case of dynamic binding.
 134  */
 135 int
 136 netbsd32_elf32_copyargs(struct lwp *l, struct exec_package *pack,
 137     struct ps_strings *arginfo, char **stackp, void *argp)
 138 {
 139         size_t len;
 140         AuxInfo ai[ELF_AUX_ENTRIES], *a;
 141         struct elf_args *ap;
 142         int error;
 143
 144         if ((error = netbsd32_copyargs(l, pack, arginfo, stackp, argp)) != 0)
 145                 return error;
 146
 147         a = ai;
 148
 149         /*
 150          * Push extra arguments on the stack needed by dynamically
 151          * linked binaries
 152          */
 153         if ((ap = (struct elf_args *)pack->ep_emul_arg)) {
 154
 155                 a->a_type = AT_PHDR;
 156                 a->a_v = ap->arg_phaddr;
 157                 a++;
 158
 159                 a->a_type = AT_PHENT;
 160                 a->a_v = ap->arg_phentsize;
 161                 a++;
 162
 163                 a->a_type = AT_PHNUM;
 164                 a->a_v = ap->arg_phnum;
 165                 a++;
 166
 167                 a->a_type = AT_PAGESZ;
 168                 a->a_v = PAGE_SIZE;
 169                 a++;
 170
 171                 a->a_type = AT_BASE;
 172                 a->a_v = ap->arg_interp;
 173                 a++;
 174
 175                 a->a_type = AT_FLAGS;
 176                 a->a_v = 0;
 177                 a++;
 178
 179                 a->a_type = AT_ENTRY;
 180                 a->a_v = ap->arg_entry;
 181                 a++;
 182
 183                 a->a_type = AT_EUID;
 184                 a->a_v = kauth_cred_geteuid(l->l_cred);
 185                 a++;
 186
 187                 a->a_type = AT_RUID;
 188                 a->a_v = kauth_cred_getuid(l->l_cred);
 189                 a++;
 190
 191                 a->a_type = AT_EGID;
 192                 a->a_v = kauth_cred_getegid(l->l_cred);
 193                 a++;
 194
 195                 a->a_type = AT_RGID;
 196                 a->a_v = kauth_cred_getgid(l->l_cred);
 197                 a++;
 198
 199                 free((char *)ap, M_TEMP);
 200                 pack->ep_emul_arg = NULL;
 201         }
 202
 203         a->a_type = AT_NULL;
 204         a->a_v = 0;
 205         a++;
 206
 207         len = (a - ai) * sizeof(AuxInfo);
 208         if ((error = copyout(ai, *stackp, len)) != 0)
 209                 return error;
 210         *stackp += len;
 211
 212         return 0;
 213 }