From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 15439 invoked by alias); 17 Jan 2008 14:56:25 -0000 Received: (qmail 15429 invoked by uid 22791); 17 Jan 2008 14:56:24 -0000 X-Spam-Check-By: sourceware.org Received: from mail.codesourcery.com (HELO mail.codesourcery.com) (65.74.133.4) by sourceware.org (qpsmtpd/0.31) with ESMTP; Thu, 17 Jan 2008 14:56:03 +0000 Received: (qmail 5150 invoked from network); 17 Jan 2008 14:56:01 -0000 Received: from unknown (HELO wind.local) (vladimir@127.0.0.2) by mail.codesourcery.com with ESMTPA; 17 Jan 2008 14:56:01 -0000 From: Vladimir Prus Date: Thu, 17 Jan 2008 14:56:00 -0000 Subject: [RFA] Use vector for varobj_list_children interface. To: gdb-patches@sources.redhat.com X-TUID: 2ef0b1e7eb30f0b8 X-Length: 5895 X-UID: 124 MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline Message-Id: <200801171755.47572.vladimir@codesourcery.com> Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org X-SW-Source: 2008-01/txt/msg00448.txt.bz2 Presently, varobj_list_children has a varobj*** parameter that receives the list of all children. However, at the same time the children are stored inside varobj->children, which is VEC(varobj_p), and varobj_list_children builds that too. Building two data structures for the same data does not make sense, so this patch makes varobj_list_children return VEC(varobj_p). OK? - Volodya --- gdb/mi/mi-cmd-var.c | 25 ++++++++++--------------- gdb/varobj.c | 33 +++++---------------------------- gdb/varobj.h | 7 +++++-- 3 files changed, 20 insertions(+), 45 deletions(-) diff --git a/gdb/mi/mi-cmd-var.c b/gdb/mi/mi-cmd-var.c index 2b5cd6d..083a34d 100644 --- a/gdb/mi/mi-cmd-var.c +++ b/gdb/mi/mi-cmd-var.c @@ -351,12 +351,13 @@ mi_print_value_p (struct type *type, enum print_values print_values) enum mi_cmd_result mi_cmd_var_list_children (char *command, char **argv, int argc) { - struct varobj *var; - struct varobj **childlist; - struct varobj **cc; + struct varobj *var; + VEC(varobj_p) *children; + struct varobj *child; struct cleanup *cleanup_children; int numchild; enum print_values print_values; + int ix; if (argc != 1 && argc != 2) error (_("mi_cmd_var_list_children: Usage: [PRINT_VALUES] NAME")); @@ -369,34 +370,28 @@ mi_cmd_var_list_children (char *command, char **argv, int argc) if (var == NULL) error (_("Variable object not found")); - numchild = varobj_list_children (var, &childlist); - ui_out_field_int (uiout, "numchild", numchild); + children = varobj_list_children (var); + ui_out_field_int (uiout, "numchild", VEC_length (varobj_p, children)); if (argc == 2) print_values = mi_parse_values_option (argv[0]); else print_values = PRINT_NO_VALUES; - if (numchild <= 0) - { - xfree (childlist); - return MI_CMD_DONE; - } + if (VEC_length (varobj_p, children) == 0) + return MI_CMD_DONE; if (mi_version (uiout) == 1) cleanup_children = make_cleanup_ui_out_tuple_begin_end (uiout, "children"); else cleanup_children = make_cleanup_ui_out_list_begin_end (uiout, "children"); - cc = childlist; - while (*cc != NULL) + for (ix = 0; VEC_iterate (varobj_p, children, ix, child); ++ix) { struct cleanup *cleanup_child; cleanup_child = make_cleanup_ui_out_tuple_begin_end (uiout, "child"); - print_varobj (*cc, print_values, 1 /* print expression */); - cc++; + print_varobj (child, print_values, 1 /* print expression */); do_cleanups (cleanup_child); } do_cleanups (cleanup_children); - xfree (childlist); return MI_CMD_DONE; } diff --git a/gdb/varobj.c b/gdb/varobj.c index d078bef..102a67e 100644 --- a/gdb/varobj.c +++ b/gdb/varobj.c @@ -83,10 +83,6 @@ struct varobj_root struct varobj_root *next; }; -typedef struct varobj *varobj_p; - -DEF_VEC_P (varobj_p); - /* Every variable in the system has a structure of this type defined for it. This structure holds all information necessary to manipulate a particular object variable. Members which must be freed are noted. */ @@ -718,42 +714,28 @@ varobj_get_num_children (struct varobj *var) /* Creates a list of the immediate children of a variable object; the return code is the number of such children or -1 on error */ -int -varobj_list_children (struct varobj *var, struct varobj ***childlist) +VEC(varobj_p)* +varobj_list_children (struct varobj *var) { struct varobj *child; char *name; int i; - /* sanity check: have we been passed a pointer? */ - if (childlist == NULL) - return -1; - - *childlist = NULL; - if (var->num_children == -1) var->num_children = number_of_children (var); /* If that failed, give up. */ if (var->num_children == -1) - return -1; + return var->children; /* If we're called when the list of children is not yet initialized, allocate enough elements in it. */ while (VEC_length (varobj_p, var->children) < var->num_children) VEC_safe_push (varobj_p, var->children, NULL); - /* List of children */ - *childlist = xmalloc ((var->num_children + 1) * sizeof (struct varobj *)); - for (i = 0; i < var->num_children; i++) { - varobj_p existing; - - /* Mark as the end in case we bail out */ - *((*childlist) + i) = NULL; - - existing = VEC_index (varobj_p, var->children, i); + varobj_p existing = VEC_index (varobj_p, var->children, i); if (existing == NULL) { @@ -764,14 +746,9 @@ varobj_list_children (struct varobj *var, struct varobj ***childlist) existing = create_child (var, i, name); VEC_replace (varobj_p, var->children, i, existing); } - - *((*childlist) + i) = existing; } - /* End of list is marked by a NULL pointer */ - *((*childlist) + i) = NULL; - - return var->num_children; + return var->children; } /* Obtain the type of an object Variable as a string similar to the one gdb diff --git a/gdb/varobj.h b/gdb/varobj.h index 588eebe..677a804 100644 --- a/gdb/varobj.h +++ b/gdb/varobj.h @@ -20,6 +20,7 @@ #include "symtab.h" #include "gdbtypes.h" +#include "vec.h" /* Enumeration for the format types */ enum varobj_display_formats @@ -61,6 +62,9 @@ extern char *varobj_language_string[]; /* Struct thar describes a variable object instance */ struct varobj; +typedef struct varobj *varobj_p; +DEF_VEC_P (varobj_p); + /* API functions */ extern struct varobj *varobj_create (char *objname, @@ -91,8 +95,7 @@ extern int varobj_get_frozen (struct varobj *var); extern int varobj_get_num_children (struct varobj *var); -extern int varobj_list_children (struct varobj *var, - struct varobj ***childlist); +extern VEC(varobj_p)* varobj_list_children (struct varobj *var); extern char *varobj_get_type (struct varobj *var); -- 1.5.3.5