lib/libthread_xu/thread/thr_syscalls.c

   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 }