github.com/bgentry/go@v0.0.0-20150121062915-6cf5a733d54d/src/cmd/8l/obj.c (about)

     1  // Inferno utils/8l/obj.c
     2  // http://code.google.com/p/inferno-os/source/browse/utils/8l/obj.c
     3  //
     4  //	Copyright © 1994-1999 Lucent Technologies Inc.  All rights reserved.
     5  //	Portions Copyright © 1995-1997 C H Forsyth (forsyth@terzarima.net)
     6  //	Portions Copyright © 1997-1999 Vita Nuova Limited
     7  //	Portions Copyright © 2000-2007 Vita Nuova Holdings Limited (www.vitanuova.com)
     8  //	Portions Copyright © 2004,2006 Bruce Ellis
     9  //	Portions Copyright © 2005-2007 C H Forsyth (forsyth@terzarima.net)
    10  //	Revisions Copyright © 2000-2007 Lucent Technologies Inc. and others
    11  //	Portions Copyright © 2009 The Go Authors.  All rights reserved.
    12  //
    13  // Permission is hereby granted, free of charge, to any person obtaining a copy
    14  // of this software and associated documentation files (the "Software"), to deal
    15  // in the Software without restriction, including without limitation the rights
    16  // to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
    17  // copies of the Software, and to permit persons to whom the Software is
    18  // furnished to do so, subject to the following conditions:
    19  //
    20  // The above copyright notice and this permission notice shall be included in
    21  // all copies or substantial portions of the Software.
    22  //
    23  // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
    24  // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
    25  // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
    26  // AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
    27  // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
    28  // OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
    29  // THE SOFTWARE.
    30  
    31  // Reading object files.
    32  
    33  #include	"l.h"
    34  #include	"../ld/lib.h"
    35  #include	"../ld/elf.h"
    36  #include	"../ld/macho.h"
    37  #include	"../ld/dwarf.h"
    38  #include	"../ld/pe.h"
    39  #include	<ar.h>
    40  
    41  char*	thestring 	= "386";
    42  LinkArch*	thelinkarch = &link386;
    43  
    44  void
    45  linkarchinit(void)
    46  {
    47  }
    48  
    49  void
    50  archinit(void)
    51  {
    52  	// getgoextlinkenabled is based on GO_EXTLINK_ENABLED when
    53  	// Go was built; see ../../make.bash.
    54  	if(linkmode == LinkAuto && strcmp(getgoextlinkenabled(), "0") == 0)
    55  		linkmode = LinkInternal;
    56  
    57  	switch(HEADTYPE) {
    58  	default:
    59  		if(linkmode == LinkAuto)
    60  			linkmode = LinkInternal;
    61  		if(linkmode == LinkExternal && strcmp(getgoextlinkenabled(), "1") != 0)
    62  			sysfatal("cannot use -linkmode=external with -H %s", headstr(HEADTYPE));
    63  		break;
    64  	case Hdarwin:
    65  	case Hdragonfly:
    66  	case Hfreebsd:
    67  	case Hlinux:
    68  	case Hnetbsd:
    69  	case Hopenbsd:
    70  		break;
    71  	}
    72  
    73  	switch(HEADTYPE) {
    74  	default:
    75  		diag("unknown -H option");
    76  		errorexit();
    77  
    78  	case Hplan9:	/* plan 9 */
    79  		HEADR = 32L;
    80  		if(INITTEXT == -1)
    81  			INITTEXT = 4096+32;
    82  		if(INITDAT == -1)
    83  			INITDAT = 0;
    84  		if(INITRND == -1)
    85  			INITRND = 4096;
    86  		break;
    87  	case Hdarwin:	/* apple MACH */
    88  		machoinit();
    89  		HEADR = INITIAL_MACHO_HEADR;
    90  		if(INITTEXT == -1)
    91  			INITTEXT = 4096+HEADR;
    92  		if(INITDAT == -1)
    93  			INITDAT = 0;
    94  		if(INITRND == -1)
    95  			INITRND = 4096;
    96  		break;
    97  	case Hlinux:	/* elf32 executable */
    98  	case Hfreebsd:
    99  	case Hnetbsd:
   100  	case Hopenbsd:
   101  	case Hdragonfly:
   102  		elfinit();
   103  		HEADR = ELFRESERVE;
   104  		if(INITTEXT == -1)
   105  			INITTEXT = 0x08048000+HEADR;
   106  		if(INITDAT == -1)
   107  			INITDAT = 0;
   108  		if(INITRND == -1)
   109  			INITRND = 4096;
   110  		break;
   111  	
   112  	case Hnacl:
   113  		elfinit();
   114  		HEADR = 0x10000;
   115  		funcalign = 32;
   116  		if(INITTEXT == -1)
   117  			INITTEXT = 0x20000;
   118  		if(INITDAT == -1)
   119  			INITDAT = 0;
   120  		if(INITRND == -1)
   121  			INITRND = 0x10000;
   122  		break;
   123  	
   124  	case Hwindows: /* PE executable */
   125  		peinit();
   126  		HEADR = PEFILEHEADR;
   127  		if(INITTEXT == -1)
   128  			INITTEXT = PEBASE+PESECTHEADR;
   129  		if(INITDAT == -1)
   130  			INITDAT = 0;
   131  		if(INITRND == -1)
   132  			INITRND = PESECTALIGN;
   133  		break;
   134  	}
   135  	if(INITDAT != 0 && INITRND != 0)
   136  		print("warning: -D0x%llux is ignored because of -R0x%ux\n",
   137  			INITDAT, INITRND);
   138  }