projects / mesa.git / blob
? search:


e3327d38542134eff68910d6998b913fb0ffd969
[mesa.git] / src / intel / common / gen_decoder.c
1 /*
2 * Copyright © 2016 Intel Corporation
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
10 *
11 * The above copyright notice and this permission notice (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
13 * Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
21 * IN THE SOFTWARE.
22 */
23
24 #include <stdio.h>
25 #include <stdbool.h>
26 #include <stdint.h>
27 #include <stdarg.h>
28 #include <string.h>
29 #include <expat.h>
30 #include <inttypes.h>
31 #include <zlib.h>
32
33 #include <util/macros.h>
34
35 #include "gen_decoder.h"
36
37 #include "genxml/genX_xml.h"
38
39 #define XML_BUFFER_SIZE 4096
40
41 #define MAKE_GEN(major, minor) ( ((major) << 8) | (minor) )
42
43 struct gen_spec {
44 uint32_t gen;
45
46 int ncommands;
47 struct gen_group *commands[256];
48 int nstructs;
49 struct gen_group *structs[256];
50 int nregisters;
51 struct gen_group *registers[256];
52 int nenums;
53 struct gen_enum *enums[256];
54 };
55
56 struct location {
57 const char *filename;
58 int line_number;
59 };
60
61 struct parser_context {
62 XML_Parser parser;
63 int foo;
64 struct location loc;
65 const char *platform;
66
67 struct gen_group *group;
68 struct gen_enum *enoom;
69
70 int nfields;
71 struct gen_field *fields[128];
72
73 int nvalues;
74 struct gen_value *values[256];
75
76 struct gen_spec *spec;
77 };
78
79 const char *
80 gen_group_get_name(struct gen_group *group)
81 {
82 return group->name;
83 }
84
85 uint32_t
86 gen_group_get_opcode(struct gen_group *group)
87 {
88 return group->opcode;
89 }
90
91 struct gen_group *
92 gen_spec_find_struct(struct gen_spec *spec, const char *name)
93 {
94 for (int i = 0; i < spec->nstructs; i++)
95 if (strcmp(spec->structs[i]->name, name) == 0)
96 return spec->structs[i];
97
98 return NULL;
99 }
100
101 struct gen_group *
102 gen_spec_find_register(struct gen_spec *spec, uint32_t offset)
103 {
104 for (int i = 0; i < spec->nregisters; i++)
105 if (spec->registers[i]->register_offset == offset)
106 return spec->registers[i];
107
108 return NULL;
109 }
110
111 struct gen_group *
112 gen_spec_find_register_by_name(struct gen_spec *spec, const char *name)
113 {
114 for (int i = 0; i < spec->nregisters; i++) {
115 if (strcmp(spec->registers[i]->name, name) == 0)
116 return spec->registers[i];
117 }
118
119 return NULL;
120 }
121
122 struct gen_enum *
123 gen_spec_find_enum(struct gen_spec *spec, const char *name)
124 {
125 for (int i = 0; i < spec->nenums; i++)
126 if (strcmp(spec->enums[i]->name, name) == 0)
127 return spec->enums[i];
128
129 return NULL;
130 }
131
132 uint32_t
133 gen_spec_get_gen(struct gen_spec *spec)
134 {
135 return spec->gen;
136 }
137
138 static void __attribute__((noreturn))
139 fail(struct location *loc, const char *msg, ...)
140 {
141 va_list ap;
142
143 va_start(ap, msg);
144 fprintf(stderr, "%s:%d: error: ",
145 loc->filename, loc->line_number);
146 vfprintf(stderr, msg, ap);
147 fprintf(stderr, "\n");
148 va_end(ap);
149 exit(EXIT_FAILURE);
150 }
151
152 static void *
153 fail_on_null(void *p)
154 {
155 if (p == NULL) {
156 fprintf(stderr, "aubinator: out of memory\n");
157 exit(EXIT_FAILURE);
158 }
159
160 return p;
161 }
162
163 static char *
164 xstrdup(const char *s)
165 {
166 return fail_on_null(strdup(s));
167 }
168
169 static void *
170 zalloc(size_t s)
171 {
172 return calloc(s, 1);
173 }
174
175 static void *
176 xzalloc(size_t s)
177 {
178 return fail_on_null(zalloc(s));
179 }
180
181 static struct gen_group *
182 create_group(struct parser_context *ctx, const char *name, const char **atts)
183 {
184 struct gen_group *group;
185
186 group = xzalloc(sizeof(*group));
187 if (name)
188 group->name = xstrdup(name);
189
190 group->spec = ctx->spec;
191 group->group_offset = 0;
192 group->group_count = 0;
193
194 return group;
195 }
196
197 static struct gen_enum *
198 create_enum(struct parser_context *ctx, const char *name, const char **atts)
199 {
200 struct gen_enum *e;
201
202 e = xzalloc(sizeof(*e));
203 if (name)
204 e->name = xstrdup(name);
205
206 e->nvalues = 0;
207
208 return e;
209 }
210
211 static void
212 get_group_offset_count(struct parser_context *ctx, const char *name,
213 const char **atts, uint32_t *offset, uint32_t *count)
214 {
215 char *p;
216 int i;
217
218 for (i = 0; atts[i]; i += 2) {
219 if (strcmp(atts[i], "count") == 0)
220 *count = strtoul(atts[i + 1], &p, 0);
221 else if (strcmp(atts[i], "start") == 0)
222 *offset = strtoul(atts[i + 1], &p, 0);
223 }
224 return;
225 }
226
227 static void
228 get_register_offset(const char **atts, uint32_t *offset)
229 {
230 char *p;
231 int i;
232
233 for (i = 0; atts[i]; i += 2) {
234 if (strcmp(atts[i], "num") == 0)
235 *offset = strtoul(atts[i + 1], &p, 0);
236 }
237 return;
238 }
239
240 static void
241 get_start_end_pos(int *start, int *end)
242 {
243 /* start value has to be mod with 32 as we need the relative
244 * start position in the first DWord. For the end position, add
245 * the length of the field to the start position to get the
246 * relative postion in the 64 bit address.
247 */
248 if (*end - *start > 32) {
249 int len = *end - *start;
250 *start = *start % 32;
251 *end = *start + len;
252 } else {
253 *start = *start % 32;
254 *end = *end % 32;
255 }
256
257 return;
258 }
259
260 static inline uint64_t
261 mask(int start, int end)
262 {
263 uint64_t v;
264
265 v = ~0ULL >> (63 - end + start);
266
267 return v << start;
268 }
269
270 static inline uint64_t
271 field(uint64_t value, int start, int end)
272 {
273 get_start_end_pos(&start, &end);
274 return (value & mask(start, end)) >> (start);
275 }
276
277 static inline uint64_t
278 field_address(uint64_t value, int start, int end)
279 {
280 /* no need to right shift for address/offset */
281 get_start_end_pos(&start, &end);
282 return (value & mask(start, end));
283 }
284
285 static struct gen_type
286 string_to_type(struct parser_context *ctx, const char *s)
287 {
288 int i, f;
289 struct gen_group *g;
290 struct gen_enum *e;
291
292 if (strcmp(s, "int") == 0)
293 return (struct gen_type) { .kind = GEN_TYPE_INT };
294 else if (strcmp(s, "uint") == 0)
295 return (struct gen_type) { .kind = GEN_TYPE_UINT };
296 else if (strcmp(s, "bool") == 0)
297 return (struct gen_type) { .kind = GEN_TYPE_BOOL };
298 else if (strcmp(s, "float") == 0)
299 return (struct gen_type) { .kind = GEN_TYPE_FLOAT };
300 else if (strcmp(s, "address") == 0)
301 return (struct gen_type) { .kind = GEN_TYPE_ADDRESS };
302 else if (strcmp(s, "offset") == 0)
303 return (struct gen_type) { .kind = GEN_TYPE_OFFSET };
304 else if (sscanf(s, "u%d.%d", &i, &f) == 2)
305 return (struct gen_type) { .kind = GEN_TYPE_UFIXED, .i = i, .f = f };
306 else if (sscanf(s, "s%d.%d", &i, &f) == 2)
307 return (struct gen_type) { .kind = GEN_TYPE_SFIXED, .i = i, .f = f };
308 else if (g = gen_spec_find_struct(ctx->spec, s), g != NULL)
309 return (struct gen_type) { .kind = GEN_TYPE_STRUCT, .gen_struct = g };
310 else if (e = gen_spec_find_enum(ctx->spec, s), e != NULL)
311 return (struct gen_type) { .kind = GEN_TYPE_ENUM, .gen_enum = e };
312 else if (strcmp(s, "mbo") == 0)
313 return (struct gen_type) { .kind = GEN_TYPE_MBO };
314 else
315 fail(&ctx->loc, "invalid type: %s", s);
316 }
317
318 static struct gen_field *
319 create_field(struct parser_context *ctx, const char **atts)
320 {
321 struct gen_field *field;
322 char *p;
323 int i;
324
325 field = xzalloc(sizeof(*field));
326
327 for (i = 0; atts[i]; i += 2) {
328 if (strcmp(atts[i], "name") == 0)
329 field->name = xstrdup(atts[i + 1]);
330 else if (strcmp(atts[i], "start") == 0)
331 field->start = ctx->group->group_offset+strtoul(atts[i + 1], &p, 0);
332 else if (strcmp(atts[i], "end") == 0) {
333 field->end = ctx->group->group_offset+strtoul(atts[i + 1], &p, 0);
334 if (ctx->group->group_offset)
335 ctx->group->group_offset = field->end+1;
336 } else if (strcmp(atts[i], "type") == 0)
337 field->type = string_to_type(ctx, atts[i + 1]);
338 else if (strcmp(atts[i], "default") == 0 &&
339 field->start >= 16 && field->end <= 31) {
340 field->has_default = true;
341 field->default_value = strtoul(atts[i + 1], &p, 0);
342 }
343 }
344
345 return field;
346 }
347
348 static struct gen_value *
349 create_value(struct parser_context *ctx, const char **atts)
350 {
351 struct gen_value *value = xzalloc(sizeof(*value));
352
353 for (int i = 0; atts[i]; i += 2) {
354 if (strcmp(atts[i], "name") == 0)
355 value->name = xstrdup(atts[i + 1]);
356 else if (strcmp(atts[i], "value") == 0)
357 value->value = strtoul(atts[i + 1], NULL, 0);
358 }
359
360 return value;
361 }
362
363 static void
364 start_element(void *data, const char *element_name, const char **atts)
365 {
366 struct parser_context *ctx = data;
367 int i;
368 const char *name = NULL;
369 const char *gen = NULL;
370
371 ctx->loc.line_number = XML_GetCurrentLineNumber(ctx->parser);
372
373 for (i = 0; atts[i]; i += 2) {
374 if (strcmp(atts[i], "name") == 0)
375 name = atts[i + 1];
376 else if (strcmp(atts[i], "gen") == 0)
377 gen = atts[i + 1];
378 }
379
380 if (strcmp(element_name, "genxml") == 0) {
381 if (name == NULL)
382 fail(&ctx->loc, "no platform name given");
383 if (gen == NULL)
384 fail(&ctx->loc, "no gen given");
385
386 ctx->platform = xstrdup(name);
387 int major, minor;
388 int n = sscanf(gen, "%d.%d", &major, &minor);
389 if (n == 0)
390 fail(&ctx->loc, "invalid gen given: %s", gen);
391 if (n == 1)
392 minor = 0;
393
394 ctx->spec->gen = MAKE_GEN(major, minor);
395 } else if (strcmp(element_name, "instruction") == 0 ||
396 strcmp(element_name, "struct") == 0) {
397 ctx->group = create_group(ctx, name, atts);
398 } else if (strcmp(element_name, "register") == 0) {
399 ctx->group = create_group(ctx, name, atts);
400 get_register_offset(atts, &ctx->group->register_offset);
401 } else if (strcmp(element_name, "group") == 0) {
402 get_group_offset_count(ctx, name, atts, &ctx->group->group_offset,
403 &ctx->group->group_count);
404 } else if (strcmp(element_name, "field") == 0) {
405 do {
406 ctx->fields[ctx->nfields++] = create_field(ctx, atts);
407 if (ctx->group->group_count)
408 ctx->group->group_count--;
409 } while (ctx->group->group_count > 0);
410 } else if (strcmp(element_name, "enum") == 0) {
411 ctx->enoom = create_enum(ctx, name, atts);
412 } else if (strcmp(element_name, "value") == 0) {
413 ctx->values[ctx->nvalues++] = create_value(ctx, atts);
414 }
415 }
416
417 static void
418 end_element(void *data, const char *name)
419 {
420 struct parser_context *ctx = data;
421 struct gen_spec *spec = ctx->spec;
422
423 if (strcmp(name, "instruction") == 0 ||
424 strcmp(name, "struct") == 0 ||
425 strcmp(name, "register") == 0) {
426 size_t size = ctx->nfields * sizeof(ctx->fields[0]);
427 struct gen_group *group = ctx->group;
428
429 group->fields = xzalloc(size);
430 group->nfields = ctx->nfields;
431 memcpy(group->fields, ctx->fields, size);
432 ctx->nfields = 0;
433 ctx->group = NULL;
434
435 for (int i = 0; i < group->nfields; i++) {
436 if (group->fields[i]->start >= 16 &&
437 group->fields[i]->end <= 31 &&
438 group->fields[i]->has_default) {
439 group->opcode_mask |=
440 mask(group->fields[i]->start % 32, group->fields[i]->end % 32);
441 group->opcode |=
442 group->fields[i]->default_value << group->fields[i]->start;
443 }
444 }
445
446 if (strcmp(name, "instruction") == 0)
447 spec->commands[spec->ncommands++] = group;
448 else if (strcmp(name, "struct") == 0)
449 spec->structs[spec->nstructs++] = group;
450 else if (strcmp(name, "register") == 0)
451 spec->registers[spec->nregisters++] = group;
452 } else if (strcmp(name, "group") == 0) {
453 ctx->group->group_offset = 0;
454 ctx->group->group_count = 0;
455 } else if (strcmp(name, "field") == 0) {
456 assert(ctx->nfields > 0);
457 struct gen_field *field = ctx->fields[ctx->nfields - 1];
458 size_t size = ctx->nvalues * sizeof(ctx->values[0]);
459 field->inline_enum.values = xzalloc(size);
460 field->inline_enum.nvalues = ctx->nvalues;
461 memcpy(field->inline_enum.values, ctx->values, size);
462 ctx->nvalues = 0;
463 } else if (strcmp(name, "enum") == 0) {
464 struct gen_enum *e = ctx->enoom;
465 size_t size = ctx->nvalues * sizeof(ctx->values[0]);
466 e->values = xzalloc(size);
467 e->nvalues = ctx->nvalues;
468 memcpy(e->values, ctx->values, size);
469 ctx->nvalues = 0;
470 ctx->enoom = NULL;
471 spec->enums[spec->nenums++] = e;
472 }
473 }
474
475 static void
476 character_data(void *data, const XML_Char *s, int len)
477 {
478 }
479
480 static int
481 devinfo_to_gen(const struct gen_device_info *devinfo)
482 {
483 int value = 10 * devinfo->gen;
484
485 if (devinfo->is_baytrail || devinfo->is_haswell)
486 value += 5;
487
488 return value;
489 }
490
491 static uint32_t zlib_inflate(const void *compressed_data,
492 uint32_t compressed_len,
493 void **out_ptr)
494 {
495 struct z_stream_s zstream;
496 void *out;
497
498 memset(&zstream, 0, sizeof(zstream));
499
500 zstream.next_in = (unsigned char *)compressed_data;
501 zstream.avail_in = compressed_len;
502
503 if (inflateInit(&zstream) != Z_OK)
504 return 0;
505
506 out = malloc(4096);
507 zstream.next_out = out;
508 zstream.avail_out = 4096;
509
510 do {
511 switch (inflate(&zstream, Z_SYNC_FLUSH)) {
512 case Z_STREAM_END:
513 goto end;
514 case Z_OK:
515 break;
516 default:
517 inflateEnd(&zstream);
518 return 0;
519 }
520
521 if (zstream.avail_out)
522 break;
523
524 out = realloc(out, 2*zstream.total_out);
525 if (out == NULL) {
526 inflateEnd(&zstream);
527 return 0;
528 }
529
530 zstream.next_out = (unsigned char *)out + zstream.total_out;
531 zstream.avail_out = zstream.total_out;
532 } while (1);
533 end:
534 inflateEnd(&zstream);
535 *out_ptr = out;
536 return zstream.total_out;
537 }
538
539 struct gen_spec *
540 gen_spec_load(const struct gen_device_info *devinfo)
541 {
542 struct parser_context ctx;
543 void *buf;
544 uint8_t *text_data;
545 uint32_t text_offset = 0, text_length = 0, total_length;
546 uint32_t gen_10 = devinfo_to_gen(devinfo);
547
548 for (int i = 0; i < ARRAY_SIZE(genxml_files_table); i++) {
549 if (genxml_files_table[i].gen_10 == gen_10) {
550 text_offset = genxml_files_table[i].offset;
551 text_length = genxml_files_table[i].length;
552 break;
553 }
554 }
555
556 if (text_length == 0) {
557 fprintf(stderr, "unable to find gen (%u) data\n", gen_10);
558 return NULL;
559 }
560
561 memset(&ctx, 0, sizeof ctx);
562 ctx.parser = XML_ParserCreate(NULL);
563 XML_SetUserData(ctx.parser, &ctx);
564 if (ctx.parser == NULL) {
565 fprintf(stderr, "failed to create parser\n");
566 return NULL;
567 }
568
569 XML_SetElementHandler(ctx.parser, start_element, end_element);
570 XML_SetCharacterDataHandler(ctx.parser, character_data);
571
572 ctx.spec = xzalloc(sizeof(*ctx.spec));
573
574 total_length = zlib_inflate(compress_genxmls,
575 sizeof(compress_genxmls),
576 (void **) &text_data);
577 assert(text_offset + text_length <= total_length);
578
579 buf = XML_GetBuffer(ctx.parser, text_length);
580 memcpy(buf, &text_data[text_offset], text_length);
581
582 if (XML_ParseBuffer(ctx.parser, text_length, true) == 0) {
583 fprintf(stderr,
584 "Error parsing XML at line %ld col %ld byte %ld/%u: %s\n",
585 XML_GetCurrentLineNumber(ctx.parser),
586 XML_GetCurrentColumnNumber(ctx.parser),
587 XML_GetCurrentByteIndex(ctx.parser), text_length,
588 XML_ErrorString(XML_GetErrorCode(ctx.parser)));
589 XML_ParserFree(ctx.parser);
590 free(text_data);
591 return NULL;
592 }
593
594 XML_ParserFree(ctx.parser);
595 free(text_data);
596
597 return ctx.spec;
598 }
599
600 struct gen_spec *
601 gen_spec_load_from_path(const struct gen_device_info *devinfo,
602 const char *path)
603 {
604 struct parser_context ctx;
605 size_t len, filename_len = strlen(path) + 20;
606 char *filename = malloc(filename_len);
607 void *buf;
608 FILE *input;
609
610 len = snprintf(filename, filename_len, "%s/gen%i.xml",
611 path, devinfo_to_gen(devinfo));
612 assert(len < filename_len);
613
614 input = fopen(filename, "r");
615 if (input == NULL) {
616 fprintf(stderr, "failed to open xml description\n");
617 free(filename);
618 return NULL;
619 }
620
621 memset(&ctx, 0, sizeof ctx);
622 ctx.parser = XML_ParserCreate(NULL);
623 XML_SetUserData(ctx.parser, &ctx);
624 if (ctx.parser == NULL) {
625 fprintf(stderr, "failed to create parser\n");
626 fclose(input);
627 free(filename);
628 return NULL;
629 }
630
631 XML_SetElementHandler(ctx.parser, start_element, end_element);
632 XML_SetCharacterDataHandler(ctx.parser, character_data);
633 ctx.loc.filename = filename;
634 ctx.spec = xzalloc(sizeof(*ctx.spec));
635
636 do {
637 buf = XML_GetBuffer(ctx.parser, XML_BUFFER_SIZE);
638 len = fread(buf, 1, XML_BUFFER_SIZE, input);
639 if (len < 0) {
640 fprintf(stderr, "fread: %m\n");
641 fclose(input);
642 free(filename);
643 return NULL;
644 }
645 if (XML_ParseBuffer(ctx.parser, len, len == 0) == 0) {
646 fprintf(stderr,
647 "Error parsing XML at line %ld col %ld: %s\n",
648 XML_GetCurrentLineNumber(ctx.parser),
649 XML_GetCurrentColumnNumber(ctx.parser),
650 XML_ErrorString(XML_GetErrorCode(ctx.parser)));
651 fclose(input);
652 free(filename);
653 return NULL;
654 }
655 } while (len > 0);
656
657 XML_ParserFree(ctx.parser);
658
659 fclose(input);
660 free(filename);
661
662 return ctx.spec;
663 }
664
665 struct gen_group *
666 gen_spec_find_instruction(struct gen_spec *spec, const uint32_t *p)
667 {
668 for (int i = 0; i < spec->ncommands; i++) {
669 uint32_t opcode = *p & spec->commands[i]->opcode_mask;
670 if (opcode == spec->commands[i]->opcode)
671 return spec->commands[i];
672 }
673
674 return NULL;
675 }
676
677 int
678 gen_group_get_length(struct gen_group *group, const uint32_t *p)
679 {
680 uint32_t h = p[0];
681 uint32_t type = field(h, 29, 31);
682
683 switch (type) {
684 case 0: /* MI */ {
685 uint32_t opcode = field(h, 23, 28);
686 if (opcode < 16)
687 return 1;
688 else
689 return field(h, 0, 7) + 2;
690 break;
691 }
692
693 case 3: /* Render */ {
694 uint32_t subtype = field(h, 27, 28);
695 uint32_t opcode = field(h, 24, 26);
696 switch (subtype) {
697 case 0:
698 if (opcode < 2)
699 return field(h, 0, 7) + 2;
700 else
701 return -1;
702 case 1:
703 if (opcode < 2)
704 return 1;
705 else
706 return -1;
707 case 2: {
708 if (opcode == 0)
709 return field(h, 0, 7) + 2;
710 else if (opcode < 3)
711 return field(h, 0, 15) + 2;
712 else
713 return -1;
714 }
715 case 3:
716 if (opcode < 4)
717 return field(h, 0, 7) + 2;
718 else
719 return -1;
720 }
721 }
722 }
723
724 return -1;
725 }
726
727 void
728 gen_field_iterator_init(struct gen_field_iterator *iter,
729 struct gen_group *group,
730 const uint32_t *p,
731 bool print_colors)
732 {
733 iter->group = group;
734 iter->p = p;
735 iter->i = 0;
736 iter->print_colors = print_colors;
737 }
738
739 static const char *
740 gen_get_enum_name(struct gen_enum *e, uint64_t value)
741 {
742 for (int i = 0; i < e->nvalues; i++) {
743 if (e->values[i]->value == value) {
744 return e->values[i]->name;
745 }
746 }
747 return NULL;
748 }
749
750 bool
751 gen_field_iterator_next(struct gen_field_iterator *iter)
752 {
753 union {
754 uint64_t qw;
755 float f;
756 } v;
757
758 if (iter->i == iter->group->nfields)
759 return false;
760
761 iter->field = iter->group->fields[iter->i++];
762 iter->name = iter->field->name;
763 iter->dword = iter->field->start / 32;
764 iter->struct_desc = NULL;
765
766 if ((iter->field->end - iter->field->start) > 32)
767 v.qw = ((uint64_t) iter->p[iter->dword+1] << 32) | iter->p[iter->dword];
768 else
769 v.qw = iter->p[iter->dword];
770
771 const char *enum_name = NULL;
772
773 switch (iter->field->type.kind) {
774 case GEN_TYPE_UNKNOWN:
775 case GEN_TYPE_INT: {
776 uint64_t value = field(v.qw, iter->field->start, iter->field->end);
777 snprintf(iter->value, sizeof(iter->value), "%"PRId64, value);
778 enum_name = gen_get_enum_name(&iter->field->inline_enum, value);
779 break;
780 }
781 case GEN_TYPE_UINT: {
782 uint64_t value = field(v.qw, iter->field->start, iter->field->end);
783 snprintf(iter->value, sizeof(iter->value), "%"PRIu64, value);
784 enum_name = gen_get_enum_name(&iter->field->inline_enum, value);
785 break;
786 }
787 case GEN_TYPE_BOOL: {
788 const char *true_string =
789 iter->print_colors ? "\e[0;35mtrue\e[0m" : "true";
790 snprintf(iter->value, sizeof(iter->value), "%s",
791 field(v.qw, iter->field->start, iter->field->end) ?
792 true_string : "false");
793 break;
794 }
795 case GEN_TYPE_FLOAT:
796 snprintf(iter->value, sizeof(iter->value), "%f", v.f);
797 break;
798 case GEN_TYPE_ADDRESS:
799 case GEN_TYPE_OFFSET:
800 snprintf(iter->value, sizeof(iter->value), "0x%08"PRIx64,
801 field_address(v.qw, iter->field->start, iter->field->end));
802 break;
803 case GEN_TYPE_STRUCT:
804 snprintf(iter->value, sizeof(iter->value), "<struct %s>",
805 iter->field->type.gen_struct->name);
806 iter->struct_desc =
807 gen_spec_find_struct(iter->group->spec,
808 iter->field->type.gen_struct->name);
809 break;
810 case GEN_TYPE_UFIXED:
811 snprintf(iter->value, sizeof(iter->value), "%f",
812 (float) field(v.qw, iter->field->start,
813 iter->field->end) / (1 << iter->field->type.f));
814 break;
815 case GEN_TYPE_SFIXED:
816 /* FIXME: Sign extend extracted field. */
817 snprintf(iter->value, sizeof(iter->value), "%s", "foo");
818 break;
819 case GEN_TYPE_MBO:
820 break;
821 case GEN_TYPE_ENUM: {
822 uint64_t value = field(v.qw, iter->field->start, iter->field->end);
823 snprintf(iter->value, sizeof(iter->value),
824 "%"PRId64, value);
825 enum_name = gen_get_enum_name(iter->field->type.gen_enum, value);
826 break;
827 }
828 }
829
830 if (enum_name) {
831 int length = strlen(iter->value);
832 snprintf(iter->value + length, sizeof(iter->value) - length,
833 " (%s)", enum_name);
834 }
835
836 return true;
837 }
838
839 static void
840 print_dword_header(FILE *outfile,
841 struct gen_field_iterator *iter, uint64_t offset)
842 {
843 fprintf(outfile, "0x%08"PRIx64": 0x%08x : Dword %d\n",
844 offset + 4 * iter->dword, iter->p[iter->dword], iter->dword);
845 }
846
847 static bool
848 is_header_field(struct gen_group *group, struct gen_field *field)
849 {
850 uint32_t bits;
851
852 if (field->start >= 32)
853 return false;
854
855 bits = (1U << (field->end - field->start + 1)) - 1;
856 bits <<= field->start;
857
858 return (group->opcode_mask & bits) != 0;
859 }
860
861 void
862 gen_print_group(FILE *outfile, struct gen_group *group,
863 uint64_t offset, const uint32_t *p, bool color)
864 {
865 struct gen_field_iterator iter;
866 int last_dword = 0;
867
868 gen_field_iterator_init(&iter, group, p, color);
869 while (gen_field_iterator_next(&iter)) {
870 if (last_dword != iter.dword) {
871 print_dword_header(outfile, &iter, offset);
872 last_dword = iter.dword;
873 }
874 if (!is_header_field(group, iter.field)) {
875 fprintf(outfile, " %s: %s\n", iter.name, iter.value);
876 if (iter.struct_desc) {
877 uint64_t struct_offset = offset + 4 * iter.dword;
878 print_dword_header(outfile, &iter, struct_offset);
879 gen_print_group(outfile, iter.struct_desc, struct_offset,
880 &p[iter.dword], color);
881 }
882 }
883 }
884 }