1 /* Copyright (C) 1993,95,97,99,2000,2002,2004, 2005, 2010
2 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>.
19 As a special exception, if you link the code in this file with
20 files compiled with a GNU compiler to produce an executable,
21 that does not cause the resulting executable to be covered by
22 the GNU Lesser General Public License. This exception does not
23 however invalidate any other reasons why the executable file
24 might be covered by the GNU Lesser General Public License.
25 This exception applies to code released by its copyright holders
26 in files containing the exception. */
31 #include <shlib-compat.h>
33 /* Prototyped for local functions. */
34 static _IO_ssize_t
_IO_cookie_read (register _IO_FILE
* fp
, void* buf
,
36 static _IO_ssize_t
_IO_cookie_write (register _IO_FILE
* fp
,
37 const void* buf
, _IO_ssize_t size
);
38 static _IO_off64_t
_IO_cookie_seek (_IO_FILE
*fp
, _IO_off64_t offset
, int dir
);
39 static _IO_off64_t
_IO_cookie_seekoff (_IO_FILE
*fp
, _IO_off64_t offset
,
41 static int _IO_cookie_close (_IO_FILE
* fp
);
44 _IO_cookie_read (fp
, buf
, size
)
49 struct _IO_cookie_file
*cfile
= (struct _IO_cookie_file
*) fp
;
51 if (cfile
->__io_functions
.read
== NULL
)
54 return cfile
->__io_functions
.read (cfile
->__cookie
, buf
, size
);
58 _IO_cookie_write (fp
, buf
, size
)
63 struct _IO_cookie_file
*cfile
= (struct _IO_cookie_file
*) fp
;
65 if (cfile
->__io_functions
.write
== NULL
)
67 fp
->_flags
|= _IO_ERR_SEEN
;
71 _IO_ssize_t n
= cfile
->__io_functions
.write (cfile
->__cookie
, buf
, size
);
73 fp
->_flags
|= _IO_ERR_SEEN
;
79 _IO_cookie_seek (fp
, offset
, dir
)
84 struct _IO_cookie_file
*cfile
= (struct _IO_cookie_file
*) fp
;
86 return ((cfile
->__io_functions
.seek
== NULL
87 || (cfile
->__io_functions
.seek (cfile
->__cookie
, &offset
, dir
)
89 || offset
== (_IO_off64_t
) -1)
90 ? _IO_pos_BAD
: offset
);
97 struct _IO_cookie_file
*cfile
= (struct _IO_cookie_file
*) fp
;
99 if (cfile
->__io_functions
.close
== NULL
)
102 return cfile
->__io_functions
.close (cfile
->__cookie
);
107 _IO_cookie_seekoff (fp
, offset
, dir
, mode
)
113 /* We must force the fileops code to always use seek to determine
115 fp
->_offset
= _IO_pos_BAD
;
116 return INTUSE(_IO_file_seekoff
) (fp
, offset
, dir
, mode
);
120 static const struct _IO_jump_t _IO_cookie_jumps
= {
122 JUMP_INIT(finish
, INTUSE(_IO_file_finish
)),
123 JUMP_INIT(overflow
, INTUSE(_IO_file_overflow
)),
124 JUMP_INIT(underflow
, INTUSE(_IO_file_underflow
)),
125 JUMP_INIT(uflow
, INTUSE(_IO_default_uflow
)),
126 JUMP_INIT(pbackfail
, INTUSE(_IO_default_pbackfail
)),
127 JUMP_INIT(xsputn
, INTUSE(_IO_file_xsputn
)),
128 JUMP_INIT(xsgetn
, INTUSE(_IO_default_xsgetn
)),
129 JUMP_INIT(seekoff
, _IO_cookie_seekoff
),
130 JUMP_INIT(seekpos
, _IO_default_seekpos
),
131 JUMP_INIT(setbuf
, INTUSE(_IO_file_setbuf
)),
132 JUMP_INIT(sync
, INTUSE(_IO_file_sync
)),
133 JUMP_INIT(doallocate
, INTUSE(_IO_file_doallocate
)),
134 JUMP_INIT(read
, _IO_cookie_read
),
135 JUMP_INIT(write
, _IO_cookie_write
),
136 JUMP_INIT(seek
, _IO_cookie_seek
),
137 JUMP_INIT(close
, _IO_cookie_close
),
138 JUMP_INIT(stat
, _IO_default_stat
),
139 JUMP_INIT(showmanyc
, _IO_default_showmanyc
),
140 JUMP_INIT(imbue
, _IO_default_imbue
),
145 _IO_cookie_init (struct _IO_cookie_file
*cfile
, int read_write
,
146 void *cookie
, _IO_cookie_io_functions_t io_functions
)
148 INTUSE(_IO_init
) (&cfile
->__fp
.file
, 0);
149 _IO_JUMPS (&cfile
->__fp
) = &_IO_cookie_jumps
;
151 cfile
->__cookie
= cookie
;
152 cfile
->__io_functions
= io_functions
;
154 INTUSE(_IO_file_init
) (&cfile
->__fp
);
156 _IO_mask_flags (&cfile
->__fp
.file
, read_write
,
157 _IO_NO_READS
+_IO_NO_WRITES
+_IO_IS_APPENDING
);
159 /* We use a negative number different from -1 for _fileno to mark that
160 this special stream is not associated with a real file, but still has
161 to be treated as such. */
162 cfile
->__fp
.file
._fileno
= -2;
167 _IO_fopencookie (cookie
, mode
, io_functions
)
170 _IO_cookie_io_functions_t io_functions
;
175 struct _IO_cookie_file cfile
;
184 read_write
= _IO_NO_WRITES
;
187 read_write
= _IO_NO_READS
;
190 read_write
= _IO_NO_READS
|_IO_IS_APPENDING
;
195 if (mode
[0] == '+' || (mode
[0] == 'b' && mode
[1] == '+'))
196 read_write
&= _IO_IS_APPENDING
;
198 new_f
= (struct locked_FILE
*) malloc (sizeof (struct locked_FILE
));
202 new_f
->cfile
.__fp
.file
._lock
= &new_f
->lock
;
205 _IO_cookie_init (&new_f
->cfile
, read_write
, cookie
, io_functions
);
207 return (_IO_FILE
*) &new_f
->cfile
.__fp
;
210 versioned_symbol (libc
, _IO_fopencookie
, fopencookie
, GLIBC_2_2
);
212 #if SHLIB_COMPAT (libc, GLIBC_2_0, GLIBC_2_2)
214 static _IO_off64_t
_IO_old_cookie_seek (_IO_FILE
*fp
, _IO_off64_t offset
,
216 _IO_FILE
* _IO_old_fopencookie (void *cookie
, const char *mode
,
217 _IO_cookie_io_functions_t io_functions
);
220 attribute_compat_text_section
221 _IO_old_cookie_seek (fp
, offset
, dir
)
226 struct _IO_cookie_file
*cfile
= (struct _IO_cookie_file
*) fp
;
227 int (*seek
) (_IO_FILE
*, _IO_off_t
, int);
230 seek
= (int (*)(_IO_FILE
*, _IO_off_t
, int)) cfile
->__io_functions
.seek
;
234 ret
= seek (cfile
->__cookie
, offset
, dir
);
236 return (ret
== -1) ? _IO_pos_BAD
: ret
;
239 static const struct _IO_jump_t _IO_old_cookie_jumps
= {
241 JUMP_INIT(finish
, INTUSE(_IO_file_finish
)),
242 JUMP_INIT(overflow
, INTUSE(_IO_file_overflow
)),
243 JUMP_INIT(underflow
, INTUSE(_IO_file_underflow
)),
244 JUMP_INIT(uflow
, INTUSE(_IO_default_uflow
)),
245 JUMP_INIT(pbackfail
, INTUSE(_IO_default_pbackfail
)),
246 JUMP_INIT(xsputn
, INTUSE(_IO_file_xsputn
)),
247 JUMP_INIT(xsgetn
, INTUSE(_IO_default_xsgetn
)),
248 JUMP_INIT(seekoff
, _IO_cookie_seekoff
),
249 JUMP_INIT(seekpos
, _IO_default_seekpos
),
250 JUMP_INIT(setbuf
, INTUSE(_IO_file_setbuf
)),
251 JUMP_INIT(sync
, INTUSE(_IO_file_sync
)),
252 JUMP_INIT(doallocate
, INTUSE(_IO_file_doallocate
)),
253 JUMP_INIT(read
, _IO_cookie_read
),
254 JUMP_INIT(write
, _IO_cookie_write
),
255 JUMP_INIT(seek
, _IO_old_cookie_seek
),
256 JUMP_INIT(close
, _IO_cookie_close
),
257 JUMP_INIT(stat
, _IO_default_stat
),
258 JUMP_INIT(showmanyc
, _IO_default_showmanyc
),
259 JUMP_INIT(imbue
, _IO_default_imbue
),
263 attribute_compat_text_section
264 _IO_old_fopencookie (cookie
, mode
, io_functions
)
267 _IO_cookie_io_functions_t io_functions
;
271 ret
= _IO_fopencookie (cookie
, mode
, io_functions
);
273 _IO_JUMPS ((struct _IO_FILE_plus
*) ret
) = &_IO_old_cookie_jumps
;
278 compat_symbol (libc
, _IO_old_fopencookie
, fopencookie
, GLIBC_2_0
);