172 lines
3.7 KiB
C
172 lines
3.7 KiB
C
/* Pthreads test program.
|
|
Copyright 1996, 2002, 2003, 2004, 2007, 2008, 2009, 2010
|
|
Free Software Foundation, Inc.
|
|
|
|
Written by Fred Fish of Cygnus Support
|
|
Contributed by Cygnus Support
|
|
|
|
This file is part of GDB.
|
|
|
|
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 <http://www.gnu.org/licenses/>. */
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <pthread.h>
|
|
|
|
/* Under OSF 2.0 & 3.0 and HPUX 10, the second arg of pthread_create
|
|
is prototyped to be just a "pthread_attr_t", while under Solaris it
|
|
is a "pthread_attr_t *". Arg! */
|
|
|
|
#if defined (__osf__) || defined (__hpux__)
|
|
#define PTHREAD_CREATE_ARG2(arg) arg
|
|
#define PTHREAD_CREATE_NULL_ARG2 null_attr
|
|
static pthread_attr_t null_attr;
|
|
#else
|
|
#define PTHREAD_CREATE_ARG2(arg) &arg
|
|
#define PTHREAD_CREATE_NULL_ARG2 NULL
|
|
#endif
|
|
|
|
static int verbose = 0;
|
|
|
|
static void
|
|
common_routine (arg)
|
|
int arg;
|
|
{
|
|
static int from_thread1;
|
|
static int from_thread2;
|
|
static int from_main;
|
|
static int hits;
|
|
static int full_coverage;
|
|
|
|
if (verbose) printf("common_routine (%d)\n", arg);
|
|
hits++;
|
|
switch (arg)
|
|
{
|
|
case 0:
|
|
from_main++;
|
|
break;
|
|
case 1:
|
|
from_thread1++;
|
|
break;
|
|
case 2:
|
|
from_thread2++;
|
|
break;
|
|
}
|
|
if (from_main && from_thread1 && from_thread2)
|
|
full_coverage = 1;
|
|
}
|
|
|
|
static void *
|
|
thread1 (void *arg)
|
|
{
|
|
int i;
|
|
int z = 0;
|
|
|
|
if (verbose) printf ("thread1 (%0lx) ; pid = %d\n", (long) arg, getpid ());
|
|
for (i=1; i <= 10000000; i++)
|
|
{
|
|
if (verbose) printf("thread1 %ld\n", (long) pthread_self ());
|
|
z += i;
|
|
common_routine (1);
|
|
sleep(1);
|
|
}
|
|
return (void *) 0;
|
|
}
|
|
|
|
static void *
|
|
thread2 (void * arg)
|
|
{
|
|
int i;
|
|
int k = 0;
|
|
|
|
if (verbose) printf ("thread2 (%0lx) ; pid = %d\n", (long) arg, getpid ());
|
|
for (i=1; i <= 10000000; i++)
|
|
{
|
|
if (verbose) printf("thread2 %ld\n", (long) pthread_self ());
|
|
k += i;
|
|
common_routine (2);
|
|
sleep(1);
|
|
}
|
|
sleep(100);
|
|
return (void *) 0;
|
|
}
|
|
|
|
void
|
|
foo (a, b, c)
|
|
int a, b, c;
|
|
{
|
|
int d, e, f;
|
|
|
|
if (verbose) printf("a=%d\n", a);
|
|
}
|
|
|
|
main(argc, argv)
|
|
int argc;
|
|
char **argv;
|
|
{
|
|
pthread_t tid1, tid2;
|
|
int j;
|
|
int t = 0;
|
|
void (*xxx) ();
|
|
pthread_attr_t attr;
|
|
|
|
if (verbose) printf ("pid = %d\n", getpid());
|
|
|
|
foo (1, 2, 3);
|
|
|
|
#ifndef __osf__
|
|
if (pthread_attr_init (&attr))
|
|
{
|
|
perror ("pthread_attr_init 1");
|
|
exit (1);
|
|
}
|
|
#endif
|
|
|
|
#ifdef PTHREAD_SCOPE_SYSTEM
|
|
if (pthread_attr_setscope (&attr, PTHREAD_SCOPE_SYSTEM))
|
|
{
|
|
perror ("pthread_attr_setscope 1");
|
|
exit (1);
|
|
}
|
|
#endif
|
|
|
|
if (pthread_create (&tid1, PTHREAD_CREATE_ARG2(attr), thread1, (void *) 0xfeedface))
|
|
{
|
|
perror ("pthread_create 1");
|
|
exit (1);
|
|
}
|
|
if (verbose) printf ("Made thread %ld\n", (long) tid1);
|
|
sleep (1);
|
|
|
|
if (pthread_create (&tid2, PTHREAD_CREATE_NULL_ARG2, thread2, (void *) 0xdeadbeef))
|
|
{
|
|
perror ("pthread_create 2");
|
|
exit (1);
|
|
}
|
|
if (verbose) printf("Made thread %ld\n", (long) tid2);
|
|
|
|
sleep (1);
|
|
|
|
for (j = 1; j <= 10000000; j++)
|
|
{
|
|
if (verbose) printf("top %ld\n", (long) pthread_self ());
|
|
common_routine (0);
|
|
sleep(1);
|
|
t += j;
|
|
}
|
|
|
|
exit(0);
|
|
}
|
|
|