Rev 1693 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
1693 | serge | 1 | /* |
2 | * Copyright (c) 1990 The Regents of the University of California. |
||
3 | * All rights reserved. |
||
4 | * |
||
5 | * Redistribution and use in source and binary forms are permitted |
||
6 | * provided that the above copyright notice and this paragraph are |
||
7 | * duplicated in all such forms and that any documentation, |
||
8 | * advertising materials, and other materials related to such |
||
9 | * distribution and use acknowledge that the software was developed |
||
10 | * by the University of California, Berkeley. The name of the |
||
11 | * University may not be used to endorse or promote products derived |
||
12 | * from this software without specific prior written permission. |
||
13 | * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR |
||
14 | * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED |
||
15 | * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. |
||
16 | */ |
||
17 | /* No user fns here. Pesch 15apr92. */ |
||
18 | |||
19 | #if defined(LIBC_SCCS) && !defined(lint) |
||
20 | static char sccsid[] = "%W% (Berkeley) %G%"; |
||
21 | #endif /* LIBC_SCCS and not lint */ |
||
22 | |||
23 | #include <_ansi.h> |
||
24 | #include |
||
25 | #include |
||
26 | #include |
||
27 | #include |
||
28 | #include "local.h" |
||
29 | |||
3065 | serge | 30 | int |
31 | _DEFUN(_fwalk, (ptr, function), |
||
1693 | serge | 32 | struct _reent *ptr _AND |
33 | register int (*function) (FILE *)) |
||
34 | { |
||
35 | register FILE *fp; |
||
36 | register int n, ret = 0; |
||
37 | register struct _glue *g; |
||
38 | |||
3065 | serge | 39 | /* |
40 | * It should be safe to walk the list without locking it; |
||
41 | * new nodes are only added to the end and none are ever |
||
42 | * removed. |
||
43 | * |
||
44 | * Avoid locking this list while walking it or else you will |
||
45 | * introduce a potential deadlock in [at least] refill.c. |
||
46 | */ |
||
1693 | serge | 47 | for (g = &ptr->__sglue; g != NULL; g = g->_next) |
48 | for (fp = g->_iobs, n = g->_niobs; --n >= 0; fp++) |
||
49 | if (fp->_flags != 0) |
||
50 | { |
||
3065 | serge | 51 | if (fp->_flags != 0 && fp->_flags != 1 && fp->_file != -1) |
1693 | serge | 52 | ret |= (*function) (fp); |
53 | } |
||
54 | |||
55 | return ret; |
||
56 | } |
||
57 | |||
58 | /* Special version of __fwalk where the function pointer is a reentrant |
||
59 | I/O function (e.g. _fclose_r). */ |
||
3065 | serge | 60 | int |
61 | _DEFUN(_fwalk_reent, (ptr, reent_function), |
||
1693 | serge | 62 | struct _reent *ptr _AND |
63 | register int (*reent_function) (struct _reent *, FILE *)) |
||
64 | { |
||
65 | register FILE *fp; |
||
66 | register int n, ret = 0; |
||
67 | register struct _glue *g; |
||
68 | |||
3065 | serge | 69 | /* |
70 | * It should be safe to walk the list without locking it; |
||
71 | * new nodes are only added to the end and none are ever |
||
72 | * removed. |
||
73 | * |
||
74 | * Avoid locking this list while walking it or else you will |
||
75 | * introduce a potential deadlock in [at least] refill.c. |
||
76 | */ |
||
1693 | serge | 77 | for (g = &ptr->__sglue; g != NULL; g = g->_next) |
78 | for (fp = g->_iobs, n = g->_niobs; --n >= 0; fp++) |
||
79 | if (fp->_flags != 0) |
||
80 | { |
||
3065 | serge | 81 | if (fp->_flags != 0 && fp->_flags != 1 && fp->_file != -1) |
1693 | serge | 82 | ret |= (*reent_function) (ptr, fp); |
83 | } |
||
84 | |||
85 | return ret; |
||
86 | } |