From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mout.gmx.net (mout.gmx.net [212.227.17.21]) by sourceware.org (Postfix) with ESMTPS id 6FD24385E006 for ; Thu, 26 Mar 2020 02:54:12 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.3.2 sourceware.org 6FD24385E006 Authentication-Results: sourceware.org; dmarc=none (p=none dis=none) header.from=gmx.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=n54@gmx.com DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=gmx.net; s=badeba3b8450; t=1585191236; bh=y3/sJeT2QY9u9eChAUS31HRsNG+Sp8GZWxvD2DqCrbQ=; h=X-UI-Sender-Class:From:To:Cc:Subject:Date; b=lV0DjAkNlgy5Sk1o5wNnif0zO7UrNi6s8SVHsG5yNQChVz9G19k3I4BeLhMHW4fFs U5SfBiBwBUy8syd7qNWLcJLrNpEPRtfEg371q3NJ0AILcT9SiPUVGNxMtjXMCcDuLy 8se7expZUetAkDL1DFyBaCqXTJXllKoSNo+z1i+o= X-UI-Sender-Class: 01bb95c1-4bf8-414a-932a-4f6e2808ef9c Received: from localhost.localdomain ([89.79.191.25]) by mail.gmx.com (mrgmx105 [212.227.17.174]) with ESMTPSA (Nemesis) id 1M6UZl-1jAws11HFx-006tfn; Thu, 26 Mar 2020 03:53:56 +0100 From: Kamil Rytarowski To: gdb-patches@sourceware.org Subject: [PATCH] Implement basic threading support in the NetBSD target Date: Thu, 26 Mar 2020 03:53:14 +0100 Message-Id: <20200326025314.2392-1-n54@gmx.com> X-Mailer: git-send-email 2.25.0 MIME-Version: 1.0 Content-Transfer-Encoding: quoted-printable X-Provags-ID: V03:K1:3TbWXWlunlrRji3AwJWCZD9TqT63f9Aeuni32Jt259lD9+Vu6Im sUltvMbyJBzbYyPdujc6wDM4jks2oFYim3ccdlix+3HUheXLIgTb5pu12JZAbI6oDUc4bxC OIJaFNWjiRJJ9tJ99ZMUj9gMxgIUoqljQQDSlZ5stO0CIdDIZgOOYe6QWFkyZyL41lqeDh4 MT/wqGBRWyR9Yk8fbL5ug== X-UI-Out-Filterresults: notjunk:1;V03:K0:T6VyjtyQBes=:CznlB42WifOyP+YXTc90Fz QnlzUREeikVZ0ZnFFpfqEcQj6W43n5rbFxtXf2ukPaNjZcbEvCyDP97nqL1jBWOkB1xDLNyiM YPrd2y1Sk6XXFWCR/ougXZ2qtk+Y21mKMfIVn5fYYpN+AooKS/69nX5i73QaKfPsJfjLm98aC 77VhlHa1LPekd2T10YVFSMOONWR5n4NwEUqO6SmUQEM0gzd7NZo/x9ezrqQAdLTDPEA3gTNab Ba/KSenLdhIOOhgt4edmDkvsT/b5rLdqEVLi2Cecj6sgiQV8OaIzvw1F7uht4kkbspU8HBBJX SGRs//diolm7CkXfEyRhYvt2UwvdIAhEOITN1V0xvBKUsusFHMYTV+iwKEw23ptohJXwlN6ZB WdaHsW9rGgxhVtYb57p/bPKFsb0hVJ06YvaYqiKZ05jzrH6SsKrSoG/QTZdGKfOdHGizI/IQi YupO3CL5MWOzP27ABg23mvGb9TrF/fDMMLbBiXKPCnCy8e4Vhwe3wTi8M+g8Cd8y2TWahrQl9 eQ7eHqtD/ugmgi4QzVxY9BlZU8NQB4UayHIxHC1KKPj/usHOfHtSAd+yYEGxN4BE7C/p0tpGr dWwzhwehqY+TY+5sNundk5/hLOhJq7TQ/g56VNFffrBK0X/5DGbgRxoLbglGUBgERc3F+UnGN pmh3mbfsdai5PGrVB2s8xxYnY7CcweozgP9h0tevsODFrnfvcz79mt5EXNndWLagjk4u0+eeE RgSNEDBx/7Ck/POIdQHz9SBA/cugUROy2eAaGra7T1MK3aq14U2cJjT8FnPr72BUrU90MLxdp HJz7OAba06qr7bUla9wCrrbG5jiP0Xy0wDdbLjGytUNVYswRHOYo866Zg2jfE5h0l+UgB88EQ WSQZpE2LJtsLqKuweUfgOJwA516oauM4GeSV7ETfsr3S5BKnVmJNmc3lMAYjGjyprz6Bed48q kYk1kF1OYMtF6QipVP1begGxJkw6mqkEHPqqfdrVW5OjR3Onv6APeFk1twyaHEOF993esl8nE IZiRcZzgo8GW265rz0A+p4tJTLz6/bFs3cQHytY2dSFVY9Bov4tSRcPf+V/+CA6e/xYa5qx6K HKpxJXddF0sVOc+WPbe5Iq4H9Y2pXmlJASRouIXR0nEPYuXUOG0is1U5dHTRWH0fQ4o79FJa0 xrvc0PgvEIdT2x6TxweRxak8dP+Z5LlUwHZQX5qoA6BUFXdDe1E1kDdHTpxUuNTkQDres= X-Spam-Status: No, score=-32.9 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, FREEMAIL_ENVFROM_END_DIGIT, FREEMAIL_FROM, GIT_PATCH_0, GIT_PATCH_1, GIT_PATCH_2, GIT_PATCH_3, RCVD_IN_BARRACUDACENTRAL, RCVD_IN_DNSWL_LOW, SPF_HELO_NONE, SPF_PASS, TXREP autolearn=ham autolearn_force=no version=3.4.2 X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on server2.sourceware.org X-BeenThere: gdb-patches@sourceware.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gdb-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Thu, 26 Mar 2020 02:54:14 -0000 Use sysctl(3) as the portable interface to prompt NetBSD threads on all supported NetBSD versions. In future newer versions could switch to PT_LWPSTATUS ptrace(2) API that will be supported on NetBSD 10.0 and newer. Implement as part of nbsd_nat_target: - thread_name() - read descriptive thread name - thread_alive() - check whether a thread is alive - post_attach() - updates the list of threads after attach - update_thread_list() - updates the list of threads - pid_to_str() - translates ptid to a descriptive string There are two local static functions: - nbsd_thread_lister() - generic LWP lister for a specified pid - nbsd_add_threads() - utility to update the list of threads Now, GDB on NetBSD can attach to a multithreaded process, spawn a multithreaded process, list threads, print their LWP+PID numbers and descriptive thread names. gdb/ChangeLog: * nbsd-nat.h (struct thread_info): Add forward declaration. (nbsd_nat_target::thread_alive): Add. (nbsd_nat_target::thread_name): Likewise. (nbsd_nat_target::update_thread_list): Likewise. (update_thread_list::post_attach): Likewise. (post_attach::pid_to_str): Likewise. * nbsd-nat.c: Include "gdbthread.h" and "inferior.h". (nbsd_thread_lister): Add. (nbsd_nat_target::thread_alive): Likewise. (nbsd_nat_target::thread_name): Likewise. (nbsd_add_threads): Likewise. (update_thread_list::post_attach): Likewise. (nbsd_nat_target::update_thread_list): Likewise. (post_attach::pid_to_str): Likewise. =2D-- gdb/ChangeLog | 17 ++++++ gdb/nbsd-nat.c | 161 +++++++++++++++++++++++++++++++++++++++++++++++++ gdb/nbsd-nat.h | 8 +++ 3 files changed, 186 insertions(+) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 1ee58a541cb..f31a7cf236c 100644 =2D-- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,20 @@ +2020-03-25 Kamil Rytarowski + + * nbsd-nat.h (struct thread_info): Add forward declaration. + (nbsd_nat_target::thread_alive): Add. + (nbsd_nat_target::thread_name): Likewise. + (nbsd_nat_target::update_thread_list): Likewise. + (update_thread_list::post_attach): Likewise. + (post_attach::pid_to_str): Likewise. + * nbsd-nat.c: Include "gdbthread.h" and "inferior.h". + (nbsd_thread_lister): Add. + (nbsd_nat_target::thread_alive): Likewise. + (nbsd_nat_target::thread_name): Likewise. + (nbsd_add_threads): Likewise. + (update_thread_list::post_attach): Likewise. + (nbsd_nat_target::update_thread_list): Likewise. + (post_attach::pid_to_str): Likewise. + 2020-03-25 Tom Tromey * compile/compile-object-load.c (get_out_value_type): Mention diff --git a/gdb/nbsd-nat.c b/gdb/nbsd-nat.c index 326bbe3aec3..556e146ab23 100644 =2D-- a/gdb/nbsd-nat.c +++ b/gdb/nbsd-nat.c @@ -20,6 +20,8 @@ #include "defs.h" #include "nbsd-nat.h" +#include "gdbthread.h" +#include "inferior.h" #include #include @@ -39,3 +41,162 @@ nbsd_nat_target::pid_to_exec_file (int pid) return NULL; return buf; } + +/* Generic thread (LWP) lister within a specified process. The callback + parameters is a C++ function that is called for each detected thread. = */ + +static void +nbsd_thread_lister (const pid_t pid, + std::function callback) +{ + int mib[5] =3D {CTL_KERN, KERN_LWP, pid, sizeof (struct kinfo_lwp), 0}; + size_t size; + + if (sysctl (mib, ARRAY_SIZE (mib), NULL, &size, NULL, 0) =3D=3D -1 || s= ize =3D=3D 0) + perror_with_name (("sysctl")); + + mib[4] =3D size / sizeof (size_t); + + gdb::unique_xmalloc_ptr kl + ((struct kinfo_lwp *) xcalloc (size, 1)); + if (kl =3D=3D NULL) + perror_with_name (("calloc")); + + if (sysctl (mib, ARRAY_SIZE (mib), kl.get (), &size, NULL, 0) =3D=3D -1= || + size =3D=3D 0) + perror_with_name (("sysctl")); + + for (size_t i =3D 0; i < size / sizeof (struct kinfo_lwp); i++) + { + struct kinfo_lwp *l =3D &kl.get ()[i]; + + /* Return true if the specified thread is alive. */ + auto lwp_alive =3D + [&l]() + { + switch (kl->l_stat) + { + case LSSLEEP: + case LSRUN: + case LSONPROC: + case LSSTOP: + case LSSUSPENDED: + return true; + default: + return false; + } + }; + + /* Ignore embryonic or demised threads. */ + if (!lwp_alive (l)) + continue; + + if (callback (l)) + break; + } +} + +/* Return true if PTID is still active in the inferior. */ + +bool +nbsd_nat_target::thread_alive (ptid_t ptid) +{ + pid_t pid =3D ptid.pid (); + int lwp =3D ptid.lwp (); + bool found =3D false; + + auto fn =3D + [&lwp, &found] (const struct kinfo_lwp *kl) + { + if (kl->l_lid =3D=3D lwp) + { + found =3D true; + return true; + } + return false; + }; + + nbsd_thread_lister (pid, fn); + + return found; +} + +/* Return the name assigned to a thread by an application. Returns + the string in a static buffer. */ + +const char * +nbsd_nat_target::thread_name (struct thread_info *thr) +{ + ptid_t ptid =3D thr->ptid; + pid_t pid =3D ptid.pid (); + int lwp =3D ptid.lwp (); + + static char buf[KI_LNAMELEN] =3D {}; + + auto fn =3D + [&lwp] (const struct kinfo_lwp *kl) + { + if (kl->l_lid =3D=3D lwp) + { + xsnprintf (buf, sizeof buf, "%s", kl->l_name); + return true; + } + return false; + }; + + nbsd_thread_lister (pid, fn); + + return buf; +} + +/* Implement the "post_attach" target_ops method. */ + +static void +nbsd_add_threads (nbsd_nat_target *target, pid_t pid) +{ + auto fn =3D + [&target, &pid] (const struct kinfo_lwp *kl) + { + ptid_t ptid =3D ptid_t (pid, kl->l_lid, 0); + fprintf_unfiltered (gdb_stdlog, "NLWP: pid=3D%d lwp=3D%d\n", pid, k= l->l_lid); + if (!in_thread_list (target, ptid)) + { + if (inferior_ptid.lwp () =3D=3D 0) + thread_change_ptid (target, inferior_ptid, ptid); + else + add_thread (target, ptid); + } + return false; + }; + + nbsd_thread_lister (pid, fn); +} + +/* Implement the "post_attach" target_ops method. */ + +void +nbsd_nat_target::post_attach (int pid) +{ + nbsd_add_threads (this, pid); +} + +/* Implement the "update_thread_list" target_ops method. */ + +void +nbsd_nat_target::update_thread_list () +{ + prune_threads (); + + nbsd_add_threads (this, inferior_ptid.pid ()); +} + +/* Convert PTID to a string. */ + +std::string +nbsd_nat_target::pid_to_str (ptid_t ptid) +{ + pid_t pid =3D ptid.pid (); + int lwp =3D ptid.lwp (); + + return string_printf ("LWP %d of process %d", lwp, pid); +} diff --git a/gdb/nbsd-nat.h b/gdb/nbsd-nat.h index a752fbe572d..3606048cd07 100644 =2D-- a/gdb/nbsd-nat.h +++ b/gdb/nbsd-nat.h @@ -22,11 +22,19 @@ #include "inf-ptrace.h" +struct thread_info; + /* A prototype NetBSD target. */ struct nbsd_nat_target : public inf_ptrace_target { char *pid_to_exec_file (int pid) override; + + bool thread_alive (ptid_t ptid) override; + const char *thread_name (struct thread_info *thr) override; + void post_attach (int pid) override; + void update_thread_list () override; + std::string pid_to_str (ptid_t ptid) override; }; #endif /* nbsd-nat.h */ =2D- 2.25.0