cloexec.c revision 1.2 1 1.1 elric /* $NetBSD: cloexec.c,v 1.2 2017/01/28 21:31:50 christos Exp $ */
2 1.1 elric
3 1.1 elric /*
4 1.1 elric * Copyright (c) 2008 Kungliga Tekniska Hgskolan
5 1.1 elric * (Royal Institute of Technology, Stockholm, Sweden).
6 1.1 elric * All rights reserved.
7 1.1 elric *
8 1.1 elric * Redistribution and use in source and binary forms, with or without
9 1.1 elric * modification, are permitted provided that the following conditions
10 1.1 elric * are met:
11 1.1 elric *
12 1.1 elric * 1. Redistributions of source code must retain the above copyright
13 1.1 elric * notice, this list of conditions and the following disclaimer.
14 1.1 elric *
15 1.1 elric * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 elric * notice, this list of conditions and the following disclaimer in the
17 1.1 elric * documentation and/or other materials provided with the distribution.
18 1.1 elric *
19 1.1 elric * 3. Neither the name of the Institute nor the names of its contributors
20 1.1 elric * may be used to endorse or promote products derived from this software
21 1.1 elric * without specific prior written permission.
22 1.1 elric *
23 1.1 elric * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
24 1.1 elric * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 elric * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 elric * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
27 1.1 elric * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 elric * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 elric * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 elric * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 elric * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 elric * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 elric * SUCH DAMAGE.
34 1.1 elric */
35 1.1 elric
36 1.1 elric #include <config.h>
37 1.1 elric
38 1.1 elric #include <krb5/roken.h>
39 1.1 elric
40 1.1 elric void ROKEN_LIB_FUNCTION
41 1.1 elric rk_cloexec(int fd)
42 1.1 elric {
43 1.1 elric #ifdef HAVE_FCNTL
44 1.1 elric int ret;
45 1.1 elric
46 1.1 elric ret = fcntl(fd, F_GETFD);
47 1.1 elric if (ret == -1)
48 1.1 elric return;
49 1.1 elric if (fcntl(fd, F_SETFD, ret | FD_CLOEXEC) == -1)
50 1.1 elric return;
51 1.1 elric #endif
52 1.1 elric }
53 1.1 elric
54 1.1 elric void ROKEN_LIB_FUNCTION
55 1.1 elric rk_cloexec_file(FILE *f)
56 1.1 elric {
57 1.1 elric #ifdef HAVE_FCNTL
58 1.1 elric rk_cloexec(fileno(f));
59 1.1 elric #endif
60 1.1 elric }
61 1.1 elric
62 1.1 elric void ROKEN_LIB_FUNCTION
63 1.1 elric rk_cloexec_dir(DIR * d)
64 1.1 elric {
65 1.1 elric #ifndef _WIN32
66 1.1 elric rk_cloexec(dirfd(d));
67 1.1 elric #endif
68 1.1 elric }
69 1.2 christos
70 1.2 christos void ROKEN_LIB_FUNCTION
71 1.2 christos rk_cloexec_socket(rk_socket_t s)
72 1.2 christos {
73 1.2 christos #ifndef _WIN32
74 1.2 christos rk_cloexec((int)s);
75 1.2 christos #endif
76 1.2 christos }
77 1.2 christos
78