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 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 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 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 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