xref: /titanic_51/usr/src/lib/libbc/libc/stdio/4.2/fopen.c (revision 5d54f3d8999eac1762fe0a8c7177d20f1f201fae)
17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate  * CDDL HEADER START
37c478bd9Sstevel@tonic-gate  *
47c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
57c478bd9Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
67c478bd9Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
77c478bd9Sstevel@tonic-gate  * with the License.
87c478bd9Sstevel@tonic-gate  *
97c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
107c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
117c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
127c478bd9Sstevel@tonic-gate  * and limitations under the License.
137c478bd9Sstevel@tonic-gate  *
147c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
157c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
167c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
177c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
187c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
197c478bd9Sstevel@tonic-gate  *
207c478bd9Sstevel@tonic-gate  * CDDL HEADER END
217c478bd9Sstevel@tonic-gate  */
227c478bd9Sstevel@tonic-gate /*
237c478bd9Sstevel@tonic-gate  * Copyright 1986 Sun Microsystems, Inc.  All rights reserved.
247c478bd9Sstevel@tonic-gate  * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate  */
267c478bd9Sstevel@tonic-gate 
277c478bd9Sstevel@tonic-gate /*      Copyright (c) 1984 AT&T */
287c478bd9Sstevel@tonic-gate /*        All Rights Reserved   */
297c478bd9Sstevel@tonic-gate 
30*5d54f3d8Smuffin #pragma ident	"%Z%%M%	%I%	%E% SMI"
317c478bd9Sstevel@tonic-gate 
327c478bd9Sstevel@tonic-gate /*LINTLIBRARY*/
337c478bd9Sstevel@tonic-gate #include <stdio.h>
347c478bd9Sstevel@tonic-gate #include <fcntl.h>
357c478bd9Sstevel@tonic-gate 
36*5d54f3d8Smuffin extern int	fclose();
37*5d54f3d8Smuffin extern FILE	*_findiop();
38*5d54f3d8Smuffin 
39*5d54f3d8Smuffin static FILE	*_endopen(char *, char *, FILE *);
407c478bd9Sstevel@tonic-gate 
417c478bd9Sstevel@tonic-gate FILE *
42*5d54f3d8Smuffin fopen(char *file, char *mode)
437c478bd9Sstevel@tonic-gate {
447c478bd9Sstevel@tonic-gate 	return (_endopen(file, mode, _findiop()));
457c478bd9Sstevel@tonic-gate }
467c478bd9Sstevel@tonic-gate 
477c478bd9Sstevel@tonic-gate FILE *
48*5d54f3d8Smuffin freopen(char *file, char *mode, FILE *iop)
497c478bd9Sstevel@tonic-gate {
507c478bd9Sstevel@tonic-gate 	(void) fclose(iop); /* doesn't matter if this fails */
517c478bd9Sstevel@tonic-gate 	return (_endopen(file, mode, iop));
527c478bd9Sstevel@tonic-gate }
537c478bd9Sstevel@tonic-gate 
547c478bd9Sstevel@tonic-gate static FILE *
55*5d54f3d8Smuffin _endopen(char *file, char *mode, FILE *iop)
567c478bd9Sstevel@tonic-gate {
57*5d54f3d8Smuffin 	int	plus, oflag, fd;
587c478bd9Sstevel@tonic-gate 
597c478bd9Sstevel@tonic-gate 	if (iop == NULL || file == NULL || file[0] == '\0')
607c478bd9Sstevel@tonic-gate 		return (NULL);
617c478bd9Sstevel@tonic-gate 	plus = (mode[1] == '+');
627c478bd9Sstevel@tonic-gate 	switch (mode[0]) {
637c478bd9Sstevel@tonic-gate 	case 'w':
647c478bd9Sstevel@tonic-gate 		oflag = (plus ? O_RDWR : O_WRONLY) | O_TRUNC | O_CREAT;
657c478bd9Sstevel@tonic-gate 		break;
667c478bd9Sstevel@tonic-gate 	case 'a':
677c478bd9Sstevel@tonic-gate 		oflag = (plus ? O_RDWR : O_WRONLY) | O_CREAT;
687c478bd9Sstevel@tonic-gate 		break;
697c478bd9Sstevel@tonic-gate 	case 'r':
707c478bd9Sstevel@tonic-gate 		oflag = plus ? O_RDWR : O_RDONLY;
717c478bd9Sstevel@tonic-gate 		break;
727c478bd9Sstevel@tonic-gate 	default:
737c478bd9Sstevel@tonic-gate 		return (NULL);
747c478bd9Sstevel@tonic-gate 	}
757c478bd9Sstevel@tonic-gate 	if ((fd = open(file, oflag, 0666)) < 0)
767c478bd9Sstevel@tonic-gate 		return (NULL);
777c478bd9Sstevel@tonic-gate 	iop->_cnt = 0;
787c478bd9Sstevel@tonic-gate 	iop->_file = fd;
797c478bd9Sstevel@tonic-gate 	iop->_flag = plus ? _IORW : (mode[0] == 'r') ? _IOREAD : _IOWRT;
807c478bd9Sstevel@tonic-gate 	if (mode[0] == 'a')   {
817c478bd9Sstevel@tonic-gate 		if ((lseek(fd,0L,2)) < 0)  {
827c478bd9Sstevel@tonic-gate 			(void) close(fd);
837c478bd9Sstevel@tonic-gate 			return NULL;
847c478bd9Sstevel@tonic-gate 		}
857c478bd9Sstevel@tonic-gate 	}
867c478bd9Sstevel@tonic-gate 	iop->_base = iop->_ptr = NULL;
877c478bd9Sstevel@tonic-gate 	iop->_bufsiz = 0;
887c478bd9Sstevel@tonic-gate 	return (iop);
897c478bd9Sstevel@tonic-gate }
90