contrib/elftoolchain/libdwarf/dwarf_macinfo.c

   1 /*-
   2  * Copyright (c) 2009,2011 Kai Wang
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  */
  26
  27 #include "_libdwarf.h"
  28
  29 ELFTC_VCSID("$Id: dwarf_macinfo.c 2074 2011-10-27 03:34:33Z jkoshy $");
  30
  31 char *
  32 dwarf_find_macro_value_start(char *macro_string)
  33 {
  34         char *p;
  35
  36         if (macro_string == NULL)
  37                 return (NULL);
  38
  39         p = macro_string;
  40         while (*p != '\0' && *p != ' ')
  41                 p++;
  42         if (*p == ' ')
  43                 p++;
  44
  45         return (p);
  46 }
  47
  48 int
  49 dwarf_get_macro_details(Dwarf_Debug dbg, Dwarf_Off offset,
  50     Dwarf_Unsigned max_count, Dwarf_Signed *entry_cnt,
  51     Dwarf_Macro_Details **details, Dwarf_Error *error)
  52 {
  53         Dwarf_MacroSet ms;
  54         Dwarf_Unsigned cnt;
  55         int i;
  56
  57         if (dbg == NULL || entry_cnt == NULL || details == NULL) {
  58                 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
  59                 return (DW_DLV_ERROR);
  60         }
  61
  62         if (STAILQ_EMPTY(&dbg->dbg_mslist)) {
  63                 if (_dwarf_macinfo_init(dbg, error) != DW_DLE_NONE)
  64                         return (DW_DLV_ERROR);
  65                 if (STAILQ_EMPTY(&dbg->dbg_mslist)) {
  66                         DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
  67                         return (DW_DLV_NO_ENTRY);
  68                 }
  69         }
  70
  71         STAILQ_FOREACH(ms, &dbg->dbg_mslist, ms_next) {
  72                 for (i = 0; (Dwarf_Unsigned) i < ms->ms_cnt; i++)
  73                         if (ms->ms_mdlist[i].dmd_offset == offset) {
  74                                 cnt = ms->ms_cnt - i;
  75                                 if (max_count != 0 && cnt > max_count)
  76                                         cnt = max_count;
  77
  78                                 *details = &ms->ms_mdlist[i];
  79                                 *entry_cnt = cnt;
  80
  81                                 return (DW_DLV_OK);
  82                         }
  83         }
  84
  85         DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
  86
  87         return (DW_DLV_NO_ENTRY);
  88 }