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