contrib/elftoolchain/libdwarf/dwarf_dump.c

   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_dump.c 2073 2011-10-27 03:30:47Z jkoshy $");
  31
  32 int
  33 dwarf_get_ACCESS_name(unsigned access, const char **s)
  34 {
  35
  36         assert(s != NULL);
  37
  38         switch (access) {
  39         case DW_ACCESS_public:
  40                 *s = "DW_ACCESS_public"; break;
  41         case DW_ACCESS_protected:
  42                 *s = "DW_ACCESS_protected"; break;
  43         case DW_ACCESS_private:
  44                 *s = "DW_ACCESS_private"; break;
  45         default:
  46                 return (DW_DLV_NO_ENTRY);
  47         }
  48
  49         return (DW_DLV_OK);
  50 }
  51
  52 int
  53 dwarf_get_AT_name(unsigned attr, const char **s)
  54 {
  55
  56         assert(s != NULL);
  57
  58         switch (attr) {
  59         case DW_AT_abstract_origin:
  60                 *s = "DW_AT_abstract_origin"; break;
  61         case DW_AT_accessibility:
  62                 *s = "DW_AT_accessibility"; break;
  63         case DW_AT_address_class:
  64                 *s = "DW_AT_address_class"; break;
  65         case DW_AT_artificial:
  66                 *s = "DW_AT_artificial"; break;
  67         case DW_AT_allocated:
  68                 *s = "DW_AT_allocated"; break;
  69         case DW_AT_associated:
  70                 *s = "DW_AT_associated"; break;
  71         case DW_AT_base_types:
  72                 *s = "DW_AT_base_types"; break;
  73         case DW_AT_binary_scale:
  74                 *s = "DW_AT_binary_scale"; break;
  75         case DW_AT_bit_offset:
  76                 *s = "DW_AT_bit_offset"; break;
  77         case DW_AT_bit_size:
  78                 *s = "DW_AT_bit_size"; break;
  79         case DW_AT_bit_stride:
  80                 *s = "DW_AT_bit_stride"; break;
  81         case DW_AT_byte_size:
  82                 *s = "DW_AT_byte_size"; break;
  83         case DW_AT_byte_stride:
  84                 *s = "DW_AT_byte_stride"; break;
  85         case DW_AT_calling_convention:
  86                 *s = "DW_AT_calling_convention"; break;
  87         case DW_AT_common_reference:
  88                 *s = "DW_AT_common_reference"; break;
  89         case DW_AT_comp_dir:
  90                 *s = "DW_AT_comp_dir"; break;
  91         case DW_AT_const_expr:
  92                 *s = "DW_AT_const_expr"; break;
  93         case DW_AT_const_value:
  94                 *s = "DW_AT_const_value"; break;
  95         case DW_AT_containing_type:
  96                 *s = "DW_AT_containing_type"; break;
  97         case DW_AT_count:
  98                 *s = "DW_AT_count"; break;
  99         case DW_AT_call_column:
 100                 *s = "DW_AT_call_column"; break;
 101         case DW_AT_call_file:
 102                 *s = "DW_AT_call_file"; break;
 103         case DW_AT_call_line:
 104                 *s = "DW_AT_call_line"; break;
 105         case DW_AT_data_bit_offset:
 106                 *s = "DW_AT_data_bit_offset"; break;
 107         case DW_AT_data_location:
 108                 *s = "DW_AT_data_location"; break;
 109         case DW_AT_data_member_location:
 110                 *s = "DW_AT_data_member_location"; break;
 111         case DW_AT_decl_column:
 112                 *s = "DW_AT_decl_column"; break;
 113         case DW_AT_decl_file:
 114                 *s = "DW_AT_decl_file"; break;
 115         case DW_AT_decl_line:
 116                 *s = "DW_AT_decl_line"; break;
 117         case DW_AT_declaration:
 118                 *s = "DW_AT_declaration"; break;
 119         case DW_AT_default_value:
 120                 *s = "DW_AT_default_value"; break;
 121         case DW_AT_decimal_scale:
 122                 *s = "DW_AT_decimal_scale"; break;
 123         case DW_AT_decimal_sign:
 124                 *s = "DW_AT_decimal_sign"; break;
 125         case DW_AT_description:
 126                 *s = "DW_AT_description"; break;
 127         case DW_AT_digit_count:
 128                 *s = "DW_AT_digit_count"; break;
 129         case DW_AT_discr:
 130                 *s = "DW_AT_discr"; break;
 131         case DW_AT_discr_list:
 132                 *s = "DW_AT_discr_list"; break;
 133         case DW_AT_discr_value:
 134                 *s = "DW_AT_discr_value"; break;
 135         case DW_AT_element_list:
 136                 *s = "DW_AT_element_list"; break;
 137         case DW_AT_encoding:
 138                 *s = "DW_AT_encoding"; break;
 139         case DW_AT_enum_class:
 140                 *s = "DW_AT_enum_class"; break;
 141         case DW_AT_external:
 142                 *s = "DW_AT_external"; break;
 143         case DW_AT_entry_pc:
 144                 *s = "DW_AT_entry_pc"; break;
 145         case DW_AT_extension:
 146                 *s = "DW_AT_extension"; break;
 147         case DW_AT_explicit:
 148                 *s = "DW_AT_explicit"; break;
 149         case DW_AT_endianity:
 150                 *s = "DW_AT_endianity"; break;
 151         case DW_AT_elemental:
 152                 *s = "DW_AT_elemental"; break;
 153         case DW_AT_frame_base:
 154                 *s = "DW_AT_frame_base"; break;
 155         case DW_AT_friend:
 156                 *s = "DW_AT_friend"; break;
 157         case DW_AT_high_pc:
 158                 *s = "DW_AT_high_pc"; break;
 159         case DW_AT_hi_user:
 160                 *s = "DW_AT_hi_user"; break;
 161         case DW_AT_identifier_case:
 162                 *s = "DW_AT_identifier_case"; break;
 163         case DW_AT_import:
 164                 *s = "DW_AT_import"; break;
 165         case DW_AT_inline:
 166                 *s = "DW_AT_inline"; break;
 167         case DW_AT_is_optional:
 168                 *s = "DW_AT_is_optional"; break;
 169         case DW_AT_language:
 170                 *s = "DW_AT_language"; break;
 171         case DW_AT_linkage_name:
 172                 *s = "DW_AT_linkage_name"; break;
 173         case DW_AT_lo_user:
 174                 *s = "DW_AT_lo_user"; break;
 175         case DW_AT_location:
 176                 *s = "DW_AT_location"; break;
 177         case DW_AT_low_pc:
 178                 *s = "DW_AT_low_pc"; break;
 179         case DW_AT_lower_bound:
 180                 *s = "DW_AT_lower_bound"; break;
 181         case DW_AT_macro_info:
 182                 *s = "DW_AT_macro_info"; break;
 183         case DW_AT_main_subprogram:
 184                 *s = "DW_AT_main_subprogram"; break;
 185         case DW_AT_mutable:
 186                 *s = "DW_AT_mutable"; break;
 187         case DW_AT_member:
 188                 *s = "DW_AT_member"; break;
 189         case DW_AT_name:
 190                 *s = "DW_AT_name"; break;
 191         case DW_AT_namelist_item:
 192                 *s = "DW_AT_namelist_item"; break;
 193         case DW_AT_ordering:
 194                 *s = "DW_AT_ordering"; break;
 195         case DW_AT_object_pointer:
 196                 *s = "DW_AT_object_pointer"; break;
 197         case DW_AT_priority:
 198                 *s = "DW_AT_priority"; break;
 199         case DW_AT_producer:
 200                 *s = "DW_AT_producer"; break;
 201         case DW_AT_prototyped:
 202                 *s = "DW_AT_prototyped"; break;
 203         case DW_AT_picture_string:
 204                 *s = "DW_AT_picture_string"; break;
 205         case DW_AT_pure:
 206                 *s = "DW_AT_pure"; break;
 207         case DW_AT_return_addr:
 208                 *s = "DW_AT_return_addr"; break;
 209         case DW_AT_ranges:
 210                 *s = "DW_AT_ranges"; break;
 211         case DW_AT_recursive:
 212                 *s = "DW_AT_recursive"; break;
 213         case DW_AT_segment:
 214                 *s = "DW_AT_segment"; break;
 215         case DW_AT_sibling:
 216                 *s = "DW_AT_sibling"; break;
 217         case DW_AT_signature:
 218                 *s = "DW_AT_signature"; break;
 219         case DW_AT_specification:
 220                 *s = "DW_AT_specification"; break;
 221         case DW_AT_start_scope:
 222                 *s = "DW_AT_start_scope"; break;
 223         case DW_AT_static_link:
 224                 *s = "DW_AT_static_link"; break;
 225         case DW_AT_stmt_list:
 226                 *s = "DW_AT_stmt_list"; break;
 227         case DW_AT_string_length:
 228                 *s = "DW_AT_string_length"; break;
 229         case DW_AT_subscr_data:
 230                 *s = "DW_AT_subscr_data"; break;
 231         case DW_AT_small:
 232                 *s = "DW_AT_small"; break;
 233         case DW_AT_type:
 234                 *s = "DW_AT_type"; break;
 235         case DW_AT_trampoline:
 236                 *s = "DW_AT_trampoline"; break;
 237         case DW_AT_threads_scaled:
 238                 *s = "DW_AT_threads_scaled"; break;
 239         case DW_AT_upper_bound:
 240                 *s = "DW_AT_upper_bound"; break;
 241         case DW_AT_use_location:
 242                 *s = "DW_AT_use_location"; break;
 243         case DW_AT_use_UTF8:
 244                 *s = "DW_AT_use_UTF8"; break;
 245         case DW_AT_variable_parameter:
 246                 *s = "DW_AT_variable_parameter"; break;
 247         case DW_AT_virtuality:
 248                 *s = "DW_AT_virtuality"; break;
 249         case DW_AT_visibility:
 250                 *s = "DW_AT_visibility"; break;
 251         case DW_AT_vtable_elem_location:
 252                 *s = "DW_AT_vtable_elem_location"; break;
 253         default:
 254                 return (DW_DLV_NO_ENTRY);
 255         }
 256
 257         return (DW_DLV_OK);
 258 }
 259
 260 int
 261 dwarf_get_ATE_name(unsigned ate, const char **s)
 262 {
 263
 264         assert(s != NULL);
 265
 266         switch(ate) {
 267         case DW_ATE_address:
 268                 *s = "DW_ATE_address"; break;
 269         case DW_ATE_boolean:
 270                 *s = "DW_ATE_boolean"; break;
 271         case DW_ATE_complex_float:
 272                 *s = "DW_ATE_complex_float"; break;
 273         case DW_ATE_float:
 274                 *s = "DW_ATE_float"; break;
 275         case DW_ATE_signed:
 276                 *s = "DW_ATE_signed"; break;
 277         case DW_ATE_signed_char:
 278                 *s = "DW_ATE_signed_char"; break;
 279         case DW_ATE_unsigned:
 280                 *s = "DW_ATE_unsigned"; break;
 281         case DW_ATE_unsigned_char:
 282                 *s = "DW_ATE_unsigned_char"; break;
 283         case DW_ATE_imaginary_float:
 284                 *s = "DW_ATE_imaginary_float"; break;
 285         case DW_ATE_packed_decimal:
 286                 *s = "DW_ATE_packed_decimal"; break;
 287         case DW_ATE_numeric_string:
 288                 *s = "DW_ATE_numeric_string"; break;
 289         case DW_ATE_edited:
 290                 *s = "DW_ATE_edited"; break;
 291         case DW_ATE_signed_fixed:
 292                 *s = "DW_ATE_signed_fixed"; break;
 293         case DW_ATE_unsigned_fixed:
 294                 *s = "DW_ATE_unsigned_fixed"; break;
 295         case DW_ATE_decimal_float:
 296                 *s = "DW_ATE_decimal_float"; break;
 297         case DW_ATE_lo_user:
 298                 *s = "DW_ATE_lo_user"; break;
 299         case DW_ATE_hi_user:
 300                 *s = "DW_ATE_hi_user"; break;
 301         default:
 302                 return (DW_DLV_NO_ENTRY);
 303         }
 304
 305         return (DW_DLV_OK);
 306 }
 307
 308 int
 309 dwarf_get_CC_name(unsigned cc, const char **s)
 310 {
 311
 312         assert(s != NULL);
 313
 314         switch (cc) {
 315         case DW_CC_normal:
 316                 *s = "DW_CC_normal"; break;
 317         case DW_CC_program:
 318                 *s = "DW_CC_program"; break;
 319         case DW_CC_nocall:
 320                 *s = "DW_CC_nocall"; break;
 321         case DW_CC_lo_user:
 322                 *s = "DW_CC_lo_user"; break;
 323         case DW_CC_hi_user:
 324                 *s = "DW_CC_hi_user"; break;
 325         default:
 326                 return (DW_DLV_NO_ENTRY);
 327         }
 328
 329         return (DW_DLV_OK);
 330 }
 331
 332 int
 333 dwarf_get_CFA_name(unsigned cfa, const char **s)
 334 {
 335
 336         assert(s != NULL);
 337
 338         switch (cfa) {
 339         case DW_CFA_advance_loc:
 340                 *s = "DW_CFA_advance_loc"; break;
 341         case DW_CFA_offset:
 342                 *s = "DW_CFA_offset"; break;
 343         case DW_CFA_restore:
 344                 *s = "DW_CFA_restore"; break;
 345         case DW_CFA_nop:
 346                 *s = "DW_CFA_nop"; break;
 347         case DW_CFA_set_loc:
 348                 *s = "DW_CFA_set_loc"; break;
 349         case DW_CFA_advance_loc1:
 350                 *s = "DW_CFA_advance_loc1"; break;
 351         case DW_CFA_advance_loc2:
 352                 *s = "DW_CFA_advance_loc2"; break;
 353         case DW_CFA_advance_loc4:
 354                 *s = "DW_CFA_advance_loc4"; break;
 355         case DW_CFA_offset_extended:
 356                 *s = "DW_CFA_offset_extended"; break;
 357         case DW_CFA_restore_extended:
 358                 *s = "DW_CFA_restore_extended"; break;
 359         case DW_CFA_undefined:
 360                 *s = "DW_CFA_undefined"; break;
 361         case DW_CFA_same_value:
 362                 *s = "DW_CFA_same_value"; break;
 363         case DW_CFA_register:
 364                 *s = "DW_CFA_register"; break;
 365         case DW_CFA_remember_state:
 366                 *s = "DW_CFA_remember_state"; break;
 367         case DW_CFA_restore_state:
 368                 *s = "DW_CFA_restore_state"; break;
 369         case DW_CFA_def_cfa:
 370                 *s = "DW_CFA_def_cfa"; break;
 371         case DW_CFA_def_cfa_register:
 372                 *s = "DW_CFA_def_cfa_register"; break;
 373         case DW_CFA_def_cfa_offset:
 374                 *s = "DW_CFA_def_cfa_offset"; break;
 375         case DW_CFA_def_cfa_expression:
 376                 *s = "DW_CFA_def_cfa_expression"; break;
 377         case DW_CFA_expression:
 378                 *s = "DW_CFA_expression"; break;
 379         case DW_CFA_offset_extended_sf:
 380                 *s = "DW_CFA_offset_extended_sf"; break;
 381         case DW_CFA_def_cfa_sf:
 382                 *s = "DW_CFA_def_cfa_sf"; break;
 383         case DW_CFA_def_cfa_offset_sf:
 384                 *s = "DW_CFA_def_cfa_offset_sf"; break;
 385         case DW_CFA_val_offset:
 386                 *s = "DW_CFA_val_offset"; break;
 387         case DW_CFA_val_offset_sf:
 388                 *s = "DW_CFA_val_offset_sf"; break;
 389         case DW_CFA_val_expression:
 390                 *s = "DW_CFA_val_expression"; break;
 391         case DW_CFA_lo_user:
 392                 *s = "DW_CFA_lo_user"; break;
 393         case DW_CFA_high_user:
 394                 *s = "DW_CFA_high_user"; break;
 395         default:
 396                 return (DW_DLV_NO_ENTRY);
 397         }
 398
 399         return (DW_DLV_OK);
 400 }
 401
 402 int
 403 dwarf_get_CHILDREN_name(unsigned children, const char **s)
 404 {
 405
 406         assert(s != NULL);
 407
 408         switch (children) {
 409         case DW_CHILDREN_no:
 410                 *s = "DW_CHILDREN_no"; break;
 411         case DW_CHILDREN_yes:
 412                 *s = "DW_CHILDREN_yes"; break;
 413         default:
 414                 return (DW_DLV_NO_ENTRY);
 415         }
 416
 417         return (DW_DLV_OK);
 418 }
 419
 420 int
 421 dwarf_get_FORM_name(unsigned form, const char **s)
 422 {
 423
 424         assert(s != NULL);
 425
 426         switch (form) {
 427         case DW_FORM_addr:
 428                 *s = "DW_FORM_addr"; break;
 429         case DW_FORM_block:
 430                 *s = "DW_FORM_block"; break;
 431         case DW_FORM_block1:
 432                 *s = "DW_FORM_block1"; break;
 433         case DW_FORM_block2:
 434                 *s = "DW_FORM_block2"; break;
 435         case DW_FORM_block4:
 436                 *s = "DW_FORM_block4"; break;
 437         case DW_FORM_data1:
 438                 *s = "DW_FORM_data1"; break;
 439         case DW_FORM_data2:
 440                 *s = "DW_FORM_data2"; break;
 441         case DW_FORM_data4:
 442                 *s = "DW_FORM_data4"; break;
 443         case DW_FORM_data8:
 444                 *s = "DW_FORM_data8"; break;
 445         case DW_FORM_exprloc:
 446                 *s = "DW_FORM_exprloc"; break;
 447         case DW_FORM_flag:
 448                 *s = "DW_FORM_flag"; break;
 449         case DW_FORM_flag_present:
 450                 *s = "DW_FORM_flag_present"; break;
 451         case DW_FORM_indirect:
 452                 *s = "DW_FORM_indirect"; break;
 453         case DW_FORM_ref1:
 454                 *s = "DW_FORM_ref1"; break;
 455         case DW_FORM_ref2:
 456                 *s = "DW_FORM_ref2"; break;
 457         case DW_FORM_ref4:
 458                 *s = "DW_FORM_ref4"; break;
 459         case DW_FORM_ref8:
 460                 *s = "DW_FORM_ref8"; break;
 461         case DW_FORM_ref_addr:
 462                 *s = "DW_FORM_ref_addr"; break;
 463         case DW_FORM_ref_sig8:
 464                 *s = "DW_FORM_ref_sig8"; break;
 465         case DW_FORM_ref_udata:
 466                 *s = "DW_FORM_ref_udata"; break;
 467         case DW_FORM_sdata:
 468                 *s = "DW_FORM_sdata"; break;
 469         case DW_FORM_sec_offset:
 470                 *s = "DW_FORM_sec_offset"; break;
 471         case DW_FORM_string:
 472                 *s = "DW_FORM_string"; break;
 473         case DW_FORM_strp:
 474                 *s = "DW_FORM_strp"; break;
 475         case DW_FORM_udata:
 476                 *s = "DW_FORM_udata"; break;
 477         default:
 478                 return (DW_DLV_NO_ENTRY);
 479         }
 480
 481         return (DW_DLV_OK);
 482 }
 483
 484 int
 485 dwarf_get_DS_name(unsigned ds, const char **s)
 486 {
 487
 488         assert(s != NULL);
 489
 490         switch (ds) {
 491         case DW_DS_unsigned:
 492                 *s = "DW_DS_unsigned"; break;
 493         case DW_DS_leading_overpunch:
 494                 *s = "DW_DS_leading_overpunch"; break;
 495         case DW_DS_trailing_overpunch:
 496                 *s = "DW_DS_trailing_overpunch"; break;
 497         case DW_DS_leading_separate:
 498                 *s = "DW_DS_leading_separate"; break;
 499         case DW_DS_trailing_separate:
 500                 *s = "DW_DS_trailing_separate";
 501         default:
 502                 return (DW_DLV_NO_ENTRY);
 503         }
 504
 505         return (DW_DLV_OK);
 506 }
 507
 508 int
 509 dwarf_get_DSC_name(unsigned dsc, const char **s)
 510 {
 511
 512         assert(s != NULL);
 513
 514         switch (dsc) {
 515         case DW_DSC_label:
 516                 *s = "DW_DSC_label"; break;
 517         case DW_DSC_range:
 518                 *s = "DW_DSC_range"; break;
 519         default:
 520                 return (DW_DLV_NO_ENTRY);
 521         }
 522
 523         return (DW_DLV_OK);
 524 }
 525
 526 int
 527 dwarf_get_EH_name(unsigned eh, const char **s)
 528 {
 529
 530         assert(s != NULL);
 531
 532         switch (eh) {
 533         case DW_EH_PE_absptr:
 534                 *s = "DW_EH_PE_absptr"; break;
 535         case DW_EH_PE_uleb128:
 536                 *s = "DW_EH_PE_uleb128"; break;
 537         case DW_EH_PE_udata2:
 538                 *s = "DW_EH_PE_udata2"; break;
 539         case DW_EH_PE_udata4:
 540                 *s = "DW_EH_PE_udata4"; break;
 541         case DW_EH_PE_udata8:
 542                 *s = "DW_EH_PE_udata8"; break;
 543         case DW_EH_PE_sleb128:
 544                 *s = "DW_EH_PE_sleb128"; break;
 545         case DW_EH_PE_sdata2:
 546                 *s = "DW_EH_PE_sdata2"; break;
 547         case DW_EH_PE_sdata4:
 548                 *s = "DW_EH_PE_sdata4"; break;
 549         case DW_EH_PE_sdata8:
 550                 *s = "DW_EH_PE_sdata8"; break;
 551         case DW_EH_PE_pcrel:
 552                 *s = "DW_EH_PE_pcrel"; break;
 553         case DW_EH_PE_textrel:
 554                 *s = "DW_EH_PE_textrel"; break;
 555         case DW_EH_PE_datarel:
 556                 *s = "DW_EH_PE_datarel"; break;
 557         case DW_EH_PE_funcrel:
 558                 *s = "DW_EH_PE_funcrel"; break;
 559         case DW_EH_PE_aligned:
 560                 *s = "DW_EH_PE_aligned"; break;
 561         case DW_EH_PE_omit:
 562                 *s = "DW_EH_PE_omit"; break;
 563         default:
 564                 return (DW_DLV_NO_ENTRY);
 565         }
 566
 567         return (DW_DLV_OK);
 568 }
 569
 570 int
 571 dwarf_get_END_name(unsigned end, const char **s)
 572 {
 573
 574         assert(s != NULL);
 575
 576         switch (end) {
 577         case DW_END_default:
 578                 *s = "DW_END_default"; break;
 579         case DW_END_big:
 580                 *s = "DW_END_big"; break;
 581         case DW_END_little:
 582                 *s = "DW_END_little"; break;
 583         case DW_END_lo_user:
 584                 *s = "DW_END_lo_user"; break;
 585         case DW_END_high_user:
 586                 *s = "DW_END_high_user"; break;
 587         default:
 588                 return (DW_DLV_NO_ENTRY);
 589         }
 590
 591         return (DW_DLV_OK);
 592 }
 593
 594 int
 595 dwarf_get_ID_name(unsigned id, const char **s)
 596 {
 597
 598         assert(s != NULL);
 599
 600         switch (id) {
 601         case DW_ID_case_sensitive:
 602                 *s = "DW_ID_case_sensitive"; break;
 603         case DW_ID_up_case:
 604                 *s = "DW_ID_up_case"; break;
 605         case DW_ID_down_case:
 606                 *s = "DW_ID_down_case"; break;
 607         case DW_ID_case_insensitive:
 608                 *s = "DW_ID_case_insensitive"; break;
 609         default:
 610                 return (DW_DLV_NO_ENTRY);
 611         }
 612
 613         return (DW_DLV_OK);
 614 }
 615
 616 int
 617 dwarf_get_INL_name(unsigned inl, const char **s)
 618 {
 619
 620         assert(s != NULL);
 621
 622         switch (inl) {
 623         case DW_INL_not_inlined:
 624                 *s = "DW_INL_not_inlined"; break;
 625         case DW_INL_inlined:
 626                 *s = "DW_INL_inlined"; break;
 627         case DW_INL_declared_not_inlined:
 628                 *s = "DW_INL_declared_not_inlined"; break;
 629         case DW_INL_declared_inlined:
 630                 *s = "DW_INL_declared_inlined"; break;
 631         default:
 632                 return (DW_DLV_NO_ENTRY);
 633         }
 634
 635         return (DW_DLV_OK);
 636 }
 637
 638 int
 639 dwarf_get_LANG_name(unsigned lang, const char **s)
 640 {
 641
 642         assert(s != NULL);
 643
 644         switch (lang) {
 645         case DW_LANG_C89:
 646                 *s = "DW_LANG_C89"; break;
 647         case DW_LANG_C:
 648                 *s = "DW_LANG_C"; break;
 649         case DW_LANG_Ada83:
 650                 *s = "DW_LANG_Ada83"; break;
 651         case DW_LANG_C_plus_plus:
 652                 *s = "DW_LANG_C_plus_plus"; break;
 653         case DW_LANG_Cobol74:
 654                 *s = "DW_LANG_Cobol74"; break;
 655         case DW_LANG_Cobol85:
 656                 *s = "DW_LANG_Cobol85"; break;
 657         case DW_LANG_Fortran77:
 658                 *s = "DW_LANG_Fortran77"; break;
 659         case DW_LANG_Fortran90:
 660                 *s = "DW_LANG_Fortran90"; break;
 661         case DW_LANG_Pascal83:
 662                 *s = "DW_LANG_Pascal83"; break;
 663         case DW_LANG_Modula2:
 664                 *s = "DW_LANG_Modula2"; break;
 665         case DW_LANG_Java:
 666                 *s = "DW_LANG_Java"; break;
 667         case DW_LANG_C99:
 668                 *s = "DW_LANG_C99"; break;
 669         case DW_LANG_Ada95:
 670                 *s = "DW_LANG_Ada95"; break;
 671         case DW_LANG_Fortran95:
 672                 *s = "DW_LANG_Fortran95"; break;
 673         case DW_LANG_PLI:
 674                 *s = "DW_LANG_PLI"; break;
 675         case DW_LANG_ObjC:
 676                 *s = "DW_LANG_ObjC"; break;
 677         case DW_LANG_ObjC_plus_plus:
 678                 *s = "DW_LANG_ObjC_plus_plus"; break;
 679         case DW_LANG_UPC:
 680                 *s = "DW_LANG_UPC"; break;
 681         case DW_LANG_D:
 682                 *s = "DW_LANG_D"; break;
 683         case DW_LANG_lo_user:
 684                 *s = "DW_LANG_lo_user"; break;
 685         case DW_LANG_hi_user:
 686                 *s = "DW_LANG_hi_user"; break;
 687         default:
 688                 return (DW_DLV_NO_ENTRY);
 689         }
 690
 691         return (DW_DLV_OK);
 692 }
 693
 694 int
 695 dwarf_get_LNE_name(unsigned lne, const char **s)
 696 {
 697
 698         assert(s != NULL);
 699
 700         switch (lne) {
 701         case DW_LNE_end_sequence:
 702                 *s = "DW_LNE_end_sequence"; break;
 703         case DW_LNE_set_address:
 704                 *s = "DW_LNE_set_address"; break;
 705         case DW_LNE_define_file:
 706                 *s = "DW_LNE_define_file"; break;
 707         case DW_LNE_lo_user:
 708                 *s = "DW_LNE_lo_user"; break;
 709         case DW_LNE_hi_user:
 710                 *s = "DW_LNE_hi_user"; break;
 711         default:
 712                 return (DW_DLV_NO_ENTRY);
 713         }
 714
 715         return (DW_DLV_OK);
 716 }
 717
 718 int
 719 dwarf_get_LNS_name(unsigned lns, const char **s)
 720 {
 721
 722         assert(s != NULL);
 723
 724         switch (lns) {
 725         case DW_LNS_copy:
 726                 *s = "DW_LNS_copy"; break;
 727         case DW_LNS_advance_pc:
 728                 *s = "DW_LNS_advance_pc"; break;
 729         case DW_LNS_advance_line:
 730                 *s = "DW_LNS_advance_line"; break;
 731         case DW_LNS_set_file:
 732                 *s = "DW_LNS_set_file"; break;
 733         case DW_LNS_set_column:
 734                 *s = "DW_LNS_set_column"; break;
 735         case DW_LNS_negate_stmt:
 736                 *s = "DW_LNS_negate_stmt"; break;
 737         case DW_LNS_set_basic_block:
 738                 *s = "DW_LNS_set_basic_block"; break;
 739         case DW_LNS_const_add_pc:
 740                 *s = "DW_LNS_const_add_pc"; break;
 741         case DW_LNS_fixed_advance_pc:
 742                 *s = "DW_LNS_fixed_advance_pc"; break;
 743         case DW_LNS_set_prologue_end:
 744                 *s = "DW_LNS_set_prologue_end"; break;
 745         case DW_LNS_set_epilogue_begin:
 746                 *s = "DW_LNS_set_epilogue_begin"; break;
 747         case DW_LNS_set_isa:
 748                 *s = "DW_LNS_set_isa"; break;
 749         default:
 750                 return (DW_DLV_NO_ENTRY);
 751         }
 752
 753         return (DW_DLV_OK);
 754 }
 755
 756 int
 757 dwarf_get_MACINFO_name(unsigned mi, const char **s)
 758 {
 759
 760         assert(s != NULL);
 761
 762         switch (mi) {
 763         case DW_MACINFO_define:
 764                 *s = "DW_MACINFO_define"; break;
 765         case DW_MACINFO_undef:
 766                 *s = "DW_MACINFO_undef"; break;
 767         case DW_MACINFO_start_file:
 768                 *s = "DW_MACINFO_start_file"; break;
 769         case DW_MACINFO_end_file:
 770                 *s = "DW_MACINFO_end_file"; break;
 771         case DW_MACINFO_vendor_ext:
 772                 *s = "DW_MACINFO_vendor_ext"; break;
 773         default:
 774                 return (DW_DLV_NO_ENTRY);
 775         }
 776
 777         return (DW_DLV_OK);
 778 }
 779
 780 int
 781 dwarf_get_OP_name(unsigned op, const char **s)
 782 {
 783
 784         assert(s != NULL);
 785
 786         switch (op) {
 787         case DW_OP_deref:
 788                 *s = "DW_OP_deref"; break;
 789         case DW_OP_reg0:
 790                 *s = "DW_OP_reg0"; break;
 791         case DW_OP_reg1:
 792                 *s = "DW_OP_reg1"; break;
 793         case DW_OP_reg2:
 794                 *s = "DW_OP_reg2"; break;
 795         case DW_OP_reg3:
 796                 *s = "DW_OP_reg3"; break;
 797         case DW_OP_reg4:
 798                 *s = "DW_OP_reg4"; break;
 799         case DW_OP_reg5:
 800                 *s = "DW_OP_reg5"; break;
 801         case DW_OP_reg6:
 802                 *s = "DW_OP_reg6"; break;
 803         case DW_OP_reg7:
 804                 *s = "DW_OP_reg7"; break;
 805         case DW_OP_reg8:
 806                 *s = "DW_OP_reg8"; break;
 807         case DW_OP_reg9:
 808                 *s = "DW_OP_reg9"; break;
 809         case DW_OP_reg10:
 810                 *s = "DW_OP_reg10"; break;
 811         case DW_OP_reg11:
 812                 *s = "DW_OP_reg11"; break;
 813         case DW_OP_reg12:
 814                 *s = "DW_OP_reg12"; break;
 815         case DW_OP_reg13:
 816                 *s = "DW_OP_reg13"; break;
 817         case DW_OP_reg14:
 818                 *s = "DW_OP_reg14"; break;
 819         case DW_OP_reg15:
 820                 *s = "DW_OP_reg15"; break;
 821         case DW_OP_reg16:
 822                 *s = "DW_OP_reg16"; break;
 823         case DW_OP_reg17:
 824                 *s = "DW_OP_reg17"; break;
 825         case DW_OP_reg18:
 826                 *s = "DW_OP_reg18"; break;
 827         case DW_OP_reg19:
 828                 *s = "DW_OP_reg19"; break;
 829         case DW_OP_reg20:
 830                 *s = "DW_OP_reg20"; break;
 831         case DW_OP_reg21:
 832                 *s = "DW_OP_reg21"; break;
 833         case DW_OP_reg22:
 834                 *s = "DW_OP_reg22"; break;
 835         case DW_OP_reg23:
 836                 *s = "DW_OP_reg23"; break;
 837         case DW_OP_reg24:
 838                 *s = "DW_OP_reg24"; break;
 839         case DW_OP_reg25:
 840                 *s = "DW_OP_reg25"; break;
 841         case DW_OP_reg26:
 842                 *s = "DW_OP_reg26"; break;
 843         case DW_OP_reg27:
 844                 *s = "DW_OP_reg27"; break;
 845         case DW_OP_reg28:
 846                 *s = "DW_OP_reg28"; break;
 847         case DW_OP_reg29:
 848                 *s = "DW_OP_reg29"; break;
 849         case DW_OP_reg30:
 850                 *s = "DW_OP_reg30"; break;
 851         case DW_OP_reg31:
 852                 *s = "DW_OP_reg31"; break;
 853         case DW_OP_lit0:
 854                 *s = "DW_OP_lit0"; break;
 855         case DW_OP_lit1:
 856                 *s = "DW_OP_lit1"; break;
 857         case DW_OP_lit2:
 858                 *s = "DW_OP_lit2"; break;
 859         case DW_OP_lit3:
 860                 *s = "DW_OP_lit3"; break;
 861         case DW_OP_lit4:
 862                 *s = "DW_OP_lit4"; break;
 863         case DW_OP_lit5:
 864                 *s = "DW_OP_lit5"; break;
 865         case DW_OP_lit6:
 866                 *s = "DW_OP_lit6"; break;
 867         case DW_OP_lit7:
 868                 *s = "DW_OP_lit7"; break;
 869         case DW_OP_lit8:
 870                 *s = "DW_OP_lit8"; break;
 871         case DW_OP_lit9:
 872                 *s = "DW_OP_lit9"; break;
 873         case DW_OP_lit10:
 874                 *s = "DW_OP_lit10"; break;
 875         case DW_OP_lit11:
 876                 *s = "DW_OP_lit11"; break;
 877         case DW_OP_lit12:
 878                 *s = "DW_OP_lit12"; break;
 879         case DW_OP_lit13:
 880                 *s = "DW_OP_lit13"; break;
 881         case DW_OP_lit14:
 882                 *s = "DW_OP_lit14"; break;
 883         case DW_OP_lit15:
 884                 *s = "DW_OP_lit15"; break;
 885         case DW_OP_lit16:
 886                 *s = "DW_OP_lit16"; break;
 887         case DW_OP_lit17:
 888                 *s = "DW_OP_lit17"; break;
 889         case DW_OP_lit18:
 890                 *s = "DW_OP_lit18"; break;
 891         case DW_OP_lit19:
 892                 *s = "DW_OP_lit19"; break;
 893         case DW_OP_lit20:
 894                 *s = "DW_OP_lit20"; break;
 895         case DW_OP_lit21:
 896                 *s = "DW_OP_lit21"; break;
 897         case DW_OP_lit22:
 898                 *s = "DW_OP_lit22"; break;
 899         case DW_OP_lit23:
 900                 *s = "DW_OP_lit23"; break;
 901         case DW_OP_lit24:
 902                 *s = "DW_OP_lit24"; break;
 903         case DW_OP_lit25:
 904                 *s = "DW_OP_lit25"; break;
 905         case DW_OP_lit26:
 906                 *s = "DW_OP_lit26"; break;
 907         case DW_OP_lit27:
 908                 *s = "DW_OP_lit27"; break;
 909         case DW_OP_lit28:
 910                 *s = "DW_OP_lit28"; break;
 911         case DW_OP_lit29:
 912                 *s = "DW_OP_lit29"; break;
 913         case DW_OP_lit30:
 914                 *s = "DW_OP_lit30"; break;
 915         case DW_OP_lit31:
 916                 *s = "DW_OP_lit31"; break;
 917         case DW_OP_dup:
 918                 *s = "DW_OP_dup"; break;
 919         case DW_OP_drop:
 920                 *s = "DW_OP_drop"; break;
 921         case DW_OP_over:
 922                 *s = "DW_OP_over"; break;
 923         case DW_OP_swap:
 924                 *s = "DW_OP_swap"; break;
 925         case DW_OP_rot:
 926                 *s = "DW_OP_rot"; break;
 927         case DW_OP_xderef:
 928                 *s = "DW_OP_xderef"; break;
 929         case DW_OP_abs:
 930                 *s = "DW_OP_abs"; break;
 931         case DW_OP_and:
 932                 *s = "DW_OP_and"; break;
 933         case DW_OP_div:
 934                 *s = "DW_OP_div"; break;
 935         case DW_OP_minus:
 936                 *s = "DW_OP_minus"; break;
 937         case DW_OP_mod:
 938                 *s = "DW_OP_mod"; break;
 939         case DW_OP_mul:
 940                 *s = "DW_OP_mul"; break;
 941         case DW_OP_neg:
 942                 *s = "DW_OP_neg"; break;
 943         case DW_OP_not:
 944                 *s = "DW_OP_not"; break;
 945         case DW_OP_or:
 946                 *s = "DW_OP_or"; break;
 947         case DW_OP_plus:
 948                 *s = "DW_OP_plus"; break;
 949         case DW_OP_shl:
 950                 *s = "DW_OP_shl"; break;
 951         case DW_OP_shr:
 952                 *s = "DW_OP_shr"; break;
 953         case DW_OP_shra:
 954                 *s = "DW_OP_shra"; break;
 955         case DW_OP_xor:
 956                 *s = "DW_OP_xor"; break;
 957         case DW_OP_eq:
 958                 *s = "DW_OP_eq"; break;
 959         case DW_OP_ge:
 960                 *s = "DW_OP_ge"; break;
 961         case DW_OP_gt:
 962                 *s = "DW_OP_gt"; break;
 963         case DW_OP_le:
 964                 *s = "DW_OP_le"; break;
 965         case DW_OP_lt:
 966                 *s = "DW_OP_lt"; break;
 967         case DW_OP_ne:
 968                 *s = "DW_OP_ne"; break;
 969         case DW_OP_nop:
 970                 *s = "DW_OP_nop"; break;
 971         case DW_OP_const1u:
 972                 *s = "DW_OP_const1u"; break;
 973         case DW_OP_const1s:
 974                 *s = "DW_OP_const1s"; break;
 975         case DW_OP_pick:
 976                 *s = "DW_OP_pick"; break;
 977         case DW_OP_deref_size:
 978                 *s = "DW_OP_deref_size"; break;
 979         case DW_OP_xderef_size:
 980                 *s = "DW_OP_xderef_size"; break;
 981         case DW_OP_const2u:
 982                 *s = "DW_OP_const2u"; break;
 983         case DW_OP_const2s:
 984                 *s = "DW_OP_const2s"; break;
 985         case DW_OP_bra:
 986                 *s = "DW_OP_bra"; break;
 987         case DW_OP_skip:
 988                 *s = "DW_OP_skip"; break;
 989         case DW_OP_const4u:
 990                 *s = "DW_OP_const4u"; break;
 991         case DW_OP_const4s:
 992                 *s = "DW_OP_const4s"; break;
 993         case DW_OP_const8u:
 994                 *s = "DW_OP_const8u"; break;
 995         case DW_OP_const8s:
 996                 *s = "DW_OP_const8s"; break;
 997         case DW_OP_constu:
 998                 *s = "DW_OP_constu"; break;
 999         case DW_OP_plus_uconst:
1000                 *s = "DW_OP_plus_uconst"; break;
1001         case DW_OP_regx:
1002                 *s = "DW_OP_regx"; break;
1003         case DW_OP_piece:
1004                 *s = "DW_OP_piece"; break;
1005         case DW_OP_consts:
1006                 *s = "DW_OP_consts"; break;
1007         case DW_OP_breg0:
1008                 *s = "DW_OP_breg0"; break;
1009         case DW_OP_breg1:
1010                 *s = "DW_OP_breg1"; break;
1011         case DW_OP_breg2:
1012                 *s = "DW_OP_breg2"; break;
1013         case DW_OP_breg3:
1014                 *s = "DW_OP_breg3"; break;
1015         case DW_OP_breg4:
1016                 *s = "DW_OP_breg4"; break;
1017         case DW_OP_breg5:
1018                 *s = "DW_OP_breg5"; break;
1019         case DW_OP_breg6:
1020                 *s = "DW_OP_breg6"; break;
1021         case DW_OP_breg7:
1022                 *s = "DW_OP_breg7"; break;
1023         case DW_OP_breg8:
1024                 *s = "DW_OP_breg8"; break;
1025         case DW_OP_breg9:
1026                 *s = "DW_OP_breg9"; break;
1027         case DW_OP_breg10:
1028                 *s = "DW_OP_breg10"; break;
1029         case DW_OP_breg11:
1030                 *s = "DW_OP_breg11"; break;
1031         case DW_OP_breg12:
1032                 *s = "DW_OP_breg12"; break;
1033         case DW_OP_breg13:
1034                 *s = "DW_OP_breg13"; break;
1035         case DW_OP_breg14:
1036                 *s = "DW_OP_breg14"; break;
1037         case DW_OP_breg15:
1038                 *s = "DW_OP_breg15"; break;
1039         case DW_OP_breg16:
1040                 *s = "DW_OP_breg16"; break;
1041         case DW_OP_breg17:
1042                 *s = "DW_OP_breg17"; break;
1043         case DW_OP_breg18:
1044                 *s = "DW_OP_breg18"; break;
1045         case DW_OP_breg19:
1046                 *s = "DW_OP_breg19"; break;
1047         case DW_OP_breg20:
1048                 *s = "DW_OP_breg20"; break;
1049         case DW_OP_breg21:
1050                 *s = "DW_OP_breg21"; break;
1051         case DW_OP_breg22:
1052                 *s = "DW_OP_breg22"; break;
1053         case DW_OP_breg23:
1054                 *s = "DW_OP_breg23"; break;
1055         case DW_OP_breg24:
1056                 *s = "DW_OP_breg24"; break;
1057         case DW_OP_breg25:
1058                 *s = "DW_OP_breg25"; break;
1059         case DW_OP_breg26:
1060                 *s = "DW_OP_breg26"; break;
1061         case DW_OP_breg27:
1062                 *s = "DW_OP_breg27"; break;
1063         case DW_OP_breg28:
1064                 *s = "DW_OP_breg28"; break;
1065         case DW_OP_breg29:
1066                 *s = "DW_OP_breg29"; break;
1067         case DW_OP_breg30:
1068                 *s = "DW_OP_breg30"; break;
1069         case DW_OP_breg31:
1070                 *s = "DW_OP_breg31"; break;
1071         case DW_OP_fbreg:
1072                 *s = "DW_OP_fbreg"; break;
1073         case DW_OP_bregx:
1074                 *s = "DW_OP_bregx"; break;
1075         case DW_OP_addr:
1076                 *s = "DW_OP_addr"; break;
1077         case DW_OP_push_object_address:
1078                 *s = "DW_OP_push_object_address"; break;
1079         case DW_OP_call2:
1080                 *s = "DW_OP_call2"; break;
1081         case DW_OP_call4:
1082                 *s = "DW_OP_call4"; break;
1083         case DW_OP_call_ref:
1084                 *s = "DW_OP_call_ref"; break;
1085         case DW_OP_form_tls_address:
1086                 *s = "DW_OP_form_tls_address"; break;
1087         case DW_OP_call_frame_cfa:
1088                 *s = "DW_OP_call_frame_cfa"; break;
1089         case DW_OP_bit_piece:
1090                 *s = "DW_OP_bit_piece"; break;
1091         case DW_OP_implicit_value:
1092                 *s = "DW_OP_implicit_value"; break;
1093         case DW_OP_stack_value:
1094                 *s = "DW_OP_stack_value"; break;
1095         case DW_OP_GNU_push_tls_address:
1096                 *s = "DW_OP_GNU_push_tls_address"; break;
1097         default:
1098                 return (DW_DLV_NO_ENTRY);
1099         }
1100
1101         return (DW_DLV_OK);
1102 }
1103
1104 int
1105 dwarf_get_ORD_name(unsigned ord, const char **s)
1106 {
1107
1108         assert(s != NULL);
1109
1110         switch (ord) {
1111         case DW_ORD_row_major:
1112                 *s = "DW_ORD_row_major"; break;
1113         case DW_ORD_col_major:
1114                 *s = "DW_ORD_col_major"; break;
1115         default:
1116                 return (DW_DLV_NO_ENTRY);
1117         }
1118
1119         return (DW_DLV_OK);
1120 }
1121
1122 int
1123 dwarf_get_TAG_name(unsigned tag, const char **s)
1124 {
1125
1126         assert(s != NULL);
1127
1128         switch (tag) {
1129         case DW_TAG_access_declaration:
1130                 *s = "DW_TAG_access_declaration"; break;
1131         case DW_TAG_array_type:
1132                 *s = "DW_TAG_array_type"; break;
1133         case DW_TAG_base_type:
1134                 *s = "DW_TAG_base_type"; break;
1135         case DW_TAG_catch_block:
1136                 *s = "DW_TAG_catch_block"; break;
1137         case DW_TAG_class_type:
1138                 *s = "DW_TAG_class_type"; break;
1139         case DW_TAG_common_block:
1140                 *s = "DW_TAG_common_block"; break;
1141         case DW_TAG_common_inclusion:
1142                 *s = "DW_TAG_common_inclusion"; break;
1143         case DW_TAG_compile_unit:
1144                 *s = "DW_TAG_compile_unit"; break;
1145         case DW_TAG_condition:
1146                 *s = "DW_TAG_condition"; break;
1147         case DW_TAG_const_type:
1148                 *s = "DW_TAG_const_type"; break;
1149         case DW_TAG_constant:
1150                 *s = "DW_TAG_constant"; break;
1151         case DW_TAG_dwarf_procedure:
1152                 *s = "DW_TAG_dwarf_procedure"; break;
1153         case DW_TAG_entry_point:
1154                 *s = "DW_TAG_entry_point"; break;
1155         case DW_TAG_enumeration_type:
1156                 *s = "DW_TAG_enumeration_type"; break;
1157         case DW_TAG_enumerator:
1158                 *s = "DW_TAG_enumerator"; break;
1159         case DW_TAG_formal_parameter:
1160                 *s = "DW_TAG_formal_parameter"; break;
1161         case DW_TAG_friend:
1162                 *s = "DW_TAG_friend"; break;
1163         case DW_TAG_imported_declaration:
1164                 *s = "DW_TAG_imported_declaration"; break;
1165         case DW_TAG_imported_module:
1166                 *s = "DW_TAG_imported_module"; break;
1167         case DW_TAG_imported_unit:
1168                 *s = "DW_TAG_imported_unit"; break;
1169         case DW_TAG_inheritance:
1170                 *s = "DW_TAG_inheritance"; break;
1171         case DW_TAG_inlined_subroutine:
1172                 *s = "DW_TAG_inlined_subroutine"; break;
1173         case DW_TAG_interface_type:
1174                 *s = "DW_TAG_interface_type"; break;
1175         case DW_TAG_label:
1176                 *s = "DW_TAG_label"; break;
1177         case DW_TAG_lexical_block:
1178                 *s = "DW_TAG_lexical_block"; break;
1179         case DW_TAG_member:
1180                 *s = "DW_TAG_member"; break;
1181         case DW_TAG_module:
1182                 *s = "DW_TAG_module"; break;
1183         case DW_TAG_namelist:
1184                 *s = "DW_TAG_namelist"; break;
1185         case DW_TAG_namelist_item:
1186                 *s = "DW_TAG_namelist_item"; break;
1187         case DW_TAG_namespace:
1188                 *s = "DW_TAG_namespace"; break;
1189         case DW_TAG_packed_type:
1190                 *s = "DW_TAG_packed_type"; break;
1191         case DW_TAG_partial_unit:
1192                 *s = "DW_TAG_partial_unit"; break;
1193         case DW_TAG_pointer_type:
1194                 *s = "DW_TAG_pointer_type"; break;
1195         case DW_TAG_ptr_to_member_type:
1196                 *s = "DW_TAG_ptr_to_member_type"; break;
1197         case DW_TAG_reference_type:
1198                 *s = "DW_TAG_reference_type"; break;
1199         case DW_TAG_restrict_type:
1200                 *s = "DW_TAG_restrict_type"; break;
1201         case DW_TAG_rvalue_reference_type:
1202                 *s = "DW_TAG_rvalue_reference_type"; break;
1203         case DW_TAG_set_type:
1204                 *s = "DW_TAG_set_type"; break;
1205         case DW_TAG_shared_type:
1206                 *s = "DW_TAG_shared_type"; break;
1207         case DW_TAG_string_type:
1208                 *s = "DW_TAG_string_type"; break;
1209         case DW_TAG_structure_type:
1210                 *s = "DW_TAG_structure_type"; break;
1211         case DW_TAG_subprogram:
1212                 *s = "DW_TAG_subprogram"; break;
1213         case DW_TAG_subrange_type:
1214                 *s = "DW_TAG_subrange_type"; break;
1215         case DW_TAG_subroutine_type:
1216                 *s = "DW_TAG_subroutine_type"; break;
1217         case DW_TAG_template_alias:
1218                 *s = "DW_TAG_template_alias"; break;
1219         case DW_TAG_template_type_parameter:
1220                 *s = "DW_TAG_template_type_parameter"; break;
1221         case DW_TAG_template_value_parameter:
1222                 *s = "DW_TAG_template_value_parameter"; break;
1223         case DW_TAG_thrown_type:
1224                 *s = "DW_TAG_thrown_type"; break;
1225         case DW_TAG_try_block:
1226                 *s = "DW_TAG_try_block"; break;
1227         case DW_TAG_type_unit:
1228                 *s = "DW_TAG_type_unit"; break;
1229         case DW_TAG_typedef:
1230                 *s = "DW_TAG_typedef"; break;
1231         case DW_TAG_union_type:
1232                 *s = "DW_TAG_union_type"; break;
1233         case DW_TAG_unspecified_parameters:
1234                 *s = "DW_TAG_unspecified_parameters"; break;
1235         case DW_TAG_unspecified_type:
1236                 *s = "DW_TAG_unspecified_type"; break;
1237         case DW_TAG_variable:
1238                 *s = "DW_TAG_variable"; break;
1239         case DW_TAG_variant:
1240                 *s = "DW_TAG_variant"; break;
1241         case DW_TAG_variant_part:
1242                 *s = "DW_TAG_variant_part"; break;
1243         case DW_TAG_volatile_type:
1244                 *s = "DW_TAG_volatile_type"; break;
1245         case DW_TAG_with_stmt:
1246                 *s = "DW_TAG_with_stmt"; break;
1247         default:
1248                 return (DW_DLV_NO_ENTRY);
1249         }
1250
1251         return (DW_DLV_OK);
1252 }
1253
1254 int
1255 dwarf_get_VIRTUALITY_name(unsigned vir, const char **s)
1256 {
1257
1258         assert(s != NULL);
1259
1260         switch (vir) {
1261         case DW_VIRTUALITY_none:
1262                 *s = "DW_VIRTUALITY_none"; break;
1263         case DW_VIRTUALITY_virtual:
1264                 *s = "DW_VIRTUALITY_virtual"; break;
1265         case DW_VIRTUALITY_pure_virtual:
1266                 *s = "DW_VIRTUALITY_pure_virtual"; break;
1267         default:
1268                 return (DW_DLV_NO_ENTRY);
1269         }
1270
1271         return (DW_DLV_OK);
1272 }
1273
1274 int
1275 dwarf_get_VIS_name(unsigned vis, const char **s)
1276 {
1277
1278         assert(s != NULL);
1279
1280         switch (vis) {
1281         case DW_VIS_local:
1282                 *s = "DW_VIS_local"; break;
1283         case DW_VIS_exported:
1284                 *s = "DW_VIS_exported"; break;
1285         case DW_VIS_qualified:
1286                 *s = "DW_VIS_qualified"; break;
1287         default:
1288                 return (DW_DLV_NO_ENTRY);
1289         }
1290
1291         return (DW_DLV_OK);
1292 }