1 /*-
2 * Copyright (c) 2007 John Birrell (jb@freebsd.org)
3 * Copyright (c) 2009 Kai Wang
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 * SUCH DAMAGE.
26 */
27
28 #include "_libdwarf.h"
29
30 ELFTC_VCSID("$Id: dwarf_init.c 2073 2011-10-27 03:30:47Z jkoshy $");
31
32 int
dwarf_elf_init(Elf * elf,int mode,Dwarf_Handler errhand,Dwarf_Ptr errarg,Dwarf_Debug * ret_dbg,Dwarf_Error * error)33 dwarf_elf_init(Elf *elf, int mode, Dwarf_Handler errhand, Dwarf_Ptr errarg,
34 Dwarf_Debug *ret_dbg, Dwarf_Error *error)
35 {
36 Dwarf_Debug dbg;
37 int ret;
38
39 if (elf == NULL || ret_dbg == NULL) {
40 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
41 return (DW_DLV_ERROR);
42 }
43
44 if (mode != DW_DLC_READ) {
45 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
46 return (DW_DLV_ERROR);
47 }
48
49 if (_dwarf_alloc(&dbg, mode, error) != DW_DLE_NONE)
50 return (DW_DLV_ERROR);
51
52 if (_dwarf_elf_init(dbg, elf, error) != DW_DLE_NONE) {
53 free(dbg);
54 return (DW_DLV_ERROR);
55 }
56
57 if ((ret = _dwarf_init(dbg, 0, errhand, errarg, error)) !=
58 DW_DLE_NONE) {
59 _dwarf_elf_deinit(dbg);
60 free(dbg);
61 if (ret == DW_DLE_DEBUG_INFO_NULL)
62 return (DW_DLV_NO_ENTRY);
63 else
64 return (DW_DLV_ERROR);
65 }
66
67 *ret_dbg = dbg;
68
69 return (DW_DLV_OK);
70 }
71
72 int
dwarf_get_elf(Dwarf_Debug dbg,Elf ** elf,Dwarf_Error * error)73 dwarf_get_elf(Dwarf_Debug dbg, Elf **elf, Dwarf_Error *error)
74 {
75 Dwarf_Elf_Object *e;
76
77 if (dbg == NULL || elf == NULL) {
78 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
79 return (DW_DLV_ERROR);
80 }
81
82 e = dbg->dbg_iface->object;
83 *elf = e->eo_elf;
84
85 return (DW_DLV_OK);
86 }
87
88 int
dwarf_init(int fd,int mode,Dwarf_Handler errhand,Dwarf_Ptr errarg,Dwarf_Debug * ret_dbg,Dwarf_Error * error)89 dwarf_init(int fd, int mode, Dwarf_Handler errhand, Dwarf_Ptr errarg,
90 Dwarf_Debug *ret_dbg, Dwarf_Error *error)
91 {
92 Dwarf_Debug dbg;
93 Elf *elf;
94 int ret;
95
96 if (fd < 0 || ret_dbg == NULL) {
97 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
98 return (DW_DLV_ERROR);
99 }
100
101 if (mode != DW_DLC_READ) {
102 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
103 return (DW_DLV_ERROR);
104 }
105
106 if (elf_version(EV_CURRENT) == EV_NONE) {
107 DWARF_SET_ELF_ERROR(NULL, error);
108 return (DW_DLV_ERROR);
109 }
110
111 if ((elf = elf_begin(fd, ELF_C_READ, NULL)) == NULL) {
112 DWARF_SET_ELF_ERROR(NULL, error);
113 return (DW_DLV_ERROR);
114 }
115
116 if (_dwarf_alloc(&dbg, mode, error) != DW_DLE_NONE)
117 return (DW_DLV_ERROR);
118
119 if (_dwarf_elf_init(dbg, elf, error) != DW_DLE_NONE) {
120 free(dbg);
121 return (DW_DLV_ERROR);
122 }
123
124 if ((ret = _dwarf_init(dbg, 0, errhand, errarg, error)) !=
125 DW_DLE_NONE) {
126 _dwarf_elf_deinit(dbg);
127 free(dbg);
128 if (ret == DW_DLE_DEBUG_INFO_NULL)
129 return (DW_DLV_NO_ENTRY);
130 else
131 return (DW_DLV_ERROR);
132 }
133
134 *ret_dbg = dbg;
135
136 return (DW_DLV_OK);
137 }
138
139 int
dwarf_object_init(Dwarf_Obj_Access_Interface * iface,Dwarf_Handler errhand,Dwarf_Ptr errarg,Dwarf_Debug * ret_dbg,Dwarf_Error * error)140 dwarf_object_init(Dwarf_Obj_Access_Interface *iface, Dwarf_Handler errhand,
141 Dwarf_Ptr errarg, Dwarf_Debug *ret_dbg, Dwarf_Error *error)
142 {
143 Dwarf_Debug dbg;
144
145 if (iface == NULL || ret_dbg == NULL) {
146 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
147 return (DW_DLV_ERROR);
148 }
149
150 if (_dwarf_alloc(&dbg, DW_DLC_READ, error) != DW_DLE_NONE)
151 return (DW_DLV_ERROR);
152
153 dbg->dbg_iface = iface;
154
155 if (_dwarf_init(dbg, 0, errhand, errarg, error) != DW_DLE_NONE) {
156 free(dbg);
157 return (DW_DLV_ERROR);
158 }
159
160 *ret_dbg = dbg;
161
162 return (DW_DLV_OK);
163 }
164