granicus.if.org Git - strace/blob - epoll.c

   1 /*
   2  * Copyright (c) 2004-2007 Ulrich Drepper <drepper@redhat.com>
   3  * Copyright (c) 2004 Roland McGrath <roland@redhat.com>
   4  * Copyright (c) 2005-2015 Dmitry V. Levin <ldv@altlinux.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, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  * 3. The name of the author may not be used to endorse or promote products
  16  *    derived from this software without specific prior written permission.
  17  *
  18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  28  */
  29
  30 #include "defs.h"
  31 #include <fcntl.h>
  32 #ifdef HAVE_SYS_EPOLL_H
  33 # include <sys/epoll.h>
  34 #endif
  35
  36 SYS_FUNC(epoll_create)
  37 {
  38         tprintf("%d", (int) tcp->u_arg[0]);
  39
  40         return RVAL_DECODED | RVAL_FD;
  41 }
  42
  43 #include "xlat/epollflags.h"
  44
  45 SYS_FUNC(epoll_create1)
  46 {
  47         printflags(epollflags, tcp->u_arg[0], "EPOLL_???");
  48
  49         return RVAL_DECODED | RVAL_FD;
  50 }
  51
  52 #ifdef HAVE_SYS_EPOLL_H
  53 # include "xlat/epollevents.h"
  54
  55 static void
  56 print_epoll_event(struct epoll_event *ev)
  57 {
  58         tprints("{");
  59         printflags(epollevents, ev->events, "EPOLL???");
  60         /* We cannot know what format the program uses, so print u32 and u64
  61            which will cover every value.  */
  62         tprintf(", {u32=%" PRIu32 ", u64=%" PRIu64 "}}",
  63                 ev->data.u32, ev->data.u64);
  64 }
  65 #endif
  66
  67 #include "xlat/epollctls.h"
  68
  69 SYS_FUNC(epoll_ctl)
  70 {
  71         struct epoll_event ev;
  72
  73         printfd(tcp, tcp->u_arg[0]);
  74         tprints(", ");
  75         printxval(epollctls, tcp->u_arg[1], "EPOLL_CTL_???");
  76         tprints(", ");
  77         printfd(tcp, tcp->u_arg[2]);
  78         tprints(", ");
  79 #ifdef HAVE_SYS_EPOLL_H
  80         if (EPOLL_CTL_DEL == tcp->u_arg[1])
  81                 printaddr(tcp->u_arg[3]);
  82         else if (!umove_or_printaddr(tcp, tcp->u_arg[3], &ev))
  83                 print_epoll_event(&ev);
  84 #else
  85         printaddr(tcp->u_arg[3]);
  86 #endif
  87
  88         return RVAL_DECODED;
  89 }
  90
  91 static void
  92 print_epoll_event_array(struct tcb *tcp, const long addr, const long len)
  93 {
  94 #ifdef HAVE_SYS_EPOLL_H
  95         struct epoll_event ev, *start, *cur, *end;
  96
  97         if (!len) {
  98                 tprints("[]");
  99                 return;
 100         }
 101
 102         if (umove_or_printaddr(tcp, addr, &ev))
 103                 return;
 104
 105         tprints("[");
 106         print_epoll_event(&ev);
 107
 108         start = (struct epoll_event *) addr;
 109         end = start + len;
 110         for (cur = start + 1; cur < end; ++cur) {
 111                 tprints(", ");
 112                 if (umove_or_printaddr(tcp, (long) cur, &ev))
 113                         break;
 114                 print_epoll_event(&ev);
 115         }
 116         tprints("]");
 117 #else
 118         printaddr(addr);
 119 #endif
 120 }
 121
 122 static void
 123 epoll_wait_common(struct tcb *tcp)
 124 {
 125         if (entering(tcp)) {
 126                 printfd(tcp, tcp->u_arg[0]);
 127                 tprints(", ");
 128         } else {
 129                 print_epoll_event_array(tcp, tcp->u_arg[1], tcp->u_rval);
 130                 tprintf(", %d, %d", (int) tcp->u_arg[2], (int) tcp->u_arg[3]);
 131         }
 132 }
 133
 134 SYS_FUNC(epoll_wait)
 135 {
 136         epoll_wait_common(tcp);
 137         return 0;
 138 }
 139
 140 SYS_FUNC(epoll_pwait)
 141 {
 142         epoll_wait_common(tcp);
 143         if (exiting(tcp)) {
 144                 tprints(", ");
 145                 /* NB: kernel requires arg[5] == NSIG / 8 */
 146                 print_sigset_addr_len(tcp, tcp->u_arg[4], tcp->u_arg[5]);
 147                 tprintf(", %lu", tcp->u_arg[5]);
 148         }
 149         return 0;
 150 }