Compare commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
458cfb626e | ||
|
|
56ecc39539 | ||
|
|
a82f575aee |
+217
-49
@@ -13,55 +13,174 @@ import (
|
|||||||
// Assemble encodes the body of a TEXT function into x86-64 machine code,
|
// Assemble encodes the body of a TEXT function into x86-64 machine code,
|
||||||
// resolving local labels to relative jump offsets and translating the FP/SP
|
// resolving local labels to relative jump offsets and translating the FP/SP
|
||||||
// pseudo-registers onto the hardware stack pointer (matching the Go
|
// pseudo-registers onto the hardware stack pointer (matching the Go
|
||||||
// assembler's default frame-pointer behaviour). Jumps always use the 32-bit
|
// assembler's default frame-pointer behaviour). Jumps start in the short
|
||||||
// relative form so instruction sizes are fixed and offsets resolve in a single
|
// (rel8) form and expand to rel32 when the settled displacement does not fit;
|
||||||
// layout pass.
|
// sizes only grow, so the layout reaches a fixed point in a few passes. CALL
|
||||||
|
// has no short form and is always rel32.
|
||||||
//
|
//
|
||||||
// Supported operands: registers, memory (real base register), immediates,
|
// Supported operands: registers, memory (real base register), immediates,
|
||||||
// FP/SP frame-relative operands, and local-label jumps. SB (global symbol)
|
// FP/SP frame-relative operands, and local-label jumps. SB (global symbol)
|
||||||
// operands require relocations and are not yet supported; the SIMD (VEX/AVX2)
|
// operands require relocations and are not yet supported; the SIMD (VEX/AVX2)
|
||||||
// integer and shuffle/extract/permute/move set is in.
|
// integer and shuffle/extract/permute/move set is in.
|
||||||
func Assemble(t *ast.Text) ([]byte, map[string]int, error) {
|
func Assemble(t *ast.Text) ([]byte, map[string]int, error) {
|
||||||
fi := computeFrame(t)
|
code, _, labels, err := assemble(t, nil)
|
||||||
|
return code, labels, err
|
||||||
|
}
|
||||||
|
|
||||||
// Pass 1: lay out instructions (including prologue/epilogue) to fix label
|
// linkInfo carries file-level symbol context into a single-function assembly:
|
||||||
// offsets.
|
// the set of static symbols a GLOBL in the same file defines. A nil link
|
||||||
offsets := map[string]int{}
|
// rejects SB operands outright (single-function assembly cannot resolve
|
||||||
|
// them).
|
||||||
|
type linkInfo struct {
|
||||||
|
symbols map[string]bool
|
||||||
|
}
|
||||||
|
|
||||||
|
// sbPatch is a function-relative static-symbol relocation: the disp32 field
|
||||||
|
// at off must become the symbol's address minus after, where after is the
|
||||||
|
// function-relative address just past the instruction.
|
||||||
|
type sbPatch struct {
|
||||||
|
off int
|
||||||
|
after int
|
||||||
|
name string
|
||||||
|
addend int64
|
||||||
|
}
|
||||||
|
|
||||||
|
// assemble encodes a TEXT body, returning the machine code, the static-symbol
|
||||||
|
// patch sites (for the file-level layout to resolve) and the label table.
|
||||||
|
func assemble(t *ast.Text, link *linkInfo) ([]byte, []sbPatch, map[string]int, error) {
|
||||||
|
fi := computeFrame(t)
|
||||||
|
chain := jumpChain(t)
|
||||||
|
resolve := func(name string) string {
|
||||||
|
if r, ok := chain[name]; ok {
|
||||||
|
return r
|
||||||
|
}
|
||||||
|
return name
|
||||||
|
}
|
||||||
|
|
||||||
|
// Layout: iterate jump sizes to a fixed point.
|
||||||
|
long := make([]bool, len(t.Body))
|
||||||
sizes := make([]int, len(t.Body))
|
sizes := make([]int, len(t.Body))
|
||||||
pos := len(fi.prologue)
|
offsets := map[string]int{}
|
||||||
for i, stmt := range t.Body {
|
pcs := make([]int, len(t.Body))
|
||||||
switch s := stmt.(type) {
|
for {
|
||||||
case *ast.Label:
|
pos := len(fi.prologue)
|
||||||
offsets[s.Name.Text] = pos
|
for i, stmt := range t.Body {
|
||||||
case *ast.Instr:
|
switch s := stmt.(type) {
|
||||||
sz, err := instrSize(s, fi)
|
case *ast.Label:
|
||||||
if err != nil {
|
offsets[s.Name.Text] = pos
|
||||||
return nil, nil, fmt.Errorf("%s: %w", s.Mnemonic.Text, err)
|
case *ast.Instr:
|
||||||
|
sz, err := instrSize(s, fi, long[i], link)
|
||||||
|
if err != nil {
|
||||||
|
return nil, nil, nil, fmt.Errorf("%s: %w", s.Mnemonic.Text, err)
|
||||||
|
}
|
||||||
|
sizes[i] = sz
|
||||||
|
pcs[i] = pos
|
||||||
|
pos += sz
|
||||||
}
|
}
|
||||||
sizes[i] = sz
|
}
|
||||||
pos += sz
|
// Expand any short jump whose displacement no longer fits rel8.
|
||||||
|
changed := false
|
||||||
|
for i, stmt := range t.Body {
|
||||||
|
s, ok := stmt.(*ast.Instr)
|
||||||
|
if !ok {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
mnem := strings.ToUpper(s.Mnemonic.Text)
|
||||||
|
if !isJumpMnemonic(mnem) || mnem == "CALL" || long[i] {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
name, ok := labelName(s.Operands[0])
|
||||||
|
if !ok {
|
||||||
|
continue // reported during emission
|
||||||
|
}
|
||||||
|
target, ok := offsets[resolve(name)]
|
||||||
|
if !ok {
|
||||||
|
continue // reported during emission
|
||||||
|
}
|
||||||
|
rel := int64(target - (pcs[i] + jumpSize(mnem, false)))
|
||||||
|
if !fits8(rel) {
|
||||||
|
long[i] = true
|
||||||
|
changed = true
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if !changed {
|
||||||
|
break
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
// Pass 2: emit.
|
// Pass 2: emit.
|
||||||
out := append([]byte(nil), fi.prologue...)
|
out := append([]byte(nil), fi.prologue...)
|
||||||
pos = len(fi.prologue)
|
var patches []sbPatch
|
||||||
|
pos := len(fi.prologue)
|
||||||
for i, stmt := range t.Body {
|
for i, stmt := range t.Body {
|
||||||
s, ok := stmt.(*ast.Instr)
|
s, ok := stmt.(*ast.Instr)
|
||||||
if !ok {
|
if !ok {
|
||||||
continue
|
continue
|
||||||
}
|
}
|
||||||
code, err := encodeInstr(s, pos, offsets, fi)
|
code, ps, err := encodeInstr(s, pos, offsets, fi, long[i], resolve, link)
|
||||||
if err != nil {
|
if err != nil {
|
||||||
return nil, nil, fmt.Errorf("%s: %w", s.Mnemonic.Text, err)
|
return nil, nil, nil, fmt.Errorf("%s: %w", s.Mnemonic.Text, err)
|
||||||
}
|
}
|
||||||
if len(code) != sizes[i] {
|
if len(code) != sizes[i] {
|
||||||
return nil, nil, fmt.Errorf("%s: size mismatch (%d vs %d)", s.Mnemonic.Text, len(code), sizes[i])
|
return nil, nil, nil, fmt.Errorf("%s: size mismatch (%d vs %d)", s.Mnemonic.Text, len(code), sizes[i])
|
||||||
}
|
}
|
||||||
|
patches = append(patches, ps...)
|
||||||
out = append(out, code...)
|
out = append(out, code...)
|
||||||
pos += len(code)
|
pos += len(code)
|
||||||
}
|
}
|
||||||
return out, offsets, nil
|
return out, patches, offsets, nil
|
||||||
|
}
|
||||||
|
|
||||||
|
// jumpChain precomputes jump-to-jump folding: a label whose first instruction
|
||||||
|
// is an unconditional local jump redirects its own jumpers to the ultimate
|
||||||
|
// target. The Go toolchain chases exactly these chains (the linker's xfol
|
||||||
|
// pass) before it encodes branches, so matching its bytes requires the same
|
||||||
|
// redirection.
|
||||||
|
func jumpChain(t *ast.Text) map[string]string {
|
||||||
|
// label → the target of its leading unconditional local JMP, if any.
|
||||||
|
leadsTo := map[string]string{}
|
||||||
|
for i, stmt := range t.Body {
|
||||||
|
l, ok := stmt.(*ast.Label)
|
||||||
|
if !ok {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
// Stacked labels share an address: skip to the first instruction.
|
||||||
|
j := i + 1
|
||||||
|
for j < len(t.Body) {
|
||||||
|
if _, isLabel := t.Body[j].(*ast.Label); !isLabel {
|
||||||
|
break
|
||||||
|
}
|
||||||
|
j++
|
||||||
|
}
|
||||||
|
if j >= len(t.Body) {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
in, ok := t.Body[j].(*ast.Instr)
|
||||||
|
if !ok || strings.ToUpper(in.Mnemonic.Text) != "JMP" || len(in.Operands) != 1 {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
if name, ok := labelName(in.Operands[0]); ok {
|
||||||
|
leadsTo[l.Name.Text] = name
|
||||||
|
}
|
||||||
|
}
|
||||||
|
// Chase each chain to its end, guarding against cycles.
|
||||||
|
chain := map[string]string{}
|
||||||
|
for name := range leadsTo {
|
||||||
|
visited := map[string]bool{name: true}
|
||||||
|
cur := name
|
||||||
|
for {
|
||||||
|
next, ok := leadsTo[cur]
|
||||||
|
if !ok || visited[next] {
|
||||||
|
break
|
||||||
|
}
|
||||||
|
visited[next] = true
|
||||||
|
cur = next
|
||||||
|
}
|
||||||
|
if cur != name {
|
||||||
|
chain[name] = cur
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return chain
|
||||||
}
|
}
|
||||||
|
|
||||||
// frameInfo carries the frame layout derived from the TEXT directive.
|
// frameInfo carries the frame layout derived from the TEXT directive.
|
||||||
@@ -119,15 +238,15 @@ func addSP(size int) []byte { // ADDQ $size, SP
|
|||||||
return append([]byte{0x48, 0x81, 0xC4}, le32(int64(size))...)
|
return append([]byte{0x48, 0x81, 0xC4}, le32(int64(size))...)
|
||||||
}
|
}
|
||||||
|
|
||||||
// instrSize returns the encoded length of an instruction (pass 1). encodeInstr
|
// instrSize returns the encoded length of an instruction (layout pass).
|
||||||
// already includes the epilogue for a RET in a frame-pointer function; jumps use
|
// encodeInstr already includes the epilogue for a RET in a frame-pointer
|
||||||
// a fixed rel32 size (no epilogue).
|
// function; jumps use their short or long form (never an epilogue).
|
||||||
func instrSize(s *ast.Instr, fi frameInfo) (int, error) {
|
func instrSize(s *ast.Instr, fi frameInfo, long bool, link *linkInfo) (int, error) {
|
||||||
mnem := strings.ToUpper(s.Mnemonic.Text)
|
mnem := strings.ToUpper(s.Mnemonic.Text)
|
||||||
if isJumpMnemonic(mnem) {
|
if isJumpMnemonic(mnem) {
|
||||||
return jumpSize(mnem), nil
|
return jumpSize(mnem, long), nil
|
||||||
}
|
}
|
||||||
code, err := encodeInstr(s, 0, nil, fi)
|
code, _, err := encodeInstr(s, 0, nil, fi, false, nil, link)
|
||||||
if err != nil {
|
if err != nil {
|
||||||
return 0, err
|
return 0, err
|
||||||
}
|
}
|
||||||
@@ -142,18 +261,27 @@ func isJumpMnemonic(mnem string) bool {
|
|||||||
return ok
|
return ok
|
||||||
}
|
}
|
||||||
|
|
||||||
// jumpSize returns the fixed length of a rel32 jump instruction.
|
// jumpSize returns the length of a jump instruction in the requested form:
|
||||||
func jumpSize(mnem string) int {
|
// short (rel8) where available, otherwise the rel32 form. CALL is always
|
||||||
if mnem == "JMP" || mnem == "CALL" {
|
// rel32.
|
||||||
|
func jumpSize(mnem string, long bool) int {
|
||||||
|
if mnem == "CALL" {
|
||||||
return 5 // opcode + rel32
|
return 5 // opcode + rel32
|
||||||
}
|
}
|
||||||
|
if !long {
|
||||||
|
return 2 // opcode + rel8
|
||||||
|
}
|
||||||
|
if mnem == "JMP" {
|
||||||
|
return 5 // E9 + rel32
|
||||||
|
}
|
||||||
return 6 // 0x0F 0x8x + rel32
|
return 6 // 0x0F 0x8x + rel32
|
||||||
}
|
}
|
||||||
|
|
||||||
// encodeInstr encodes one instruction, resolving jump targets against offsets
|
// encodeInstr encodes one instruction, resolving jump targets against offsets
|
||||||
// (relative to pc, the instruction's own offset). A RET in a frame-pointer
|
// (relative to pc, the instruction's own offset). A RET in a frame-pointer
|
||||||
// function is prefixed with the epilogue.
|
// function is prefixed with the epilogue. resolve, when non-nil, redirects a
|
||||||
func encodeInstr(s *ast.Instr, pc int, offsets map[string]int, fi frameInfo) ([]byte, error) {
|
// jump label through the jump-to-jump chain before the offset lookup.
|
||||||
|
func encodeInstr(s *ast.Instr, pc int, offsets map[string]int, fi frameInfo, long bool, resolve func(string) string, link *linkInfo) ([]byte, []sbPatch, error) {
|
||||||
mnem := strings.ToUpper(s.Mnemonic.Text)
|
mnem := strings.ToUpper(s.Mnemonic.Text)
|
||||||
|
|
||||||
var prefix []byte
|
var prefix []byte
|
||||||
@@ -162,37 +290,53 @@ func encodeInstr(s *ast.Instr, pc int, offsets map[string]int, fi frameInfo) ([]
|
|||||||
}
|
}
|
||||||
|
|
||||||
var code []byte
|
var code []byte
|
||||||
|
var ps []sbPatch
|
||||||
var err error
|
var err error
|
||||||
if isJumpMnemonic(mnem) {
|
if isJumpMnemonic(mnem) {
|
||||||
code, err = encodeJump(s, mnem, pc+len(prefix), offsets)
|
code, err = encodeJump(s, mnem, pc+len(prefix), offsets, long, resolve)
|
||||||
} else {
|
} else {
|
||||||
code, err = encodeNormal(s, fi)
|
code, ps, err = encodeNormal(s, fi, link)
|
||||||
}
|
}
|
||||||
if err != nil {
|
if err != nil {
|
||||||
return nil, err
|
return nil, nil, err
|
||||||
}
|
}
|
||||||
return append(prefix, code...), nil
|
// Anchor the patch fields at function-relative positions: off indexes the
|
||||||
|
// disp32 field, after is the address just past the instruction.
|
||||||
|
body := pc + len(prefix)
|
||||||
|
for i := range ps {
|
||||||
|
ps[i].off += body
|
||||||
|
ps[i].after = body + len(code)
|
||||||
|
}
|
||||||
|
return append(prefix, code...), ps, nil
|
||||||
}
|
}
|
||||||
|
|
||||||
func encodeNormal(s *ast.Instr, fi frameInfo) ([]byte, error) {
|
func encodeNormal(s *ast.Instr, fi frameInfo, link *linkInfo) ([]byte, []sbPatch, error) {
|
||||||
_, size := splitSize(strings.ToUpper(s.Mnemonic.Text))
|
_, size := splitSize(strings.ToUpper(s.Mnemonic.Text))
|
||||||
if size == 0 {
|
if size == 0 {
|
||||||
size = 8
|
size = 8
|
||||||
}
|
}
|
||||||
ops := make([]Operand, len(s.Operands))
|
ops := make([]Operand, len(s.Operands))
|
||||||
for i, op := range s.Operands {
|
for i, op := range s.Operands {
|
||||||
o, err := operandFromAST(op, size, fi)
|
o, err := operandFromAST(op, size, fi, link)
|
||||||
if err != nil {
|
if err != nil {
|
||||||
return nil, err
|
return nil, nil, err
|
||||||
}
|
}
|
||||||
ops[i] = o
|
ops[i] = o
|
||||||
}
|
}
|
||||||
return Encode(s.Mnemonic.Text, ops...)
|
e := &enc{}
|
||||||
|
if err := e.encode(s.Mnemonic.Text, ops); err != nil {
|
||||||
|
return nil, nil, err
|
||||||
|
}
|
||||||
|
ps := make([]sbPatch, len(e.patches))
|
||||||
|
for i, p := range e.patches {
|
||||||
|
ps[i] = sbPatch{off: p.off, name: p.name, addend: p.addend}
|
||||||
|
}
|
||||||
|
return e.out, ps, nil
|
||||||
}
|
}
|
||||||
|
|
||||||
// encodeJump encodes a JMP/CALL/Jcc with a rel32 offset resolved from the
|
// encodeJump encodes a JMP/CALL/Jcc with a relative offset resolved from the
|
||||||
// target label.
|
// target label, in the short (rel8) or long (rel32) form.
|
||||||
func encodeJump(s *ast.Instr, mnem string, pc int, offsets map[string]int) ([]byte, error) {
|
func encodeJump(s *ast.Instr, mnem string, pc int, offsets map[string]int, long bool, resolve func(string) string) ([]byte, error) {
|
||||||
if len(s.Operands) != 1 {
|
if len(s.Operands) != 1 {
|
||||||
return nil, fmt.Errorf("jump expects 1 operand, got %d", len(s.Operands))
|
return nil, fmt.Errorf("jump expects 1 operand, got %d", len(s.Operands))
|
||||||
}
|
}
|
||||||
@@ -200,12 +344,25 @@ func encodeJump(s *ast.Instr, mnem string, pc int, offsets map[string]int) ([]by
|
|||||||
if !ok {
|
if !ok {
|
||||||
return nil, fmt.Errorf("jump target must be a local label")
|
return nil, fmt.Errorf("jump target must be a local label")
|
||||||
}
|
}
|
||||||
|
if resolve != nil && mnem != "CALL" {
|
||||||
|
name = resolve(name)
|
||||||
|
}
|
||||||
target, ok := offsets[name]
|
target, ok := offsets[name]
|
||||||
if !ok {
|
if !ok {
|
||||||
return nil, fmt.Errorf("undefined label %q", name)
|
return nil, fmt.Errorf("undefined label %q", name)
|
||||||
}
|
}
|
||||||
rel := int64(target - (pc + jumpSize(mnem)))
|
rel := int64(target - (pc + jumpSize(mnem, long)))
|
||||||
|
|
||||||
|
if !long {
|
||||||
|
if !fits8(rel) {
|
||||||
|
return nil, fmt.Errorf("jump to %q does not fit the short form", name)
|
||||||
|
}
|
||||||
|
if mnem == "JMP" {
|
||||||
|
return []byte{0xEB, byte(int8(rel))}, nil
|
||||||
|
}
|
||||||
|
cc, _ := condCode(mnem)
|
||||||
|
return []byte{0x70 + byte(cc), byte(int8(rel))}, nil
|
||||||
|
}
|
||||||
switch mnem {
|
switch mnem {
|
||||||
case "JMP":
|
case "JMP":
|
||||||
return append([]byte{0xE9}, le32(rel)...), nil
|
return append([]byte{0xE9}, le32(rel)...), nil
|
||||||
@@ -231,7 +388,7 @@ var spReg = Reg{idx: 4, size: 8}
|
|||||||
|
|
||||||
// operandFromAST converts a parsed operand into an encoder Operand, applying
|
// operandFromAST converts a parsed operand into an encoder Operand, applying
|
||||||
// the frame translation to FP/SP pseudo-register operands.
|
// the frame translation to FP/SP pseudo-register operands.
|
||||||
func operandFromAST(op *ast.Operand, size int, fi frameInfo) (Operand, error) {
|
func operandFromAST(op *ast.Operand, size int, fi frameInfo, link *linkInfo) (Operand, error) {
|
||||||
switch op.Kind {
|
switch op.Kind {
|
||||||
case ast.OpImmediate:
|
case ast.OpImmediate:
|
||||||
if op.Imm.HasVal {
|
if op.Imm.HasVal {
|
||||||
@@ -257,9 +414,20 @@ func operandFromAST(op *ast.Operand, size int, fi frameInfo) (Operand, error) {
|
|||||||
off := fi.spAdjust + a.Sym.Offset
|
off := fi.spAdjust + a.Sym.Offset
|
||||||
return Mem{Base: spReg, Disp: off, HasBase: true, Size: size}, nil
|
return Mem{Base: spReg, Disp: off, HasBase: true, Size: size}, nil
|
||||||
}
|
}
|
||||||
// SB (global symbol) needs a relocation — not yet supported.
|
// SB (global symbol): a symbol defined in the same file (GLOBL) is
|
||||||
|
// encoded RIP-relative and resolved by the file-level layout;
|
||||||
|
// anything not defined here needs object-file emission.
|
||||||
if a.Sym != nil && a.Sym.Pseudo == "SB" {
|
if a.Sym != nil && a.Sym.Pseudo == "SB" {
|
||||||
return nil, fmt.Errorf("SB (global symbol) operands need relocation support (pending)")
|
if link == nil || link.symbols == nil {
|
||||||
|
return nil, fmt.Errorf("symbol %q needs file-level assembly (AssembleFile)", a.Sym.Name)
|
||||||
|
}
|
||||||
|
if !link.symbols[a.Sym.Name] {
|
||||||
|
if a.Sym.Static {
|
||||||
|
return nil, fmt.Errorf("undefined symbol %q", a.Sym.Name)
|
||||||
|
}
|
||||||
|
return nil, fmt.Errorf("external symbol %q needs object-file emission", a.Sym.Name)
|
||||||
|
}
|
||||||
|
return sbMem{size: size, name: a.Sym.Name, addend: a.Sym.Offset}, nil
|
||||||
}
|
}
|
||||||
|
|
||||||
// Memory with a real base register: (base), off(base), (base)(index*scale).
|
// Memory with a real base register: (base), off(base), (base)(index*scale).
|
||||||
|
|||||||
@@ -244,3 +244,76 @@ TEXT ·hsum(SB), NOSPLIT, $0
|
|||||||
t.Errorf("VEX kernel mismatch:\n got: %s\n want: %s", hexBytes(code), hexBytes(want))
|
t.Errorf("VEX kernel mismatch:\n got: %s\n want: %s", hexBytes(code), hexBytes(want))
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// TestAssembleShortJumps checks that a tight loop settles on the short (rel8)
|
||||||
|
// jump forms, byte for byte with the Go assembler.
|
||||||
|
func TestAssembleShortJumps(t *testing.T) {
|
||||||
|
fn := firstText(t, `
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·loop(SB), NOSPLIT, $0
|
||||||
|
XORQ AX, AX
|
||||||
|
l1:
|
||||||
|
ADDQ $1, AX
|
||||||
|
CMPQ AX, $10
|
||||||
|
JLT l1
|
||||||
|
RET
|
||||||
|
`)
|
||||||
|
code, _, err := Assemble(fn)
|
||||||
|
if err != nil {
|
||||||
|
t.Fatalf("Assemble: %v", err)
|
||||||
|
}
|
||||||
|
// From the Go-assembled function:
|
||||||
|
// XORQ AX, AX 4831c0
|
||||||
|
// ADDQ $1, AX 4883c001
|
||||||
|
// CMPQ AX, $10 4883f80a
|
||||||
|
// JLT l1 7cf6 (short, rel8)
|
||||||
|
// RET c3
|
||||||
|
want := []byte{
|
||||||
|
0x48, 0x31, 0xc0,
|
||||||
|
0x48, 0x83, 0xc0, 0x01,
|
||||||
|
0x48, 0x83, 0xf8, 0x0a,
|
||||||
|
0x7c, 0xf6,
|
||||||
|
0xc3,
|
||||||
|
}
|
||||||
|
if hexBytes(code) != hexBytes(want) {
|
||||||
|
t.Errorf("short-jump mismatch:\n got: %s\n want: %s", hexBytes(code), hexBytes(want))
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// TestAssembleJumpFolding checks jump-to-jump folding: a conditional jump to a
|
||||||
|
// label that only holds an unconditional jump is redirected to the ultimate
|
||||||
|
// target, exactly as the Go toolchain does before it encodes branches.
|
||||||
|
func TestAssembleJumpFolding(t *testing.T) {
|
||||||
|
fn := firstText(t, `
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·fold(SB), NOSPLIT, $0
|
||||||
|
XORQ AX, AX
|
||||||
|
JGE done
|
||||||
|
INCQ AX
|
||||||
|
done:
|
||||||
|
JMP end
|
||||||
|
end:
|
||||||
|
RET
|
||||||
|
`)
|
||||||
|
code, _, err := Assemble(fn)
|
||||||
|
if err != nil {
|
||||||
|
t.Fatalf("Assemble: %v", err)
|
||||||
|
}
|
||||||
|
// From the Go-assembled function: the JGE skips past the done: trampoline
|
||||||
|
// straight to end:
|
||||||
|
// XORQ AX, AX 4831c0
|
||||||
|
// JGE end 7d05 (folded past done)
|
||||||
|
// INCQ AX 48ffc0
|
||||||
|
// JMP end eb00
|
||||||
|
// RET c3
|
||||||
|
want := []byte{
|
||||||
|
0x48, 0x31, 0xc0,
|
||||||
|
0x7d, 0x05,
|
||||||
|
0x48, 0xff, 0xc0,
|
||||||
|
0xeb, 0x00,
|
||||||
|
0xc3,
|
||||||
|
}
|
||||||
|
if hexBytes(code) != hexBytes(want) {
|
||||||
|
t.Errorf("jump-folding mismatch:\n got: %s\n want: %s", hexBytes(code), hexBytes(want))
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|||||||
+66
-6
@@ -19,7 +19,16 @@ func Encode(mnemonic string, ops ...Operand) ([]byte, error) {
|
|||||||
}
|
}
|
||||||
|
|
||||||
type enc struct {
|
type enc struct {
|
||||||
out []byte
|
out []byte
|
||||||
|
patches []encPatch // disp32 fields awaiting static-symbol resolution
|
||||||
|
}
|
||||||
|
|
||||||
|
// encPatch marks a 4-byte displacement field in enc.out that must receive the
|
||||||
|
// RIP-relative offset of a static symbol once the file layout is settled.
|
||||||
|
type encPatch struct {
|
||||||
|
off int
|
||||||
|
name string
|
||||||
|
addend int64
|
||||||
}
|
}
|
||||||
|
|
||||||
func (e *enc) encode(mnem string, ops []Operand) error {
|
func (e *enc) encode(mnem string, ops []Operand) error {
|
||||||
@@ -40,10 +49,19 @@ func (e *enc) encode(mnem string, ops []Operand) error {
|
|||||||
return e.encodeJcc(cc, ops)
|
return e.encodeJcc(cc, ops)
|
||||||
}
|
}
|
||||||
|
|
||||||
// VEX (AVX/AVX2) instructions: the trailing B/W/L/Q/D is part of the
|
// VEX (AVX/AVX2) and EVEX (AVX-512) instructions: the trailing
|
||||||
// mnemonic, not a size suffix, so dispatch before splitSize.
|
// B/W/L/Q/D is part of the mnemonic, not a size suffix, so dispatch
|
||||||
if isVex(upper) {
|
// before splitSize.
|
||||||
return e.encodeVex(upper, ops)
|
if isVex(upper) || isEvex(upper) || upper == "KMOVW" {
|
||||||
|
return e.encodeVec(upper, ops)
|
||||||
|
}
|
||||||
|
|
||||||
|
// CMOVcc and SETcc carry the condition in the mnemonic (CMOVLGT, SETNE).
|
||||||
|
if strings.HasPrefix(upper, "CMOV") {
|
||||||
|
return e.encodeCmov(upper, ops)
|
||||||
|
}
|
||||||
|
if strings.HasPrefix(upper, "SET") {
|
||||||
|
return e.encodeSet(upper, ops)
|
||||||
}
|
}
|
||||||
|
|
||||||
base, size := splitSize(upper)
|
base, size := splitSize(upper)
|
||||||
@@ -63,12 +81,18 @@ func (e *enc) encode(mnem string, ops []Operand) error {
|
|||||||
return e.encodeUnary(unaryOp[base], ops, size)
|
return e.encodeUnary(unaryOp[base], ops, size)
|
||||||
case "SHL", "SHR", "SAR":
|
case "SHL", "SHR", "SAR":
|
||||||
return e.encodeShift(shiftOp[base], ops, size)
|
return e.encodeShift(shiftOp[base], ops, size)
|
||||||
case "IMUL":
|
case "IMUL", "IMUL3":
|
||||||
return e.encodeImul(ops, size)
|
return e.encodeImul(ops, size)
|
||||||
case "PUSH":
|
case "PUSH":
|
||||||
return e.encodePushPop(ops, true)
|
return e.encodePushPop(ops, true)
|
||||||
case "POP":
|
case "POP":
|
||||||
return e.encodePushPop(ops, false)
|
return e.encodePushPop(ops, false)
|
||||||
|
case "LZCNT", "TZCNT":
|
||||||
|
return e.encodeCount(base, ops, size)
|
||||||
|
case "MOVBLZX", "MOVBQZX", "MOVWLZX", "MOVWQZX", "MOVWLSX", "MOVLQSX":
|
||||||
|
return e.encodeMovExtend(base, ops)
|
||||||
|
case "CVTSL2SD", "CVTSQ2SD":
|
||||||
|
return e.encodeCvtsi2sd(base == "CVTSQ2SD", ops)
|
||||||
}
|
}
|
||||||
return fmt.Errorf("unsupported instruction %q", mnem)
|
return fmt.Errorf("unsupported instruction %q", mnem)
|
||||||
}
|
}
|
||||||
@@ -91,6 +115,20 @@ func splitSize(upper string) (base string, size int) {
|
|||||||
return upper, 0
|
return upper, 0
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// encodeVec dispatches a VEX/EVEX mnemonic to the right encoding: KMOVW has
|
||||||
|
// its own direction-dependent opcodes; KTESTW is always VEX; everything else
|
||||||
|
// takes EVEX when an operand demands it (a ZMM or K register, or an
|
||||||
|
// EVEX-only mnemonic) and VEX otherwise.
|
||||||
|
func (e *enc) encodeVec(upper string, ops []Operand) error {
|
||||||
|
if upper == "KMOVW" {
|
||||||
|
return e.encodeKmovw(ops)
|
||||||
|
}
|
||||||
|
if upper == "KTESTW" || !evexRequired(upper, ops) {
|
||||||
|
return e.encodeVex(upper, ops)
|
||||||
|
}
|
||||||
|
return e.encodeEvex(upper, ops)
|
||||||
|
}
|
||||||
|
|
||||||
// --- instruction components -------------------------------------------------
|
// --- instruction components -------------------------------------------------
|
||||||
|
|
||||||
type instr struct {
|
type instr struct {
|
||||||
@@ -100,17 +138,29 @@ type instr struct {
|
|||||||
rexX bool
|
rexX bool
|
||||||
rexB bool
|
rexB bool
|
||||||
rexForced bool // REX needed even with all bits zero (8-bit low registers)
|
rexForced bool // REX needed even with all bits zero (8-bit low registers)
|
||||||
|
prefix byte // legacy 0xF2/0xF3 prefix (0 = none); emitted after 0x66
|
||||||
opcode []byte
|
opcode []byte
|
||||||
modrm int // -1 if absent
|
modrm int // -1 if absent
|
||||||
sib int // -1 if absent
|
sib int // -1 if absent
|
||||||
disp []byte
|
disp []byte
|
||||||
imm []byte
|
imm []byte
|
||||||
|
sb *sbRef // static-symbol displacement in disp, awaiting resolution
|
||||||
|
}
|
||||||
|
|
||||||
|
// sbRef records that an instruction's displacement refers to a static symbol
|
||||||
|
// rather than holding a literal value.
|
||||||
|
type sbRef struct {
|
||||||
|
name string
|
||||||
|
addend int64
|
||||||
}
|
}
|
||||||
|
|
||||||
func (e *enc) emit(i *instr) error {
|
func (e *enc) emit(i *instr) error {
|
||||||
if i.opSize16 {
|
if i.opSize16 {
|
||||||
e.out = append(e.out, 0x66)
|
e.out = append(e.out, 0x66)
|
||||||
}
|
}
|
||||||
|
if i.prefix != 0 {
|
||||||
|
e.out = append(e.out, i.prefix)
|
||||||
|
}
|
||||||
rex := byte(0)
|
rex := byte(0)
|
||||||
if i.rexW {
|
if i.rexW {
|
||||||
rex |= 0x08
|
rex |= 0x08
|
||||||
@@ -134,6 +184,9 @@ func (e *enc) emit(i *instr) error {
|
|||||||
if i.sib >= 0 {
|
if i.sib >= 0 {
|
||||||
e.out = append(e.out, byte(i.sib))
|
e.out = append(e.out, byte(i.sib))
|
||||||
}
|
}
|
||||||
|
if i.sb != nil {
|
||||||
|
e.patches = append(e.patches, encPatch{off: len(e.out), name: i.sb.name, addend: i.sb.addend})
|
||||||
|
}
|
||||||
e.out = append(e.out, i.disp...)
|
e.out = append(e.out, i.disp...)
|
||||||
e.out = append(e.out, i.imm...)
|
e.out = append(e.out, i.imm...)
|
||||||
return nil
|
return nil
|
||||||
@@ -181,6 +234,13 @@ func setRMReg(i *instr, regField int, rexR, regForced bool, rm Operand, opSize i
|
|||||||
return nil
|
return nil
|
||||||
case Mem:
|
case Mem:
|
||||||
return setMem(i, regField, r)
|
return setMem(i, regField, r)
|
||||||
|
case sbMem:
|
||||||
|
// RIP-relative reference; the displacement is patched once the static
|
||||||
|
// symbol's address is known.
|
||||||
|
i.modrm = regField<<3 | 0x05 // mod=00, rm=101 → (RIP)+disp32
|
||||||
|
i.disp = le32(0)
|
||||||
|
i.sb = &sbRef{name: r.name, addend: r.addend}
|
||||||
|
return nil
|
||||||
default:
|
default:
|
||||||
return fmt.Errorf("invalid r/m operand %T", rm)
|
return fmt.Errorf("invalid r/m operand %T", rm)
|
||||||
}
|
}
|
||||||
|
|||||||
+115
-1
@@ -4,6 +4,7 @@
|
|||||||
package asm
|
package asm
|
||||||
|
|
||||||
import (
|
import (
|
||||||
|
"strings"
|
||||||
"testing"
|
"testing"
|
||||||
|
|
||||||
"golang.org/x/arch/x86/x86asm"
|
"golang.org/x/arch/x86/x86asm"
|
||||||
@@ -70,7 +71,7 @@ func TestALU(t *testing.T) {
|
|||||||
checkSyntax(t, "and rbx, 0x7", "ANDQ", Imm(7), BX)
|
checkSyntax(t, "and rbx, 0x7", "ANDQ", Imm(7), BX)
|
||||||
checkSyntax(t, "or rcx, rbx", "ORQ", BX, CX)
|
checkSyntax(t, "or rcx, rbx", "ORQ", BX, CX)
|
||||||
checkSyntax(t, "xor rax, rax", "XORQ", AX, AX)
|
checkSyntax(t, "xor rax, rax", "XORQ", AX, AX)
|
||||||
checkSyntax(t, "cmp r10, rsi", "CMPQ", SI, Reg{idx: 10, size: 8})
|
checkSyntax(t, "cmp rsi, r10", "CMPQ", SI, Reg{idx: 10, size: 8})
|
||||||
checkSyntax(t, "add rbx, qword ptr [rax]", "ADDQ", Ptr(AX, 0, 8), BX)
|
checkSyntax(t, "add rbx, qword ptr [rax]", "ADDQ", Ptr(AX, 0, 8), BX)
|
||||||
checkSyntax(t, "add qword ptr [rax], rbx", "ADDQ", BX, Ptr(AX, 0, 8))
|
checkSyntax(t, "add qword ptr [rax], rbx", "ADDQ", BX, Ptr(AX, 0, 8))
|
||||||
checkSyntax(t, "cmp rbx, -0x20", "CMPQ", Imm(-32), BX)
|
checkSyntax(t, "cmp rbx, -0x20", "CMPQ", Imm(-32), BX)
|
||||||
@@ -134,3 +135,116 @@ func TestGoFlacScalarTail(t *testing.T) {
|
|||||||
checkSyntax(t, "lea r9, ptr [rsi+4*rbx]", "LEAQ", Idx(SI, BX, 4, 0, 8), Reg{idx: 9, size: 8})
|
checkSyntax(t, "lea r9, ptr [rsi+4*rbx]", "LEAQ", Idx(SI, BX, 4, 0, 8), Reg{idx: 9, size: 8})
|
||||||
checkSyntax(t, "and r10, -0x8", "ANDQ", Imm(-8), Reg{idx: 10, size: 8})
|
checkSyntax(t, "and r10, -0x8", "ANDQ", Imm(-8), Reg{idx: 10, size: 8})
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// TestScalarGroundTruth checks the scalar instruction families the go-flac
|
||||||
|
// kernels use beyond the basic set, byte for byte against the Go assembler's
|
||||||
|
// machine code. wantOp is the x86 decoder's name, which differs from the
|
||||||
|
// Plan 9 spelling for some of these (CMOVLGT → CMOVG, MOVBLZX → MOVZX, …).
|
||||||
|
func TestScalarGroundTruth(t *testing.T) {
|
||||||
|
r8 := Reg{idx: 8, size: 8}
|
||||||
|
r9 := Reg{idx: 9, size: 8}
|
||||||
|
r9w := Reg{idx: 9, size: 2}
|
||||||
|
r8w := Reg{idx: 8, size: 2}
|
||||||
|
r13 := Reg{idx: 13, size: 8}
|
||||||
|
cases := []struct {
|
||||||
|
name string
|
||||||
|
mnem string
|
||||||
|
ops []Operand
|
||||||
|
want string
|
||||||
|
wantOp string
|
||||||
|
}{
|
||||||
|
{"LZCNTL AX,CX", "LZCNTL", []Operand{AX, CX}, "f30fbdc8", "LZCNT"},
|
||||||
|
{"LZCNTQ R8,R9", "LZCNTQ", []Operand{r8, r9}, "f34d0fbdc8", "LZCNT"},
|
||||||
|
{"LZCNTW AX,CX", "LZCNTW", []Operand{AX, CX}, "66f30fbdc8", "LZCNT"},
|
||||||
|
{"TZCNTL AX,CX", "TZCNTL", []Operand{AX, CX}, "f30fbcc8", "TZCNT"},
|
||||||
|
{"CMOVLGT CX,AX", "CMOVLGT", []Operand{CX, AX}, "0f4fc1", "CMOVG"},
|
||||||
|
{"CMOVLEQ CX,AX", "CMOVLEQ", []Operand{CX, AX}, "0f44c1", "CMOVE"},
|
||||||
|
{"CMOVQGT R9,R8", "CMOVQGT", []Operand{r9, r8}, "4d0f4fc1", "CMOVG"},
|
||||||
|
{"CMOVWLS R9W,R8W", "CMOVWLS", []Operand{r9w, r8w}, "66450f46c1", "CMOVBE"},
|
||||||
|
{"SETNE AL", "SETNE", []Operand{AL}, "0f95c0", "SETNE"},
|
||||||
|
{"SETNE (AX)", "SETNE", []Operand{Ptr(AX, 0, 1)}, "0f9500", "SETNE"},
|
||||||
|
{"MOVBLZX AL,CX", "MOVBLZX", []Operand{AL, CX}, "0fb6c8", "MOVZX"},
|
||||||
|
{"MOVBLZX (SI),CX", "MOVBLZX", []Operand{Ptr(SI, 0, 1), CX}, "0fb60e", "MOVZX"},
|
||||||
|
{"MOVWLSX (SI)(AX*1),CX", "MOVWLSX", []Operand{Idx(SI, AX, 1, 0, 2), CX}, "0fbf0c06", "MOVSX"},
|
||||||
|
{"MOVLQSX CX,R8", "MOVLQSX", []Operand{CX, r8}, "4c63c1", "MOVSXD"},
|
||||||
|
{"MOVBQZX AL,R8", "MOVBQZX", []Operand{AL, r8}, "4c0fb6c0", "MOVZX"},
|
||||||
|
{"MOVWLZX AX,CX", "MOVWLZX", []Operand{AX, CX}, "0fb7c8", "MOVZX"},
|
||||||
|
{"MOVWQZX AX,R8", "MOVWQZX", []Operand{AX, r8}, "4c0fb7c0", "MOVZX"},
|
||||||
|
{"CVTSL2SD R8,X13", "CVTSL2SD", []Operand{r8, vreg(t, "X13")}, "f2450f2ae8", "CVTSI2SD"},
|
||||||
|
{"CVTSL2SD AX,X0", "CVTSL2SD", []Operand{AX, vreg(t, "X0")}, "f20f2ac0", "CVTSI2SD"},
|
||||||
|
{"CVTSQ2SD R8,X13", "CVTSQ2SD", []Operand{r8, vreg(t, "X13")}, "f24d0f2ae8", "CVTSI2SD"},
|
||||||
|
{"INCW (R13)(AX*2)", "INCW", []Operand{Idx(r13, AX, 2, 0, 2)}, "6641ff444500", "INC"},
|
||||||
|
// The traditional three-operand IMUL spelling.
|
||||||
|
{"IMUL3L $31,CX,DX", "IMUL3L", []Operand{Imm(31), CX, DX}, "6bd11f", "IMUL"},
|
||||||
|
{"IMUL3L $256,CX,DX", "IMUL3L", []Operand{Imm(256), CX, DX}, "69d100010000", "IMUL"},
|
||||||
|
{"IMUL3Q $7,R9,R8", "IMUL3Q", []Operand{Imm(7), r9, r8}, "4d6bc107", "IMUL"},
|
||||||
|
{"IMUL3W $5,CX,DX", "IMUL3W", []Operand{Imm(5), CX, DX}, "666bd105", "IMUL"},
|
||||||
|
// Negative displacement with base + index (regression: the parser
|
||||||
|
// used to drop the whole address).
|
||||||
|
{"LEAQ -4(DX)(R9*4),R9", "LEAQ", []Operand{Idx(DX, r9, 4, -4, 8), r9}, "4e8d4c8afc", "LEA"},
|
||||||
|
{"LEAQ 16(SI)(BX*4),R10", "LEAQ", []Operand{Idx(SI, BX, 4, 16, 8), Reg{idx: 10, size: 8}}, "4c8d549e10", "LEA"},
|
||||||
|
// Register-to-register MOV uses the r/m←r opcode (reg = source), the
|
||||||
|
// Go assembler's choice.
|
||||||
|
{"MOVQ BX,R10", "MOVQ", []Operand{BX, Reg{idx: 10, size: 8}}, "4989da", "MOV"},
|
||||||
|
{"MOVQ AX,BX", "MOVQ", []Operand{AX, BX}, "4889c3", "MOV"},
|
||||||
|
{"MOVL AX,BX", "MOVL", []Operand{AX, BX}, "89c3", "MOV"},
|
||||||
|
{"MOVB AL,BL", "MOVB", []Operand{AL, BL}, "88c3", "MOV"},
|
||||||
|
{"MOVW AX,BX", "MOVW", []Operand{AX, BX}, "6689c3", "MOV"},
|
||||||
|
{"MOVQ R12,R13", "MOVQ", []Operand{Reg{idx: 12, size: 8}, Reg{idx: 13, size: 8}}, "4d89e5", "MOV"},
|
||||||
|
// CMP must record first − second: with a register second operand the
|
||||||
|
// first goes in r/m, with a memory second operand the first goes in reg.
|
||||||
|
{"CMPQ SI,R10", "CMPQ", []Operand{SI, Reg{idx: 10, size: 8}}, "4c39d6", "CMP"},
|
||||||
|
{"CMPQ SI,(AX)", "CMPQ", []Operand{SI, Ptr(AX, 0, 8)}, "483b30", "CMP"},
|
||||||
|
{"CMPQ (AX),SI", "CMPQ", []Operand{Ptr(AX, 0, 8), SI}, "483930", "CMP"},
|
||||||
|
{"CMPL CX,(AX)", "CMPL", []Operand{CX, Ptr(AX, 0, 4)}, "3b08", "CMP"},
|
||||||
|
{"CMPB AL,(BX)", "CMPB", []Operand{AL, Ptr(BX, 0, 1)}, "3a03", "CMP"},
|
||||||
|
{"CMPW AX,BX", "CMPW", []Operand{AX, BX}, "6639d8", "CMP"},
|
||||||
|
}
|
||||||
|
for _, c := range cases {
|
||||||
|
code, err := Encode(c.mnem, c.ops...)
|
||||||
|
if err != nil {
|
||||||
|
t.Errorf("%s: Encode: %v", c.name, err)
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
if got := strings.ReplaceAll(hexBytes(code), " ", ""); got != c.want {
|
||||||
|
t.Errorf("%s: bytes %s, want %s", c.name, got, c.want)
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
inst, err := x86asm.Decode(code, 64)
|
||||||
|
if err != nil {
|
||||||
|
t.Errorf("%s: Decode(% x): %v", c.name, code, err)
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
if inst.Op.String() != c.wantOp {
|
||||||
|
t.Errorf("%s: decoded as %s", c.name, inst.Op.String())
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// TestScalarErrors checks that malformed conditional / extend / convert
|
||||||
|
// instructions are rejected.
|
||||||
|
func TestScalarErrors(t *testing.T) {
|
||||||
|
cases := []struct {
|
||||||
|
name string
|
||||||
|
mnem string
|
||||||
|
ops []Operand
|
||||||
|
}{
|
||||||
|
{"CMOV arity", "CMOVLGT", []Operand{AX}},
|
||||||
|
{"CMOV bare", "CMOV", []Operand{AX, BX}},
|
||||||
|
{"CMOV bad size", "CMOVBGT", []Operand{AX, BX}},
|
||||||
|
{"CMOV bad condition", "CMOVLXX", []Operand{AX, BX}},
|
||||||
|
{"CMOV mem dst", "CMOVLGT", []Operand{AX, Ptr(BX, 0, 4)}},
|
||||||
|
{"SET arity", "SETNE", []Operand{AL, BL}},
|
||||||
|
{"SET bad condition", "SETXX", []Operand{AL}},
|
||||||
|
{"SET bare", "SET", []Operand{AL}},
|
||||||
|
{"LZCNT arity", "LZCNTL", []Operand{AX}},
|
||||||
|
{"LZCNT mem dst", "LZCNTL", []Operand{AX, Ptr(BX, 0, 4)}},
|
||||||
|
{"MOVBLZX mem dst", "MOVBLZX", []Operand{AL, Ptr(BX, 0, 4)}},
|
||||||
|
{"CVTSL2SD gpr dst", "CVTSL2SD", []Operand{AX, BX}},
|
||||||
|
}
|
||||||
|
for _, c := range cases {
|
||||||
|
if _, err := Encode(c.mnem, c.ops...); err == nil {
|
||||||
|
t.Errorf("%s: expected an error, got none", c.name)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|||||||
+556
@@ -0,0 +1,556 @@
|
|||||||
|
// Copyright (c) 2026 Petr Balvín <opensource@petrbalvin.org> (https://petrbalvin.org)
|
||||||
|
// SPDX-License-Identifier: BSD-3-Clause
|
||||||
|
|
||||||
|
package asm
|
||||||
|
|
||||||
|
import "fmt"
|
||||||
|
|
||||||
|
// This file implements EVEX (AVX-512) instruction encoding: the four-byte
|
||||||
|
// EVEX prefix with 5-bit vector register fields (Z0–Z31, X/Y 16–31), the
|
||||||
|
// compressed disp8×N displacement, and the operand shapes the go-flac
|
||||||
|
// AVX-512 kernels use. Masking ({k}) and zeroing ({z}) are not supported —
|
||||||
|
// the kernels do not use them. K-register operands (mask destinations,
|
||||||
|
// KMOVW, KTESTW) are.
|
||||||
|
|
||||||
|
// evexSpec describes one EVEX instruction's encoding parameters. The form
|
||||||
|
// field reuses the vexForm shapes, which carry over unchanged.
|
||||||
|
type evexSpec struct {
|
||||||
|
mapSel int // 1 = 0F, 2 = 0F38, 3 = 0F3A
|
||||||
|
opcode byte
|
||||||
|
w int
|
||||||
|
pp int // 0 = none, 1 = 66, 2 = F3, 3 = F2
|
||||||
|
opdigit int // ModRM.reg /digit, or -1 when reg is a register
|
||||||
|
form vexForm // vexNDS3, vexRM, vexShiftImm, vexNDS3Imm, vexExtract
|
||||||
|
n [3]int // disp8×N multiplier per vector length (128/256/512)
|
||||||
|
}
|
||||||
|
|
||||||
|
// evexTable maps an upper-case mnemonic to its EVEX encoding. Mnemonics
|
||||||
|
// that also have a VEX form (VPADDD, VMOVUPD, …) are dispatched here only
|
||||||
|
// when an operand demands EVEX (a ZMM or K register); EVEX-only mnemonics
|
||||||
|
// (VPXORD, VALIGND, …) always encode through this table. The N multipliers
|
||||||
|
// are taken from the Go assembler's opcode tables, which are authoritative
|
||||||
|
// for byte-for-byte agreement.
|
||||||
|
var evexTable = map[string]evexSpec{
|
||||||
|
// EVEX.128/256/512.66.0F — integer arithmetic / logic, NDS form.
|
||||||
|
"VPADDD": {1, 0xFE, 0, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPADDQ": {1, 0xD4, 1, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPSUBD": {1, 0xFA, 0, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPSUBQ": {1, 0xFB, 1, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPUNPCKLDQ": {1, 0x62, 0, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPUNPCKHDQ": {1, 0x6A, 0, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPXORD": {1, 0xEF, 0, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPXORQ": {1, 0xEF, 1, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPCMPEQD": {1, 0x76, 0, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VFMADD231PD": {2, 0xB8, 1, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
|
||||||
|
// EVEX.128/256/512.66.0F.W1 — packed double arithmetic.
|
||||||
|
"VADDPD": {1, 0x58, 1, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VMULPD": {1, 0x59, 1, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
|
||||||
|
// EVEX.512.66.0F3A — align (NDS + imm8).
|
||||||
|
"VALIGND": {3, 0x03, 0, 1, -1, vexNDS3Imm, [3]int{16, 32, 64}},
|
||||||
|
|
||||||
|
// EVEX.128/256/512.66.0F — immediate shift (VPSRAD /4).
|
||||||
|
"VPSRAD": {1, 0x72, 0, 1, 4, vexShiftImm, [3]int{16, 32, 64}},
|
||||||
|
// EVEX.128/256/512.66.0F.W1 — variable shift with an XMM count (VPSRAQ;
|
||||||
|
// the W bit distinguishes it from VPSRAD's E2 form).
|
||||||
|
"VPSRAQ": {1, 0xE2, 1, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
|
||||||
|
// EVEX.128/256/512.F3.0F.W1 — signed qword to packed double (reg=dst,
|
||||||
|
// rm=src, no vvvv).
|
||||||
|
"VCVTQQ2PD": {1, 0xE6, 1, 2, -1, vexRM, [3]int{16, 32, 64}},
|
||||||
|
// EVEX.128/256/512.66.0F38.W0 — sign-extend dwords to qwords; the memory
|
||||||
|
// operand is the narrow source, so disp8×N follows its size (8/16/32 for
|
||||||
|
// the xmm/ymm/zmm destination lengths).
|
||||||
|
"VPMOVSXDQ": {2, 0x25, 0, 1, -1, vexRM, [3]int{8, 16, 32}},
|
||||||
|
|
||||||
|
// EVEX.512.66.0F3A.W1 — lane extract (reg=ZMM source, rm=YMM/memory
|
||||||
|
// destination, imm8).
|
||||||
|
"VEXTRACTI64X4": {3, 0x3B, 1, 1, -1, vexExtract, [3]int{0, 0, 32}},
|
||||||
|
"VEXTRACTF64X4": {3, 0x1B, 1, 1, -1, vexExtract, [3]int{0, 0, 32}},
|
||||||
|
|
||||||
|
// EVEX.66.0F38 — more integer NDS forms (W distinguishes D/Q).
|
||||||
|
"VPMULLD": {2, 0x40, 0, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPMULLQ": {2, 0x40, 1, 1, -1, vexNDS3, [3]int{16, 32, 64}},
|
||||||
|
"VPERMD": {2, 0x36, 0, 1, -1, vexNDS3, [3]int{0, 32, 64}},
|
||||||
|
|
||||||
|
// EVEX.66.0F — immediate shift (VPSLLD /6).
|
||||||
|
"VPSLLD": {1, 0x72, 0, 1, 6, vexShiftImm, [3]int{16, 32, 64}},
|
||||||
|
|
||||||
|
// EVEX.F3.0F38.W0 — narrowing stores: reg = wide source, rm = narrow
|
||||||
|
// destination (VPMOVDW dword→word, VPMOVQD qword→dword).
|
||||||
|
"VPMOVDW": {2, 0x33, 0, 2, -1, vexRMRev, [3]int{8, 16, 32}},
|
||||||
|
"VPMOVQD": {2, 0x35, 0, 2, -1, vexRMRev, [3]int{8, 16, 32}},
|
||||||
|
}
|
||||||
|
|
||||||
|
// evexBcastSpec describes an EVEX broadcast (VPBROADCASTD/Q): the opcode
|
||||||
|
// depends on the source kind — a GPR source uses opReg, a memory source uses
|
||||||
|
// opMem with a disp8×N of n.
|
||||||
|
type evexBcastSpec struct {
|
||||||
|
mapSel int
|
||||||
|
opReg byte
|
||||||
|
opMem byte
|
||||||
|
w int
|
||||||
|
n int
|
||||||
|
}
|
||||||
|
|
||||||
|
var evexBcastTable = map[string]evexBcastSpec{
|
||||||
|
// EVEX.128/256/512.66.0F38 — broadcast a dword/qword to all lanes.
|
||||||
|
"VPBROADCASTD": {2, 0x7C, 0x58, 0, 4},
|
||||||
|
"VPBROADCASTQ": {2, 0x7C, 0x59, 1, 8},
|
||||||
|
}
|
||||||
|
|
||||||
|
// evexMoveSpec describes an EVEX move (load and store opcodes, like the VEX
|
||||||
|
// move table).
|
||||||
|
type evexMoveSpec struct {
|
||||||
|
mapSel int
|
||||||
|
pp int
|
||||||
|
load byte // r/m → vector
|
||||||
|
store byte // vector → r/m
|
||||||
|
w int
|
||||||
|
n [3]int
|
||||||
|
}
|
||||||
|
|
||||||
|
// evexMoveTable maps an upper-case EVEX move mnemonic to its encoding.
|
||||||
|
var evexMoveTable = map[string]evexMoveSpec{
|
||||||
|
// EVEX.128/256/512.F3.0F.W0 — unaligned integer move.
|
||||||
|
"VMOVDQU32": {1, 2, 0x6F, 0x7F, 0, [3]int{16, 32, 64}},
|
||||||
|
// EVEX.128/256/512.66.0F.W1 — unaligned packed double move.
|
||||||
|
"VMOVUPD": {1, 1, 0x10, 0x11, 1, [3]int{16, 32, 64}},
|
||||||
|
}
|
||||||
|
|
||||||
|
// isEvex reports whether the mnemonic has an EVEX encoding we handle.
|
||||||
|
func isEvex(mnemUpper string) bool {
|
||||||
|
if _, ok := evexTable[mnemUpper]; ok {
|
||||||
|
return true
|
||||||
|
}
|
||||||
|
if _, ok := evexBcastTable[mnemUpper]; ok {
|
||||||
|
return true
|
||||||
|
}
|
||||||
|
_, ok := evexMoveTable[mnemUpper]
|
||||||
|
return ok
|
||||||
|
}
|
||||||
|
|
||||||
|
// evexRequired reports whether the operands force the EVEX encoding of a
|
||||||
|
// mnemonic that also has a VEX form: ZMM and K registers do, and so do
|
||||||
|
// register indices 16–31, which only EVEX can represent (X16–Y31 exist
|
||||||
|
// solely under AVX-512).
|
||||||
|
func evexRequired(upper string, ops []Operand) bool {
|
||||||
|
_, inVex := vexTable[upper]
|
||||||
|
_, inVexMove := vexMoveTable[upper]
|
||||||
|
if !inVex && !inVexMove {
|
||||||
|
return true // EVEX-only mnemonic
|
||||||
|
}
|
||||||
|
for _, op := range ops {
|
||||||
|
if r, ok := op.(Reg); ok && (r.size == 64 || r.mask || (r.isVec() && r.idx >= 16)) {
|
||||||
|
return true
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return false
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvex encodes an EVEX instruction with operands in Plan 9 order.
|
||||||
|
func (e *enc) encodeEvex(mnemUpper string, ops []Operand) error {
|
||||||
|
if bs, ok := evexBcastTable[mnemUpper]; ok {
|
||||||
|
return e.encodeEvexBcast(bs, ops)
|
||||||
|
}
|
||||||
|
if ms, ok := evexMoveTable[mnemUpper]; ok {
|
||||||
|
return e.encodeEvexMove(mnemUpper, ms, ops)
|
||||||
|
}
|
||||||
|
spec, ok := evexTable[mnemUpper]
|
||||||
|
if !ok {
|
||||||
|
return fmt.Errorf("unsupported instruction %q for ZMM/K operands", mnemUpper)
|
||||||
|
}
|
||||||
|
switch spec.form {
|
||||||
|
case vexNDS3:
|
||||||
|
return e.encodeEvexNDS3(spec, ops)
|
||||||
|
case vexRM:
|
||||||
|
return e.encodeEvexRM(spec, ops)
|
||||||
|
case vexRMRev:
|
||||||
|
return e.encodeEvexRMRev(spec, ops)
|
||||||
|
case vexShiftImm:
|
||||||
|
return e.encodeEvexShiftImm(spec, ops)
|
||||||
|
case vexNDS3Imm:
|
||||||
|
return e.encodeEvexNDS3Imm(spec, ops)
|
||||||
|
case vexExtract:
|
||||||
|
return e.encodeEvexExtract(spec, ops)
|
||||||
|
}
|
||||||
|
return fmt.Errorf("unhandled EVEX form for %s", mnemUpper)
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvexNDS3 encodes the three-operand NDS form: OP src2, src1, dst. The
|
||||||
|
// destination may be an opmask register (VPCMPEQD), in which case the vector
|
||||||
|
// length comes from the sources.
|
||||||
|
func (e *enc) encodeEvexNDS3(spec evexSpec, ops []Operand) error {
|
||||||
|
if len(ops) != 3 {
|
||||||
|
return fmt.Errorf("EVEX NDS instruction expects 3 operands, got %d", len(ops))
|
||||||
|
}
|
||||||
|
src2, src1, dst := ops[0], ops[1], ops[2]
|
||||||
|
dstReg, ok := dst.(Reg)
|
||||||
|
if !ok || (!dstReg.isVec() && !dstReg.mask) {
|
||||||
|
return fmt.Errorf("EVEX destination must be a vector or mask register")
|
||||||
|
}
|
||||||
|
vvvvReg, ok := src1.(Reg)
|
||||||
|
if !ok || !vvvvReg.isVec() {
|
||||||
|
return fmt.Errorf("EVEX vvvv operand must be a vector register")
|
||||||
|
}
|
||||||
|
ll := dstReg.vecLenBit()
|
||||||
|
if dstReg.mask {
|
||||||
|
ll = vvvvReg.vecLenBit()
|
||||||
|
if r, ok := src2.(Reg); ok && r.isVec() {
|
||||||
|
ll = r.vecLenBit()
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return e.emitEvexFields(spec, ll, dstReg.idx, vvvvReg.idx, src2)
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvexRM encodes the two-operand form: OP src, dst (reg=dst, rm=src,
|
||||||
|
// no vvvv), e.g. VCVTQQ2PD.
|
||||||
|
func (e *enc) encodeEvexRM(spec evexSpec, ops []Operand) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("EVEX two-operand instruction expects 2 operands, got %d", len(ops))
|
||||||
|
}
|
||||||
|
src, dst := ops[0], ops[1]
|
||||||
|
dstReg, ok := dst.(Reg)
|
||||||
|
if !ok || !dstReg.isVec() {
|
||||||
|
return fmt.Errorf("EVEX destination must be a vector register")
|
||||||
|
}
|
||||||
|
return e.emitEvexFields(spec, dstReg.vecLenBit(), dstReg.idx, -1, src)
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvexShiftImm encodes an immediate shift: OP $imm, src, dst
|
||||||
|
// (ModRM.reg = /digit, vvvv = dst, rm = src, imm8), e.g. VPSRAD $31, Z3, Z5.
|
||||||
|
func (e *enc) encodeEvexShiftImm(spec evexSpec, ops []Operand) error {
|
||||||
|
if len(ops) != 3 {
|
||||||
|
return fmt.Errorf("EVEX shift expects 3 operands ($imm, src, dst), got %d", len(ops))
|
||||||
|
}
|
||||||
|
imm, src, dst := ops[0], ops[1], ops[2]
|
||||||
|
immVal, ok := imm.(Imm)
|
||||||
|
if !ok {
|
||||||
|
return fmt.Errorf("shift count must be an immediate")
|
||||||
|
}
|
||||||
|
srcReg, ok := src.(Reg)
|
||||||
|
if !ok || !srcReg.isVec() {
|
||||||
|
return fmt.Errorf("shift source must be a vector register")
|
||||||
|
}
|
||||||
|
dstReg, ok := dst.(Reg)
|
||||||
|
if !ok || !dstReg.isVec() {
|
||||||
|
return fmt.Errorf("shift destination must be a vector register")
|
||||||
|
}
|
||||||
|
immByte, err := imm8(int64(immVal))
|
||||||
|
if err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
if err := e.emitEvexFields(spec, dstReg.vecLenBit(), spec.opdigit, dstReg.idx, srcReg); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
e.out = append(e.out, immByte)
|
||||||
|
return nil
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvexNDS3Imm encodes OP $imm, src2, src1, dst (reg=dst, vvvv=src1,
|
||||||
|
// rm=src2, imm8), e.g. VALIGND.
|
||||||
|
func (e *enc) encodeEvexNDS3Imm(spec evexSpec, ops []Operand) error {
|
||||||
|
if len(ops) != 4 {
|
||||||
|
return fmt.Errorf("instruction expects 4 operands ($imm, src2, src1, dst), got %d", len(ops))
|
||||||
|
}
|
||||||
|
imm, src2, src1, dst := ops[0], ops[1], ops[2], ops[3]
|
||||||
|
immVal, ok := imm.(Imm)
|
||||||
|
if !ok {
|
||||||
|
return fmt.Errorf("shuffle control must be an immediate")
|
||||||
|
}
|
||||||
|
dstReg, ok := dst.(Reg)
|
||||||
|
if !ok || !dstReg.isVec() {
|
||||||
|
return fmt.Errorf("destination must be a vector register")
|
||||||
|
}
|
||||||
|
vvvvReg, ok := src1.(Reg)
|
||||||
|
if !ok || !vvvvReg.isVec() {
|
||||||
|
return fmt.Errorf("second source must be a vector register")
|
||||||
|
}
|
||||||
|
immByte, err := imm8(int64(immVal))
|
||||||
|
if err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
if err := e.emitEvexFields(spec, dstReg.vecLenBit(), dstReg.idx, vvvvReg.idx, src2); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
e.out = append(e.out, immByte)
|
||||||
|
return nil
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvexExtract encodes OP $imm, zsrc, ydst (reg=ZMM source, rm=YMM/memory
|
||||||
|
// destination, imm8), e.g. VEXTRACTI64X4.
|
||||||
|
func (e *enc) encodeEvexExtract(spec evexSpec, ops []Operand) error {
|
||||||
|
if len(ops) != 3 {
|
||||||
|
return fmt.Errorf("extract expects 3 operands ($imm, zsrc, ydst), got %d", len(ops))
|
||||||
|
}
|
||||||
|
imm, src, dst := ops[0], ops[1], ops[2]
|
||||||
|
immVal, ok := imm.(Imm)
|
||||||
|
if !ok {
|
||||||
|
return fmt.Errorf("extract lane must be an immediate")
|
||||||
|
}
|
||||||
|
srcReg, ok := src.(Reg)
|
||||||
|
if !ok || !srcReg.isVec() {
|
||||||
|
return fmt.Errorf("extract source must be a vector register")
|
||||||
|
}
|
||||||
|
immByte, err := imm8(int64(immVal))
|
||||||
|
if err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
if err := e.emitEvexFields(spec, srcReg.vecLenBit(), srcReg.idx, -1, dst); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
e.out = append(e.out, immByte)
|
||||||
|
return nil
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvexMove encodes a two-operand EVEX move; a vector→vector move uses
|
||||||
|
// the store-form opcode (reg = source, rm = destination), matching the Go
|
||||||
|
// assembler.
|
||||||
|
func (e *enc) encodeEvexMove(mnem string, ms evexMoveSpec, ops []Operand) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("EVEX move expects 2 operands, got %d", len(ops))
|
||||||
|
}
|
||||||
|
src, dst := ops[0], ops[1]
|
||||||
|
srcReg, srcIsVec := vecReg(src)
|
||||||
|
dstReg, dstIsVec := vecReg(dst)
|
||||||
|
|
||||||
|
op := ms.store
|
||||||
|
var reg Reg
|
||||||
|
var rm Operand
|
||||||
|
switch {
|
||||||
|
case srcIsVec && dstIsVec:
|
||||||
|
reg, rm = srcReg, dst
|
||||||
|
case srcIsVec:
|
||||||
|
if !memOperand(dst) {
|
||||||
|
return fmt.Errorf("%s: invalid destination operand", mnem)
|
||||||
|
}
|
||||||
|
reg, rm = srcReg, dst
|
||||||
|
case dstIsVec:
|
||||||
|
if !memOperand(src) {
|
||||||
|
return fmt.Errorf("%s: invalid source operand", mnem)
|
||||||
|
}
|
||||||
|
op = ms.load
|
||||||
|
reg, rm = dstReg, src
|
||||||
|
default:
|
||||||
|
return fmt.Errorf("%s needs a vector register operand", mnem)
|
||||||
|
}
|
||||||
|
spec := evexSpec{mapSel: ms.mapSel, opcode: op, w: ms.w, pp: ms.pp, opdigit: -1, n: ms.n}
|
||||||
|
return e.emitEvexFields(spec, reg.vecLenBit(), reg.idx, -1, rm)
|
||||||
|
}
|
||||||
|
|
||||||
|
// memOperand reports whether op is a memory reference (including a
|
||||||
|
// static-symbol reference).
|
||||||
|
func memOperand(op Operand) bool {
|
||||||
|
switch op.(type) {
|
||||||
|
case Mem, sbMem:
|
||||||
|
return true
|
||||||
|
}
|
||||||
|
return false
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvexRMRev encodes the narrowing-store form: OP src, dst with the wide
|
||||||
|
// source in the reg field and the narrow destination in r/m (VPMOVDW/QD).
|
||||||
|
func (e *enc) encodeEvexRMRev(spec evexSpec, ops []Operand) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("EVEX store instruction expects 2 operands, got %d", len(ops))
|
||||||
|
}
|
||||||
|
src, dst := ops[0], ops[1]
|
||||||
|
srcReg, ok := src.(Reg)
|
||||||
|
if !ok || !srcReg.isVec() {
|
||||||
|
return fmt.Errorf("EVEX source must be a vector register")
|
||||||
|
}
|
||||||
|
return e.emitEvexFields(spec, srcReg.vecLenBit(), srcReg.idx, -1, dst)
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeEvexBcast encodes VPBROADCASTD/Q: OP src, dst with the GPR or memory
|
||||||
|
// source broadcast to every lane of the vector destination.
|
||||||
|
func (e *enc) encodeEvexBcast(bs evexBcastSpec, ops []Operand) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("broadcast expects 2 operands, got %d", len(ops))
|
||||||
|
}
|
||||||
|
src, dst := ops[0], ops[1]
|
||||||
|
dstReg, ok := dst.(Reg)
|
||||||
|
if !ok || !dstReg.isVec() {
|
||||||
|
return fmt.Errorf("broadcast destination must be a vector register")
|
||||||
|
}
|
||||||
|
spec := evexSpec{mapSel: bs.mapSel, w: bs.w, pp: 1, opdigit: -1}
|
||||||
|
switch src.(type) {
|
||||||
|
case Mem, sbMem:
|
||||||
|
spec.opcode = bs.opMem
|
||||||
|
spec.n = [3]int{bs.n, bs.n, bs.n}
|
||||||
|
case Reg:
|
||||||
|
spec.opcode = bs.opReg
|
||||||
|
default:
|
||||||
|
return fmt.Errorf("broadcast source must be a register or memory")
|
||||||
|
}
|
||||||
|
return e.emitEvexFields(spec, dstReg.vecLenBit(), dstReg.idx, -1, src)
|
||||||
|
}
|
||||||
|
|
||||||
|
// emitEvexFields emits the EVEX prefix, opcode, ModR/M, SIB and displacement
|
||||||
|
// (disp8×N compressed) for the given precomputed fields. regIdx is the
|
||||||
|
// unextended reg-field register index, or a /digit (0–7); vvvvIdx is the
|
||||||
|
// vvvv register index, or -1 when unused.
|
||||||
|
func (e *enc) emitEvexFields(spec evexSpec, ll, regIdx, vvvvIdx int, rm Operand) error {
|
||||||
|
if ll > 2 {
|
||||||
|
return fmt.Errorf("invalid vector length")
|
||||||
|
}
|
||||||
|
// reg-field extension bits (R̄, R'̄), inverted.
|
||||||
|
rBar, rPrimeBar := 1, 1
|
||||||
|
if regIdx&8 != 0 {
|
||||||
|
rBar = 0
|
||||||
|
}
|
||||||
|
if regIdx&16 != 0 {
|
||||||
|
rPrimeBar = 0
|
||||||
|
}
|
||||||
|
// vvvv (inverted) and its extension bit V'̄.
|
||||||
|
vBar, vPrimeBar := 15, 1
|
||||||
|
if vvvvIdx >= 0 {
|
||||||
|
vBar = 15 - (vvvvIdx & 15)
|
||||||
|
if vvvvIdx&16 != 0 {
|
||||||
|
vPrimeBar = 0
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
var modrm, sib int
|
||||||
|
var disp []byte
|
||||||
|
xBar, bBar := 1, 1
|
||||||
|
var sb *sbRef
|
||||||
|
switch r := rm.(type) {
|
||||||
|
case Reg:
|
||||||
|
// ModRM.mod = 11: rm[3] extends via B̄, rm[4] via X̄.
|
||||||
|
modrm = 0xC0 | (regIdx&7)<<3 | (r.idx & 7)
|
||||||
|
sib = -1
|
||||||
|
if r.idx&8 != 0 {
|
||||||
|
bBar = 0
|
||||||
|
}
|
||||||
|
if r.idx&16 != 0 {
|
||||||
|
xBar = 0
|
||||||
|
}
|
||||||
|
case Mem:
|
||||||
|
var err error
|
||||||
|
modrm, sib, disp, xBar, bBar, err = memComponentsEvex(regIdx&7, r, spec.n[ll])
|
||||||
|
if err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
// An indexed memory operand carries index[4] in V'̄ (Go folds it
|
||||||
|
// together with vvvv[4] into the same bit).
|
||||||
|
if r.HasIndex && r.Index.idx&16 != 0 {
|
||||||
|
vPrimeBar = 0
|
||||||
|
}
|
||||||
|
case sbMem:
|
||||||
|
// RIP-relative static-symbol reference; disp32 patched at link time
|
||||||
|
// (no disp8 scaling for RIP-relative addressing).
|
||||||
|
modrm = (regIdx&7)<<3 | 0x05
|
||||||
|
sib = -1
|
||||||
|
disp = le32(0)
|
||||||
|
sb = &sbRef{name: r.name, addend: r.addend}
|
||||||
|
default:
|
||||||
|
return fmt.Errorf("invalid EVEX r/m operand")
|
||||||
|
}
|
||||||
|
|
||||||
|
p0 := byte(rBar<<7 | xBar<<6 | bBar<<5 | rPrimeBar<<4 | spec.mapSel)
|
||||||
|
p1 := byte(spec.w<<7 | vBar<<3 | 1<<2 | spec.pp)
|
||||||
|
p2 := byte(ll<<5 | vPrimeBar<<3) // z = 0, b = 0, aaa = 0
|
||||||
|
e.out = append(e.out, 0x62, p0, p1, p2, spec.opcode, byte(modrm))
|
||||||
|
if sib >= 0 {
|
||||||
|
e.out = append(e.out, byte(sib))
|
||||||
|
}
|
||||||
|
if sb != nil {
|
||||||
|
e.patches = append(e.patches, encPatch{off: len(e.out), name: sb.name, addend: sb.addend})
|
||||||
|
}
|
||||||
|
e.out = append(e.out, disp...)
|
||||||
|
return nil
|
||||||
|
}
|
||||||
|
|
||||||
|
// memComponentsEvex computes the ModR/M byte (with the given reg field), the
|
||||||
|
// SIB byte (-1 if none), the displacement bytes and the (inverted sense)
|
||||||
|
// index/base extension bits for an EVEX memory operand. The displacement is
|
||||||
|
// compressed to disp8×N when it is a multiple of n and the quotient fits a
|
||||||
|
// signed byte; otherwise a full disp32 is used.
|
||||||
|
func memComponentsEvex(regField int, m Mem, n int) (modrm, sib int, disp []byte, xBar, bBar int, err error) {
|
||||||
|
sib = -1
|
||||||
|
xBar, bBar = 1, 1 // inverted bits: 1 = no extension
|
||||||
|
if !m.HasBase && !m.HasIndex {
|
||||||
|
return regField<<3 | 0x05, -1, le32(m.Disp), 1, 1, nil // RIP-relative
|
||||||
|
}
|
||||||
|
|
||||||
|
needSIB := m.HasIndex || (m.HasBase && m.Base.idx&7 == 4)
|
||||||
|
|
||||||
|
var mod int
|
||||||
|
switch {
|
||||||
|
case !m.HasBase:
|
||||||
|
mod = 0
|
||||||
|
disp = le32(m.Disp)
|
||||||
|
case m.Base.idx&7 == 5 && m.Disp == 0:
|
||||||
|
mod = 1
|
||||||
|
disp = []byte{0}
|
||||||
|
case m.Disp == 0:
|
||||||
|
mod = 0
|
||||||
|
case n > 0 && m.Disp%int64(n) == 0 && m.Disp/int64(n) >= -128 && m.Disp/int64(n) <= 127:
|
||||||
|
mod = 1
|
||||||
|
disp = []byte{byte(int8(m.Disp / int64(n)))}
|
||||||
|
default:
|
||||||
|
mod = 2
|
||||||
|
disp = le32(m.Disp)
|
||||||
|
}
|
||||||
|
|
||||||
|
if needSIB {
|
||||||
|
idxField := 4 // 100 = no index
|
||||||
|
if m.HasIndex {
|
||||||
|
idxField = m.Index.idx & 7
|
||||||
|
if m.Index.idx&8 != 0 {
|
||||||
|
xBar = 0
|
||||||
|
}
|
||||||
|
}
|
||||||
|
baseField := 5 // 101 = no base (with mod=00 → disp32)
|
||||||
|
if m.HasBase {
|
||||||
|
baseField = m.Base.idx & 7
|
||||||
|
if m.Base.idx&8 != 0 {
|
||||||
|
bBar = 0
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return mod<<6 | regField<<3 | 0x04, scaleBits(m.Scale)<<6 | idxField<<3 | baseField, disp, xBar, bBar, nil
|
||||||
|
}
|
||||||
|
|
||||||
|
if m.Base.idx&8 != 0 {
|
||||||
|
bBar = 0
|
||||||
|
}
|
||||||
|
return mod<<6 | regField<<3 | (m.Base.idx & 7), -1, disp, 1, bBar, nil
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeKmovw encodes KMOVW, whose opcode depends on the operand direction:
|
||||||
|
// 90 (k/mem → K), 91 (K → mem), 92 (GPR → K), 93 (K → GPR); k → k uses 90.
|
||||||
|
func (e *enc) encodeKmovw(ops []Operand) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("KMOVW expects 2 operands, got %d", len(ops))
|
||||||
|
}
|
||||||
|
src, dst := ops[0], ops[1]
|
||||||
|
srcReg, srcIsReg := src.(Reg)
|
||||||
|
dstReg, dstIsReg := dst.(Reg)
|
||||||
|
srcK := srcIsReg && srcReg.mask
|
||||||
|
dstK := dstIsReg && dstReg.mask
|
||||||
|
spec := vexSpec{mapSel: 1, w: 0, pp: 0, opdigit: -1}
|
||||||
|
switch {
|
||||||
|
case srcK && dstK:
|
||||||
|
spec.opcode = 0x90 // k ← k: reg = dst, rm = src
|
||||||
|
return e.emitVexFields(spec, 0, dstReg.idx&7, 0, 15, src)
|
||||||
|
case srcK && dstIsReg:
|
||||||
|
spec.opcode = 0x93 // GPR ← k: reg = dst, rm = src
|
||||||
|
rBit := 0
|
||||||
|
if dstReg.idx >= 8 {
|
||||||
|
rBit = 1
|
||||||
|
}
|
||||||
|
return e.emitVexFields(spec, 0, dstReg.idx&7, rBit, 15, src)
|
||||||
|
case srcK:
|
||||||
|
if _, ok := dst.(Mem); !ok {
|
||||||
|
return fmt.Errorf("KMOVW: invalid destination operand")
|
||||||
|
}
|
||||||
|
spec.opcode = 0x91 // mem ← k: reg = src, rm = dst
|
||||||
|
return e.emitVexFields(spec, 0, srcReg.idx&7, 0, 15, dst)
|
||||||
|
case dstK:
|
||||||
|
spec.opcode = 0x92 // k ← GPR/mem: reg = dst, rm = src
|
||||||
|
return e.emitVexFields(spec, 0, dstReg.idx&7, 0, 15, src)
|
||||||
|
}
|
||||||
|
return fmt.Errorf("KMOVW requires a K register operand")
|
||||||
|
}
|
||||||
@@ -0,0 +1,221 @@
|
|||||||
|
// Copyright (c) 2026 Petr Balvín <opensource@petrbalvin.org> (https://petrbalvin.org)
|
||||||
|
// SPDX-License-Identifier: BSD-3-Clause
|
||||||
|
|
||||||
|
package asm
|
||||||
|
|
||||||
|
import (
|
||||||
|
"os"
|
||||||
|
"strings"
|
||||||
|
"testing"
|
||||||
|
|
||||||
|
"golang.org/x/arch/x86/x86asm"
|
||||||
|
|
||||||
|
"sourcedock.dev/petrbalvin/gasm-devkit/parser"
|
||||||
|
)
|
||||||
|
|
||||||
|
// TestEvexGroundTruth checks the EVEX (AVX-512) encodings byte for byte
|
||||||
|
// against machine code extracted from the Go toolchain's assembly of the
|
||||||
|
// same instructions, covering every operand shape the go-flac AVX-512
|
||||||
|
// kernels use: NDS arithmetic, immediate and variable shifts, shuffles with
|
||||||
|
// an immediate, lane extracts, narrowing stores, broadcasts from a GPR or
|
||||||
|
// memory, mask destinations, mask moves, disp8×N compression and the 5-bit
|
||||||
|
// register fields (X/Y 16–31, Z 0–31).
|
||||||
|
func TestEvexGroundTruth(t *testing.T) {
|
||||||
|
cases := []struct {
|
||||||
|
name string
|
||||||
|
mnem string
|
||||||
|
ops []Operand
|
||||||
|
want string
|
||||||
|
}{
|
||||||
|
// NDS integer arithmetic / logic.
|
||||||
|
{"VPXORD Z12,Z12,Z12", "VPXORD", []Operand{vreg(t, "Z12"), vreg(t, "Z12"), vreg(t, "Z12")}, "62511d48efe4"},
|
||||||
|
{"VPXORQ Z8,Z9,Z10", "VPXORQ", []Operand{vreg(t, "Z8"), vreg(t, "Z9"), vreg(t, "Z10")}, "6251b548efd0"},
|
||||||
|
{"VPADDD Z1,Z0,Z0", "VPADDD", []Operand{vreg(t, "Z1"), vreg(t, "Z0"), vreg(t, "Z0")}, "62f17d48fec1"},
|
||||||
|
{"VPSUBQ Z8,Z11,Z11", "VPSUBQ", []Operand{vreg(t, "Z8"), vreg(t, "Z11"), vreg(t, "Z11")}, "6251a548fbd8"},
|
||||||
|
{"VPUNPCKLDQ Z5,Z3,Z6", "VPUNPCKLDQ", []Operand{vreg(t, "Z5"), vreg(t, "Z3"), vreg(t, "Z6")}, "62f1654862f5"},
|
||||||
|
{"VPUNPCKHDQ Z5,Z3,Z7", "VPUNPCKHDQ", []Operand{vreg(t, "Z5"), vreg(t, "Z3"), vreg(t, "Z7")}, "62f165486afd"},
|
||||||
|
{"VPMULLQ Z9,Z10,Z10", "VPMULLQ", []Operand{vreg(t, "Z9"), vreg(t, "Z10"), vreg(t, "Z10")}, "6252ad4840d1"},
|
||||||
|
{"VPMULLD Z13,Z11,Z2", "VPMULLD", []Operand{vreg(t, "Z13"), vreg(t, "Z11"), vreg(t, "Z2")}, "62d2254840d5"},
|
||||||
|
{"VPERMD Z0,Z15,Z8", "VPERMD", []Operand{vreg(t, "Z0"), vreg(t, "Z15"), vreg(t, "Z8")}, "6272054836c0"},
|
||||||
|
// Packed-double arithmetic (EVEX forms carry W=1).
|
||||||
|
{"VADDPD Z11,Z10,Z10", "VADDPD", []Operand{vreg(t, "Z11"), vreg(t, "Z10"), vreg(t, "Z10")}, "6251ad4858d3"},
|
||||||
|
{"VMULPD Z13,Z12,Z12", "VMULPD", []Operand{vreg(t, "Z13"), vreg(t, "Z12"), vreg(t, "Z12")}, "62519d4859e5"},
|
||||||
|
{"VFMADD231PD Z14,Z12,Z10", "VFMADD231PD", []Operand{vreg(t, "Z14"), vreg(t, "Z12"), vreg(t, "Z10")}, "62529d48b8d6"},
|
||||||
|
// Align (NDS + imm8).
|
||||||
|
{"VALIGND $12,Z12,Z0,Z1", "VALIGND", []Operand{Imm(12), vreg(t, "Z12"), vreg(t, "Z0"), vreg(t, "Z1")}, "62d37d4803cc0c"},
|
||||||
|
{"VALIGND $15,Z9,Z0,Z1", "VALIGND", []Operand{Imm(15), vreg(t, "Z9"), vreg(t, "Z0"), vreg(t, "Z1")}, "62d37d4803c90f"},
|
||||||
|
// Shifts: immediate (/digit) and variable (XMM count).
|
||||||
|
{"VPSRAD $31,Z3,Z5", "VPSRAD", []Operand{Imm(31), vreg(t, "Z3"), vreg(t, "Z5")}, "62f1554872e31f"},
|
||||||
|
{"VPSLLD $1,Z3,Z4", "VPSLLD", []Operand{Imm(1), vreg(t, "Z3"), vreg(t, "Z4")}, "62f15d4872f301"},
|
||||||
|
{"VPSRAQ X31,Z8,Z8", "VPSRAQ", []Operand{vreg(t, "X31"), vreg(t, "Z8"), vreg(t, "Z8")}, "6211bd48e2c7"},
|
||||||
|
// Mask destinations (the K register occupies the reg field).
|
||||||
|
{"VPCMPEQD Z0,Z3,K1", "VPCMPEQD", []Operand{vreg(t, "Z0"), vreg(t, "Z3"), vreg(t, "K1")}, "62f1654876c8"},
|
||||||
|
{"VPCMPEQD Y30,Y11,K1", "VPCMPEQD", []Operand{vreg(t, "Y30"), vreg(t, "Y11"), vreg(t, "K1")}, "6291252876ce"},
|
||||||
|
// Mask moves and test (VEX-encoded).
|
||||||
|
{"KMOVW K1,CX", "KMOVW", []Operand{vreg(t, "K1"), CX}, "c5f893c9"},
|
||||||
|
{"KMOVW K1,R12", "KMOVW", []Operand{vreg(t, "K1"), vreg(t, "R12")}, "c57893e1"},
|
||||||
|
{"KTESTW K1,K1", "KTESTW", []Operand{vreg(t, "K1"), vreg(t, "K1")}, "c5f899c9"},
|
||||||
|
// Moves, incl. disp8×N (64 for a 512-bit operand).
|
||||||
|
{"VMOVDQU32 (SI)(R15*4),Z3", "VMOVDQU32", []Operand{Idx(SI, vreg(t, "R15"), 4, 0, 64), vreg(t, "Z3")}, "62b17e486f1cbe"},
|
||||||
|
{"VMOVDQU32 4(SI)(AX*1),Z4", "VMOVDQU32", []Operand{Idx(SI, AX, 1, 4, 64), vreg(t, "Z4")}, "62f17e486fa40604000000"},
|
||||||
|
{"VMOVDQU32 16(SI)(R15*4),Z4", "VMOVDQU32", []Operand{Idx(SI, vreg(t, "R15"), 4, 16, 64), vreg(t, "Z4")}, "62b17e486fa4be10000000"},
|
||||||
|
{"VMOVDQU32 Z0,4(SI)(AX*1)", "VMOVDQU32", []Operand{vreg(t, "Z0"), Idx(SI, AX, 1, 4, 64)}, "62f17e487f840604000000"},
|
||||||
|
{"VMOVDQU32 Z3,(DI)(R15*4)", "VMOVDQU32", []Operand{vreg(t, "Z3"), Idx(DI, vreg(t, "R15"), 4, 0, 64)}, "62b17e487f1cbf"},
|
||||||
|
{"VMOVUPD (DI),Z14", "VMOVUPD", []Operand{Ptr(DI, 0, 64), vreg(t, "Z14")}, "6271fd481037"},
|
||||||
|
{"VMOVUPD 64(DI),Z14", "VMOVUPD", []Operand{Ptr(DI, 64, 64), vreg(t, "Z14")}, "6271fd48107701"},
|
||||||
|
// Conversions and narrowing stores (reg = wide source).
|
||||||
|
{"VCVTQQ2PD Z12,Z12", "VCVTQQ2PD", []Operand{vreg(t, "Z12"), vreg(t, "Z12")}, "6251fe48e6e4"},
|
||||||
|
{"VCVTQQ2PD X13,X13", "VCVTQQ2PD", []Operand{vreg(t, "X13"), vreg(t, "X13")}, "6251fe08e6ed"},
|
||||||
|
{"VPMOVSXDQ 32(SI),Z12", "VPMOVSXDQ", []Operand{Ptr(SI, 32, 32), vreg(t, "Z12")}, "62727d48256601"},
|
||||||
|
{"VPMOVDW Z0,Y0", "VPMOVDW", []Operand{vreg(t, "Z0"), vreg(t, "Y0")}, "62f27e4833c0"},
|
||||||
|
{"VPMOVQD Z11,Y11", "VPMOVQD", []Operand{vreg(t, "Z11"), vreg(t, "Y11")}, "62527e4835db"},
|
||||||
|
// Lane extracts.
|
||||||
|
{"VEXTRACTI64X4 $1,Z8,Y9", "VEXTRACTI64X4", []Operand{Imm(1), vreg(t, "Z8"), vreg(t, "Y9")}, "6253fd483bc101"},
|
||||||
|
{"VEXTRACTF64X4 $1,Z10,Y11", "VEXTRACTF64X4", []Operand{Imm(1), vreg(t, "Z10"), vreg(t, "Y11")}, "6253fd481bd301"},
|
||||||
|
// Broadcasts: GPR source (0x7C) vs memory source (0x58/0x59, disp8×4/8).
|
||||||
|
{"VPBROADCASTD AX,Z15", "VPBROADCASTD", []Operand{AX, vreg(t, "Z15")}, "62727d487cf8"},
|
||||||
|
{"VPBROADCASTD (SI),Z8", "VPBROADCASTD", []Operand{Ptr(SI, 0, 4), vreg(t, "Z8")}, "62727d485806"},
|
||||||
|
{"VPBROADCASTD 4(SI),Z10", "VPBROADCASTD", []Operand{Ptr(SI, 4, 4), vreg(t, "Z10")}, "62727d48585601"},
|
||||||
|
{"VPBROADCASTQ R8,X31", "VPBROADCASTQ", []Operand{vreg(t, "R8"), vreg(t, "X31")}, "6242fd087cf8"},
|
||||||
|
{"VPBROADCASTQ AX,Z9", "VPBROADCASTQ", []Operand{AX, vreg(t, "Z9")}, "6272fd487cc8"},
|
||||||
|
// Register indices 16–31 exist only in EVEX encodings.
|
||||||
|
{"VPBROADCASTD AX,Y30", "VPBROADCASTD", []Operand{AX, vreg(t, "Y30")}, "62627d287cf0"},
|
||||||
|
}
|
||||||
|
for _, c := range cases {
|
||||||
|
want := strings.ReplaceAll(c.want, " ", "")
|
||||||
|
code, err := Encode(c.mnem, c.ops...)
|
||||||
|
if err != nil {
|
||||||
|
t.Errorf("%s: Encode: %v", c.name, err)
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
if got := hexCompact(code); got != want {
|
||||||
|
t.Errorf("%s: bytes %s, want %s", c.name, got, want)
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
inst, err := x86asm.Decode(code, 64)
|
||||||
|
if err != nil {
|
||||||
|
t.Errorf("%s: Decode(%x): %v", c.name, code, err)
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
if inst.Len != len(code) {
|
||||||
|
t.Errorf("%s: Decode consumed %d of %d bytes", c.name, inst.Len, len(code))
|
||||||
|
}
|
||||||
|
if inst.Op.String() != c.mnem {
|
||||||
|
t.Errorf("%s: decoded as %s", c.name, inst.Op.String())
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// TestEvexErrors checks the EVEX-specific error paths.
|
||||||
|
func TestEvexErrors(t *testing.T) {
|
||||||
|
cases := []struct {
|
||||||
|
name string
|
||||||
|
mnem string
|
||||||
|
ops []Operand
|
||||||
|
}{
|
||||||
|
{"NDS arity", "VPXORD", []Operand{vreg(t, "Z0"), vreg(t, "Z1")}},
|
||||||
|
{"KMOVW arity", "KMOVW", []Operand{vreg(t, "K1")}},
|
||||||
|
{"KMOVW no K", "KMOVW", []Operand{AX, CX}},
|
||||||
|
{"VMOVUPD Z gpr", "VMOVUPD", []Operand{AX, vreg(t, "Z1")}},
|
||||||
|
{"broadcast src", "VPBROADCASTD", []Operand{Imm(1), vreg(t, "Z1")}},
|
||||||
|
{"VPMOVDW src", "VPMOVDW", []Operand{AX, vreg(t, "Y0")}},
|
||||||
|
{"align arity", "VALIGND", []Operand{Imm(1), vreg(t, "Z0"), vreg(t, "Z1")}},
|
||||||
|
// VEX-only mnemonics reject registers only EVEX can encode.
|
||||||
|
{"VPSHUFD X16", "VPSHUFD", []Operand{Imm(1), vreg(t, "X16"), vreg(t, "X17")}},
|
||||||
|
}
|
||||||
|
for _, c := range cases {
|
||||||
|
if _, err := Encode(c.mnem, c.ops...); err == nil {
|
||||||
|
t.Errorf("%s: expected an error, got none", c.name)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// TestAssembleGoFlacAVX512Kernel assembles the whole production AVX-512
|
||||||
|
// kernel — all functions plus the file-global idx16 constant — and checks
|
||||||
|
// that the static-symbol load resolves to the right bytes in the image.
|
||||||
|
// Skipped when the sibling repository is not checked out.
|
||||||
|
func TestAssembleGoFlacAVX512Kernel(t *testing.T) {
|
||||||
|
path := "../../go-libraries/go-flac/avx512_amd64.s"
|
||||||
|
if _, err := os.Stat(path); err != nil {
|
||||||
|
t.Skip("go-libraries repository not present next to gasm-devkit")
|
||||||
|
}
|
||||||
|
src, err := os.ReadFile(path)
|
||||||
|
if err != nil {
|
||||||
|
t.Fatal(err)
|
||||||
|
}
|
||||||
|
f, errs := parser.Parse(path, string(src))
|
||||||
|
if len(errs) > 0 {
|
||||||
|
t.Fatalf("parse: %v", errs)
|
||||||
|
}
|
||||||
|
img, err := AssembleFile(f)
|
||||||
|
if err != nil {
|
||||||
|
t.Fatalf("AssembleFile: %v", err)
|
||||||
|
}
|
||||||
|
if len(img.Funcs) != 10 {
|
||||||
|
t.Errorf("functions = %d, want 10", len(img.Funcs))
|
||||||
|
}
|
||||||
|
|
||||||
|
// idx16 as the DATA directives define it: dwords 1..16.
|
||||||
|
idx := make([]byte, 0, 64)
|
||||||
|
for i := 1; i <= 16; i++ {
|
||||||
|
idx = append(idx, byte(i), 0, 0, 0)
|
||||||
|
}
|
||||||
|
image := img.Bytes()
|
||||||
|
base := img.Symbols["idx16"]
|
||||||
|
if base == 0 {
|
||||||
|
t.Fatal("idx16 not laid out")
|
||||||
|
}
|
||||||
|
if got := image[base : base+64]; hexCompact(got) != hexCompact(idx) {
|
||||||
|
t.Errorf("idx16 contents %x, want %x", got, idx)
|
||||||
|
}
|
||||||
|
|
||||||
|
// The VMOVDQU32 idx16(SB), Z13 load (62 71 7e 48 6f 2d + rel32) must
|
||||||
|
// resolve to idx16 within the image.
|
||||||
|
loads := 0
|
||||||
|
for _, fn := range img.Funcs {
|
||||||
|
code := img.Code[fn.Offset : fn.Offset+fn.Size]
|
||||||
|
pat := []byte{0x62, 0x71, 0x7e, 0x48, 0x6f, 0x2d}
|
||||||
|
for pos := 0; ; {
|
||||||
|
i := indexOf(code[pos:], pat)
|
||||||
|
if i < 0 {
|
||||||
|
break
|
||||||
|
}
|
||||||
|
i += pos
|
||||||
|
rel := int32(uint32(code[i+6]) | uint32(code[i+7])<<8 | uint32(code[i+8])<<16 | uint32(code[i+9])<<24)
|
||||||
|
target := fn.Offset + i + 10 + int(rel)
|
||||||
|
if target != base {
|
||||||
|
t.Errorf("%s: idx16 load at +%d targets 0x%x, want 0x%x", fn.Name, i, target, base)
|
||||||
|
}
|
||||||
|
loads++
|
||||||
|
pos = i + 10
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if loads != 1 {
|
||||||
|
t.Errorf("idx16 loads found = %d, want 1", loads)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// hexCompact renders bytes as a lowercase hex string without separators.
|
||||||
|
func hexCompact(b []byte) string {
|
||||||
|
const hexdig = "0123456789abcdef"
|
||||||
|
out := make([]byte, len(b)*2)
|
||||||
|
for i, c := range b {
|
||||||
|
out[i*2] = hexdig[c>>4]
|
||||||
|
out[i*2+1] = hexdig[c&0xf]
|
||||||
|
}
|
||||||
|
return string(out)
|
||||||
|
}
|
||||||
|
|
||||||
|
// indexOf returns the index of the first occurrence of pat in b, or -1.
|
||||||
|
func indexOf(b, pat []byte) int {
|
||||||
|
for i := 0; i+len(pat) <= len(b); i++ {
|
||||||
|
j := 0
|
||||||
|
for j < len(pat) && b[i+j] == pat[j] {
|
||||||
|
j++
|
||||||
|
}
|
||||||
|
if j == len(pat) {
|
||||||
|
return i
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return -1
|
||||||
|
}
|
||||||
+196
-6
@@ -52,9 +52,10 @@ func (e *enc) encodeMov(ops []Operand, size int) error {
|
|||||||
switch src := src.(type) {
|
switch src := src.(type) {
|
||||||
case Reg:
|
case Reg:
|
||||||
if dstIsReg {
|
if dstIsReg {
|
||||||
// MOV r, r/m: 0x8A/0x8B, reg=dst, rm=src.
|
// MOV r/m, r: 0x88/0x89, reg=src, rm=dst — the form the Go
|
||||||
i := newInstr(size, []byte{movRR(size)})
|
// assembler emits for register-to-register moves.
|
||||||
if err := setRM(i, dstReg, src, size); err != nil {
|
i := newInstr(size, []byte{movRM(size)})
|
||||||
|
if err := setRM(i, src, dst, size); err != nil {
|
||||||
return err
|
return err
|
||||||
}
|
}
|
||||||
return e.emit(i)
|
return e.emit(i)
|
||||||
@@ -77,6 +78,17 @@ func (e *enc) encodeMov(ops []Operand, size int) error {
|
|||||||
}
|
}
|
||||||
return e.emit(i)
|
return e.emit(i)
|
||||||
|
|
||||||
|
case sbMem:
|
||||||
|
if !dstIsReg {
|
||||||
|
return fmt.Errorf("MOV: two memory operands")
|
||||||
|
}
|
||||||
|
// MOV r, r/m: reg=dst, rm=src(static symbol).
|
||||||
|
i := newInstr(size, []byte{movRR(size)})
|
||||||
|
if err := setRM(i, dstReg, src, size); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
return e.emit(i)
|
||||||
|
|
||||||
case Imm:
|
case Imm:
|
||||||
if dstIsReg {
|
if dstIsReg {
|
||||||
// MOV r, imm: 0xB0+reg (8-bit) / 0xB8+reg (16/32/64, imm64 for Q).
|
// MOV r, imm: 0xB0+reg (8-bit) / 0xB8+reg (16/32/64, imm64 for Q).
|
||||||
@@ -147,9 +159,37 @@ func (e *enc) encodeALU(op struct {
|
|||||||
return e.encodeALUImm(op.digit, src, int64(imm), size)
|
return e.encodeALUImm(op.digit, src, int64(imm), size)
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// CMP records first − second without writing anywhere, so the first
|
||||||
|
// operand must land as the minuend; every other ALU op writes its second
|
||||||
|
// operand and follows the forms below.
|
||||||
|
cmp := op.rr == 0x39
|
||||||
dstReg, dstIsReg := dst.(Reg)
|
dstReg, dstIsReg := dst.(Reg)
|
||||||
srcReg, srcIsReg := src.(Reg)
|
srcReg, srcIsReg := src.(Reg)
|
||||||
switch {
|
switch {
|
||||||
|
case cmp && dstIsReg:
|
||||||
|
// CMP x, reg: OP r/m, r (0x38/0x39) with rm = first operand, reg =
|
||||||
|
// second, matching the Go assembler.
|
||||||
|
opc := op.rr
|
||||||
|
if size == 1 {
|
||||||
|
opc = op.rr - 1
|
||||||
|
}
|
||||||
|
i := newInstr(size, []byte{opc})
|
||||||
|
if err := setRM(i, dstReg, src, size); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
return e.emit(i)
|
||||||
|
case cmp && srcIsReg:
|
||||||
|
// CMP reg, mem: OP r, r/m (0x3A/0x3B) with reg = first operand, rm =
|
||||||
|
// second.
|
||||||
|
opc := op.rr + 2
|
||||||
|
if size == 1 {
|
||||||
|
opc = op.rr + 1
|
||||||
|
}
|
||||||
|
i := newInstr(size, []byte{opc})
|
||||||
|
if err := setRM(i, srcReg, dst, size); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
return e.emit(i)
|
||||||
case srcIsReg:
|
case srcIsReg:
|
||||||
// OP r/m, r: reg=src, rm=dst (dst is a register or memory). This is the
|
// OP r/m, r: reg=src, rm=dst (dst is a register or memory). This is the
|
||||||
// form the Go assembler prefers when the source is a register.
|
// form the Go assembler prefers when the source is a register.
|
||||||
@@ -251,12 +291,13 @@ func (e *enc) encodeLea(ops []Operand, size int) error {
|
|||||||
if !ok {
|
if !ok {
|
||||||
return fmt.Errorf("LEA: destination must be a register")
|
return fmt.Errorf("LEA: destination must be a register")
|
||||||
}
|
}
|
||||||
mem, ok := src.(Mem)
|
switch src.(type) {
|
||||||
if !ok {
|
case Mem, sbMem:
|
||||||
|
default:
|
||||||
return fmt.Errorf("LEA: source must be a memory operand")
|
return fmt.Errorf("LEA: source must be a memory operand")
|
||||||
}
|
}
|
||||||
i := newInstr(size, []byte{0x8D})
|
i := newInstr(size, []byte{0x8D})
|
||||||
if err := setRM(i, dstReg, mem, size); err != nil {
|
if err := setRM(i, dstReg, src, size); err != nil {
|
||||||
return err
|
return err
|
||||||
}
|
}
|
||||||
return e.emit(i)
|
return e.emit(i)
|
||||||
@@ -497,3 +538,152 @@ func immediate(v int64, size int, full64 bool) []byte {
|
|||||||
return le32(v) // sign-extended imm32
|
return le32(v) // sign-extended imm32
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// --- CMOVcc / SETcc ---------------------------------------------------------
|
||||||
|
|
||||||
|
// encodeCmov encodes a conditional move: CMOV + size (W/L/Q) + condition
|
||||||
|
// (CMOVLGT, CMOVQEQ, …). The condition reads exactly like the Jcc spellings;
|
||||||
|
// the instruction is 0F 40+cc with reg = dst, rm = src.
|
||||||
|
func (e *enc) encodeCmov(upper string, ops []Operand) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("CMOVcc expects 2 operands, got %d", len(ops))
|
||||||
|
}
|
||||||
|
rest := upper[len("CMOV"):]
|
||||||
|
if len(rest) < 2 {
|
||||||
|
return fmt.Errorf("unsupported instruction %q", upper)
|
||||||
|
}
|
||||||
|
var size int
|
||||||
|
switch rest[0] {
|
||||||
|
case 'W':
|
||||||
|
size = 2
|
||||||
|
case 'L':
|
||||||
|
size = 4
|
||||||
|
case 'Q':
|
||||||
|
size = 8
|
||||||
|
default:
|
||||||
|
return fmt.Errorf("unsupported instruction %q", upper)
|
||||||
|
}
|
||||||
|
cc, ok := jccMap[rest[1:]]
|
||||||
|
if !ok {
|
||||||
|
return fmt.Errorf("unsupported instruction %q", upper)
|
||||||
|
}
|
||||||
|
src, dst := ops[0], ops[1]
|
||||||
|
dstReg, ok := dst.(Reg)
|
||||||
|
if !ok {
|
||||||
|
return fmt.Errorf("CMOVcc destination must be a register")
|
||||||
|
}
|
||||||
|
i := newInstr(size, []byte{0x0F, byte(0x40 + cc)})
|
||||||
|
if err := setRM(i, dstReg, src, size); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
return e.emit(i)
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeSet encodes a conditional byte set: SET + condition (SETNE, SETEQ, …),
|
||||||
|
// always a byte write — 0F 90+cc /0 into a register or memory operand.
|
||||||
|
func (e *enc) encodeSet(upper string, ops []Operand) error {
|
||||||
|
if len(ops) != 1 {
|
||||||
|
return fmt.Errorf("SETcc expects 1 operand, got %d", len(ops))
|
||||||
|
}
|
||||||
|
cond := upper[len("SET"):]
|
||||||
|
cc, ok := jccMap[cond]
|
||||||
|
if !ok || cond == "" {
|
||||||
|
return fmt.Errorf("unsupported instruction %q", upper)
|
||||||
|
}
|
||||||
|
i := &instr{opcode: []byte{0x0F, byte(0x90 + cc)}, modrm: -1, sib: -1}
|
||||||
|
if err := setRMDigit(i, 0, ops[0], 1); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
return e.emit(i)
|
||||||
|
}
|
||||||
|
|
||||||
|
// --- LZCNT / TZCNT ----------------------------------------------------------
|
||||||
|
|
||||||
|
// encodeCount encodes LZCNT/TZCNT (leading / trailing zero count): F3 0F BD
|
||||||
|
// or F3 0F BC, with reg = dst and rm = src. The size suffix selects the
|
||||||
|
// operand width (LZCNTW/LZCNTL/LZCNTQ).
|
||||||
|
func (e *enc) encodeCount(base string, ops []Operand, size int) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("%s expects 2 operands, got %d", base, len(ops))
|
||||||
|
}
|
||||||
|
op := byte(0xBD)
|
||||||
|
if base == "TZCNT" {
|
||||||
|
op = 0xBC
|
||||||
|
}
|
||||||
|
dstReg, ok := ops[1].(Reg)
|
||||||
|
if !ok {
|
||||||
|
return fmt.Errorf("%s destination must be a register", base)
|
||||||
|
}
|
||||||
|
i := newInstr(size, []byte{0x0F, op})
|
||||||
|
i.prefix = 0xF3
|
||||||
|
if err := setRM(i, dstReg, ops[0], size); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
return e.emit(i)
|
||||||
|
}
|
||||||
|
|
||||||
|
// --- mixed-width sign/zero-extending moves -----------------------------------
|
||||||
|
|
||||||
|
// movExtendOp maps Go's mixed-width move names to their opcode and destination
|
||||||
|
// width. The source is narrower than the destination, so the plain size-suffix
|
||||||
|
// convention does not apply to these names.
|
||||||
|
var movExtendOp = map[string]struct {
|
||||||
|
op []byte
|
||||||
|
dst64 bool
|
||||||
|
}{
|
||||||
|
"MOVBLZX": {[]byte{0x0F, 0xB6}, false}, // byte → long, zero-extend
|
||||||
|
"MOVBQZX": {[]byte{0x0F, 0xB6}, true}, // byte → quad, zero-extend
|
||||||
|
"MOVWLZX": {[]byte{0x0F, 0xB7}, false}, // word → long, zero-extend
|
||||||
|
"MOVWQZX": {[]byte{0x0F, 0xB7}, true}, // word → quad, zero-extend
|
||||||
|
"MOVWLSX": {[]byte{0x0F, 0xBF}, false}, // word → long, sign-extend
|
||||||
|
"MOVLQSX": {[]byte{0x63}, true}, // long → quad, sign-extend (MOVSXD)
|
||||||
|
}
|
||||||
|
|
||||||
|
// encodeMovExtend encodes a mixed-width extending move: reg = dst (the wider
|
||||||
|
// operand), rm = src.
|
||||||
|
func (e *enc) encodeMovExtend(base string, ops []Operand) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("%s expects 2 operands, got %d", base, len(ops))
|
||||||
|
}
|
||||||
|
spec := movExtendOp[base]
|
||||||
|
dstReg, ok := ops[1].(Reg)
|
||||||
|
if !ok {
|
||||||
|
return fmt.Errorf("%s destination must be a register", base)
|
||||||
|
}
|
||||||
|
size := 4
|
||||||
|
if spec.dst64 {
|
||||||
|
size = 8
|
||||||
|
}
|
||||||
|
i := newInstr(size, spec.op)
|
||||||
|
if err := setRM(i, dstReg, ops[0], size); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
return e.emit(i)
|
||||||
|
}
|
||||||
|
|
||||||
|
// --- CVTSL2SD / CVTSQ2SD -----------------------------------------------------
|
||||||
|
|
||||||
|
// encodeCvtsi2sd encodes a signed integer to scalar double conversion
|
||||||
|
// (CVTSL2SD from a 32-bit, CVTSQ2SD from a 64-bit source): F2 0F 2A with
|
||||||
|
// reg = XMM dst, rm = GPR/memory src. The Go assembler emits the legacy SSE
|
||||||
|
// encoding here, not the VEX form, so we match it byte for byte.
|
||||||
|
func (e *enc) encodeCvtsi2sd(quad bool, ops []Operand) error {
|
||||||
|
if len(ops) != 2 {
|
||||||
|
return fmt.Errorf("CVTSx2SD expects 2 operands, got %d", len(ops))
|
||||||
|
}
|
||||||
|
src, dst := ops[0], ops[1]
|
||||||
|
dstReg, ok := dst.(Reg)
|
||||||
|
if !ok || !dstReg.isVec() {
|
||||||
|
return fmt.Errorf("CVTSx2SD destination must be a vector register")
|
||||||
|
}
|
||||||
|
size := 4
|
||||||
|
if quad {
|
||||||
|
size = 8
|
||||||
|
}
|
||||||
|
i := newInstr(size, []byte{0x0F, 0x2A})
|
||||||
|
i.prefix = 0xF2
|
||||||
|
if err := setRM(i, dstReg, src, size); err != nil {
|
||||||
|
return err
|
||||||
|
}
|
||||||
|
return e.emit(i)
|
||||||
|
}
|
||||||
|
|||||||
+162
@@ -0,0 +1,162 @@
|
|||||||
|
// Copyright (c) 2026 Petr Balvín <opensource@petrbalvin.org> (https://petrbalvin.org)
|
||||||
|
// SPDX-License-Identifier: BSD-3-Clause
|
||||||
|
|
||||||
|
package asm
|
||||||
|
|
||||||
|
import (
|
||||||
|
"fmt"
|
||||||
|
|
||||||
|
"sourcedock.dev/petrbalvin/gasm-devkit/ast"
|
||||||
|
)
|
||||||
|
|
||||||
|
// Image is an assembled file: the function bodies laid out in source order,
|
||||||
|
// followed by the file's static data section (GLOBL/DATA). Static-symbol
|
||||||
|
// references are encoded RIP-relative and resolved within the image, so the
|
||||||
|
// bytes are self-consistent and executable at any base address.
|
||||||
|
type Image struct {
|
||||||
|
Code []byte // concatenated function bodies
|
||||||
|
Data []byte // static data section
|
||||||
|
Funcs []FuncLayout // function positions, in source order
|
||||||
|
Symbols map[string]int // static symbol → byte offset within the image
|
||||||
|
}
|
||||||
|
|
||||||
|
// FuncLayout describes one assembled function within an Image.
|
||||||
|
type FuncLayout struct {
|
||||||
|
Name string
|
||||||
|
Offset int // start offset within the image (== offset within Code)
|
||||||
|
Size int
|
||||||
|
Labels map[string]int // local labels, function-relative
|
||||||
|
}
|
||||||
|
|
||||||
|
// Bytes returns the whole image: code, then data.
|
||||||
|
func (img *Image) Bytes() []byte {
|
||||||
|
out := make([]byte, 0, len(img.Code)+len(img.Data))
|
||||||
|
out = append(out, img.Code...)
|
||||||
|
return append(out, img.Data...)
|
||||||
|
}
|
||||||
|
|
||||||
|
// AssembleFile assembles every TEXT function of a parsed file and lays out
|
||||||
|
// its static symbols (GLOBL/DATA) in a data section behind the code. Each
|
||||||
|
// static-symbol reference becomes a RIP-relative load whose displacement is
|
||||||
|
// resolved against that layout. External (non-file-local) symbol references
|
||||||
|
// are rejected: they need object-file emission.
|
||||||
|
func AssembleFile(f *ast.File) (*Image, error) {
|
||||||
|
syms, order, err := collectData(f)
|
||||||
|
if err != nil {
|
||||||
|
return nil, err
|
||||||
|
}
|
||||||
|
known := make(map[string]bool, len(syms))
|
||||||
|
for name := range syms {
|
||||||
|
known[name] = true
|
||||||
|
}
|
||||||
|
link := &linkInfo{symbols: known}
|
||||||
|
|
||||||
|
img := &Image{Symbols: map[string]int{}}
|
||||||
|
type asmFunc struct {
|
||||||
|
name string
|
||||||
|
patches []sbPatch
|
||||||
|
}
|
||||||
|
var funcs []asmFunc
|
||||||
|
for _, d := range f.Decls {
|
||||||
|
t, ok := d.(*ast.Text)
|
||||||
|
if !ok {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
code, patches, labels, err := assemble(t, link)
|
||||||
|
if err != nil {
|
||||||
|
return nil, fmt.Errorf("%s: %w", t.Name.Name, err)
|
||||||
|
}
|
||||||
|
img.Funcs = append(img.Funcs, FuncLayout{
|
||||||
|
Name: t.Name.Name,
|
||||||
|
Offset: len(img.Code),
|
||||||
|
Size: len(code),
|
||||||
|
Labels: labels,
|
||||||
|
})
|
||||||
|
img.Code = append(img.Code, code...)
|
||||||
|
funcs = append(funcs, asmFunc{name: t.Name.Name, patches: patches})
|
||||||
|
}
|
||||||
|
|
||||||
|
// Lay out the data section behind the code, each symbol 16-aligned.
|
||||||
|
dataStart := len(img.Code)
|
||||||
|
for _, name := range order {
|
||||||
|
if pos := dataStart + len(img.Data); pos != align16(pos) {
|
||||||
|
img.Data = append(img.Data, make([]byte, align16(pos)-pos)...)
|
||||||
|
}
|
||||||
|
img.Symbols[name] = dataStart + len(img.Data)
|
||||||
|
img.Data = append(img.Data, syms[name]...)
|
||||||
|
}
|
||||||
|
|
||||||
|
// Resolve the RIP-relative displacements now that every address is known.
|
||||||
|
for i, fn := range funcs {
|
||||||
|
base := img.Funcs[i].Offset
|
||||||
|
code := img.Code[base : base+img.Funcs[i].Size]
|
||||||
|
for _, p := range fn.patches {
|
||||||
|
rel := int64(img.Symbols[p.name]) + p.addend - int64(base+p.after)
|
||||||
|
if rel < -1<<31 || rel >= 1<<31 {
|
||||||
|
return nil, fmt.Errorf("%s: displacement to %q out of rel32 range", fn.name, p.name)
|
||||||
|
}
|
||||||
|
copy(code[p.off:p.off+4], le32(rel))
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return img, nil
|
||||||
|
}
|
||||||
|
|
||||||
|
// collectData gathers the file's static symbols (GLOBL) and their initial
|
||||||
|
// contents (DATA) into byte buffers, in declaration order.
|
||||||
|
func collectData(f *ast.File) (map[string][]byte, []string, error) {
|
||||||
|
syms := map[string][]byte{}
|
||||||
|
var order []string
|
||||||
|
for _, d := range f.Decls {
|
||||||
|
switch dd := d.(type) {
|
||||||
|
case *ast.Globl:
|
||||||
|
if dd.Name == nil || dd.Name.Pseudo != "SB" {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
name := dd.Name.Name
|
||||||
|
if _, dup := syms[name]; dup {
|
||||||
|
return nil, nil, fmt.Errorf("duplicate GLOBL %q", name)
|
||||||
|
}
|
||||||
|
size := 0
|
||||||
|
if dd.Size != nil && dd.Size.Imm.HasVal {
|
||||||
|
size = int(dd.Size.Imm.Val)
|
||||||
|
}
|
||||||
|
syms[name] = make([]byte, size)
|
||||||
|
order = append(order, name)
|
||||||
|
|
||||||
|
case *ast.Data:
|
||||||
|
if dd.Name == nil || dd.Name.Pseudo != "SB" {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
buf, ok := syms[dd.Name.Name]
|
||||||
|
if !ok {
|
||||||
|
return nil, nil, fmt.Errorf("DATA %q: no matching GLOBL", dd.Name.Name)
|
||||||
|
}
|
||||||
|
if dd.Value == nil || !dd.Value.Imm.HasVal {
|
||||||
|
return nil, nil, fmt.Errorf("DATA %q: value must be an integer immediate", dd.Name.Name)
|
||||||
|
}
|
||||||
|
w := dd.Width
|
||||||
|
switch w {
|
||||||
|
case 1, 2, 4, 8:
|
||||||
|
default:
|
||||||
|
return nil, nil, fmt.Errorf("DATA %q: invalid width %d (want 1, 2, 4 or 8)", dd.Name.Name, w)
|
||||||
|
}
|
||||||
|
off := dd.Name.Offset
|
||||||
|
if off < 0 || off+int64(w) > int64(len(buf)) {
|
||||||
|
return nil, nil, fmt.Errorf("DATA %q+%d/%d exceeds GLOBL size %d", dd.Name.Name, off, w, len(buf))
|
||||||
|
}
|
||||||
|
v := dd.Value.Imm.Val
|
||||||
|
if dd.Value.Imm.Neg {
|
||||||
|
v = -v
|
||||||
|
}
|
||||||
|
for i := 0; i < w; i++ {
|
||||||
|
buf[off+int64(i)] = byte(v >> (8 * i))
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
return syms, order, nil
|
||||||
|
}
|
||||||
|
|
||||||
|
// align16 rounds n up to the next multiple of 16.
|
||||||
|
func align16(n int) int {
|
||||||
|
return (n + 15) &^ 15
|
||||||
|
}
|
||||||
@@ -0,0 +1,196 @@
|
|||||||
|
// Copyright (c) 2026 Petr Balvín <opensource@petrbalvin.org> (https://petrbalvin.org)
|
||||||
|
// SPDX-License-Identifier: BSD-3-Clause
|
||||||
|
|
||||||
|
package asm
|
||||||
|
|
||||||
|
import (
|
||||||
|
"bytes"
|
||||||
|
"os"
|
||||||
|
"strings"
|
||||||
|
"testing"
|
||||||
|
|
||||||
|
"golang.org/x/arch/x86/x86asm"
|
||||||
|
|
||||||
|
"sourcedock.dev/petrbalvin/gasm-devkit/parser"
|
||||||
|
)
|
||||||
|
|
||||||
|
// TestAssembleFileStaticData checks the whole-image layout — code, padding
|
||||||
|
// and the data section — and that the RIP-relative displacements of static
|
||||||
|
// symbol loads resolve to the right bytes.
|
||||||
|
func TestAssembleFileStaticData(t *testing.T) {
|
||||||
|
f, errs := parser.Parse("d_amd64.s", `
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·load(SB), NOSPLIT, $0
|
||||||
|
VMOVDQU mask<>(SB), X15
|
||||||
|
MOVL small<>(SB), AX
|
||||||
|
RET
|
||||||
|
GLOBL mask<>(SB), RODATA, $16
|
||||||
|
DATA mask<>+0(SB)/4, $0x80020100
|
||||||
|
DATA mask<>+4(SB)/4, $0x80050403
|
||||||
|
DATA mask<>+8(SB)/4, $0x80080706
|
||||||
|
DATA mask<>+12(SB)/4, $0x800B0A09
|
||||||
|
GLOBL small<>(SB), RODATA, $4
|
||||||
|
DATA small<>+0(SB)/4, $0x1234
|
||||||
|
`)
|
||||||
|
if len(errs) > 0 {
|
||||||
|
t.Fatalf("parse: %v", errs)
|
||||||
|
}
|
||||||
|
img, err := AssembleFile(f)
|
||||||
|
if err != nil {
|
||||||
|
t.Fatalf("AssembleFile: %v", err)
|
||||||
|
}
|
||||||
|
|
||||||
|
// Code (15 bytes) + 1 pad byte to align the data section to 16:
|
||||||
|
// VMOVDQU mask<>(SB), X15 c5 7a 6f 3d 08 00 00 00 (disp = 16 − 8)
|
||||||
|
// MOVL small<>(SB), AX 8b 05 12 00 00 00 (disp = 32 − 14)
|
||||||
|
// RET c3
|
||||||
|
// Data: pad, mask (16 bytes), small (4 bytes).
|
||||||
|
want := "c57a6f3d080000008b0512000000c300" +
|
||||||
|
"000102800304058006070880090a0b80" +
|
||||||
|
"34120000"
|
||||||
|
if got := strings.ReplaceAll(hexBytes(img.Bytes()), " ", ""); got != want {
|
||||||
|
t.Errorf("image bytes:\n got %s\n want %s", got, want)
|
||||||
|
}
|
||||||
|
if img.Symbols["mask"] != 16 || img.Symbols["small"] != 32 {
|
||||||
|
t.Errorf("symbol offsets = %v, want mask=16 small=32", img.Symbols)
|
||||||
|
}
|
||||||
|
if len(img.Funcs) != 1 || img.Funcs[0].Name != "load" || img.Funcs[0].Size != 15 {
|
||||||
|
t.Errorf("funcs = %+v", img.Funcs)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// TestAssembleFileErrors checks the static-symbol error paths.
|
||||||
|
func TestAssembleFileErrors(t *testing.T) {
|
||||||
|
cases := []struct {
|
||||||
|
name string
|
||||||
|
src string
|
||||||
|
want string // substring of the error
|
||||||
|
}{
|
||||||
|
{
|
||||||
|
"undefined symbol",
|
||||||
|
`
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·f(SB), NOSPLIT, $0
|
||||||
|
VMOVDQU nope<>(SB), X0
|
||||||
|
RET
|
||||||
|
`,
|
||||||
|
"undefined symbol",
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"DATA without GLOBL",
|
||||||
|
`
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·f(SB), NOSPLIT, $0
|
||||||
|
RET
|
||||||
|
DATA orphan<>+0(SB)/4, $1
|
||||||
|
`,
|
||||||
|
"no matching GLOBL",
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"DATA exceeds size",
|
||||||
|
`
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·f(SB), NOSPLIT, $0
|
||||||
|
RET
|
||||||
|
GLOBL tiny<>(SB), RODATA, $4
|
||||||
|
DATA tiny<>+0(SB)/8, $1
|
||||||
|
`,
|
||||||
|
"exceeds GLOBL size",
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"DATA bad width",
|
||||||
|
`
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·f(SB), NOSPLIT, $0
|
||||||
|
RET
|
||||||
|
GLOBL odd<>(SB), RODATA, $4
|
||||||
|
DATA odd<>+0(SB)/3, $1
|
||||||
|
`,
|
||||||
|
"invalid width",
|
||||||
|
},
|
||||||
|
}
|
||||||
|
for _, c := range cases {
|
||||||
|
f, errs := parser.Parse("e_amd64.s", c.src)
|
||||||
|
if len(errs) > 0 {
|
||||||
|
t.Fatalf("%s: parse: %v", c.name, errs)
|
||||||
|
}
|
||||||
|
if _, err := AssembleFile(f); err == nil || !strings.Contains(err.Error(), c.want) {
|
||||||
|
t.Errorf("%s: error %v, want substring %q", c.name, err, c.want)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// A static-symbol operand is unresolvable in single-function assembly.
|
||||||
|
fn := firstText(t, `
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·f(SB), NOSPLIT, $0
|
||||||
|
MOVQ x<>(SB), AX
|
||||||
|
RET
|
||||||
|
GLOBL x<>(SB), RODATA, $8
|
||||||
|
DATA x<>+0(SB)/4, $1
|
||||||
|
`)
|
||||||
|
if _, _, err := Assemble(fn); err == nil || !strings.Contains(err.Error(), "file-level assembly") {
|
||||||
|
t.Errorf("single-function SB: error %v, want a file-level-assembly error", err)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// TestAssembleGoFlacAVX2Kernel assembles the whole production AVX2 kernel —
|
||||||
|
// all functions plus the file-local mask24 constant — and checks that every
|
||||||
|
// static-symbol load resolves to the right bytes in the image. Skipped when
|
||||||
|
// the sibling repository is not checked out.
|
||||||
|
func TestAssembleGoFlacAVX2Kernel(t *testing.T) {
|
||||||
|
path := "../../go-libraries/go-flac/avx2_amd64.s"
|
||||||
|
if _, err := os.Stat(path); err != nil {
|
||||||
|
t.Skip("go-libraries repository not present next to gasm-devkit")
|
||||||
|
}
|
||||||
|
src, err := os.ReadFile(path)
|
||||||
|
if err != nil {
|
||||||
|
t.Fatal(err)
|
||||||
|
}
|
||||||
|
f, errs := parser.Parse(path, string(src))
|
||||||
|
if len(errs) > 0 {
|
||||||
|
t.Fatalf("parse: %v", errs)
|
||||||
|
}
|
||||||
|
img, err := AssembleFile(f)
|
||||||
|
if err != nil {
|
||||||
|
t.Fatalf("AssembleFile: %v", err)
|
||||||
|
}
|
||||||
|
if len(img.Funcs) != 17 {
|
||||||
|
t.Errorf("functions = %d, want 17", len(img.Funcs))
|
||||||
|
}
|
||||||
|
|
||||||
|
// mask24 as the DATA directives define it.
|
||||||
|
mask := []byte{
|
||||||
|
0x00, 0x01, 0x02, 0x80, 0x03, 0x04, 0x05, 0x80,
|
||||||
|
0x06, 0x07, 0x08, 0x80, 0x09, 0x0a, 0x0b, 0x80,
|
||||||
|
}
|
||||||
|
image := img.Bytes()
|
||||||
|
if got := image[img.Symbols["mask24"] : img.Symbols["mask24"]+16]; !bytes.Equal(got, mask) {
|
||||||
|
t.Errorf("mask24 contents %x, want %x", got, mask)
|
||||||
|
}
|
||||||
|
|
||||||
|
// Every VMOVDQU mask24<>(SB), X15 (c5 7a 6f 3d + rel32, i.e. a VMOVDQU
|
||||||
|
// with a RIP-relative r/m) must land on the mask bytes within the image.
|
||||||
|
loads := 0
|
||||||
|
for _, fn := range img.Funcs {
|
||||||
|
code := img.Code[fn.Offset : fn.Offset+fn.Size]
|
||||||
|
for pc := 0; pc < len(code); {
|
||||||
|
inst, err := x86asm.Decode(code[pc:], 64)
|
||||||
|
if err != nil {
|
||||||
|
t.Fatalf("%s: decode at +%d: %v", fn.Name, pc, err)
|
||||||
|
}
|
||||||
|
// mod=00, rm=101 → RIP-relative.
|
||||||
|
if inst.Op == x86asm.VMOVDQU && inst.Len == 8 && code[pc+3]&0xC7 == 0x05 {
|
||||||
|
rel := int32(uint32(code[pc+4]) | uint32(code[pc+5])<<8 | uint32(code[pc+6])<<16 | uint32(code[pc+7])<<24)
|
||||||
|
target := fn.Offset + pc + 8 + int(rel)
|
||||||
|
if !bytes.Equal(image[target:target+16], mask) {
|
||||||
|
t.Errorf("%s: mask load at +%d lands on %x, want %x", fn.Name, pc, image[target:target+16], mask)
|
||||||
|
}
|
||||||
|
loads++
|
||||||
|
}
|
||||||
|
pc += inst.Len
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if loads != 2 {
|
||||||
|
t.Errorf("mask loads found = %d, want 2", loads)
|
||||||
|
}
|
||||||
|
}
|
||||||
@@ -41,3 +41,15 @@ func Idx(base, index Reg, scale int, disp int64, size int) Mem {
|
|||||||
func Rip(disp int64, size int) Mem {
|
func Rip(disp int64, size int) Mem {
|
||||||
return Mem{Disp: disp, Size: size}
|
return Mem{Disp: disp, Size: size}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// sbMem is a memory operand that references a static (SB) symbol. It encodes
|
||||||
|
// as a RIP-relative reference with a placeholder displacement; the encoder
|
||||||
|
// records a patch site so the file-level layout can fill in the true rel32
|
||||||
|
// once the symbol's address is known.
|
||||||
|
type sbMem struct {
|
||||||
|
size int
|
||||||
|
name string // static symbol name (the GLOBL identifier)
|
||||||
|
addend int64 // byte offset within the symbol
|
||||||
|
}
|
||||||
|
|
||||||
|
func (sbMem) isOperand() {}
|
||||||
|
|||||||
+69
-55
@@ -14,19 +14,24 @@ import "strings"
|
|||||||
// so the encoder keys off the register's index and lets the mnemonic supply the
|
// so the encoder keys off the register's index and lets the mnemonic supply the
|
||||||
// size. The high flag marks the legacy high-byte registers AH/CH/DH/BH, which
|
// size. The high flag marks the legacy high-byte registers AH/CH/DH/BH, which
|
||||||
// occupy indices 4–7 yet take no REX prefix, unlike SPL/BPL/SIL/DIL that share
|
// occupy indices 4–7 yet take no REX prefix, unlike SPL/BPL/SIL/DIL that share
|
||||||
// those indices but require one.
|
// those indices but require one. The mask flag marks the AVX-512 opmask
|
||||||
|
// registers K0–K7.
|
||||||
type Reg struct {
|
type Reg struct {
|
||||||
idx int
|
idx int
|
||||||
size int // informational width implied by the name; the mnemonic decides
|
size int // informational width implied by the name; the mnemonic decides
|
||||||
high bool // AH/CH/DH/BH
|
high bool // AH/CH/DH/BH
|
||||||
|
mask bool // K0–K7 opmask register
|
||||||
}
|
}
|
||||||
|
|
||||||
// Index returns the register number (0–15).
|
// Index returns the register number (0–15 for GPRs, 0–31 for vectors).
|
||||||
func (r Reg) Index() int { return r.idx }
|
func (r Reg) Index() int { return r.idx }
|
||||||
|
|
||||||
// Size returns the width in bytes implied by the register's name.
|
// Size returns the width in bytes implied by the register's name.
|
||||||
func (r Reg) Size() int { return r.size }
|
func (r Reg) Size() int { return r.size }
|
||||||
|
|
||||||
|
// IsMask reports whether r is an AVX-512 opmask register (K0–K7).
|
||||||
|
func (r Reg) IsMask() bool { return r.mask }
|
||||||
|
|
||||||
func (r Reg) isOperand() {}
|
func (r Reg) isOperand() {}
|
||||||
|
|
||||||
// needsREX reports whether this register forces a REX prefix at the given
|
// needsREX reports whether this register forces a REX prefix at the given
|
||||||
@@ -41,45 +46,45 @@ func (r Reg) needsREX(opSize int) bool {
|
|||||||
|
|
||||||
// Register constants (the size is the width the name implies).
|
// Register constants (the size is the width the name implies).
|
||||||
var (
|
var (
|
||||||
AL = Reg{0, 1, false}
|
AL = Reg{idx: 0, size: 1}
|
||||||
CL = Reg{1, 1, false}
|
CL = Reg{idx: 1, size: 1}
|
||||||
DL = Reg{2, 1, false}
|
DL = Reg{idx: 2, size: 1}
|
||||||
BL = Reg{3, 1, false}
|
BL = Reg{idx: 3, size: 1}
|
||||||
AH = Reg{4, 1, true}
|
AH = Reg{idx: 4, size: 1, high: true}
|
||||||
CH = Reg{5, 1, true}
|
CH = Reg{idx: 5, size: 1, high: true}
|
||||||
DH = Reg{6, 1, true}
|
DH = Reg{idx: 6, size: 1, high: true}
|
||||||
BH = Reg{7, 1, true}
|
BH = Reg{idx: 7, size: 1, high: true}
|
||||||
SPL = Reg{4, 1, false}
|
SPL = Reg{idx: 4, size: 1}
|
||||||
BPL = Reg{5, 1, false}
|
BPL = Reg{idx: 5, size: 1}
|
||||||
SIL = Reg{6, 1, false}
|
SIL = Reg{idx: 6, size: 1}
|
||||||
DIL = Reg{7, 1, false}
|
DIL = Reg{idx: 7, size: 1}
|
||||||
|
|
||||||
AX = Reg{0, 2, false}
|
AX = Reg{idx: 0, size: 2}
|
||||||
CX = Reg{1, 2, false}
|
CX = Reg{idx: 1, size: 2}
|
||||||
DX = Reg{2, 2, false}
|
DX = Reg{idx: 2, size: 2}
|
||||||
BX = Reg{3, 2, false}
|
BX = Reg{idx: 3, size: 2}
|
||||||
SP = Reg{4, 2, false}
|
SP = Reg{idx: 4, size: 2}
|
||||||
BP = Reg{5, 2, false}
|
BP = Reg{idx: 5, size: 2}
|
||||||
SI = Reg{6, 2, false}
|
SI = Reg{idx: 6, size: 2}
|
||||||
DI = Reg{7, 2, false}
|
DI = Reg{idx: 7, size: 2}
|
||||||
|
|
||||||
EAX = Reg{0, 4, false}
|
EAX = Reg{idx: 0, size: 4}
|
||||||
ECX = Reg{1, 4, false}
|
ECX = Reg{idx: 1, size: 4}
|
||||||
EDX = Reg{2, 4, false}
|
EDX = Reg{idx: 2, size: 4}
|
||||||
EBX = Reg{3, 4, false}
|
EBX = Reg{idx: 3, size: 4}
|
||||||
ESP = Reg{4, 4, false}
|
ESP = Reg{idx: 4, size: 4}
|
||||||
EBP = Reg{5, 4, false}
|
EBP = Reg{idx: 5, size: 4}
|
||||||
ESI = Reg{6, 4, false}
|
ESI = Reg{idx: 6, size: 4}
|
||||||
EDI = Reg{7, 4, false}
|
EDI = Reg{idx: 7, size: 4}
|
||||||
|
|
||||||
RAX = Reg{0, 8, false}
|
RAX = Reg{idx: 0, size: 8}
|
||||||
RCX = Reg{1, 8, false}
|
RCX = Reg{idx: 1, size: 8}
|
||||||
RDX = Reg{2, 8, false}
|
RDX = Reg{idx: 2, size: 8}
|
||||||
RBX = Reg{3, 8, false}
|
RBX = Reg{idx: 3, size: 8}
|
||||||
RSP = Reg{4, 8, false}
|
RSP = Reg{idx: 4, size: 8}
|
||||||
RBP = Reg{5, 8, false}
|
RBP = Reg{idx: 5, size: 8}
|
||||||
RSI = Reg{6, 8, false}
|
RSI = Reg{idx: 6, size: 8}
|
||||||
RDI = Reg{7, 8, false}
|
RDI = Reg{idx: 7, size: 8}
|
||||||
)
|
)
|
||||||
|
|
||||||
// regByName maps an assembly register name (case-insensitive) to a Reg.
|
// regByName maps an assembly register name (case-insensitive) to a Reg.
|
||||||
@@ -91,28 +96,28 @@ func buildRegByName() map[string]Reg {
|
|||||||
// 64-bit: RAX..RDI, R8..R15.
|
// 64-bit: RAX..RDI, R8..R15.
|
||||||
r64 := []string{"RAX", "RCX", "RDX", "RBX", "RSP", "RBP", "RSI", "RDI"}
|
r64 := []string{"RAX", "RCX", "RDX", "RBX", "RSP", "RBP", "RSI", "RDI"}
|
||||||
for i, n := range r64 {
|
for i, n := range r64 {
|
||||||
m[n] = Reg{i, 8, false}
|
m[n] = Reg{idx: i, size: 8}
|
||||||
}
|
}
|
||||||
for i := 8; i <= 15; i++ {
|
for i := 8; i <= 15; i++ {
|
||||||
m["R"+itoa(i)] = Reg{i, 8, false}
|
m["R"+itoa(i)] = Reg{idx: i, size: 8}
|
||||||
}
|
}
|
||||||
|
|
||||||
// 32-bit: EAX..EDI, R8D..R15D.
|
// 32-bit: EAX..EDI, R8D..R15D.
|
||||||
e32 := []string{"EAX", "ECX", "EDX", "EBX", "ESP", "EBP", "ESI", "EDI"}
|
e32 := []string{"EAX", "ECX", "EDX", "EBX", "ESP", "EBP", "ESI", "EDI"}
|
||||||
for i, n := range e32 {
|
for i, n := range e32 {
|
||||||
m[n] = Reg{i, 4, false}
|
m[n] = Reg{idx: i, size: 4}
|
||||||
}
|
}
|
||||||
for i := 8; i <= 15; i++ {
|
for i := 8; i <= 15; i++ {
|
||||||
m["R"+itoa(i)+"D"] = Reg{i, 4, false}
|
m["R"+itoa(i)+"D"] = Reg{idx: i, size: 4}
|
||||||
}
|
}
|
||||||
|
|
||||||
// 16-bit: AX..DI, R8W..R15W.
|
// 16-bit: AX..DI, R8W..R15W.
|
||||||
w16 := []string{"AX", "CX", "DX", "BX", "SP", "BP", "SI", "DI"}
|
w16 := []string{"AX", "CX", "DX", "BX", "SP", "BP", "SI", "DI"}
|
||||||
for i, n := range w16 {
|
for i, n := range w16 {
|
||||||
m[n] = Reg{i, 2, false}
|
m[n] = Reg{idx: i, size: 2}
|
||||||
}
|
}
|
||||||
for i := 8; i <= 15; i++ {
|
for i := 8; i <= 15; i++ {
|
||||||
m["R"+itoa(i)+"W"] = Reg{i, 2, false}
|
m["R"+itoa(i)+"W"] = Reg{idx: i, size: 2}
|
||||||
}
|
}
|
||||||
|
|
||||||
// 8-bit: AL..BH, SPL..DIL, R8B..R15B.
|
// 8-bit: AL..BH, SPL..DIL, R8B..R15B.
|
||||||
@@ -124,25 +129,34 @@ func buildRegByName() map[string]Reg {
|
|||||||
m[n] = r
|
m[n] = r
|
||||||
}
|
}
|
||||||
for i := 8; i <= 15; i++ {
|
for i := 8; i <= 15; i++ {
|
||||||
m["R"+itoa(i)+"B"] = Reg{i, 1, false}
|
m["R"+itoa(i)+"B"] = Reg{idx: i, size: 1}
|
||||||
}
|
}
|
||||||
|
|
||||||
// Vector: X0..X15 (128-bit, encoded size 16), Y0..Y15 (256-bit, size 32).
|
// Vector: X0..X31 (128-bit, size 16), Y0..Y31 (256-bit, size 32),
|
||||||
// Z (512-bit) and K (mask) registers arrive with EVEX/AVX-512 support.
|
// Z0..Z31 (512-bit, size 64). Indices 16–31 are only encodable in EVEX
|
||||||
for i := 0; i <= 15; i++ {
|
// (AVX-512) instructions; the encoder validates that through its tables.
|
||||||
m["X"+itoa(i)] = Reg{i, 16, false}
|
for i := 0; i <= 31; i++ {
|
||||||
m["Y"+itoa(i)] = Reg{i, 32, false}
|
m["X"+itoa(i)] = Reg{idx: i, size: 16}
|
||||||
|
m["Y"+itoa(i)] = Reg{idx: i, size: 32}
|
||||||
|
m["Z"+itoa(i)] = Reg{idx: i, size: 64}
|
||||||
|
}
|
||||||
|
// Opmask: K0..K7.
|
||||||
|
for i := 0; i <= 7; i++ {
|
||||||
|
m["K"+itoa(i)] = Reg{idx: i, size: 8, mask: true}
|
||||||
}
|
}
|
||||||
return m
|
return m
|
||||||
}
|
}
|
||||||
|
|
||||||
// isVec reports whether r is an XMM/YMM vector register.
|
// isVec reports whether r is an XMM/YMM/ZMM vector register.
|
||||||
func (r Reg) isVec() bool { return r.size == 16 || r.size == 32 }
|
func (r Reg) isVec() bool { return r.size == 16 || r.size == 32 || r.size == 64 }
|
||||||
|
|
||||||
// vecLenBit returns the VEX.L bit for a vector register (X=0/128-bit,
|
// vecLenBit returns the vector-length field for a vector register:
|
||||||
// Y=1/256-bit).
|
// 0 (128-bit, VEX.L / EVEX.L'L=00), 1 (256-bit) or 2 (512-bit, EVEX only).
|
||||||
func (r Reg) vecLenBit() int {
|
func (r Reg) vecLenBit() int {
|
||||||
if r.size == 32 {
|
switch r.size {
|
||||||
|
case 64:
|
||||||
|
return 2
|
||||||
|
case 32:
|
||||||
return 1
|
return 1
|
||||||
}
|
}
|
||||||
return 0
|
return 0
|
||||||
|
|||||||
+60
-1
@@ -39,6 +39,10 @@ const (
|
|||||||
// source lives in the reg field, the destination in r/m — the PEXTR-style
|
// source lives in the reg field, the destination in r/m — the PEXTR-style
|
||||||
// layout. VEXTRACTI128 and VEXTRACTF128 use this shape.
|
// layout. VEXTRACTI128 and VEXTRACTF128 use this shape.
|
||||||
vexExtract
|
vexExtract
|
||||||
|
// vexRMRev is the reversed two-operand form `OP src, dst` with the source
|
||||||
|
// in ModRM.reg and the destination in r/m — the layout of the EVEX
|
||||||
|
// narrowing stores (VPMOVDW, VPMOVQD).
|
||||||
|
vexRMRev
|
||||||
// vexZero is the no-operand form (VZEROUPPER).
|
// vexZero is the no-operand form (VZEROUPPER).
|
||||||
vexZero
|
vexZero
|
||||||
)
|
)
|
||||||
@@ -131,6 +135,20 @@ var vexTable = map[string]vexSpec{
|
|||||||
|
|
||||||
// VEX.128.0F.W0 — no operands.
|
// VEX.128.0F.W0 — no operands.
|
||||||
"VZEROUPPER": {1, 0x77, 0, 0, -1, vexZero},
|
"VZEROUPPER": {1, 0x77, 0, 0, -1, vexZero},
|
||||||
|
|
||||||
|
// VEX.128.0F.W0 — mask-register test (KTESTW k1, k2: reg = dst, rm = src).
|
||||||
|
"KTESTW": {1, 0x99, 0, 0, -1, vexRM},
|
||||||
|
}
|
||||||
|
|
||||||
|
// vexVarShift maps the shift mnemonics to their variable-count opcode — the
|
||||||
|
// form whose count comes from an XMM register or memory (VPSRLQ X0, Y8, Y8),
|
||||||
|
// an ordinary NDS encoding rather than the /digit immediate form above.
|
||||||
|
var vexVarShift = map[string]byte{
|
||||||
|
"VPSLLD": 0xF2,
|
||||||
|
"VPSLLQ": 0xF3,
|
||||||
|
"VPSRAD": 0xE2,
|
||||||
|
"VPSRLD": 0xD2,
|
||||||
|
"VPSRLQ": 0xD3,
|
||||||
}
|
}
|
||||||
|
|
||||||
// vexMoveSpec describes a VEX move, which takes different opcodes (and
|
// vexMoveSpec describes a VEX move, which takes different opcodes (and
|
||||||
@@ -177,9 +195,27 @@ func isVex(mnemUpper string) bool {
|
|||||||
|
|
||||||
// encodeVex encodes a VEX instruction with operands in Plan 9 order.
|
// encodeVex encodes a VEX instruction with operands in Plan 9 order.
|
||||||
func (e *enc) encodeVex(mnemUpper string, ops []Operand) error {
|
func (e *enc) encodeVex(mnemUpper string, ops []Operand) error {
|
||||||
|
// Vector register indices 16–31 exist only in EVEX encodings; fail
|
||||||
|
// loudly rather than silently truncating the index.
|
||||||
|
for _, op := range ops {
|
||||||
|
if r, ok := op.(Reg); ok && r.isVec() && r.idx >= 16 {
|
||||||
|
return fmt.Errorf("%s: vector register index %d needs an EVEX (AVX-512) instruction", mnemUpper, r.idx)
|
||||||
|
}
|
||||||
|
}
|
||||||
if ms, ok := vexMoveTable[mnemUpper]; ok {
|
if ms, ok := vexMoveTable[mnemUpper]; ok {
|
||||||
return e.encodeVexMove(mnemUpper, ms, ops)
|
return e.encodeVexMove(mnemUpper, ms, ops)
|
||||||
}
|
}
|
||||||
|
// The shifts come in two shapes under one mnemonic: an immediate count
|
||||||
|
// ($imm, src, dst) and a variable count in an XMM register or memory
|
||||||
|
// (count, src, dst), the latter an ordinary NDS form.
|
||||||
|
if op, ok := vexVarShift[mnemUpper]; ok && len(ops) == 3 {
|
||||||
|
if _, isImm := ops[0].(Imm); !isImm {
|
||||||
|
if !vecOrMem(ops[0]) {
|
||||||
|
return fmt.Errorf("%s: shift count must be an immediate, a vector register or memory", mnemUpper)
|
||||||
|
}
|
||||||
|
return e.encodeVexNDS3(vexSpec{mapSel: 1, opcode: op, pp: 1, opdigit: -1, form: vexNDS3}, ops)
|
||||||
|
}
|
||||||
|
}
|
||||||
spec := vexTable[mnemUpper]
|
spec := vexTable[mnemUpper]
|
||||||
switch spec.form {
|
switch spec.form {
|
||||||
case vexNDS3:
|
case vexNDS3:
|
||||||
@@ -483,11 +519,21 @@ func vecReg(op Operand) (Reg, bool) {
|
|||||||
return r, ok && r.isVec()
|
return r, ok && r.isVec()
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// vecOrMem reports whether op is a vector register or a memory reference.
|
||||||
|
func vecOrMem(op Operand) bool {
|
||||||
|
switch op.(type) {
|
||||||
|
case Mem, sbMem:
|
||||||
|
return true
|
||||||
|
}
|
||||||
|
r, ok := op.(Reg)
|
||||||
|
return ok && r.isVec()
|
||||||
|
}
|
||||||
|
|
||||||
// validMoveOther reports whether the non-vector operand of a move is
|
// validMoveOther reports whether the non-vector operand of a move is
|
||||||
// acceptable: memory always is, a GPR only for VMOVD/VMOVQ.
|
// acceptable: memory always is, a GPR only for VMOVD/VMOVQ.
|
||||||
func validMoveOther(ms vexMoveSpec, op Operand) bool {
|
func validMoveOther(ms vexMoveSpec, op Operand) bool {
|
||||||
switch o := op.(type) {
|
switch o := op.(type) {
|
||||||
case Mem:
|
case Mem, sbMem:
|
||||||
return true
|
return true
|
||||||
case Reg:
|
case Reg:
|
||||||
return ms.gprOK && !o.isVec()
|
return ms.gprOK && !o.isVec()
|
||||||
@@ -499,9 +545,13 @@ func validMoveOther(ms vexMoveSpec, op Operand) bool {
|
|||||||
// the given precomputed fields. It is shared by every register/rm VEX form;
|
// the given precomputed fields. It is shared by every register/rm VEX form;
|
||||||
// immediate bytes are appended by the caller.
|
// immediate bytes are appended by the caller.
|
||||||
func (e *enc) emitVexFields(spec vexSpec, l, regField, rBit, vvvvBar int, rm Operand) error {
|
func (e *enc) emitVexFields(spec vexSpec, l, regField, rBit, vvvvBar int, rm Operand) error {
|
||||||
|
if l > 1 {
|
||||||
|
return fmt.Errorf("ZMM operand requires an EVEX instruction")
|
||||||
|
}
|
||||||
var modrm, sib int
|
var modrm, sib int
|
||||||
var disp []byte
|
var disp []byte
|
||||||
var xBit, bBit int
|
var xBit, bBit int
|
||||||
|
var sb *sbRef
|
||||||
switch r := rm.(type) {
|
switch r := rm.(type) {
|
||||||
case Reg:
|
case Reg:
|
||||||
modrm = 0xC0 | regField<<3 | (r.idx & 7)
|
modrm = 0xC0 | regField<<3 | (r.idx & 7)
|
||||||
@@ -515,6 +565,12 @@ func (e *enc) emitVexFields(spec vexSpec, l, regField, rBit, vvvvBar int, rm Ope
|
|||||||
if err != nil {
|
if err != nil {
|
||||||
return err
|
return err
|
||||||
}
|
}
|
||||||
|
case sbMem:
|
||||||
|
// RIP-relative static-symbol reference; disp32 patched at link time.
|
||||||
|
modrm = regField<<3 | 0x05
|
||||||
|
sib = -1
|
||||||
|
disp = le32(0)
|
||||||
|
sb = &sbRef{name: r.name, addend: r.addend}
|
||||||
default:
|
default:
|
||||||
return fmt.Errorf("invalid VEX r/m operand")
|
return fmt.Errorf("invalid VEX r/m operand")
|
||||||
}
|
}
|
||||||
@@ -530,6 +586,9 @@ func (e *enc) emitVexFields(spec vexSpec, l, regField, rBit, vvvvBar int, rm Ope
|
|||||||
if sib >= 0 {
|
if sib >= 0 {
|
||||||
e.out = append(e.out, byte(sib))
|
e.out = append(e.out, byte(sib))
|
||||||
}
|
}
|
||||||
|
if sb != nil {
|
||||||
|
e.patches = append(e.patches, encPatch{off: len(e.out), name: sb.name, addend: sb.addend})
|
||||||
|
}
|
||||||
e.out = append(e.out, disp...)
|
e.out = append(e.out, disp...)
|
||||||
return nil
|
return nil
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -191,6 +191,14 @@ func TestVexGroundTruth(t *testing.T) {
|
|||||||
// Immediate shifts.
|
// Immediate shifts.
|
||||||
{"VPSLLD $1,Y3,Y4", "VPSLLD", []Operand{Imm(1), vreg(t, "Y3"), vreg(t, "Y4")}, "c5dd72f301"},
|
{"VPSLLD $1,Y3,Y4", "VPSLLD", []Operand{Imm(1), vreg(t, "Y3"), vreg(t, "Y4")}, "c5dd72f301"},
|
||||||
{"VPSRLQ $2,Y5,Y6", "VPSRLQ", []Operand{Imm(2), vreg(t, "Y5"), vreg(t, "Y6")}, "c5cd73d502"},
|
{"VPSRLQ $2,Y5,Y6", "VPSRLQ", []Operand{Imm(2), vreg(t, "Y5"), vreg(t, "Y6")}, "c5cd73d502"},
|
||||||
|
// Variable-count shifts: the count lives in an XMM register or memory
|
||||||
|
// and the instruction takes the NDS form.
|
||||||
|
{"VPSRLQ X0,Y8,Y8", "VPSRLQ", []Operand{vreg(t, "X0"), vreg(t, "Y8"), vreg(t, "Y8")}, "c53dd3c0"},
|
||||||
|
{"VPSRLQ (AX),Y8,Y8", "VPSRLQ", []Operand{Ptr(AX, 0, 16), vreg(t, "Y8"), vreg(t, "Y8")}, "c53dd300"},
|
||||||
|
{"VPSLLD X0,Y1,Y2", "VPSLLD", []Operand{vreg(t, "X0"), vreg(t, "Y1"), vreg(t, "Y2")}, "c5f5f2d0"},
|
||||||
|
{"VPSRLD X0,Y1,Y2", "VPSRLD", []Operand{vreg(t, "X0"), vreg(t, "Y1"), vreg(t, "Y2")}, "c5f5d2d0"},
|
||||||
|
{"VPSRAD X0,Y1,Y2", "VPSRAD", []Operand{vreg(t, "X0"), vreg(t, "Y1"), vreg(t, "Y2")}, "c5f5e2d0"},
|
||||||
|
{"VPSLLQ X0,Y1,Y2", "VPSLLQ", []Operand{vreg(t, "X0"), vreg(t, "Y1"), vreg(t, "Y2")}, "c5f5f3d0"},
|
||||||
// Immediate shuffle (reg=dst, rm=src, imm8).
|
// Immediate shuffle (reg=dst, rm=src, imm8).
|
||||||
{"VPSHUFD $0xEE,X8,X9", "VPSHUFD", []Operand{Imm(0xEE), vreg(t, "X8"), vreg(t, "X9")}, "c4417970c8ee"},
|
{"VPSHUFD $0xEE,X8,X9", "VPSHUFD", []Operand{Imm(0xEE), vreg(t, "X8"), vreg(t, "X9")}, "c4417970c8ee"},
|
||||||
{"VPSHUFD $0xEE,Y1,Y2", "VPSHUFD", []Operand{Imm(0xEE), vreg(t, "Y1"), vreg(t, "Y2")}, "c5fd70d1ee"},
|
{"VPSHUFD $0xEE,Y1,Y2", "VPSHUFD", []Operand{Imm(0xEE), vreg(t, "Y1"), vreg(t, "Y2")}, "c5fd70d1ee"},
|
||||||
|
|||||||
+38
-19
@@ -26,7 +26,7 @@ import (
|
|||||||
|
|
||||||
// version is the release version, stamped at build time via
|
// version is the release version, stamped at build time via
|
||||||
// -ldflags "-X main.version=…" (defaulting to the current release).
|
// -ldflags "-X main.version=…" (defaulting to the current release).
|
||||||
var version = "0.2.0"
|
var version = "0.5.0"
|
||||||
|
|
||||||
func main() {
|
func main() {
|
||||||
if len(os.Args) < 2 {
|
if len(os.Args) < 2 {
|
||||||
@@ -238,20 +238,18 @@ func cmdAsm(args []string) int {
|
|||||||
return 1
|
return 1
|
||||||
}
|
}
|
||||||
|
|
||||||
var all []byte
|
img, err := asm.AssembleFile(f)
|
||||||
functions := 0
|
if err != nil {
|
||||||
for _, d := range f.Decls {
|
fmt.Fprintf(os.Stderr, "%s: %v\n", path, err)
|
||||||
txt, ok := d.(*ast.Text)
|
return 1
|
||||||
if !ok {
|
}
|
||||||
continue
|
if len(img.Funcs) == 0 {
|
||||||
}
|
fmt.Fprintln(os.Stderr, "gasm asm: no assemblable TEXT functions found")
|
||||||
code, _, err := asm.Assemble(txt)
|
return 1
|
||||||
if err != nil {
|
}
|
||||||
fmt.Fprintf(os.Stderr, "%s: %s: %v\n", path, txt.Name.Name, err)
|
for _, fn := range img.Funcs {
|
||||||
return 1
|
code := img.Code[fn.Offset : fn.Offset+fn.Size]
|
||||||
}
|
fmt.Printf("%s: %d bytes\n", fn.Name, fn.Size)
|
||||||
functions++
|
|
||||||
fmt.Printf("%s: %d bytes\n", txt.Name.Name, len(code))
|
|
||||||
for i := 0; i < len(code); i += 16 {
|
for i := 0; i < len(code); i += 16 {
|
||||||
end := i + 16
|
end := i + 16
|
||||||
if end > len(code) {
|
if end > len(code) {
|
||||||
@@ -263,13 +261,34 @@ func cmdAsm(args []string) int {
|
|||||||
}
|
}
|
||||||
fmt.Println()
|
fmt.Println()
|
||||||
}
|
}
|
||||||
all = append(all, code...)
|
|
||||||
}
|
}
|
||||||
if functions == 0 {
|
if len(img.Data) > 0 {
|
||||||
fmt.Fprintln(os.Stderr, "gasm asm: no assemblable TEXT functions found")
|
fmt.Printf("data: %d bytes at 0x%x\n", len(img.Data), len(img.Code))
|
||||||
return 1
|
for _, d := range f.Decls {
|
||||||
|
g, ok := d.(*ast.Globl)
|
||||||
|
if !ok || g.Name == nil || g.Name.Pseudo != "SB" {
|
||||||
|
continue
|
||||||
|
}
|
||||||
|
size := 0
|
||||||
|
if g.Size != nil && g.Size.Imm.HasVal {
|
||||||
|
size = int(g.Size.Imm.Val)
|
||||||
|
}
|
||||||
|
fmt.Printf(" %s: %d bytes at 0x%x\n", g.Name.Name, size, img.Symbols[g.Name.Name])
|
||||||
|
}
|
||||||
|
for i := 0; i < len(img.Data); i += 16 {
|
||||||
|
end := i + 16
|
||||||
|
if end > len(img.Data) {
|
||||||
|
end = len(img.Data)
|
||||||
|
}
|
||||||
|
fmt.Printf(" %04x:", len(img.Code)+i)
|
||||||
|
for _, b := range img.Data[i:end] {
|
||||||
|
fmt.Printf(" %02x", b)
|
||||||
|
}
|
||||||
|
fmt.Println()
|
||||||
|
}
|
||||||
}
|
}
|
||||||
if *out != "" {
|
if *out != "" {
|
||||||
|
all := img.Bytes()
|
||||||
if err := os.WriteFile(*out, all, 0o644); err != nil {
|
if err := os.WriteFile(*out, all, 0o644); err != nil {
|
||||||
fmt.Fprintln(os.Stderr, "gasm asm:", err)
|
fmt.Fprintln(os.Stderr, "gasm asm:", err)
|
||||||
return 1
|
return 1
|
||||||
|
|||||||
+32
-17
@@ -182,33 +182,48 @@ Every encoding is validated by decoding it again with `golang.org/x/arch` — th
|
|||||||
one module dependency, used in tests only and never linked into the binary.
|
one module dependency, used in tests only and never linked into the binary.
|
||||||
|
|
||||||
On top of the encoder, `Assemble` walks a parsed `TEXT` body, converts each
|
On top of the encoder, `Assemble` walks a parsed `TEXT` body, converts each
|
||||||
operand to an encoder operand, and lays the instructions out in two passes so
|
operand to an encoder operand, and lays the instructions out so local labels
|
||||||
local labels resolve to fixed rel32 jump offsets. The `FP`/`SP` pseudo-
|
resolve to relative jump offsets: jumps start in the short (rel8) form and
|
||||||
|
expand to rel32 when the settled displacement does not fit, iterating to a
|
||||||
|
fixed point, and jump-to-jump chains are folded (a conditional jump to a label
|
||||||
|
whose only instruction is an unconditional jump is redirected to the ultimate
|
||||||
|
target) exactly as the Go toolchain's linker does before it encodes branches.
|
||||||
|
The `FP`/`SP` pseudo-
|
||||||
registers are translated onto the hardware stack pointer — `x+N(FP)` becomes
|
registers are translated onto the hardware stack pointer — `x+N(FP)` becomes
|
||||||
`(N+8)(SP)` for a zero-frame function and `(N+frame+16)(SP)` once a frame
|
`(N+8)(SP)` for a zero-frame function and `(N+frame+16)(SP)` once a frame
|
||||||
pointer is set up, with the matching Go prologue/epilogue generated — so the
|
pointer is set up, with the matching Go prologue/epilogue generated — so the
|
||||||
output is byte-identical to the Go assembler for these cases. SIMD is handled
|
output is byte-identical to the Go assembler for these cases. SIMD is handled
|
||||||
by a VEX (AVX/AVX2) encoder — the two- and three-byte VEX prefixes with XMM/YMM
|
by a VEX (AVX/AVX2) encoder — the two- and three-byte VEX prefixes with XMM/YMM
|
||||||
registers — across seven operand forms: the three-operand NDS form, the
|
registers — across eight operand forms: the three-operand NDS form, the
|
||||||
two-operand reg/rm form, the immediate-shift form, the immediate shuffle form
|
two-operand reg/rm form, the immediate-shift form (plus the variable-count
|
||||||
(`VPSHUFD`, `VPERMQ`), the three-operand-plus-immediate form (`VSHUFPD`,
|
shifts, which share the NDS shape with the count in an XMM register or
|
||||||
|
memory), the immediate shuffle form (`VPSHUFD`, `VPERMQ`), the
|
||||||
|
three-operand-plus-immediate form (`VSHUFPD`,
|
||||||
`VPERM2I128`, `VINSERTI128`), the lane-extract form (`VEXTRACTI128`,
|
`VPERM2I128`, `VINSERTI128`), the lane-extract form (`VEXTRACTI128`,
|
||||||
lane-extract form (`VEXTRACTI128`,
|
|
||||||
`VEXTRACTF128`, where the YMM source occupies the reg field and the XMM or
|
`VEXTRACTF128`, where the YMM source occupies the reg field and the XMM or
|
||||||
memory destination r/m), the direction-sensitive moves (`VMOVDQU`, `VMOVUPD`,
|
memory destination r/m), the direction-sensitive moves (`VMOVDQU`, `VMOVUPD`,
|
||||||
`VMOVD`, `VMOVQ`, `VMOVSD`), the floating-point and FMA arithmetic (`VADDPD`,
|
`VMOVD`, `VMOVQ`, `VMOVSD`), the floating-point and FMA arithmetic (`VADDPD`,
|
||||||
`VMULPD`, `VXORPD`, `VUNPCKHPD`, the scalar `VADDSD`/`VMULSD`, `VCVTDQ2PD`,
|
`VMULPD`, `VXORPD`, `VUNPCKHPD`, the scalar `VADDSD`/`VMULSD`, `VCVTDQ2PD`,
|
||||||
`VFMADD231PD`) and the no-operand `VZEROUPPER` — together with `VPERMD`,
|
`VFMADD231PD`) and the no-operand `VZEROUPPER` — together with `VPERMD` and
|
||||||
covering every integer, shuffle and FP instruction the go-flac AVX2 kernels
|
the scalar families (`CMOVcc`, `SETcc`, `LZCNT`/`TZCNT`, the extending moves,
|
||||||
use. Every encoding is validated two ways: by round-trip decoding
|
`CVTSx2SD`, `IMUL3`) and the EVEX (AVX-512) prefix — the four-byte prefix with
|
||||||
through `golang.org/x/arch`, and byte-for-byte against the machine code the
|
5-bit register fields (Z0–Z31, X/Y 16–31), opmask registers as operands and
|
||||||
real Go assembler emits (which also locks the v̄vvv = 1111 rule for unused
|
mask destinations, and the compressed disp8×N displacement, whose multiplier
|
||||||
vvvv fields — a value the hardware rejects with #UD and the decoder silently
|
follows the memory operand's size — covering every instruction the go-flac
|
||||||
ignores). This increment covers register / memory / immediate / FP-frame
|
AVX2 and AVX-512 kernels use. Every encoding is validated two ways: by
|
||||||
operands, local-label jumps and these VEX SIMD forms; EVEX / AVX-512, `SB`
|
round-trip decoding through `golang.org/x/arch`, and byte-for-byte against
|
||||||
(global symbol) operands (relocations), a handful of scalar gaps the kernels
|
the machine code the real Go assembler emits — a comparison that holds for
|
||||||
hit (`CMOVcc`, `SETcc`, `LZCNT`, `MOVSX`/`MOVZX`) and object-file emission
|
whole functions: all 27 functions of both kernels assemble to exactly the Go
|
||||||
are the rest of Phase 2.
|
toolchain's bytes, the lone exception being the displacements of the
|
||||||
|
static-constant loads, which the Go linker fills at link time.
|
||||||
|
|
||||||
|
File-level assembly (`AssembleFile`) goes beyond single functions: it
|
||||||
|
materialises the file's static symbols (`GLOBL`/`DATA`) in a data section
|
||||||
|
behind the code and resolves references to them (`mask<>(SB)`) to
|
||||||
|
RIP-relative loads whose displacements point inside the resulting image, so
|
||||||
|
the bytes are self-consistent at any base address. External (non-file-local)
|
||||||
|
symbols are rejected: they need object-file emission, which — together with
|
||||||
|
EVEX masking/zeroing and the other architectures — is the rest of Phase 2.
|
||||||
|
|
||||||
## Extension points
|
## Extension points
|
||||||
|
|
||||||
|
|||||||
@@ -3,7 +3,7 @@
|
|||||||
|
|
||||||
# gasm-devkit — developer tooling for Go's Plan 9 assembler (GAsm).
|
# gasm-devkit — developer tooling for Go's Plan 9 assembler (GAsm).
|
||||||
|
|
||||||
version := "0.2.0"
|
version := "0.5.0"
|
||||||
|
|
||||||
default:
|
default:
|
||||||
@just --list
|
@just --list
|
||||||
|
|||||||
+21
-14
@@ -400,22 +400,29 @@ func parseAddress(g []token.Token) ast.Address {
|
|||||||
}
|
}
|
||||||
|
|
||||||
i := 0
|
i := 0
|
||||||
// Optional leading displacement before a '(' base group.
|
// Optional leading displacement before a '(' base group. A sign pushes
|
||||||
if isSignedNumber(g, i) && i+1 < len(g) && g[i+1].Kind == token.LParen {
|
// the parenthesis one token further out: -4(DX) has it at i+2.
|
||||||
neg := false
|
if isSignedNumber(g, i) {
|
||||||
if g[i].Kind == token.Minus {
|
paren := i + 1
|
||||||
neg = true
|
if g[i].Kind == token.Minus || g[i].Kind == token.Plus {
|
||||||
i++
|
paren = i + 2
|
||||||
} else if g[i].Kind == token.Plus {
|
|
||||||
i++
|
|
||||||
}
|
}
|
||||||
if i < len(g) && g[i].Kind == token.Number {
|
if paren < len(g) && g[paren].Kind == token.LParen {
|
||||||
addr.Offset = parseInt(g[i].Text)
|
neg := false
|
||||||
addr.HasOff = true
|
if g[i].Kind == token.Minus {
|
||||||
if neg {
|
neg = true
|
||||||
addr.Offset = -addr.Offset
|
i++
|
||||||
|
} else if g[i].Kind == token.Plus {
|
||||||
|
i++
|
||||||
|
}
|
||||||
|
if i < len(g) && g[i].Kind == token.Number {
|
||||||
|
addr.Offset = parseInt(g[i].Text)
|
||||||
|
addr.HasOff = true
|
||||||
|
if neg {
|
||||||
|
addr.Offset = -addr.Offset
|
||||||
|
}
|
||||||
|
i++
|
||||||
}
|
}
|
||||||
i++
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
// First parenthesised group: the base register.
|
// First parenthesised group: the base register.
|
||||||
|
|||||||
@@ -34,6 +34,46 @@ func texts(f *ast.File) []*ast.Text {
|
|||||||
return out
|
return out
|
||||||
}
|
}
|
||||||
|
|
||||||
|
// TestNegativeDisplacement is a regression test for a leading negative
|
||||||
|
// displacement with a base and index: the sign pushed the parenthesis one
|
||||||
|
// token further out than the lookahead expected, and the whole address used
|
||||||
|
// to parse empty.
|
||||||
|
func TestNegativeDisplacement(t *testing.T) {
|
||||||
|
f, errs := Parse("neg_amd64.s", `
|
||||||
|
#include "textflag.h"
|
||||||
|
TEXT ·f(SB), NOSPLIT, $0
|
||||||
|
LEAQ -4(DX)(R9*4), R9
|
||||||
|
MOVQ +8(AX), BX
|
||||||
|
RET
|
||||||
|
`)
|
||||||
|
if len(errs) > 0 {
|
||||||
|
t.Fatalf("parse: %v", errs)
|
||||||
|
}
|
||||||
|
fn := texts(f)[0]
|
||||||
|
var leaq, movq *ast.Instr
|
||||||
|
for _, s := range fn.Body {
|
||||||
|
if in, ok := s.(*ast.Instr); ok {
|
||||||
|
switch in.Mnemonic.Text {
|
||||||
|
case "LEAQ":
|
||||||
|
leaq = in
|
||||||
|
case "MOVQ":
|
||||||
|
movq = in
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
if leaq == nil || movq == nil {
|
||||||
|
t.Fatalf("instructions not parsed: leaq=%v movq=%v", leaq, movq)
|
||||||
|
}
|
||||||
|
a := leaq.Operands[0].Addr
|
||||||
|
if a.Base != "DX" || a.Index != "R9" || a.Scale != 4 || a.Offset != -4 || !a.HasOff {
|
||||||
|
t.Errorf("LEAQ addr = %+v, want -4(DX)(R9*4)", a)
|
||||||
|
}
|
||||||
|
b := movq.Operands[0].Addr
|
||||||
|
if b.Base != "AX" || b.Offset != 8 || !b.HasOff {
|
||||||
|
t.Errorf("MOVQ addr = %+v, want +8(AX)", b)
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
func TestParseSample(t *testing.T) {
|
func TestParseSample(t *testing.T) {
|
||||||
f := mustParse(t, "../testdata/sample_amd64.s")
|
f := mustParse(t, "../testdata/sample_amd64.s")
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user