projects / deliverable / binutils-gdb.git / blame
| Commit | Line | Data |
|---|---|---|
| 252b5132 RH |
1 | /* This file is debug.c |
| 2 | Copyright (C) 1987, 1988, 1989, 1990, 1991, 1992 Free Software Foundation, Inc. | |
| 3 | ||
| 4 | This file is part of GAS, the GNU Assembler. | |
| 5 | ||
| 6 | GAS is free software; you can redistribute it and/or modify | |
| 7 | it under the terms of the GNU General Public License as published by | |
| 8 | the Free Software Foundation; either version 2, or (at your option) | |
| 9 | any later version. | |
| 10 | ||
| 11 | GAS is distributed in the hope that it will be useful, | |
| 12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 14 | GNU General Public License for more details. | |
| 15 | ||
| 16 | You should have received a copy of the GNU General Public License | |
| 17 | along with GAS; see the file COPYING. If not, write to | |
| 18 | the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ | |
| 19 | ||
| 20 | /* Routines for debug use only. */ | |
| 21 | ||
| 22 | #include "as.h" | |
| 23 | #include "subsegs.h" | |
| 24 | ||
| 25 | dmp_frags () | |
| 26 | { | |
| 27 | frchainS *chp; | |
| 28 | char *p; | |
| 29 | ||
| 30 | for (chp = frchain_root; chp; chp = chp->frch_next) | |
| 31 | { | |
| 32 | switch (chp->frch_seg) | |
| 33 | { | |
| 34 | case SEG_DATA: | |
| 35 | p = "Data"; | |
| 36 | break; | |
| 37 | case SEG_TEXT: | |
| 38 | p = "Text"; | |
| 39 | break; | |
| 40 | default: | |
| 41 | p = "???"; | |
| 42 | break; | |
| 43 | } | |
| 44 | printf ("\nSEGMENT %s %d\n", p, chp->frch_subseg); | |
| 45 | dmp_frag (chp->frch_root, "\t"); | |
| 46 | } | |
| 47 | } | |
| 48 | ||
| 49 | dmp_frag (fp, indent) | |
| 50 | struct frag *fp; | |
| 51 | char *indent; | |
| 52 | { | |
| 53 | for (; fp; fp = fp->fr_next) | |
| 54 | { | |
| 55 | printf ("%sFRAGMENT @ 0x%x\n", indent, fp); | |
| 56 | switch (fp->fr_type) | |
| 57 | { | |
| 58 | case rs_align: | |
| 59 | printf ("%srs_align(%d)\n", indent, fp->fr_offset); | |
| 60 | break; | |
| 61 | case rs_fill: | |
| 62 | printf ("%srs_fill(%d)\n", indent, fp->fr_offset); | |
| 63 | printf ("%s", indent); | |
| 64 | var_chars (fp, fp->fr_var + fp->fr_fix); | |
| e6c774b4 | 65 | printf ("%s\t repeated %d times,", indent, fp->fr_offset); |
| 252b5132 RH |
66 | printf (" fixed length if # chars == 0)\n"); |
| 67 | break; | |
| 68 | case rs_org: | |
| 69 | printf ("%srs_org(%d+sym @0x%x)\n", indent, | |
| 70 | fp->fr_offset, fp->fr_symbol); | |
| 71 | printf ("%sfill with ", indent); | |
| 72 | var_chars (fp, 1); | |
| 73 | printf ("\n"); | |
| 74 | break; | |
| 75 | case rs_machine_dependent: | |
| 76 | printf ("%smachine_dep\n", indent); | |
| 77 | break; | |
| 78 | default: | |
| 79 | printf ("%sunknown type\n", indent); | |
| 80 | break; | |
| 81 | } | |
| 82 | printf ("%saddr=%d(0x%x)\n", indent, fp->fr_address, fp->fr_address); | |
| 83 | printf ("%sfr_fix=%d\n", indent, fp->fr_fix); | |
| 84 | printf ("%sfr_var=%d\n", indent, fp->fr_var); | |
| 85 | printf ("%sfr_offset=%d\n", indent, fp->fr_offset); | |
| 86 | printf ("%schars @ 0x%x\n", indent, fp->fr_literal); | |
| 87 | printf ("\n"); | |
| 88 | } | |
| 89 | } | |
| 90 | ||
| 91 | var_chars (fp, n) | |
| 92 | struct frag *fp; | |
| 93 | int n; | |
| 94 | { | |
| 95 | unsigned char *p; | |
| 96 | ||
| 97 | for (p = (unsigned char *) fp->fr_literal; n; n--, p++) | |
| 98 | { | |
| 99 | printf ("%02x ", *p); | |
| 100 | } | |
| 101 | } | |
| 102 | ||
| 103 | /* end of debug.c */ |