1*9b9d2a55Sguenther /* $OpenBSD: fclose.c,v 1.10 2015/08/31 02:53:57 guenther Exp $ */
2df930be7Sderaadt /*-
3df930be7Sderaadt * Copyright (c) 1990, 1993
4df930be7Sderaadt * The Regents of the University of California. All rights reserved.
5df930be7Sderaadt *
6df930be7Sderaadt * This code is derived from software contributed to Berkeley by
7df930be7Sderaadt * Chris Torek.
8df930be7Sderaadt *
9df930be7Sderaadt * Redistribution and use in source and binary forms, with or without
10df930be7Sderaadt * modification, are permitted provided that the following conditions
11df930be7Sderaadt * are met:
12df930be7Sderaadt * 1. Redistributions of source code must retain the above copyright
13df930be7Sderaadt * notice, this list of conditions and the following disclaimer.
14df930be7Sderaadt * 2. Redistributions in binary form must reproduce the above copyright
15df930be7Sderaadt * notice, this list of conditions and the following disclaimer in the
16df930be7Sderaadt * documentation and/or other materials provided with the distribution.
176580fee3Smillert * 3. Neither the name of the University nor the names of its contributors
18df930be7Sderaadt * may be used to endorse or promote products derived from this software
19df930be7Sderaadt * without specific prior written permission.
20df930be7Sderaadt *
21df930be7Sderaadt * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22df930be7Sderaadt * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23df930be7Sderaadt * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24df930be7Sderaadt * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25df930be7Sderaadt * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26df930be7Sderaadt * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27df930be7Sderaadt * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28df930be7Sderaadt * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29df930be7Sderaadt * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30df930be7Sderaadt * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31df930be7Sderaadt * SUCH DAMAGE.
32df930be7Sderaadt */
33df930be7Sderaadt
34df930be7Sderaadt #include <errno.h>
35df930be7Sderaadt #include <stdio.h>
36df930be7Sderaadt #include <stdlib.h>
37df930be7Sderaadt #include "local.h"
38df930be7Sderaadt
39df930be7Sderaadt int
fclose(FILE * fp)404e503363Sotto fclose(FILE *fp)
41df930be7Sderaadt {
424e503363Sotto int r;
43df930be7Sderaadt
44df930be7Sderaadt if (fp->_flags == 0) { /* not open! */
45df930be7Sderaadt errno = EBADF;
46df930be7Sderaadt return (EOF);
47df930be7Sderaadt }
48c5acf43aSkurt FLOCKFILE(fp);
49c2fb3212Sespie WCIO_FREE(fp);
50df930be7Sderaadt r = fp->_flags & __SWR ? __sflush(fp) : 0;
51df930be7Sderaadt if (fp->_close != NULL && (*fp->_close)(fp->_cookie) < 0)
52df930be7Sderaadt r = EOF;
53df930be7Sderaadt if (fp->_flags & __SMBF)
54df930be7Sderaadt free((char *)fp->_bf._base);
55df930be7Sderaadt if (HASUB(fp))
56df930be7Sderaadt FREEUB(fp);
57df930be7Sderaadt if (HASLB(fp))
58df930be7Sderaadt FREELB(fp);
597ff09c5cSguenther fp->_r = fp->_w = 0; /* Mess up if reaccessed. */
60c5acf43aSkurt fp->_flags = 0; /* Release this FILE for reuse. */
61c5acf43aSkurt FUNLOCKFILE(fp);
62df930be7Sderaadt return (r);
63df930be7Sderaadt }
64*9b9d2a55Sguenther DEF_STRONG(fclose);
65