Test for notification mechanism in lio_listio.
[kopensolaris-gnu/glibc.git] / rt / aio_suspend.c
1 /* Suspend until termination of a requests.
2    Copyright (C) 1997, 1998, 1999 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
5
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Library General Public License as
8    published by the Free Software Foundation; either version 2 of the
9    License, or (at your option) any later version.
10
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Library General Public License for more details.
15
16    You should have received a copy of the GNU Library General Public
17    License along with the GNU C Library; see the file COPYING.LIB.  If not,
18    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19    Boston, MA 02111-1307, USA.  */
20
21
22 /* We use an UGLY hack to prevent gcc from finding us cheating.  The
23    implementation of aio_suspend and aio_suspend64 are identical and so
24    we want to avoid code duplication by using aliases.  But gcc sees
25    the different parameter lists and prints a warning.  We define here
26    a function so that aio_suspend64 has no prototype.  */
27 #define aio_suspend64 XXX
28 #include <aio.h>
29 /* And undo the hack.  */
30 #undef aio_suspend64
31
32 #include <errno.h>
33 #include <stdlib.h>
34
35 #include "aio_misc.h"
36
37
38 int
39 aio_suspend (list, nent, timeout)
40      const struct aiocb *const list[];
41      int nent;
42      const struct timespec *timeout;
43 {
44   struct waitlist waitlist[nent];
45   struct requestlist *requestlist[nent];
46   pthread_cond_t cond = PTHREAD_COND_INITIALIZER;
47   int cnt;
48   int result = 0;
49   int dummy;
50   int none = 1;
51
52   /* Request the mutex.  */
53   pthread_mutex_lock (&__aio_requests_mutex);
54
55   /* There is not yet a finished request.  Signal the request that
56      we are working for it.  */
57   for (cnt = 0; cnt < nent; ++cnt)
58     if (list[cnt] != NULL && list[cnt]->__error_code == EINPROGRESS)
59       {
60         requestlist[cnt] = __aio_find_req ((aiocb_union *) list[cnt]);
61
62         if (requestlist[cnt] != NULL)
63           {
64             waitlist[cnt].cond = &cond;
65             waitlist[cnt].next = requestlist[cnt]->waiting;
66             waitlist[cnt].counterp = &dummy;
67             waitlist[cnt].sigevp = NULL;
68             waitlist[cnt].caller_pid = 0;       /* Not needed.  */
69             requestlist[cnt]->waiting = &waitlist[cnt];
70             none = 0;
71           }
72       }
73
74   /* If there is a not finished request wait for it.  */
75   if (!none)
76     {
77       int oldstate;
78
79       /* Since `pthread_cond_wait'/`pthread_cond_timedwait' are cancelation
80          points we must be careful.  We added entries to the waiting lists
81          which we must remove.  So defer cancelation for now.  */
82       pthread_setcancelstate (PTHREAD_CANCEL_DISABLE, &oldstate);
83
84       if (timeout == NULL)
85         result = pthread_cond_wait (&cond, &__aio_requests_mutex);
86       else
87         result = pthread_cond_timedwait (&cond, &__aio_requests_mutex,
88                                          timeout);
89
90       /* Now remove the entry in the waiting list for all requests
91          which didn't terminate.  */
92       for (cnt = 0; cnt < nent; ++cnt)
93         if (list[cnt] != NULL && list[cnt]->__error_code == EINPROGRESS
94             && requestlist[cnt] != NULL)
95           {
96             struct waitlist **listp = &requestlist[cnt]->waiting;
97
98             /* There is the chance that we cannot find our entry anymore.
99                This could happen if the request terminated and restarted
100                again.  */
101             while (*listp != NULL && *listp != &waitlist[cnt])
102               listp = &(*listp)->next;
103
104             if (*listp != NULL)
105               *listp = (*listp)->next;
106           }
107
108       /* Now it's time to restore the cancelation state.  */
109       pthread_setcancelstate (oldstate, NULL);
110
111       /* Release the conditional variable.  */
112       if (pthread_cond_destroy (&cond) != 0)
113         /* This must never happen.  */
114         abort ();
115
116       if (result != 0)
117         {
118           /* An error occurred.  Possibly it's EINTR.  We have to translate
119              the timeout error report of `pthread_cond_timedwait' to the
120              form expected from `aio_suspend'.  */
121           if (result == ETIMEDOUT)
122             __set_errno (EAGAIN);
123
124           result = -1;
125         }
126     }
127
128   /* Release the mutex.  */
129   pthread_mutex_unlock (&__aio_requests_mutex);
130
131   return result;
132 }
133
134 weak_alias (aio_suspend, aio_suspend64)