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.3 2005/03/29 19:26:20 joerg 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/types.h>
  68 #include <sys/mman.h>
  69 #include <sys/param.h>
  70 #include <sys/select.h>
  71 #include <sys/signalvar.h>
  72 #include <sys/socket.h>
  73 #include <sys/stat.h>
  74 #include <sys/time.h>
  75 #include <sys/uio.h>
  76 #include <sys/wait.h>
  77
  78 #include <machine/tls.h>
  79
  80 #include <aio.h>
  81 #include <dirent.h>
  82 #include <errno.h>
  83 #include <fcntl.h>
  84 #include <poll.h>
  85 #include <signal.h>
  86 #include <stdarg.h>
  87 #include <stdio.h>
  88 #include <stdlib.h>
  89 #include <string.h>
  90 #include <termios.h>
  91 #include <unistd.h>
  92 #include <pthread.h>
  93
  94 #include "thr_private.h"
  95
  96 extern int __creat(const char *, mode_t);
  97 extern int __pause(void);
  98 extern int __pselect(int count, fd_set *rfds, fd_set *wfds, fd_set *efds,
  99                 const struct timespec *timo, const sigset_t *mask);
 100 extern unsigned int __sleep(unsigned int);
 101 extern int __system(const char *);
 102 extern int __tcdrain(int);
 103 extern pid_t __wait(int *);
 104 extern pid_t __sys_wait4(pid_t, int *, int, struct rusage *);
 105 extern pid_t __waitpid(pid_t, int *, int);
 106
 107 __weak_reference(__accept, accept);
 108 int
 109 __accept(int s, struct sockaddr *addr, socklen_t *addrlen)
 110 {
 111         struct pthread *curthread;
 112         int oldcancel;
 113         int ret;
 114
 115         curthread = tls_get_curthread();
 116         oldcancel = _thr_cancel_enter(curthread);
 117         ret = __sys_accept(s, addr, addrlen);
 118         _thr_cancel_leave(curthread, oldcancel);
 119
 120         return (ret);
 121 }
 122
 123 __weak_reference(_aio_suspend, aio_suspend);
 124
 125 int
 126 _aio_suspend(const struct aiocb * const iocbs[], int niocb, const struct
 127     timespec *timeout)
 128 {
 129         struct pthread *curthread = tls_get_curthread();
 130         int oldcancel;
 131         int ret;
 132
 133         oldcancel = _thr_cancel_enter(curthread);
 134         ret = __sys_aio_suspend(iocbs, niocb, timeout);
 135         _thr_cancel_leave(curthread, oldcancel);
 136
 137         return (ret);
 138 }
 139
 140 __weak_reference(__close, close);
 141
 142 int
 143 __close(int fd)
 144 {
 145         struct pthread  *curthread = tls_get_curthread();
 146         int     oldcancel;
 147         int     ret;
 148
 149         oldcancel = _thr_cancel_enter(curthread);
 150         ret = __sys_close(fd);
 151         _thr_cancel_leave(curthread, oldcancel);
 152
 153         return (ret);
 154 }
 155
 156 __weak_reference(__connect, connect);
 157
 158 int
 159 __connect(int fd, const struct sockaddr *name, socklen_t namelen)
 160 {
 161         struct pthread *curthread = tls_get_curthread();
 162         int oldcancel;
 163         int ret;
 164
 165         curthread = tls_get_curthread();
 166         oldcancel = _thr_cancel_enter(curthread);
 167         ret = __sys_connect(fd, name, namelen);
 168         _thr_cancel_leave(curthread, oldcancel);
 169
 170         return (ret);
 171 }
 172
 173 __weak_reference(___creat, creat);
 174
 175 int
 176 ___creat(const char *path, mode_t mode)
 177 {
 178         struct pthread *curthread = tls_get_curthread();
 179         int oldcancel;
 180         int ret;
 181
 182         oldcancel = _thr_cancel_enter(curthread);
 183         ret = __creat(path, mode);
 184         _thr_cancel_leave(curthread, oldcancel);
 185
 186         return ret;
 187 }
 188
 189 __weak_reference(__fcntl, fcntl);
 190
 191 int
 192 __fcntl(int fd, int cmd,...)
 193 {
 194         struct pthread *curthread = tls_get_curthread();
 195         int     oldcancel;
 196         int     ret;
 197         va_list ap;
 198
 199         oldcancel = _thr_cancel_enter(curthread);
 200
 201         va_start(ap, cmd);
 202         switch (cmd) {
 203         case F_DUPFD:
 204                 ret = __sys_fcntl(fd, cmd, va_arg(ap, int));
 205                 break;
 206         case F_SETFD:
 207         case F_SETFL:
 208                 ret = __sys_fcntl(fd, cmd, va_arg(ap, int));
 209                 break;
 210         case F_GETFD:
 211         case F_GETFL:
 212                 ret = __sys_fcntl(fd, cmd);
 213                 break;
 214         default:
 215                 ret = __sys_fcntl(fd, cmd, va_arg(ap, void *));
 216         }
 217         va_end(ap);
 218
 219         _thr_cancel_leave(curthread, oldcancel);
 220
 221         return (ret);
 222 }
 223
 224 __weak_reference(__fsync, fsync);
 225
 226 int
 227 __fsync(int fd)
 228 {
 229         struct pthread *curthread = tls_get_curthread();
 230         int     oldcancel;
 231         int     ret;
 232
 233         oldcancel = _thr_cancel_enter(curthread);
 234         ret = __sys_fsync(fd);
 235         _thr_cancel_leave(curthread, oldcancel);
 236
 237         return (ret);
 238 }
 239
 240 __weak_reference(__msync, msync);
 241
 242 int
 243 __msync(void *addr, size_t len, int flags)
 244 {
 245         struct pthread *curthread = tls_get_curthread();
 246         int     oldcancel;
 247         int     ret;
 248
 249         oldcancel = _thr_cancel_enter(curthread);
 250         ret = __sys_msync(addr, len, flags);
 251         _thr_cancel_leave(curthread, oldcancel);
 252
 253         return ret;
 254 }
 255
 256 __weak_reference(__nanosleep, nanosleep);
 257
 258 int
 259 __nanosleep(const struct timespec *time_to_sleep,
 260     struct timespec *time_remaining)
 261 {
 262         struct pthread *curthread = tls_get_curthread();
 263         int             oldcancel;
 264         int             ret;
 265
 266         oldcancel = _thr_cancel_enter(curthread);
 267         ret = __sys_nanosleep(time_to_sleep, time_remaining);
 268         _thr_cancel_leave(curthread, oldcancel);
 269
 270         return (ret);
 271 }
 272
 273 __weak_reference(___open, open);
 274
 275 int
 276 ___open(const char *path, int flags,...)
 277 {
 278         struct pthread *curthread = tls_get_curthread();
 279         int     oldcancel;
 280         int     ret;
 281         int     mode = 0;
 282         va_list ap;
 283
 284         oldcancel = _thr_cancel_enter(curthread);
 285
 286         /* Check if the file is being created: */
 287         if (flags & O_CREAT) {
 288                 /* Get the creation mode: */
 289                 va_start(ap, flags);
 290                 mode = va_arg(ap, int);
 291                 va_end(ap);
 292         }
 293
 294         ret = __sys_open(path, flags, mode);
 295
 296         _thr_cancel_leave(curthread, oldcancel);
 297
 298         return ret;
 299 }
 300
 301 __weak_reference(_pause, pause);
 302
 303 int
 304 _pause(void)
 305 {
 306         struct pthread *curthread = tls_get_curthread();
 307         int     oldcancel;
 308         int     ret;
 309
 310         oldcancel = _thr_cancel_enter(curthread);
 311         ret = __pause();
 312         _thr_cancel_leave(curthread, oldcancel);
 313
 314         return ret;
 315 }
 316
 317 __weak_reference(__poll, poll);
 318
 319 int
 320 __poll(struct pollfd *fds, unsigned int nfds, int timeout)
 321 {
 322         struct pthread *curthread = tls_get_curthread();
 323         int oldcancel;
 324         int ret;
 325
 326         oldcancel = _thr_cancel_enter(curthread);
 327         ret = __sys_poll(fds, nfds, timeout);
 328         _thr_cancel_leave(curthread, oldcancel);
 329
 330         return ret;
 331 }
 332
 333 #if 0
 334 __weak_reference(_pselect, pselect);
 335
 336 int
 337 _pselect(int count, fd_set *rfds, fd_set *wfds, fd_set *efds,
 338         const struct timespec *timo, const sigset_t *mask)
 339 {
 340         struct pthread *curthread = tls_get_curthread();
 341         int oldcancel;
 342         int ret;
 343
 344         oldcancel = _thr_cancel_enter(curthread);
 345         ret = __pselect(count, rfds, wfds, efds, timo, mask);
 346         _thr_cancel_leave(curthread, oldcancel);
 347
 348         return (ret);
 349 }
 350 #endif
 351
 352 __weak_reference(_raise, raise);
 353
 354 int
 355 _raise(int sig)
 356 {
 357         int ret;
 358
 359         if (!_thr_isthreaded())
 360                 ret = kill(getpid(), sig);
 361         else {
 362                 ret = pthread_kill(pthread_self(), sig);
 363                 if (ret != 0) {
 364                         errno = ret;
 365                         ret = -1;
 366                 }
 367         }
 368         return (ret);
 369 }
 370
 371 __weak_reference(__read, read);
 372
 373 ssize_t
 374 __read(int fd, void *buf, size_t nbytes)
 375 {
 376         struct pthread *curthread = tls_get_curthread();
 377         int oldcancel;
 378         ssize_t ret;
 379
 380         oldcancel = _thr_cancel_enter(curthread);
 381         ret = __sys_read(fd, buf, nbytes);
 382         _thr_cancel_leave(curthread, oldcancel);
 383
 384         return ret;
 385 }
 386
 387 __weak_reference(__readv, readv);
 388
 389 ssize_t
 390 __readv(int fd, const struct iovec *iov, int iovcnt)
 391 {
 392         struct pthread *curthread = tls_get_curthread();
 393         int oldcancel;
 394         ssize_t ret;
 395
 396         oldcancel = _thr_cancel_enter(curthread);
 397         ret = __sys_readv(fd, iov, iovcnt);
 398         _thr_cancel_leave(curthread, oldcancel);
 399
 400         return ret;
 401 }
 402
 403 __weak_reference(__recvfrom, recvfrom);
 404
 405 ssize_t
 406 __recvfrom(int s, void *b, size_t l, int f, struct sockaddr *from,
 407     socklen_t *fl)
 408 {
 409         struct pthread *curthread = tls_get_curthread();
 410         int oldcancel;
 411         ssize_t ret;
 412
 413         oldcancel = _thr_cancel_enter(curthread);
 414         ret = __sys_recvfrom(s, b, l, f, from, fl);
 415         _thr_cancel_leave(curthread, oldcancel);
 416         return (ret);
 417 }
 418
 419 __weak_reference(__recvmsg, recvmsg);
 420
 421 ssize_t
 422 __recvmsg(int s, struct msghdr *m, int f)
 423 {
 424         struct pthread *curthread = tls_get_curthread();
 425         ssize_t ret;
 426         int oldcancel;
 427
 428         oldcancel = _thr_cancel_enter(curthread);
 429         ret = __sys_recvmsg(s, m, f);
 430         _thr_cancel_leave(curthread, oldcancel);
 431         return (ret);
 432 }
 433
 434 __weak_reference(__select, select);
 435
 436 int
 437 __select(int numfds, fd_set *readfds, fd_set *writefds, fd_set *exceptfds,
 438         struct timeval *timeout)
 439 {
 440         struct pthread *curthread = tls_get_curthread();
 441         int oldcancel;
 442         int ret;
 443
 444         oldcancel = _thr_cancel_enter(curthread);
 445         ret = __sys_select(numfds, readfds, writefds, exceptfds, timeout);
 446         _thr_cancel_leave(curthread, oldcancel);
 447         return ret;
 448 }
 449
 450 __weak_reference(__sendmsg, sendmsg);
 451
 452 ssize_t
 453 __sendmsg(int s, const struct msghdr *m, int f)
 454 {
 455         struct pthread *curthread = tls_get_curthread();
 456         ssize_t ret;
 457         int oldcancel;
 458
 459         oldcancel = _thr_cancel_enter(curthread);
 460         ret = __sys_sendmsg(s, m, f);
 461         _thr_cancel_leave(curthread, oldcancel);
 462         return (ret);
 463 }
 464
 465 __weak_reference(__sendto, sendto);
 466
 467 ssize_t
 468 __sendto(int s, const void *m, size_t l, int f, const struct sockaddr *t,
 469     socklen_t tl)
 470 {
 471         struct pthread *curthread = tls_get_curthread();
 472         ssize_t ret;
 473         int oldcancel;
 474
 475         oldcancel = _thr_cancel_enter(curthread);
 476         ret = __sys_sendto(s, m, l, f, t, tl);
 477         _thr_cancel_leave(curthread, oldcancel);
 478         return (ret);
 479 }
 480
 481 unsigned int
 482 _sleep(unsigned int seconds)
 483 {
 484         struct pthread *curthread = tls_get_curthread();
 485         int             oldcancel;
 486         unsigned int    ret;
 487
 488         oldcancel = _thr_cancel_enter(curthread);
 489         ret = __sleep(seconds);
 490         _thr_cancel_leave(curthread, oldcancel);
 491
 492         return (ret);
 493 }
 494
 495 __weak_reference(_system, system);
 496
 497 int
 498 _system(const char *string)
 499 {
 500         struct pthread *curthread = tls_get_curthread();
 501         int     oldcancel;
 502         int     ret;
 503
 504         oldcancel = _thr_cancel_enter(curthread);
 505         ret = __system(string);
 506         _thr_cancel_leave(curthread, oldcancel);
 507
 508         return ret;
 509 }
 510
 511 __weak_reference(_tcdrain, tcdrain);
 512
 513 int
 514 _tcdrain(int fd)
 515 {
 516         struct pthread *curthread = tls_get_curthread();
 517         int     oldcancel;
 518         int     ret;
 519
 520         oldcancel = _thr_cancel_enter(curthread);
 521         ret = __tcdrain(fd);
 522         _thr_cancel_leave(curthread, oldcancel);
 523
 524         return (ret);
 525 }
 526
 527 __weak_reference(_vfork, vfork);
 528
 529 int
 530 _vfork(void)
 531 {
 532         return (fork());
 533 }
 534
 535 __weak_reference(_wait, wait);
 536
 537 pid_t
 538 _wait(int *istat)
 539 {
 540         struct pthread *curthread = tls_get_curthread();
 541         int     oldcancel;
 542         pid_t   ret;
 543
 544         oldcancel = _thr_cancel_enter(curthread);
 545         ret = __wait(istat);
 546         _thr_cancel_leave(curthread, oldcancel);
 547
 548         return ret;
 549 }
 550
 551 __weak_reference(__wait4, wait4);
 552
 553 pid_t
 554 __wait4(pid_t pid, int *istat, int options, struct rusage *rusage)
 555 {
 556         struct pthread *curthread = tls_get_curthread();
 557         int oldcancel;
 558         pid_t ret;
 559
 560         oldcancel = _thr_cancel_enter(curthread);
 561         ret = __sys_wait4(pid, istat, options, rusage);
 562         _thr_cancel_leave(curthread, oldcancel);
 563
 564         return ret;
 565 }
 566
 567 __weak_reference(_waitpid, waitpid);
 568
 569 pid_t
 570 _waitpid(pid_t wpid, int *status, int options)
 571 {
 572         struct pthread *curthread = tls_get_curthread();
 573         int     oldcancel;
 574         pid_t   ret;
 575
 576         oldcancel = _thr_cancel_enter(curthread);
 577         ret = __waitpid(wpid, status, options);
 578         _thr_cancel_leave(curthread, oldcancel);
 579
 580         return ret;
 581 }
 582
 583 __weak_reference(__write, write);
 584
 585 ssize_t
 586 __write(int fd, const void *buf, size_t nbytes)
 587 {
 588         struct pthread *curthread = tls_get_curthread();
 589         int     oldcancel;
 590         ssize_t ret;
 591
 592         oldcancel = _thr_cancel_enter(curthread);
 593         ret = __sys_write(fd, buf, nbytes);
 594         _thr_cancel_leave(curthread, oldcancel);
 595
 596         return ret;
 597 }
 598
 599 __weak_reference(__writev, writev);
 600
 601 ssize_t
 602 __writev(int fd, const struct iovec *iov, int iovcnt)
 603 {
 604         struct pthread *curthread = tls_get_curthread();
 605         int     oldcancel;
 606         ssize_t ret;
 607
 608         oldcancel = _thr_cancel_enter(curthread);
 609         ret = __sys_writev(fd, iov, iovcnt);
 610         _thr_cancel_leave(curthread, oldcancel);
 611
 612         return ret;
 613 }