| // Copyright 2009 The Go Authors. All rights reserved. |
| // Use of this source code is governed by a BSD-style |
| // license that can be found in the LICENSE file. |
| |
| package gc |
| |
| import ( |
| "cmd/internal/obj" |
| "fmt" |
| ) |
| |
| /* |
| * architecture-independent object file output |
| */ |
| const ( |
| ArhdrSize = 60 |
| ) |
| |
| func formathdr(arhdr []byte, name string, size int64) { |
| copy(arhdr[:], fmt.Sprintf("%-16s%-12d%-6d%-6d%-8o%-10d`\n", name, 0, 0, 0, 0644, size)) |
| } |
| |
| func dumpobj() { |
| var err error |
| bout, err = obj.Bopenw(outfile) |
| if err != nil { |
| Flusherrors() |
| fmt.Printf("can't create %s: %v\n", outfile, err) |
| errorexit() |
| } |
| |
| startobj := int64(0) |
| var arhdr [ArhdrSize]byte |
| if writearchive != 0 { |
| obj.Bwritestring(bout, "!<arch>\n") |
| arhdr = [ArhdrSize]byte{} |
| obj.Bwrite(bout, arhdr[:]) |
| startobj = obj.Boffset(bout) |
| } |
| |
| fmt.Fprintf(bout, "go object %s %s %s %s\n", obj.Getgoos(), obj.Getgoarch(), obj.Getgoversion(), obj.Expstring()) |
| dumpexport() |
| |
| if writearchive != 0 { |
| obj.Bflush(bout) |
| size := obj.Boffset(bout) - startobj |
| if size&1 != 0 { |
| obj.Bputc(bout, 0) |
| } |
| obj.Bseek(bout, startobj-ArhdrSize, 0) |
| formathdr(arhdr[:], "__.PKGDEF", size) |
| obj.Bwrite(bout, arhdr[:]) |
| obj.Bflush(bout) |
| |
| obj.Bseek(bout, startobj+size+(size&1), 0) |
| arhdr = [ArhdrSize]byte{} |
| obj.Bwrite(bout, arhdr[:]) |
| startobj = obj.Boffset(bout) |
| fmt.Fprintf(bout, "go object %s %s %s %s\n", obj.Getgoos(), obj.Getgoarch(), obj.Getgoversion(), obj.Expstring()) |
| } |
| |
| if pragcgobuf != "" { |
| if writearchive != 0 { |
| // write empty export section; must be before cgo section |
| fmt.Fprintf(bout, "\n$$\n\n$$\n\n") |
| } |
| |
| fmt.Fprintf(bout, "\n$$ // cgo\n") |
| fmt.Fprintf(bout, "%s\n$$\n\n", pragcgobuf) |
| } |
| |
| fmt.Fprintf(bout, "\n!\n") |
| |
| externs := (*NodeList)(nil) |
| if externdcl != nil { |
| externs = externdcl.End |
| } |
| |
| dumpglobls() |
| dumptypestructs() |
| |
| // Dump extra globals. |
| tmp := externdcl |
| |
| if externs != nil { |
| externdcl = externs.Next |
| } |
| dumpglobls() |
| externdcl = tmp |
| |
| zero := Pkglookup("zerovalue", Runtimepkg) |
| ggloblsym(zero, int32(zerosize), obj.DUPOK|obj.RODATA) |
| |
| dumpdata() |
| obj.Writeobjdirect(Ctxt, bout) |
| |
| if writearchive != 0 { |
| obj.Bflush(bout) |
| size := obj.Boffset(bout) - startobj |
| if size&1 != 0 { |
| obj.Bputc(bout, 0) |
| } |
| obj.Bseek(bout, startobj-ArhdrSize, 0) |
| namebuf = fmt.Sprintf("_go_.%c", Thearch.Thechar) |
| formathdr(arhdr[:], namebuf, size) |
| obj.Bwrite(bout, arhdr[:]) |
| } |
| |
| obj.Bterm(bout) |
| } |
| |
| func dumpglobls() { |
| var n *Node |
| |
| // add globals |
| for l := externdcl; l != nil; l = l.Next { |
| n = l.N |
| if n.Op != ONAME { |
| continue |
| } |
| |
| if n.Type == nil { |
| Fatal("external %v nil type\n", Nconv(n, 0)) |
| } |
| if n.Class == PFUNC { |
| continue |
| } |
| if n.Sym.Pkg != localpkg { |
| continue |
| } |
| dowidth(n.Type) |
| |
| ggloblnod(n) |
| } |
| |
| for l := funcsyms; l != nil; l = l.Next { |
| n = l.N |
| dsymptr(n.Sym, 0, n.Sym.Def.Shortname.Sym, 0) |
| ggloblsym(n.Sym, int32(Widthptr), obj.DUPOK|obj.RODATA) |
| } |
| |
| // Do not reprocess funcsyms on next dumpglobls call. |
| funcsyms = nil |
| } |
| |
| func Bputname(b *obj.Biobuf, s *obj.LSym) { |
| obj.Bwritestring(b, s.Name) |
| obj.Bputc(b, 0) |
| } |
| |
| func Linksym(s *Sym) *obj.LSym { |
| if s == nil { |
| return nil |
| } |
| if s.Lsym != nil { |
| return s.Lsym |
| } |
| if isblanksym(s) { |
| s.Lsym = obj.Linklookup(Ctxt, "_", 0) |
| } else if s.Linkname != "" { |
| s.Lsym = obj.Linklookup(Ctxt, s.Linkname, 0) |
| } else { |
| p := fmt.Sprintf("%s.%s", s.Pkg.Prefix, s.Name) |
| s.Lsym = obj.Linklookup(Ctxt, p, 0) |
| } |
| |
| return s.Lsym |
| } |
| |
| func duintxx(s *Sym, off int, v uint64, wid int) int { |
| // Update symbol data directly instead of generating a |
| // DATA instruction that liblink will have to interpret later. |
| // This reduces compilation time and memory usage. |
| off = int(Rnd(int64(off), int64(wid))) |
| |
| return int(obj.Setuintxx(Ctxt, Linksym(s), int64(off), v, int64(wid))) |
| } |
| |
| func duint8(s *Sym, off int, v uint8) int { |
| return duintxx(s, off, uint64(v), 1) |
| } |
| |
| func duint16(s *Sym, off int, v uint16) int { |
| return duintxx(s, off, uint64(v), 2) |
| } |
| |
| func duint32(s *Sym, off int, v uint32) int { |
| return duintxx(s, off, uint64(v), 4) |
| } |
| |
| func duint64(s *Sym, off int, v uint64) int { |
| return duintxx(s, off, v, 8) |
| } |
| |
| func duintptr(s *Sym, off int, v uint64) int { |
| return duintxx(s, off, v, Widthptr) |
| } |
| |
| var stringsym_gen int |
| |
| func stringsym(s string) *Sym { |
| var tmp struct { |
| lit Strlit |
| buf string |
| } |
| var pkg *Pkg |
| |
| if len(s) > 100 { |
| // huge strings are made static to avoid long names |
| stringsym_gen++ |
| namebuf = fmt.Sprintf(".gostring.%d", stringsym_gen) |
| |
| pkg = localpkg |
| } else { |
| // small strings get named by their contents, |
| // so that multiple modules using the same string |
| // can share it. |
| tmp.lit.S = s |
| namebuf = fmt.Sprintf("\"%v\"", Zconv(&tmp.lit, 0)) |
| pkg = gostringpkg |
| } |
| |
| sym := Pkglookup(namebuf, pkg) |
| |
| // SymUniq flag indicates that data is generated already |
| if sym.Flags&SymUniq != 0 { |
| return sym |
| } |
| sym.Flags |= SymUniq |
| sym.Def = newname(sym) |
| |
| off := 0 |
| |
| // string header |
| off = dsymptr(sym, off, sym, Widthptr+Widthint) |
| off = duintxx(sym, off, uint64(len(s)), Widthint) |
| |
| // string data |
| var m int |
| for n := 0; n < len(s); n += m { |
| m = 8 |
| if m > len(s)-n { |
| m = len(s) - n |
| } |
| off = dsname(sym, off, s[n:n+m]) |
| } |
| |
| off = duint8(sym, off, 0) // terminating NUL for runtime |
| off = (off + Widthptr - 1) &^ (Widthptr - 1) // round to pointer alignment |
| ggloblsym(sym, int32(off), obj.DUPOK|obj.RODATA) |
| |
| return sym |
| } |
| |
| var slicebytes_gen int |
| |
| func slicebytes(nam *Node, s string, len int) { |
| var m int |
| |
| slicebytes_gen++ |
| namebuf = fmt.Sprintf(".gobytes.%d", slicebytes_gen) |
| sym := Pkglookup(namebuf, localpkg) |
| sym.Def = newname(sym) |
| |
| off := 0 |
| for n := 0; n < len; n += m { |
| m = 8 |
| if m > len-n { |
| m = len - n |
| } |
| off = dsname(sym, off, s[n:n+m]) |
| } |
| |
| ggloblsym(sym, int32(off), obj.NOPTR) |
| |
| if nam.Op != ONAME { |
| Fatal("slicebytes %v", Nconv(nam, 0)) |
| } |
| off = int(nam.Xoffset) |
| off = dsymptr(nam.Sym, off, sym, 0) |
| off = duintxx(nam.Sym, off, uint64(len), Widthint) |
| duintxx(nam.Sym, off, uint64(len), Widthint) |
| } |
| |
| func dstringptr(s *Sym, off int, str string) int { |
| off = int(Rnd(int64(off), int64(Widthptr))) |
| p := Thearch.Gins(obj.ADATA, nil, nil) |
| p.From.Type = obj.TYPE_MEM |
| p.From.Name = obj.NAME_EXTERN |
| p.From.Sym = Linksym(s) |
| p.From.Offset = int64(off) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = int64(Widthptr) |
| |
| Datastring(str+"\x00", &p.To) // TODO(rsc): Remove NUL |
| p.To.Type = obj.TYPE_ADDR |
| p.To.Etype = Simtype[TINT] |
| off += Widthptr |
| |
| return off |
| } |
| |
| /* |
| * gobj.c |
| */ |
| func Datastring(s string, a *obj.Addr) { |
| sym := stringsym(s) |
| a.Type = obj.TYPE_MEM |
| a.Name = obj.NAME_EXTERN |
| a.Sym = Linksym(sym) |
| a.Node = sym.Def |
| a.Offset = int64(Widthptr) + int64(Widthint) // skip header |
| a.Etype = Simtype[TINT] |
| } |
| |
| func datagostring(sval *Strlit, a *obj.Addr) { |
| sym := stringsym(sval.S) |
| a.Type = obj.TYPE_MEM |
| a.Name = obj.NAME_EXTERN |
| a.Sym = Linksym(sym) |
| a.Node = sym.Def |
| a.Offset = 0 // header |
| a.Etype = TSTRING |
| } |
| |
| func dgostringptr(s *Sym, off int, str string) int { |
| if str == "" { |
| return duintptr(s, off, 0) |
| } |
| |
| n := len(str) |
| lit := new(Strlit) |
| lit.S = str |
| lit.S = lit.S[:n] |
| return dgostrlitptr(s, off, lit) |
| } |
| |
| func dgostrlitptr(s *Sym, off int, lit *Strlit) int { |
| if lit == nil { |
| return duintptr(s, off, 0) |
| } |
| |
| off = int(Rnd(int64(off), int64(Widthptr))) |
| p := Thearch.Gins(obj.ADATA, nil, nil) |
| p.From.Type = obj.TYPE_MEM |
| p.From.Name = obj.NAME_EXTERN |
| p.From.Sym = Linksym(s) |
| p.From.Offset = int64(off) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = int64(Widthptr) |
| datagostring(lit, &p.To) |
| p.To.Type = obj.TYPE_ADDR |
| p.To.Etype = Simtype[TINT] |
| off += Widthptr |
| |
| return off |
| } |
| |
| func dsname(s *Sym, off int, t string) int { |
| p := Thearch.Gins(obj.ADATA, nil, nil) |
| p.From.Type = obj.TYPE_MEM |
| p.From.Name = obj.NAME_EXTERN |
| p.From.Offset = int64(off) |
| p.From.Sym = Linksym(s) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = int64(len(t)) |
| |
| p.To.Type = obj.TYPE_SCONST |
| p.To.U.Sval = t |
| return off + len(t) |
| } |
| |
| func dsymptr(s *Sym, off int, x *Sym, xoff int) int { |
| off = int(Rnd(int64(off), int64(Widthptr))) |
| |
| p := Thearch.Gins(obj.ADATA, nil, nil) |
| p.From.Type = obj.TYPE_MEM |
| p.From.Name = obj.NAME_EXTERN |
| p.From.Sym = Linksym(s) |
| p.From.Offset = int64(off) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = int64(Widthptr) |
| p.To.Type = obj.TYPE_ADDR |
| p.To.Name = obj.NAME_EXTERN |
| p.To.Sym = Linksym(x) |
| p.To.Offset = int64(xoff) |
| off += Widthptr |
| |
| return off |
| } |
| |
| func gdata(nam *Node, nr *Node, wid int) { |
| if nr.Op == OLITERAL { |
| switch nr.Val.Ctype { |
| case CTCPLX: |
| gdatacomplex(nam, nr.Val.U.Cval) |
| return |
| |
| case CTSTR: |
| gdatastring(nam, nr.Val.U.Sval) |
| return |
| } |
| } |
| |
| p := Thearch.Gins(obj.ADATA, nam, nr) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = int64(wid) |
| } |
| |
| func gdatacomplex(nam *Node, cval *Mpcplx) { |
| w := cplxsubtype(int(nam.Type.Etype)) |
| w = int(Types[w].Width) |
| |
| p := Thearch.Gins(obj.ADATA, nam, nil) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = int64(w) |
| p.To.Type = obj.TYPE_FCONST |
| p.To.U.Dval = mpgetflt(&cval.Real) |
| |
| p = Thearch.Gins(obj.ADATA, nam, nil) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = int64(w) |
| p.From.Offset += int64(w) |
| p.To.Type = obj.TYPE_FCONST |
| p.To.U.Dval = mpgetflt(&cval.Imag) |
| } |
| |
| func gdatastring(nam *Node, sval *Strlit) { |
| var nod1 Node |
| |
| p := Thearch.Gins(obj.ADATA, nam, nil) |
| Datastring(sval.S, &p.To) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = Types[Tptr].Width |
| p.To.Type = obj.TYPE_ADDR |
| |
| //print("%P\n", p); |
| |
| Nodconst(&nod1, Types[TINT], int64(len(sval.S))) |
| |
| p = Thearch.Gins(obj.ADATA, nam, &nod1) |
| p.From3.Type = obj.TYPE_CONST |
| p.From3.Offset = int64(Widthint) |
| p.From.Offset += int64(Widthptr) |
| } |