lib/libc_r/test/sem_d.c

   1 /****************************************************************************
   2  *
   3  * Copyright (C) 2000 Jason Evans <jasone@freebsd.org>.
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice(s), this list of conditions and the following disclaimer as
  11  *    the first lines of this file unmodified other than the possible
  12  *    addition of one or more copyright notices.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice(s), this list of conditions and the following disclaimer in
  15  *    the documentation and/or other materials provided with the
  16  *    distribution.
  17  *
  18  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER(S) ``AS IS'' AND ANY
  19  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  21  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) BE
  22  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  23  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  24  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
  25  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  26  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
  27  * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
  28  * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  29  *
  30  ****************************************************************************
  31  *
  32  * sem test.
  33  *
  34  * $FreeBSD: src/lib/libc_r/test/sem_d.c,v 1.1.2.2 2001/06/22 21:44:27 jasone Exp $
  35  * $DragonFly: src/lib/libc_r/test/sem_d.c,v 1.2 2003/06/17 04:26:48 dillon Exp $
  36  *
  37  ****************************************************************************/
  38
  39 #include <assert.h>
  40 #include <stdio.h>
  41 #include <fcntl.h>
  42 #include <errno.h>
  43 #include <semaphore.h>
  44 #include <pthread.h>
  45
  46 #define NTHREADS 10
  47
  48 void *
  49 entry(void * a_arg)
  50 {
  51         sem_t * sem = (sem_t *) a_arg;
  52
  53         sem_wait(sem);
  54         fprintf(stderr, "Got semaphore\n");
  55
  56         return NULL;
  57 }
  58
  59 int
  60 main()
  61 {
  62         sem_t sem_a, sem_b;
  63         pthread_t threads[NTHREADS];
  64         unsigned i;
  65         int val;
  66
  67         fprintf(stderr, "Test begin\n");
  68
  69 #ifdef _LIBC_R_
  70         assert(-1 == sem_init(&sem_b, 1, 0));
  71         assert(EPERM == errno);
  72 #endif
  73
  74         assert(0 == sem_init(&sem_b, 0, 0));
  75         assert(0 == sem_getvalue(&sem_b, &val));
  76         assert(0 == val);
  77
  78         assert(0 == sem_post(&sem_b));
  79         assert(0 == sem_getvalue(&sem_b, &val));
  80         assert(1 == val);
  81
  82         assert(0 == sem_wait(&sem_b));
  83         assert(-1 == sem_trywait(&sem_b));
  84         assert(EAGAIN == errno);
  85         assert(0 == sem_post(&sem_b));
  86         assert(0 == sem_trywait(&sem_b));
  87         assert(0 == sem_post(&sem_b));
  88         assert(0 == sem_wait(&sem_b));
  89         assert(0 == sem_post(&sem_b));
  90
  91 #ifdef _LIBC_R_
  92         assert(SEM_FAILED == sem_open("/foo", O_CREAT | O_EXCL, 0644, 0));
  93         assert(ENOSYS == errno);
  94
  95         assert(-1 == sem_close(&sem_b));
  96         assert(ENOSYS == errno);
  97
  98         assert(-1 == sem_unlink("/foo"));
  99         assert(ENOSYS == errno);
 100 #endif
 101
 102         assert(0 == sem_destroy(&sem_b));
 103
 104         assert(0 == sem_init(&sem_a, 0, 0));
 105
 106         for (i = 0; i < NTHREADS; i++) {
 107                 pthread_create(&threads[i], NULL, entry, (void *) &sem_a);
 108         }
 109
 110         for (i = 0; i < NTHREADS; i++) {
 111                 assert(0 == sem_post(&sem_a));
 112         }
 113
 114         for (i = 0; i < NTHREADS; i++) {
 115                 pthread_join(threads[i], NULL);
 116         }
 117
 118         for (i = 0; i < NTHREADS; i++) {
 119                 pthread_create(&threads[i], NULL, entry, (void *) &sem_a);
 120         }
 121
 122         for (i = 0; i < NTHREADS; i++) {
 123                 assert(0 == sem_post(&sem_a));
 124         }
 125
 126         for (i = 0; i < NTHREADS; i++) {
 127                 pthread_join(threads[i], NULL);
 128         }
 129
 130         assert(0 == sem_destroy(&sem_a));
 131
 132         fprintf(stderr, "Test end\n");
 133         return 0;
 134 }