xref: /titanic_41/usr/src/lib/libbc/libc/stdio/sys5/filbuf.c (revision 8eea8e29cc4374d1ee24c25a07f45af132db3499)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  * Copyright 1998 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 /*      Copyright (c) 1984 AT&T */
28 /*        All Rights Reserved   */
29 
30 #pragma ident	"%Z%%M%	%I%	%E% SMI"  /* from S5R2 2.1 */
31 
32 /*LINTLIBRARY*/
33 #include <stdio.h>
34 
35 extern _findbuf();
36 extern int read();
37 extern int fflush();
38 
39 int
40 __filbuf(iop)
41 register FILE *iop;
42 {
43 	return (_filbuf(iop));
44 }
45 
46 int
47 _filbuf(iop)
48 register FILE *iop;
49 {
50 	static void lbfflush();
51 
52 	if ( !(iop->_flag & _IOREAD) )
53 		if (iop->_flag & _IORW)
54 			iop->_flag |= _IOREAD;
55 		else
56 			return(EOF);
57 
58 	if (iop->_flag&_IOSTRG)
59 		return(EOF);
60 
61 	if (iop->_base == NULL)  /* get buffer if we don't have one */
62 		_findbuf(iop);
63 
64 	/* if this device is a terminal (line-buffered) or unbuffered, then */
65 	/* flush buffers of all line-buffered devices currently writing */
66 
67 	if (iop->_flag & (_IOLBF | _IONBF))
68 		_fwalk(lbfflush);
69 
70 	iop->_ptr = iop->_base;
71 	iop->_cnt = read(fileno(iop), (char *)iop->_base,
72 	    (unsigned)((iop->_flag & _IONBF) ? 1 : iop->_bufsiz ));
73 	if (--iop->_cnt >= 0)		/* success */
74 		return (*iop->_ptr++);
75 	if (iop->_cnt != -1)		/* error */
76 		iop->_flag |= _IOERR;
77 	else {				/* end-of-file */
78 		iop->_flag |= _IOEOF;
79 		if (iop->_flag & _IORW)
80 			iop->_flag &= ~_IOREAD;
81 	}
82 	iop->_cnt = 0;
83 	return (EOF);
84 }
85 
86 static void
87 lbfflush(iop)
88 FILE *iop;
89 {
90 	if (iop->_flag & _IOLBF)
91 		(void) fflush(iop);
92 }
93