1 /*
2  * Copyright (C) 2005 David Xu <davidxu@freebsd.org>.
3  * Copyright (c) 2003 Daniel Eischen <deischen@freebsd.org>.
4  * Copyright (C) 2000 Jason Evans <jasone@freebsd.org>.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice(s), this list of conditions and the following disclaimer as
12  *    the first lines of this file unmodified other than the possible
13  *    addition of one or more copyright notices.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice(s), this list of conditions and the following disclaimer in
16  *    the documentation and/or other materials provided with the
17  *    distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER(S) ``AS IS'' AND ANY
20  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) BE
23  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
26  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
27  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
28  * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
29  * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30  *
31  * $DragonFly: src/lib/libthread_xu/thread/thr_syscalls.c,v 1.2 2005/02/21 13:40:00 davidxu Exp $
32  */
33 
34 /*
35  * Copyright (c) 1995-1998 John Birrell <jb@cimlogic.com.au>
36  * All rights reserved.
37  *
38  * Redistribution and use in source and binary forms, with or without
39  * modification, are permitted provided that the following conditions
40  * are met:
41  * 1. Redistributions of source code must retain the above copyright
42  *    notice, this list of conditions and the following disclaimer.
43  * 2. Redistributions in binary form must reproduce the above copyright
44  *    notice, this list of conditions and the following disclaimer in the
45  *    documentation and/or other materials provided with the distribution.
46  * 3. All advertising materials mentioning features or use of this software
47  *    must display the following acknowledgement:
48  *	This product includes software developed by John Birrell.
49  * 4. Neither the name of the author nor the names of any co-contributors
50  *    may be used to endorse or promote products derived from this software
51  *    without specific prior written permission.
52  *
53  * THIS SOFTWARE IS PROVIDED BY JOHN BIRRELL AND CONTRIBUTORS ``AS IS'' AND
54  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
55  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
56  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
57  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
58  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
59  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
60  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
61  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
62  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
63  * SUCH DAMAGE.
64  *
65  */
66 
67 #include <sys/cdefs.h>
68 #include <sys/types.h>
69 #include <sys/mman.h>
70 #include <sys/param.h>
71 #include <sys/select.h>
72 #include <sys/signalvar.h>
73 #include <sys/socket.h>
74 #include <sys/stat.h>
75 #include <sys/time.h>
76 #include <sys/uio.h>
77 #include <sys/wait.h>
78 #include <aio.h>
79 #include <dirent.h>
80 #include <errno.h>
81 #include <fcntl.h>
82 #include <poll.h>
83 #include <signal.h>
84 #include <stdarg.h>
85 #include <stdio.h>
86 #include <stdlib.h>
87 #include <string.h>
88 #include <termios.h>
89 #include <unistd.h>
90 #include <pthread.h>
91 
92 #include "thr_private.h"
93 
94 extern int __creat(const char *, mode_t);
95 extern int __pause(void);
96 extern int __pselect(int count, fd_set *rfds, fd_set *wfds, fd_set *efds,
97 		const struct timespec *timo, const sigset_t *mask);
98 extern unsigned int __sleep(unsigned int);
99 extern int __system(const char *);
100 extern int __tcdrain(int);
101 extern pid_t __wait(int *);
102 extern pid_t __sys_wait4(pid_t, int *, int, struct rusage *);
103 extern pid_t __waitpid(pid_t, int *, int);
104 
105 __weak_reference(__accept, accept);
106 int
107 __accept(int s, struct sockaddr *addr, socklen_t *addrlen)
108 {
109 	struct pthread *curthread;
110 	int oldcancel;
111 	int ret;
112 
113 	curthread = _get_curthread();
114 	oldcancel = _thr_cancel_enter(curthread);
115 	ret = __sys_accept(s, addr, addrlen);
116 	_thr_cancel_leave(curthread, oldcancel);
117 
118  	return (ret);
119 }
120 
121 __weak_reference(_aio_suspend, aio_suspend);
122 
123 int
124 _aio_suspend(const struct aiocb * const iocbs[], int niocb, const struct
125     timespec *timeout)
126 {
127 	struct pthread *curthread = _get_curthread();
128 	int oldcancel;
129 	int ret;
130 
131 	oldcancel = _thr_cancel_enter(curthread);
132 	ret = __sys_aio_suspend(iocbs, niocb, timeout);
133 	_thr_cancel_leave(curthread, oldcancel);
134 
135 	return (ret);
136 }
137 
138 __weak_reference(__close, close);
139 
140 int
141 __close(int fd)
142 {
143 	struct pthread	*curthread = _get_curthread();
144 	int	oldcancel;
145 	int	ret;
146 
147 	oldcancel = _thr_cancel_enter(curthread);
148 	ret = __sys_close(fd);
149 	_thr_cancel_leave(curthread, oldcancel);
150 
151 	return (ret);
152 }
153 
154 __weak_reference(__connect, connect);
155 
156 int
157 __connect(int fd, const struct sockaddr *name, socklen_t namelen)
158 {
159 	struct pthread *curthread = _get_curthread();
160 	int oldcancel;
161 	int ret;
162 
163 	curthread = _get_curthread();
164 	oldcancel = _thr_cancel_enter(curthread);
165 	ret = __sys_connect(fd, name, namelen);
166 	_thr_cancel_leave(curthread, oldcancel);
167 
168  	return (ret);
169 }
170 
171 __weak_reference(___creat, creat);
172 
173 int
174 ___creat(const char *path, mode_t mode)
175 {
176 	struct pthread *curthread = _get_curthread();
177 	int oldcancel;
178 	int ret;
179 
180 	oldcancel = _thr_cancel_enter(curthread);
181 	ret = __creat(path, mode);
182 	_thr_cancel_leave(curthread, oldcancel);
183 
184 	return ret;
185 }
186 
187 __weak_reference(__fcntl, fcntl);
188 
189 int
190 __fcntl(int fd, int cmd,...)
191 {
192 	struct pthread *curthread = _get_curthread();
193 	int	oldcancel;
194 	int	ret;
195 	va_list	ap;
196 
197 	oldcancel = _thr_cancel_enter(curthread);
198 
199 	va_start(ap, cmd);
200 	switch (cmd) {
201 	case F_DUPFD:
202 		ret = __sys_fcntl(fd, cmd, va_arg(ap, int));
203 		break;
204 	case F_SETFD:
205 	case F_SETFL:
206 		ret = __sys_fcntl(fd, cmd, va_arg(ap, int));
207 		break;
208 	case F_GETFD:
209 	case F_GETFL:
210 		ret = __sys_fcntl(fd, cmd);
211 		break;
212 	default:
213 		ret = __sys_fcntl(fd, cmd, va_arg(ap, void *));
214 	}
215 	va_end(ap);
216 
217 	_thr_cancel_leave(curthread, oldcancel);
218 
219 	return (ret);
220 }
221 
222 __weak_reference(__fsync, fsync);
223 
224 int
225 __fsync(int fd)
226 {
227 	struct pthread *curthread = _get_curthread();
228 	int	oldcancel;
229 	int	ret;
230 
231 	oldcancel = _thr_cancel_enter(curthread);
232 	ret = __sys_fsync(fd);
233 	_thr_cancel_leave(curthread, oldcancel);
234 
235 	return (ret);
236 }
237 
238 __weak_reference(__msync, msync);
239 
240 int
241 __msync(void *addr, size_t len, int flags)
242 {
243 	struct pthread *curthread = _get_curthread();
244 	int	oldcancel;
245 	int	ret;
246 
247 	oldcancel = _thr_cancel_enter(curthread);
248 	ret = __sys_msync(addr, len, flags);
249 	_thr_cancel_leave(curthread, oldcancel);
250 
251 	return ret;
252 }
253 
254 __weak_reference(__nanosleep, nanosleep);
255 
256 int
257 __nanosleep(const struct timespec *time_to_sleep,
258     struct timespec *time_remaining)
259 {
260 	struct pthread *curthread = _get_curthread();
261 	int		oldcancel;
262 	int		ret;
263 
264 	oldcancel = _thr_cancel_enter(curthread);
265 	ret = __sys_nanosleep(time_to_sleep, time_remaining);
266 	_thr_cancel_leave(curthread, oldcancel);
267 
268 	return (ret);
269 }
270 
271 __weak_reference(___open, open);
272 
273 int
274 ___open(const char *path, int flags,...)
275 {
276 	struct pthread *curthread = _get_curthread();
277 	int	oldcancel;
278 	int	ret;
279 	int	mode = 0;
280 	va_list	ap;
281 
282 	oldcancel = _thr_cancel_enter(curthread);
283 
284 	/* Check if the file is being created: */
285 	if (flags & O_CREAT) {
286 		/* Get the creation mode: */
287 		va_start(ap, flags);
288 		mode = va_arg(ap, int);
289 		va_end(ap);
290 	}
291 
292 	ret = __sys_open(path, flags, mode);
293 
294 	_thr_cancel_leave(curthread, oldcancel);
295 
296 	return ret;
297 }
298 
299 __weak_reference(_pause, pause);
300 
301 int
302 _pause(void)
303 {
304 	struct pthread *curthread = _get_curthread();
305 	int	oldcancel;
306 	int	ret;
307 
308 	oldcancel = _thr_cancel_enter(curthread);
309 	ret = __pause();
310 	_thr_cancel_leave(curthread, oldcancel);
311 
312 	return ret;
313 }
314 
315 __weak_reference(__poll, poll);
316 
317 int
318 __poll(struct pollfd *fds, unsigned int nfds, int timeout)
319 {
320 	struct pthread *curthread = _get_curthread();
321 	int oldcancel;
322 	int ret;
323 
324 	oldcancel = _thr_cancel_enter(curthread);
325 	ret = __sys_poll(fds, nfds, timeout);
326 	_thr_cancel_leave(curthread, oldcancel);
327 
328 	return ret;
329 }
330 
331 #if 0
332 __weak_reference(_pselect, pselect);
333 
334 int
335 _pselect(int count, fd_set *rfds, fd_set *wfds, fd_set *efds,
336 	const struct timespec *timo, const sigset_t *mask)
337 {
338 	struct pthread *curthread = _get_curthread();
339 	int oldcancel;
340 	int ret;
341 
342 	oldcancel = _thr_cancel_enter(curthread);
343 	ret = __pselect(count, rfds, wfds, efds, timo, mask);
344 	_thr_cancel_leave(curthread, oldcancel);
345 
346 	return (ret);
347 }
348 #endif
349 
350 __weak_reference(_raise, raise);
351 
352 int
353 _raise(int sig)
354 {
355 	int ret;
356 
357 	if (!_thr_isthreaded())
358 		ret = kill(getpid(), sig);
359 	else {
360 		ret = pthread_kill(pthread_self(), sig);
361 		if (ret != 0) {
362 			errno = ret;
363 			ret = -1;
364 		}
365 	}
366 	return (ret);
367 }
368 
369 __weak_reference(__read, read);
370 
371 ssize_t
372 __read(int fd, void *buf, size_t nbytes)
373 {
374 	struct pthread *curthread = _get_curthread();
375 	int oldcancel;
376 	ssize_t	ret;
377 
378 	oldcancel = _thr_cancel_enter(curthread);
379 	ret = __sys_read(fd, buf, nbytes);
380 	_thr_cancel_leave(curthread, oldcancel);
381 
382 	return ret;
383 }
384 
385 __weak_reference(__readv, readv);
386 
387 ssize_t
388 __readv(int fd, const struct iovec *iov, int iovcnt)
389 {
390 	struct pthread *curthread = _get_curthread();
391 	int oldcancel;
392 	ssize_t ret;
393 
394 	oldcancel = _thr_cancel_enter(curthread);
395 	ret = __sys_readv(fd, iov, iovcnt);
396 	_thr_cancel_leave(curthread, oldcancel);
397 
398 	return ret;
399 }
400 
401 __weak_reference(__recvfrom, recvfrom);
402 
403 ssize_t
404 __recvfrom(int s, void *b, size_t l, int f, struct sockaddr *from,
405     socklen_t *fl)
406 {
407 	struct pthread *curthread = _get_curthread();
408 	int oldcancel;
409 	ssize_t ret;
410 
411 	oldcancel = _thr_cancel_enter(curthread);
412 	ret = __sys_recvfrom(s, b, l, f, from, fl);
413 	_thr_cancel_leave(curthread, oldcancel);
414 	return (ret);
415 }
416 
417 __weak_reference(__recvmsg, recvmsg);
418 
419 ssize_t
420 __recvmsg(int s, struct msghdr *m, int f)
421 {
422 	struct pthread *curthread = _get_curthread();
423 	ssize_t ret;
424 	int oldcancel;
425 
426 	oldcancel = _thr_cancel_enter(curthread);
427 	ret = __sys_recvmsg(s, m, f);
428 	_thr_cancel_leave(curthread, oldcancel);
429 	return (ret);
430 }
431 
432 __weak_reference(__select, select);
433 
434 int
435 __select(int numfds, fd_set *readfds, fd_set *writefds, fd_set *exceptfds,
436 	struct timeval *timeout)
437 {
438 	struct pthread *curthread = _get_curthread();
439 	int oldcancel;
440 	int ret;
441 
442 	oldcancel = _thr_cancel_enter(curthread);
443 	ret = __sys_select(numfds, readfds, writefds, exceptfds, timeout);
444 	_thr_cancel_leave(curthread, oldcancel);
445 	return ret;
446 }
447 
448 __weak_reference(__sendmsg, sendmsg);
449 
450 ssize_t
451 __sendmsg(int s, const struct msghdr *m, int f)
452 {
453 	struct pthread *curthread = _get_curthread();
454 	ssize_t ret;
455 	int oldcancel;
456 
457 	oldcancel = _thr_cancel_enter(curthread);
458 	ret = __sys_sendmsg(s, m, f);
459 	_thr_cancel_leave(curthread, oldcancel);
460 	return (ret);
461 }
462 
463 __weak_reference(__sendto, sendto);
464 
465 ssize_t
466 __sendto(int s, const void *m, size_t l, int f, const struct sockaddr *t,
467     socklen_t tl)
468 {
469 	struct pthread *curthread = _get_curthread();
470 	ssize_t ret;
471 	int oldcancel;
472 
473 	oldcancel = _thr_cancel_enter(curthread);
474 	ret = __sys_sendto(s, m, l, f, t, tl);
475 	_thr_cancel_leave(curthread, oldcancel);
476 	return (ret);
477 }
478 
479 unsigned int
480 _sleep(unsigned int seconds)
481 {
482 	struct pthread *curthread = _get_curthread();
483 	int		oldcancel;
484 	unsigned int	ret;
485 
486 	oldcancel = _thr_cancel_enter(curthread);
487 	ret = __sleep(seconds);
488 	_thr_cancel_leave(curthread, oldcancel);
489 
490 	return (ret);
491 }
492 
493 __weak_reference(_system, system);
494 
495 int
496 _system(const char *string)
497 {
498 	struct pthread *curthread = _get_curthread();
499 	int	oldcancel;
500 	int	ret;
501 
502 	oldcancel = _thr_cancel_enter(curthread);
503 	ret = __system(string);
504 	_thr_cancel_leave(curthread, oldcancel);
505 
506 	return ret;
507 }
508 
509 __weak_reference(_tcdrain, tcdrain);
510 
511 int
512 _tcdrain(int fd)
513 {
514 	struct pthread *curthread = _get_curthread();
515 	int	oldcancel;
516 	int	ret;
517 
518 	oldcancel = _thr_cancel_enter(curthread);
519 	ret = __tcdrain(fd);
520 	_thr_cancel_leave(curthread, oldcancel);
521 
522 	return (ret);
523 }
524 
525 __weak_reference(_vfork, vfork);
526 
527 int
528 _vfork(void)
529 {
530 	return (fork());
531 }
532 
533 __weak_reference(_wait, wait);
534 
535 pid_t
536 _wait(int *istat)
537 {
538 	struct pthread *curthread = _get_curthread();
539 	int	oldcancel;
540 	pid_t	ret;
541 
542 	oldcancel = _thr_cancel_enter(curthread);
543 	ret = __wait(istat);
544 	_thr_cancel_leave(curthread, oldcancel);
545 
546 	return ret;
547 }
548 
549 __weak_reference(__wait4, wait4);
550 
551 pid_t
552 __wait4(pid_t pid, int *istat, int options, struct rusage *rusage)
553 {
554 	struct pthread *curthread = _get_curthread();
555 	int oldcancel;
556 	pid_t ret;
557 
558 	oldcancel = _thr_cancel_enter(curthread);
559 	ret = __sys_wait4(pid, istat, options, rusage);
560 	_thr_cancel_leave(curthread, oldcancel);
561 
562 	return ret;
563 }
564 
565 __weak_reference(_waitpid, waitpid);
566 
567 pid_t
568 _waitpid(pid_t wpid, int *status, int options)
569 {
570 	struct pthread *curthread = _get_curthread();
571 	int	oldcancel;
572 	pid_t	ret;
573 
574 	oldcancel = _thr_cancel_enter(curthread);
575 	ret = __waitpid(wpid, status, options);
576 	_thr_cancel_leave(curthread, oldcancel);
577 
578 	return ret;
579 }
580 
581 __weak_reference(__write, write);
582 
583 ssize_t
584 __write(int fd, const void *buf, size_t nbytes)
585 {
586 	struct pthread *curthread = _get_curthread();
587 	int	oldcancel;
588 	ssize_t	ret;
589 
590 	oldcancel = _thr_cancel_enter(curthread);
591 	ret = __sys_write(fd, buf, nbytes);
592 	_thr_cancel_leave(curthread, oldcancel);
593 
594 	return ret;
595 }
596 
597 __weak_reference(__writev, writev);
598 
599 ssize_t
600 __writev(int fd, const struct iovec *iov, int iovcnt)
601 {
602 	struct pthread *curthread = _get_curthread();
603 	int	oldcancel;
604 	ssize_t ret;
605 
606 	oldcancel = _thr_cancel_enter(curthread);
607 	ret = __sys_writev(fd, iov, iovcnt);
608 	_thr_cancel_leave(curthread, oldcancel);
609 
610 	return ret;
611 }
612