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
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
|
/* @(#)io.h 2.16 01/02/17 Copyright 1986, 1995 J. Schilling */
/*
* Copyright (c) 1986, 1995 J. Schilling
*/
/*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; see the file COPYING. If not, write to
* the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
*/
#ifndef _STDIO_IO_H
#define _STDIO_IO_H
#include <mconfig.h>
#include <stdio.h>
#include <standard.h>
#include <unixstd.h>
#include <fctldefs.h>
#include <schily.h>
#ifdef NO_USG_STDIO
# ifdef HAVE_USG_STDIO
# undef HAVE_USG_STDIO
# endif
#endif
/*#if _LFS_LARGEFILE*/
#ifdef HAVE_LARGEFILES
/*
* XXX Hack until fseeko()/ftello() are available everywhere or until
* XXX we know a secure way to let autoconf ckeck for fseeko()/ftello()
* XXX without defining FILE_OFFSETBITS to 64 in confdefs.h
*/
# define fseek fseeko
# define ftell ftello
#endif
/*
* speed things up...
*/
#ifndef _OPENFD_SRC
#ifdef _openfd
#undef _openfd
#endif
#define _openfd(name, omode) (open(name, omode, 0666))
#endif
#define DO_MYFLAG /* use local flags */
/*
* Flags used during fileopen(), ... by _fcons()/ _cvmod()
*/
#define FI_NONE 0x0000 /* no flags defined */
#define FI_READ 0x0001 /* open for reading */
#define FI_WRITE 0x0002 /* open for writing */
#define FI_BINARY 0x0004 /* open in binary mode */
#define FI_CREATE 0x0010 /* create if nessecary */
#define FI_TRUNC 0x0020 /* truncate file on open */
#define FI_APPEND 0x0040 /* append on each write */
#define FI_UNBUF 0x0080 /* dont't buffer io */
#define FI_CLOSE 0x1000 /* close file on error */
/*
* local flags
*/
#define _IONORAISE 01 /* do no raisecond() on errors */
#define _IOUNBUF 02 /* do unbuffered i/o */
#ifdef DO_MYFLAG
struct _io_flags {
FILE *fl_io; /* file pointer */
struct _io_flags /* pointer to next struct */
*fl_next; /* if more file pointer to same fd */
int fl_flags; /* my flags */
};
typedef struct _io_flags _io_fl;
extern int _io_glflag; /* global default flag */
extern _io_fl *_io_myfl; /* array of structs to hold my flags */
extern int _fl_max; /* max fd currently in _io_myfl */
/*
* if fileno > max
* expand
* else if map[fileno].pointer == 0
* return 0
* else if map[fileno].pointer == p
* return map[fileno].flags
* else
* search list
*/
#define flp(p) (&_io_myfl[fileno(p)])
#ifdef MY_FLAG_IS_MACRO
#define my_flag(p) ((int)fileno(p) >= _fl_max ? \
_io_get_my_flag(p) : \
((flp(p)->fl_io == 0 || flp(p)->fl_io == p) ? \
flp(p)->fl_flags : \
_io_get_my_flag(p)))
#else
#define my_flag(p) _io_get_my_flag(p)
#endif
#define set_my_flag(p,v) _io_set_my_flag(p, v)
#define add_my_flag(p,v) _io_add_my_flag(p, v)
extern int _io_get_my_flag __PR((FILE *));
extern void _io_set_my_flag __PR((FILE *, int));
extern void _io_add_my_flag __PR((FILE *, int));
#else /* DO_MYFLAG */
#define my_flag(p) _IONORAISE /* Always noraise */
#define set_my_flag(p,v) /* Ignore */
#define add_my_flag(p,v) /* Ignore */
#endif /* DO_MYFLAG */
#ifdef HAVE_USG_STDIO
/*
* Use the right filbuf()/flsbuf() function.
*/
#ifdef HAVE___FILBUF
# define usg_filbuf(fp) __filbuf(fp)
# define usg_flsbuf(c, fp) __flsbuf(c, fp)
/*
* Define prototypes to verify if our interface is right
*/
extern int __filbuf __PR((FILE *));
/*extern int __flsbuf __PR(());*/
#else
# ifdef HAVE__FILBUF
# define usg_filbuf(fp) _filbuf(fp)
# define usg_flsbuf(c, fp) _flsbuf(c, fp)
/*
* Define prototypes to verify if our interface is right
*/
extern int _filbuf __PR((FILE *));
/*extern int _flsbuf __PR(());*/
# else
/*
* no filbuf() but this will not happen on USG_STDIO systems.
*/
# endif
#endif
/*
* Do not check this because flsbuf()'s 1st parameter may be
* int SunOS
* unsigned int Apollo
* unsigned char HP-UX-11
*
* Note that the interface is now checked by autoconf.
*/
/*extern int _flsbuf __PR((int, FILE *));*/
#else
/*
* If we are on a non USG system we cannot down file pointers
*/
#undef DO_DOWN
#endif
#ifndef DO_DOWN
/*
* No stream checking
*/
#define down(f)
#define down1(f,fl1)
#define down2(f,fl1,fl2)
#else
/*
* Do stream checking (works only on USG stdio)
*
* New version of USG stdio.
* _iob[] holds only a small amount of pointers.
* Aditional space is allocated.
* We may check only if the file pointer is != NULL
* and if iop->_flag refers to a stream with appropriate modes.
* If _iob[] gets expanded by malloc() we cannot check upper bound.
*/
#define down(f) ((f) == 0 || (f)->_flag==0 ? \
(raisecond(_badfile, 0L),(FILE *)0) : (f))
#define down1(f,fl1) ((f) == 0 || (f)->_flag==0 ? \
(raisecond(_badfile, 0L),(FILE *)0) : \
(((f)->_flag & fl1) != fl1 ? \
(raisecond(_badop, 0L),FILE *)0) : \
(f)))
#define down2(f,fl1,fl2)((f) == 0 || (f)->_flag==0 ? \
(raisecond(_badfile, 0L),(FILE *)0) : \
(((f)->_flag & fl1) != fl1 && \
((f)->_flag & fl2) != fl2 ? \
(raisecond(_badop, 0L),(FILE *)0) : \
(f)))
#endif /* DO_DOWN */
extern char _badfile[];
extern char _badmode[];
extern char _badop[];
#endif /* _STDIO_IO_H */
|
