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.3 2007/06/26 23:30:05 josepht Exp $
  36  *
  37  ****************************************************************************/
  38
  39 #include <sys/semaphore.h>
  40
  41 #include <assert.h>
  42 #include <stdio.h>
  43 #include <fcntl.h>
  44 #include <errno.h>
  45 #include <pthread.h>
  46
  47 #define NTHREADS 10
  48
  49 void *
  50 entry(void * a_arg)
  51 {
  52         sem_t * sem = (sem_t *) a_arg;
  53
  54         sem_wait(sem);
  55         fprintf(stderr, "Got semaphore\n");
  56
  57         return NULL;
  58 }
  59
  60 int
  61 main()
  62 {
  63         sem_t sem_a, sem_b;
  64         pthread_t threads[NTHREADS];
  65         unsigned i;
  66         int val;
  67
  68         fprintf(stderr, "Test begin\n");
  69
  70 #ifdef _LIBC_R_
  71         assert(-1 == sem_init(&sem_b, 1, 0));
  72         assert(EPERM == errno);
  73 #endif
  74
  75         assert(0 == sem_init(&sem_b, 0, 0));
  76         assert(0 == sem_getvalue(&sem_b, &val));
  77         assert(0 == val);
  78
  79         assert(0 == sem_post(&sem_b));
  80         assert(0 == sem_getvalue(&sem_b, &val));
  81         assert(1 == val);
  82
  83         assert(0 == sem_wait(&sem_b));
  84         assert(-1 == sem_trywait(&sem_b));
  85         assert(EAGAIN == errno);
  86         assert(0 == sem_post(&sem_b));
  87         assert(0 == sem_trywait(&sem_b));
  88         assert(0 == sem_post(&sem_b));
  89         assert(0 == sem_wait(&sem_b));
  90         assert(0 == sem_post(&sem_b));
  91
  92 #ifdef _LIBC_R_
  93         assert(SEM_FAILED == sem_open("/foo", O_CREAT | O_EXCL, 0644, 0));
  94         assert(ENOSYS == errno);
  95
  96         assert(-1 == sem_close(&sem_b));
  97         assert(ENOSYS == errno);
  98
  99         assert(-1 == sem_unlink("/foo"));
 100         assert(ENOSYS == errno);
 101 #endif
 102
 103         assert(0 == sem_destroy(&sem_b));
 104
 105         assert(0 == sem_init(&sem_a, 0, 0));
 106
 107         for (i = 0; i < NTHREADS; i++) {
 108                 pthread_create(&threads[i], NULL, entry, (void *) &sem_a);
 109         }
 110
 111         for (i = 0; i < NTHREADS; i++) {
 112                 assert(0 == sem_post(&sem_a));
 113         }
 114
 115         for (i = 0; i < NTHREADS; i++) {
 116                 pthread_join(threads[i], NULL);
 117         }
 118
 119         for (i = 0; i < NTHREADS; i++) {
 120                 pthread_create(&threads[i], NULL, entry, (void *) &sem_a);
 121         }
 122
 123         for (i = 0; i < NTHREADS; i++) {
 124                 assert(0 == sem_post(&sem_a));
 125         }
 126
 127         for (i = 0; i < NTHREADS; i++) {
 128                 pthread_join(threads[i], NULL);
 129         }
 130
 131         assert(0 == sem_destroy(&sem_a));
 132
 133         fprintf(stderr, "Test end\n");
 134         return 0;
 135 }