changes, what else?
[deliverable/binutils-gdb.git] / gdb / valprint.c
index e8c99ec260c750d67313873a6fbc7da21e6ad185..db6f7fc655918cbafec6bd70384a8c844f6c7e3a 100644 (file)
@@ -51,6 +51,9 @@ set_output_radix PARAMS ((char *, int, struct cmd_list_element *));
 static void
 type_print_base PARAMS ((struct type *, FILE *, int, int));
 
+static void
+type_print_args PARAMS ((struct type *, FILE *));
+
 static void
 type_print_varspec_suffix PARAMS ((struct type *, FILE *, int, int, int));
 
@@ -507,7 +510,7 @@ val_print_fields (type, valaddr, stream, format, recurse, pretty, dont_print)
       for (i = n_baseclasses; i < len; i++)
        {
          /* Check if static field */
-         if (TYPE_FIELD_STATIC (type, i))
+         if (TYPE_FIELD_STATIC (type, i) || TYPE_FIELD_NESTED (type, i))
            continue;
          if (fields_seen)
            fprintf_filtered (stream, ", ");
@@ -625,6 +628,7 @@ cplus_val_print (type, valaddr, stream, format, recurse, pretty, dont_print)
          obstack_ptr_grow (&dont_print_obstack, TYPE_BASECLASS (type, i));
        }
 
+      /* Fix to use baseclass_offset instead. FIXME */
       baddr = baseclass_addr (type, i, valaddr, 0, &err);
       if (err == 0 && baddr == 0)
        error ("could not find virtual baseclass `%s'\n",
@@ -864,8 +868,9 @@ val_print (type, valaddr, address, stream, format, deref_ref, recurse, pretty)
 
          addr = unpack_pointer (lookup_pointer_type (builtin_type_void),
                                valaddr);
-         if (addr < 128)                       /* FIXME!  What is this 128? */
+         if (METHOD_PTR_IS_VIRTUAL(addr))
            {
+             int offset = METHOD_PTR_TO_VOFFSET(addr);
              len = TYPE_NFN_FIELDS (domain);
              for (i = 0; i < len; i++)
                {
@@ -875,9 +880,9 @@ val_print (type, valaddr, address, stream, format, deref_ref, recurse, pretty)
                  for (j = 0; j < len2; j++)
                    {
                      QUIT;
-                     if (TYPE_FN_FIELD_VOFFSET (f, j) == addr)
+                     if (TYPE_FN_FIELD_VOFFSET (f, j) == offset)
                        {
-                         kind = "virtual";
+                         kind = "virtual ";
                          goto common;
                        }
                    }
@@ -1431,46 +1436,50 @@ type_print_method_args (args, prefix, varstring, staticp, stream)
   fprintf_filtered (stream, ")");
 }
   
-/* If TYPE is a derived type, then print out derivation
-   information.  Print out all layers of the type heirarchy
-   until we encounter one with multiple inheritance.
-   At that point, print out that ply, and return.  */
+/* If TYPE is a derived type, then print out derivation information.
+   Print only the actual base classes of this type, not the base classes
+   of the base classes.  I.E.  for the derivation hierarchy:
+
+       class A { int a; };
+       class B : public A {int b; };
+       class C : public B {int c; };
+
+   Print the type of class C as:
+
+       class C : public B {
+               int c;
+       }
+
+   Not as the following (like gdb used to), which is not legal C++ syntax for
+   derived types and may be confused with the multiple inheritance form:
+
+       class C : public B : public A {
+               int c;
+       }
+
+   In general, gdb should try to print the types as closely as possible to
+   the form that they appear in the source code. */
+
 static void
 type_print_derivation_info (stream, type)
      FILE *stream;
      struct type *type;
 {
   char *name;
-  int i, n_baseclasses = TYPE_N_BASECLASSES (type);
-  struct type *basetype = 0;
+  int i;
 
-  while (type && n_baseclasses > 0)
+  for (i = 0; i < TYPE_N_BASECLASSES (type); i++)
     {
-      /* Not actually sure about this one -- Bryan. */
-      check_stub_type (type);
-      
-      fprintf_filtered (stream, ": ");
-      for (i = 0; ;)
-       {
-         basetype = TYPE_BASECLASS (type, i);
-         if (name = type_name_no_tag (basetype))
-           {
-             fprintf_filtered (stream, "%s%s ",
-                      BASETYPE_VIA_PUBLIC(type, i) ? "public" : "private",
-                      BASETYPE_VIA_VIRTUAL(type, i) ? " virtual" : "");
-             fputs_filtered (name, stream);
-           }
-         i++;
-         if (i >= n_baseclasses)
-             break;
-         fprintf_filtered (stream, ", ");
-       }
-
-      fprintf_filtered (stream, " ");
-      if (n_baseclasses != 1)
-       break;
-      n_baseclasses = TYPE_N_BASECLASSES (basetype);
-      type = basetype;
+      fputs_filtered (i == 0 ? ": " : ", ", stream);
+      fprintf_filtered (stream, "%s%s ",
+                       BASETYPE_VIA_PUBLIC (type, i) ? "public" : "private",
+                       BASETYPE_VIA_VIRTUAL(type, i) ? " virtual" : "");
+      name = type_name_no_tag (TYPE_BASECLASS (type, i));
+      fprintf_filtered (stream, "%s", name ? name : "(null)");
+    }
+  if (i > 0)
+    {
+      fputs_filtered (" ", stream);
     }
 }
 
@@ -1571,6 +1580,44 @@ type_print_varspec_prefix (type, stream, show, passed_a_ptr)
     }
 }
 
