1 /* $NetBSD: dwarf_pro_init.c,v 1.2 2014/03/09 16:58:04 christos Exp $ */
2
3 /*-
4 * Copyright (c) 2009 Kai Wang
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include "_libdwarf.h"
30
31 __RCSID("$NetBSD: dwarf_pro_init.c,v 1.2 2014/03/09 16:58:04 christos Exp $");
32 ELFTC_VCSID("Id: dwarf_pro_init.c 2074 2011-10-27 03:34:33Z jkoshy ");
33
34 Dwarf_P_Debug
dwarf_producer_init(Dwarf_Unsigned flags,Dwarf_Callback_Func func,Dwarf_Handler errhand,Dwarf_Ptr errarg,Dwarf_Error * error)35 dwarf_producer_init(Dwarf_Unsigned flags, Dwarf_Callback_Func func,
36 Dwarf_Handler errhand, Dwarf_Ptr errarg, Dwarf_Error *error)
37 {
38 Dwarf_P_Debug dbg;
39 int mode;
40
41 if (flags & DW_DLC_READ || flags & DW_DLC_RDWR) {
42 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
43 return (DW_DLV_BADADDR);
44 }
45
46 if (flags & DW_DLC_WRITE)
47 mode = DW_DLC_WRITE;
48 else {
49 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
50 return (DW_DLV_BADADDR);
51 }
52
53 if (func == NULL) {
54 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
55 return (DW_DLV_BADADDR);
56 }
57
58 if (_dwarf_alloc(&dbg, DW_DLC_WRITE, error) != DW_DLE_NONE)
59 return (DW_DLV_BADADDR);
60
61 dbg->dbg_mode = mode;
62
63 if (_dwarf_init(dbg, flags, errhand, errarg, error) != DW_DLE_NONE) {
64 free(dbg);
65 return (DW_DLV_BADADDR);
66 }
67
68 dbg->dbgp_func = func;
69
70 return (dbg);
71 }
72
73 Dwarf_P_Debug
dwarf_producer_init_b(Dwarf_Unsigned flags,Dwarf_Callback_Func_b func,Dwarf_Handler errhand,Dwarf_Ptr errarg,Dwarf_Error * error)74 dwarf_producer_init_b(Dwarf_Unsigned flags, Dwarf_Callback_Func_b func,
75 Dwarf_Handler errhand, Dwarf_Ptr errarg, Dwarf_Error *error)
76 {
77 Dwarf_P_Debug dbg;
78 int mode;
79
80 if (flags & DW_DLC_READ || flags & DW_DLC_RDWR) {
81 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
82 return (DW_DLV_BADADDR);
83 }
84
85 if (flags & DW_DLC_WRITE)
86 mode = DW_DLC_WRITE;
87 else {
88 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
89 return (DW_DLV_BADADDR);
90 }
91
92 if (func == NULL) {
93 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
94 return (DW_DLV_BADADDR);
95 }
96
97 if (_dwarf_alloc(&dbg, DW_DLC_WRITE, error) != DW_DLE_NONE)
98 return (DW_DLV_BADADDR);
99
100 dbg->dbg_mode = mode;
101
102 if (_dwarf_init(dbg, flags, errhand, errarg, error) != DW_DLE_NONE) {
103 free(dbg);
104 return (DW_DLV_BADADDR);
105 }
106
107 dbg->dbgp_func_b = func;
108
109 return (dbg);
110 }
111
112 int
dwarf_producer_set_isa(Dwarf_P_Debug dbg,enum Dwarf_ISA isa,Dwarf_Error * error)113 dwarf_producer_set_isa(Dwarf_P_Debug dbg, enum Dwarf_ISA isa,
114 Dwarf_Error *error)
115 {
116
117 if (dbg == NULL || isa >= DW_ISA_MAX) {
118 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
119 return (DW_DLV_ERROR);
120 }
121
122 dbg->dbgp_isa = isa;
123
124 return (DW_DLV_OK);
125 }
126