1 /* -*- mode: C; c-file-style: "k&r"; tab-width 4; indent-tabs-mode: t; -*- */
2
3 /*
4 * Copyright (C) 2014 Rob Clark <robclark@freedesktop.org>
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the "Software"),
8 * to deal in the Software without restriction, including without limitation
9 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
10 * and/or sell copies of the Software, and to permit persons to whom the
11 * Software is furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice (including the next
14 * paragraph) shall be included in all copies or substantial portions of the
15 * Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
23 * SOFTWARE.
24 *
25 * Authors:
26 * Rob Clark <robclark@freedesktop.org>
27 */
28
29 #include <assert.h>
30 #include <err.h>
31 #include <stdint.h>
32 #include <stdio.h>
33 #include <stdlib.h>
34 #include <string.h>
35
36 #include "rnnutil.h"
37
38 static struct rnndomain *
finddom(struct rnn * rnn,uint32_t regbase)39 finddom(struct rnn *rnn, uint32_t regbase)
40 {
41 if (rnndec_checkaddr(rnn->vc, rnn->dom[0], regbase, 0))
42 return rnn->dom[0];
43 return rnn->dom[1];
44 }
45
46 void
_rnn_init(struct rnn * rnn,int nocolor)47 _rnn_init(struct rnn *rnn, int nocolor)
48 {
49 rnn_init();
50
51 rnn->db = rnn_newdb();
52 rnn->vc_nocolor = rnndec_newcontext(rnn->db);
53 rnn->vc_nocolor->colors = &envy_null_colors;
54 if (nocolor) {
55 rnn->vc = rnn->vc_nocolor;
56 } else {
57 rnn->vc = rnndec_newcontext(rnn->db);
58 rnn->vc->colors = &envy_def_colors;
59 }
60 }
61
62 struct rnn *
rnn_new(int nocolor)63 rnn_new(int nocolor)
64 {
65 struct rnn *rnn = calloc(sizeof(*rnn), 1);
66
67 if (!rnn)
68 return NULL;
69
70 _rnn_init(rnn, nocolor);
71
72 return rnn;
73 }
74
75 static void
init(struct rnn * rnn,char * file,char * domain,char * variant)76 init(struct rnn *rnn, char *file, char *domain, char *variant)
77 {
78 /* prepare rnn stuff for lookup */
79 rnn_parsefile(rnn->db, file);
80 rnn_prepdb(rnn->db);
81 rnn->dom[0] = rnn_finddomain(rnn->db, domain);
82 if ((strcmp(domain, "A2XX") == 0) || (strcmp(domain, "A3XX") == 0)) {
83 rnn->dom[1] = rnn_finddomain(rnn->db, "AXXX");
84 } else {
85 rnn->dom[1] = rnn->dom[0];
86 }
87 if (!rnn->dom[0] && rnn->dom[1]) {
88 fprintf(stderr, "Could not find domain %s in %s\n", domain, file);
89 }
90 rnn->variant = variant;
91
92 rnndec_varadd(rnn->vc, "chip", variant);
93 if (rnn->vc != rnn->vc_nocolor)
94 rnndec_varadd(rnn->vc_nocolor, "chip", variant);
95 if (rnn->db->estatus)
96 errx(rnn->db->estatus, "failed to parse register database");
97 }
98
99 void
rnn_load_file(struct rnn * rnn,char * file,char * domain)100 rnn_load_file(struct rnn *rnn, char *file, char *domain)
101 {
102 init(rnn, file, domain, domain);
103 }
104
105 void
rnn_load(struct rnn * rnn,const char * gpuname)106 rnn_load(struct rnn *rnn, const char *gpuname)
107 {
108 if (strstr(gpuname, "a2")) {
109 init(rnn, "adreno/a2xx.xml", "A2XX", "A2XX");
110 } else if (strstr(gpuname, "a3")) {
111 init(rnn, "adreno/a3xx.xml", "A3XX", "A3XX");
112 } else if (strstr(gpuname, "a4")) {
113 init(rnn, "adreno/a4xx.xml", "A4XX", "A4XX");
114 } else if (strstr(gpuname, "a5")) {
115 init(rnn, "adreno/a5xx.xml", "A5XX", "A5XX");
116 } else if (strstr(gpuname, "a6")) {
117 init(rnn, "adreno/a6xx.xml", "A6XX", "A6XX");
118 } else if (strstr(gpuname, "a7")) {
119 init(rnn, "adreno/a6xx.xml", "A6XX", "A7XX");
120 }
121 }
122
123 uint32_t
rnn_regbase(struct rnn * rnn,const char * name)124 rnn_regbase(struct rnn *rnn, const char *name)
125 {
126 uint32_t regbase = rnndec_decodereg(rnn->vc_nocolor, rnn->dom[0], name);
127 if (!regbase)
128 regbase = rnndec_decodereg(rnn->vc_nocolor, rnn->dom[1], name);
129 return regbase;
130 }
131
132 const char *
rnn_regname(struct rnn * rnn,uint32_t regbase,int color)133 rnn_regname(struct rnn *rnn, uint32_t regbase, int color)
134 {
135 static char buf[128];
136 struct rnndecaddrinfo *info;
137
138 info = rnndec_decodeaddr(color ? rnn->vc : rnn->vc_nocolor,
139 finddom(rnn, regbase), regbase, 0);
140 if (info) {
141 strcpy(buf, info->name);
142 free(info->name);
143 free(info);
144 return buf;
145 }
146 return NULL;
147 }
148
149 /* call rnn_reginfo_free() to free the result */
150 struct rnndecaddrinfo *
rnn_reginfo(struct rnn * rnn,uint32_t regbase)151 rnn_reginfo(struct rnn *rnn, uint32_t regbase)
152 {
153 return rnndec_decodeaddr(rnn->vc, finddom(rnn, regbase), regbase, 0);
154 }
155
156 void
rnn_reginfo_free(struct rnndecaddrinfo * info)157 rnn_reginfo_free(struct rnndecaddrinfo *info)
158 {
159 if (!info)
160 return;
161 free(info->name);
162 free(info);
163 }
164
165 const char *
rnn_enumname(struct rnn * rnn,const char * name,uint32_t val)166 rnn_enumname(struct rnn *rnn, const char *name, uint32_t val)
167 {
168 return rnndec_decode_enum(rnn->vc, name, val);
169 }
170
171 static struct rnndelem *
regelem(struct rnndomain * domain,const char * name)172 regelem(struct rnndomain *domain, const char *name)
173 {
174 int i;
175 for (i = 0; i < domain->subelemsnum; i++) {
176 struct rnndelem *elem = domain->subelems[i];
177 if (!strcmp(elem->name, name))
178 return elem;
179 }
180 return NULL;
181 }
182
183 /* Lookup rnndelem by name: */
184 struct rnndelem *
rnn_regelem(struct rnn * rnn,const char * name)185 rnn_regelem(struct rnn *rnn, const char *name)
186 {
187 struct rnndelem *elem = regelem(rnn->dom[0], name);
188 if (elem)
189 return elem;
190 return regelem(rnn->dom[1], name);
191 }
192
193 static struct rnndelem *
regoff(struct rnndomain * domain,uint32_t offset)194 regoff(struct rnndomain *domain, uint32_t offset)
195 {
196 int i;
197 for (i = 0; i < domain->subelemsnum; i++) {
198 struct rnndelem *elem = domain->subelems[i];
199 if (elem->offset == offset)
200 return elem;
201 }
202 return NULL;
203 }
204
205 /* Lookup rnndelem by offset: */
206 struct rnndelem *
rnn_regoff(struct rnn * rnn,uint32_t offset)207 rnn_regoff(struct rnn *rnn, uint32_t offset)
208 {
209 struct rnndelem *elem = regoff(rnn->dom[0], offset);
210 if (elem)
211 return elem;
212 return regoff(rnn->dom[1], offset);
213 }
214
215 enum rnnttype
rnn_decodelem(struct rnn * rnn,struct rnntypeinfo * info,uint64_t regval,union rnndecval * val)216 rnn_decodelem(struct rnn *rnn, struct rnntypeinfo *info, uint64_t regval,
217 union rnndecval *val)
218 {
219 val->u = regval;
220 switch (info->type) {
221 case RNN_TTYPE_INLINE_ENUM:
222 case RNN_TTYPE_ENUM:
223 case RNN_TTYPE_HEX:
224 case RNN_TTYPE_INT:
225 case RNN_TTYPE_UINT:
226 case RNN_TTYPE_FLOAT:
227 case RNN_TTYPE_BOOLEAN:
228 return info->type;
229 case RNN_TTYPE_FIXED:
230 case RNN_TTYPE_UFIXED:
231 /* TODO */
232 default:
233 return RNN_TTYPE_INVALID;
234 }
235 }
236