Home | History | Annotate | Line # | Download | only in kern
exec_ecoff.c revision 1.3.2.2
      1  1.3.2.2  mycroft /*	$NetBSD: exec_ecoff.c,v 1.3.2.2 1994/08/18 22:44:03 mycroft Exp $	*/
      2      1.3      cgd 
      3      1.1    glass /*
      4      1.1    glass  * Copyright (c) 1994 Adam Glass
      5      1.1    glass  * Copyright (c) 1993, 1994 Christopher G. Demetriou
      6      1.1    glass  * All rights reserved.
      7      1.1    glass  *
      8      1.1    glass  * Redistribution and use in source and binary forms, with or without
      9      1.1    glass  * modification, are permitted provided that the following conditions
     10      1.1    glass  * are met:
     11      1.1    glass  * 1. Redistributions of source code must retain the above copyright
     12      1.1    glass  *    notice, this list of conditions and the following disclaimer.
     13      1.1    glass  * 2. Redistributions in binary form must reproduce the above copyright
     14      1.1    glass  *    notice, this list of conditions and the following disclaimer in the
     15      1.1    glass  *    documentation and/or other materials provided with the distribution.
     16      1.1    glass  * 3. All advertising materials mentioning features or use of this software
     17      1.1    glass  *    must display the following acknowledgement:
     18      1.1    glass  *      This product includes software developed by Christopher G. Demetriou.
     19      1.1    glass  * 4. The name of the author may not be used to endorse or promote products
     20      1.1    glass  *    derived from this software without specific prior written permission
     21      1.1    glass  *
     22      1.1    glass  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     23      1.1    glass  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     24      1.1    glass  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     25      1.1    glass  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     26      1.1    glass  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     27      1.1    glass  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     28      1.1    glass  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     29      1.1    glass  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     30      1.1    glass  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     31      1.1    glass  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     32      1.1    glass  */
     33      1.1    glass 
     34      1.1    glass #include <sys/param.h>
     35      1.1    glass #include <sys/systm.h>
     36      1.1    glass #include <sys/proc.h>
     37      1.1    glass #include <sys/malloc.h>
     38      1.1    glass #include <sys/vnode.h>
     39      1.1    glass #include <sys/exec.h>
     40      1.1    glass #include <sys/resourcevar.h>
     41      1.1    glass #include <vm/vm.h>
     42      1.1    glass 
     43      1.1    glass #include <sys/exec_ecoff.h>
     44      1.1    glass 
     45      1.2    glass int	exec_ecoff_prep_omagic __P((struct proc *, struct exec_package *,
     46      1.2    glass 				    struct ecoff_filehdr *,
     47      1.2    glass 				    struct ecoff_aouthdr *));
     48      1.2    glass int	exec_ecoff_prep_nmagic __P((struct proc *, struct exec_package *,
     49      1.1    glass 				    struct ecoff_filehdr *,
     50      1.1    glass 				    struct ecoff_aouthdr *));
     51      1.2    glass int	exec_ecoff_prep_zmagic __P((struct proc *, struct exec_package *,
     52      1.1    glass 				    struct ecoff_filehdr *,
     53      1.1    glass 				    struct ecoff_aouthdr *));
     54      1.1    glass int	exec_ecoff_setup_stack __P((struct proc *, struct exec_package *));
     55      1.1    glass 
     56      1.1    glass /*
     57      1.1    glass  * exec_ecoff_makecmds(): Check if it's an ecoff-format executable.
     58      1.1    glass  *
     59      1.1    glass  * Given a proc pointer and an exec package pointer, see if the referent
     60      1.1    glass  * of the epp is in ecoff format.  Check 'standard' magic numbers for
     61      1.1    glass  * this architecture.  If that fails, return failure.
     62      1.1    glass  *
     63      1.1    glass  * This function is  responsible for creating a set of vmcmds which can be
     64      1.1    glass  * used to build the process's vm space and inserting them into the exec
     65      1.1    glass  * package.
     66      1.1    glass  */
     67      1.1    glass 
     68      1.1    glass int
     69      1.1    glass exec_ecoff_makecmds(p, epp)
     70      1.1    glass 	struct proc *p;
     71      1.1    glass 	struct exec_package *epp;
     72      1.1    glass {
     73      1.1    glass 	u_long midmag, magic;
     74      1.1    glass 	u_short mid;
     75      1.1    glass 	int error;
     76      1.1    glass 	struct ecoff_filehdr *efp = epp->ep_hdr;
     77      1.1    glass 	struct ecoff_aouthdr *eap;
     78      1.1    glass 
     79      1.1    glass 	if (epp->ep_hdrvalid < ECOFF_HDR_SIZE)
     80      1.1    glass 		return ENOEXEC;
     81      1.1    glass 
     82      1.1    glass 	if (ECOFF_BADMAG(efp))
     83      1.1    glass 		return ENOEXEC;
     84      1.1    glass 
     85  1.3.2.2  mycroft 	eap = (struct ecoff_aouthdr *)
     86  1.3.2.2  mycroft 	    ((caddr_t)epp->ep_hdr + sizeof(struct ecoff_filehdr));
     87      1.1    glass 	switch (eap->ea_magic) {
     88      1.2    glass 	case ECOFF_OMAGIC:
     89      1.2    glass 		error = exec_ecoff_prep_omagic(p, epp, efp, eap);
     90      1.2    glass 		break;
     91      1.2    glass 	case ECOFF_NMAGIC:
     92      1.2    glass 		error = exec_ecoff_prep_nmagic(p, epp, efp, eap);
     93      1.2    glass 		break;
     94      1.1    glass 	case ECOFF_ZMAGIC:
     95      1.1    glass 		error = exec_ecoff_prep_zmagic(p, epp, efp, eap);
     96      1.1    glass 		break;
     97      1.1    glass 	default:
     98      1.1    glass 		return ENOEXEC;
     99      1.1    glass 	}
    100      1.1    glass 
    101      1.1    glass 	if (error == 0)
    102      1.1    glass 		error = cpu_exec_ecoff_hook(p, epp, eap);
    103      1.1    glass 
    104      1.1    glass 	if (error)
    105      1.1    glass 		kill_vmcmds(&epp->ep_vmcmds);
    106      1.1    glass 
    107      1.1    glass bad:
    108      1.1    glass 	return error;
    109      1.1    glass }
    110      1.1    glass 
    111      1.1    glass /*
    112      1.2    glass  * exec_ecoff_setup_stack(): Set up the stack segment for an ecoff
    113      1.2    glass  * executable.
    114      1.1    glass  *
    115      1.2    glass  * Note that the ep_ssize parameter must be set to be the current stack
    116      1.2    glass  * limit; this is adjusted in the body of execve() to yield the
    117      1.2    glass  * appropriate stack segment usage once the argument length is
    118      1.2    glass  * calculated.
    119      1.1    glass  *
    120      1.2    glass  * This function returns an int for uniformity with other (future) formats'
    121      1.2    glass  * stack setup functions.  They might have errors to return.
    122      1.1    glass  */
    123      1.1    glass 
    124      1.2    glass int
    125      1.2    glass exec_ecoff_setup_stack(p, epp)
    126      1.1    glass 	struct proc *p;
    127      1.1    glass 	struct exec_package *epp;
    128      1.1    glass {
    129      1.2    glass 
    130      1.2    glass 	epp->ep_maxsaddr = USRSTACK - MAXSSIZ;
    131      1.2    glass 	epp->ep_minsaddr = USRSTACK;
    132      1.2    glass 	epp->ep_ssize = p->p_rlimit[RLIMIT_STACK].rlim_cur;
    133      1.1    glass 
    134      1.1    glass 	/*
    135      1.2    glass 	 * set up commands for stack.  note that this takes *two*, one to
    136      1.2    glass 	 * map the part of the stack which we can access, and one to map
    137      1.2    glass 	 * the part which we can't.
    138      1.2    glass 	 *
    139      1.2    glass 	 * arguably, it could be made into one, but that would require the
    140      1.2    glass 	 * addition of another mapping proc, which is unnecessary
    141      1.2    glass 	 *
    142      1.2    glass 	 * note that in memory, things assumed to be: 0 ....... ep_maxsaddr
    143      1.2    glass 	 * <stack> ep_minsaddr
    144      1.1    glass 	 */
    145      1.2    glass 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero,
    146      1.2    glass 		  ((epp->ep_minsaddr - epp->ep_ssize) - epp->ep_maxsaddr),
    147      1.2    glass 		  epp->ep_maxsaddr, NULLVP, 0, VM_PROT_NONE);
    148      1.2    glass 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, epp->ep_ssize,
    149      1.2    glass 		  (epp->ep_minsaddr - epp->ep_ssize), NULLVP, 0,
    150      1.1    glass 		  VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
    151      1.1    glass 
    152      1.2    glass 	return 0;
    153      1.2    glass }
    154      1.1    glass 
    155      1.1    glass 
    156      1.1    glass /*
    157      1.1    glass  * exec_ecoff_prep_omagic(): Prepare a ECOFF OMAGIC binary's exec package
    158      1.1    glass  */
    159      1.2    glass 
    160      1.2    glass int
    161      1.2    glass exec_ecoff_prep_omagic(p, epp, efp, eap)
    162      1.1    glass 	struct proc *p;
    163      1.1    glass 	struct exec_package *epp;
    164      1.1    glass 	struct ecoff_filehdr *efp;
    165      1.1    glass 	struct ecoff_aouthdr *eap;
    166      1.1    glass {
    167      1.2    glass 	epp->ep_taddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_text_start);
    168      1.1    glass 	epp->ep_tsize = eap->ea_tsize;
    169      1.2    glass 	epp->ep_daddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_data_start);
    170  1.3.2.1      cgd 	epp->ep_dsize = eap->ea_dsize + eap->ea_bsize;
    171      1.1    glass 	epp->ep_entry = eap->ea_entry;
    172      1.1    glass 
    173      1.1    glass 	/* set up command for text and data segments */
    174      1.1    glass 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn,
    175      1.1    glass 		  eap->ea_tsize + eap->ea_dsize, epp->ep_taddr, epp->ep_vp,
    176      1.1    glass 		  ECOFF_TXTOFF(efp, eap),
    177      1.1    glass 		  VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
    178      1.1    glass 
    179      1.1    glass 	/* set up command for bss segment */
    180      1.1    glass 	if (eap->ea_bsize > 0)
    181      1.1    glass 		NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, eap->ea_bsize,
    182      1.2    glass 			  ECOFF_SEGMENT_ALIGN(eap, eap->ea_bss_start),
    183      1.2    glass 			  NULLVP, 0,
    184      1.1    glass 			  VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
    185      1.1    glass 
    186      1.1    glass 	return exec_ecoff_setup_stack(p, epp);
    187      1.1    glass }
    188      1.1    glass 
    189      1.1    glass /*
    190      1.2    glass  * exec_ecoff_prep_nmagic(): Prepare a 'native' NMAGIC ECOFF binary's exec
    191      1.2    glass  *                           package.
    192      1.2    glass  */
    193      1.2    glass 
    194      1.2    glass int
    195      1.2    glass exec_ecoff_prep_nmagic(p, epp, efp, eap)
    196      1.2    glass 	struct proc *p;
    197      1.2    glass 	struct exec_package *epp;
    198      1.2    glass 	struct ecoff_filehdr *efp;
    199      1.2    glass 	struct ecoff_aouthdr *eap;
    200      1.2    glass {
    201      1.2    glass 	epp->ep_taddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_text_start);
    202      1.2    glass 	epp->ep_tsize = eap->ea_tsize;
    203      1.2    glass 	epp->ep_daddr = ECOFF_ROUND(eap->ea_data_start, ECOFF_LDPGSZ);
    204  1.3.2.1      cgd 	epp->ep_dsize = eap->ea_dsize + eap->ea_bsize;
    205      1.2    glass 	epp->ep_entry = eap->ea_entry;
    206      1.2    glass 
    207      1.2    glass 	/* set up command for text segment */
    208      1.2    glass 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn, epp->ep_tsize,
    209      1.2    glass 		  epp->ep_taddr, epp->ep_vp, ECOFF_TXTOFF(efp, eap),
    210      1.2    glass 		  VM_PROT_READ|VM_PROT_EXECUTE);
    211      1.2    glass 
    212      1.2    glass 	/* set up command for data segment */
    213      1.2    glass 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_readvn, epp->ep_dsize,
    214      1.2    glass 		  epp->ep_daddr, epp->ep_vp, ECOFF_DATOFF(efp, eap),
    215      1.2    glass 		  VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
    216      1.2    glass 
    217      1.2    glass 	/* set up command for bss segment */
    218      1.2    glass 	if (eap->ea_bsize > 0)
    219      1.2    glass 		NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, eap->ea_bsize,
    220      1.2    glass 			  ECOFF_SEGMENT_ALIGN(eap, eap->ea_bss_start),
    221      1.2    glass 			  NULLVP, 0,
    222      1.2    glass 			  VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
    223      1.2    glass 
    224      1.2    glass 	return exec_ecoff_setup_stack(p, epp);
    225      1.2    glass }
    226      1.2    glass 
    227      1.2    glass /*
    228      1.2    glass  * exec_ecoff_prep_zmagic(): Prepare a ECOFF ZMAGIC binary's exec package
    229      1.1    glass  *
    230      1.2    glass  * First, set the various offsets/lengths in the exec package.
    231      1.1    glass  *
    232      1.2    glass  * Then, mark the text image busy (so it can be demand paged) or error
    233      1.2    glass  * out if this is not possible.  Finally, set up vmcmds for the
    234      1.2    glass  * text, data, bss, and stack segments.
    235      1.1    glass  */
    236      1.1    glass 
    237      1.1    glass int
    238      1.2    glass exec_ecoff_prep_zmagic(p, epp, efp, eap)
    239      1.1    glass 	struct proc *p;
    240      1.1    glass 	struct exec_package *epp;
    241      1.2    glass 	struct ecoff_filehdr *efp;
    242      1.2    glass 	struct ecoff_aouthdr *eap;
    243      1.1    glass {
    244      1.2    glass 	epp->ep_taddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_text_start);
    245      1.2    glass 	epp->ep_tsize = eap->ea_tsize;
    246      1.2    glass 	epp->ep_daddr = ECOFF_SEGMENT_ALIGN(eap, eap->ea_data_start);
    247  1.3.2.1      cgd 	epp->ep_dsize = eap->ea_dsize + eap->ea_bsize;
    248      1.2    glass 	epp->ep_entry = eap->ea_entry;
    249      1.1    glass 
    250      1.1    glass 	/*
    251      1.2    glass 	 * check if vnode is in open for writing, because we want to
    252      1.2    glass 	 * demand-page out of it.  if it is, don't do it, for various
    253      1.2    glass 	 * reasons
    254      1.1    glass 	 */
    255      1.2    glass 	if ((eap->ea_tsize != 0 || eap->ea_dsize != 0) &&
    256      1.2    glass 	    epp->ep_vp->v_writecount != 0) {
    257      1.2    glass #ifdef DIAGNOSTIC
    258      1.2    glass 		if (epp->ep_vp->v_flag & VTEXT)
    259      1.2    glass 			panic("exec: a VTEXT vnode has writecount != 0\n");
    260      1.2    glass #endif
    261      1.2    glass 		return ETXTBSY;
    262      1.2    glass 	}
    263      1.2    glass 	epp->ep_vp->v_flag |= VTEXT;
    264      1.2    glass 
    265      1.2    glass 	/* set up command for text segment */
    266      1.2    glass 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_pagedvn, eap->ea_tsize,
    267      1.2    glass 		  epp->ep_taddr, epp->ep_vp, ECOFF_TXTOFF(efp, eap),
    268      1.2    glass 		  VM_PROT_READ|VM_PROT_EXECUTE);
    269      1.2    glass 
    270      1.2    glass 	/* set up command for data segment */
    271      1.2    glass 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_pagedvn, eap->ea_dsize,
    272      1.2    glass 		  epp->ep_daddr, epp->ep_vp,
    273      1.2    glass 		  ECOFF_DATOFF(efp, eap),
    274      1.2    glass 		  VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
    275      1.2    glass 
    276      1.2    glass 	/* set up command for bss segment */
    277      1.2    glass 	NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, eap->ea_bsize,
    278      1.2    glass 		  ECOFF_SEGMENT_ALIGN(eap, eap->ea_bss_start), NULLVP, 0,
    279      1.2    glass 		  VM_PROT_READ|VM_PROT_WRITE|VM_PROT_EXECUTE);
    280      1.1    glass 
    281      1.2    glass 	return exec_ecoff_setup_stack(p, epp);
    282      1.1    glass }
    283