From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 8469 invoked by alias); 17 Oct 2017 13:50:05 -0000 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 Received: (qmail 8343 invoked by uid 89); 17 Oct 2017 13:50:05 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-24.7 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_0,GIT_PATCH_1,GIT_PATCH_2,GIT_PATCH_3,KAM_LAZY_DOMAIN_SECURITY,RCVD_IN_DNSWL_NONE,RP_MATCHES_RCVD autolearn=ham version=3.3.2 spammy=BREAK X-Spam-User: qpsmtpd, 2 recipients X-HELO: mail.rt-rk.com Received: from mx2.rt-rk.com (HELO mail.rt-rk.com) (89.216.37.149) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Tue, 17 Oct 2017 13:50:03 +0000 Received: from localhost (localhost [127.0.0.1]) by mail.rt-rk.com (Postfix) with ESMTP id 53BCF1A4800; Tue, 17 Oct 2017 15:50:00 +0200 (CEST) Received: from djole.domain.local (unknown [10.10.13.94]) by mail.rt-rk.com (Postfix) with ESMTPSA id 384A61A2062; Tue, 17 Oct 2017 15:50:00 +0200 (CEST) From: Djordje Todorovic To: macro@imgtec.com Cc: binutils@sourceware.org, gdb-patches@sourceware.org, asowda@cisco.com, petar.jovanovic@rt-rk.com, nemanja.popov@rt-rk.com, nikola.prica@rt-rk.com, Djordje Todorovic Subject: [PATCH 3/3] Add test for fetching TLS from core file Date: Tue, 17 Oct 2017 13:50:00 -0000 Message-Id: <1508248194-26950-3-git-send-email-djordje.todorovic@rt-rk.com> In-Reply-To: <1508248194-26950-1-git-send-email-djordje.todorovic@rt-rk.com> References: <1508248194-26950-1-git-send-email-djordje.todorovic@rt-rk.com> X-SW-Source: 2017-10/txt/msg00517.txt.bz2 GDB needs correct PID in order to fetch value of TLS variable from core file. On MIPS platforms it was omitted and fetching value of TLS variable was not available. This adds a new test in order to be sure if GDB on native platforms can successfully fetch value of TLS variable. gdb/testsuite: * gdb.threads/tls-core.c: New file. * gdb.threads/tls-core.exp: Likewise. --- gdb/testsuite/gdb.threads/tls-core.c | 44 +++++++++++++++++++++++++ gdb/testsuite/gdb.threads/tls-core.exp | 60 ++++++++++++++++++++++++++++++++++ 2 files changed, 104 insertions(+) create mode 100644 gdb/testsuite/gdb.threads/tls-core.c create mode 100644 gdb/testsuite/gdb.threads/tls-core.exp diff --git a/gdb/testsuite/gdb.threads/tls-core.c b/gdb/testsuite/gdb.threads/tls-core.c new file mode 100644 index 0000000..e41c584 --- /dev/null +++ b/gdb/testsuite/gdb.threads/tls-core.c @@ -0,0 +1,44 @@ +/* This test is part of GDB, the GNU debugger. + + Copyright 2017 Free Software Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program. If not, see . */ + +#include +#include +#include +#include + +#define NUMBER_OF_THREADS 5 + +int __thread foo = 0xdeadbeef; + +void * +thread (void *in) /* BREAK */ +{ + int *tmp = (int *) in; + int value = *tmp; + foo += *tmp; + while (1) + sleep (10); +} + +int +main (void) +{ + pthread_t threads[NUMBER_OF_THREADS]; + int i; + for (i = 0; i < NUMBER_OF_THREADS; i++) + pthread_create (&threads[i], NULL, thread, &i); +} \ No newline at end of file diff --git a/gdb/testsuite/gdb.threads/tls-core.exp b/gdb/testsuite/gdb.threads/tls-core.exp new file mode 100644 index 0000000..dc291ab --- /dev/null +++ b/gdb/testsuite/gdb.threads/tls-core.exp @@ -0,0 +1,60 @@ +# Copyright 2017 Free Software Foundation, Inc. + +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see . + +standard_testfile + +if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \ + executable { debug }] != "" } { + return -1 +} + + +clean_restart ${binfile} + +# +# Set breakpoint at line 28. +# +gdb_breakpoint [gdb_get_line_number "BREAK"] +gdb_test "run" "Starting program: .*" + +# +# Generate corefile. +# +set corefile [standard_output_file gcore.test] +set core_supported [gdb_gcore_cmd "$corefile" "save a corefile"] +if {!$core_supported} { + return -1 +} + +gdb_exit + +# +# Restart gdb and load generated corefile. +# +gdb_start +gdb_reinitialize_dir $srcdir/$subdir +gdb_load ${binfile} + +set core_loaded [gdb_core_cmd "$corefile" "load generated corefile"] +if { $core_loaded == -1 } { + # No use proceeding from here. + return +} + +gdb_test "p/x foo" \ + "\\$\[0-9]+ = 0xdeadbeef" \ + "Printing thread-local storage variable." + +gdb_exit -- 2.7.4