1 /* Copyright (C) 1991, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Library General Public License for more details.
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB. If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA. */
25 #include <sys/types.h>
30 /* Read N bytes into BUF from COOKIE. */
32 DEFUN(__stdio_read
, (cookie
, buf
, n
),
33 PTR cookie AND
register char *buf AND
register size_t n
)
35 CONST
int fd
= (int) cookie
;
36 #if defined (EINTR) && defined (EINTR_REPEAT)
42 nread
= __read (fd
, buf
, (int) n
);
53 return __read (fd
, buf
, n
);
58 /* Write N bytes from BUF to COOKIE. */
60 DEFUN(__stdio_write
, (cookie
, buf
, n
),
61 PTR cookie AND
register CONST
char *buf AND
register size_t n
)
63 CONST
int fd
= (int) cookie
;
64 register size_t written
= 0;
68 int count
= __write (fd
, buf
, (int) n
);
76 #if defined (EINTR) && defined (EINTR_REPEAT)
88 /* Move COOKIE's file position *POS bytes, according to WHENCE.
89 The new file position is stored in *POS.
90 Returns zero if successful, nonzero if not. */
92 DEFUN(__stdio_seek
, (cookie
, pos
, whence
),
93 PTR cookie AND
fpos_t *pos AND
int whence
)
96 new = __lseek ((int) cookie
, (off_t
) *pos
, whence
);
106 DEFUN(__stdio_close
, (cookie
), PTR cookie
)
108 return __close ((int) cookie
);
111 /* Return the POSIX.1 file descriptor associated with COOKIE,
112 or -1 for errors. If COOKIE does not relate to any POSIX.1 file
113 descriptor, this should return -1 with errno set to EOPNOTSUPP. */
115 DEFUN(__stdio_fileno
, (cookie
), PTR cookie
)
121 /* Open the given file with the mode given in the __io_mode argument. */
123 DEFUN(__stdio_open
, (filename
, m
, cookieptr
),
124 CONST
char *filename AND __io_mode m AND PTR
*cookieptr
)
129 if (m
.__read
&& m
.__write
)
132 mode
= m
.__read
? O_RDONLY
: O_WRONLY
;
142 fd
= __open (filename
, mode
| O_CREAT
,
143 S_IRUSR
|S_IWUSR
|S_IRGRP
|S_IWGRP
|S_IROTH
|S_IWOTH
);
145 fd
= __open (filename
, mode
);
150 *cookieptr
= (PTR
) fd
;
155 /* Open FILENAME with the mode in M. Use the same magic cookie
156 already in *COOKIEPTR if possible, closing the old cookie with CLOSEFN. */
158 DEFUN(__stdio_reopen
, (filename
, m
, cookieptr
),
159 CONST
char *filename AND __io_mode m AND
160 PTR
*cookieptr AND __io_close_fn closefn
)
164 /* We leave the old descriptor open while we open the file.
165 That way ``freopen ("/dev/stdin", "r", stdin)'' works. */
167 if (__stdio_open (filename
, m
, &newcookie
))
169 if (errno
== ENFILE
|| errno
== EMFILE
)
171 /* We are out of file descriptors. Try closing the old one and
172 retrying the open. */
173 (void) (*closefn
) (*cookieptr
);
174 if (__stdio_open (filename
, m
, &newcookie
))
181 if (newcookie
!= *cookieptr
)
183 if (closefn
!= __stdio_close
||
184 /* Try to move the descriptor to the desired one. */
185 __dup2 ((int) newcookie
, (int) *cookieptr
) < 0)
186 /* Didn't work. Give the caller the new cookie. */
187 *cookieptr
= newcookie
;