1// cmd/9l/list.c from Vita Nuova.
2//
3//	Copyright © 1994-1999 Lucent Technologies Inc.  All rights reserved.
4//	Portions Copyright © 1995-1997 C H Forsyth ([email protected])
5//	Portions Copyright © 1997-1999 Vita Nuova Limited
6//	Portions Copyright © 2000-2008 Vita Nuova Holdings Limited (www.vitanuova.com)
7//	Portions Copyright © 2004,2006 Bruce Ellis
8//	Portions Copyright © 2005-2007 C H Forsyth ([email protected])
9//	Revisions Copyright © 2000-2008 Lucent Technologies Inc. and others
10//	Portions Copyright © 2009 The Go Authors. All rights reserved.
11//
12// Permission is hereby granted, free of charge, to any person obtaining a copy
13// of this software and associated documentation files (the "Software"), to deal
14// in the Software without restriction, including without limitation the rights
15// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
16// copies of the Software, and to permit persons to whom the Software is
17// furnished to do so, subject to the following conditions:
18//
19// The above copyright notice and this permission notice shall be included in
20// all copies or substantial portions of the Software.
21//
22// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
23// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
24// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
25// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
26// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
27// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
28// THE SOFTWARE.
29
30package ppc64
31
32import (
33	"cmd/internal/obj"
34	"fmt"
35)
36
37func init() {
38	obj.RegisterRegister(obj.RBasePPC64, REG_SPR0+1024, rconv)
39	// Note, the last entry in Anames is "LASTAOUT", it is not a real opcode.
40	obj.RegisterOpcode(obj.ABasePPC64, Anames[:len(Anames)-1])
41	obj.RegisterOpcode(AFIRSTGEN, GenAnames)
42}
43
44func rconv(r int) string {
45	if r == 0 {
46		return "NONE"
47	}
48	if r == REGG {
49		// Special case.
50		return "g"
51	}
52	if REG_R0 <= r && r <= REG_R31 {
53		return fmt.Sprintf("R%d", r-REG_R0)
54	}
55	if REG_F0 <= r && r <= REG_F31 {
56		return fmt.Sprintf("F%d", r-REG_F0)
57	}
58	if REG_V0 <= r && r <= REG_V31 {
59		return fmt.Sprintf("V%d", r-REG_V0)
60	}
61	if REG_VS0 <= r && r <= REG_VS63 {
62		return fmt.Sprintf("VS%d", r-REG_VS0)
63	}
64	if REG_CR0 <= r && r <= REG_CR7 {
65		return fmt.Sprintf("CR%d", r-REG_CR0)
66	}
67	if REG_CR0LT <= r && r <= REG_CR7SO {
68		bits := [4]string{"LT", "GT", "EQ", "SO"}
69		crf := (r - REG_CR0LT) / 4
70		return fmt.Sprintf("CR%d%s", crf, bits[r%4])
71	}
72	if REG_A0 <= r && r <= REG_A7 {
73		return fmt.Sprintf("A%d", r-REG_A0)
74	}
75	if r == REG_CR {
76		return "CR"
77	}
78	if REG_SPR0 <= r && r <= REG_SPR0+1023 {
79		switch r {
80		case REG_XER:
81			return "XER"
82
83		case REG_LR:
84			return "LR"
85
86		case REG_CTR:
87			return "CTR"
88		}
89
90		return fmt.Sprintf("SPR(%d)", r-REG_SPR0)
91	}
92
93	if r == REG_FPSCR {
94		return "FPSCR"
95	}
96	if r == REG_MSR {
97		return "MSR"
98	}
99
100	return fmt.Sprintf("Rgok(%d)", r-obj.RBasePPC64)
101}
102
103func DRconv(a int) string {
104	s := "C_??"
105	if a >= C_NONE && a <= C_NCLASS {
106		s = cnames9[a]
107	}
108	var fp string
109	fp += s
110	return fp
111}
112
113func ConstantToCRbit(c int64) (int16, bool) {
114	reg64 := REG_CRBIT0 + c
115	success := reg64 >= REG_CR0LT && reg64 <= REG_CR7SO
116	return int16(reg64), success
117}
118