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.4 2009/02/13 14:52:05 haraldkipp 00037 * Include memdebug.h for heap management debugging support. 00038 * 00039 * Revision 1.3 2008/08/11 06:59:39 haraldkipp 00040 * BSD types replaced by stdint types (feature request #1282721). 00041 * 00042 * Revision 1.2 2004/09/08 10:19:05 haraldkipp 00043 * Todo: We need a better check for stdio channels! 00044 * 00045 * Revision 1.1.1.1 2003/05/09 14:40:24 haraldkipp 00046 * Initial using 3.2.1 00047 * 00048 * Revision 1.1 2003/02/04 17:49:04 harald 00049 * *** empty log message *** 00050 * 00051 */ 00052 00053 00054 #include "nut_io.h" 00055 00056 #include <errno.h> 00057 #include <io.h> 00058 #include <stdlib.h> 00059 #include <memdebug.h> 00060 00065 00076 int fclose(FILE * stream) 00077 { 00078 int rc = EOF; 00079 uint_fast8_t i; 00080 00081 /* 00082 * Search the list first to detect bad stream pointer. 00083 */ 00084 if (stream == 0) { 00085 errno = EBADF; 00086 return EOF; 00087 } 00088 for (i = 0; __iob[i] != stream;) { 00089 if (++i >= FOPEN_MAX) { 00090 errno = EBADF; 00091 return EOF; 00092 } 00093 } 00094 00095 /* 00096 * Ignore unopened standard streams. 00097 */ 00098 //if ((void *) stream < RAMSTART) 00099 // return 0; 00100 00101 /* 00102 * Close the file or device. 00103 */ 00104 if (_close(stream->iob_fd) == 0) 00105 rc = 0; 00106 free(stream); 00107 __iob[i] = 0; 00108 00109 return rc; 00110 } 00111