1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
|
/***********************************************************************
* *
* This software is part of the ast package *
* Copyright (c) 1985-2009 AT&T Intellectual Property *
* and is licensed under the *
* Common Public License, Version 1.0 *
* by AT&T Intellectual Property *
* *
* A copy of the License is available at *
* http://www.opensource.org/licenses/cpl1.0.txt *
* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
* *
* Information and Software Systems Research *
* AT&T Research *
* Florham Park NJ *
* *
* Glenn Fowler <gsf@research.att.com> *
* David Korn <dgk@research.att.com> *
* Phong Vo <kpv@research.att.com> *
* *
***********************************************************************/
#include "sfhdr.h"
/* Walk streams and run operations on them
**
** Written by Kiem-Phong Vo.
*/
#if __STD_C
int sfwalk(Sfwalk_f walkf, Void_t* data, int type)
#else
int sfwalk(walkf, data, type)
Sfwalk_f walkf; /* return <0: stop, >=0: continue */
Void_t* data;
int type; /* walk streams with all given flags */
#endif
{
Sfpool_t *p;
Sfio_t *f;
int n, rv;
/* truly initializing std-streams before walking */
if(sfstdin->mode & SF_INIT)
_sfmode(sfstdin, (sfstdin->mode & SF_RDWR), 0);
if(sfstdout->mode & SF_INIT)
_sfmode(sfstdout, (sfstdout->mode & SF_RDWR), 0);
if(sfstderr->mode & SF_INIT)
_sfmode(sfstderr, (sfstderr->mode & SF_RDWR), 0);
for(rv = 0, p = &_Sfpool; p; p = p->next)
{ for(n = 0; n < p->n_sf; )
{ f = p->sf[n];
if(type != 0 && (f->_flags&type) != type )
continue; /* not in the interested set */
if((rv = (*walkf)(f, data)) < 0)
return rv;
if(p->sf[n] == f) /* move forward to next stream */
n += 1;
/* else - a sfclose() was done on current stream */
}
}
return rv;
}
|
