From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 12059 invoked by alias); 20 Jul 2012 15:49:55 -0000 Received: (qmail 12050 invoked by uid 22791); 20 Jul 2012 15:49:52 -0000 X-SWARE-Spam-Status: No, hits=-6.7 required=5.0 tests=AWL,BAYES_00,KHOP_RCVD_UNTRUST,RCVD_IN_DNSWL_HI,RCVD_IN_HOSTKARMA_W,SPF_HELO_PASS,TW_EG,T_RP_MATCHES_RCVD X-Spam-Check-By: sourceware.org Received: from mx1.redhat.com (HELO mx1.redhat.com) (209.132.183.28) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Fri, 20 Jul 2012 15:49:36 +0000 Received: from int-mx10.intmail.prod.int.phx2.redhat.com (int-mx10.intmail.prod.int.phx2.redhat.com [10.5.11.23]) by mx1.redhat.com (8.14.4/8.14.4) with ESMTP id q6KFnZ7m021556 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=OK) for ; Fri, 20 Jul 2012 11:49:36 -0400 Received: from brno.lan (ovpn01.gateway.prod.ext.ams2.redhat.com [10.39.146.11]) by int-mx10.intmail.prod.int.phx2.redhat.com (8.14.4/8.14.4) with ESMTP id q6KFnYJC031901 for ; Fri, 20 Jul 2012 11:49:35 -0400 Subject: [PATCH] target_wait/linux_nat_wait: Dump the passed in target options. To: gdb-patches@sourceware.org From: Pedro Alves Date: Fri, 20 Jul 2012 15:49:00 -0000 Message-ID: <20120720154934.25085.71708.stgit@brno.lan> User-Agent: StGit/0.16 MIME-Version: 1.0 Content-Type: text/plain; charset="utf-8" Content-Transfer-Encoding: 7bit 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: 2012-07/txt/msg00394.txt.bz2 I found myself staring at "set debug lin-lwp 1" debug output wondering whether the bug I was seeing was related to the target_options passed to target_wait. It would have been easier if the options were dumped in the debug output. This patch makes it so. E.g., before, with set debug target, and set debug lin-lwp: target_wait (-1, status) = 18774, status->kind = stopped, signal = SIGTRAP ... linux_nat_wait: [process -1] after, no options: target_wait (-1, status, options={}) = 21554, status->kind = stopped, signal = SIGTRAP linux_nat_wait: [process -1], [] after, w/ one (the only current) option: target_wait (-1, status, options={TARGET_WNOHANG}) = 21584, status->kind = stopped, signal = SIGTRAP linux_nat_wait: [process -1], [TARGET_WNOHANG] Tested on x86_64 Fedora 17. Applying in a moment. 2012-07-20 Pedro Alves * linux-nat.c (linux_nat_wait): Dump the passed in target options. * target.c (target_wait): Likewise. (str_comma_list_concat_elem, do_option, target_options_to_string): New functions. * target.h (target_options_to_string): Declare. --- gdb/linux-nat.c | 12 ++++++++++-- gdb/target.c | 57 ++++++++++++++++++++++++++++++++++++++++++++++++++++--- gdb/target.h | 4 ++++ 3 files changed, 68 insertions(+), 5 deletions(-) diff --git a/gdb/linux-nat.c b/gdb/linux-nat.c index d2a529a..c25f155 100644 --- a/gdb/linux-nat.c +++ b/gdb/linux-nat.c @@ -3929,8 +3929,16 @@ linux_nat_wait (struct target_ops *ops, ptid_t event_ptid; if (debug_linux_nat) - fprintf_unfiltered (gdb_stdlog, - "linux_nat_wait: [%s]\n", target_pid_to_str (ptid)); + { + char *options_string; + + options_string = target_options_to_string (target_options); + fprintf_unfiltered (gdb_stdlog, + "linux_nat_wait: [%s], [%s]\n", + target_pid_to_str (ptid), + options_string); + xfree (options_string); + } /* Flush the async file first. */ if (target_can_async_p ()) diff --git a/gdb/target.c b/gdb/target.c index bb8eae8..c916ab8 100644 --- a/gdb/target.c +++ b/gdb/target.c @@ -2629,13 +2629,17 @@ target_wait (ptid_t ptid, struct target_waitstatus *status, int options) if (targetdebug) { char *status_string; + char *options_string; status_string = target_waitstatus_to_string (status); + options_string = target_options_to_string (options); fprintf_unfiltered (gdb_stdlog, - "target_wait (%d, status) = %d, %s\n", - PIDGET (ptid), PIDGET (retval), - status_string); + "target_wait (%d, status, options={%s})" + " = %d, %s\n", + PIDGET (ptid), options_string, + PIDGET (retval), status_string); xfree (status_string); + xfree (options_string); } return retval; @@ -3885,6 +3889,53 @@ target_waitstatus_to_string (const struct target_waitstatus *ws) } } +/* Concatenate ELEM to LIST, a comma separate list, and return the + result. */ + +static char * +str_comma_list_concat_elem (char *list, const char *elem) +{ + if (list == NULL) + return xstrdup (elem); + else + return concat (list, ", ", elem, (char *) NULL); +} + +/* Helper for target_options_to_string. If OPT is present in + TARGET_OPTIONS, append the OPT_STR (string version of OPT) in RET. + Returns the new resulting string. */ + +static char * +do_option (int *target_options, char *ret, + int opt, char *opt_str) +{ + if ((*target_options & opt) != 0) + { + ret = str_comma_list_concat_elem (ret, opt_str); + *target_options &= ~opt; + } + + return ret; +} + +char * +target_options_to_string (int target_options) +{ + char *ret = NULL; + +#define DO_TARG_OPTION(OPT) \ + ret = do_option (&target_options, ret, OPT, #OPT) + + DO_TARG_OPTION (TARGET_WNOHANG); + + if (target_options != 0) + ret = str_comma_list_concat_elem (ret, "unknown???"); + + if (ret == NULL) + ret = xstrdup (""); + return ret; +} + static void debug_print_register (const char * func, struct regcache *regcache, int regno) diff --git a/gdb/target.h b/gdb/target.h index 54c58d6..95cfbe2 100644 --- a/gdb/target.h +++ b/gdb/target.h @@ -198,6 +198,10 @@ struct syscall Space for the result is malloc'd, caller must free. */ extern char *target_waitstatus_to_string (const struct target_waitstatus *); +/* Return a pretty printed form of TARGET_OPTIONS. + Space for the result is malloc'd, caller must free. */ +extern char *target_options_to_string (int target_options); + /* Possible types of events that the inferior handler will have to deal with. */ enum inferior_event_type