old-cross-binutils/gas/debug.c
Alan Modra c9049d301b * subsegs.h (struct frchain): Delete frch_seg.
(frchain_root): Delete.
	(seg_info): Define as macro.
	* subsegs.c (frchain_root): Delete.
	(abs_seg_info, und_seg_info, absolute_frchain): Delete.
	(subsegs_begin, subseg_change): Adjust for above.
	(subseg_set_rest): Likewise.  Add new frchain structs to seginfo
	rather than to one big list.
	(subseg_get): Don't special case abs, und sections.
	(subseg_new, subseg_force_new): Don't set frchainP here.
	(seg_info): Delete.
	(subsegs_print_statistics): Adjust frag chain control list traversal.
	* debug.c (dmp_frags):  Likewise.
	* dwarf2dbg.c (first_frag_for_seg): Don't start looking for frag
	at frchain_root.  Make use of known frchain ordering.
	(last_frag_for_seg): Likewise.
	(get_frag_fix): Likewise.  Add seg param.
	(process_entries, out_debug_aranges): Adjust get_frag_fix calls.
	* write.c (chain_frchains_together_1): Adjust for struct frchain.
	(SUB_SEGMENT_ALIGN): Likewise.
	(subsegs_finish): Adjust frchain list traversal.
	* config/tc-xtensa.c (xtensa_cleanup_align_frags): Likewise.
	(xtensa_fix_target_frags, xtensa_mark_narrow_branches): Likewise.
	(xtensa_mark_zcl_first_insns, xtensa_fix_a0_b_retw_frags): Likewise.
	(xtensa_fix_b_j_loop_end_frags): Likewise.
	(xtensa_fix_close_loop_end_frags): Likewise.
	(xtensa_fix_short_loop_frags, xtensa_sanity_check): Likewise.
	(retrieve_segment_info): Delete frch_seg initialisation.
2006-05-03 23:52:15 +00:00

106 lines
2.7 KiB
C

/* This file is debug.c
Copyright 1987, 1988, 1989, 1990, 1991, 1992, 2000, 2006
Free Software Foundation, Inc.
This file is part of GAS, the GNU Assembler.
GAS is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
GAS is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GAS; see the file COPYING. If not, write to
the Free Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
/* Routines for debug use only. */
#include "as.h"
#include "subsegs.h"
dmp_frags ()
{
asection *s;
frchainS *chp;
char *p;
for (s = stdoutput->sections; s; s = s->next)
for (chp = seg_info (s)->frchainP; chp; chp = chp->frch_next)
{
switch (s)
{
case SEG_DATA:
p = "Data";
break;
case SEG_TEXT:
p = "Text";
break;
default:
p = "???";
break;
}
printf ("\nSEGMENT %s %d\n", p, chp->frch_subseg);
dmp_frag (chp->frch_root, "\t");
}
}
dmp_frag (fp, indent)
struct frag *fp;
char *indent;
{
for (; fp; fp = fp->fr_next)
{
printf ("%sFRAGMENT @ 0x%x\n", indent, fp);
switch (fp->fr_type)
{
case rs_align:
printf ("%srs_align(%d)\n", indent, fp->fr_offset);
break;
case rs_fill:
printf ("%srs_fill(%d)\n", indent, fp->fr_offset);
printf ("%s", indent);
var_chars (fp, fp->fr_var + fp->fr_fix);
printf ("%s\t repeated %d times,", indent, fp->fr_offset);
printf (" fixed length if # chars == 0)\n");
break;
case rs_org:
printf ("%srs_org(%d+sym @0x%x)\n", indent,
fp->fr_offset, fp->fr_symbol);
printf ("%sfill with ", indent);
var_chars (fp, 1);
printf ("\n");
break;
case rs_machine_dependent:
printf ("%smachine_dep\n", indent);
break;
default:
printf ("%sunknown type\n", indent);
break;
}
printf ("%saddr=%d(0x%x)\n", indent, fp->fr_address, fp->fr_address);
printf ("%sfr_fix=%d\n", indent, fp->fr_fix);
printf ("%sfr_var=%d\n", indent, fp->fr_var);
printf ("%sfr_offset=%d\n", indent, fp->fr_offset);
printf ("%schars @ 0x%x\n", indent, fp->fr_literal);
printf ("\n");
}
}
var_chars (fp, n)
struct frag *fp;
int n;
{
unsigned char *p;
for (p = (unsigned char *) fp->fr_literal; n; n--, p++)
{
printf ("%02x ", *p);
}
}
/* end of debug.c */