binutils/bfd/dwarf1.c

91   /* Linked starting from aUnit->func_list.  */
160    attached into 'aUnit' at 'aUnit->func_list'.  */
163 alloc_dwarf1_func (stash, aUnit)
165      struct dwarf1_unit* aUnit;
170   x->prev = aUnit->func_list;
171   aUnit->func_list = x;
267 /* Parse a dwarf1 line number table for 'aUnit->stmt_list_offset'
268    into 'aUnit->linenumber_table'.  Return FALSE if an error
272 parse_line_table (stash, aUnit)
274   struct dwarf1_unit* aUnit;
304   xptr = stash->line_section + aUnit->stmt_list_offset;
322       aUnit->line_count = (tblend - xptr) / 10;
325       amt = sizeof (struct linenumber) * aUnit->line_count;
326       aUnit->linenumber_table = ((struct linenumber *)
329       for (eachLine = 0; eachLine < aUnit->line_count; eachLine++)
332 	  aUnit->linenumber_table[eachLine].linenumber
340 	  aUnit->linenumber_table[eachLine].addr
349 /* Parse each function die in a compilation unit 'aUnit'.
350    The first child die of 'aUnit' should be in 'aUnit->first_child',
351    the result is placed in 'aUnit->func_list'.
355 parse_functions_in_unit (stash, aUnit)
357      struct dwarf1_unit* aUnit;
361   if (aUnit->first_child)
362     for (eachDie = aUnit->first_child;
377 	    struct dwarf1_func* aFunc = alloc_dwarf1_func (stash,aUnit);
394 /* Find the nearest line to 'addr' in 'aUnit'.
398 dwarf1_unit_find_nearest_line (stash, aUnit, addr,
402   struct dwarf1_unit* aUnit;
411   if (aUnit->low_pc <= addr && addr < aUnit->high_pc)
413       if (aUnit->has_stmt_list)
418 	  if (! aUnit->linenumber_table)
420 	      if (! parse_line_table (stash, aUnit))
424 	  if (! aUnit->func_list)
426 	      if (! parse_functions_in_unit (stash, aUnit))
430 	  for (i = 0; i < aUnit->line_count; i++)
432 	      if (aUnit->linenumber_table[i].addr <= addr
433 		  && addr < aUnit->linenumber_table[i+1].addr)
435 		  *filename_ptr = aUnit->name;
436 		  *linenumber_ptr = aUnit->linenumber_table[i].linenumber;
442 	  for (eachFunc = aUnit->func_list;
550 	  struct dwarf1_unit* aUnit
553 	  aUnit->name = aDieInfo.name;
554 	  aUnit->low_pc = aDieInfo.low_pc;
555 	  aUnit->high_pc = aDieInfo.high_pc;
556 	  aUnit->has_stmt_list = aDieInfo.has_stmt_list;
557 	  aUnit->stmt_list_offset = aDieInfo.stmt_list_offset;
566 	    aUnit->first_child = stash->currentDie + aDieInfo.length;
568 	    aUnit->first_child = 0;
570 	  if (aUnit->low_pc <= addr && addr < aUnit->high_pc)
571 	    return dwarf1_unit_find_nearest_line (stash, aUnit, addr,