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$ 00036 * Revision 1.6 2009/02/13 14:52:05 haraldkipp 00037 * Include memdebug.h for heap management debugging support. 00038 * 00039 * Revision 1.5 2009/01/17 11:26:38 haraldkipp 00040 * Getting rid of two remaining BSD types in favor of stdint. 00041 * Replaced 'u_int' by 'unsinged int' and 'uptr_t' by 'uintptr_t'. 00042 * 00043 * Revision 1.4 2008/08/11 06:59:40 haraldkipp 00044 * BSD types replaced by stdint types (feature request #1282721). 00045 * 00046 * Revision 1.3 2004/09/08 10:19:05 haraldkipp 00047 * Todo: We need a better check for stdio channels! 00048 * 00049 * Revision 1.2 2004/03/16 16:48:27 haraldkipp 00050 * Added Jan Dubiec's H8/300 port. 00051 * 00052 * Revision 1.1.1.1 2003/05/09 14:40:27 haraldkipp 00053 * Initial using 3.2.1 00054 * 00055 * Revision 1.1 2003/02/04 17:49:05 harald 00056 * *** empty log message *** 00057 * 00058 */ 00059 00060 #include "nut_io.h" 00061 00062 #include <errno.h> 00063 #include <io.h> 00064 #include <fcntl.h> 00065 #include <stdlib.h> 00066 #include <memdebug.h> 00067 00072 00093 FILE *freopen(CONST char *name, CONST char *mode, FILE * stream) 00094 { 00095 int mflags = _O_TEXT; 00096 uint_fast8_t i; 00097 00098 /* 00099 * Translate file mode. 00100 */ 00101 if ((mflags = _fmode(mode)) == EOF) 00102 return 0; 00103 00104 for (i = 0; __iob[i] != stream;) 00105 if (++i >= FOPEN_MAX) { 00106 errno = EBADF; 00107 return 0; 00108 } 00109 00110 //if (stream) 00111 // _close(stream->iob_fd); 00112 //else 00113 if ((__iob[i] = malloc(sizeof(FILE))) == 0) 00114 return 0; 00115 00116 if ((__iob[i]->iob_fd = _open(name, mflags)) == -1) { 00117 free(__iob[i]); 00118 if (i < 3) 00119 __iob[i] = (FILE *) ((uintptr_t) (i + 1)); 00120 else 00121 __iob[i] = 0; 00122 return 0; 00123 } 00124 00125 __iob[i]->iob_mode = mflags; 00126 __iob[i]->iob_flags = 0; 00127 __iob[i]->iob_unget = 0; 00128 00129 return __iob[i]; 00130 } 00131