asm/exprdump.c

   1 /* ----------------------------------------------------------------------- *
   2  *
   3  *   Copyright 1996-2017 The NASM Authors - All Rights Reserved
   4  *   See the file AUTHORS included with the NASM distribution for
   5  *   the specific copyright holders.
   6  *
   7  *   Redistribution and use in source and binary forms, with or without
   8  *   modification, are permitted provided that the following
   9  *   conditions are met:
  10  *
  11  *   * Redistributions of source code must retain the above copyright
  12  *     notice, this list of conditions and the following disclaimer.
  13  *   * Redistributions in binary form must reproduce the above
  14  *     copyright notice, this list of conditions and the following
  15  *     disclaimer in the documentation and/or other materials provided
  16  *     with the distribution.
  17  *
  18  *     THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
  19  *     CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
  20  *     INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  21  *     MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  22  *     DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
  23  *     CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  24  *     SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  25  *     NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  26  *     LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  27  *     HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  28  *     CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  29  *     OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
  30  *     EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  31  *
  32  * ----------------------------------------------------------------------- */
  33
  34 /*
  35  * exprdump.c
  36  *
  37  * Debugging code to dump the contents of an expression vector to stdout
  38  */
  39
  40 #include "nasm.h"
  41
  42 static const char *expr_type(int32_t type)
  43 {
  44     static char seg_str[64];
  45
  46     switch (type) {
  47     case 0:
  48         return "null";
  49     case EXPR_UNKNOWN:
  50         return "unknown";
  51     case EXPR_SIMPLE:
  52         return "simple";
  53     case EXPR_WRT:
  54         return "wrt";
  55     case EXPR_RDSAE:
  56         return "sae";
  57     default:
  58         break;
  59     }
  60
  61     if (type >= EXPR_REG_START && type <= EXPR_REG_END) {
  62         return nasm_reg_names[type - EXPR_REG_START];
  63     } else if (type >= EXPR_SEGBASE) {
  64         snprintf(seg_str, sizeof seg_str, "%sseg %d",
  65                  (type - EXPR_SEGBASE) == location.segment ? "this " : "",
  66                  type - EXPR_SEGBASE);
  67         return seg_str;
  68     } else {
  69         return "ERR";
  70     }
  71 }
  72
  73 void dump_expr(const expr *e)
  74 {
  75     printf("[");
  76     for (; e->type; e++)
  77         printf("<%s(%d),%"PRId64">", expr_type(e->type), e->type, e->value);
  78     printf("]\n");
  79 }