root/compat/hpux/hppa/hpux_exec.c

DEFINITIONS

1. exec_hpux_makecmds
2. exec_hpux_som_nmagic
3. exec_hpux_som_zmagic
4. exec_hpux_som_omagic
5. hpux_sys_execv
6. hpux_sys_execve

    1 /*      $OpenBSD: hpux_exec.c,v 1.3 2005/12/30 19:46:53 miod Exp $      */
    3 /*
    4  * Copyright (c) 2004 Michael Shalayeff.  All rights reserved.
    5  * Copyright (c) 1995, 1997 Jason R. Thorpe.  All rights reserved.
    6  * Copyright (c) 1993, 1994 Christopher G. Demetriou
    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  * 3. All advertising materials mentioning features or use of this software
   17  *      This product includes software developed by Christopher G. Demetriou.
   18  * 4. The name of the author may not be used to endorse or promote products
   19  *    derived from this software without specific prior written permission
   20  *
   21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
   22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
   23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
   24  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
   25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
   26  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
   27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
   28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
   29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
   30  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
   31  */
   33 /*
   34  * Glue for exec'ing HP-UX executables and the HP-UX execv() system call.
   35  * Based on sys/kern/exec_aout.c
   36  */
   38 #include <sys/param.h>
   39 #include <sys/systm.h>
   40 #include <sys/kernel.h>
   41 #include <sys/proc.h>
   42 #include <sys/malloc.h>
   43 #include <sys/mount.h>
   44 #include <sys/namei.h>
   45 #include <sys/user.h>
   46 #include <sys/vnode.h>
   47 #include <sys/mman.h>
   48 #include <sys/stat.h>
   50 #include <uvm/uvm_extern.h>
   52 #include <machine/cpu.h>
   53 #include <machine/reg.h>
   55 #include <sys/syscallargs.h>    
   57 #include <compat/hpux/hpux.h>
   58 #include <compat/hpux/hpux_util.h>
   59 #include <compat/hpux/hppa/hpux_syscall.h>
   60 #include <compat/hpux/hppa/hpux_syscallargs.h>
   62 #include <machine/hpux_machdep.h>
   64 const char hpux_emul_path[] = "/emul/hpux";
   65 extern char hpux_sigcode[], hpux_esigcode[];
   66 extern struct sysent hpux_sysent[];
   67 #ifdef SYSCALL_DEBUG
   68 extern char *hpux_syscallnames[];
   69 #endif
   70 extern int bsdtohpuxerrnomap[];
   72 int exec_hpux_som_nmagic(struct proc *, struct exec_package *);
   73 int exec_hpux_som_zmagic(struct proc *, struct exec_package *);
   74 int exec_hpux_som_omagic(struct proc *, struct exec_package *);
   76 struct emul emul_hpux = {
   77         "hpux",
bsdtohpuxerrnomap,
hpux_sendsig,
HPUX_SYS_syscall,
HPUX_SYS_MAXSYSCALL,
hpux_sysent,
   83 #ifdef SYSCALL_DEBUG
hpux_syscallnames,
   85 #else
NULL,
   87 #endif
   88         0,
copyargs,
hpux_setregs,
NULL,
hpux_sigcode,
hpux_esigcode,
   94 };
   96 int
