stdio/4.2/fopen.c

	fopen.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 1986 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*      Copyright (c) 1984 AT&T */
/*        All Rights Reserved   */

#pragma ident   "%Z%%M% %I% %E% SMI"  /* from S5R2 1.8 */

/*LINTLIBRARY*/
#include <stdio.h>
#include <fcntl.h>

extern int open(), fclose();
extern FILE *_findiop(), *_endopen();

FILE *
fopen(file, mode)
char    *file, *mode;
{
    return (_endopen(file, mode, _findiop()));
}

FILE *
freopen(file, mode, iop)
char    *file, *mode;
register FILE *iop;
{
    (void) fclose(iop); /* doesn't matter if this fails */
    return (_endopen(file, mode, iop));
}

static FILE *
_endopen(file, mode, iop)
char    *file, *mode;
register FILE *iop;
{
    register int    plus, oflag, fd;

    if (iop == NULL || file == NULL || file[0] == '\0')
        return (NULL);
    plus = (mode[1] == '+');
    switch (mode[0]) {
    case 'w':
        oflag = (plus ? O_RDWR : O_WRONLY) | O_TRUNC | O_CREAT;
        break;
    case 'a':
        oflag = (plus ? O_RDWR : O_WRONLY) | O_CREAT;
        break;
    case 'r':
        oflag = plus ? O_RDWR : O_RDONLY;
        break;
    default:
        return (NULL);
    }
    if ((fd = open(file, oflag, 0666)) < 0)
        return (NULL);
    iop->_cnt = 0;
    iop->_file = fd;
    iop->_flag = plus ? _IORW : (mode[0] == 'r') ? _IOREAD : _IOWRT;
    if (mode[0] == 'a')   {
        if ((lseek(fd,0L,2)) < 0)  {
            (void) close(fd);
            return NULL;
        }
    }
    iop->_base = iop->_ptr = NULL;
    iop->_bufsiz = 0;
    return (iop);
}