src/broadcom/clif/clif_dump.c

   1 /*
   2  * Copyright © 2016 Broadcom
   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 <stdlib.h>
  26 #include <string.h>
  27 #include "clif_dump.h"
  28 #include "clif_private.h"
  29 #include "util/list.h"
  30 #include "util/ralloc.h"
  31
  32 #include "broadcom/cle/v3d_decoder.h"
  33
  34 struct reloc_worklist_entry *
  35 clif_dump_add_address_to_worklist(struct clif_dump *clif,
  36                                   enum reloc_worklist_type type,
  37                                   uint32_t addr)
  38 {
  39         struct reloc_worklist_entry *entry =
  40                 rzalloc(clif, struct reloc_worklist_entry);
  41         if (!entry)
  42                 return NULL;
  43
  44         entry->type = type;
  45         entry->addr = addr;
  46
  47         list_addtail(&entry->link, &clif->worklist);
  48
  49         return entry;
  50 }
  51
  52 struct clif_dump *
  53 clif_dump_init(const struct v3d_device_info *devinfo,
  54                FILE *out)
  55 {
  56         struct clif_dump *clif = rzalloc(NULL, struct clif_dump);
  57
  58         clif->devinfo = devinfo;
  59         clif->out = out;
  60         clif->spec = v3d_spec_load(devinfo);
  61
  62         list_inithead(&clif->worklist);
  63
  64         return clif;
  65 }
  66
  67 void
  68 clif_dump_destroy(struct clif_dump *clif)
  69 {
  70         ralloc_free(clif);
  71 }
  72
  73 static bool
  74 clif_lookup_vaddr(struct clif_dump *clif, uint32_t addr, void **vaddr)
  75 {
  76         for (int i = 0; i < clif->bo_count; i++) {
  77                 struct clif_bo *bo = &clif->bo[i];
  78
  79                 if (addr >= bo->offset &&
  80                     addr < bo->offset + bo->size) {
  81                         *vaddr = bo->vaddr + addr - bo->offset;
  82                         return true;
  83                 }
  84         }
  85
  86         return false;
  87 }
  88
  89 #define out_uint(_clif, field) out(_clif, "    /* %s = */ %u\n",        \
  90                             #field,  values-> field);
  91
  92 static bool
  93 clif_dump_packet(struct clif_dump *clif, uint32_t offset, const uint8_t *cl,
  94                  uint32_t *size)
  95 {
  96         if (clif->devinfo->ver >= 41)
  97                 return v3d41_clif_dump_packet(clif, offset, cl, size);
  98         else
  99                 return v3d33_clif_dump_packet(clif, offset, cl, size);
 100 }
 101
 102 static void
 103 clif_dump_cl(struct clif_dump *clif, uint32_t start, uint32_t end)
 104 {
 105         void *start_vaddr;
 106         if (!clif_lookup_vaddr(clif, start, &start_vaddr)) {
 107                 out(clif, "Failed to look up address 0x%08x\n",
 108                     start);
 109                 return;
 110         }
 111
 112         /* The end address is optional (for example, a BRANCH instruction
 113          * won't set an end), but is used for BCL/RCL termination.
 114          */
 115         void *end_vaddr = NULL;
 116         if (end && !clif_lookup_vaddr(clif, end, &end_vaddr)) {
 117                 out(clif, "Failed to look up address 0x%08x\n",
 118                     end);
 119                 return;
 120         }
 121
 122         uint32_t size;
 123         uint8_t *cl = start_vaddr;
 124         while (clif_dump_packet(clif, start, cl, &size)) {
 125                 cl += size;
 126                 start += size;
 127
 128                 if (cl == end_vaddr)
 129                         break;
 130         }
 131 }
 132
 133 static void
 134 clif_dump_gl_shader_state_record(struct clif_dump *clif,
 135                                  struct reloc_worklist_entry *reloc,
 136                                  void *vaddr)
 137 {
 138         struct v3d_group *state = v3d_spec_find_struct(clif->spec,
 139                                                        "GL Shader State Record");
 140         struct v3d_group *attr = v3d_spec_find_struct(clif->spec,
 141                                                       "GL Shader State Attribute Record");
 142         assert(state);
 143         assert(attr);
 144
 145         out(clif, "GL Shader State Record at 0x%08x\n", reloc->addr);
 146         v3d_print_group(clif, state, 0, vaddr, "");
 147         vaddr += v3d_group_get_length(state);
 148
 149         for (int i = 0; i < reloc->shader_state.num_attrs; i++) {
 150                 out(clif, "  Attribute %d\n", i);
 151                 v3d_print_group(clif, attr, 0, vaddr, "");
 152                 vaddr += v3d_group_get_length(attr);
 153         }
 154 }
 155
 156 static void
 157 clif_process_worklist(struct clif_dump *clif)
 158 {
 159         while (!list_empty(&clif->worklist)) {
 160                 struct reloc_worklist_entry *reloc =
 161                         list_first_entry(&clif->worklist,
 162                                          struct reloc_worklist_entry, link);
 163                 list_del(&reloc->link);
 164
 165                 void *vaddr;
 166                 if (!clif_lookup_vaddr(clif, reloc->addr, &vaddr)) {
 167                         out(clif, "Failed to look up address 0x%08x\n",
 168                             reloc->addr);
 169                         continue;
 170                 }
 171
 172                 switch (reloc->type) {
 173                 case reloc_gl_shader_state:
 174                         clif_dump_gl_shader_state_record(clif,
 175                                                          reloc,
 176                                                          vaddr);
 177                         break;
 178                 case reloc_generic_tile_list:
 179                         clif_dump_cl(clif, reloc->addr,
 180                                      reloc->generic_tile_list.end);
 181                         break;
 182                 }
 183                 out(clif, "\n");
 184         }
 185 }
 186
 187 void
 188 clif_dump_add_cl(struct clif_dump *clif, uint32_t start, uint32_t end)
 189 {
 190         clif_dump_cl(clif, start, end);
 191         out(clif, "\n");
 192
 193         clif_process_worklist(clif);
 194 }
 195
 196 void
 197 clif_dump_add_bo(struct clif_dump *clif, const char *name,
 198                  uint32_t offset, uint32_t size, void *vaddr)
 199 {
 200         if (clif->bo_count >= clif->bo_array_size) {
 201                 clif->bo_array_size = MAX2(4, clif->bo_array_size * 2);
 202                 clif->bo = reralloc(clif, clif->bo, struct clif_bo,
 203                                     clif->bo_array_size);
 204         }
 205
 206         clif->bo[clif->bo_count].name = ralloc_strdup(clif, name);
 207         clif->bo[clif->bo_count].offset = offset;
 208         clif->bo[clif->bo_count].size = size;
 209         clif->bo[clif->bo_count].vaddr = vaddr;
 210         clif->bo_count++;
 211 }