+static void
+type_print_args (type, stream)
+     struct type *type;
+     FILE *stream;
+{
+  int i;
+  struct type **args;
+
+  fprintf_filtered (stream, "(");
+  args = TYPE_ARG_TYPES (type);
+  if (args != NULL)
+    {
+      if (args[1] == NULL)
+       {
+         fprintf_filtered (stream, "...");
+       }
+      else
+       {
+         for (i = 1;
+              args[i] != NULL && args[i]->code != TYPE_CODE_VOID;
+              i++)
+           {
+             type_print_1 (args[i], "", stream, -1, 0);
+             if (args[i+1] == NULL)
+               {
+                 fprintf_filtered (stream, "...");
+               }
+             else if (args[i+1]->code != TYPE_CODE_VOID)
+               {
+                 fprintf_filtered (stream, ",");
+                 wrap_here ("    ");
+               }
+           }
+       }
+    }
+  fprintf_filtered (stream, ")");
+}
+
 /* Print any array sizes, function arguments or close parentheses
    needed after the variable name (to describe its type).
    Args work like type_print_varspec_prefix.  */
@@ -1621,23 +1668,7 @@ type_print_varspec_suffix (type, stream, show, passed_a_ptr, demangled_args)
       type_print_varspec_suffix (TYPE_TARGET_TYPE (type), stream, 0, 0, 0);
       if (passed_a_ptr)
        {
-         int i;
-         struct type **args = TYPE_ARG_TYPES (type);
-
-         fprintf_filtered (stream, "(");
-         if (args[1] == 0)
-           fprintf_filtered (stream, "...");
-         else for (i = 1; args[i] != 0 && args[i]->code != TYPE_CODE_VOID; i++)
-           {
-             type_print_1 (args[i], "", stream, -1, 0);
-             if (args[i+1] == 0)
-               fprintf_filtered (stream, "...");
-             else if (args[i+1]->code != TYPE_CODE_VOID) {
-               fprintf_filtered (stream, ",");
-               wrap_here ("    ");
-             }
-           }
-         fprintf_filtered (stream, ")");
+         type_print_args (type, stream);
        }
       break;
 
@@ -1700,7 +1731,7 @@ type_print_base (type, stream, show, level)
   register int lastval;
   char *mangled_name;
   char *demangled_name;
-
+  enum {s_none, s_public, s_private, s_protected} section_type;
   QUIT;
 
   wrap_here ("    ");
@@ -1731,7 +1762,8 @@ type_print_base (type, stream, show, level)
       break;
 
     case TYPE_CODE_STRUCT:
-      fprintf_filtered (stream, "struct ");
+      fprintf_filtered (stream,
+                       HAVE_CPLUS_STRUCT (type) ? "class " : "struct ");
       goto struct_union;
 
     case TYPE_CODE_UNION:
@@ -1751,20 +1783,25 @@ type_print_base (type, stream, show, level)
          
          type_print_derivation_info (stream, type);
          
-         fprintf_filtered (stream, "{");
-         len = TYPE_NFIELDS (type);
-         if (len)
-           fprintf_filtered (stream, "\n");
-         else
+         fprintf_filtered (stream, "{\n");
+         if ((TYPE_NFIELDS (type) == 0) && (TYPE_NFN_FIELDS (type) == 0))
            {
              if (TYPE_FLAGS (type) & TYPE_FLAG_STUB)
-               fprintf_filtered (stream, "<incomplete type>\n");
+               fprintfi_filtered (level + 4, stream, "<incomplete type>\n");
              else
-               fprintf_filtered (stream, "<no data fields>\n");
+               fprintfi_filtered (level + 4, stream, "<no data fields>\n");
            }
 
