171 lines
3.4 KiB
C
171 lines
3.4 KiB
C
#include <stdio.h>
|
|
|
|
#include "config.h"
|
|
|
|
#ifndef HAVE_PTHREAD_H
|
|
|
|
/* Don't even try to compile. In fact, cause a syntax error that we can
|
|
look for as a compiler error message and know that we have no pthread
|
|
support. In that case we can just suppress the test completely. */
|
|
|
|
#error "no posix threads support"
|
|
|
|
#else
|
|
|
|
/* OK. We have the right header. If we try to compile this and fail, then
|
|
there is something wrong and the user should know about it so the testsuite
|
|
should issue an ERROR result.. */
|
|
|
|
#ifdef __linux__
|
|
#define _MIT_POSIX_THREADS 1 /* GNU/Linux (or at least RedHat 4.0)
|
|
needs this */
|
|
#endif
|
|
|
|
#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 (%0x) ; pid = %d\n", arg, getpid ());
|
|
for (i=1; i <= 10000000; i++)
|
|
{
|
|
if (verbose) printf("thread1 %d\n", 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 (%0x) ; pid = %d\n", arg, getpid ());
|
|
for (i=1; i <= 10000000; i++)
|
|
{
|
|
if (verbose) printf("thread2 %d\n", 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 %d\n", 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 %d\n", tid2);
|
|
|
|
sleep (1);
|
|
|
|
for (j = 1; j <= 10000000; j++)
|
|
{
|
|
if (verbose) printf("top %d\n", pthread_self ());
|
|
common_routine (0);
|
|
sleep(1);
|
|
t += j;
|
|
}
|
|
|
|
exit(0);
|
|
}
|
|
|
|
#endif /* ifndef HAVE_PTHREAD_H */
|