exec_hpux_makecmds(p, epp)
   98         struct proc *p;
   99         struct exec_package *epp;
  100 {
  101         struct som_exec *som_ep = epp->ep_hdr;
  102         short sysid, magic;
  103         int error = ENOEXEC;
sysid = HPUX_SYSID(som_ep);
  106         if (sysid != MID_HPUX800 && sysid != MID_HPPA11 && sysid != MID_HPPA20)
  107                 return (error);
  109         /* XXX read in the aux header if it was not following the som header */
  110         if (sysid != MID_HPUX && (!(som_ep->som_version == HPUX_SOM_V0 ||
som_ep->som_version == HPUX_SOM_V1) ||
som_ep->som_auxhdr + sizeof(struct som_aux) > epp->ep_hdrvalid)) {
  113                 return (error);
  114         }
  116         /*
  117          * HP-UX is a 4k page size system, and executables assume
  118          * this.
  119          */
  120         if (PAGE_SIZE != HPUX_LDPGSZ)
  121                 return (error);
magic = HPUX_MAGIC(som_ep);
  124         switch (magic) {
  125         case OMAGIC:
error = exec_hpux_som_omagic(p, epp);
  127                 break;
  129         case NMAGIC:
error = exec_hpux_som_nmagic(p, epp);
  131                 break;
  133         case ZMAGIC:
error = exec_hpux_som_zmagic(p, epp);
  135                 break;
  136         }
  138         if (error == 0) {
  139                 /* set up our emulation information */
epp->ep_emul = &emul_hpux;
  141         } else
kill_vmcmds(&epp->ep_vmcmds);
  144         return (error);
  145 }
  147 int
exec_hpux_som_nmagic(struct proc *p, struct exec_package *epp)
  149 {
  150         struct som_exec *execp = epp->ep_hdr;
  151         struct som_aux *auxp = epp->ep_hdr + execp->som_auxhdr;
epp->ep_taddr = auxp->som_tmem;
epp->ep_tsize = auxp->som_tsize;
epp->ep_daddr = auxp->som_dmem;
epp->ep_dsize = auxp->som_dsize + auxp->som_bsize;
epp->ep_entry = auxp->som_entry;
  159         /* set up command for text segment */
NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn, epp->ep_tsize,
epp->ep_taddr, epp->ep_vp, auxp->som_tfile,
VM_PROT_READ|VM_PROT_EXECUTE);
  164         /* set up command for data segment */
NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn, auxp->som_dsize,
epp->ep_daddr, epp->ep_vp, auxp->som_dfile,
VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
  169         /* set up command for bss segment */
  170         if (auxp->som_bsize > 0)
NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, auxp->som_bsize,
epp->ep_daddr + auxp->som_dsize,
NULLVP, 0, VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
  175         return (exec_setup_stack(p, epp));
  176 }
  178 int
exec_hpux_som_zmagic(struct proc *p, struct exec_package *epp)
  180 {
  182         return (exec_setup_stack(p, epp));
  183 }
  185 int
exec_hpux_som_omagic(struct proc *p, struct exec_package *epp)
  187 {
  189         return (exec_setup_stack(p, epp));
  190 }
  192 /*
  193  * The HP-UX execv(2) system call.
  194  *
  195  * Just check the alternate emulation path, and pass it on to the NetBSD
  196  * execve().
  197  */
  198 int
hpux_sys_execv(p, v, retval)
  200         struct proc *p;
  201         void *v;
register_t *retval;
  203 {
  204         struct hpux_sys_execv_args /* {
  205                 syscallarg(char *) path;
  206                 syscallarg(char **) argv;
  207         } */ *uap = v;
  208         struct sys_execve_args ap;
caddr_t sg;
sg = stackgap_init(p->p_emul);
HPUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
SCARG(&ap, path) = SCARG(uap, path);
SCARG(&ap, argp) = SCARG(uap, argp);
SCARG(&ap, envp) = NULL;
  218         return sys_execve(p, &ap, retval);
  219 }
  221 int
hpux_sys_execve(p, v, retval)
  223         struct proc *p;
  224         void *v;
register_t *retval;
  226 {
  227         struct hpux_sys_execve_args /* {
  228                 syscallarg(char *) path;
  229                 syscallarg(char **) argv;
  230                 syscallarg(char **) envp;
  231         } */ *uap = v;
  232         struct sys_execve_args ap;
caddr_t sg;
sg = stackgap_init(p->p_emul);
HPUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
SCARG(&ap, path) = SCARG(uap, path);
SCARG(&ap, argp) = SCARG(uap, argp);
SCARG(&ap, envp) = SCARG(uap, envp);
  242         return (sys_execve(p, &ap, retval));
  243 }