/*
 * fopen.c
 */

#include <stdio.h>
#include <unistd.h>
#include <fcntl.h>

FILE *fopen(const char *file, const char *mode)
{
    int flags = O_RDONLY;
    int plus = 0;
    int fd;

    while (*mode) {
	switch (*mode) {
	case 'r':
	    flags = O_RDONLY;
	    break;
	case 'w':
	    flags = O_WRONLY | O_CREAT | O_TRUNC;
	    break;
	case 'a':
	    flags = O_WRONLY | O_CREAT | O_APPEND;
	    break;
	case '+':
	    plus = 1;
	    break;
	}
	mode++;
    }

    if (plus) {
	flags = (flags & ~(O_RDONLY | O_WRONLY)) | O_RDWR;
    }

    fd = open(file, flags, 0666);

    if (fd < 0)
	return NULL;
    else
	return fdopen(fd, mode);
}