]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - contrib/elftoolchain/libdwarf/dwarf_dump.c
MFV r289003:
[FreeBSD/FreeBSD.git] / 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 3052 2014-05-26 20:36:24Z kaiwang27 $");
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         case DW_AT_sf_names:
254                 *s = "DW_AT_sf_names"; break;
255         case DW_AT_src_info:
256                 *s = "DW_AT_src_info"; break;
257         case DW_AT_mac_info:
258                 *s = "DW_AT_mac_info"; break;
259         case DW_AT_src_coords:
260                 *s = "DW_AT_src_coords"; break;
261         case DW_AT_body_begin:
262                 *s = "DW_AT_body_begin"; break;
263         case DW_AT_body_end:
264                 *s = "DW_AT_body_end"; break;
265         case DW_AT_GNU_vector:
266                 *s = "DW_AT_GNU_vector"; break;
267         case DW_AT_GNU_guarded_by:
268                 *s = "DW_AT_GNU_guarded_by"; break;
269         case DW_AT_GNU_pt_guarded_by:
270                 *s = "DW_AT_GNU_pt_guarded_by"; break;
271         case DW_AT_GNU_guarded:
272                 *s = "DW_AT_GNU_guarded"; break;
273         case DW_AT_GNU_pt_guarded:
274                 *s = "DW_AT_GNU_pt_guarded"; break;
275         case DW_AT_GNU_locks_excluded:
276                 *s = "DW_AT_GNU_locks_excluded"; break;
277         case DW_AT_GNU_exclusive_locks_required:
278                 *s = "DW_AT_GNU_exclusive_locks_required"; break;
279         case DW_AT_GNU_shared_locks_required:
280                 *s = "DW_AT_GNU_shared_locks_required"; break;
281         case DW_AT_GNU_odr_signature:
282                 *s = "DW_AT_GNU_odr_signature"; break;
283         case DW_AT_GNU_template_name:
284                 *s = "DW_AT_GNU_template_name"; break;
285         case DW_AT_GNU_call_site_value:
286                 *s = "DW_AT_GNU_call_site_value"; break;
287         case DW_AT_GNU_call_site_data_value:
288                 *s = "DW_AT_GNU_call_site_data_value"; break;
289         case DW_AT_GNU_call_site_target:
290                 *s = "DW_AT_GNU_call_site_target"; break;
291         case DW_AT_GNU_call_site_target_clobbered:
292                 *s = "DW_AT_GNU_call_site_target_clobbered"; break;
293         case DW_AT_GNU_tail_call:
294                 *s = "DW_AT_GNU_tail_call"; break;
295         case DW_AT_GNU_all_tail_call_sites:
296                 *s = "DW_AT_GNU_all_tail_call_sites"; break;
297         case DW_AT_GNU_all_call_sites:
298                 *s = "DW_AT_GNU_all_call_sites"; break;
299         case DW_AT_GNU_all_source_call_sites:
300                 *s = "DW_AT_GNU_all_source_call_sites"; break;
301         default:
302                 return (DW_DLV_NO_ENTRY);
303         }
304
305         return (DW_DLV_OK);
306 }
307
308 int
309 dwarf_get_ATE_name(unsigned ate, const char **s)
310 {
311
312         assert(s != NULL);
313
314         switch(ate) {
315         case DW_ATE_address:
316                 *s = "DW_ATE_address"; break;
317         case DW_ATE_boolean:
318                 *s = "DW_ATE_boolean"; break;
319         case DW_ATE_complex_float:
320                 *s = "DW_ATE_complex_float"; break;
321         case DW_ATE_float:
322                 *s = "DW_ATE_float"; break;
323         case DW_ATE_signed:
324                 *s = "DW_ATE_signed"; break;
325         case DW_ATE_signed_char:
326                 *s = "DW_ATE_signed_char"; break;
327         case DW_ATE_unsigned:
328                 *s = "DW_ATE_unsigned"; break;
329         case DW_ATE_unsigned_char:
330                 *s = "DW_ATE_unsigned_char"; break;
331         case DW_ATE_imaginary_float:
332                 *s = "DW_ATE_imaginary_float"; break;
333         case DW_ATE_packed_decimal:
334                 *s = "DW_ATE_packed_decimal"; break;
335         case DW_ATE_numeric_string:
336                 *s = "DW_ATE_numeric_string"; break;
337         case DW_ATE_edited:
338                 *s = "DW_ATE_edited"; break;
339         case DW_ATE_signed_fixed:
340                 *s = "DW_ATE_signed_fixed"; break;
341         case DW_ATE_unsigned_fixed:
342                 *s = "DW_ATE_unsigned_fixed"; break;
343         case DW_ATE_decimal_float:
344                 *s = "DW_ATE_decimal_float"; break;
345         case DW_ATE_lo_user:
346                 *s = "DW_ATE_lo_user"; break;
347         case DW_ATE_hi_user:
348                 *s = "DW_ATE_hi_user"; break;
349         default:
350                 return (DW_DLV_NO_ENTRY);
351         }
352
353         return (DW_DLV_OK);
354 }
355
356 int
357 dwarf_get_CC_name(unsigned cc, const char **s)
358 {
359
360         assert(s != NULL);
361
362         switch (cc) {
363         case DW_CC_normal:
364                 *s = "DW_CC_normal"; break;
365         case DW_CC_program:
366                 *s = "DW_CC_program"; break;
367         case DW_CC_nocall:
368                 *s = "DW_CC_nocall"; break;
369         case DW_CC_lo_user:
370                 *s = "DW_CC_lo_user"; break;
371         case DW_CC_hi_user:
372                 *s = "DW_CC_hi_user"; break;
373         default:
374                 return (DW_DLV_NO_ENTRY);
375         }
376
377         return (DW_DLV_OK);
378 }
379
380 int
381 dwarf_get_CFA_name(unsigned cfa, const char **s)
382 {
383
384         assert(s != NULL);
385
386         switch (cfa) {
387         case DW_CFA_advance_loc:
388                 *s = "DW_CFA_advance_loc"; break;
389         case DW_CFA_offset:
390                 *s = "DW_CFA_offset"; break;
391         case DW_CFA_restore:
392                 *s = "DW_CFA_restore"; break;
393         case DW_CFA_nop:
394                 *s = "DW_CFA_nop"; break;
395         case DW_CFA_set_loc:
396                 *s = "DW_CFA_set_loc"; break;
397         case DW_CFA_advance_loc1:
398                 *s = "DW_CFA_advance_loc1"; break;
399         case DW_CFA_advance_loc2:
400                 *s = "DW_CFA_advance_loc2"; break;
401         case DW_CFA_advance_loc4:
402                 *s = "DW_CFA_advance_loc4"; break;
403         case DW_CFA_offset_extended:
404                 *s = "DW_CFA_offset_extended"; break;
405         case DW_CFA_restore_extended:
406                 *s = "DW_CFA_restore_extended"; break;
407         case DW_CFA_undefined:
408                 *s = "DW_CFA_undefined"; break;
409         case DW_CFA_same_value:
410                 *s = "DW_CFA_same_value"; break;
411         case DW_CFA_register:
412                 *s = "DW_CFA_register"; break;
413         case DW_CFA_remember_state:
414                 *s = "DW_CFA_remember_state"; break;
415         case DW_CFA_restore_state:
416                 *s = "DW_CFA_restore_state"; break;
417         case DW_CFA_def_cfa:
418                 *s = "DW_CFA_def_cfa"; break;
419         case DW_CFA_def_cfa_register:
420                 *s = "DW_CFA_def_cfa_register"; break;
421         case DW_CFA_def_cfa_offset:
422                 *s = "DW_CFA_def_cfa_offset"; break;
423         case DW_CFA_def_cfa_expression:
424                 *s = "DW_CFA_def_cfa_expression"; break;
425         case DW_CFA_expression:
426                 *s = "DW_CFA_expression"; break;
427         case DW_CFA_offset_extended_sf:
428                 *s = "DW_CFA_offset_extended_sf"; break;
429         case DW_CFA_def_cfa_sf:
430                 *s = "DW_CFA_def_cfa_sf"; break;
431         case DW_CFA_def_cfa_offset_sf:
432                 *s = "DW_CFA_def_cfa_offset_sf"; break;
433         case DW_CFA_val_offset:
434                 *s = "DW_CFA_val_offset"; break;
435         case DW_CFA_val_offset_sf:
436                 *s = "DW_CFA_val_offset_sf"; break;
437         case DW_CFA_val_expression:
438                 *s = "DW_CFA_val_expression"; break;
439         case DW_CFA_lo_user:
440                 *s = "DW_CFA_lo_user"; break;
441         case DW_CFA_high_user:
442                 *s = "DW_CFA_high_user"; break;
443         default:
444                 return (DW_DLV_NO_ENTRY);
445         }
446
447         return (DW_DLV_OK);
448 }
449
450 int
451 dwarf_get_CHILDREN_name(unsigned children, const char **s)
452 {
453
454         assert(s != NULL);
455
456         switch (children) {
457         case DW_CHILDREN_no:
458                 *s = "DW_CHILDREN_no"; break;
459         case DW_CHILDREN_yes:
460                 *s = "DW_CHILDREN_yes"; break;
461         default:
462                 return (DW_DLV_NO_ENTRY);
463         }
464
465         return (DW_DLV_OK);
466 }
467
468 int
469 dwarf_get_FORM_name(unsigned form, const char **s)
470 {
471
472         assert(s != NULL);
473
474         switch (form) {
475         case DW_FORM_addr:
476                 *s = "DW_FORM_addr"; break;
477         case DW_FORM_block:
478                 *s = "DW_FORM_block"; break;
479         case DW_FORM_block1:
480                 *s = "DW_FORM_block1"; break;
481         case DW_FORM_block2:
482                 *s = "DW_FORM_block2"; break;
483         case DW_FORM_block4:
484                 *s = "DW_FORM_block4"; break;
485         case DW_FORM_data1:
486                 *s = "DW_FORM_data1"; break;
487         case DW_FORM_data2:
488                 *s = "DW_FORM_data2"; break;
489         case DW_FORM_data4:
490                 *s = "DW_FORM_data4"; break;
491         case DW_FORM_data8:
492                 *s = "DW_FORM_data8"; break;
493         case DW_FORM_exprloc:
494                 *s = "DW_FORM_exprloc"; break;
495         case DW_FORM_flag:
496                 *s = "DW_FORM_flag"; break;
497         case DW_FORM_flag_present:
498                 *s = "DW_FORM_flag_present"; break;
499         case DW_FORM_indirect:
500                 *s = "DW_FORM_indirect"; break;
501         case DW_FORM_ref1:
502                 *s = "DW_FORM_ref1"; break;
503         case DW_FORM_ref2:
504                 *s = "DW_FORM_ref2"; break;
505         case DW_FORM_ref4:
506                 *s = "DW_FORM_ref4"; break;
507         case DW_FORM_ref8:
508                 *s = "DW_FORM_ref8"; break;
509         case DW_FORM_ref_addr:
510                 *s = "DW_FORM_ref_addr"; break;
511         case DW_FORM_ref_sig8:
512                 *s = "DW_FORM_ref_sig8"; break;
513         case DW_FORM_ref_udata:
514                 *s = "DW_FORM_ref_udata"; break;
515         case DW_FORM_sdata:
516                 *s = "DW_FORM_sdata"; break;
517         case DW_FORM_sec_offset:
518                 *s = "DW_FORM_sec_offset"; break;
519         case DW_FORM_string:
520                 *s = "DW_FORM_string"; break;
521         case DW_FORM_strp:
522                 *s = "DW_FORM_strp"; break;
523         case DW_FORM_udata:
524                 *s = "DW_FORM_udata"; break;
525         default:
526                 return (DW_DLV_NO_ENTRY);
527         }
528
529         return (DW_DLV_OK);
530 }
531
532 int
533 dwarf_get_DS_name(unsigned ds, const char **s)
534 {
535
536         assert(s != NULL);
537
538         switch (ds) {
539         case DW_DS_unsigned:
540                 *s = "DW_DS_unsigned"; break;
541         case DW_DS_leading_overpunch:
542                 *s = "DW_DS_leading_overpunch"; break;
543         case DW_DS_trailing_overpunch:
544                 *s = "DW_DS_trailing_overpunch"; break;
545         case DW_DS_leading_separate:
546                 *s = "DW_DS_leading_separate"; break;
547         case DW_DS_trailing_separate:
548                 *s = "DW_DS_trailing_separate";
549         default:
550                 return (DW_DLV_NO_ENTRY);
551         }
552
553         return (DW_DLV_OK);
554 }
555
556 int
557 dwarf_get_DSC_name(unsigned dsc, const char **s)
558 {
559
560         assert(s != NULL);
561
562         switch (dsc) {
563         case DW_DSC_label:
564                 *s = "DW_DSC_label"; break;
565         case DW_DSC_range:
566                 *s = "DW_DSC_range"; break;
567         default:
568                 return (DW_DLV_NO_ENTRY);
569         }
570
571         return (DW_DLV_OK);
572 }
573
574 int
575 dwarf_get_EH_name(unsigned eh, const char **s)
576 {
577
578         assert(s != NULL);
579
580         switch (eh) {
581         case DW_EH_PE_absptr:
582                 *s = "DW_EH_PE_absptr"; break;
583         case DW_EH_PE_uleb128:
584                 *s = "DW_EH_PE_uleb128"; break;
585         case DW_EH_PE_udata2:
586                 *s = "DW_EH_PE_udata2"; break;
587         case DW_EH_PE_udata4:
588                 *s = "DW_EH_PE_udata4"; break;
589         case DW_EH_PE_udata8:
590                 *s = "DW_EH_PE_udata8"; break;
591         case DW_EH_PE_sleb128:
592                 *s = "DW_EH_PE_sleb128"; break;
593         case DW_EH_PE_sdata2:
594                 *s = "DW_EH_PE_sdata2"; break;
595         case DW_EH_PE_sdata4:
596                 *s = "DW_EH_PE_sdata4"; break;
597         case DW_EH_PE_sdata8:
598                 *s = "DW_EH_PE_sdata8"; break;
599         case DW_EH_PE_pcrel:
600                 *s = "DW_EH_PE_pcrel"; break;
601         case DW_EH_PE_textrel:
602                 *s = "DW_EH_PE_textrel"; break;
603         case DW_EH_PE_datarel:
604                 *s = "DW_EH_PE_datarel"; break;
605         case DW_EH_PE_funcrel:
606                 *s = "DW_EH_PE_funcrel"; break;
607         case DW_EH_PE_aligned:
608                 *s = "DW_EH_PE_aligned"; break;
609         case DW_EH_PE_omit:
610                 *s = "DW_EH_PE_omit"; break;
611         default:
612                 return (DW_DLV_NO_ENTRY);
613         }
614
615         return (DW_DLV_OK);
616 }
617
618 int
619 dwarf_get_END_name(unsigned end, const char **s)
620 {
621
622         assert(s != NULL);
623
624         switch (end) {
625         case DW_END_default:
626                 *s = "DW_END_default"; break;
627         case DW_END_big:
628                 *s = "DW_END_big"; break;
629         case DW_END_little:
630                 *s = "DW_END_little"; break;
631         case DW_END_lo_user:
632                 *s = "DW_END_lo_user"; break;
633         case DW_END_high_user:
634                 *s = "DW_END_high_user"; break;
635         default:
636                 return (DW_DLV_NO_ENTRY);
637         }
638
639         return (DW_DLV_OK);
640 }
641
642 int
643 dwarf_get_ID_name(unsigned id, const char **s)
644 {
645
646         assert(s != NULL);
647
648         switch (id) {
649         case DW_ID_case_sensitive:
650                 *s = "DW_ID_case_sensitive"; break;
651         case DW_ID_up_case:
652                 *s = "DW_ID_up_case"; break;
653         case DW_ID_down_case:
654                 *s = "DW_ID_down_case"; break;
655         case DW_ID_case_insensitive:
656                 *s = "DW_ID_case_insensitive"; break;
657         default:
658                 return (DW_DLV_NO_ENTRY);
659         }
660
661         return (DW_DLV_OK);
662 }
663
664 int
665 dwarf_get_INL_name(unsigned inl, const char **s)
666 {
667
668         assert(s != NULL);
669
670         switch (inl) {
671         case DW_INL_not_inlined:
672                 *s = "DW_INL_not_inlined"; break;
673         case DW_INL_inlined:
674                 *s = "DW_INL_inlined"; break;
675         case DW_INL_declared_not_inlined:
676                 *s = "DW_INL_declared_not_inlined"; break;
677         case DW_INL_declared_inlined:
678                 *s = "DW_INL_declared_inlined"; break;
679         default:
680                 return (DW_DLV_NO_ENTRY);
681         }
682
683         return (DW_DLV_OK);
684 }
685
686 int
687 dwarf_get_LANG_name(unsigned lang, const char **s)
688 {
689
690         assert(s != NULL);
691
692         switch (lang) {
693         case DW_LANG_C89:
694                 *s = "DW_LANG_C89"; break;
695         case DW_LANG_C:
696                 *s = "DW_LANG_C"; break;
697         case DW_LANG_Ada83:
698                 *s = "DW_LANG_Ada83"; break;
699         case DW_LANG_C_plus_plus:
700                 *s = "DW_LANG_C_plus_plus"; break;
701         case DW_LANG_Cobol74:
702                 *s = "DW_LANG_Cobol74"; break;
703         case DW_LANG_Cobol85:
704                 *s = "DW_LANG_Cobol85"; break;
705         case DW_LANG_Fortran77:
706                 *s = "DW_LANG_Fortran77"; break;
707         case DW_LANG_Fortran90:
708                 *s = "DW_LANG_Fortran90"; break;
709         case DW_LANG_Pascal83:
710                 *s = "DW_LANG_Pascal83"; break;
711         case DW_LANG_Modula2:
712                 *s = "DW_LANG_Modula2"; break;
713         case DW_LANG_Java:
714                 *s = "DW_LANG_Java"; break;
715         case DW_LANG_C99:
716                 *s = "DW_LANG_C99"; break;
717         case DW_LANG_Ada95:
718                 *s = "DW_LANG_Ada95"; break;
719         case DW_LANG_Fortran95:
720                 *s = "DW_LANG_Fortran95"; break;
721         case DW_LANG_PLI:
722                 *s = "DW_LANG_PLI"; break;
723         case DW_LANG_ObjC:
724                 *s = "DW_LANG_ObjC"; break;
725         case DW_LANG_ObjC_plus_plus:
726                 *s = "DW_LANG_ObjC_plus_plus"; break;
727         case DW_LANG_UPC:
728                 *s = "DW_LANG_UPC"; break;
729         case DW_LANG_D:
730                 *s = "DW_LANG_D"; break;
731         case DW_LANG_lo_user:
732                 *s = "DW_LANG_lo_user"; break;
733         case DW_LANG_hi_user:
734                 *s = "DW_LANG_hi_user"; break;
735         default:
736                 return (DW_DLV_NO_ENTRY);
737         }
738
739         return (DW_DLV_OK);
740 }
741
742 int
743 dwarf_get_LNE_name(unsigned lne, const char **s)
744 {
745
746         assert(s != NULL);
747
748         switch (lne) {
749         case DW_LNE_end_sequence:
750                 *s = "DW_LNE_end_sequence"; break;
751         case DW_LNE_set_address:
752                 *s = "DW_LNE_set_address"; break;
753         case DW_LNE_define_file:
754                 *s = "DW_LNE_define_file"; break;
755         case DW_LNE_lo_user:
756                 *s = "DW_LNE_lo_user"; break;
757         case DW_LNE_hi_user:
758                 *s = "DW_LNE_hi_user"; break;
759         default:
760                 return (DW_DLV_NO_ENTRY);
761         }
762
763         return (DW_DLV_OK);
764 }
765
766 int
767 dwarf_get_LNS_name(unsigned lns, const char **s)
768 {
769
770         assert(s != NULL);
771
772         switch (lns) {
773         case DW_LNS_copy:
774                 *s = "DW_LNS_copy"; break;
775         case DW_LNS_advance_pc:
776                 *s = "DW_LNS_advance_pc"; break;
777         case DW_LNS_advance_line:
778                 *s = "DW_LNS_advance_line"; break;
779         case DW_LNS_set_file:
780                 *s = "DW_LNS_set_file"; break;
781         case DW_LNS_set_column:
782                 *s = "DW_LNS_set_column"; break;
783         case DW_LNS_negate_stmt:
784                 *s = "DW_LNS_negate_stmt"; break;
785         case DW_LNS_set_basic_block:
786                 *s = "DW_LNS_set_basic_block"; break;
787         case DW_LNS_const_add_pc:
788                 *s = "DW_LNS_const_add_pc"; break;
789         case DW_LNS_fixed_advance_pc:
790                 *s = "DW_LNS_fixed_advance_pc"; break;
791         case DW_LNS_set_prologue_end:
792                 *s = "DW_LNS_set_prologue_end"; break;
793         case DW_LNS_set_epilogue_begin:
794                 *s = "DW_LNS_set_epilogue_begin"; break;
795         case DW_LNS_set_isa:
796                 *s = "DW_LNS_set_isa"; break;
797         default:
798                 return (DW_DLV_NO_ENTRY);
799         }
800
801         return (DW_DLV_OK);
802 }
803
804 int
805 dwarf_get_MACINFO_name(unsigned mi, const char **s)
806 {
807
808         assert(s != NULL);
809
810         switch (mi) {
811         case DW_MACINFO_define:
812                 *s = "DW_MACINFO_define"; break;
813         case DW_MACINFO_undef:
814                 *s = "DW_MACINFO_undef"; break;
815         case DW_MACINFO_start_file:
816                 *s = "DW_MACINFO_start_file"; break;
817         case DW_MACINFO_end_file:
818                 *s = "DW_MACINFO_end_file"; break;
819         case DW_MACINFO_vendor_ext:
820                 *s = "DW_MACINFO_vendor_ext"; break;
821         default:
822                 return (DW_DLV_NO_ENTRY);
823         }
824
825         return (DW_DLV_OK);
826 }
827
828 int
829 dwarf_get_OP_name(unsigned op, const char **s)
830 {
831
832         assert(s != NULL);
833
834         switch (op) {
835         case DW_OP_deref:
836                 *s = "DW_OP_deref"; break;
837         case DW_OP_reg0:
838                 *s = "DW_OP_reg0"; break;
839         case DW_OP_reg1:
840                 *s = "DW_OP_reg1"; break;
841         case DW_OP_reg2:
842                 *s = "DW_OP_reg2"; break;
843         case DW_OP_reg3:
844                 *s = "DW_OP_reg3"; break;
845         case DW_OP_reg4:
846                 *s = "DW_OP_reg4"; break;
847         case DW_OP_reg5:
848                 *s = "DW_OP_reg5"; break;
849         case DW_OP_reg6:
850                 *s = "DW_OP_reg6"; break;
851         case DW_OP_reg7:
852                 *s = "DW_OP_reg7"; break;
853         case DW_OP_reg8:
854                 *s = "DW_OP_reg8"; break;
855         case DW_OP_reg9:
856                 *s = "DW_OP_reg9"; break;
857         case DW_OP_reg10:
858                 *s = "DW_OP_reg10"; break;
859         case DW_OP_reg11:
860                 *s = "DW_OP_reg11"; break;
861         case DW_OP_reg12:
862                 *s = "DW_OP_reg12"; break;
863         case DW_OP_reg13:
864                 *s = "DW_OP_reg13"; break;
865         case DW_OP_reg14:
866                 *s = "DW_OP_reg14"; break;
867         case DW_OP_reg15:
868                 *s = "DW_OP_reg15"; break;
869         case DW_OP_reg16:
870                 *s = "DW_OP_reg16"; break;
871         case DW_OP_reg17:
872                 *s = "DW_OP_reg17"; break;
873         case DW_OP_reg18:
874                 *s = "DW_OP_reg18"; break;
875         case DW_OP_reg19:
876                 *s = "DW_OP_reg19"; break;
877         case DW_OP_reg20:
878                 *s = "DW_OP_reg20"; break;
879         case DW_OP_reg21:
880                 *s = "DW_OP_reg21"; break;
881         case DW_OP_reg22:
882                 *s = "DW_OP_reg22"; break;
883         case DW_OP_reg23:
884                 *s = "DW_OP_reg23"; break;
885         case DW_OP_reg24:
886                 *s = "DW_OP_reg24"; break;
887         case DW_OP_reg25:
888                 *s = "DW_OP_reg25"; break;
889         case DW_OP_reg26:
890                 *s = "DW_OP_reg26"; break;
891         case DW_OP_reg27:
892                 *s = "DW_OP_reg27"; break;
893         case DW_OP_reg28:
894                 *s = "DW_OP_reg28"; break;
895         case DW_OP_reg29:
896                 *s = "DW_OP_reg29"; break;
897         case DW_OP_reg30:
898                 *s = "DW_OP_reg30"; break;
899         case DW_OP_reg31:
900                 *s = "DW_OP_reg31"; break;
901         case DW_OP_lit0:
902                 *s = "DW_OP_lit0"; break;
903         case DW_OP_lit1:
904                 *s = "DW_OP_lit1"; break;
905         case DW_OP_lit2:
906                 *s = "DW_OP_lit2"; break;
907         case DW_OP_lit3:
908                 *s = "DW_OP_lit3"; break;
909         case DW_OP_lit4:
910                 *s = "DW_OP_lit4"; break;
911         case DW_OP_lit5:
912                 *s = "DW_OP_lit5"; break;
913         case DW_OP_lit6:
914                 *s = "DW_OP_lit6"; break;
915         case DW_OP_lit7:
916                 *s = "DW_OP_lit7"; break;
917         case DW_OP_lit8:
918                 *s = "DW_OP_lit8"; break;
919         case DW_OP_lit9:
920                 *s = "DW_OP_lit9"; break;
921         case DW_OP_lit10:
922                 *s = "DW_OP_lit10"; break;
923         case DW_OP_lit11:
924                 *s = "DW_OP_lit11"; break;
925         case DW_OP_lit12:
926                 *s = "DW_OP_lit12"; break;
927         case DW_OP_lit13:
928                 *s = "DW_OP_lit13"; break;
929         case DW_OP_lit14:
930                 *s = "DW_OP_lit14"; break;
931         case DW_OP_lit15:
932                 *s = "DW_OP_lit15"; break;
933         case DW_OP_lit16:
934                 *s = "DW_OP_lit16"; break;
935         case DW_OP_lit17:
936                 *s = "DW_OP_lit17"; break;
937         case DW_OP_lit18:
938                 *s = "DW_OP_lit18"; break;
939         case DW_OP_lit19:
940                 *s = "DW_OP_lit19"; break;
941         case DW_OP_lit20:
942                 *s = "DW_OP_lit20"; break;
943         case DW_OP_lit21:
944                 *s = "DW_OP_lit21"; break;
945         case DW_OP_lit22:
946                 *s = "DW_OP_lit22"; break;
947         case DW_OP_lit23:
948                 *s = "DW_OP_lit23"; break;
949         case DW_OP_lit24:
950                 *s = "DW_OP_lit24"; break;
951         case DW_OP_lit25:
952                 *s = "DW_OP_lit25"; break;
953         case DW_OP_lit26:
954                 *s = "DW_OP_lit26"; break;
955         case DW_OP_lit27:
956                 *s = "DW_OP_lit27"; break;
957         case DW_OP_lit28:
958                 *s = "DW_OP_lit28"; break;
959         case DW_OP_lit29:
960                 *s = "DW_OP_lit29"; break;
961         case DW_OP_lit30:
962                 *s = "DW_OP_lit30"; break;
963         case DW_OP_lit31:
964                 *s = "DW_OP_lit31"; break;
965         case DW_OP_dup:
966                 *s = "DW_OP_dup"; break;
967         case DW_OP_drop:
968                 *s = "DW_OP_drop"; break;
969         case DW_OP_over:
970                 *s = "DW_OP_over"; break;
971         case DW_OP_swap:
972                 *s = "DW_OP_swap"; break;
973         case DW_OP_rot:
974                 *s = "DW_OP_rot"; break;
975         case DW_OP_xderef:
976                 *s = "DW_OP_xderef"; break;
977         case DW_OP_abs:
978                 *s = "DW_OP_abs"; break;
979         case DW_OP_and:
980                 *s = "DW_OP_and"; break;
981         case DW_OP_div:
982                 *s = "DW_OP_div"; break;
983         case DW_OP_minus:
984                 *s = "DW_OP_minus"; break;
985         case DW_OP_mod:
986                 *s = "DW_OP_mod"; break;
987         case DW_OP_mul:
988                 *s = "DW_OP_mul"; break;
989         case DW_OP_neg:
990                 *s = "DW_OP_neg"; break;
991         case DW_OP_not:
992                 *s = "DW_OP_not"; break;
993         case DW_OP_or:
994                 *s = "DW_OP_or"; break;
995         case DW_OP_plus:
996                 *s = "DW_OP_plus"; break;
997         case DW_OP_shl:
998                 *s = "DW_OP_shl"; break;
999         case DW_OP_shr:
1000                 *s = "DW_OP_shr"; break;
1001         case DW_OP_shra:
1002                 *s = "DW_OP_shra"; break;
1003         case DW_OP_xor:
1004                 *s = "DW_OP_xor"; break;
1005         case DW_OP_eq:
1006                 *s = "DW_OP_eq"; break;
1007         case DW_OP_ge:
1008                 *s = "DW_OP_ge"; break;
1009         case DW_OP_gt:
1010                 *s = "DW_OP_gt"; break;
1011         case DW_OP_le:
1012                 *s = "DW_OP_le"; break;
1013         case DW_OP_lt:
1014                 *s = "DW_OP_lt"; break;
1015         case DW_OP_ne:
1016                 *s = "DW_OP_ne"; break;
1017         case DW_OP_nop:
1018                 *s = "DW_OP_nop"; break;
1019         case DW_OP_const1u:
1020                 *s = "DW_OP_const1u"; break;
1021         case DW_OP_const1s:
1022                 *s = "DW_OP_const1s"; break;
1023         case DW_OP_pick:
1024                 *s = "DW_OP_pick"; break;
1025         case DW_OP_deref_size:
1026                 *s = "DW_OP_deref_size"; break;
1027         case DW_OP_xderef_size:
1028                 *s = "DW_OP_xderef_size"; break;
1029         case DW_OP_const2u:
1030                 *s = "DW_OP_const2u"; break;
1031         case DW_OP_const2s:
1032                 *s = "DW_OP_const2s"; break;
1033         case DW_OP_bra:
1034                 *s = "DW_OP_bra"; break;
1035         case DW_OP_skip:
1036                 *s = "DW_OP_skip"; break;
1037         case DW_OP_const4u:
1038                 *s = "DW_OP_const4u"; break;
1039         case DW_OP_const4s:
1040                 *s = "DW_OP_const4s"; break;
1041         case DW_OP_const8u:
1042                 *s = "DW_OP_const8u"; break;
1043         case DW_OP_const8s:
1044                 *s = "DW_OP_const8s"; break;
1045         case DW_OP_constu:
1046                 *s = "DW_OP_constu"; break;
1047         case DW_OP_plus_uconst:
1048                 *s = "DW_OP_plus_uconst"; break;
1049         case DW_OP_regx:
1050                 *s = "DW_OP_regx"; break;
1051         case DW_OP_piece:
1052                 *s = "DW_OP_piece"; break;
1053         case DW_OP_consts:
1054                 *s = "DW_OP_consts"; break;
1055         case DW_OP_breg0:
1056                 *s = "DW_OP_breg0"; break;
1057         case DW_OP_breg1:
1058                 *s = "DW_OP_breg1"; break;
1059         case DW_OP_breg2:
1060                 *s = "DW_OP_breg2"; break;
1061         case DW_OP_breg3:
1062                 *s = "DW_OP_breg3"; break;
1063         case DW_OP_breg4:
1064                 *s = "DW_OP_breg4"; break;
1065         case DW_OP_breg5:
1066                 *s = "DW_OP_breg5"; break;
1067         case DW_OP_breg6:
1068                 *s = "DW_OP_breg6"; break;
1069         case DW_OP_breg7:
1070                 *s = "DW_OP_breg7"; break;
1071         case DW_OP_breg8:
1072                 *s = "DW_OP_breg8"; break;
1073         case DW_OP_breg9:
1074                 *s = "DW_OP_breg9"; break;
1075         case DW_OP_breg10:
1076                 *s = "DW_OP_breg10"; break;
1077         case DW_OP_breg11:
1078                 *s = "DW_OP_breg11"; break;
1079         case DW_OP_breg12:
1080                 *s = "DW_OP_breg12"; break;
1081         case DW_OP_breg13:
1082                 *s = "DW_OP_breg13"; break;
1083         case DW_OP_breg14:
1084                 *s = "DW_OP_breg14"; break;
1085         case DW_OP_breg15:
1086                 *s = "DW_OP_breg15"; break;
1087         case DW_OP_breg16:
1088                 *s = "DW_OP_breg16"; break;
1089         case DW_OP_breg17:
1090                 *s = "DW_OP_breg17"; break;
1091         case DW_OP_breg18:
1092                 *s = "DW_OP_breg18"; break;
1093         case DW_OP_breg19:
1094                 *s = "DW_OP_breg19"; break;
1095         case DW_OP_breg20:
1096                 *s = "DW_OP_breg20"; break;
1097         case DW_OP_breg21:
1098                 *s = "DW_OP_breg21"; break;
1099         case DW_OP_breg22:
1100                 *s = "DW_OP_breg22"; break;
1101         case DW_OP_breg23:
1102                 *s = "DW_OP_breg23"; break;
1103         case DW_OP_breg24:
1104                 *s = "DW_OP_breg24"; break;
1105         case DW_OP_breg25:
1106                 *s = "DW_OP_breg25"; break;
1107         case DW_OP_breg26:
1108                 *s = "DW_OP_breg26"; break;
1109         case DW_OP_breg27:
1110                 *s = "DW_OP_breg27"; break;
1111         case DW_OP_breg28:
1112                 *s = "DW_OP_breg28"; break;
1113         case DW_OP_breg29:
1114                 *s = "DW_OP_breg29"; break;
1115         case DW_OP_breg30:
1116                 *s = "DW_OP_breg30"; break;
1117         case DW_OP_breg31:
1118                 *s = "DW_OP_breg31"; break;
1119         case DW_OP_fbreg:
1120                 *s = "DW_OP_fbreg"; break;
1121         case DW_OP_bregx:
1122                 *s = "DW_OP_bregx"; break;
1123         case DW_OP_addr:
1124                 *s = "DW_OP_addr"; break;
1125         case DW_OP_push_object_address:
1126                 *s = "DW_OP_push_object_address"; break;
1127         case DW_OP_call2:
1128                 *s = "DW_OP_call2"; break;
1129         case DW_OP_call4:
1130                 *s = "DW_OP_call4"; break;
1131         case DW_OP_call_ref:
1132                 *s = "DW_OP_call_ref"; break;
1133         case DW_OP_form_tls_address:
1134                 *s = "DW_OP_form_tls_address"; break;
1135         case DW_OP_call_frame_cfa:
1136                 *s = "DW_OP_call_frame_cfa"; break;
1137         case DW_OP_bit_piece:
1138                 *s = "DW_OP_bit_piece"; break;
1139         case DW_OP_implicit_value:
1140                 *s = "DW_OP_implicit_value"; break;
1141         case DW_OP_stack_value:
1142                 *s = "DW_OP_stack_value"; break;
1143         case DW_OP_GNU_push_tls_address:
1144                 *s = "DW_OP_GNU_push_tls_address"; break;
1145         case DW_OP_GNU_uninit:
1146                 *s = "DW_OP_GNU_uninit"; break;
1147         case DW_OP_GNU_encoded_addr:
1148                 *s = "DW_OP_GNU_encoded_addr"; break;
1149         case DW_OP_GNU_implicit_pointer:
1150                 *s = "DW_OP_GNU_implicit_pointer"; break;
1151         case DW_OP_GNU_entry_value:
1152                 *s = "DW_OP_GNU_entry_value"; break;
1153         case DW_OP_GNU_const_type:
1154                 *s = "DW_OP_GNU_const_type"; break;
1155         case DW_OP_GNU_regval_type:
1156                 *s = "DW_OP_GNU_regval_type"; break;
1157         case DW_OP_GNU_deref_type:
1158                 *s = "DW_OP_GNU_deref_type"; break;
1159         case DW_OP_GNU_convert:
1160                 *s = "DW_OP_GNU_convert"; break;
1161         case DW_OP_GNU_reinterpret:
1162                 *s = "DW_OP_GNU_reinterpret"; break;
1163         case DW_OP_GNU_parameter_ref:
1164                 *s = "DW_OP_GNU_parameter_ref"; break;
1165         case DW_OP_GNU_addr_index:
1166                 *s = "DW_OP_GNU_addr_index"; break;
1167         case DW_OP_GNU_const_index:
1168                 *s = "DW_OP_GNU_const_index"; break;
1169         default:
1170                 return (DW_DLV_NO_ENTRY);
1171         }
1172
1173         return (DW_DLV_OK);
1174 }
1175
1176 int
1177 dwarf_get_ORD_name(unsigned ord, const char **s)
1178 {
1179
1180         assert(s != NULL);
1181
1182         switch (ord) {
1183         case DW_ORD_row_major:
1184                 *s = "DW_ORD_row_major"; break;
1185         case DW_ORD_col_major:
1186                 *s = "DW_ORD_col_major"; break;
1187         default:
1188                 return (DW_DLV_NO_ENTRY);
1189         }
1190
1191         return (DW_DLV_OK);
1192 }
1193
1194 int
1195 dwarf_get_TAG_name(unsigned tag, const char **s)
1196 {
1197
1198         assert(s != NULL);
1199
1200         switch (tag) {
1201         case DW_TAG_access_declaration:
1202                 *s = "DW_TAG_access_declaration"; break;
1203         case DW_TAG_array_type:
1204                 *s = "DW_TAG_array_type"; break;
1205         case DW_TAG_base_type:
1206                 *s = "DW_TAG_base_type"; break;
1207         case DW_TAG_catch_block:
1208                 *s = "DW_TAG_catch_block"; break;
1209         case DW_TAG_class_type:
1210                 *s = "DW_TAG_class_type"; break;
1211         case DW_TAG_common_block:
1212                 *s = "DW_TAG_common_block"; break;
1213         case DW_TAG_common_inclusion:
1214                 *s = "DW_TAG_common_inclusion"; break;
1215         case DW_TAG_compile_unit:
1216                 *s = "DW_TAG_compile_unit"; break;
1217         case DW_TAG_condition:
1218                 *s = "DW_TAG_condition"; break;
1219         case DW_TAG_const_type:
1220                 *s = "DW_TAG_const_type"; break;
1221         case DW_TAG_constant:
1222                 *s = "DW_TAG_constant"; break;
1223         case DW_TAG_dwarf_procedure:
1224                 *s = "DW_TAG_dwarf_procedure"; break;
1225         case DW_TAG_entry_point:
1226                 *s = "DW_TAG_entry_point"; break;
1227         case DW_TAG_enumeration_type:
1228                 *s = "DW_TAG_enumeration_type"; break;
1229         case DW_TAG_enumerator:
1230                 *s = "DW_TAG_enumerator"; break;
1231         case DW_TAG_formal_parameter:
1232                 *s = "DW_TAG_formal_parameter"; break;
1233         case DW_TAG_friend:
1234                 *s = "DW_TAG_friend"; break;
1235         case DW_TAG_imported_declaration:
1236                 *s = "DW_TAG_imported_declaration"; break;
1237         case DW_TAG_imported_module:
1238                 *s = "DW_TAG_imported_module"; break;
1239         case DW_TAG_imported_unit:
1240                 *s = "DW_TAG_imported_unit"; break;
1241         case DW_TAG_inheritance:
1242                 *s = "DW_TAG_inheritance"; break;
1243         case DW_TAG_inlined_subroutine:
1244                 *s = "DW_TAG_inlined_subroutine"; break;
1245         case DW_TAG_interface_type:
1246                 *s = "DW_TAG_interface_type"; break;
1247         case DW_TAG_label:
1248                 *s = "DW_TAG_label"; break;
1249         case DW_TAG_lexical_block:
1250                 *s = "DW_TAG_lexical_block"; break;
1251         case DW_TAG_member:
1252                 *s = "DW_TAG_member"; break;
1253         case DW_TAG_module:
1254                 *s = "DW_TAG_module"; break;
1255         case DW_TAG_namelist:
1256                 *s = "DW_TAG_namelist"; break;
1257         case DW_TAG_namelist_item:
1258                 *s = "DW_TAG_namelist_item"; break;
1259         case DW_TAG_namespace:
1260                 *s = "DW_TAG_namespace"; break;
1261         case DW_TAG_packed_type:
1262                 *s = "DW_TAG_packed_type"; break;
1263         case DW_TAG_partial_unit:
1264                 *s = "DW_TAG_partial_unit"; break;
1265         case DW_TAG_pointer_type:
1266                 *s = "DW_TAG_pointer_type"; break;
1267         case DW_TAG_ptr_to_member_type:
1268                 *s = "DW_TAG_ptr_to_member_type"; break;
1269         case DW_TAG_reference_type:
1270                 *s = "DW_TAG_reference_type"; break;
1271         case DW_TAG_restrict_type:
1272                 *s = "DW_TAG_restrict_type"; break;
1273         case DW_TAG_rvalue_reference_type:
1274                 *s = "DW_TAG_rvalue_reference_type"; break;
1275         case DW_TAG_set_type:
1276                 *s = "DW_TAG_set_type"; break;
1277         case DW_TAG_shared_type:
1278                 *s = "DW_TAG_shared_type"; break;
1279         case DW_TAG_string_type:
1280                 *s = "DW_TAG_string_type"; break;
1281         case DW_TAG_structure_type:
1282                 *s = "DW_TAG_structure_type"; break;
1283         case DW_TAG_subprogram:
1284                 *s = "DW_TAG_subprogram"; break;
1285         case DW_TAG_subrange_type:
1286                 *s = "DW_TAG_subrange_type"; break;
1287         case DW_TAG_subroutine_type:
1288                 *s = "DW_TAG_subroutine_type"; break;
1289         case DW_TAG_template_alias:
1290                 *s = "DW_TAG_template_alias"; break;
1291         case DW_TAG_template_type_parameter:
1292                 *s = "DW_TAG_template_type_parameter"; break;
1293         case DW_TAG_template_value_parameter:
1294                 *s = "DW_TAG_template_value_parameter"; break;
1295         case DW_TAG_thrown_type:
1296                 *s = "DW_TAG_thrown_type"; break;
1297         case DW_TAG_try_block:
1298                 *s = "DW_TAG_try_block"; break;
1299         case DW_TAG_type_unit:
1300                 *s = "DW_TAG_type_unit"; break;
1301         case DW_TAG_typedef:
1302                 *s = "DW_TAG_typedef"; break;
1303         case DW_TAG_union_type:
1304                 *s = "DW_TAG_union_type"; break;
1305         case DW_TAG_unspecified_parameters:
1306                 *s = "DW_TAG_unspecified_parameters"; break;
1307         case DW_TAG_unspecified_type:
1308                 *s = "DW_TAG_unspecified_type"; break;
1309         case DW_TAG_variable:
1310                 *s = "DW_TAG_variable"; break;
1311         case DW_TAG_variant:
1312                 *s = "DW_TAG_variant"; break;
1313         case DW_TAG_variant_part:
1314                 *s = "DW_TAG_variant_part"; break;
1315         case DW_TAG_volatile_type:
1316                 *s = "DW_TAG_volatile_type"; break;
1317         case DW_TAG_with_stmt:
1318                 *s = "DW_TAG_with_stmt"; break;
1319         case DW_TAG_format_label:
1320                 *s = "DW_TAG_format_label"; break;
1321         case DW_TAG_function_template:
1322                 *s = "DW_TAG_function_template"; break;
1323         case DW_TAG_class_template:
1324                 *s = "DW_TAG_class_template"; break;
1325         case DW_TAG_GNU_BINCL:
1326                 *s = "DW_TAG_GNU_BINCL"; break;
1327         case DW_TAG_GNU_EINCL:
1328                 *s = "DW_TAG_GNU_EINCL"; break;
1329         case DW_TAG_GNU_template_template_param:
1330                 *s = "DW_TAG_GNU_template_template_param"; break;
1331         case DW_TAG_GNU_template_parameter_pack:
1332                 *s = "DW_TAG_GNU_template_parameter_pack"; break;
1333         case DW_TAG_GNU_formal_parameter_pack:
1334                 *s = "DW_TAG_GNU_formal_parameter_pack"; break;
1335         case DW_TAG_GNU_call_site:
1336                 *s = "DW_TAG_GNU_call_site"; break;
1337         case DW_TAG_GNU_call_site_parameter:
1338                 *s = "DW_TAG_GNU_call_site_parameter"; break;
1339         default:
1340                 return (DW_DLV_NO_ENTRY);
1341         }
1342
1343         return (DW_DLV_OK);
1344 }
1345
1346 int
1347 dwarf_get_VIRTUALITY_name(unsigned vir, const char **s)
1348 {
1349
1350         assert(s != NULL);
1351
1352         switch (vir) {
1353         case DW_VIRTUALITY_none:
1354                 *s = "DW_VIRTUALITY_none"; break;
1355         case DW_VIRTUALITY_virtual:
1356                 *s = "DW_VIRTUALITY_virtual"; break;
1357         case DW_VIRTUALITY_pure_virtual:
1358                 *s = "DW_VIRTUALITY_pure_virtual"; break;
1359         default:
1360                 return (DW_DLV_NO_ENTRY);
1361         }
1362
1363         return (DW_DLV_OK);
1364 }
1365
1366 int
1367 dwarf_get_VIS_name(unsigned vis, const char **s)
1368 {
1369
1370         assert(s != NULL);
1371
1372         switch (vis) {
1373         case DW_VIS_local:
1374                 *s = "DW_VIS_local"; break;
1375         case DW_VIS_exported:
1376                 *s = "DW_VIS_exported"; break;
1377         case DW_VIS_qualified:
1378                 *s = "DW_VIS_qualified"; break;
1379         default:
1380                 return (DW_DLV_NO_ENTRY);
1381         }
1382
1383         return (DW_DLV_OK);
1384 }