Re: [RFA]: New test for gdb.threads testsuite

Jeff Johnston
2004-04-22T22:20:20Z

Michael Snyder wrote:
> Jeff Johnston wrote:
>
>> The attached testcase tests the new code added recently by Daniel.
>>
>> Ok to commit?
>>
>> -- Jeff J.
>>
>> 2004-03-29 Jeff Johnston <jjohnstn@redhat.com>
>> Daniel Jacobowitz <drow@mvista.com>
>>
>> * gdb.threads/manythreads.c: New testcase.
>> * gdb.threads/manythreads.exp: Ditto.
>
>
> Looks good to me, Jeff. Please check it in.
> Michael
>

Done. Thanks.

-- Jeff J.

>> ------------------------------------------------------------------------
>>
>> #include <pthread.h>
>> #include <stdio.h>
>>
>> void *
>> thread_function (void *arg)
>> {
>> int x = (int)arg;
>>
>> printf ("Thread <%d> executing\n", x);
>>
>> return NULL;
>> }
>>
>> int main (int argc, char **argv)
>> {
>> pthread_attr_t attr;
>> pthread_t threads[256];
>> int i, j;
>>
>> pthread_attr_init (&attr);
>>
>> /* Create a ton of quick-executing threads, then wait for them to
>> complete. */
>> for (i = 0; i < 1000; ++i) {
>> for (j = 0; j < 256; ++j)
>> {
>> pthread_create (&threads[j], &attr, thread_function,
>> (void *)(i * 1000 + j));
>> }
>>
>> for (j = 0; j < 256; ++j)
>> {
>> pthread_join (threads[j], NULL);
>> }
>> }
>>
>> pthread_attr_destroy (&attr);
>>
>> return 0;
>> }
>>
>>
>> ------------------------------------------------------------------------
>>
>> # manythreads.exp -- Expect script to test stopping many threads
>> # Copyright (C) 2004 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 2 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, write to the Free Software
>> # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
>> 02111-1307, USA.
>> # Please email any bugs, comments, and/or additions to this file to:
>> # bug-gdb@prep.ai.mit.edu
>>
>> # This file was written by Jeff Johnston. (jjohnstn@redhat.com)
>>
>> if $tracelevel then {
>> strace $tracelevel
>> }
>>
>> set prms_id 0
>> set bug_id 0
>>
>> set testfile "manythreads"
>> set srcfile ${testfile}.c
>> set binfile ${objdir}/${subdir}/${testfile}
>>
>> if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}"
>> "${binfile}" executable [list debug "incdir=${objdir}"]] != "" } {
>> return -1
>> }
>>
>> gdb_start
>> gdb_reinitialize_dir $srcdir/$subdir
>> gdb_load ${binfile}
>> gdb_test "set print sevenbit-strings" ""
>> runto_main
>>
>> # We'll need this when we send_gdb a ^C to GDB. Need to do it before we
>> # run the program and gdb starts saving and restoring tty states.
>> # On Ultrix, we don't need it and it is really slow (because shell_escape
>> # doesn't use vfork).
>> if ![istarget "*-*-ultrix*"] then {
>> gdb_test "shell stty intr '^C'" ""
>> }
>>
>> set message "first continue"
>> gdb_test_multiple "continue" "first continue" {
>> -re "error:.*$gdb_prompt $" {
>> fail "$message"
>> }
>> -re "Continuing" {
>> pass "$message"
>> }
>> }
>>
>> # Send a Ctrl-C and verify that we can do info threads and continue
>> after 1000 {send_gdb "\003"}
>> set message "stop threads 1"
>> gdb_test_multiple "" "stop threads 1" {
>> -re "\\\[New \[^\]\]*\\\]\r\n" {
>> exp_continue
>> }
>> -re "\\\[\[^\]\]* exited\\\]\r\n" {
>> exp_continue
>> }
>> -re "Thread \[^\n\]* executing\r\n" {
>> exp_continue
>> }
>> -re "Program received signal SIGINT.*$gdb_prompt $" {
>> pass "$message"
>> }
>> timeout {
>> fail "$message (timeout)"
>> }
>> }
>>
>> gdb_test "info threads" ".*1 Thread.*.LWP.*"
>>
>> set message "second continue"
>> gdb_test_multiple "continue" "second continue" {
>> -re "error:.*$gdb_prompt $" {
>> fail "$message"
>> }
>> -re "Continuing" {
>> pass "$message"
>> }
>> }
>>
>> # Send another Ctrl-C and verify that we can do info threads and quit
>> after 1000 {send_gdb "\003"}
>> set message "stop threads 2"
>> gdb_test_multiple "" "stop threads 2" {
>> -re "\\\[New \[^\]\]*\\\]\r\n" {
>> exp_continue
>> }
>> -re "\\\[\[^\]\]* exited\\\]\r\n" {
>> exp_continue
>> }
>> -re "Thread \[^\n\]* executing\r\n" {
>> exp_continue
>> }
>> -re "Program received signal SIGINT.*$gdb_prompt $" {
>> pass "stop threads 2"
>> }
>> }
>> gdb_test_multiple "quit" "GDB exits after stopping multithreaded
>> program" {
>> -re "The program is running. Exit anyway\\? \\(y or n\\) $" {
>> send_gdb "y\n"
>> exp_continue
>> }
>> eof {
>> pass "GDB exits after stopping multithreaded program"
>> }
>> timeout {
>> fail "GDB exits after stopping multithreaded program (timeout)"
>> }
>> }
>>
>
>
>