1 /* This file is debug.c 2 Copyright (C) 1987-2016 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 3, 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, 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */ 19 20 /* Routines for debug use only. */ 21 22 #include "as.h" 23 #include "subsegs.h" 24 25 dmp_frags () 26 { 27 asection *s; 28 frchainS *chp; 29 char *p; 30 31 for (s = stdoutput->sections; s; s = s->next) 32 for (chp = seg_info (s)->frchainP; chp; chp = chp->frch_next) 33 { 34 switch (s) 35 { 36 case SEG_DATA: 37 p = "Data"; 38 break; 39 case SEG_TEXT: 40 p = "Text"; 41 break; 42 default: 43 p = "???"; 44 break; 45 } 46 printf ("\nSEGMENT %s %d\n", p, chp->frch_subseg); 47 dmp_frag (chp->frch_root, "\t"); 48 } 49 } 50 51 dmp_frag (fp, indent) 52 struct frag *fp; 53 char *indent; 54 { 55 for (; fp; fp = fp->fr_next) 56 { 57 printf ("%sFRAGMENT @ 0x%x\n", indent, fp); 58 switch (fp->fr_type) 59 { 60 case rs_align: 61 printf ("%srs_align(%d)\n", indent, fp->fr_offset); 62 break; 63 case rs_fill: 64 printf ("%srs_fill(%d)\n", indent, fp->fr_offset); 65 printf ("%s", indent); 66 var_chars (fp, fp->fr_var + fp->fr_fix); 67 printf ("%s\t repeated %d times,", indent, fp->fr_offset); 68 printf (" fixed length if # chars == 0)\n"); 69 break; 70 case rs_org: 71 printf ("%srs_org(%d+sym @0x%x)\n", indent, 72 fp->fr_offset, fp->fr_symbol); 73 printf ("%sfill with ", indent); 74 var_chars (fp, 1); 75 printf ("\n"); 76 break; 77 case rs_machine_dependent: 78 printf ("%smachine_dep\n", indent); 79 break; 80 default: 81 printf ("%sunknown type\n", indent); 82 break; 83 } 84 printf ("%saddr=%d(0x%x)\n", indent, fp->fr_address, fp->fr_address); 85 printf ("%sfr_fix=%d\n", indent, fp->fr_fix); 86 printf ("%sfr_var=%d\n", indent, fp->fr_var); 87 printf ("%sfr_offset=%d\n", indent, fp->fr_offset); 88 printf ("%schars @ 0x%x\n", indent, fp->fr_literal); 89 printf ("\n"); 90 } 91 } 92 93 var_chars (fp, n) 94 struct frag *fp; 95 int n; 96 { 97 unsigned char *p; 98 99 for (p = (unsigned char *) fp->fr_literal; n; n--, p++) 100 { 101 printf ("%02x ", *p); 102 } 103 } 104 105 /* end of debug.c */ 106