godump.c (go_format_type): Check for invalid type names, pointer target types, and...

	* godump.c (go_format_type): Check for invalid type names, pointer
	target types, and struct field types.

From-SVN: r174253

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index da20d12827a4d0b264988b4181cad3fc2b99130f..06d58bdf68626b6e0b1c99b9993ef37da6f2728d 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,8 @@
+2011-05-25  Ian Lance Taylor  <iant@google.com>
+
+       * godump.c (go_format_type): Check for invalid type names, pointer
+       target types, and struct field types.
+
 2011-05-25  Jason Merrill  <jason@redhat.com>
 
        * print-tree.c (print_node): Only look at TREE_TYPE if TS_TYPED.

diff --git a/gcc/godump.c b/gcc/godump.c
index 35db1d6a8c43f044f9ee2b874ea3d451b569e63d..05c3064c9efc3b60452b02dd9e71de890e765b1e 100644 (file)
--- a/gcc/godump.c
+++ b/gcc/godump.c
@@ -532,8 +532,18 @@ go_format_type (struct godump_container *container, tree type,
       break;
 
     case TYPE_DECL:
-      obstack_1grow (ob, '_');
-      go_append_string (ob, DECL_NAME (type));
+      {
+       void **slot;
+
+       slot = htab_find_slot (container->invalid_hash,
+                              IDENTIFIER_POINTER (DECL_NAME (type)),
+                              NO_INSERT);
+       if (slot != NULL)
+         ret = false;
+
+       obstack_1grow (ob, '_');
+       go_append_string (ob, DECL_NAME (type));
+      }
       break;
 
     case INTEGER_TYPE:
@@ -604,31 +614,28 @@ go_format_type (struct godump_container *container, tree type,
                      == FUNCTION_TYPE))))
         {
          tree name;
+         void **slot;
 
          name = TYPE_NAME (TREE_TYPE (type));
-         if (TREE_CODE (name) == IDENTIFIER_NODE)
-           {
-             obstack_grow (ob, "*_", 2);
-             go_append_string (ob, name);
+         if (TREE_CODE (name) == TYPE_DECL)
+           name = DECL_NAME (name);
 
-             /* The pointer here can be used without the struct or
-                union definition.  So this struct or union is a a
-                potential dummy type.  */
-             if (RECORD_OR_UNION_TYPE_P (TREE_TYPE (type)))
-               pointer_set_insert (container->pot_dummy_types,
-                                   IDENTIFIER_POINTER (name));
+         slot = htab_find_slot (container->invalid_hash,
+                                IDENTIFIER_POINTER (name), NO_INSERT);
+         if (slot != NULL)
+           ret = false;
 
-             return ret;
-           }
-         else if (TREE_CODE (name) == TYPE_DECL)
-           {
-             obstack_grow (ob, "*_", 2);
-             go_append_string (ob, DECL_NAME (name));
-             if (RECORD_OR_UNION_TYPE_P (TREE_TYPE (type)))
-               pointer_set_insert (container->pot_dummy_types,
-                                   IDENTIFIER_POINTER (DECL_NAME (name)));
-             return ret;
-           }
+         obstack_grow (ob, "*_", 2);
+         go_append_string (ob, name);
+
+         /* The pointer here can be used without the struct or union
+            definition.  So this struct or union is a potential dummy
+            type.  */
+         if (RECORD_OR_UNION_TYPE_P (TREE_TYPE (type)))
+           pointer_set_insert (container->pot_dummy_types,
+                               IDENTIFIER_POINTER (name));
+
+         return ret;
         }
       if (TREE_CODE (TREE_TYPE (type)) == FUNCTION_TYPE)
        obstack_grow (ob, "func", 4);
@@ -716,17 +723,21 @@ go_format_type (struct godump_container *container, tree type,
                            && (TREE_CODE (TREE_TYPE (TREE_TYPE (field)))
                                 == FUNCTION_TYPE))))
                  {
-                   tree name = TYPE_NAME (TREE_TYPE (field));
-                   if (TREE_CODE (name) == IDENTIFIER_NODE)
-                     {
-                       obstack_1grow (ob, '_');
-                       go_append_string (ob, name);
-                     }
-                   else if (TREE_CODE (name) == TYPE_DECL)
-                     {
-                       obstack_1grow (ob, '_');
-                       go_append_string (ob, DECL_NAME (name));
-                     }
+                   tree name;
+                   void **slot;
+
+                   name = TYPE_NAME (TREE_TYPE (field));
+                   if (TREE_CODE (name) == TYPE_DECL)
+                     name = DECL_NAME (name);
+
+                   slot = htab_find_slot (container->invalid_hash,
+                                          IDENTIFIER_POINTER (name),
+                                          NO_INSERT);
+                   if (slot != NULL)
+                     ret = false;
+
+                   obstack_1grow (ob, '_');
+                   go_append_string (ob, name);
                  }
                else
                  {