intel/tools: new i965_disasm tool

Adds a new i965 instruction disassemble tool

v2: 1) fix a few nits (Matt Turner)
    2) Remove i965_disasm header (Matt Turner)

v3: 1) Redirect output to correct file descriptors (Matt Turner)
    2) Refactor code (Matt Turner)
    3) Use better formatting style (Matt Turner)

Reviewed-by: Matt Turner <mattst88@gmail.com>
Signed-off-by: Sagar Ghuge <sagar.ghuge@intel.com>

3 files changed, 207 insertions, 0 deletions

diff --git a/src/intel/Makefile.tools.am b/src/intel/Makefile.tools.am
index 30c8d3b3f7d..4809962b188 100644
--- a/src/intel/Makefile.tools.am
+++ b/src/intel/Makefile.tools.am
@@ -22,6 +22,7 @@
 noinst_PROGRAMS += \
 	tools/aubinator \
 	tools/aubinator_error_decode \
+	tools/i965_disasm \
 	tools/error2aub
 
 
@@ -66,6 +67,19 @@ tools_aubinator_error_decode_CFLAGS = \
 	$(AM_CFLAGS) \
 	$(ZLIB_CFLAGS)
 
+tools_i965_disasm_SOURCES = \
+	tools/i965_disasm.c
+
+tools_i965_disasm_LDADD = \
+	common/libintel_common.la \
+	compiler/libintel_compiler.la \
+	dev/libintel_dev.la \
+	$(top_builddir)/src/util/libmesautil.la \
+	$(PTHREAD_LIBS)
+
+tools_i965_disasm_CFLAGS = \
+	$(AM_CFLAGS)
+
 
 tools_error2aub_SOURCES = \
 	tools/gen_context.h \
