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.3  2004/09/08 10:19:05  haraldkipp
00037  * Todo: We need a better check for stdio channels!
00038  *
00039  * Revision 1.2  2004/03/16 16:48:27  haraldkipp
00040  * Added Jan Dubiec's H8/300 port.
00041  *
00042  * Revision 1.1.1.1  2003/05/09 14:40:27  haraldkipp
00043  * Initial using 3.2.1
00044  *
00045  * Revision 1.1  2003/02/04 17:49:05  harald
00046  * *** empty log message ***
00047  *
00048  */
00049 
00050 #include "nut_io.h"
00051 
00052 #include <errno.h>
00053 #include <io.h>
00054 #include <fcntl.h>
00055 #include <stdlib.h>
00056 
00061 
00082 FILE *freopen(CONST char *name, CONST char *mode, FILE * stream)
00083 {
00084     int mflags = _O_TEXT;
00085     u_char i;
00086 
00087     /*
00088      * Translate file mode.
00089      */
00090     if ((mflags = _fmode(mode)) == EOF)
00091         return 0;
00092 
00093     for (i = 0; __iob[i] != stream;)
00094         if (++i >= FOPEN_MAX) {
00095             errno = EBADF;
00096             return 0;
00097         }
00098 
00099     //if (stream)
00100     //    _close(stream->iob_fd);
00101     //else 
00102     if ((__iob[i] = malloc(sizeof(FILE))) == 0)
00103         return 0;
00104 
00105     if ((__iob[i]->iob_fd = _open(name, mflags)) == -1) {
00106         free(__iob[i]);
00107         if (i < 3)
00108             __iob[i] = (FILE *) ((uptr_t) (i + 1));
00109         else
00110             __iob[i] = 0;
00111         return 0;
00112     }
00113 
00114     __iob[i]->iob_mode = mflags;
00115     __iob[i]->iob_flags = 0;
00116     __iob[i]->iob_unget = 0;
00117 
00118     return __iob[i];
00119 }
00120 

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