freopen.c

Go to the documentation of this file.
00001 /*
00002  * Copyright (C) 2001-2003 by egnite Software GmbH. All rights reserved.
00003  *
00004  * Redistribution and use in source and binary forms, with or without
00005  * modification, are permitted provided that the following conditions
00006  * are met:
00007  *
00008  * 1. Redistributions of source code must retain the above copyright
00009  *    notice, this list of conditions and the following disclaimer.
00010  * 2. Redistributions in binary form must reproduce the above copyright
00011  *    notice, this list of conditions and the following disclaimer in the
00012  *    documentation and/or other materials provided with the distribution.
00013  * 3. Neither the name of the copyright holders nor the names of
00014  *    contributors may be used to endorse or promote products derived
00015  *    from this software without specific prior written permission.
00016  *
00017  * THIS SOFTWARE IS PROVIDED BY EGNITE SOFTWARE GMBH AND CONTRIBUTORS
00018  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
00019  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
00020  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL EGNITE
00021  * SOFTWARE GMBH OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
00022  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
00023  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
00024  * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
00025  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
00026  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
00027  * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
00028  * SUCH DAMAGE.
00029  *
00030  * For additional information see http://www.ethernut.de/
00031  *
00032  */
00033 
00034 /*
00035  * $Log: freopen.c,v $
00036  * Revision 1.4  2008/08/11 06:59:40  haraldkipp
00037  * BSD types replaced by stdint types (feature request #1282721).
00038  *
00039  * Revision 1.3  2004/09/08 10:19:05  haraldkipp
00040  * Todo: We need a better check for stdio channels!
00041  *
00042  * Revision 1.2  2004/03/16 16:48:27  haraldkipp
00043  * Added Jan Dubiec's H8/300 port.
00044  *
00045  * Revision 1.1.1.1  2003/05/09 14:40:27  haraldkipp
00046  * Initial using 3.2.1
00047  *
00048  * Revision 1.1  2003/02/04 17:49:05  harald
00049  * *** empty log message ***
00050  *
00051  */
00052 
00053 #include "nut_io.h"
00054 
00055 #include <errno.h>
00056 #include <io.h>
00057 #include <fcntl.h>
00058 #include <stdlib.h>
00059 
00064 
00085 FILE *freopen(CONST char *name, CONST char *mode, FILE * stream)
00086 {
00087     int mflags = _O_TEXT;
00088     uint_fast8_t i;
00089 
00090     /*
00091      * Translate file mode.
00092      */
00093     if ((mflags = _fmode(mode)) == EOF)
00094         return 0;
00095 
00096     for (i = 0; __iob[i] != stream;)
00097         if (++i >= FOPEN_MAX) {
00098             errno = EBADF;
00099             return 0;
00100         }
00101 
00102     //if (stream)
00103     //    _close(stream->iob_fd);
00104     //else 
00105     if ((__iob[i] = malloc(sizeof(FILE))) == 0)
00106         return 0;
00107 
00108     if ((__iob[i]->iob_fd = _open(name, mflags)) == -1) {
00109         free(__iob[i]);
00110         if (i < 3)
00111             __iob[i] = (FILE *) ((uptr_t) (i + 1));
00112         else
00113             __iob[i] = 0;
00114         return 0;
00115     }
00116 
00117     __iob[i]->iob_mode = mflags;
00118     __iob[i]->iob_flags = 0;
00119     __iob[i]->iob_unget = 0;
00120 
00121     return __iob[i];
00122 }
00123 

© 2000-2007 by egnite Software GmbH - visit http://www.ethernut.de/