diff --git a/src/intel/tools/i965_disasm.c b/src/intel/tools/i965_disasm.c
new file mode 100644
index 00000000000..73a6760fc13
--- /dev/null
+++ b/src/intel/tools/i965_disasm.c
@@ -0,0 +1,182 @@
+/*
+ * Copyright © 2018 Intel Corporation
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * the rights to use, copy, modify, merge, publish, distribute, sublicense,
+ * and/or sell copies of the Software, and to permit persons to whom the
+ * Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice (including the next
+ * paragraph) shall be included in all copies or substantial portions of the
+ * Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
+ * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+ * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
+ * IN THE SOFTWARE.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <getopt.h>
+
+#include "compiler/brw_eu.h"
+#include "dev/gen_device_info.h"
+
+uint64_t INTEL_DEBUG;
+
+/* Return size of file in bytes pointed by fp */
+static size_t
+i965_disasm_get_file_size(FILE *fp)
+{
+   size_t size;
+
+   fseek(fp, 0L, SEEK_END);
+   size = ftell(fp);
+   fseek(fp, 0L, SEEK_SET);
+
+   return size;
+}
+
+static void *
+i965_disasm_read_binary(FILE *fp, size_t *end)
+{
+   void *assembly;
+
+   *end = i965_disasm_get_file_size(fp);
+
+   assembly = malloc(*end + 1);
+   if (assembly == NULL)
+      return NULL;
+
+   fread(assembly, *end, 1, fp);
+   fclose(fp);
+
+   return assembly;
+}
+
+static struct gen_device_info *
+i965_disasm_init(uint16_t pci_id)
+{
+   struct gen_device_info *devinfo;
+
+   devinfo = malloc(sizeof *devinfo);
+   if (devinfo == NULL)
+      return NULL;
+
+   if (!gen_get_device_info(pci_id, devinfo)) {
+      fprintf(stderr, "can't find device information: pci_id=0x%x\n",
+              pci_id);
+      exit(EXIT_FAILURE);
+   }
+
+   /* initialize compaction table in order to handle compacted instructions */
+   brw_init_compaction_tables(devinfo);
+
+   return devinfo;
+}
+
+static void
+print_help(const char *progname, FILE *file)
+{
+   fprintf(file,
+           "Usage: %s [OPTION]...\n"
+           "Disassemble i965 instructions from binary file.\n\n"
+           "      --help             display this help and exit\n"
+           "      --binary-path=PATH read binary file from binary file PATH\n"
+           "      --gen=platform     disassemble instructions for given \n"
+           "                         platform (3 letter platform name)\n",
+           progname);
+}
+
+int main(int argc, char *argv[])
+{
+   FILE *fp = NULL;
+   void *assembly = NULL;
+   char *binary_path = NULL;
+   size_t start = 0, end = 0;
+   uint16_t pci_id = 0;
+   int c, i;
+   struct gen_device_info *devinfo;
+
+   bool help = false;
+   const struct option i965_disasm_opts[] = {
+      { "help",          no_argument,       (int *) &help,      true },
+      { "binary-path",   required_argument, NULL,               'b' },
+      { "gen",           required_argument, NULL,               'g'},
+      { NULL,            0,                 NULL,                0 }
+   };
+
+   i = 0;
+   while ((c = getopt_long(argc, argv, "", i965_disasm_opts, &i)) != -1) {
+      switch (c) {
+      case 'g': {
+         const int id = gen_device_name_to_pci_device_id(optarg);
+         if (id < 0) {
+            fprintf(stderr, "can't parse gen: '%s', expected 3 letter "
+                            "platform name\n", optarg);
+            /* Clean up binary path if given pci id is wrong */
+            if (binary_path) {
+               free(binary_path);
+               fclose(fp);
+            }
+            exit(EXIT_FAILURE);
+         } else {
+            pci_id = id;
+         }
+         break;
+      }
+      case 'b':
+         binary_path = strdup(optarg);
+         fp = fopen(binary_path, "rb");
+         if (!fp) {
+            fprintf(stderr, "Unable to read input binary file : %s\n",
+                    binary_path);
+            /* free binary_path if path is wrong */
+            free(binary_path);
+            exit(EXIT_FAILURE);
+         }
+         break;
+      default:
+         /* Clean up binary path if given option is wrong */
+         if (binary_path) {
+            free(binary_path);
+            fclose(fp);
+         }
+         break;
+      }
+   }
+
+   if (help || !binary_path || !pci_id) {
+      print_help(argv[0], stderr);
+      exit(0);
+   }
+
+   devinfo = i965_disasm_init(pci_id);
+   if (!devinfo) {
+      fprintf(stderr, "Unable to allocate memory for "
+                      "gen_device_info struct instance.\n");
+      exit(EXIT_FAILURE);
+   }
+
+   assembly = i965_disasm_read_binary(fp, &end);
+   if (!assembly) {
+      fprintf(stderr, "Unable to allocate buffer to read binary file\n");
+      exit(EXIT_FAILURE);
+   }
+
+   /* Disassemble i965 instructions from buffer assembly */
+   brw_disassemble(devinfo, assembly, start, end, stdout);
+
+   free(binary_path);
+   free(assembly);
+   free(devinfo);
+
+   return EXIT_SUCCESS;
+}
diff --git a/src/intel/tools/meson.build b/src/intel/tools/meson.build
index 0fe39fa4873..3617478ad73 100644
--- a/src/intel/tools/meson.build
+++ b/src/intel/tools/meson.build
@@ -49,6 +49,17 @@ aubinator_error_decode = executable(
   install : true
 )
 
+i965_disasm = executable(
+  'i965_disasm',
+  files('i965_disasm.c'),
+  dependencies : [dep_thread],
+  include_directories : [inc_common, inc_intel],
+  link_with : [libintel_common, libintel_compiler, libintel_dev, libmesa_util],
+  c_args : [c_vis_args, no_override_init_args],
+  build_by_default : true,
+  install : true
+)
+
 error2aub = executable(
   'intel_error2aub',
   files('aub_write.h', 'aub_write.c', 'error2aub.c'),