1*479ab7f0SSascha Wildner /* $FreeBSD: src/lib/libstand/close.c,v 1.1.1.1.6.1 2000/09/10 01:32:06 ps Exp $ */
2*479ab7f0SSascha Wildner /* $DragonFly: src/lib/libstand/close.c,v 1.2 2003/06/17 04:26:51 dillon Exp $ */
3*479ab7f0SSascha Wildner /* $NetBSD: close.c,v 1.7 1997/01/22 00:38:09 cgd Exp $ */
4*479ab7f0SSascha Wildner
5*479ab7f0SSascha Wildner /*-
6*479ab7f0SSascha Wildner * Copyright (c) 1993
7*479ab7f0SSascha Wildner * The Regents of the University of California. All rights reserved.
8*479ab7f0SSascha Wildner *
9*479ab7f0SSascha Wildner * This code is derived from software contributed to Berkeley by
10*479ab7f0SSascha Wildner * The Mach Operating System project at Carnegie-Mellon University.
11*479ab7f0SSascha Wildner *
12*479ab7f0SSascha Wildner * Redistribution and use in source and binary forms, with or without
13*479ab7f0SSascha Wildner * modification, are permitted provided that the following conditions
14*479ab7f0SSascha Wildner * are met:
15*479ab7f0SSascha Wildner * 1. Redistributions of source code must retain the above copyright
16*479ab7f0SSascha Wildner * notice, this list of conditions and the following disclaimer.
17*479ab7f0SSascha Wildner * 2. Redistributions in binary form must reproduce the above copyright
18*479ab7f0SSascha Wildner * notice, this list of conditions and the following disclaimer in the
19*479ab7f0SSascha Wildner * documentation and/or other materials provided with the distribution.
20*479ab7f0SSascha Wildner * 3. Neither the name of the University nor the names of its contributors
21*479ab7f0SSascha Wildner * may be used to endorse or promote products derived from this software
22*479ab7f0SSascha Wildner * without specific prior written permission.
23*479ab7f0SSascha Wildner *
24*479ab7f0SSascha Wildner * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25*479ab7f0SSascha Wildner * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26*479ab7f0SSascha Wildner * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27*479ab7f0SSascha Wildner * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28*479ab7f0SSascha Wildner * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29*479ab7f0SSascha Wildner * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30*479ab7f0SSascha Wildner * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31*479ab7f0SSascha Wildner * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32*479ab7f0SSascha Wildner * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33*479ab7f0SSascha Wildner * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34*479ab7f0SSascha Wildner * SUCH DAMAGE.
35*479ab7f0SSascha Wildner *
36*479ab7f0SSascha Wildner * @(#)close.c 8.1 (Berkeley) 6/11/93
37*479ab7f0SSascha Wildner *
38*479ab7f0SSascha Wildner *
39*479ab7f0SSascha Wildner * Copyright (c) 1989, 1990, 1991 Carnegie Mellon University
40*479ab7f0SSascha Wildner * All Rights Reserved.
41*479ab7f0SSascha Wildner *
42*479ab7f0SSascha Wildner * Author: Alessandro Forin
43*479ab7f0SSascha Wildner *
44*479ab7f0SSascha Wildner * Permission to use, copy, modify and distribute this software and its
45*479ab7f0SSascha Wildner * documentation is hereby granted, provided that both the copyright
46*479ab7f0SSascha Wildner * notice and this permission notice appear in all copies of the
47*479ab7f0SSascha Wildner * software, derivative works or modified versions, and any portions
48*479ab7f0SSascha Wildner * thereof, and that both notices appear in supporting documentation.
49*479ab7f0SSascha Wildner *
50*479ab7f0SSascha Wildner * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
51*479ab7f0SSascha Wildner * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
52*479ab7f0SSascha Wildner * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
53*479ab7f0SSascha Wildner *
54*479ab7f0SSascha Wildner * Carnegie Mellon requests users of this software to return to
55*479ab7f0SSascha Wildner *
56*479ab7f0SSascha Wildner * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU
57*479ab7f0SSascha Wildner * School of Computer Science
58*479ab7f0SSascha Wildner * Carnegie Mellon University
59*479ab7f0SSascha Wildner * Pittsburgh PA 15213-3890
60*479ab7f0SSascha Wildner *
61*479ab7f0SSascha Wildner * any improvements or extensions that they make and grant Carnegie the
62*479ab7f0SSascha Wildner * rights to redistribute these changes.
63*479ab7f0SSascha Wildner */
64*479ab7f0SSascha Wildner
65*479ab7f0SSascha Wildner #include "stand.h"
66*479ab7f0SSascha Wildner
67*479ab7f0SSascha Wildner int
close(int fd)68*479ab7f0SSascha Wildner close(int fd)
69*479ab7f0SSascha Wildner {
70*479ab7f0SSascha Wildner struct open_file *f = &files[fd];
71*479ab7f0SSascha Wildner int err1 = 0, err2 = 0;
72*479ab7f0SSascha Wildner
73*479ab7f0SSascha Wildner if ((unsigned)fd >= SOPEN_MAX || f->f_flags == 0) {
74*479ab7f0SSascha Wildner errno = EBADF;
75*479ab7f0SSascha Wildner return (-1);
76*479ab7f0SSascha Wildner }
77*479ab7f0SSascha Wildner if (f->f_rabuf != NULL) {
78*479ab7f0SSascha Wildner free(f->f_rabuf);
79*479ab7f0SSascha Wildner f->f_rabuf = NULL;
80*479ab7f0SSascha Wildner }
81*479ab7f0SSascha Wildner if (!(f->f_flags & F_RAW) && f->f_ops)
82*479ab7f0SSascha Wildner err1 = (f->f_ops->fo_close)(f);
83*479ab7f0SSascha Wildner if (f->f_dev)
84*479ab7f0SSascha Wildner err2 = (f->f_dev->dv_close)(f);
85*479ab7f0SSascha Wildner if (f->f_devdata != NULL)
86*479ab7f0SSascha Wildner devclose(f);
87*479ab7f0SSascha Wildner f->f_flags = 0;
88*479ab7f0SSascha Wildner if (err1) {
89*479ab7f0SSascha Wildner errno = err1;
90*479ab7f0SSascha Wildner return (-1);
91*479ab7f0SSascha Wildner }
92*479ab7f0SSascha Wildner if (err2) {
93*479ab7f0SSascha Wildner errno = err2;
94*479ab7f0SSascha Wildner return (-1);
95*479ab7f0SSascha Wildner }
96*479ab7f0SSascha Wildner return (0);
97*479ab7f0SSascha Wildner }
98