cd9d2cac115cf04e2de7b07ec42555f9f3b376a1
[dragonfly.git] / 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 }