lib/Support/Dwarf.cpp

   1 //===-- llvm/Support/Dwarf.cpp - Dwarf Framework ----------------*- C++ -*-===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file contains support for generic dwarf information.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #include "llvm/Support/Dwarf.h"
  15
  16 #include <cassert>
  17
  18 namespace llvm {
  19
  20 namespace dwarf {
  21
  22 /// TagString - Return the string for the specified tag.
  23 ///
  24 const char *TagString(unsigned Tag) {
  25   switch (Tag) {
  26     case DW_TAG_array_type:                return "DW_TAG_array_type";
  27     case DW_TAG_class_type:                return "DW_TAG_class_type";
  28     case DW_TAG_entry_point:               return "DW_TAG_entry_point";
  29     case DW_TAG_enumeration_type:          return "DW_TAG_enumeration_type";
  30     case DW_TAG_formal_parameter:          return "DW_TAG_formal_parameter";
  31     case DW_TAG_imported_declaration:      return "DW_TAG_imported_declaration";
  32     case DW_TAG_label:                     return "DW_TAG_label";
  33     case DW_TAG_lexical_block:             return "DW_TAG_lexical_block";
  34     case DW_TAG_member:                    return "DW_TAG_member";
  35     case DW_TAG_pointer_type:              return "DW_TAG_pointer_type";
  36     case DW_TAG_reference_type:            return "DW_TAG_reference_type";
  37     case DW_TAG_compile_unit:              return "DW_TAG_compile_unit";
  38     case DW_TAG_string_type:               return "DW_TAG_string_type";
  39     case DW_TAG_structure_type:            return "DW_TAG_structure_type";
  40     case DW_TAG_subroutine_type:           return "DW_TAG_subroutine_type";
  41     case DW_TAG_typedef:                   return "DW_TAG_typedef";
  42     case DW_TAG_union_type:                return "DW_TAG_union_type";
  43     case DW_TAG_unspecified_parameters:    return "DW_TAG_unspecified_parameters";
  44     case DW_TAG_variant:                   return "DW_TAG_variant";
  45     case DW_TAG_common_block:              return "DW_TAG_common_block";
  46     case DW_TAG_common_inclusion:          return "DW_TAG_common_inclusion";
  47     case DW_TAG_inheritance:               return "DW_TAG_inheritance";
  48     case DW_TAG_inlined_subroutine:        return "DW_TAG_inlined_subroutine";
  49     case DW_TAG_module:                    return "DW_TAG_module";
  50     case DW_TAG_ptr_to_member_type:        return "DW_TAG_ptr_to_member_type";
  51     case DW_TAG_set_type:                  return "DW_TAG_set_type";
  52     case DW_TAG_subrange_type:             return "DW_TAG_subrange_type";
  53     case DW_TAG_with_stmt:                 return "DW_TAG_with_stmt";
  54     case DW_TAG_access_declaration:        return "DW_TAG_access_declaration";
  55     case DW_TAG_base_type:                 return "DW_TAG_base_type";
  56     case DW_TAG_catch_block:               return "DW_TAG_catch_block";
  57     case DW_TAG_const_type:                return "DW_TAG_const_type";
  58     case DW_TAG_constant:                  return "DW_TAG_constant";
  59     case DW_TAG_enumerator:                return "DW_TAG_enumerator";
  60     case DW_TAG_file_type:                 return "DW_TAG_file_type";
  61     case DW_TAG_friend:                    return "DW_TAG_friend";
  62     case DW_TAG_namelist:                  return "DW_TAG_namelist";
  63     case DW_TAG_namelist_item:             return "DW_TAG_namelist_item";
  64     case DW_TAG_packed_type:               return "DW_TAG_packed_type";
  65     case DW_TAG_subprogram:                return "DW_TAG_subprogram";
  66     case DW_TAG_template_type_parameter:   return "DW_TAG_template_type_parameter";
  67     case DW_TAG_template_value_parameter: return "DW_TAG_template_value_parameter";
  68     case DW_TAG_thrown_type:               return "DW_TAG_thrown_type";
  69     case DW_TAG_try_block:                 return "DW_TAG_try_block";
  70     case DW_TAG_variant_part:              return "DW_TAG_variant_part";
  71     case DW_TAG_variable:                  return "DW_TAG_variable";
  72     case DW_TAG_volatile_type:             return "DW_TAG_volatile_type";
  73     case DW_TAG_dwarf_procedure:           return "DW_TAG_dwarf_procedure";
  74     case DW_TAG_restrict_type:             return "DW_TAG_restrict_type";
  75     case DW_TAG_interface_type:            return "DW_TAG_interface_type";
  76     case DW_TAG_namespace:                 return "DW_TAG_namespace";
  77     case DW_TAG_imported_module:           return "DW_TAG_imported_module";
  78     case DW_TAG_unspecified_type:          return "DW_TAG_unspecified_type";
  79     case DW_TAG_partial_unit:              return "DW_TAG_partial_unit";
  80     case DW_TAG_imported_unit:             return "DW_TAG_imported_unit";
  81     case DW_TAG_condition:                 return "DW_TAG_condition";
  82     case DW_TAG_shared_type:               return "DW_TAG_shared_type";
  83     case DW_TAG_lo_user:                   return "DW_TAG_lo_user";
  84     case DW_TAG_hi_user:                   return "DW_TAG_hi_user";
  85   }
  86   assert(0 && "Unknown Dwarf Tag");
  87   return "";
  88 }
  89
  90 /// ChildrenString - Return the string for the specified children flag.
  91 ///
  92 const char *ChildrenString(unsigned Children) {
  93   switch (Children) {
  94     case DW_CHILDREN_no:                   return "CHILDREN_no";
  95     case DW_CHILDREN_yes:                  return "CHILDREN_yes";
  96   }
  97   assert(0 && "Unknown Dwarf ChildrenFlag");
  98   return "";
  99 }
 100
 101 /// AttributeString - Return the string for the specified attribute.
 102 ///
 103 const char *AttributeString(unsigned Attribute) {
 104   switch (Attribute) {
 105     case DW_AT_sibling:                    return "DW_AT_sibling";
 106     case DW_AT_location:                   return "DW_AT_location";
 107     case DW_AT_name:                       return "DW_AT_name";
 108     case DW_AT_ordering:                   return "DW_AT_ordering";
 109     case DW_AT_byte_size:                  return "DW_AT_byte_size";
 110     case DW_AT_bit_offset:                 return "DW_AT_bit_offset";
 111     case DW_AT_bit_size:                   return "DW_AT_bit_size";
 112     case DW_AT_stmt_list:                  return "DW_AT_stmt_list";
 113     case DW_AT_low_pc:                     return "DW_AT_low_pc";
 114     case DW_AT_high_pc:                    return "DW_AT_high_pc";
 115     case DW_AT_language:                   return "DW_AT_language";
 116     case DW_AT_discr:                      return "DW_AT_discr";
 117     case DW_AT_discr_value:                return "DW_AT_discr_value";
 118     case DW_AT_visibility:                 return "DW_AT_visibility";
 119     case DW_AT_import:                     return "DW_AT_import";
 120     case DW_AT_string_length:              return "DW_AT_string_length";
 121     case DW_AT_common_reference:           return "DW_AT_common_reference";
 122     case DW_AT_comp_dir:                   return "DW_AT_comp_dir";
 123     case DW_AT_const_value:                return "DW_AT_const_value";
 124     case DW_AT_containing_type:            return "DW_AT_containing_type";
 125     case DW_AT_default_value:              return "DW_AT_default_value";
 126     case DW_AT_inline:                     return "DW_AT_inline";
 127     case DW_AT_is_optional:                return "DW_AT_is_optional";
 128     case DW_AT_lower_bound:                return "DW_AT_lower_bound";
 129     case DW_AT_producer:                   return "DW_AT_producer";
 130     case DW_AT_prototyped:                 return "DW_AT_prototyped";
 131     case DW_AT_return_addr:                return "DW_AT_return_addr";
 132     case DW_AT_start_scope:                return "DW_AT_start_scope";
 133     case DW_AT_bit_stride:                 return "DW_AT_bit_stride";
 134     case DW_AT_upper_bound:                return "DW_AT_upper_bound";
 135     case DW_AT_abstract_origin:            return "DW_AT_abstract_origin";
 136     case DW_AT_accessibility:              return "DW_AT_accessibility";
 137     case DW_AT_address_class:              return "DW_AT_address_class";
 138     case DW_AT_artificial:                 return "DW_AT_artificial";
 139     case DW_AT_base_types:                 return "DW_AT_base_types";
 140     case DW_AT_calling_convention:         return "DW_AT_calling_convention";
 141     case DW_AT_count:                      return "DW_AT_count";
 142     case DW_AT_data_member_location:       return "DW_AT_data_member_location";
 143     case DW_AT_decl_column:                return "DW_AT_decl_column";
 144     case DW_AT_decl_file:                  return "DW_AT_decl_file";
 145     case DW_AT_decl_line:                  return "DW_AT_decl_line";
 146     case DW_AT_declaration:                return "DW_AT_declaration";
 147     case DW_AT_discr_list:                 return "DW_AT_discr_list";
 148     case DW_AT_encoding:                   return "DW_AT_encoding";
 149     case DW_AT_external:                   return "DW_AT_external";
 150     case DW_AT_frame_base:                 return "DW_AT_frame_base";
 151     case DW_AT_friend:                     return "DW_AT_friend";
 152     case DW_AT_identifier_case:            return "DW_AT_identifier_case";
 153     case DW_AT_macro_info:                 return "DW_AT_macro_info";
 154     case DW_AT_namelist_item:              return "DW_AT_namelist_item";
 155     case DW_AT_priority:                   return "DW_AT_priority";
 156     case DW_AT_segment:                    return "DW_AT_segment";
 157     case DW_AT_specification:              return "DW_AT_specification";
 158     case DW_AT_static_link:                return "DW_AT_static_link";
 159     case DW_AT_type:                       return "DW_AT_type";
 160     case DW_AT_use_location:               return "DW_AT_use_location";
 161     case DW_AT_variable_parameter:         return "DW_AT_variable_parameter";
 162     case DW_AT_virtuality:                 return "DW_AT_virtuality";
 163     case DW_AT_vtable_elem_location:       return "DW_AT_vtable_elem_location";
 164     case DW_AT_allocated:                  return "DW_AT_allocated";
 165     case DW_AT_associated:                 return "DW_AT_associated";
 166     case DW_AT_data_location:              return "DW_AT_data_location";
 167     case DW_AT_byte_stride:                return "DW_AT_byte_stride";
 168     case DW_AT_entry_pc:                   return "DW_AT_entry_pc";
 169     case DW_AT_use_UTF8:                   return "DW_AT_use_UTF8";
 170     case DW_AT_extension:                  return "DW_AT_extension";
 171     case DW_AT_ranges:                     return "DW_AT_ranges";
 172     case DW_AT_trampoline:                 return "DW_AT_trampoline";
 173     case DW_AT_call_column:                return "DW_AT_call_column";
 174     case DW_AT_call_file:                  return "DW_AT_call_file";
 175     case DW_AT_call_line:                  return "DW_AT_call_line";
 176     case DW_AT_description:                return "DW_AT_description";
 177     case DW_AT_binary_scale:               return "DW_AT_binary_scale";
 178     case DW_AT_decimal_scale:              return "DW_AT_decimal_scale";
 179     case DW_AT_small:                      return "DW_AT_small";
 180     case DW_AT_decimal_sign:               return "DW_AT_decimal_sign";
 181     case DW_AT_digit_count:                return "DW_AT_digit_count";
 182     case DW_AT_picture_string:             return "DW_AT_picture_string";
 183     case DW_AT_mutable:                    return "DW_AT_mutable";
 184     case DW_AT_threads_scaled:             return "DW_AT_threads_scaled";
 185     case DW_AT_explicit:                   return "DW_AT_explicit";
 186     case DW_AT_object_pointer:             return "DW_AT_object_pointer";
 187     case DW_AT_endianity:                  return "DW_AT_endianity";
 188     case DW_AT_elemental:                  return "DW_AT_elemental";
 189     case DW_AT_pure:                       return "DW_AT_pure";
 190     case DW_AT_recursive:                  return "DW_AT_recursive";
 191     case DW_AT_MIPS_linkage_name:          return "DW_AT_MIPS_linkage_name";
 192     case DW_AT_sf_names:                   return "DW_AT_sf_names";
 193     case DW_AT_src_info:                   return "DW_AT_src_info";
 194     case DW_AT_mac_info:                   return "DW_AT_mac_info";
 195     case DW_AT_src_coords:                 return "DW_AT_src_coords";
 196     case DW_AT_body_begin:                 return "DW_AT_body_begin";
 197     case DW_AT_body_end:                   return "DW_AT_body_end";
 198     case DW_AT_GNU_vector:                 return "DW_AT_GNU_vector";
 199     case DW_AT_lo_user:                    return "DW_AT_lo_user";
 200     case DW_AT_hi_user:                    return "DW_AT_hi_user";
 201     case DW_AT_APPLE_optimized:            return "DW_AT_APPLE_optimized";
 202     case DW_AT_APPLE_flags:                return "DW_AT_APPLE_flags";
 203     case DW_AT_APPLE_isa:                  return "DW_AT_APPLE_isa";
 204     case DW_AT_APPLE_block:                return "DW_AT_APPLE_block";
 205     case DW_AT_APPLE_major_runtime_vers:   return "DW_AT_APPLE_major_runtime_vers";
 206     case DW_AT_APPLE_runtime_class:        return "DW_AT_APPLE_runtime_class";
 207   }
 208   assert(0 && "Unknown Dwarf Attribute");
 209   return "";
 210 }
 211
 212 /// FormEncodingString - Return the string for the specified form encoding.
 213 ///
 214 const char *FormEncodingString(unsigned Encoding) {
 215   switch (Encoding) {
 216     case DW_FORM_addr:                     return "FORM_addr";
 217     case DW_FORM_block2:                   return "FORM_block2";
 218     case DW_FORM_block4:                   return "FORM_block4";
 219     case DW_FORM_data2:                    return "FORM_data2";
 220     case DW_FORM_data4:                    return "FORM_data4";
 221     case DW_FORM_data8:                    return "FORM_data8";
 222     case DW_FORM_string:                   return "FORM_string";
 223     case DW_FORM_block:                    return "FORM_block";
 224     case DW_FORM_block1:                   return "FORM_block1";
 225     case DW_FORM_data1:                    return "FORM_data1";
 226     case DW_FORM_flag:                     return "FORM_flag";
 227     case DW_FORM_sdata:                    return "FORM_sdata";
 228     case DW_FORM_strp:                     return "FORM_strp";
 229     case DW_FORM_udata:                    return "FORM_udata";
 230     case DW_FORM_ref_addr:                 return "FORM_ref_addr";
 231     case DW_FORM_ref1:                     return "FORM_ref1";
 232     case DW_FORM_ref2:                     return "FORM_ref2";
 233     case DW_FORM_ref4:                     return "FORM_ref4";
 234     case DW_FORM_ref8:                     return "FORM_ref8";
 235     case DW_FORM_ref_udata:                return "FORM_ref_udata";
 236     case DW_FORM_indirect:                 return "FORM_indirect";
 237   }
 238   assert(0 && "Unknown Dwarf Form Encoding");
 239   return "";
 240 }
 241
 242 /// OperationEncodingString - Return the string for the specified operation
 243 /// encoding.
 244 const char *OperationEncodingString(unsigned Encoding) {
 245   switch (Encoding) {
 246     case DW_OP_addr:                       return "OP_addr";
 247     case DW_OP_deref:                      return "OP_deref";
 248     case DW_OP_const1u:                    return "OP_const1u";
 249     case DW_OP_const1s:                    return "OP_const1s";
 250     case DW_OP_const2u:                    return "OP_const2u";
 251     case DW_OP_const2s:                    return "OP_const2s";
 252     case DW_OP_const4u:                    return "OP_const4u";
 253     case DW_OP_const4s:                    return "OP_const4s";
 254     case DW_OP_const8u:                    return "OP_const8u";
 255     case DW_OP_const8s:                    return "OP_const8s";
 256     case DW_OP_constu:                     return "OP_constu";
 257     case DW_OP_consts:                     return "OP_consts";
 258     case DW_OP_dup:                        return "OP_dup";
 259     case DW_OP_drop:                       return "OP_drop";
 260     case DW_OP_over:                       return "OP_over";
 261     case DW_OP_pick:                       return "OP_pick";
 262     case DW_OP_swap:                       return "OP_swap";
 263     case DW_OP_rot:                        return "OP_rot";
 264     case DW_OP_xderef:                     return "OP_xderef";
 265     case DW_OP_abs:                        return "OP_abs";
 266     case DW_OP_and:                        return "OP_and";
 267     case DW_OP_div:                        return "OP_div";
 268     case DW_OP_minus:                      return "OP_minus";
 269     case DW_OP_mod:                        return "OP_mod";
 270     case DW_OP_mul:                        return "OP_mul";
 271     case DW_OP_neg:                        return "OP_neg";
 272     case DW_OP_not:                        return "OP_not";
 273     case DW_OP_or:                         return "OP_or";
 274     case DW_OP_plus:                       return "OP_plus";
 275     case DW_OP_plus_uconst:                return "OP_plus_uconst";
 276     case DW_OP_shl:                        return "OP_shl";
 277     case DW_OP_shr:                        return "OP_shr";
 278     case DW_OP_shra:                       return "OP_shra";
 279     case DW_OP_xor:                        return "OP_xor";
 280     case DW_OP_skip:                       return "OP_skip";
 281     case DW_OP_bra:                        return "OP_bra";
 282     case DW_OP_eq:                         return "OP_eq";
 283     case DW_OP_ge:                         return "OP_ge";
 284     case DW_OP_gt:                         return "OP_gt";
 285     case DW_OP_le:                         return "OP_le";
 286     case DW_OP_lt:                         return "OP_lt";
 287     case DW_OP_ne:                         return "OP_ne";
 288     case DW_OP_lit0:                       return "OP_lit0";
 289     case DW_OP_lit1:                       return "OP_lit1";
 290     case DW_OP_lit31:                      return "OP_lit31";
 291     case DW_OP_reg0:                       return "OP_reg0";
 292     case DW_OP_reg1:                       return "OP_reg1";
 293     case DW_OP_reg31:                      return "OP_reg31";
 294     case DW_OP_breg0:                      return "OP_breg0";
 295     case DW_OP_breg1:                      return "OP_breg1";
 296     case DW_OP_breg31:                     return "OP_breg31";
 297     case DW_OP_regx:                       return "OP_regx";
 298     case DW_OP_fbreg:                      return "OP_fbreg";
 299     case DW_OP_bregx:                      return "OP_bregx";
 300     case DW_OP_piece:                      return "OP_piece";
 301     case DW_OP_deref_size:                 return "OP_deref_size";
 302     case DW_OP_xderef_size:                return "OP_xderef_size";
 303     case DW_OP_nop:                        return "OP_nop";
 304     case DW_OP_push_object_address:        return "OP_push_object_address";
 305     case DW_OP_call2:                      return "OP_call2";
 306     case DW_OP_call4:                      return "OP_call4";
 307     case DW_OP_call_ref:                   return "OP_call_ref";
 308     case DW_OP_form_tls_address:           return "OP_form_tls_address";
 309     case DW_OP_call_frame_cfa:             return "OP_call_frame_cfa";
 310     case DW_OP_lo_user:                    return "OP_lo_user";
 311     case DW_OP_hi_user:                    return "OP_hi_user";
 312   }
 313   assert(0 && "Unknown Dwarf Operation Encoding");
 314   return "";
 315 }
 316
 317 /// AttributeEncodingString - Return the string for the specified attribute
 318 /// encoding.
 319 const char *AttributeEncodingString(unsigned Encoding) {
 320   switch (Encoding) {
 321     case DW_ATE_address:                   return "ATE_address";
 322     case DW_ATE_boolean:                   return "ATE_boolean";
 323     case DW_ATE_complex_float:             return "ATE_complex_float";
 324     case DW_ATE_float:                     return "ATE_float";
 325     case DW_ATE_signed:                    return "ATE_signed";
 326     case DW_ATE_signed_char:               return "ATE_signed_char";
 327     case DW_ATE_unsigned:                  return "ATE_unsigned";
 328     case DW_ATE_unsigned_char:             return "ATE_unsigned_char";
 329     case DW_ATE_imaginary_float:           return "ATE_imaginary_float";
 330     case DW_ATE_packed_decimal:            return "ATE_packed_decimal";
 331     case DW_ATE_numeric_string:            return "ATE_numeric_string";
 332     case DW_ATE_edited:                    return "ATE_edited";
 333     case DW_ATE_signed_fixed:              return "ATE_signed_fixed";
 334     case DW_ATE_unsigned_fixed:            return "ATE_unsigned_fixed";
 335     case DW_ATE_decimal_float:             return "ATE_decimal_float";
 336     case DW_ATE_lo_user:                   return "ATE_lo_user";
 337     case DW_ATE_hi_user:                   return "ATE_hi_user";
 338   }
 339   assert(0 && "Unknown Dwarf Attribute Encoding");
 340   return "";
 341 }
 342
 343 /// DecimalSignString - Return the string for the specified decimal sign
 344 /// attribute.
 345 const char *DecimalSignString(unsigned Sign) {
 346   switch (Sign) {
 347     case DW_DS_unsigned:                   return "DS_unsigned";
 348     case DW_DS_leading_overpunch:          return "DS_leading_overpunch";
 349     case DW_DS_trailing_overpunch:         return "DS_trailing_overpunch";
 350     case DW_DS_leading_separate:           return "DS_leading_separate";
 351     case DW_DS_trailing_separate:          return "DS_trailing_separate";
 352   }
 353   assert(0 && "Unknown Dwarf Decimal Sign Attribute");
 354   return "";
 355 }
 356
 357 /// EndianityString - Return the string for the specified endianity.
 358 ///
 359 const char *EndianityString(unsigned Endian) {
 360   switch (Endian) {
 361     case DW_END_default:                   return "END_default";
 362     case DW_END_big:                       return "END_big";
 363     case DW_END_little:                    return "END_little";
 364     case DW_END_lo_user:                   return "END_lo_user";
 365     case DW_END_hi_user:                   return "END_hi_user";
 366   }
 367   assert(0 && "Unknown Dwarf Endianity");
 368   return "";
 369 }
 370
 371 /// AccessibilityString - Return the string for the specified accessibility.
 372 ///
 373 const char *AccessibilityString(unsigned Access) {
 374   switch (Access) {
 375     // Accessibility codes
 376     case DW_ACCESS_public:                 return "ACCESS_public";
 377     case DW_ACCESS_protected:              return "ACCESS_protected";
 378     case DW_ACCESS_private:                return "ACCESS_private";
 379   }
 380   assert(0 && "Unknown Dwarf Accessibility");
 381   return "";
 382 }
 383
 384 /// VisibilityString - Return the string for the specified visibility.
 385 ///
 386 const char *VisibilityString(unsigned Visibility) {
 387   switch (Visibility) {
 388     case DW_VIS_local:                     return "VIS_local";
 389     case DW_VIS_exported:                  return "VIS_exported";
 390     case DW_VIS_qualified:                 return "VIS_qualified";
 391   }
 392   assert(0 && "Unknown Dwarf Visibility");
 393   return "";
 394 }
 395
 396 /// VirtualityString - Return the string for the specified virtuality.
 397 ///
 398 const char *VirtualityString(unsigned Virtuality) {
 399   switch (Virtuality) {
 400     case DW_VIRTUALITY_none:               return "VIRTUALITY_none";
 401     case DW_VIRTUALITY_virtual:            return "VIRTUALITY_virtual";
 402     case DW_VIRTUALITY_pure_virtual:       return "VIRTUALITY_pure_virtual";
 403   }
 404   assert(0 && "Unknown Dwarf Virtuality");
 405   return "";
 406 }
 407
 408 /// LanguageString - Return the string for the specified language.
 409 ///
 410 const char *LanguageString(unsigned Language) {
 411   switch (Language) {
 412     case DW_LANG_C89:                      return "LANG_C89";
 413     case DW_LANG_C:                        return "LANG_C";
 414     case DW_LANG_Ada83:                    return "LANG_Ada83";
 415     case DW_LANG_C_plus_plus:              return "LANG_C_plus_plus";
 416     case DW_LANG_Cobol74:                  return "LANG_Cobol74";
 417     case DW_LANG_Cobol85:                  return "LANG_Cobol85";
 418     case DW_LANG_Fortran77:                return "LANG_Fortran77";
 419     case DW_LANG_Fortran90:                return "LANG_Fortran90";
 420     case DW_LANG_Pascal83:                 return "LANG_Pascal83";
 421     case DW_LANG_Modula2:                  return "LANG_Modula2";
 422     case DW_LANG_Java:                     return "LANG_Java";
 423     case DW_LANG_C99:                      return "LANG_C99";
 424     case DW_LANG_Ada95:                    return "LANG_Ada95";
 425     case DW_LANG_Fortran95:                return "LANG_Fortran95";
 426     case DW_LANG_PLI:                      return "LANG_PLI";
 427     case DW_LANG_ObjC:                     return "LANG_ObjC";
 428     case DW_LANG_ObjC_plus_plus:           return "LANG_ObjC_plus_plus";
 429     case DW_LANG_UPC:                      return "LANG_UPC";
 430     case DW_LANG_D:                        return "LANG_D";
 431     case DW_LANG_lo_user:                  return "LANG_lo_user";
 432     case DW_LANG_hi_user:                  return "LANG_hi_user";
 433   }
 434   assert(0 && "Unknown Dwarf Language");
 435   return "";
 436 }
 437
 438 /// CaseString - Return the string for the specified identifier case.
 439 ///
 440 const char *CaseString(unsigned Case) {
 441    switch (Case) {
 442     case DW_ID_case_sensitive:             return "ID_case_sensitive";
 443     case DW_ID_up_case:                    return "ID_up_case";
 444     case DW_ID_down_case:                  return "ID_down_case";
 445     case DW_ID_case_insensitive:           return "ID_case_insensitive";
 446   }
 447   assert(0 && "Unknown Dwarf Identifier Case");
 448   return "";
 449 }
 450
 451 /// ConventionString - Return the string for the specified calling convention.
 452 ///
 453 const char *ConventionString(unsigned Convention) {
 454    switch (Convention) {
 455     case DW_CC_normal:                     return "CC_normal";
 456     case DW_CC_program:                    return "CC_program";
 457     case DW_CC_nocall:                     return "CC_nocall";
 458     case DW_CC_lo_user:                    return "CC_lo_user";
 459     case DW_CC_hi_user:                    return "CC_hi_user";
 460   }
 461   assert(0 && "Unknown Dwarf Calling Convention");
 462   return "";
 463 }
 464
 465 /// InlineCodeString - Return the string for the specified inline code.
 466 ///
 467 const char *InlineCodeString(unsigned Code) {
 468    switch (Code) {
 469     case DW_INL_not_inlined:               return "INL_not_inlined";
 470     case DW_INL_inlined:                   return "INL_inlined";
 471     case DW_INL_declared_not_inlined:      return "INL_declared_not_inlined";
 472     case DW_INL_declared_inlined:          return "INL_declared_inlined";
 473   }
 474   assert(0 && "Unknown Dwarf Inline Code");
 475   return "";
 476 }
 477
 478 /// ArrayOrderString - Return the string for the specified array order.
 479 ///
 480 const char *ArrayOrderString(unsigned Order) {
 481    switch (Order) {
 482     case DW_ORD_row_major:                 return "ORD_row_major";
 483     case DW_ORD_col_major:                 return "ORD_col_major";
 484   }
 485   assert(0 && "Unknown Dwarf Array Order");
 486   return "";
 487 }
 488
 489 /// DiscriminantString - Return the string for the specified discriminant
 490 /// descriptor.
 491 const char *DiscriminantString(unsigned Discriminant) {
 492    switch (Discriminant) {
 493     case DW_DSC_label:                     return "DSC_label";
 494     case DW_DSC_range:                     return "DSC_range";
 495   }
 496   assert(0 && "Unknown Dwarf Discriminant Descriptor");
 497   return "";
 498 }
 499
 500 /// LNStandardString - Return the string for the specified line number standard.
 501 ///
 502 const char *LNStandardString(unsigned Standard) {
 503    switch (Standard) {
 504     case DW_LNS_copy:                      return "LNS_copy";
 505     case DW_LNS_advance_pc:                return "LNS_advance_pc";
 506     case DW_LNS_advance_line:              return "LNS_advance_line";
 507     case DW_LNS_set_file:                  return "LNS_set_file";
 508     case DW_LNS_set_column:                return "LNS_set_column";
 509     case DW_LNS_negate_stmt:               return "LNS_negate_stmt";
 510     case DW_LNS_set_basic_block:           return "LNS_set_basic_block";
 511     case DW_LNS_const_add_pc:              return "LNS_const_add_pc";
 512     case DW_LNS_fixed_advance_pc:          return "LNS_fixed_advance_pc";
 513     case DW_LNS_set_prologue_end:          return "LNS_set_prologue_end";
 514     case DW_LNS_set_epilogue_begin:        return "LNS_set_epilogue_begin";
 515     case DW_LNS_set_isa:                   return "LNS_set_isa";
 516   }
 517   assert(0 && "Unknown Dwarf Line Number Standard");
 518   return "";
 519 }
 520
 521 /// LNExtendedString - Return the string for the specified line number extended
 522 /// opcode encodings.
 523 const char *LNExtendedString(unsigned Encoding) {
 524    switch (Encoding) {
 525     // Line Number Extended Opcode Encodings
 526     case DW_LNE_end_sequence:              return "LNE_end_sequence";
 527     case DW_LNE_set_address:               return "LNE_set_address";
 528     case DW_LNE_define_file:               return "LNE_define_file";
 529     case DW_LNE_lo_user:                   return "LNE_lo_user";
 530     case DW_LNE_hi_user:                   return "LNE_hi_user";
 531   }
 532   assert(0 && "Unknown Dwarf Line Number Extended Opcode Encoding");
 533   return "";
 534 }
 535
 536 /// MacinfoString - Return the string for the specified macinfo type encodings.
 537 ///
 538 const char *MacinfoString(unsigned Encoding) {
 539    switch (Encoding) {
 540     // Macinfo Type Encodings
 541     case DW_MACINFO_define:                return "MACINFO_define";
 542     case DW_MACINFO_undef:                 return "MACINFO_undef";
 543     case DW_MACINFO_start_file:            return "MACINFO_start_file";
 544     case DW_MACINFO_end_file:              return "MACINFO_end_file";
 545     case DW_MACINFO_vendor_ext:            return "MACINFO_vendor_ext";
 546   }
 547   assert(0 && "Unknown Dwarf Macinfo Type Encodings");
 548   return "";
 549 }
 550
 551 /// CallFrameString - Return the string for the specified call frame instruction
 552 /// encodings.
 553 const char *CallFrameString(unsigned Encoding) {
 554    switch (Encoding) {
 555     case DW_CFA_advance_loc:               return "CFA_advance_loc";
 556     case DW_CFA_offset:                    return "CFA_offset";
 557     case DW_CFA_restore:                   return "CFA_restore";
 558     case DW_CFA_set_loc:                   return "CFA_set_loc";
 559     case DW_CFA_advance_loc1:              return "CFA_advance_loc1";
 560     case DW_CFA_advance_loc2:              return "CFA_advance_loc2";
 561     case DW_CFA_advance_loc4:              return "CFA_advance_loc4";
 562     case DW_CFA_offset_extended:           return "CFA_offset_extended";
 563     case DW_CFA_restore_extended:          return "CFA_restore_extended";
 564     case DW_CFA_undefined:                 return "CFA_undefined";
 565     case DW_CFA_same_value:                return "CFA_same_value";
 566     case DW_CFA_register:                  return "CFA_register";
 567     case DW_CFA_remember_state:            return "CFA_remember_state";
 568     case DW_CFA_restore_state:             return "CFA_restore_state";
 569     case DW_CFA_def_cfa:                   return "CFA_def_cfa";
 570     case DW_CFA_def_cfa_register:          return "CFA_def_cfa_register";
 571     case DW_CFA_def_cfa_offset:            return "CFA_def_cfa_offset";
 572     case DW_CFA_def_cfa_expression:        return "CFA_def_cfa_expression";
 573     case DW_CFA_expression:                return "CFA_expression";
 574     case DW_CFA_offset_extended_sf:        return "CFA_offset_extended_sf";
 575     case DW_CFA_def_cfa_sf:                return "CFA_def_cfa_sf";
 576     case DW_CFA_def_cfa_offset_sf:         return "CFA_def_cfa_offset_sf";
 577     case DW_CFA_val_offset:                return "CFA_val_offset";
 578     case DW_CFA_val_offset_sf:             return "CFA_val_offset_sf";
 579     case DW_CFA_val_expression:            return "CFA_val_expression";
 580     case DW_CFA_lo_user:                   return "CFA_lo_user";
 581     case DW_CFA_hi_user:                   return "CFA_hi_user";
 582   }
 583   assert(0 && "Unknown Dwarf Call Frame Instruction Encodings");
 584   return "";
 585 }
 586
 587 } // End of namespace dwarf.
 588
 589 } // End of namespace llvm.