| // Derived from Inferno utils/6l/obj.c and utils/6l/span.c |
| // http://code.google.com/p/inferno-os/source/browse/utils/6l/obj.c |
| // http://code.google.com/p/inferno-os/source/browse/utils/6l/span.c |
| // |
| // Copyright © 1994-1999 Lucent Technologies Inc. All rights reserved. |
| // Portions Copyright © 1995-1997 C H Forsyth (forsyth@terzarima.net) |
| // Portions Copyright © 1997-1999 Vita Nuova Limited |
| // Portions Copyright © 2000-2007 Vita Nuova Holdings Limited (www.vitanuova.com) |
| // Portions Copyright © 2004,2006 Bruce Ellis |
| // Portions Copyright © 2005-2007 C H Forsyth (forsyth@terzarima.net) |
| // Revisions Copyright © 2000-2007 Lucent Technologies Inc. and others |
| // Portions Copyright © 2009 The Go Authors. All rights reserved. |
| // |
| // Permission is hereby granted, free of charge, to any person obtaining a copy |
| // of this software and associated documentation files (the "Software"), to deal |
| // in the Software without restriction, including without limitation the rights |
| // to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
| // copies of the Software, and to permit persons to whom the Software is |
| // furnished to do so, subject to the following conditions: |
| // |
| // The above copyright notice and this permission notice shall be included in |
| // all copies or substantial portions of the Software. |
| // |
| // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| // IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
| // AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
| // OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
| // THE SOFTWARE. |
| |
| package obj |
| |
| import ( |
| "log" |
| "os" |
| "path/filepath" |
| "runtime" |
| "strconv" |
| ) |
| |
| var headers = []struct { |
| name string |
| val int |
| }{ |
| {"darwin", Hdarwin}, |
| {"dragonfly", Hdragonfly}, |
| {"elf", Helf}, |
| {"freebsd", Hfreebsd}, |
| {"linux", Hlinux}, |
| {"android", Hlinux}, // must be after "linux" entry or else headstr(Hlinux) == "android" |
| {"nacl", Hnacl}, |
| {"netbsd", Hnetbsd}, |
| {"openbsd", Hopenbsd}, |
| {"plan9", Hplan9}, |
| {"solaris", Hsolaris}, |
| {"windows", Hwindows}, |
| {"windowsgui", Hwindows}, |
| } |
| |
| func headtype(name string) int { |
| for i := 0; i < len(headers); i++ { |
| if name == headers[i].name { |
| return headers[i].val |
| } |
| } |
| return -1 |
| } |
| |
| func Headstr(v int) string { |
| for i := 0; i < len(headers); i++ { |
| if v == headers[i].val { |
| return headers[i].name |
| } |
| } |
| return strconv.Itoa(v) |
| } |
| |
| func Linknew(arch *LinkArch) *Link { |
| ctxt := new(Link) |
| ctxt.Hash = make(map[SymVer]*LSym) |
| ctxt.Arch = arch |
| ctxt.Version = HistVersion |
| ctxt.Goroot = Getgoroot() |
| ctxt.Goroot_final = os.Getenv("GOROOT_FINAL") |
| if runtime.GOOS == "windows" { |
| // TODO(rsc): Remove ctxt.Windows and let callers use runtime.GOOS. |
| ctxt.Windows = 1 |
| } |
| |
| var buf string |
| buf, _ = os.Getwd() |
| if buf == "" { |
| buf = "/???" |
| } |
| buf = filepath.ToSlash(buf) |
| ctxt.Pathname = buf |
| |
| ctxt.LineHist.GOROOT = ctxt.Goroot |
| ctxt.LineHist.GOROOT_FINAL = ctxt.Goroot_final |
| ctxt.LineHist.Dir = ctxt.Pathname |
| |
| ctxt.Headtype = headtype(Getgoos()) |
| if ctxt.Headtype < 0 { |
| log.Fatalf("unknown goos %s", Getgoos()) |
| } |
| |
| // Record thread-local storage offset. |
| // TODO(rsc): Move tlsoffset back into the linker. |
| switch ctxt.Headtype { |
| default: |
| log.Fatalf("unknown thread-local storage offset for %s", Headstr(ctxt.Headtype)) |
| |
| case Hplan9, Hwindows: |
| break |
| |
| /* |
| * ELF uses TLS offset negative from FS. |
| * Translate 0(FS) and 8(FS) into -16(FS) and -8(FS). |
| * Known to low-level assembly in package runtime and runtime/cgo. |
| */ |
| case Hlinux, |
| Hfreebsd, |
| Hnetbsd, |
| Hopenbsd, |
| Hdragonfly, |
| Hsolaris: |
| ctxt.Tlsoffset = -1 * ctxt.Arch.Ptrsize |
| |
| case Hnacl: |
| switch ctxt.Arch.Thechar { |
| default: |
| log.Fatalf("unknown thread-local storage offset for nacl/%s", ctxt.Arch.Name) |
| |
| case '5': |
| ctxt.Tlsoffset = 0 |
| |
| case '6': |
| ctxt.Tlsoffset = 0 |
| |
| case '8': |
| ctxt.Tlsoffset = -8 |
| } |
| |
| /* |
| * OS X system constants - offset from 0(GS) to our TLS. |
| * Explained in ../../runtime/cgo/gcc_darwin_*.c. |
| */ |
| case Hdarwin: |
| switch ctxt.Arch.Thechar { |
| default: |
| log.Fatalf("unknown thread-local storage offset for darwin/%s", ctxt.Arch.Name) |
| |
| case '5': |
| ctxt.Tlsoffset = 0 // dummy value, not needed |
| |
| case '6': |
| ctxt.Tlsoffset = 0x8a0 |
| |
| case '7': |
| ctxt.Tlsoffset = 0 // dummy value, not needed |
| |
| case '8': |
| ctxt.Tlsoffset = 0x468 |
| } |
| } |
| |
| // On arm, record goarm. |
| if ctxt.Arch.Thechar == '5' { |
| p := Getgoarm() |
| if p != "" { |
| ctxt.Goarm = int32(Atoi(p)) |
| } else { |
| ctxt.Goarm = 6 |
| } |
| } |
| |
| return ctxt |
| } |
| |
| func _lookup(ctxt *Link, symb string, v int, create bool) *LSym { |
| s := ctxt.Hash[SymVer{symb, v}] |
| if s != nil || !create { |
| return s |
| } |
| |
| s = &LSym{ |
| Name: symb, |
| Type: 0, |
| Version: int16(v), |
| Value: 0, |
| Size: 0, |
| } |
| ctxt.Hash[SymVer{symb, v}] = s |
| |
| return s |
| } |
| |
| func Linklookup(ctxt *Link, name string, v int) *LSym { |
| return _lookup(ctxt, name, v, true) |
| } |
| |
| // read-only lookup |
| func linkrlookup(ctxt *Link, name string, v int) *LSym { |
| return _lookup(ctxt, name, v, false) |
| } |
| |
| func Linksymfmt(s *LSym) string { |
| if s == nil { |
| return "<nil>" |
| } |
| return s.Name |
| } |