Home | History | Annotate | Download | only in arm
      1 // Inferno utils/5l/obj.c
      2 // http://code.google.com/p/inferno-os/source/browse/utils/5l/obj.c
      3 //
      4 //	Copyright  1994-1999 Lucent Technologies Inc.  All rights reserved.
      5 //	Portions Copyright  1995-1997 C H Forsyth (forsyth (a] 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 (a] 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 package arm
     32 
     33 import (
     34 	"cmd/internal/obj"
     35 	"cmd/link/internal/ld"
     36 	"fmt"
     37 	"log"
     38 )
     39 
     40 // Reading object files.
     41 
     42 func Main() {
     43 	linkarchinit()
     44 	ld.Ldmain()
     45 }
     46 
     47 func linkarchinit() {
     48 	ld.Thestring = "arm"
     49 	ld.Thelinkarch = &ld.Linkarm
     50 
     51 	ld.Thearch.Thechar = thechar
     52 	ld.Thearch.Ptrsize = ld.Thelinkarch.Ptrsize
     53 	ld.Thearch.Intsize = ld.Thelinkarch.Ptrsize
     54 	ld.Thearch.Regsize = ld.Thelinkarch.Regsize
     55 	ld.Thearch.Funcalign = FuncAlign
     56 	ld.Thearch.Maxalign = MaxAlign
     57 	ld.Thearch.Minlc = MINLC
     58 	ld.Thearch.Dwarfregsp = DWARFREGSP
     59 	ld.Thearch.Dwarfreglr = DWARFREGLR
     60 
     61 	ld.Thearch.Adddynrel = adddynrel
     62 	ld.Thearch.Archinit = archinit
     63 	ld.Thearch.Archreloc = archreloc
     64 	ld.Thearch.Archrelocvariant = archrelocvariant
     65 	ld.Thearch.Asmb = asmb
     66 	ld.Thearch.Elfreloc1 = elfreloc1
     67 	ld.Thearch.Elfsetupplt = elfsetupplt
     68 	ld.Thearch.Gentext = gentext
     69 	ld.Thearch.Machoreloc1 = machoreloc1
     70 	ld.Thearch.Lput = ld.Lputl
     71 	ld.Thearch.Wput = ld.Wputl
     72 	ld.Thearch.Vput = ld.Vputl
     73 
     74 	ld.Thearch.Linuxdynld = "/lib/ld-linux.so.3" // 2 for OABI, 3 for EABI
     75 	ld.Thearch.Freebsddynld = "/usr/libexec/ld-elf.so.1"
     76 	ld.Thearch.Openbsddynld = "/usr/libexec/ld.so"
     77 	ld.Thearch.Netbsddynld = "/libexec/ld.elf_so"
     78 	ld.Thearch.Dragonflydynld = "XXX"
     79 	ld.Thearch.Solarisdynld = "XXX"
     80 }
     81 
     82 func archinit() {
     83 	// getgoextlinkenabled is based on GO_EXTLINK_ENABLED when
     84 	// Go was built; see ../../make.bash.
     85 	if ld.Linkmode == ld.LinkAuto && obj.Getgoextlinkenabled() == "0" {
     86 		ld.Linkmode = ld.LinkInternal
     87 	}
     88 
     89 	switch ld.HEADTYPE {
     90 	default:
     91 		if ld.Linkmode == ld.LinkAuto {
     92 			ld.Linkmode = ld.LinkInternal
     93 		}
     94 		if ld.Linkmode == ld.LinkExternal && obj.Getgoextlinkenabled() != "1" {
     95 			log.Fatalf("cannot use -linkmode=external with -H %s", ld.Headstr(int(ld.HEADTYPE)))
     96 		}
     97 
     98 	case obj.Hlinux,
     99 		obj.Hfreebsd,
    100 		obj.Hnacl,
    101 		obj.Hdarwin:
    102 		break
    103 	}
    104 
    105 	switch ld.HEADTYPE {
    106 	default:
    107 		ld.Exitf("unknown -H option: %v", ld.HEADTYPE)
    108 
    109 	case obj.Hplan9: /* plan 9 */
    110 		ld.HEADR = 32
    111 
    112 		if ld.INITTEXT == -1 {
    113 			ld.INITTEXT = 4128
    114 		}
    115 		if ld.INITDAT == -1 {
    116 			ld.INITDAT = 0
    117 		}
    118 		if ld.INITRND == -1 {
    119 			ld.INITRND = 4096
    120 		}
    121 
    122 	case obj.Hlinux, /* arm elf */
    123 		obj.Hfreebsd,
    124 		obj.Hnetbsd,
    125 		obj.Hopenbsd:
    126 		ld.Debug['d'] = 0
    127 		// with dynamic linking
    128 		ld.Elfinit()
    129 		ld.HEADR = ld.ELFRESERVE
    130 		if ld.INITTEXT == -1 {
    131 			ld.INITTEXT = 0x10000 + int64(ld.HEADR)
    132 		}
    133 		if ld.INITDAT == -1 {
    134 			ld.INITDAT = 0
    135 		}
    136 		if ld.INITRND == -1 {
    137 			ld.INITRND = 4096
    138 		}
    139 
    140 	case obj.Hnacl:
    141 		ld.Elfinit()
    142 		ld.HEADR = 0x10000
    143 		ld.Funcalign = 16
    144 		if ld.INITTEXT == -1 {
    145 			ld.INITTEXT = 0x20000
    146 		}
    147 		if ld.INITDAT == -1 {
    148 			ld.INITDAT = 0
    149 		}
    150 		if ld.INITRND == -1 {
    151 			ld.INITRND = 0x10000
    152 		}
    153 
    154 	case obj.Hdarwin: /* apple MACH */
    155 		ld.Debug['w'] = 1 // disable DWARF generataion
    156 		ld.Machoinit()
    157 		ld.HEADR = ld.INITIAL_MACHO_HEADR
    158 		if ld.INITTEXT == -1 {
    159 			ld.INITTEXT = 4096 + int64(ld.HEADR)
    160 		}
    161 		if ld.INITDAT == -1 {
    162 			ld.INITDAT = 0
    163 		}
    164 		if ld.INITRND == -1 {
    165 			ld.INITRND = 4096
    166 		}
    167 	}
    168 
    169 	if ld.INITDAT != 0 && ld.INITRND != 0 {
    170 		fmt.Printf("warning: -D0x%x is ignored because of -R0x%x\n", uint64(ld.INITDAT), uint32(ld.INITRND))
    171 	}
    172 
    173 	// embed goarm to runtime.goarm
    174 	s := ld.Linklookup(ld.Ctxt, "runtime.goarm", 0)
    175 
    176 	s.Type = obj.SRODATA
    177 	ld.Adduint8(ld.Ctxt, s, uint8(ld.Ctxt.Goarm))
    178 }
    179