Line data    Source code

       1             : /* Iterate through DWARF compilation units across all modules.
       2             :    Copyright (C) 2005-2010 Red Hat, Inc.
       3             :    This file is part of elfutils.
       4             : 
       5             :    This file is free software; you can redistribute it and/or modify
       6             :    it under the terms of either
       7             : 
       8             :      * the GNU Lesser General Public License as published by the Free
       9             :        Software Foundation; either version 3 of the License, or (at
      10             :        your option) any later version
      11             : 
      12             :    or
      13             : 
      14             :      * the GNU General Public License as published by the Free
      15             :        Software Foundation; either version 2 of the License, or (at
      16             :        your option) any later version
      17             : 
      18             :    or both in parallel, as here.
      19             : 
      20             :    elfutils is distributed in the hope that it will be useful, but
      21             :    WITHOUT ANY WARRANTY; without even the implied warranty of
      22             :    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      23             :    General Public License for more details.
      24             : 
      25             :    You should have received copies of the GNU General Public License and
      26             :    the GNU Lesser General Public License along with this program.  If
      27             :    not, see <http://www.gnu.org/licenses/>.  */
      28             : 
      29             : #ifdef HAVE_CONFIG_H
      30             : # include <config.h>
      31             : #endif
      32             : 
      33             : #include "libdwflP.h"
      34             : 
      35             : Dwarf_Die *
      36        8000 : dwfl_nextcu (Dwfl *dwfl, Dwarf_Die *lastcu, Dwarf_Addr *bias)
      37             : {
      38        8000 :   if (dwfl == NULL)
      39             :     return NULL;
      40             : 
      41        8000 :   struct dwfl_cu *cu = (struct dwfl_cu *) lastcu;
      42             :   Dwfl_Module *mod;
      43             : 
      44        8000 :   if (cu == NULL)
      45             :     {
      46          79 :       mod = dwfl->modulelist;
      47          79 :       goto nextmod;
      48             :     }
      49             :   else
      50        7921 :     mod = cu->mod;
      51             : 
      52             :   Dwfl_Error error;
      53             :   do
      54             :     {
      55        8006 :       error = __libdwfl_nextcu (mod, cu, &cu);
      56        8006 :       if (error != DWFL_E_NOERROR)
      57             :         break;
      58             : 
      59        8006 :       if (cu != NULL)
      60             :         {
      61        7921 :           *bias = dwfl_adjusted_dwarf_addr (mod, 0);
      62        7921 :           return &cu->die;
      63             :         }
      64             : 
      65             :       do
      66             :         {
      67          87 :           mod = mod->next;
      68             : 
      69             :         nextmod:
      70         166 :           if (mod == NULL)
      71             :             return NULL;
      72             : 
      73          87 :           if (mod->dwerr == DWFL_E_NOERROR
      74          87 :               && (mod->dw != NULL
      75          87 :                   || INTUSE(dwfl_module_getdwarf) (mod, bias) != NULL))
      76             :             break;
      77             :         }
      78           2 :       while (mod->dwerr == DWFL_E_NO_DWARF);
      79          85 :       error = mod->dwerr;
      80             :     }
      81          85 :   while (error == DWFL_E_NOERROR);
      82             : 
      83           0 :   __libdwfl_seterrno (error);
      84           0 :   return NULL;
      85             : }
      86             : INTDEF (dwfl_nextcu)