113546Sjulian/*
235509Sjb * Copyright (c) 1995-1998 John Birrell <jb@cimlogic.com.au>
313546Sjulian * All rights reserved.
413546Sjulian *
513546Sjulian * Redistribution and use in source and binary forms, with or without
613546Sjulian * modification, are permitted provided that the following conditions
713546Sjulian * are met:
813546Sjulian * 1. Redistributions of source code must retain the above copyright
913546Sjulian *    notice, this list of conditions and the following disclaimer.
1013546Sjulian * 2. Redistributions in binary form must reproduce the above copyright
1113546Sjulian *    notice, this list of conditions and the following disclaimer in the
1213546Sjulian *    documentation and/or other materials provided with the distribution.
13165967Simp * 3. Neither the name of the author nor the names of any co-contributors
1413546Sjulian *    may be used to endorse or promote products derived from this software
1513546Sjulian *    without specific prior written permission.
1613546Sjulian *
1713546Sjulian * THIS SOFTWARE IS PROVIDED BY JOHN BIRRELL AND CONTRIBUTORS ``AS IS'' AND
1813546Sjulian * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
1913546Sjulian * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
2049439Sdeischen * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
2113546Sjulian * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
2213546Sjulian * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
2313546Sjulian * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
2413546Sjulian * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
2513546Sjulian * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
2613546Sjulian * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
2713546Sjulian * SUCH DAMAGE.
2813546Sjulian *
2950476Speter * $FreeBSD$
3013546Sjulian */
31174112Sdeischen
32174112Sdeischen#include "namespace.h"
3313546Sjulian#include <stdarg.h>
3413546Sjulian#include <fcntl.h>
35174112Sdeischen#include <pthread.h>
36113658Sdeischen#include "un-namespace.h"
37103388Smini#include "thr_private.h"
3813546Sjulian
39174112Sdeischenint __fcntl(int fd, int cmd,...);
40179434Sdfrextern int __fcntl_compat(int fd, int cmd,...);
41174112Sdeischen
4275369Sdeischen__weak_reference(__fcntl, fcntl);
4371581Sdeischen
4413546Sjulianint
4571581Sdeischen__fcntl(int fd, int cmd,...)
4656698Sjasone{
47113658Sdeischen	struct pthread *curthread = _get_curthread();
48123312Sdavidxu	int	ret, check = 1;
4956698Sjasone	va_list	ap;
5056698Sjasone
51123312Sdavidxu	_thr_cancel_enter(curthread);
5256698Sjasone
5356698Sjasone	va_start(ap, cmd);
5456698Sjasone	switch (cmd) {
55113658Sdeischen	case F_DUPFD:
56123312Sdavidxu		ret = __sys_fcntl(fd, cmd, va_arg(ap, int));
57123312Sdavidxu		/*
58123312Sdavidxu		 * To avoid possible file handle leak,
59123312Sdavidxu		 * only check cancellation point if it is failure
60123312Sdavidxu		 */
61123312Sdavidxu		check = (ret == -1);
62123312Sdavidxu		break;
63113658Sdeischen	case F_SETFD:
64113658Sdeischen	case F_SETFL:
65113658Sdeischen		ret = __sys_fcntl(fd, cmd, va_arg(ap, int));
66113658Sdeischen		break;
67113658Sdeischen	case F_GETFD:
68113658Sdeischen	case F_GETFL:
69113658Sdeischen		ret = __sys_fcntl(fd, cmd);
70113658Sdeischen		break;
71113658Sdeischen	default:
72179434Sdfr		ret = __fcntl_compat(fd, cmd, va_arg(ap, void *));
7356698Sjasone	}
7456698Sjasone	va_end(ap);
7556698Sjasone
76123312Sdavidxu	_thr_cancel_leave(curthread, check);
7756698Sjasone
78113658Sdeischen	return (ret);
7956698Sjasone}
80