1260684Skaiw/*-
2260684Skaiw * Copyright (c) 2009,2011 Kai Wang
3260684Skaiw * All rights reserved.
4260684Skaiw *
5260684Skaiw * Redistribution and use in source and binary forms, with or without
6260684Skaiw * modification, are permitted provided that the following conditions
7260684Skaiw * are met:
8260684Skaiw * 1. Redistributions of source code must retain the above copyright
9260684Skaiw *    notice, this list of conditions and the following disclaimer.
10260684Skaiw * 2. Redistributions in binary form must reproduce the above copyright
11260684Skaiw *    notice, this list of conditions and the following disclaimer in the
12260684Skaiw *    documentation and/or other materials provided with the distribution.
13260684Skaiw *
14260684Skaiw * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15260684Skaiw * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16260684Skaiw * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17260684Skaiw * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18260684Skaiw * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19260684Skaiw * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20260684Skaiw * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21260684Skaiw * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22260684Skaiw * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23260684Skaiw * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24260684Skaiw * SUCH DAMAGE.
25260684Skaiw */
26260684Skaiw
27260684Skaiw#include "_libdwarf.h"
28260684Skaiw
29260684SkaiwELFTC_VCSID("$Id: dwarf_macinfo.c 2074 2011-10-27 03:34:33Z jkoshy $");
30260684Skaiw
31260684Skaiwchar *
32260684Skaiwdwarf_find_macro_value_start(char *macro_string)
33260684Skaiw{
34260684Skaiw	char *p;
35260684Skaiw
36260684Skaiw	if (macro_string == NULL)
37260684Skaiw		return (NULL);
38260684Skaiw
39260684Skaiw	p = macro_string;
40260684Skaiw	while (*p != '\0' && *p != ' ')
41260684Skaiw		p++;
42260684Skaiw	if (*p == ' ')
43260684Skaiw		p++;
44260684Skaiw
45260684Skaiw	return (p);
46260684Skaiw}
47260684Skaiw
48260684Skaiwint
49260684Skaiwdwarf_get_macro_details(Dwarf_Debug dbg, Dwarf_Off offset,
50260684Skaiw    Dwarf_Unsigned max_count, Dwarf_Signed *entry_cnt,
51260684Skaiw    Dwarf_Macro_Details **details, Dwarf_Error *error)
52260684Skaiw{
53260684Skaiw	Dwarf_MacroSet ms;
54260684Skaiw	Dwarf_Unsigned cnt;
55260684Skaiw	int i;
56260684Skaiw
57260684Skaiw	if (dbg == NULL || entry_cnt == NULL || details == NULL) {
58260684Skaiw		DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
59260684Skaiw		return (DW_DLV_ERROR);
60260684Skaiw	}
61260684Skaiw
62260684Skaiw	if (STAILQ_EMPTY(&dbg->dbg_mslist)) {
63260684Skaiw		if (_dwarf_macinfo_init(dbg, error) != DW_DLE_NONE)
64260684Skaiw			return (DW_DLV_ERROR);
65260684Skaiw		if (STAILQ_EMPTY(&dbg->dbg_mslist)) {
66260684Skaiw			DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
67260684Skaiw			return (DW_DLV_NO_ENTRY);
68260684Skaiw		}
69260684Skaiw	}
70260684Skaiw
71260684Skaiw	STAILQ_FOREACH(ms, &dbg->dbg_mslist, ms_next) {
72260684Skaiw		for (i = 0; (Dwarf_Unsigned) i < ms->ms_cnt; i++)
73260684Skaiw			if (ms->ms_mdlist[i].dmd_offset == offset) {
74260684Skaiw				cnt = ms->ms_cnt - i;
75260684Skaiw				if (max_count != 0 && cnt > max_count)
76260684Skaiw					cnt = max_count;
77260684Skaiw
78260684Skaiw				*details = &ms->ms_mdlist[i];
79260684Skaiw				*entry_cnt = cnt;
80260684Skaiw
81260684Skaiw				return (DW_DLV_OK);
82260684Skaiw			}
83260684Skaiw	}
84260684Skaiw
85260684Skaiw	DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
86260684Skaiw
87260684Skaiw	return (DW_DLV_NO_ENTRY);
88260684Skaiw}
89