Correct bug in test for available request.
[kopensolaris-gnu/glibc.git] / rt / aio_suspend.c
1 /* Suspend until termination of a requests.
2    Copyright (C) 1997, 1998 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
34 #include "aio_misc.h"
35
36
37 int
38 aio_suspend (list, nent, timeout)
39      const struct aiocb *const list[];
40      int nent;
41      const struct timespec *timeout;
42 {
43   struct waitlist waitlist[nent];
44   struct requestlist *requestlist[nent];
45   pthread_cond_t cond;
46   int cnt;
47   int result = 0;
48   int dummy;
49   int none = 1;
50
51   /* Request the mutex.  */
52   pthread_mutex_lock (&__aio_requests_mutex);
53
54   /* There is not yet a finished request.  Signal the request that
55      we are working for it.  */
56   for (cnt = 0; cnt < nent; ++cnt)
57     if (list[cnt] != NULL && list[cnt]->__error_code == EINPROGRESS)
58       {
59         requestlist[cnt] = __aio_find_req ((aiocb_union *) list[cnt]);
60
61         if (requestlist[cnt] != NULL)
62           {
63             waitlist[cnt].cond = &cond;
64             waitlist[cnt].next = requestlist[cnt]->waiting;
65             waitlist[cnt].counterp = &dummy;
66             waitlist[cnt].sigevp = NULL;
67             requestlist[cnt]->waiting = &waitlist[cnt];
68             none = 0;
69           }
70       }
71
72   /* If there is a not finished request wait for it.  */
73   if (!none)
74     {
75       int oldstate;
76
77       /* Initialize the conditional variable.  */
78       pthread_cond_init (&cond, NULL);
79
80       /* Since `pthread_cond_wait'/`pthread_cond_timedwait' are cancelation
81          points we must be careful.  We added entries to the waiting lists
82          which we must remove.  So defer cancelation for now.  */
83       pthread_setcancelstate (PTHREAD_CANCEL_DISABLE, &oldstate);
84
85       if (timeout == NULL)
86         result = pthread_cond_wait (&cond, &__aio_requests_mutex);
87       else
88         result = pthread_cond_timedwait (&cond, &__aio_requests_mutex,
89                                          timeout);
90
91       /* Now remove the entry in the waiting list for all requests
92          which didn't terminate.  */
93       for (cnt = 0; cnt < nent; ++cnt)
94         if (list[cnt] != NULL && list[cnt]->__error_code == EINPROGRESS
95             && requestlist[cnt] != NULL)
96           {
97             struct waitlist **listp = &requestlist[cnt]->waiting;
98
99             /* There is the chance that we cannot find our entry anymore.
100                This could happen if the request terminated and restarted
101                again.  */
102             while (*listp != NULL && *listp != &waitlist[cnt])
103               listp = &(*listp)->next;
104
105             if (*listp != NULL)
106               *listp = (*listp)->next;
107           }
108
109       /* Now it's time to restore the cancelation state.  */
110       pthread_setcancelstate (oldstate, NULL);
111
112       /* Release the conditional variable.  */
113       if (pthread_cond_destroy (&cond) != 0)
114         /* This must never happen.  */
115         abort ();
116
117       if (result != 0)
118         {
119           /* An error occurred.  Possibly it's EINTR.  We have to translate
120              the timeout error report of `pthread_cond_timedwait' to the
121              form expected from `aio_suspend'.  */
122           if (result == ETIMEDOUT)
123             __set_errno (EAGAIN);
124
125           result = -1;
126         }
127     }
128
129   /* Release the mutex.  */
130   pthread_mutex_unlock (&__aio_requests_mutex);
131
132   return result;
133 }
134
135 weak_alias (aio_suspend, aio_suspend64)