1*0a6a1f1dSLionel Sambuc /* $NetBSD: dwarf_errmsg.c,v 1.2 2014/03/09 16:58:03 christos Exp $ */
2*0a6a1f1dSLionel Sambuc
3*0a6a1f1dSLionel Sambuc /*-
4*0a6a1f1dSLionel Sambuc * Copyright (c) 2007 John Birrell (jb@freebsd.org)
5*0a6a1f1dSLionel Sambuc * All rights reserved.
6*0a6a1f1dSLionel Sambuc *
7*0a6a1f1dSLionel Sambuc * Redistribution and use in source and binary forms, with or without
8*0a6a1f1dSLionel Sambuc * modification, are permitted provided that the following conditions
9*0a6a1f1dSLionel Sambuc * are met:
10*0a6a1f1dSLionel Sambuc * 1. Redistributions of source code must retain the above copyright
11*0a6a1f1dSLionel Sambuc * notice, this list of conditions and the following disclaimer.
12*0a6a1f1dSLionel Sambuc * 2. Redistributions in binary form must reproduce the above copyright
13*0a6a1f1dSLionel Sambuc * notice, this list of conditions and the following disclaimer in the
14*0a6a1f1dSLionel Sambuc * documentation and/or other materials provided with the distribution.
15*0a6a1f1dSLionel Sambuc *
16*0a6a1f1dSLionel Sambuc * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17*0a6a1f1dSLionel Sambuc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18*0a6a1f1dSLionel Sambuc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19*0a6a1f1dSLionel Sambuc * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20*0a6a1f1dSLionel Sambuc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21*0a6a1f1dSLionel Sambuc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22*0a6a1f1dSLionel Sambuc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23*0a6a1f1dSLionel Sambuc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24*0a6a1f1dSLionel Sambuc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25*0a6a1f1dSLionel Sambuc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26*0a6a1f1dSLionel Sambuc * SUCH DAMAGE.
27*0a6a1f1dSLionel Sambuc */
28*0a6a1f1dSLionel Sambuc
29*0a6a1f1dSLionel Sambuc #include "_libdwarf.h"
30*0a6a1f1dSLionel Sambuc
31*0a6a1f1dSLionel Sambuc __RCSID("$NetBSD: dwarf_errmsg.c,v 1.2 2014/03/09 16:58:03 christos Exp $");
32*0a6a1f1dSLionel Sambuc ELFTC_VCSID("Id: dwarf_errmsg.c 2576 2012-09-13 09:16:11Z jkoshy ");
33*0a6a1f1dSLionel Sambuc
34*0a6a1f1dSLionel Sambuc static const char *_libdwarf_errors[] = {
35*0a6a1f1dSLionel Sambuc #define DEFINE_ERROR(N,S) [DW_DLE_##N] = S
36*0a6a1f1dSLionel Sambuc DEFINE_ERROR(NONE, "No Error"),
37*0a6a1f1dSLionel Sambuc DEFINE_ERROR(ERROR, "An error"),
38*0a6a1f1dSLionel Sambuc DEFINE_ERROR(NO_ENTRY, "No entry found"),
39*0a6a1f1dSLionel Sambuc DEFINE_ERROR(ARGUMENT, "Invalid argument"),
40*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DEBUG_INFO_NULL, "Debug info NULL"),
41*0a6a1f1dSLionel Sambuc DEFINE_ERROR(MEMORY, "Insufficient memory"),
42*0a6a1f1dSLionel Sambuc DEFINE_ERROR(ELF, "ELF error"),
43*0a6a1f1dSLionel Sambuc DEFINE_ERROR(CU_LENGTH_ERROR, "Invalid compilation unit data"),
44*0a6a1f1dSLionel Sambuc DEFINE_ERROR(VERSION_STAMP_ERROR, "Unsupported version"),
45*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DEBUG_ABBREV_NULL, "Abbrev not found"),
46*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DIE_NO_CU_CONTEXT, "No current compilation unit"),
47*0a6a1f1dSLionel Sambuc DEFINE_ERROR(LOC_EXPR_BAD, "Invalid location expression"),
48*0a6a1f1dSLionel Sambuc DEFINE_ERROR(EXPR_LENGTH_BAD, "Invalid DWARF expression length"),
49*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DEBUG_LOC_SECTION_SHORT, "Loclist section too short"),
50*0a6a1f1dSLionel Sambuc DEFINE_ERROR(ATTR_FORM_BAD, "Invalid attribute form"),
51*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DEBUG_LINE_LENGTH_BAD, "Line info section too short"),
52*0a6a1f1dSLionel Sambuc DEFINE_ERROR(LINE_FILE_NUM_BAD, "Invalid file number."),
53*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DIR_INDEX_BAD, "Invalid dir index."),
54*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DEBUG_FRAME_LENGTH_BAD, "Frame section too short"),
55*0a6a1f1dSLionel Sambuc DEFINE_ERROR(NO_CIE_FOR_FDE, "FDE without corresponding CIE"),
56*0a6a1f1dSLionel Sambuc DEFINE_ERROR(FRAME_AUGMENTATION_UNKNOWN, "Unknown CIE augmentation"),
57*0a6a1f1dSLionel Sambuc DEFINE_ERROR(FRAME_INSTR_EXEC_ERROR, "Frame instruction exec error"),
58*0a6a1f1dSLionel Sambuc DEFINE_ERROR(FRAME_VERSION_BAD, "Unsupported frame section version"),
59*0a6a1f1dSLionel Sambuc DEFINE_ERROR(FRAME_TABLE_COL_BAD, "Invalid table column value"),
60*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DF_REG_NUM_TOO_HIGH, "Register number too large"),
61*0a6a1f1dSLionel Sambuc DEFINE_ERROR(PC_NOT_IN_FDE_RANGE, "PC requested not in the FDE range"),
62*0a6a1f1dSLionel Sambuc DEFINE_ERROR(ARANGE_OFFSET_BAD, "Invalid address range offset"),
63*0a6a1f1dSLionel Sambuc DEFINE_ERROR(DEBUG_MACRO_INCONSISTENT, "Invalid macinfo data"),
64*0a6a1f1dSLionel Sambuc DEFINE_ERROR(ELF_SECT_ERR, "Application callback failed"),
65*0a6a1f1dSLionel Sambuc DEFINE_ERROR(NUM, "Unknown DWARF error")
66*0a6a1f1dSLionel Sambuc #undef DEFINE_ERROR
67*0a6a1f1dSLionel Sambuc };
68*0a6a1f1dSLionel Sambuc
69*0a6a1f1dSLionel Sambuc const char *
dwarf_errmsg_(Dwarf_Error * error)70*0a6a1f1dSLionel Sambuc dwarf_errmsg_(Dwarf_Error *error)
71*0a6a1f1dSLionel Sambuc {
72*0a6a1f1dSLionel Sambuc const char *p;
73*0a6a1f1dSLionel Sambuc
74*0a6a1f1dSLionel Sambuc if (error == NULL)
75*0a6a1f1dSLionel Sambuc return NULL;
76*0a6a1f1dSLionel Sambuc
77*0a6a1f1dSLionel Sambuc if (error->err_error < 0 || error->err_error >= DW_DLE_NUM)
78*0a6a1f1dSLionel Sambuc return _libdwarf_errors[DW_DLE_NUM];
79*0a6a1f1dSLionel Sambuc else if (error->err_error == DW_DLE_NONE)
80*0a6a1f1dSLionel Sambuc return _libdwarf_errors[DW_DLE_NONE];
81*0a6a1f1dSLionel Sambuc else
82*0a6a1f1dSLionel Sambuc p = _libdwarf_errors[error->err_error];
83*0a6a1f1dSLionel Sambuc
84*0a6a1f1dSLionel Sambuc if (error->err_error == DW_DLE_ELF)
85*0a6a1f1dSLionel Sambuc snprintf(error->err_msg, sizeof(error->err_msg),
86*0a6a1f1dSLionel Sambuc "ELF error : %s [%s(%d)]", elf_errmsg(error->err_elferror),
87*0a6a1f1dSLionel Sambuc error->err_func, error->err_line);
88*0a6a1f1dSLionel Sambuc else
89*0a6a1f1dSLionel Sambuc snprintf(error->err_msg, sizeof(error->err_msg),
90*0a6a1f1dSLionel Sambuc "%s [%s(%d)]", p, error->err_func, error->err_line);
91*0a6a1f1dSLionel Sambuc
92*0a6a1f1dSLionel Sambuc return (const char *) error->err_msg;
93*0a6a1f1dSLionel Sambuc }
94