src/mesa/drivers/dri/i965/brw_disasm.c

   1 /*
   2  * Copyright © 2008 Keith Packard
   3  *
   4  * Permission to use, copy, modify, distribute, and sell this software and its
   5  * documentation for any purpose is hereby granted without fee, provided that
   6  * the above copyright notice appear in all copies and that both that copyright
   7  * notice and this permission notice appear in supporting documentation, and
   8  * that the name of the copyright holders not be used in advertising or
   9  * publicity pertaining to distribution of the software without specific,
  10  * written prior permission.  The copyright holders make no representations
  11  * about the suitability of this software for any purpose.  It is provided "as
  12  * is" without express or implied warranty.
  13  *
  14  * THE COPYRIGHT HOLDERS DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
  15  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
  16  * EVENT SHALL THE COPYRIGHT HOLDERS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
  17  * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
  18  * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
  19  * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE
  20  * OF THIS SOFTWARE.
  21  */
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include <getopt.h>
  27 #include <unistd.h>
  28 #include <stdarg.h>
  29
  30 #include "main/mtypes.h"
  31
  32 #include "brw_context.h"
  33 #include "brw_defines.h"
  34
  35 struct {
  36     char    *name;
  37     int     nsrc;
  38     int     ndst;
  39 } opcode[128] = {
  40     [BRW_OPCODE_MOV] = { .name = "mov", .nsrc = 1, .ndst = 1 },
  41     [BRW_OPCODE_FRC] = { .name = "frc", .nsrc = 1, .ndst = 1 },
  42     [BRW_OPCODE_RNDU] = { .name = "rndu", .nsrc = 1, .ndst = 1 },
  43     [BRW_OPCODE_RNDD] = { .name = "rndd", .nsrc = 1, .ndst = 1 },
  44     [BRW_OPCODE_RNDE] = { .name = "rnde", .nsrc = 1, .ndst = 1 },
  45     [BRW_OPCODE_RNDZ] = { .name = "rndz", .nsrc = 1, .ndst = 1 },
  46     [BRW_OPCODE_NOT] = { .name = "not", .nsrc = 1, .ndst = 1 },
  47     [BRW_OPCODE_LZD] = { .name = "lzd", .nsrc = 1, .ndst = 1 },
  48
  49     [BRW_OPCODE_MUL] = { .name = "mul", .nsrc = 2, .ndst = 1 },
  50     [BRW_OPCODE_MAC] = { .name = "mac", .nsrc = 2, .ndst = 1 },
  51     [BRW_OPCODE_MACH] = { .name = "mach", .nsrc = 2, .ndst = 1 },
  52     [BRW_OPCODE_LINE] = { .name = "line", .nsrc = 2, .ndst = 1 },
  53     [BRW_OPCODE_PLN] = { .name = "pln", .nsrc = 2, .ndst = 1 },
  54     [BRW_OPCODE_SAD2] = { .name = "sad2", .nsrc = 2, .ndst = 1 },
  55     [BRW_OPCODE_SADA2] = { .name = "sada2", .nsrc = 2, .ndst = 1 },
  56     [BRW_OPCODE_DP4] = { .name = "dp4", .nsrc = 2, .ndst = 1 },
  57     [BRW_OPCODE_DPH] = { .name = "dph", .nsrc = 2, .ndst = 1 },
  58     [BRW_OPCODE_DP3] = { .name = "dp3", .nsrc = 2, .ndst = 1 },
  59     [BRW_OPCODE_DP2] = { .name = "dp2", .nsrc = 2, .ndst = 1 },
  60     [BRW_OPCODE_MATH] = { .name = "math", .nsrc = 2, .ndst = 1 },
  61
  62     [BRW_OPCODE_AVG] = { .name = "avg", .nsrc = 2, .ndst = 1 },
  63     [BRW_OPCODE_ADD] = { .name = "add", .nsrc = 2, .ndst = 1 },
  64     [BRW_OPCODE_SEL] = { .name = "sel", .nsrc = 2, .ndst = 1 },
  65     [BRW_OPCODE_AND] = { .name = "and", .nsrc = 2, .ndst = 1 },
  66     [BRW_OPCODE_OR] = { .name = "or", .nsrc = 2, .ndst = 1 },
  67     [BRW_OPCODE_XOR] = { .name = "xor", .nsrc = 2, .ndst = 1 },
  68     [BRW_OPCODE_SHR] = { .name = "shr", .nsrc = 2, .ndst = 1 },
  69     [BRW_OPCODE_SHL] = { .name = "shl", .nsrc = 2, .ndst = 1 },
  70     [BRW_OPCODE_ASR] = { .name = "asr", .nsrc = 2, .ndst = 1 },
  71     [BRW_OPCODE_CMP] = { .name = "cmp", .nsrc = 2, .ndst = 1 },
  72     [BRW_OPCODE_CMPN] = { .name = "cmpn", .nsrc = 2, .ndst = 1 },
  73
  74     [BRW_OPCODE_SEND] = { .name = "send", .nsrc = 1, .ndst = 1 },
  75     [BRW_OPCODE_SENDC] = { .name = "sendc", .nsrc = 1, .ndst = 1 },
  76     [BRW_OPCODE_NOP] = { .name = "nop", .nsrc = 0, .ndst = 0 },
  77     [BRW_OPCODE_JMPI] = { .name = "jmpi", .nsrc = 1, .ndst = 0 },
  78     [BRW_OPCODE_IF] = { .name = "if", .nsrc = 2, .ndst = 0 },
  79     [BRW_OPCODE_IFF] = { .name = "iff", .nsrc = 2, .ndst = 1 },
  80     [BRW_OPCODE_WHILE] = { .name = "while", .nsrc = 2, .ndst = 0 },
  81     [BRW_OPCODE_ELSE] = { .name = "else", .nsrc = 2, .ndst = 0 },
  82     [BRW_OPCODE_BREAK] = { .name = "break", .nsrc = 2, .ndst = 0 },
  83     [BRW_OPCODE_CONTINUE] = { .name = "cont", .nsrc = 1, .ndst = 0 },
  84     [BRW_OPCODE_HALT] = { .name = "halt", .nsrc = 1, .ndst = 0 },
  85     [BRW_OPCODE_MSAVE] = { .name = "msave", .nsrc = 1, .ndst = 1 },
  86     [BRW_OPCODE_PUSH] = { .name = "push", .nsrc = 1, .ndst = 1 },
  87     [BRW_OPCODE_MRESTORE] = { .name = "mrest", .nsrc = 1, .ndst = 1 },
  88     [BRW_OPCODE_POP] = { .name = "pop", .nsrc = 2, .ndst = 0 },
  89     [BRW_OPCODE_WAIT] = { .name = "wait", .nsrc = 1, .ndst = 0 },
  90     [BRW_OPCODE_DO] = { .name = "do", .nsrc = 0, .ndst = 0 },
  91     [BRW_OPCODE_ENDIF] = { .name = "endif", .nsrc = 2, .ndst = 0 },
  92 };
  93
  94 char *conditional_modifier[16] = {
  95     [BRW_CONDITIONAL_NONE] = "",
  96     [BRW_CONDITIONAL_Z] = ".e",
  97     [BRW_CONDITIONAL_NZ] = ".ne",
  98     [BRW_CONDITIONAL_G] = ".g",
  99     [BRW_CONDITIONAL_GE] = ".ge",
 100     [BRW_CONDITIONAL_L] = ".l",
 101     [BRW_CONDITIONAL_LE] = ".le",
 102     [BRW_CONDITIONAL_R] = ".r",
 103     [BRW_CONDITIONAL_O] = ".o",
 104     [BRW_CONDITIONAL_U] = ".u",
 105 };
 106
 107 char *negate[2] = {
 108     [0] = "",
 109     [1] = "-",
 110 };
 111
 112 char *_abs[2] = {
 113     [0] = "",
 114     [1] = "(abs)",
 115 };
 116
 117 char *vert_stride[16] = {
 118     [0] = "0",
 119     [1] = "1",
 120     [2] = "2",
 121     [3] = "4",
 122     [4] = "8",
 123     [5] = "16",
 124     [6] = "32",
 125     [15] = "VxH",
 126 };
 127
 128 char *width[8] = {
 129     [0] = "1",
 130     [1] = "2",
 131     [2] = "4",
 132     [3] = "8",
 133     [4] = "16",
 134 };
 135
 136 char *horiz_stride[4] = {
 137     [0] = "0",
 138     [1] = "1",
 139     [2] = "2",
 140     [3] = "4"
 141 };
 142
 143 char *chan_sel[4] = {
 144     [0] = "x",
 145     [1] = "y",
 146     [2] = "z",
 147     [3] = "w",
 148 };
 149
 150 char *dest_condmod[16] = {
 151 };
 152
 153 char *debug_ctrl[2] = {
 154     [0] = "",
 155     [1] = ".breakpoint"
 156 };
 157
 158 char *saturate[2] = {
 159     [0] = "",
 160     [1] = ".sat"
 161 };
 162
 163 char *accwr[2] = {
 164     [0] = "",
 165     [1] = "AccWrEnable"
 166 };
 167
 168 char *wectrl[2] = {
 169     [0] = "WE_normal",
 170     [1] = "WE_all"
 171 };
 172
 173 char *exec_size[8] = {
 174     [0] = "1",
 175     [1] = "2",
 176     [2] = "4",
 177     [3] = "8",
 178     [4] = "16",
 179     [5] = "32"
 180 };
 181
 182 char *pred_inv[2] = {
 183     [0] = "+",
 184     [1] = "-"
 185 };
 186
 187 char *pred_ctrl_align16[16] = {
 188     [1] = "",
 189     [2] = ".x",
 190     [3] = ".y",
 191     [4] = ".z",
 192     [5] = ".w",
 193     [6] = ".any4h",
 194     [7] = ".all4h",
 195 };
 196
 197 char *pred_ctrl_align1[16] = {
 198     [1] = "",
 199     [2] = ".anyv",
 200     [3] = ".allv",
 201     [4] = ".any2h",
 202     [5] = ".all2h",
 203     [6] = ".any4h",
 204     [7] = ".all4h",
 205     [8] = ".any8h",
 206     [9] = ".all8h",
 207     [10] = ".any16h",
 208     [11] = ".all16h",
 209 };
 210
 211 char *thread_ctrl[4] = {
 212     [0] = "",
 213     [2] = "switch"
 214 };
 215
 216 char *compr_ctrl[4] = {
 217     [0] = "",
 218     [1] = "sechalf",
 219     [2] = "compr",
 220     [3] = "compr4",
 221 };
 222
 223 char *dep_ctrl[4] = {
 224     [0] = "",
 225     [1] = "NoDDClr",
 226     [2] = "NoDDChk",
 227     [3] = "NoDDClr,NoDDChk",
 228 };
 229
 230 char *mask_ctrl[4] = {
 231     [0] = "",
 232     [1] = "nomask",
 233 };
 234
 235 char *access_mode[2] = {
 236     [0] = "align1",
 237     [1] = "align16",
 238 };
 239
 240 char *reg_encoding[8] = {
 241     [0] = "UD",
 242     [1] = "D",
 243     [2] = "UW",
 244     [3] = "W",
 245     [4] = "UB",
 246     [5] = "B",
 247     [7] = "F"
 248 };
 249
 250 int reg_type_size[8] = {
 251     [0] = 4,
 252     [1] = 4,
 253     [2] = 2,
 254     [3] = 2,
 255     [4] = 1,
 256     [5] = 1,
 257     [7] = 4
 258 };
 259
 260 char *imm_encoding[8] = {
 261     [0] = "UD",
 262     [1] = "D",
 263     [2] = "UW",
 264     [3] = "W",
 265     [5] = "VF",
 266     [6] = "V",
 267     [7] = "F"
 268 };
 269
 270 char *reg_file[4] = {
 271     [0] = "A",
 272     [1] = "g",
 273     [2] = "m",
 274     [3] = "imm",
 275 };
 276
 277 char *writemask[16] = {
 278     [0x0] = ".",
 279     [0x1] = ".x",
 280     [0x2] = ".y",
 281     [0x3] = ".xy",
 282     [0x4] = ".z",
 283     [0x5] = ".xz",
 284     [0x6] = ".yz",
 285     [0x7] = ".xyz",
 286     [0x8] = ".w",
 287     [0x9] = ".xw",
 288     [0xa] = ".yw",
 289     [0xb] = ".xyw",
 290     [0xc] = ".zw",
 291     [0xd] = ".xzw",
 292     [0xe] = ".yzw",
 293     [0xf] = "",
 294 };
 295
 296 char *end_of_thread[2] = {
 297     [0] = "",
 298     [1] = "EOT"
 299 };
 300
 301 char *target_function[16] = {
 302     [BRW_MESSAGE_TARGET_NULL] = "null",
 303     [BRW_MESSAGE_TARGET_MATH] = "math",
 304     [BRW_MESSAGE_TARGET_SAMPLER] = "sampler",
 305     [BRW_MESSAGE_TARGET_GATEWAY] = "gateway",
 306     [BRW_MESSAGE_TARGET_DATAPORT_READ] = "read",
 307     [BRW_MESSAGE_TARGET_DATAPORT_WRITE] = "write",
 308     [BRW_MESSAGE_TARGET_URB] = "urb",
 309     [BRW_MESSAGE_TARGET_THREAD_SPAWNER] = "thread_spawner"
 310 };
 311
 312 char *math_function[16] = {
 313     [BRW_MATH_FUNCTION_INV] = "inv",
 314     [BRW_MATH_FUNCTION_LOG] = "log",
 315     [BRW_MATH_FUNCTION_EXP] = "exp",
 316     [BRW_MATH_FUNCTION_SQRT] = "sqrt",
 317     [BRW_MATH_FUNCTION_RSQ] = "rsq",
 318     [BRW_MATH_FUNCTION_SIN] = "sin",
 319     [BRW_MATH_FUNCTION_COS] = "cos",
 320     [BRW_MATH_FUNCTION_SINCOS] = "sincos",
 321     [BRW_MATH_FUNCTION_TAN] = "tan",
 322     [BRW_MATH_FUNCTION_POW] = "pow",
 323     [BRW_MATH_FUNCTION_INT_DIV_QUOTIENT_AND_REMAINDER] = "intdivmod",
 324     [BRW_MATH_FUNCTION_INT_DIV_QUOTIENT] = "intmod",
 325     [BRW_MATH_FUNCTION_INT_DIV_REMAINDER] = "intdiv",
 326 };
 327
 328 char *math_saturate[2] = {
 329     [0] = "",
 330     [1] = "sat"
 331 };
 332
 333 char *math_signed[2] = {
 334     [0] = "",
 335     [1] = "signed"
 336 };
 337
 338 char *math_scalar[2] = {
 339     [0] = "",
 340     [1] = "scalar"
 341 };
 342
 343 char *math_precision[2] = {
 344     [0] = "",
 345     [1] = "partial_precision"
 346 };
 347
 348 char *urb_opcode[2] = {
 349     [0] = "urb_write",
 350     [1] = "ff_sync",
 351 };
 352
 353 char *urb_swizzle[4] = {
 354     [BRW_URB_SWIZZLE_NONE] = "",
 355     [BRW_URB_SWIZZLE_INTERLEAVE] = "interleave",
 356     [BRW_URB_SWIZZLE_TRANSPOSE] = "transpose",
 357 };
 358
 359 char *urb_allocate[2] = {
 360     [0] = "",
 361     [1] = "allocate"
 362 };
 363
 364 char *urb_used[2] = {
 365     [0] = "",
 366     [1] = "used"
 367 };
 368
 369 char *urb_complete[2] = {
 370     [0] = "",
 371     [1] = "complete"
 372 };
 373
 374 char *sampler_target_format[4] = {
 375     [0] = "F",
 376     [2] = "UD",
 377     [3] = "D"
 378 };
 379
 380
 381 static int column;
 382
 383 static int string (FILE *file, char *string)
 384 {
 385     fputs (string, file);
 386     column += strlen (string);
 387     return 0;
 388 }
 389
 390 static int format (FILE *f, char *format, ...)
 391 {
 392     char    buf[1024];
 393     va_list     args;
 394     va_start (args, format);
 395
 396     vsnprintf (buf, sizeof (buf) - 1, format, args);
 397     va_end (args);
 398     string (f, buf);
 399     return 0;
 400 }
 401
 402 static int newline (FILE *f)
 403 {
 404     putc ('\n', f);
 405     column = 0;
 406     return 0;
 407 }
 408
 409 static int pad (FILE *f, int c)
 410 {
 411     do
 412         string (f, " ");
 413     while (column < c);
 414     return 0;
 415 }
 416
 417 static int control (FILE *file, char *name, char *ctrl[], GLuint id, int *space)
 418 {
 419     if (!ctrl[id]) {
 420         fprintf (file, "*** invalid %s value %d ",
 421                  name, id);
 422         return 1;
 423     }
 424     if (ctrl[id][0])
 425     {
 426         if (space && *space)
 427             string (file, " ");
 428         string (file, ctrl[id]);
 429         if (space)
 430             *space = 1;
 431     }
 432     return 0;
 433 }
 434
 435 static int print_opcode (FILE *file, int id)
 436 {
 437     if (!opcode[id].name) {
 438         format (file, "*** invalid opcode value %d ", id);
 439         return 1;
 440     }
 441     string (file, opcode[id].name);
 442     return 0;
 443 }
 444
 445 static int reg (FILE *file, GLuint _reg_file, GLuint _reg_nr)
 446 {
 447     int err = 0;
 448
 449     /* Clear the Compr4 instruction compression bit. */
 450     if (_reg_file == BRW_MESSAGE_REGISTER_FILE)
 451        _reg_nr &= ~(1 << 7);
 452
 453     if (_reg_file == BRW_ARCHITECTURE_REGISTER_FILE) {
 454         switch (_reg_nr & 0xf0) {
 455         case BRW_ARF_NULL:
 456             string (file, "null");
 457             return -1;
 458         case BRW_ARF_ADDRESS:
 459             format (file, "a%d", _reg_nr & 0x0f);
 460             break;
 461         case BRW_ARF_ACCUMULATOR:
 462             format (file, "acc%d", _reg_nr & 0x0f);
 463             break;
 464         case BRW_ARF_FLAG:
 465             format (file, "f%d", _reg_nr & 0x0f);
 466             break;
 467         case BRW_ARF_MASK:
 468             format (file, "mask%d", _reg_nr & 0x0f);
 469             break;
 470         case BRW_ARF_MASK_STACK:
 471             format (file, "msd%d", _reg_nr & 0x0f);
 472             break;
 473         case BRW_ARF_STATE:
 474             format (file, "sr%d", _reg_nr & 0x0f);
 475             break;
 476         case BRW_ARF_CONTROL:
 477             format (file, "cr%d", _reg_nr & 0x0f);
 478             break;
 479         case BRW_ARF_NOTIFICATION_COUNT:
 480             format (file, "n%d", _reg_nr & 0x0f);
 481             break;
 482         case BRW_ARF_IP:
 483             string (file, "ip");
 484             return -1;
 485             break;
 486         default:
 487             format (file, "ARF%d", _reg_nr);
 488             break;
 489         }
 490     } else {
 491         err  |= control (file, "src reg file", reg_file, _reg_file, NULL);
 492         format (file, "%d", _reg_nr);
 493     }
 494     return err;
 495 }
 496
 497 static int dest (FILE *file, struct brw_instruction *inst)
 498 {
 499     int err = 0;
 500
 501     if (inst->header.access_mode == BRW_ALIGN_1)
 502     {
 503         if (inst->bits1.da1.dest_address_mode == BRW_ADDRESS_DIRECT)
 504         {
 505             err |= reg (file, inst->bits1.da1.dest_reg_file, inst->bits1.da1.dest_reg_nr);
 506             if (err == -1)
 507                 return 0;
 508             if (inst->bits1.da1.dest_subreg_nr)
 509                 format (file, ".%d", inst->bits1.da1.dest_subreg_nr /
 510                                      reg_type_size[inst->bits1.da1.dest_reg_type]);
 511             format (file, "<%d>", inst->bits1.da1.dest_horiz_stride);
 512             err |= control (file, "dest reg encoding", reg_encoding, inst->bits1.da1.dest_reg_type, NULL);
 513         }
 514         else
 515         {
 516             string (file, "g[a0");
 517             if (inst->bits1.ia1.dest_subreg_nr)
 518                 format (file, ".%d", inst->bits1.ia1.dest_subreg_nr /
 519                                         reg_type_size[inst->bits1.ia1.dest_reg_type]);
 520             if (inst->bits1.ia1.dest_indirect_offset)
 521                 format (file, " %d", inst->bits1.ia1.dest_indirect_offset);
 522             string (file, "]");
 523             format (file, "<%d>", inst->bits1.ia1.dest_horiz_stride);
 524             err |= control (file, "dest reg encoding", reg_encoding, inst->bits1.ia1.dest_reg_type, NULL);
 525         }
 526     }
 527     else
 528     {
 529         if (inst->bits1.da16.dest_address_mode == BRW_ADDRESS_DIRECT)
 530         {
 531             err |= reg (file, inst->bits1.da16.dest_reg_file, inst->bits1.da16.dest_reg_nr);
 532             if (err == -1)
 533                 return 0;
 534             if (inst->bits1.da16.dest_subreg_nr)
 535                 format (file, ".%d", inst->bits1.da16.dest_subreg_nr /
 536                                      reg_type_size[inst->bits1.da16.dest_reg_type]);
 537             string (file, "<1>");
 538             err |= control (file, "writemask", writemask, inst->bits1.da16.dest_writemask, NULL);
 539             err |= control (file, "dest reg encoding", reg_encoding, inst->bits1.da16.dest_reg_type, NULL);
 540         }
 541         else
 542         {
 543             err = 1;
 544             string (file, "Indirect align16 address mode not supported");
 545         }
 546     }
 547
 548     return 0;
 549 }
 550
 551 static int src_align1_region (FILE *file,
 552                               GLuint _vert_stride, GLuint _width, GLuint _horiz_stride)
 553 {
 554     int err = 0;
 555     string (file, "<");
 556     err |= control (file, "vert stride", vert_stride, _vert_stride, NULL);
 557     string (file, ",");
 558     err |= control (file, "width", width, _width, NULL);
 559     string (file, ",");
 560     err |= control (file, "horiz_stride", horiz_stride, _horiz_stride, NULL);
 561     string (file, ">");
 562     return err;
 563 }
 564
 565 static int src_da1 (FILE *file, GLuint type, GLuint _reg_file,
 566                     GLuint _vert_stride, GLuint _width, GLuint _horiz_stride,
 567                     GLuint reg_num, GLuint sub_reg_num, GLuint __abs, GLuint _negate)
 568 {
 569     int err = 0;
 570     err |= control (file, "negate", negate, _negate, NULL);
 571     err |= control (file, "abs", _abs, __abs, NULL);
 572
 573     err |= reg (file, _reg_file, reg_num);
 574     if (err == -1)
 575         return 0;
 576     if (sub_reg_num)
 577         format (file, ".%d", sub_reg_num / reg_type_size[type]); /* use formal style like spec */
 578     src_align1_region (file, _vert_stride, _width, _horiz_stride);
 579     err |= control (file, "src reg encoding", reg_encoding, type, NULL);
 580     return err;
 581 }
 582
 583 static int src_ia1 (FILE *file,
 584                     GLuint type,
 585                     GLuint _reg_file,
 586                     GLint _addr_imm,
 587                     GLuint _addr_subreg_nr,
 588                     GLuint _negate,
 589                     GLuint __abs,
 590                     GLuint _addr_mode,
 591                     GLuint _horiz_stride,
 592                     GLuint _width,
 593                     GLuint _vert_stride)
 594 {
 595     int err = 0;
 596     err |= control (file, "negate", negate, _negate, NULL);
 597     err |= control (file, "abs", _abs, __abs, NULL);
 598
 599     string (file, "g[a0");
 600     if (_addr_subreg_nr)
 601         format (file, ".%d", _addr_subreg_nr);
 602     if (_addr_imm)
 603         format (file, " %d", _addr_imm);
 604     string (file, "]");
 605     src_align1_region (file, _vert_stride, _width, _horiz_stride);
 606     err |= control (file, "src reg encoding", reg_encoding, type, NULL);
 607     return err;
 608 }
 609
 610 static int src_da16 (FILE *file,
 611                      GLuint _reg_type,
 612                      GLuint _reg_file,
 613                      GLuint _vert_stride,
 614                      GLuint _reg_nr,
 615                      GLuint _subreg_nr,
 616                      GLuint __abs,
 617                      GLuint _negate,
 618                      GLuint swz_x,
 619                      GLuint swz_y,
 620                      GLuint swz_z,
 621                      GLuint swz_w)
 622 {
 623     int err = 0;
 624     err |= control (file, "negate", negate, _negate, NULL);
 625     err |= control (file, "abs", _abs, __abs, NULL);
 626
 627     err |= reg (file, _reg_file, _reg_nr);
 628     if (err == -1)
 629         return 0;
 630     if (_subreg_nr)
 631         /* bit4 for subreg number byte addressing. Make this same meaning as
 632            in da1 case, so output looks consistent. */
 633         format (file, ".%d", 16 / reg_type_size[_reg_type]);
 634     string (file, "<");
 635     err |= control (file, "vert stride", vert_stride, _vert_stride, NULL);
 636     string (file, ",4,1>");
 637     /*
 638      * Three kinds of swizzle display:
 639      *  identity - nothing printed
 640      *  1->all   - print the single channel
 641      *  1->1     - print the mapping
 642      */
 643     if (swz_x == BRW_CHANNEL_X &&
 644         swz_y == BRW_CHANNEL_Y &&
 645         swz_z == BRW_CHANNEL_Z &&
 646         swz_w == BRW_CHANNEL_W)
 647     {
 648         ;
 649     }
 650     else if (swz_x == swz_y && swz_x == swz_z && swz_x == swz_w)
 651     {
 652         string (file, ".");
 653         err |= control (file, "channel select", chan_sel, swz_x, NULL);
 654     }
 655     else
 656     {
 657         string (file, ".");
 658         err |= control (file, "channel select", chan_sel, swz_x, NULL);
 659         err |= control (file, "channel select", chan_sel, swz_y, NULL);
 660         err |= control (file, "channel select", chan_sel, swz_z, NULL);
 661         err |= control (file, "channel select", chan_sel, swz_w, NULL);
 662     }
 663     err |= control (file, "src da16 reg type", reg_encoding, _reg_type, NULL);
 664     return err;
 665 }
 666
 667
 668 static int imm (FILE *file, GLuint type, struct brw_instruction *inst) {
 669     switch (type) {
 670     case BRW_REGISTER_TYPE_UD:
 671         format (file, "0x%08xUD", inst->bits3.ud);
 672         break;
 673     case BRW_REGISTER_TYPE_D:
 674         format (file, "%dD", inst->bits3.d);
 675         break;
 676     case BRW_REGISTER_TYPE_UW:
 677         format (file, "0x%04xUW", (uint16_t) inst->bits3.ud);
 678         break;
 679     case BRW_REGISTER_TYPE_W:
 680         format (file, "%dW", (int16_t) inst->bits3.d);
 681         break;
 682     case BRW_REGISTER_TYPE_UB:
 683         format (file, "0x%02xUB", (int8_t) inst->bits3.ud);
 684         break;
 685     case BRW_REGISTER_TYPE_VF:
 686         format (file, "Vector Float");
 687         break;
 688     case BRW_REGISTER_TYPE_V:
 689         format (file, "0x%08xV", inst->bits3.ud);
 690         break;
 691     case BRW_REGISTER_TYPE_F:
 692         format (file, "%-gF", inst->bits3.f);
 693     }
 694     return 0;
 695 }
 696
 697 static int src0 (FILE *file, struct brw_instruction *inst)
 698 {
 699     if (inst->bits1.da1.src0_reg_file == BRW_IMMEDIATE_VALUE)
 700         return imm (file, inst->bits1.da1.src0_reg_type,
 701                     inst);
 702     else if (inst->header.access_mode == BRW_ALIGN_1)
 703     {
 704         if (inst->bits2.da1.src0_address_mode == BRW_ADDRESS_DIRECT)
 705         {
 706             return src_da1 (file,
 707                             inst->bits1.da1.src0_reg_type,
 708                             inst->bits1.da1.src0_reg_file,
 709                             inst->bits2.da1.src0_vert_stride,
 710                             inst->bits2.da1.src0_width,
 711                             inst->bits2.da1.src0_horiz_stride,
 712                             inst->bits2.da1.src0_reg_nr,
 713                             inst->bits2.da1.src0_subreg_nr,
 714                             inst->bits2.da1.src0_abs,
 715                             inst->bits2.da1.src0_negate);
 716         }
 717         else
 718         {
 719             return src_ia1 (file,
 720                             inst->bits1.ia1.src0_reg_type,
 721                             inst->bits1.ia1.src0_reg_file,
 722                             inst->bits2.ia1.src0_indirect_offset,
 723                             inst->bits2.ia1.src0_subreg_nr,
 724                             inst->bits2.ia1.src0_negate,
 725                             inst->bits2.ia1.src0_abs,
 726                             inst->bits2.ia1.src0_address_mode,
 727                             inst->bits2.ia1.src0_horiz_stride,
 728                             inst->bits2.ia1.src0_width,
 729                             inst->bits2.ia1.src0_vert_stride);
 730         }
 731     }
 732     else
 733     {
 734         if (inst->bits2.da16.src0_address_mode == BRW_ADDRESS_DIRECT)
 735         {
 736             return src_da16 (file,
 737                              inst->bits1.da16.src0_reg_type,
 738                              inst->bits1.da16.src0_reg_file,
 739                              inst->bits2.da16.src0_vert_stride,
 740                              inst->bits2.da16.src0_reg_nr,
 741                              inst->bits2.da16.src0_subreg_nr,
 742                              inst->bits2.da16.src0_abs,
 743                              inst->bits2.da16.src0_negate,
 744                              inst->bits2.da16.src0_swz_x,
 745                              inst->bits2.da16.src0_swz_y,
 746                              inst->bits2.da16.src0_swz_z,
 747                              inst->bits2.da16.src0_swz_w);
 748         }
 749         else
 750         {
 751             string (file, "Indirect align16 address mode not supported");
 752             return 1;
 753         }
 754     }
 755 }
 756
 757 static int src1 (FILE *file, struct brw_instruction *inst)
 758 {
 759     if (inst->bits1.da1.src1_reg_file == BRW_IMMEDIATE_VALUE)
 760         return imm (file, inst->bits1.da1.src1_reg_type,
 761                     inst);
 762     else if (inst->header.access_mode == BRW_ALIGN_1)
 763     {
 764         if (inst->bits3.da1.src1_address_mode == BRW_ADDRESS_DIRECT)
 765         {
 766             return src_da1 (file,
 767                             inst->bits1.da1.src1_reg_type,
 768                             inst->bits1.da1.src1_reg_file,
 769                             inst->bits3.da1.src1_vert_stride,
 770                             inst->bits3.da1.src1_width,
 771                             inst->bits3.da1.src1_horiz_stride,
 772                             inst->bits3.da1.src1_reg_nr,
 773                             inst->bits3.da1.src1_subreg_nr,
 774                             inst->bits3.da1.src1_abs,
 775                             inst->bits3.da1.src1_negate);
 776         }
 777         else
 778         {
 779             return src_ia1 (file,
 780                             inst->bits1.ia1.src1_reg_type,
 781                             inst->bits1.ia1.src1_reg_file,
 782                             inst->bits3.ia1.src1_indirect_offset,
 783                             inst->bits3.ia1.src1_subreg_nr,
 784                             inst->bits3.ia1.src1_negate,
 785                             inst->bits3.ia1.src1_abs,
 786                             inst->bits3.ia1.src1_address_mode,
 787                             inst->bits3.ia1.src1_horiz_stride,
 788                             inst->bits3.ia1.src1_width,
 789                             inst->bits3.ia1.src1_vert_stride);
 790         }
 791     }
 792     else
 793     {
 794         if (inst->bits3.da16.src1_address_mode == BRW_ADDRESS_DIRECT)
 795         {
 796             return src_da16 (file,
 797                              inst->bits1.da16.src1_reg_type,
 798                              inst->bits1.da16.src1_reg_file,
 799                              inst->bits3.da16.src1_vert_stride,
 800                              inst->bits3.da16.src1_reg_nr,
 801                              inst->bits3.da16.src1_subreg_nr,
 802                              inst->bits3.da16.src1_abs,
 803                              inst->bits3.da16.src1_negate,
 804                              inst->bits3.da16.src1_swz_x,
 805                              inst->bits3.da16.src1_swz_y,
 806                              inst->bits3.da16.src1_swz_z,
 807                              inst->bits3.da16.src1_swz_w);
 808         }
 809         else
 810         {
 811             string (file, "Indirect align16 address mode not supported");
 812             return 1;
 813         }
 814     }
 815 }
 816
 817 int esize[6] = {
 818         [0] = 1,
 819         [1] = 2,
 820         [2] = 4,
 821         [3] = 8,
 822         [4] = 16,
 823         [5] = 32,
 824 };
 825
 826 static int qtr_ctrl(FILE *file, struct brw_instruction *inst)
 827 {
 828     int qtr_ctl = inst->header.compression_control;
 829     int exec_size = esize[inst->header.execution_size];
 830
 831     if (exec_size == 8) {
 832         switch (qtr_ctl) {
 833         case 0:
 834             string (file, " 1Q");
 835             break;
 836         case 1:
 837             string (file, " 2Q");
 838             break;
 839         case 2:
 840             string (file, " 3Q");
 841             break;
 842         case 3:
 843             string (file, " 4Q");
 844             break;
 845         }
 846     } else if (exec_size == 16){
 847         if (qtr_ctl < 2)
 848             string (file, " 1H");
 849         else
 850             string (file, " 2H");
 851     }
 852     return 0;
 853 }
 854
 855 int brw_disasm (FILE *file, struct brw_instruction *inst, int gen)
 856 {
 857     int err = 0;
 858     int space = 0;
 859
 860     if (inst->header.predicate_control) {
 861         string (file, "(");
 862         err |= control (file, "predicate inverse", pred_inv, inst->header.predicate_inverse, NULL);
 863         string (file, "f0");
 864         if (inst->bits2.da1.flag_reg_nr)
 865             format (file, ".%d", inst->bits2.da1.flag_reg_nr);
 866         if (inst->header.access_mode == BRW_ALIGN_1)
 867             err |= control (file, "predicate control align1", pred_ctrl_align1,
 868                             inst->header.predicate_control, NULL);
 869         else
 870             err |= control (file, "predicate control align16", pred_ctrl_align16,
 871                             inst->header.predicate_control, NULL);
 872         string (file, ") ");
 873     }
 874
 875     err |= print_opcode (file, inst->header.opcode);
 876     err |= control (file, "saturate", saturate, inst->header.saturate, NULL);
 877     err |= control (file, "debug control", debug_ctrl, inst->header.debug_control, NULL);
 878
 879     if (inst->header.opcode == BRW_OPCODE_MATH) {
 880         string (file, " ");
 881         err |= control (file, "function", math_function,
 882                         inst->header.destreg__conditionalmod, NULL);
 883     } else if (inst->header.opcode != BRW_OPCODE_SEND &&
 884                inst->header.opcode != BRW_OPCODE_SENDC)
 885         err |= control (file, "conditional modifier", conditional_modifier,
 886                         inst->header.destreg__conditionalmod, NULL);
 887
 888     if (inst->header.opcode != BRW_OPCODE_NOP) {
 889         string (file, "(");
 890         err |= control (file, "execution size", exec_size, inst->header.execution_size, NULL);
 891         string (file, ")");
 892     }
 893
 894     if (inst->header.opcode == BRW_OPCODE_SEND && gen < 6)
 895         format (file, " %d", inst->header.destreg__conditionalmod);
 896
 897     if (opcode[inst->header.opcode].ndst > 0) {
 898         pad (file, 16);
 899         err |= dest (file, inst);
 900     } else if (gen >= 6 && (inst->header.opcode == BRW_OPCODE_IF ||
 901                             inst->header.opcode == BRW_OPCODE_ELSE ||
 902                             inst->header.opcode == BRW_OPCODE_ENDIF)) {
 903        format (file, " %d", inst->bits1.branch_gen6.jump_count);
 904     }
 905
 906     if (opcode[inst->header.opcode].nsrc > 0) {
 907         pad (file, 32);
 908         err |= src0 (file, inst);
 909     }
 910     if (opcode[inst->header.opcode].nsrc > 1) {
 911         pad (file, 48);
 912         err |= src1 (file, inst);
 913     }
 914
 915     if (inst->header.opcode == BRW_OPCODE_SEND ||
 916         inst->header.opcode == BRW_OPCODE_SENDC) {
 917         int target;
 918
 919         if (gen >= 6)
 920             target = inst->header.destreg__conditionalmod;
 921         else if (gen == 5)
 922             target = inst->bits2.send_gen5.sfid;
 923         else
 924             target = inst->bits3.generic.msg_target;
 925
 926         newline (file);
 927         pad (file, 16);
 928         space = 0;
 929         err |= control (file, "target function", target_function,
 930                         target, &space);
 931
 932         switch (target) {
 933         case BRW_MESSAGE_TARGET_MATH:
 934             err |= control (file, "math function", math_function,
 935                             inst->bits3.math.function, &space);
 936             err |= control (file, "math saturate", math_saturate,
 937                             inst->bits3.math.saturate, &space);
 938             err |= control (file, "math signed", math_signed,
 939                             inst->bits3.math.int_type, &space);
 940             err |= control (file, "math scalar", math_scalar,
 941                             inst->bits3.math.data_type, &space);
 942             err |= control (file, "math precision", math_precision,
 943                             inst->bits3.math.precision, &space);
 944             break;
 945         case BRW_MESSAGE_TARGET_SAMPLER:
 946             if (gen >= 5) {
 947                 format (file, " (%d, %d, %d, %d)",
 948                         inst->bits3.sampler_gen5.binding_table_index,
 949                         inst->bits3.sampler_gen5.sampler,
 950                         inst->bits3.sampler_gen5.msg_type,
 951                         inst->bits3.sampler_gen5.simd_mode);
 952             } else if (0 /* FINISHME: is_g4x */) {
 953                 format (file, " (%d, %d)",
 954                         inst->bits3.sampler_g4x.binding_table_index,
 955                         inst->bits3.sampler_g4x.sampler);
 956             } else {
 957                 format (file, " (%d, %d, ",
 958                         inst->bits3.sampler.binding_table_index,
 959                         inst->bits3.sampler.sampler);
 960                 err |= control (file, "sampler target format",
 961                                 sampler_target_format,
 962                                 inst->bits3.sampler.return_format, NULL);
 963                 string (file, ")");
 964             }
 965             break;
 966         case BRW_MESSAGE_TARGET_DATAPORT_READ:
 967             if (gen >= 6) {
 968                 format (file, " (%d, %d, %d, %d, %d, %d)",
 969                         inst->bits3.dp_render_cache.binding_table_index,
 970                         inst->bits3.dp_render_cache.msg_control,
 971                         inst->bits3.dp_render_cache.msg_type,
 972                         inst->bits3.dp_render_cache.send_commit_msg,
 973                         inst->bits3.dp_render_cache.msg_length,
 974                         inst->bits3.dp_render_cache.response_length);
 975             } else if (gen >= 5) {
 976                 format (file, " (%d, %d, %d)",
 977                         inst->bits3.dp_read_gen5.binding_table_index,
 978                         inst->bits3.dp_read_gen5.msg_control,
 979                         inst->bits3.dp_read_gen5.msg_type);
 980             } else {
 981                 format (file, " (%d, %d, %d)",
 982                         inst->bits3.dp_read.binding_table_index,
 983                         inst->bits3.dp_read.msg_control,
 984                         inst->bits3.dp_read.msg_type);
 985             }
 986             break;
 987         case BRW_MESSAGE_TARGET_DATAPORT_WRITE:
 988             if (gen >= 6) {
 989                 format (file, " (%d, %d, %d, %d, %d, %d)",
 990                         inst->bits3.dp_render_cache.binding_table_index,
 991                         inst->bits3.dp_render_cache.msg_control,
 992                         inst->bits3.dp_render_cache.msg_type,
 993                         inst->bits3.dp_render_cache.send_commit_msg,
 994                         inst->bits3.dp_render_cache.msg_length,
 995                         inst->bits3.dp_render_cache.response_length);
 996             } else {
 997                 format (file, " (%d, %d, %d, %d)",
 998                         inst->bits3.dp_write.binding_table_index,
 999                         (inst->bits3.dp_write.pixel_scoreboard_clear << 3) |
1000                         inst->bits3.dp_write.msg_control,
1001                         inst->bits3.dp_write.msg_type,
1002                         inst->bits3.dp_write.send_commit_msg);
1003             }
1004             break;
1005         case BRW_MESSAGE_TARGET_URB:
1006             if (gen >= 5) {
1007                 format (file, " %d", inst->bits3.urb_gen5.offset);
1008             } else {
1009                 format (file, " %d", inst->bits3.urb.offset);
1010             }
1011
1012             space = 1;
1013             if (gen >= 5) {
1014                 err |= control (file, "urb opcode", urb_opcode,
1015                                 inst->bits3.urb_gen5.opcode, &space);
1016             }
1017             err |= control (file, "urb swizzle", urb_swizzle,
1018                             inst->bits3.urb.swizzle_control, &space);
1019             err |= control (file, "urb allocate", urb_allocate,
1020                             inst->bits3.urb.allocate, &space);
1021             err |= control (file, "urb used", urb_used,
1022                             inst->bits3.urb.used, &space);
1023             err |= control (file, "urb complete", urb_complete,
1024                             inst->bits3.urb.complete, &space);
1025             if (gen >= 5) {
1026                 format (file, " mlen %d, rlen %d\n",
1027                         inst->bits3.urb_gen5.msg_length,
1028                         inst->bits3.urb_gen5.response_length);
1029             }
1030             break;
1031         case BRW_MESSAGE_TARGET_THREAD_SPAWNER:
1032             break;
1033         default:
1034             format (file, "unsupported target %d", target);
1035             break;
1036         }
1037         if (space)
1038             string (file, " ");
1039         if (gen >= 5) {
1040            format (file, "mlen %d",
1041                    inst->bits3.generic_gen5.msg_length);
1042            format (file, " rlen %d",
1043                    inst->bits3.generic_gen5.response_length);
1044         } else {
1045            format (file, "mlen %d",
1046                    inst->bits3.generic.msg_length);
1047            format (file, " rlen %d",
1048                    inst->bits3.generic.response_length);
1049         }
1050     }
1051     pad (file, 64);
1052     if (inst->header.opcode != BRW_OPCODE_NOP) {
1053         string (file, "{");
1054         space = 1;
1055         err |= control(file, "access mode", access_mode, inst->header.access_mode, &space);
1056         if (gen >= 6)
1057             err |= control (file, "write enable control", wectrl, inst->header.mask_control, &space);
1058         else
1059             err |= control (file, "mask control", mask_ctrl, inst->header.mask_control, &space);
1060         err |= control (file, "dependency control", dep_ctrl, inst->header.dependency_control, &space);
1061
1062         if (gen >= 6)
1063             err |= qtr_ctrl (file, inst);
1064         else {
1065             if (inst->header.compression_control == BRW_COMPRESSION_COMPRESSED &&
1066                 opcode[inst->header.opcode].ndst > 0 &&
1067                 inst->bits1.da1.dest_reg_file == BRW_MESSAGE_REGISTER_FILE &&
1068                 inst->bits1.da1.dest_reg_nr & (1 << 7)) {
1069                 format (file, " compr4");
1070             } else {
1071                 err |= control (file, "compression control", compr_ctrl,
1072                                 inst->header.compression_control, &space);
1073             }
1074         }
1075
1076         err |= control (file, "thread control", thread_ctrl, inst->header.thread_control, &space);
1077         if (gen >= 6)
1078             err |= control (file, "acc write control", accwr, inst->header.acc_wr_control, &space);
1079         if (inst->header.opcode == BRW_OPCODE_SEND ||
1080             inst->header.opcode == BRW_OPCODE_SENDC)
1081             err |= control (file, "end of thread", end_of_thread,
1082                             inst->bits3.generic.end_of_thread, &space);
1083         if (space)
1084             string (file, " ");
1085         string (file, "}");
1086     }
1087     string (file, ";");
1088     newline (file);
1089     return err;
1090 }