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 | } |
80 | |