/* Copyright (C) 2004-2018 Free Software Foundation, Inc.

   This file is part of the GNU C Library.

   Contributed by Jakub Jelinek <jakub@redhat.com>, 2004.

   The GNU C Library is free software; you can redistribute it and/or

   modify it under the terms of the GNU Lesser General Public

   License as published by the Free Software Foundation; either

   version 2.1 of the License, or (at your option) any later version.

   The GNU C Library 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

   Lesser General Public License for more details.

   You should have received a copy of the GNU Lesser General Public

   License along with the GNU C Library; if not, see

   <http://www.gnu.org/licenses/>.  */

#include <errno.h>

#include <limits.h>

#include <pthread.h>

#include <stdbool.h>

#include <stdio.h>

#include <stdlib.h>

#include <unistd.h>

pthread_cond_t cv = PTHREAD_COND_INITIALIZER;

pthread_mutex_t lock = PTHREAD_MUTEX_INITIALIZER;

bool n, exiting;

FILE *f;

enum { count = 8 };		/* Number of worker threads.  */

void *

tf (void *dummy)

{

  bool loop = true;

  while (loop)

    {

      pthread_mutex_lock (&lock);

      while (n && !exiting)

	pthread_cond_wait (&cv, &lock);

      n = true;

      pthread_mutex_unlock (&lock);

      fputs (".", f);

      pthread_mutex_lock (&lock);

      n = false;

      if (exiting)

	loop = false;

#ifdef UNLOCK_AFTER_BROADCAST

      pthread_cond_broadcast (&cv;;

      pthread_mutex_unlock (&lock);

#else

      pthread_mutex_unlock (&lock);

      pthread_cond_broadcast (&cv;;

#endif

    }

  return NULL;

}

int

do_test (void)

{

  f = fopen ("/dev/null", "w");

  if (f == NULL)

    {

      printf ("couldn't open /dev/null, %m\n");

      return 1;

    }

  pthread_t th[count];

  pthread_attr_t attr;

  int i, ret, sz;

  pthread_attr_init (&attr);

  sz = sysconf (_SC_PAGESIZE);

  if (sz < PTHREAD_STACK_MIN)

	  sz = PTHREAD_STACK_MIN;

  pthread_attr_setstacksize (&attr, sz);

  for (i = 0; i < count; ++i)

    if ((ret = pthread_create (&th[i], &attr, tf, NULL)) != 0)

      {

	errno = ret;

	printf ("pthread_create %d failed: %m\n", i);

	return 1;

      }

  struct timespec ts = { .tv_sec = 20, .tv_nsec = 0 };

  while (nanosleep (&ts, &ts) != 0);

  pthread_mutex_lock (&lock);

  exiting = true;

  pthread_mutex_unlock (&lock);

  for (i = 0; i < count; ++i)

    pthread_join (th[i], NULL);

  fclose (f);

  return 0;

}

#define TEST_FUNCTION do_test ()

#define TIMEOUT 40

#include "../test-skeleton.c"