+         /* Start off with no specific section type, so we can print
+            one for the first field we find, and use that section type
+            thereafter until we find another type. */
+
+         section_type = s_none;
+
          /* If there is a base class for this type,
             do not print the field that it occupies.  */
+
+         len = TYPE_NFIELDS (type);
          for (i = TYPE_N_BASECLASSES (type); i < len; i++)
            {
              QUIT;
@@ -1773,15 +1810,51 @@ type_print_base (type, stream, show, level)
                  !strncmp (TYPE_FIELD_NAME (type, i), "_vptr", 5))
                continue;
 
+             /* If this is a C++ class we can print the various C++ section
+                labels. */
+
+             if (HAVE_CPLUS_STRUCT (type))
+               {
+                 if (TYPE_FIELD_PROTECTED (type, i))
+                   {
+                     if (section_type != s_protected)
+                       {
+                         section_type = s_protected;
+                         fprintfi_filtered (level + 2, stream,
+                                            "protected:\n");
+                       }
+                   }
+                 else if (TYPE_FIELD_PRIVATE (type, i))
+                   {
+                     if (section_type != s_private)
+                       {
+                         section_type = s_private;
+                         fprintfi_filtered (level + 2, stream, "private:\n");
+                       }
+                   }
+                 else
+                   {
+                     if (section_type != s_public)
+                       {
+                         section_type = s_public;
+                         fprintfi_filtered (level + 2, stream, "public:\n");
+                       }
+                   }
+               }
+
              print_spaces_filtered (level + 4, stream);
              if (TYPE_FIELD_STATIC (type, i))
                {
                  fprintf_filtered (stream, "static ");
                }
+             if (TYPE_FIELD_NESTED (type, i))
+               {
+                 fprintf_filtered (stream, "typedef ");
+               }
              type_print_1 (TYPE_FIELD_TYPE (type, i),
                            TYPE_FIELD_NAME (type, i),
                            stream, show - 1, level + 4);
-             if (!TYPE_FIELD_STATIC (type, i)
+             if (!TYPE_FIELD_STATIC (type, i) && !TYPE_FIELD_NESTED (type, i)
                  && TYPE_FIELD_PACKED (type, i))
                {
                  /* It is a bitfield.  This code does not attempt
@@ -1795,9 +1868,13 @@ type_print_base (type, stream, show, level)
              fprintf_filtered (stream, ";\n");
            }
 
-         /* C++: print out the methods */
+         /* If there are both fields and methods, put a space between. */
          len = TYPE_NFN_FIELDS (type);
-         if (len) fprintf_filtered (stream, "\n");
+         if (len && section_type != s_none)
+            fprintf_filtered (stream, "\n");
+
+         /* C++: print out the methods */
+
          for (i = 0; i < len; i++)
            {
              struct fn_field *f = TYPE_FN_FIELDLIST1 (type, i);
@@ -1807,6 +1884,32 @@ type_print_base (type, stream, show, level)
              for (j = 0; j < len2; j++)
                {
                  QUIT;
+                 if (TYPE_FN_FIELD_PROTECTED (f, j))
+                   {
+                     if (section_type != s_protected)
+                       {
+                         section_type = s_protected;
+                         fprintfi_filtered (level + 2, stream,
+                                            "protected:\n");
+                       }
+                   }
+                 else if (TYPE_FN_FIELD_PRIVATE (f, j))
+                   {
+                     if (section_type != s_private)
+                       {
+                         section_type = s_private;
+                         fprintfi_filtered (level + 2, stream, "private:\n");
+                       }
+                   }
+                 else
+                   {
+                     if (section_type != s_public)
+                       {
+                         section_type = s_public;
+                         fprintfi_filtered (level + 2, stream, "public:\n");
+                       }
+                   }
+
                  print_spaces_filtered (level + 4, stream);
                  if (TYPE_FN_FIELD_VIRTUAL_P (f, j))
                    fprintf_filtered (stream, "virtual ");
@@ -1858,8 +1961,7 @@ type_print_base (type, stream, show, level)
                }
            }
 
-         print_spaces_filtered (level, stream);
-         fprintf_filtered (stream, "}");
+         fprintfi_filtered (level, stream, "}");
        }
       break;
 
This page took 0.027476 seconds and 4 git commands to generate.