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

   1 /*
   2  * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
   3  * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
   4  * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
   5  * Copyright (c) 1996-2000 Wichert Akkerman <wichert@cistron.nl>
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  * 3. The name of the author may not be used to endorse or promote products
  17  *    derived from this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  20  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  21  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  22  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  23  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  24  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  25  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  26  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  27  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  28  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  29  */
  30
  31 #include "defs.h"
  32 #include <sys/stat.h>
  33 #include <sys/socket.h>
  34 #include <sys/un.h>
  35 #if defined(HAVE_SIN6_SCOPE_ID_LINUX)
  36 # define in6_addr in6_addr_libc
  37 # define ipv6_mreq ipv6_mreq_libc
  38 # define sockaddr_in6 sockaddr_in6_libc
  39 #endif
  40 #include <netinet/in.h>
  41 #ifdef HAVE_NETINET_TCP_H
  42 # include <netinet/tcp.h>
  43 #endif
  44 #ifdef HAVE_NETINET_UDP_H
  45 # include <netinet/udp.h>
  46 #endif
  47 #ifdef HAVE_NETINET_SCTP_H
  48 # include <netinet/sctp.h>
  49 #endif
  50 #include <arpa/inet.h>
  51 #include <net/if.h>
  52 #include <asm/types.h>
  53 #if defined(__GLIBC__)
  54 # include <netipx/ipx.h>
  55 #else
  56 # include <linux/ipx.h>
  57 #endif
  58
  59 #if defined(__GLIBC__) && defined(HAVE_SIN6_SCOPE_ID_LINUX)
  60 # if defined(HAVE_LINUX_IN6_H)
  61 #  if defined(HAVE_SIN6_SCOPE_ID_LINUX)
  62 #   undef in6_addr
  63 #   undef ipv6_mreq
  64 #   undef sockaddr_in6
  65 #   define in6_addr in6_addr_kernel
  66 #   define ipv6_mreq ipv6_mreq_kernel
  67 #   define sockaddr_in6 sockaddr_in6_kernel
  68 #  endif
  69 #  include <linux/in6.h>
  70 #  if defined(HAVE_SIN6_SCOPE_ID_LINUX)
  71 #   undef in6_addr
  72 #   undef ipv6_mreq
  73 #   undef sockaddr_in6
  74 #   define in6_addr in6_addr_libc
  75 #   define ipv6_mreq ipv6_mreq_libc
  76 #   define sockaddr_in6 sockaddr_in6_kernel
  77 #  endif
  78 # endif
  79 #endif
  80
  81 #if defined(HAVE_SYS_UIO_H)
  82 # include <sys/uio.h>
  83 #endif
  84 #if defined(HAVE_LINUX_NETLINK_H)
  85 # include <linux/netlink.h>
  86 #endif
  87 #if defined(HAVE_LINUX_IF_PACKET_H)
  88 # include <linux/if_packet.h>
  89 #endif
  90 #if defined(HAVE_LINUX_ICMP_H)
  91 # include <linux/icmp.h>
  92 #endif
  93 #ifndef PF_UNSPEC
  94 # define PF_UNSPEC AF_UNSPEC
  95 #endif
  96
  97 /* Under Linux these are enums so we can't test for them with ifdef. */
  98 #define IPPROTO_EGP IPPROTO_EGP
  99 #define IPPROTO_PUP IPPROTO_PUP
 100 #define IPPROTO_IDP IPPROTO_IDP
 101 #define IPPROTO_IGMP IPPROTO_IGMP
 102 #define IPPROTO_RAW IPPROTO_RAW
 103 #define IPPROTO_MAX IPPROTO_MAX
 104
 105 static const struct xlat domains[] = {
 106 #ifdef PF_UNSPEC
 107         { PF_UNSPEC,    "PF_UNSPEC"     },
 108 #endif
 109 #ifdef PF_LOCAL
 110         { PF_LOCAL,     "PF_LOCAL"      },
 111 #endif
 112 #ifdef PF_UNIX
 113         { PF_UNIX,      "PF_UNIX"       },
 114 #endif
 115 #ifdef PF_INET
 116         { PF_INET,      "PF_INET"       },
 117 #endif
 118 #ifdef PF_AX25
 119         { PF_AX25,      "PF_AX25"       },
 120 #endif
 121 #ifdef PF_IPX
 122         { PF_IPX,       "PF_IPX"        },
 123 #endif
 124 #ifdef PF_APPLETALK
 125         { PF_APPLETALK, "PF_APPLETALK"  },
 126 #endif
 127 #ifdef PF_NETROM
 128         { PF_NETROM,    "PF_NETROM"     },
 129 #endif
 130 #ifdef PF_BRIDGE
 131         { PF_BRIDGE,    "PF_BRIDGE"     },
 132 #endif
 133 #ifdef PF_ATMPVC
 134         { PF_ATMPVC,    "PF_ATMPVC"     },
 135 #endif
 136 #ifdef PF_X25
 137         { PF_X25,       "PF_X25"        },
 138 #endif
 139 #ifdef PF_INET6
 140         { PF_INET6,     "PF_INET6"      },
 141 #endif
 142 #ifdef PF_ROSE
 143         { PF_ROSE,      "PF_ROSE"       },
 144 #endif
 145 #ifdef PF_DECnet
 146         { PF_DECnet,    "PF_DECnet"     },
 147 #endif
 148 #ifdef PF_NETBEUI
 149         { PF_NETBEUI,   "PF_NETBEUI"    },
 150 #endif
 151 #ifdef PF_SECURITY
 152         { PF_SECURITY,  "PF_SECURITY"   },
 153 #endif
 154 #ifdef PF_KEY
 155         { PF_KEY,       "PF_KEY"        },
 156 #endif
 157 #ifdef PF_NETLINK
 158         { PF_NETLINK,   "PF_NETLINK"    },
 159 #endif
 160 #ifdef PF_ROUTE
 161         { PF_ROUTE,     "PF_ROUTE"      },
 162 #endif
 163 #ifdef PF_PACKET
 164         { PF_PACKET,    "PF_PACKET"     },
 165 #endif
 166 #ifdef PF_ASH
 167         { PF_ASH,       "PF_ASH"        },
 168 #endif
 169 #ifdef PF_ECONET
 170         { PF_ECONET,    "PF_ECONET"     },
 171 #endif
 172 #ifdef PF_ATMSVC
 173         { PF_ATMSVC,    "PF_ATMSVC"     },
 174 #endif
 175 #ifdef PF_RDS
 176         { PF_RDS,       "PF_RDS"        },
 177 #endif
 178 #ifdef PF_SNA
 179         { PF_SNA,       "PF_SNA"        },
 180 #endif
 181 #ifdef PF_IRDA
 182         { PF_IRDA,      "PF_IRDA"       },
 183 #endif
 184 #ifdef PF_PPPOX
 185         { PF_PPPOX,     "PF_PPPOX"      },
 186 #endif
 187 #ifdef PF_WANPIPE
 188         { PF_WANPIPE,   "PF_WANPIPE"    },
 189 #endif
 190 #ifdef PF_LLC
 191         { PF_LLC,       "PF_LLC"        },
 192 #endif
 193 #ifdef PF_CAN
 194         { PF_CAN,       "PF_CAN"        },
 195 #endif
 196 #ifdef PF_TIPC
 197         { PF_TIPC,      "PF_TIPC"       },
 198 #endif
 199 #ifdef PF_BLUETOOTH
 200         { PF_BLUETOOTH, "PF_BLUETOOTH"  },
 201 #endif
 202 #ifdef PF_IUCV
 203         { PF_IUCV,      "PF_IUCV"       },
 204 #endif
 205 #ifdef PF_RXRPC
 206         { PF_RXRPC,     "PF_RXRPC"      },
 207 #endif
 208 #ifdef PF_ISDN
 209         { PF_ISDN,      "PF_ISDN"       },
 210 #endif
 211 #ifdef PF_PHONET
 212         { PF_PHONET,    "PF_PHONET"     },
 213 #endif
 214 #ifdef PF_IEEE802154
 215         { PF_IEEE802154,"PF_IEEE802154" },
 216 #endif
 217 #ifdef PF_CAIF
 218         { PF_CAIF,      "PF_CAIF"       },
 219 #endif
 220 #ifdef PF_ALG
 221         { PF_ALG,       "PF_ALG"        },
 222 #endif
 223 #ifdef PF_NFC
 224         { PF_NFC,       "PF_NFC"        },
 225 #endif
 226 #ifdef PF_VSOCK
 227         { PF_VSOCK,     "PF_VSOCK"      },
 228 #endif
 229         { 0,            NULL            },
 230 };
 231 const struct xlat addrfams[] = {
 232 #ifdef AF_UNSPEC
 233         { AF_UNSPEC,    "AF_UNSPEC"     },
 234 #endif
 235 #ifdef AF_LOCAL
 236         { AF_LOCAL,     "AF_LOCAL"      },
 237 #endif
 238 #ifdef AF_UNIX
 239         { AF_UNIX,      "AF_UNIX"       },
 240 #endif
 241 #ifdef AF_INET
 242         { AF_INET,      "AF_INET"       },
 243 #endif
 244 #ifdef AF_AX25
 245         { AF_AX25,      "AF_AX25"       },
 246 #endif
 247 #ifdef AF_IPX
 248         { AF_IPX,       "AF_IPX"        },
 249 #endif
 250 #ifdef AF_APPLETALK
 251         { AF_APPLETALK, "AF_APPLETALK"  },
 252 #endif
 253 #ifdef AF_NETROM
 254         { AF_NETROM,    "AF_NETROM"     },
 255 #endif
 256 #ifdef AF_BRIDGE
 257         { AF_BRIDGE,    "AF_BRIDGE"     },
 258 #endif
 259 #ifdef AF_ATMPVC
 260         { AF_ATMPVC,    "AF_ATMPVC"     },
 261 #endif
 262 #ifdef AF_X25
 263         { AF_X25,       "AF_X25"        },
 264 #endif
 265 #ifdef AF_INET6
 266         { AF_INET6,     "AF_INET6"      },
 267 #endif
 268 #ifdef AF_ROSE
 269         { AF_ROSE,      "AF_ROSE"       },
 270 #endif
 271 #ifdef AF_DECnet
 272         { AF_DECnet,    "AF_DECnet"     },
 273 #endif
 274 #ifdef AF_NETBEUI
 275         { AF_NETBEUI,   "AF_NETBEUI"    },
 276 #endif
 277 #ifdef AF_SECURITY
 278         { AF_SECURITY,  "AF_SECURITY"   },
 279 #endif
 280 #ifdef AF_KEY
 281         { AF_KEY,       "AF_KEY"        },
 282 #endif
 283 #ifdef AF_NETLINK
 284         { AF_NETLINK,   "AF_NETLINK"    },
 285 #endif
 286 #ifdef AF_ROUTE
 287         { AF_ROUTE,     "AF_ROUTE"      },
 288 #endif
 289 #ifdef AF_PACKET
 290         { AF_PACKET,    "AF_PACKET"     },
 291 #endif
 292 #ifdef AF_ASH
 293         { AF_ASH,       "AF_ASH"        },
 294 #endif
 295 #ifdef AF_ECONET
 296         { AF_ECONET,    "AF_ECONET"     },
 297 #endif
 298 #ifdef AF_ATMSVC
 299         { AF_ATMSVC,    "AF_ATMSVC"     },
 300 #endif
 301 #ifdef AF_RDS
 302         { AF_RDS,       "AF_RDS"        },
 303 #endif
 304 #ifdef AF_SNA
 305         { AF_SNA,       "AF_SNA"        },
 306 #endif
 307 #ifdef AF_IRDA
 308         { AF_IRDA,      "AF_IRDA"       },
 309 #endif
 310 #ifdef AF_PPPOX
 311         { AF_PPPOX,     "AF_PPPOX"      },
 312 #endif
 313 #ifdef AF_WANPIPE
 314         { AF_WANPIPE,   "AF_WANPIPE"    },
 315 #endif
 316 #ifdef AF_LLC
 317         { AF_LLC,       "AF_LLC"        },
 318 #endif
 319 #ifdef AF_CAN
 320         { AF_CAN,       "AF_CAN"        },
 321 #endif
 322 #ifdef AF_TIPC
 323         { AF_TIPC,      "AF_TIPC"       },
 324 #endif
 325 #ifdef AF_BLUETOOTH
 326         { AF_BLUETOOTH, "AF_BLUETOOTH"  },
 327 #endif
 328 #ifdef AF_IUCV
 329         { AF_IUCV,      "AF_IUCV"       },
 330 #endif
 331 #ifdef AF_RXRPC
 332         { AF_RXRPC,     "AF_RXRPC"      },
 333 #endif
 334 #ifdef AF_ISDN
 335         { AF_ISDN,      "AF_ISDN"       },
 336 #endif
 337 #ifdef AF_PHONET
 338         { AF_PHONET,    "AF_PHONET"     },
 339 #endif
 340 #ifdef AF_IEEE802154
 341         { AF_IEEE802154,"AF_IEEE802154" },
 342 #endif
 343 #ifdef AF_CAIF
 344         { AF_CAIF,      "AF_CAIF"       },
 345 #endif
 346 #ifdef AF_ALG
 347         { AF_ALG,       "AF_ALG"        },
 348 #endif
 349 #ifdef AF_NFC
 350         { AF_NFC,       "AF_NFC"        },
 351 #endif
 352 #ifdef AF_VSOCK
 353         { AF_VSOCK,     "AF_VSOCK"      },
 354 #endif
 355         { 0,            NULL            },
 356 };
 357 static const struct xlat socktypes[] = {
 358         { SOCK_STREAM,  "SOCK_STREAM"   },
 359         { SOCK_DGRAM,   "SOCK_DGRAM"    },
 360 #ifdef SOCK_RAW
 361         { SOCK_RAW,     "SOCK_RAW"      },
 362 #endif
 363 #ifdef SOCK_RDM
 364         { SOCK_RDM,     "SOCK_RDM"      },
 365 #endif
 366 #ifdef SOCK_SEQPACKET
 367         { SOCK_SEQPACKET,"SOCK_SEQPACKET"},
 368 #endif
 369 #ifdef SOCK_DCCP
 370         { SOCK_DCCP,    "SOCK_DCCP"     },
 371 #endif
 372 #ifdef SOCK_PACKET
 373         { SOCK_PACKET,  "SOCK_PACKET"   },
 374 #endif
 375         { 0,            NULL            },
 376 };
 377 static const struct xlat sock_type_flags[] = {
 378 #ifdef SOCK_CLOEXEC
 379         { SOCK_CLOEXEC, "SOCK_CLOEXEC"  },
 380 #endif
 381 #ifdef SOCK_NONBLOCK
 382         { SOCK_NONBLOCK,"SOCK_NONBLOCK" },
 383 #endif
 384         { 0,            NULL            },
 385 };
 386 #ifndef SOCK_TYPE_MASK
 387 # define SOCK_TYPE_MASK 0xf
 388 #endif
 389 static const struct xlat socketlayers[] = {
 390 #if defined(SOL_IP)
 391         { SOL_IP,       "SOL_IP"        },
 392 #endif
 393 #if defined(SOL_ICMP)
 394         { SOL_ICMP,     "SOL_ICMP"      },
 395 #endif
 396 #if defined(SOL_TCP)
 397         { SOL_TCP,      "SOL_TCP"       },
 398 #endif
 399 #if defined(SOL_UDP)
 400         { SOL_UDP,      "SOL_UDP"       },
 401 #endif
 402 #if defined(SOL_IPV6)
 403         { SOL_IPV6,     "SOL_IPV6"      },
 404 #endif
 405 #if defined(SOL_ICMPV6)
 406         { SOL_ICMPV6,   "SOL_ICMPV6"    },
 407 #endif
 408 #if defined(SOL_SCTP)
 409         { SOL_SCTP,     "SOL_SCTP"      },
 410 #endif
 411 #if defined(SOL_UDPLITE)
 412         { SOL_UDPLITE,  "SOL_UDPLITE"   },
 413 #endif
 414 #if defined(SOL_RAW)
 415         { SOL_RAW,      "SOL_RAW"       },
 416 #endif
 417 #if defined(SOL_IPX)
 418         { SOL_IPX,      "SOL_IPX"       },
 419 #endif
 420 #if defined(SOL_AX25)
 421         { SOL_AX25,     "SOL_AX25"      },
 422 #endif
 423 #if defined(SOL_ATALK)
 424         { SOL_ATALK,    "SOL_ATALK"     },
 425 #endif
 426 #if defined(SOL_NETROM)
 427         { SOL_NETROM,   "SOL_NETROM"    },
 428 #endif
 429 #if defined(SOL_ROSE)
 430         { SOL_ROSE,     "SOL_ROSE"      },
 431 #endif
 432 #if defined(SOL_DECNET)
 433         { SOL_DECNET,   "SOL_DECNET"    },
 434 #endif
 435 #if defined(SOL_X25)
 436         { SOL_X25,      "SOL_X25"       },
 437 #endif
 438 #if defined(SOL_PACKET)
 439         { SOL_PACKET,   "SOL_PACKET"    },
 440 #endif
 441 #if defined(SOL_ATM)
 442         { SOL_ATM,      "SOL_ATM"       },
 443 #endif
 444 #if defined(SOL_AAL)
 445         { SOL_AAL,      "SOL_AAL"       },
 446 #endif
 447 #if defined(SOL_IRDA)
 448         { SOL_IRDA,     "SOL_IRDA"      },
 449 #endif
 450 #if defined(SOL_NETBEUI)
 451         { SOL_NETBEUI,  "SOL_NETBEUI"   },
 452 #endif
 453 #if defined(SOL_LLC)
 454         { SOL_LLC,      "SOL_LLC"       },
 455 #endif
 456 #if defined(SOL_DCCP)
 457         { SOL_DCCP,     "SOL_DCCP"      },
 458 #endif
 459 #if defined(SOL_NETLINK)
 460         { SOL_NETLINK,  "SOL_NETLINK"   },
 461 #endif
 462 #if defined(SOL_TIPC)
 463         { SOL_TIPC,     "SOL_TIPC"      },
 464 #endif
 465 #if defined(SOL_RXRPC)
 466         { SOL_RXRPC,    "SOL_RXRPC"     },
 467 #endif
 468 #if defined(SOL_PPPOL2TP)
 469         { SOL_PPPOL2TP, "SOL_PPPOL2TP"  },
 470 #endif
 471 #if defined(SOL_BLUETOOTH)
 472         { SOL_BLUETOOTH,"SOL_BLUETOOTH" },
 473 #endif
 474 #if defined(SOL_PNPIPE)
 475         { SOL_PNPIPE,   "SOL_PNPIPE"    },
 476 #endif
 477 #if defined(SOL_RDS)
 478         { SOL_RDS,      "SOL_RDS"       },
 479 #endif
 480 #if defined(SOL_IUVC)
 481         { SOL_IUCV,     "SOL_IUCV"      },
 482 #endif
 483 #if defined(SOL_CAIF)
 484         { SOL_CAIF,     "SOL_CAIF"      },
 485 #endif
 486         { SOL_SOCKET,   "SOL_SOCKET"    },      /* Never used! */
 487         /* The SOL_* array should remain not NULL-terminated. */
 488 };
 489 /*** WARNING: DANGER WILL ROBINSON: NOTE "socketlayers" array above
 490      falls into "protocols" array below!!!!   This is intended!!! ***/
 491 static const struct xlat protocols[] = {
 492         { IPPROTO_IP,   "IPPROTO_IP"    },
 493         { IPPROTO_ICMP, "IPPROTO_ICMP"  },
 494         { IPPROTO_TCP,  "IPPROTO_TCP"   },
 495         { IPPROTO_UDP,  "IPPROTO_UDP"   },
 496 #ifdef IPPROTO_IGMP
 497         { IPPROTO_IGMP, "IPPROTO_IGMP"  },
 498 #endif
 499 #ifdef IPPROTO_GGP
 500         { IPPROTO_GGP,  "IPPROTO_GGP"   },
 501 #endif
 502 #ifdef IPPROTO_IPIP
 503         { IPPROTO_IPIP, "IPPROTO_IPIP"  },
 504 #endif
 505 #ifdef IPPROTO_EGP
 506         { IPPROTO_EGP,  "IPPROTO_EGP"   },
 507 #endif
 508 #ifdef IPPROTO_PUP
 509         { IPPROTO_PUP,  "IPPROTO_PUP"   },
 510 #endif
 511 #ifdef IPPROTO_IDP
 512         { IPPROTO_IDP,  "IPPROTO_IDP"   },
 513 #endif
 514 #ifdef IPPROTO_TP
 515         { IPPROTO_TP,   "IPPROTO_TP"    },
 516 #endif
 517 #ifdef IPPROTO_DCCP
 518         { IPPROTO_DCCP, "IPPROTO_DCCP"  },
 519 #endif
 520 #ifdef IPPROTO_IPV6
 521         { IPPROTO_IPV6, "IPPROTO_IPV6"  },
 522 #endif
 523 #ifdef IPPROTO_ROUTING
 524         { IPPROTO_ROUTING, "IPPROTO_ROUTING" },
 525 #endif
 526 #ifdef IPPROTO_FRAGMENT
 527         { IPPROTO_FRAGMENT, "IPPROTO_FRAGMENT" },
 528 #endif
 529 #ifdef IPPROTO_RSVP
 530         { IPPROTO_RSVP, "IPPROTO_RSVP"  },
 531 #endif
 532 #ifdef IPPROTO_GRE
 533         { IPPROTO_GRE,  "IPPROTO_GRE"   },
 534 #endif
 535 #ifdef IPPROTO_ESP
 536         { IPPROTO_ESP,  "IPPROTO_ESP"   },
 537 #endif
 538 #ifdef IPPROTO_AH
 539         { IPPROTO_AH,   "IPPROTO_AH"    },
 540 #endif
 541 #ifdef IPPROTO_ICMPV6
 542         { IPPROTO_ICMPV6, "IPPROTO_ICMPV6" },
 543 #endif
 544 #ifdef IPPROTO_NONE
 545         { IPPROTO_NONE, "IPPROTO_NONE"  },
 546 #endif
 547 #ifdef IPPROTO_DSTOPTS
 548         { IPPROTO_DSTOPTS, "IPPROTO_DSTOPTS" },
 549 #endif
 550 #ifdef IPPROTO_HELLO
 551         { IPPROTO_HELLO, "IPPROTO_HELLO" },
 552 #endif
 553 #ifdef IPPROTO_ND
 554         { IPPROTO_ND,   "IPPROTO_ND"    },
 555 #endif
 556 #ifdef IPPROTO_MTP
 557         { IPPROTO_MTP,  "IPPROTO_MTP"   },
 558 #endif
 559 #ifdef IPPROTO_ENCAP
 560         { IPPROTO_ENCAP, "IPPROTO_ENCAP" },
 561 #endif
 562 #ifdef IPPROTO_PIM
 563         { IPPROTO_PIM,  "IPPROTO_PIM"   },
 564 #endif
 565 #ifdef IPPROTO_COMP
 566         { IPPROTO_COMP, "IPPROTO_COMP"  },
 567 #endif
 568 #ifdef IPPROTO_SCTP
 569         { IPPROTO_SCTP, "IPPROTO_SCTP"  },
 570 #endif
 571 #ifdef IPPROTO_UDPLITE
 572         { IPPROTO_UDPLITE, "IPPROTO_UDPLITE" },
 573 #endif
 574 #ifdef IPPROTO_RAW
 575         { IPPROTO_RAW,  "IPPROTO_RAW"   },
 576 #endif
 577 #ifdef IPPROTO_MAX
 578         { IPPROTO_MAX,  "IPPROTO_MAX"   },
 579 #endif
 580         { 0,            NULL            },
 581 };
 582 static const struct xlat msg_flags[] = {
 583         { MSG_OOB,              "MSG_OOB"               },
 584 #ifdef MSG_PEEK
 585         { MSG_PEEK,             "MSG_PEEK"              },
 586 #endif
 587 #ifdef MSG_DONTROUTE
 588         { MSG_DONTROUTE,        "MSG_DONTROUTE"         },
 589 #endif
 590 #ifdef MSG_CTRUNC
 591         { MSG_CTRUNC,           "MSG_CTRUNC"            },
 592 #endif
 593 #ifdef MSG_PROBE
 594         { MSG_PROBE,            "MSG_PROBE"             },
 595 #endif
 596 #ifdef MSG_TRUNC
 597         { MSG_TRUNC,            "MSG_TRUNC"             },
 598 #endif
 599 #ifdef MSG_DONTWAIT
 600         { MSG_DONTWAIT,         "MSG_DONTWAIT"          },
 601 #endif
 602 #ifdef MSG_EOR
 603         { MSG_EOR,              "MSG_EOR"               },
 604 #endif
 605 #ifdef MSG_WAITALL
 606         { MSG_WAITALL,          "MSG_WAITALL"           },
 607 #endif
 608 #ifdef MSG_FIN
 609         { MSG_FIN,              "MSG_FIN"               },
 610 #endif
 611 #ifdef MSG_SYN
 612         { MSG_SYN,              "MSG_SYN"               },
 613 #endif
 614 #ifdef MSG_CONFIRM
 615         { MSG_CONFIRM,          "MSG_CONFIRM"           },
 616 #endif
 617 #ifdef MSG_RST
 618         { MSG_RST,              "MSG_RST"               },
 619 #endif
 620 #ifdef MSG_ERRQUEUE
 621         { MSG_ERRQUEUE,         "MSG_ERRQUEUE"          },
 622 #endif
 623 #ifdef MSG_NOSIGNAL
 624         { MSG_NOSIGNAL,         "MSG_NOSIGNAL"          },
 625 #endif
 626 #ifdef MSG_MORE
 627         { MSG_MORE,             "MSG_MORE"              },
 628 #endif
 629 #ifdef MSG_WAITFORONE
 630         { MSG_WAITFORONE,       "MSG_WAITFORONE"        },
 631 #endif
 632 #ifdef MSG_EOF
 633         { MSG_EOF,              "MSG_EOF"               },
 634 #endif
 635 #ifdef MSG_FASTOPEN
 636         { MSG_FASTOPEN,         "MSG_FASTOPEN"          },
 637 #endif
 638 #ifdef MSG_CMSG_CLOEXEC
 639         { MSG_CMSG_CLOEXEC,     "MSG_CMSG_CLOEXEC"      },
 640 #endif
 641         { 0,                    NULL                    },
 642 };
 643
 644 static const struct xlat sockoptions[] = {
 645 #ifdef SO_ACCEPTCONN
 646         { SO_ACCEPTCONN,        "SO_ACCEPTCONN" },
 647 #endif
 648 #ifdef SO_ALLRAW
 649         { SO_ALLRAW,    "SO_ALLRAW"     },
 650 #endif
 651 #ifdef SO_ATTACH_FILTER
 652         { SO_ATTACH_FILTER,     "SO_ATTACH_FILTER"      },
 653 #endif
 654 #ifdef SO_BINDTODEVICE
 655         { SO_BINDTODEVICE,      "SO_BINDTODEVICE"       },
 656 #endif
 657 #ifdef SO_BROADCAST
 658         { SO_BROADCAST, "SO_BROADCAST"  },
 659 #endif
 660 #ifdef SO_BSDCOMPAT
 661         { SO_BSDCOMPAT, "SO_BSDCOMPAT"  },
 662 #endif
 663 #ifdef SO_DEBUG
 664         { SO_DEBUG,     "SO_DEBUG"      },
 665 #endif
 666 #ifdef SO_DETACH_FILTER
 667         { SO_DETACH_FILTER,     "SO_DETACH_FILTER"      },
 668 #endif
 669 #ifdef SO_DONTROUTE
 670         { SO_DONTROUTE, "SO_DONTROUTE"  },
 671 #endif
 672 #ifdef SO_ERROR
 673         { SO_ERROR,     "SO_ERROR"      },
 674 #endif
 675 #ifdef SO_ICS
 676         { SO_ICS,       "SO_ICS"        },
 677 #endif
 678 #ifdef SO_IMASOCKET
 679         { SO_IMASOCKET, "SO_IMASOCKET"  },
 680 #endif
 681 #ifdef SO_KEEPALIVE
 682         { SO_KEEPALIVE, "SO_KEEPALIVE"  },
 683 #endif
 684 #ifdef SO_LINGER
 685         { SO_LINGER,    "SO_LINGER"     },
 686 #endif
 687 #ifdef SO_LISTENING
 688         { SO_LISTENING, "SO_LISTENING"  },
 689 #endif
 690 #ifdef SO_MGMT
 691         { SO_MGMT,      "SO_MGMT"       },
 692 #endif
 693 #ifdef SO_NO_CHECK
 694         { SO_NO_CHECK,  "SO_NO_CHECK"   },
 695 #endif
 696 #ifdef SO_OOBINLINE
 697         { SO_OOBINLINE, "SO_OOBINLINE"  },
 698 #endif
 699 #ifdef SO_ORDREL
 700         { SO_ORDREL,    "SO_ORDREL"     },
 701 #endif
 702 #ifdef SO_PARALLELSVR
 703         { SO_PARALLELSVR,       "SO_PARALLELSVR"        },
 704 #endif
 705 #ifdef SO_PASSCRED
 706         { SO_PASSCRED,  "SO_PASSCRED"   },
 707 #endif
 708 #ifdef SO_PEERCRED
 709         { SO_PEERCRED,  "SO_PEERCRED"   },
 710 #endif
 711 #ifdef SO_PEERNAME
 712         { SO_PEERNAME,  "SO_PEERNAME"   },
 713 #endif
 714 #ifdef SO_PEERSEC
 715         { SO_PEERSEC,   "SO_PEERSEC"    },
 716 #endif
 717 #ifdef SO_PRIORITY
 718         { SO_PRIORITY,  "SO_PRIORITY"   },
 719 #endif
 720 #ifdef SO_PROTOTYPE
 721         { SO_PROTOTYPE, "SO_PROTOTYPE"  },
 722 #endif
 723 #ifdef SO_RCVBUF
 724         { SO_RCVBUF,    "SO_RCVBUF"     },
 725 #endif
 726 #ifdef SO_RCVLOWAT
 727         { SO_RCVLOWAT,  "SO_RCVLOWAT"   },
 728 #endif
 729 #ifdef SO_RCVTIMEO
 730         { SO_RCVTIMEO,  "SO_RCVTIMEO"   },
 731 #endif
 732 #ifdef SO_RDWR
 733         { SO_RDWR,      "SO_RDWR"       },
 734 #endif
 735 #ifdef SO_REUSEADDR
 736         { SO_REUSEADDR, "SO_REUSEADDR"  },
 737 #endif
 738 #ifdef SO_REUSEPORT
 739         { SO_REUSEPORT, "SO_REUSEPORT"  },
 740 #endif
 741 #ifdef SO_SECURITY_AUTHENTICATION
 742         { SO_SECURITY_AUTHENTICATION,"SO_SECURITY_AUTHENTICATION"},
 743 #endif
 744 #ifdef SO_SECURITY_ENCRYPTION_NETWORK
 745         { SO_SECURITY_ENCRYPTION_NETWORK,"SO_SECURITY_ENCRYPTION_NETWORK"},
 746 #endif
 747 #ifdef SO_SECURITY_ENCRYPTION_TRANSPORT
 748         { SO_SECURITY_ENCRYPTION_TRANSPORT,"SO_SECURITY_ENCRYPTION_TRANSPORT"},
 749 #endif
 750 #ifdef SO_SEMA
 751         { SO_SEMA,      "SO_SEMA"       },
 752 #endif
 753 #ifdef SO_SNDBUF
 754         { SO_SNDBUF,    "SO_SNDBUF"     },
 755 #endif
 756 #ifdef SO_SNDLOWAT
 757         { SO_SNDLOWAT,  "SO_SNDLOWAT"   },
 758 #endif
 759 #ifdef SO_SNDTIMEO
 760         { SO_SNDTIMEO,  "SO_SNDTIMEO"   },
 761 #endif
 762 #ifdef SO_TIMESTAMP
 763         { SO_TIMESTAMP, "SO_TIMESTAMP"  },
 764 #endif
 765 #ifdef SO_TYPE
 766         { SO_TYPE,      "SO_TYPE"       },
 767 #endif
 768 #ifdef SO_USELOOPBACK
 769         { SO_USELOOPBACK,       "SO_USELOOPBACK"        },
 770 #endif
 771         { 0,            NULL            },
 772 };
 773
 774 #if !defined(SOL_IP) && defined(IPPROTO_IP)
 775 #define SOL_IP IPPROTO_IP
 776 #endif
 777
 778 #ifdef SOL_IP
 779 static const struct xlat sockipoptions[] = {
 780 #ifdef IP_TOS
 781         { IP_TOS,               "IP_TOS"                },
 782 #endif
 783 #ifdef IP_TTL
 784         { IP_TTL,               "IP_TTL"                },
 785 #endif
 786 #ifdef IP_HDRINCL
 787         { IP_HDRINCL,           "IP_HDRINCL"            },
 788 #endif
 789 #ifdef IP_OPTIONS
 790         { IP_OPTIONS,           "IP_OPTIONS"            },
 791 #endif
 792 #ifdef IP_ROUTER_ALERT
 793         { IP_ROUTER_ALERT,      "IP_ROUTER_ALERT"       },
 794 #endif
 795 #ifdef IP_RECVOPTIONS
 796         { IP_RECVOPTIONS,       "IP_RECVOPTIONS"        },
 797 #endif
 798 #ifdef IP_RECVOPTS
 799         { IP_RECVOPTS,          "IP_RECVOPTS"           },
 800 #endif
 801 #ifdef IP_RECVRETOPTS
 802         { IP_RECVRETOPTS,       "IP_RECVRETOPTS"        },
 803 #endif
 804 #ifdef IP_RECVDSTADDR
 805         { IP_RECVDSTADDR,       "IP_RECVDSTADDR"        },
 806 #endif
 807 #ifdef IP_RETOPTS
 808         { IP_RETOPTS,           "IP_RETOPTS"            },
 809 #endif
 810 #ifdef IP_PKTINFO
 811         { IP_PKTINFO,           "IP_PKTINFO"            },
 812 #endif
 813 #ifdef IP_PKTOPTIONS
 814         { IP_PKTOPTIONS,        "IP_PKTOPTIONS"         },
 815 #endif
 816 #ifdef IP_MTU_DISCOVER
 817         { IP_MTU_DISCOVER,      "IP_MTU_DISCOVER"       },
 818 #endif
 819 #ifdef IP_RECVERR
 820         { IP_RECVERR,           "IP_RECVERR"            },
 821 #endif
 822 #ifdef IP_RECVTTL
 823         { IP_RECVTTL,           "IP_RECVTTL"            },
 824 #endif
 825 #ifdef IP_RECVTOS
 826         { IP_RECVTOS,           "IP_RECVTOS"            },
 827 #endif
 828 #ifdef IP_MTU
 829         { IP_MTU,               "IP_MTU"                },
 830 #endif
 831 #ifdef IP_MULTICAST_IF
 832         { IP_MULTICAST_IF,      "IP_MULTICAST_IF"       },
 833 #endif
 834 #ifdef IP_MULTICAST_TTL
 835         { IP_MULTICAST_TTL,     "IP_MULTICAST_TTL"      },
 836 #endif
 837 #ifdef IP_MULTICAST_LOOP
 838         { IP_MULTICAST_LOOP,    "IP_MULTICAST_LOOP"     },
 839 #endif
 840 #ifdef IP_ADD_MEMBERSHIP
 841         { IP_ADD_MEMBERSHIP,    "IP_ADD_MEMBERSHIP"     },
 842 #endif
 843 #ifdef IP_DROP_MEMBERSHIP
 844         { IP_DROP_MEMBERSHIP,   "IP_DROP_MEMBERSHIP"    },
 845 #endif
 846 #ifdef IP_BROADCAST_IF
 847         { IP_BROADCAST_IF,      "IP_BROADCAST_IF"       },
 848 #endif
 849 #ifdef IP_RECVIFINDEX
 850         { IP_RECVIFINDEX,       "IP_RECVIFINDEX"        },
 851 #endif
 852 #ifdef IP_MSFILTER
 853         { IP_MSFILTER,          "IP_MSFILTER"           },
 854 #endif
 855 #ifdef MCAST_MSFILTER
 856         { MCAST_MSFILTER,       "MCAST_MSFILTER"        },
 857 #endif
 858 #ifdef IP_FREEBIND
 859         { IP_FREEBIND,          "IP_FREEBIND"           },
 860 #endif
 861         { 0,                    NULL                    },
 862 };
 863 #endif /* SOL_IP */
 864
 865 #ifdef SOL_IPV6
 866 static const struct xlat sockipv6options[] = {
 867 #ifdef IPV6_ADDRFORM
 868         { IPV6_ADDRFORM,        "IPV6_ADDRFORM"         },
 869 #endif
 870 #ifdef MCAST_FILTER
 871         { MCAST_FILTER,         "MCAST_FILTER"          },
 872 #endif
 873 #ifdef IPV6_PKTOPTIONS
 874         { IPV6_PKTOPTIONS,      "IPV6_PKTOPTIONS"       },
 875 #endif
 876 #ifdef IPV6_MTU
 877         { IPV6_MTU,             "IPV6_MTU"              },
 878 #endif
 879 #ifdef IPV6_V6ONLY
 880         { IPV6_V6ONLY,          "IPV6_V6ONLY"           },
 881 #endif
 882 #ifdef IPV6_PKTINFO
 883         { IPV6_PKTINFO,         "IPV6_PKTINFO"          },
 884 #endif
 885 #ifdef IPV6_HOPLIMIT
 886         { IPV6_HOPLIMIT,        "IPV6_HOPLIMIT"         },
 887 #endif
 888 #ifdef IPV6_RTHDR
 889         { IPV6_RTHDR,           "IPV6_RTHDR"            },
 890 #endif
 891 #ifdef IPV6_HOPOPTS
 892         { IPV6_HOPOPTS,         "IPV6_HOPOPTS"          },
 893 #endif
 894 #ifdef IPV6_DSTOPTS
 895         { IPV6_DSTOPTS,         "IPV6_DSTOPTS"          },
 896 #endif
 897 #ifdef IPV6_FLOWINFO
 898         { IPV6_FLOWINFO,        "IPV6_FLOWINFO"         },
 899 #endif
 900 #ifdef IPV6_UNICAST_HOPS
 901         { IPV6_UNICAST_HOPS,    "IPV6_UNICAST_HOPS"     },
 902 #endif
 903 #ifdef IPV6_MULTICAST_HOPS
 904         { IPV6_MULTICAST_HOPS,  "IPV6_MULTICAST_HOPS"   },
 905 #endif
 906 #ifdef IPV6_MULTICAST_LOOP
 907         { IPV6_MULTICAST_LOOP,  "IPV6_MULTICAST_LOOP"   },
 908 #endif
 909 #ifdef IPV6_MULTICAST_IF
 910         { IPV6_MULTICAST_IF,    "IPV6_MULTICAST_IF"     },
 911 #endif
 912 #ifdef IPV6_MTU_DISCOVER
 913         { IPV6_MTU_DISCOVER,    "IPV6_MTU_DISCOVER"     },
 914 #endif
 915 #ifdef IPV6_RECVERR
 916         { IPV6_RECVERR,         "IPV6_RECVERR"          },
 917 #endif
 918 #ifdef IPV6_FLOWINFO_SEND
 919         { IPV6_FLOWINFO_SEND,   "IPV6_FLOWINFO_SEND"    },
 920 #endif
 921 #ifdef IPV6_ADD_MEMBERSHIP
 922         { IPV6_ADD_MEMBERSHIP,  "IPV6_ADD_MEMBERSHIP"   },
 923 #endif
 924 #ifdef IPV6_DROP_MEMBERSHIP
 925         { IPV6_DROP_MEMBERSHIP, "IPV6_DROP_MEMBERSHIP"  },
 926 #endif
 927 #ifdef IPV6_ROUTER_ALERT
 928         { IPV6_ROUTER_ALERT,    "IPV6_ROUTER_ALERT"     },
 929 #endif
 930         { 0,                    NULL                    },
 931 };
 932 #endif /* SOL_IPV6 */
 933
 934 #ifdef SOL_IPX
 935 static const struct xlat sockipxoptions[] = {
 936         { IPX_TYPE,     "IPX_TYPE"      },
 937         { 0,            NULL            },
 938 };
 939 #endif /* SOL_IPX */
 940
 941 #ifdef SOL_RAW
 942 static const struct xlat sockrawoptions[] = {
 943 #if defined(ICMP_FILTER)
 944         { ICMP_FILTER,          "ICMP_FILTER"   },
 945 #endif
 946         { 0,                    NULL            },
 947 };
 948 #endif /* SOL_RAW */
 949
 950 #ifdef SOL_PACKET
 951 static const struct xlat sockpacketoptions[] = {
 952 #ifdef PACKET_ADD_MEMBERSHIP
 953         { PACKET_ADD_MEMBERSHIP,        "PACKET_ADD_MEMBERSHIP" },
 954 #endif
 955 #ifdef PACKET_DROP_MEMBERSHIP
 956         { PACKET_DROP_MEMBERSHIP,       "PACKET_DROP_MEMBERSHIP"},
 957 #endif
 958 #if defined(PACKET_RECV_OUTPUT)
 959         { PACKET_RECV_OUTPUT,           "PACKET_RECV_OUTPUT"    },
 960 #endif
 961 #if defined(PACKET_RX_RING)
 962         { PACKET_RX_RING,               "PACKET_RX_RING"        },
 963 #endif
 964 #if defined(PACKET_STATISTICS)
 965         { PACKET_STATISTICS,            "PACKET_STATISTICS"     },
 966 #endif
 967 #if defined(PACKET_COPY_THRESH)
 968         { PACKET_COPY_THRESH,           "PACKET_COPY_THRESH"    },
 969 #endif
 970 #if defined(PACKET_AUXDATA)
 971         { PACKET_AUXDATA,               "PACKET_AUXDATA"        },
 972 #endif
 973 #if defined(PACKET_ORIGDEV)
 974         { PACKET_ORIGDEV,               "PACKET_ORIGDEV"        },
 975 #endif
 976 #if defined(PACKET_VERSION)
 977         { PACKET_VERSION,               "PACKET_VERSION"        },
 978 #endif
 979 #if defined(PACKET_HDRLEN)
 980         { PACKET_HDRLEN,                "PACKET_HDRLEN" },
 981 #endif
 982 #if defined(PACKET_RESERVE)
 983         { PACKET_RESERVE,               "PACKET_RESERVE"        },
 984 #endif
 985 #if defined(PACKET_TX_RING)
 986         { PACKET_TX_RING,               "PACKET_TX_RING"        },
 987 #endif
 988 #if defined(PACKET_LOSS)
 989         { PACKET_LOSS,                  "PACKET_LOSS"   },
 990 #endif
 991         { 0,                            NULL                    },
 992 };
 993 #endif /* SOL_PACKET */
 994
 995 #ifdef SOL_SCTP
 996 static const struct xlat socksctpoptions[] = {
 997 #if defined(SCTP_RTOINFO)
 998         { SCTP_RTOINFO,                 "SCTP_RTOINFO"  },
 999 #endif
1000 #if defined(SCTP_ASSOCINFO)
1001         { SCTP_ASSOCINFO,               "SCTP_ASSOCINFO"},
1002 #endif
1003 #if defined(SCTP_INITMSG)
1004         { SCTP_INITMSG,                 "SCTP_INITMSG"  },
1005 #endif
1006 #if defined(SCTP_NODELAY)
1007         { SCTP_NODELAY,                 "SCTP_NODELAY"  },
1008 #endif
1009 #if defined(SCTP_AUTOCLOSE)
1010         { SCTP_AUTOCLOSE,               "SCTP_AUTOCLOSE"},
1011 #endif
1012 #if defined(SCTP_SET_PEER_PRIMARY_ADDR)
1013         { SCTP_SET_PEER_PRIMARY_ADDR,   "SCTP_SET_PEER_PRIMARY_ADDR"},
1014 #endif
1015 #if defined(SCTP_PRIMARY_ADDR)
1016         { SCTP_PRIMARY_ADDR,            "SCTP_PRIMARY_ADDR"     },
1017 #endif
1018 #if defined(SCTP_ADAPTATION_LAYER)
1019         { SCTP_ADAPTATION_LAYER,        "SCTP_ADAPTATION_LAYER" },
1020 #endif
1021 #if defined(SCTP_DISABLE_FRAGMENTS)
1022         { SCTP_DISABLE_FRAGMENTS,       "SCTP_DISABLE_FRAGMENTS"},
1023 #endif
1024 #if defined(SCTP_PEER_ADDR_PARAMS)
1025         { SCTP_PEER_ADDR_PARAMS,        "SCTP_PEER_ADDR_PARAMS" },
1026 #endif
1027 #if defined(SCTP_DEFAULT_SEND_PARAM)
1028         { SCTP_DEFAULT_SEND_PARAM,      "SCTP_DEFAULT_SEND_PARAM"},
1029 #endif
1030 #if defined(SCTP_EVENTS)
1031         { SCTP_EVENTS,                  "SCTP_EVENTS"           },
1032 #endif
1033 #if defined(SCTP_I_WANT_MAPPED_V4_ADDR)
1034         { SCTP_I_WANT_MAPPED_V4_ADDR,   "SCTP_I_WANT_MAPPED_V4_ADDR"},
1035 #endif
1036 #if defined(SCTP_MAXSEG)
1037         { SCTP_MAXSEG,                  "SCTP_MAXSEG"           },
1038 #endif
1039 #if defined(SCTP_STATUS)
1040         { SCTP_STATUS,                  "SCTP_STATUS"           },
1041 #endif
1042 #if defined(SCTP_GET_PEER_ADDR_INFO)
1043         { SCTP_GET_PEER_ADDR_INFO,      "SCTP_GET_PEER_ADDR_INFO"},
1044 #endif
1045 #if defined(SCTP_DELAYED_ACK)
1046         { SCTP_DELAYED_ACK,             "SCTP_DELAYED_ACK"      },
1047 #endif
1048 #if defined(SCTP_CONTEXT)
1049         { SCTP_CONTEXT,                 "SCTP_CONTEXT"          },
1050 #endif
1051 #if defined(SCTP_FRAGMENT_INTERLEAVE)
1052         { SCTP_FRAGMENT_INTERLEAVE,     "SCTP_FRAGMENT_INTERLEAVE"},
1053 #endif
1054 #if defined(SCTP_PARTIAL_DELIVERY_POINT)
1055         { SCTP_PARTIAL_DELIVERY_POINT,  "SCTP_PARTIAL_DELIVERY_POINT"},
1056 #endif
1057 #if defined(SCTP_MAX_BURST)
1058         { SCTP_MAX_BURST,               "SCTP_MAX_BURST"        },
1059 #endif
1060 #if defined(SCTP_AUTH_CHUNK)
1061         { SCTP_AUTH_CHUNK,              "SCTP_AUTH_CHUNK"       },
1062 #endif
1063 #if defined(SCTP_HMAC_IDENT)
1064         { SCTP_HMAC_IDENT,              "SCTP_HMAC_IDENT"       },
1065 #endif
1066 #if defined(SCTP_AUTH_KEY)
1067         { SCTP_AUTH_KEY,                "SCTP_AUTH_KEY"         },
1068 #endif
1069 #if defined(SCTP_AUTH_ACTIVE_KEY)
1070         { SCTP_AUTH_ACTIVE_KEY,         "SCTP_AUTH_ACTIVE_KEY"  },
1071 #endif
1072 #if defined(SCTP_AUTH_DELETE_KEY)
1073         { SCTP_AUTH_DELETE_KEY,         "SCTP_AUTH_DELETE_KEY"  },
1074 #endif
1075 #if defined(SCTP_PEER_AUTH_CHUNKS)
1076         { SCTP_PEER_AUTH_CHUNKS,        "SCTP_PEER_AUTH_CHUNKS" },
1077 #endif
1078 #if defined(SCTP_LOCAL_AUTH_CHUNKS)
1079         { SCTP_LOCAL_AUTH_CHUNKS,       "SCTP_LOCAL_AUTH_CHUNKS"},
1080 #endif
1081 #if defined(SCTP_GET_ASSOC_NUMBER)
1082         { SCTP_GET_ASSOC_NUMBER,        "SCTP_GET_ASSOC_NUMBER" },
1083 #endif
1084
1085         /* linux specific things */
1086 #if defined(SCTP_SOCKOPT_BINDX_ADD)
1087         { SCTP_SOCKOPT_BINDX_ADD,       "SCTP_SOCKOPT_BINDX_ADD"        },
1088 #endif
1089 #if defined(SCTP_SOCKOPT_BINDX_REM)
1090         { SCTP_SOCKOPT_BINDX_REM,       "SCTP_SOCKOPT_BINDX_REM"        },
1091 #endif
1092 #if defined(SCTP_SOCKOPT_PEELOFF)
1093         { SCTP_SOCKOPT_PEELOFF,         "SCTP_SOCKOPT_PEELOFF"          },
1094 #endif
1095 #if defined(SCTP_GET_PEER_ADDRS_NUM_OLD)
1096         { SCTP_GET_PEER_ADDRS_NUM_OLD,  "SCTP_GET_PEER_ADDRS_NUM_OLD"   },
1097 #endif
1098 #if defined(SCTP_GET_PEER_ADDRS_OLD)
1099         { SCTP_GET_PEER_ADDRS_OLD,      "SCTP_GET_PEER_ADDRS_OLD"       },
1100 #endif
1101 #if defined(SCTP_GET_LOCAL_ADDRS_NUM_OLD)
1102         { SCTP_GET_LOCAL_ADDRS_NUM_OLD, "SCTP_GET_LOCAL_ADDRS_NUM_OLD"  },
1103 #endif
1104 #if defined(SCTP_GET_LOCAL_ADDRS_OLD)
1105         { SCTP_GET_LOCAL_ADDRS_OLD,     "SCTP_GET_LOCAL_ADDRS_OLD"      },
1106 #endif
1107 #if defined(SCTP_SOCKOPT_CONNECTX_OLD)
1108         { SCTP_SOCKOPT_CONNECTX_OLD,    "SCTP_SOCKOPT_CONNECTX_OLD"     },
1109 #endif
1110 #if defined(SCTP_GET_PEER_ADDRS)
1111         { SCTP_GET_PEER_ADDRS,          "SCTP_GET_PEER_ADDRS"           },
1112 #endif
1113 #if defined(SCTP_GET_LOCAL_ADDRS)
1114         { SCTP_GET_LOCAL_ADDRS,         "SCTP_GET_LOCAL_ADDRS"          },
1115 #endif
1116
1117         { 0,    NULL    },
1118 };
1119 #endif
1120
1121 #if !defined(SOL_TCP) && defined(IPPROTO_TCP)
1122 #define SOL_TCP IPPROTO_TCP
1123 #endif
1124
1125 #ifdef SOL_TCP
1126 static const struct xlat socktcpoptions[] = {
1127         { TCP_NODELAY,          "TCP_NODELAY"   },
1128         { TCP_MAXSEG,           "TCP_MAXSEG"    },
1129 #ifdef TCP_CORK
1130         { TCP_CORK,             "TCP_CORK"      },
1131 #endif
1132 #ifdef TCP_KEEPIDLE
1133         { TCP_KEEPIDLE,         "TCP_KEEPIDLE"  },
1134 #endif
1135 #ifdef TCP_KEEPINTVL
1136         { TCP_KEEPINTVL,        "TCP_KEEPINTVL" },
1137 #endif
1138 #ifdef TCP_KEEPCNT
1139         { TCP_KEEPCNT,          "TCP_KEEPCNT"   },
1140 #endif
1141 #ifdef TCP_SYNCNT
1142         { TCP_SYNCNT,           "TCP_SYNCNT"    },
1143 #endif
1144 #ifdef TCP_LINGER2
1145         { TCP_LINGER2,          "TCP_LINGER2"   },
1146 #endif
1147 #ifdef TCP_DEFER_ACCEPT
1148         { TCP_DEFER_ACCEPT,     "TCP_DEFER_ACCEPT"      },
1149 #endif
1150 #ifdef TCP_WINDOW_CLAMP
1151         { TCP_WINDOW_CLAMP,     "TCP_WINDOW_CLAMP"      },
1152 #endif
1153 #ifdef TCP_INFO
1154         { TCP_INFO,             "TCP_INFO"      },
1155 #endif
1156 #ifdef TCP_QUICKACK
1157         { TCP_QUICKACK,         "TCP_QUICKACK"  },
1158 #endif
1159 #ifdef TCP_CONGESTION
1160         { TCP_CONGESTION,       "TCP_CONGESTION"        },
1161 #endif
1162 #ifdef TCP_MD5SIG
1163         { TCP_MD5SIG,           "TCP_MD5SIG"    },
1164 #endif
1165 #ifdef TCP_COOKIE_TRANSACTIONS
1166         { TCP_COOKIE_TRANSACTIONS,      "TCP_COOKIE_TRANSACTIONS"       },
1167 #endif
1168 #ifdef TCP_THIN_LINEAR_TIMEOUTS
1169         { TCP_THIN_LINEAR_TIMEOUTS,     "TCP_THIN_LINEAR_TIMEOUTS"      },
1170 #endif
1171 #ifdef TCP_THIN_DUPACK
1172         { TCP_THIN_DUPACK,      "TCP_THIN_DUPACK"       },
1173 #endif
1174 #ifdef TCP_USER_TIMEOUT
1175         { TCP_USER_TIMEOUT,     "TCP_USER_TIMEOUT"      },
1176 #endif
1177 #ifdef TCP_REPAIR
1178         { TCP_REPAIR,           "TCP_REPAIR"    },
1179 #endif
1180 #ifdef TCP_REPAIR_QUEUE
1181         { TCP_REPAIR_QUEUE,     "TCP_REPAIR_QUEUE"      },
1182 #endif
1183 #ifdef TCP_QUEUE_SEQ
1184         { TCP_QUEUE_SEQ,        "TCP_QUEUE_SEQ" },
1185 #endif
1186 #ifdef TCP_REPAIR_OPTIONS
1187         { TCP_REPAIR_OPTIONS,   "TCP_REPAIR_OPTIONS"    },
1188 #endif
1189 #ifdef TCP_FASTOPEN
1190         { TCP_FASTOPEN,         "TCP_FASTOPEN"  },
1191 #endif
1192 #ifdef TCP_TIMESTAMP
1193         { TCP_TIMESTAMP,        "TCP_TIMESTAMP" },
1194 #endif
1195         { 0,                    NULL            },
1196 };
1197 #endif /* SOL_TCP */
1198
1199 #ifdef SOL_RAW
1200 static const struct xlat icmpfilterflags[] = {
1201 #if defined(ICMP_ECHOREPLY)
1202         { (1<<ICMP_ECHOREPLY),          "ICMP_ECHOREPLY"        },
1203 #endif
1204 #if defined(ICMP_DEST_UNREACH)
1205         { (1<<ICMP_DEST_UNREACH),       "ICMP_DEST_UNREACH"     },
1206 #endif
1207 #if defined(ICMP_SOURCE_QUENCH)
1208         { (1<<ICMP_SOURCE_QUENCH),      "ICMP_SOURCE_QUENCH"    },
1209 #endif
1210 #if defined(ICMP_REDIRECT)
1211         { (1<<ICMP_REDIRECT),           "ICMP_REDIRECT"         },
1212 #endif
1213 #if defined(ICMP_ECHO)
1214         { (1<<ICMP_ECHO),               "ICMP_ECHO"             },
1215 #endif
1216 #if defined(ICMP_TIME_EXCEEDED)
1217         { (1<<ICMP_TIME_EXCEEDED),      "ICMP_TIME_EXCEEDED"    },
1218 #endif
1219 #if defined(ICMP_PARAMETERPROB)
1220         { (1<<ICMP_PARAMETERPROB),      "ICMP_PARAMETERPROB"    },
1221 #endif
1222 #if defined(ICMP_TIMESTAMP)
1223         { (1<<ICMP_TIMESTAMP),          "ICMP_TIMESTAMP"        },
1224 #endif
1225 #if defined(ICMP_TIMESTAMPREPLY)
1226         { (1<<ICMP_TIMESTAMPREPLY),     "ICMP_TIMESTAMPREPLY"   },
1227 #endif
1228 #if defined(ICMP_INFO_REQUEST)
1229         { (1<<ICMP_INFO_REQUEST),       "ICMP_INFO_REQUEST"     },
1230 #endif
1231 #if defined(ICMP_INFO_REPLY)
1232         { (1<<ICMP_INFO_REPLY),         "ICMP_INFO_REPLY"       },
1233 #endif
1234 #if defined(ICMP_ADDRESS)
1235         { (1<<ICMP_ADDRESS),            "ICMP_ADDRESS"          },
1236 #endif
1237 #if defined(ICMP_ADDRESSREPLY)
1238         { (1<<ICMP_ADDRESSREPLY),       "ICMP_ADDRESSREPLY"     },
1239 #endif
1240         { 0,                            NULL                    },
1241 };
1242 #endif /* SOL_RAW */
1243
1244 #if defined(AF_PACKET) /* from e.g. linux/if_packet.h */
1245 static const struct xlat af_packet_types[] = {
1246 #if defined(PACKET_HOST)
1247         { PACKET_HOST,                  "PACKET_HOST"           },
1248 #endif
1249 #if defined(PACKET_BROADCAST)
1250         { PACKET_BROADCAST,             "PACKET_BROADCAST"      },
1251 #endif
1252 #if defined(PACKET_MULTICAST)
1253         { PACKET_MULTICAST,             "PACKET_MULTICAST"      },
1254 #endif
1255 #if defined(PACKET_OTHERHOST)
1256         { PACKET_OTHERHOST,             "PACKET_OTHERHOST"      },
1257 #endif
1258 #if defined(PACKET_OUTGOING)
1259         { PACKET_OUTGOING,              "PACKET_OUTGOING"       },
1260 #endif
1261 #if defined(PACKET_LOOPBACK)
1262         { PACKET_LOOPBACK,              "PACKET_LOOPBACK"       },
1263 #endif
1264 #if defined(PACKET_FASTROUTE)
1265         { PACKET_FASTROUTE,             "PACKET_FASTROUTE"      },
1266 #endif
1267         { 0,                            NULL                    },
1268 };
1269 #endif /* defined(AF_PACKET) */
1270
1271 void
1272 printsock(struct tcb *tcp, long addr, int addrlen)
1273 {
1274         union {
1275                 char pad[128];
1276                 struct sockaddr sa;
1277                 struct sockaddr_in sin;
1278                 struct sockaddr_un sau;
1279 #ifdef HAVE_INET_NTOP
1280                 struct sockaddr_in6 sa6;
1281 #endif
1282 #if defined(AF_IPX)
1283                 struct sockaddr_ipx sipx;
1284 #endif
1285 #ifdef AF_PACKET
1286                 struct sockaddr_ll ll;
1287 #endif
1288 #ifdef AF_NETLINK
1289                 struct sockaddr_nl nl;
1290 #endif
1291         } addrbuf;
1292         char string_addr[100];
1293
1294         if (addr == 0) {
1295                 tprints("NULL");
1296                 return;
1297         }
1298         if (!verbose(tcp)) {
1299                 tprintf("%#lx", addr);
1300                 return;
1301         }
1302
1303         if (addrlen < 2 || addrlen > sizeof(addrbuf))
1304                 addrlen = sizeof(addrbuf);
1305
1306         memset(&addrbuf, 0, sizeof(addrbuf));
1307         if (umoven(tcp, addr, addrlen, addrbuf.pad) < 0) {
1308                 tprints("{...}");
1309                 return;
1310         }
1311         addrbuf.pad[sizeof(addrbuf.pad) - 1] = '\0';
1312
1313         tprints("{sa_family=");
1314         printxval(addrfams, addrbuf.sa.sa_family, "AF_???");
1315         tprints(", ");
1316
1317         switch (addrbuf.sa.sa_family) {
1318         case AF_UNIX:
1319                 if (addrlen == 2) {
1320                         tprints("NULL");
1321                 } else if (addrbuf.sau.sun_path[0]) {
1322                         tprints("sun_path=");
1323                         printpathn(tcp, addr + 2, strlen(addrbuf.sau.sun_path));
1324                 } else {
1325                         tprints("sun_path=@");
1326                         printpathn(tcp, addr + 3, strlen(addrbuf.sau.sun_path + 1));
1327                 }
1328                 break;
1329         case AF_INET:
1330                 tprintf("sin_port=htons(%u), sin_addr=inet_addr(\"%s\")",
1331                         ntohs(addrbuf.sin.sin_port), inet_ntoa(addrbuf.sin.sin_addr));
1332                 break;
1333 #ifdef HAVE_INET_NTOP
1334         case AF_INET6:
1335                 inet_ntop(AF_INET6, &addrbuf.sa6.sin6_addr, string_addr, sizeof(string_addr));
1336                 tprintf("sin6_port=htons(%u), inet_pton(AF_INET6, \"%s\", &sin6_addr), sin6_flowinfo=%u",
1337                                 ntohs(addrbuf.sa6.sin6_port), string_addr,
1338                                 addrbuf.sa6.sin6_flowinfo);
1339 #ifdef HAVE_STRUCT_SOCKADDR_IN6_SIN6_SCOPE_ID
1340                 {
1341 #if defined(HAVE_IF_INDEXTONAME) && defined(IN6_IS_ADDR_LINKLOCAL) && defined(IN6_IS_ADDR_MC_LINKLOCAL)
1342                         int numericscope = 0;
1343                         if (IN6_IS_ADDR_LINKLOCAL(&addrbuf.sa6.sin6_addr)
1344                             || IN6_IS_ADDR_MC_LINKLOCAL(&addrbuf.sa6.sin6_addr)) {
1345                                 char scopebuf[IFNAMSIZ + 1];
1346
1347                                 if (if_indextoname(addrbuf.sa6.sin6_scope_id, scopebuf) == NULL)
1348                                         numericscope++;
1349                                 else
1350                                         tprintf(", sin6_scope_id=if_nametoindex(\"%s\")", scopebuf);
1351                         } else
1352                                 numericscope++;
1353
1354                         if (numericscope)
1355 #endif
1356                                 tprintf(", sin6_scope_id=%u", addrbuf.sa6.sin6_scope_id);
1357                 }
1358 #endif
1359                 break;
1360 #endif
1361 #if defined(AF_IPX)
1362         case AF_IPX:
1363                 {
1364                         int i;
1365                         tprintf("sipx_port=htons(%u), ",
1366                                         ntohs(addrbuf.sipx.sipx_port));
1367                         /* Yes, I know, this does not look too
1368                          * strace-ish, but otherwise the IPX
1369                          * addresses just look monstrous...
1370                          * Anyways, feel free if you don't like
1371                          * this way.. :)
1372                          */
1373                         tprintf("%08lx:", (unsigned long)ntohl(addrbuf.sipx.sipx_network));
1374                         for (i = 0; i < IPX_NODE_LEN; i++)
1375                                 tprintf("%02x", addrbuf.sipx.sipx_node[i]);
1376                         tprintf("/[%02x]", addrbuf.sipx.sipx_type);
1377                 }
1378                 break;
1379 #endif /* AF_IPX */
1380 #ifdef AF_PACKET
1381         case AF_PACKET:
1382                 {
1383                         int i;
1384                         tprintf("proto=%#04x, if%d, pkttype=",
1385                                         ntohs(addrbuf.ll.sll_protocol),
1386                                         addrbuf.ll.sll_ifindex);
1387                         printxval(af_packet_types, addrbuf.ll.sll_pkttype, "?");
1388                         tprintf(", addr(%d)={%d, ",
1389                                         addrbuf.ll.sll_halen,
1390                                         addrbuf.ll.sll_hatype);
1391                         for (i = 0; i < addrbuf.ll.sll_halen; i++)
1392                                 tprintf("%02x", addrbuf.ll.sll_addr[i]);
1393                 }
1394                 break;
1395
1396 #endif /* AF_PACKET */
1397 #ifdef AF_NETLINK
1398         case AF_NETLINK:
1399                 tprintf("pid=%d, groups=%08x", addrbuf.nl.nl_pid, addrbuf.nl.nl_groups);
1400                 break;
1401 #endif /* AF_NETLINK */
1402         /* AF_AX25 AF_APPLETALK AF_NETROM AF_BRIDGE AF_AAL5
1403         AF_X25 AF_ROSE etc. still need to be done */
1404
1405         default:
1406                 tprints("sa_data=");
1407                 printstr(tcp, (long) &((struct sockaddr *) addr)->sa_data,
1408                         sizeof addrbuf.sa.sa_data);
1409                 break;
1410         }
1411         tprints("}");
1412 }
1413
1414 #if HAVE_SENDMSG
1415 static const struct xlat scmvals[] = {
1416 #ifdef SCM_RIGHTS
1417         { SCM_RIGHTS,           "SCM_RIGHTS"            },
1418 #endif
1419 #ifdef SCM_CREDENTIALS
1420         { SCM_CREDENTIALS,      "SCM_CREDENTIALS"       },
1421 #endif
1422         { 0,                    NULL                    }
1423 };
1424
1425 static void
1426 printcmsghdr(struct tcb *tcp, unsigned long addr, unsigned long len)
1427 {
1428         struct cmsghdr *cmsg = len < sizeof(struct cmsghdr) ?
1429                                NULL : malloc(len);
1430         if (cmsg == NULL || umoven(tcp, addr, len, (char *) cmsg) < 0) {
1431                 tprintf(", msg_control=%#lx", addr);
1432                 free(cmsg);
1433                 return;
1434         }
1435
1436         tprintf(", {cmsg_len=%u, cmsg_level=", (unsigned) cmsg->cmsg_len);
1437         printxval(socketlayers, cmsg->cmsg_level, "SOL_???");
1438         tprints(", cmsg_type=");
1439
1440         if (cmsg->cmsg_level == SOL_SOCKET) {
1441                 unsigned long cmsg_len;
1442
1443                 printxval(scmvals, cmsg->cmsg_type, "SCM_???");
1444                 cmsg_len = (len < cmsg->cmsg_len) ? len : cmsg->cmsg_len;
1445
1446                 if (cmsg->cmsg_type == SCM_RIGHTS
1447                     && CMSG_LEN(sizeof(int)) <= cmsg_len) {
1448                         int *fds = (int *) CMSG_DATA(cmsg);
1449                         int first = 1;
1450
1451                         tprints(", {");
1452                         while ((char *) fds < ((char *) cmsg + cmsg_len)) {
1453                                 if (!first)
1454                                         tprints(", ");
1455                                 tprintf("%d", *fds++);
1456                                 first = 0;
1457                         }
1458                         tprints("}}");
1459                         free(cmsg);
1460                         return;
1461                 }
1462                 if (cmsg->cmsg_type == SCM_CREDENTIALS
1463                     && CMSG_LEN(sizeof(struct ucred)) <= cmsg_len) {
1464                         struct ucred *uc = (struct ucred *) CMSG_DATA(cmsg);
1465
1466                         tprintf("{pid=%ld, uid=%ld, gid=%ld}}",
1467                                 (long)uc->pid, (long)uc->uid, (long)uc->gid);
1468                         free(cmsg);
1469                         return;
1470                 }
1471         }
1472         free(cmsg);
1473         tprints(", ...}");
1474 }
1475
1476 static void
1477 do_msghdr(struct tcb *tcp, struct msghdr *msg, unsigned long data_size)
1478 {
1479         tprintf("{msg_name(%d)=", msg->msg_namelen);
1480         printsock(tcp, (long)msg->msg_name, msg->msg_namelen);
1481
1482         tprintf(", msg_iov(%lu)=", (unsigned long)msg->msg_iovlen);
1483         tprint_iov_upto(tcp, (unsigned long)msg->msg_iovlen,
1484                    (unsigned long)msg->msg_iov, 1, data_size);
1485
1486 #ifdef HAVE_STRUCT_MSGHDR_MSG_CONTROL
1487         tprintf(", msg_controllen=%lu", (unsigned long)msg->msg_controllen);
1488         if (msg->msg_controllen)
1489                 printcmsghdr(tcp, (unsigned long) msg->msg_control,
1490                              msg->msg_controllen);
1491         tprints(", msg_flags=");
1492         printflags(msg_flags, msg->msg_flags, "MSG_???");
1493 #else /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
1494         tprintf("msg_accrights=%#lx, msg_accrightslen=%u",
1495                 (unsigned long) msg->msg_accrights, msg->msg_accrightslen);
1496 #endif /* !HAVE_STRUCT_MSGHDR_MSG_CONTROL */
1497         tprints("}");
1498 }
1499
1500 struct msghdr32 {
1501         uint32_t /* void* */    msg_name;
1502         uint32_t /* socklen_t */msg_namelen;
1503         uint32_t /* iovec* */   msg_iov;
1504         uint32_t /* size_t */   msg_iovlen;
1505         uint32_t /* void* */    msg_control;
1506         uint32_t /* size_t */   msg_controllen;
1507         uint32_t /* int */      msg_flags;
1508 };
1509 struct mmsghdr32 {
1510         struct msghdr32         msg_hdr;
1511         uint32_t /* unsigned */ msg_len;
1512 };
1513
1514 static void
1515 printmsghdr(struct tcb *tcp, long addr, unsigned long data_size)
1516 {
1517         struct msghdr msg;
1518
1519 #if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
1520         if (current_wordsize == 4) {
1521                 struct msghdr32 msg32;
1522
1523                 if (umove(tcp, addr, &msg32) < 0) {
1524                         tprintf("%#lx", addr);
1525                         return;
1526                 }
1527                 msg.msg_name       = (void*)(long)msg32.msg_name;
1528                 msg.msg_namelen    =              msg32.msg_namelen;
1529                 msg.msg_iov        = (void*)(long)msg32.msg_iov;
1530                 msg.msg_iovlen     =              msg32.msg_iovlen;
1531                 msg.msg_control    = (void*)(long)msg32.msg_control;
1532                 msg.msg_controllen =              msg32.msg_controllen;
1533                 msg.msg_flags      =              msg32.msg_flags;
1534         } else
1535 #endif
1536         if (umove(tcp, addr, &msg) < 0) {
1537                 tprintf("%#lx", addr);
1538                 return;
1539         }
1540         do_msghdr(tcp, &msg, data_size);
1541 }
1542
1543 static void
1544 printmmsghdr(struct tcb *tcp, long addr, unsigned int idx, unsigned long msg_len)
1545 {
1546         struct mmsghdr {
1547                 struct msghdr msg_hdr;
1548                 unsigned msg_len;
1549         } mmsg;
1550
1551 #if SUPPORTED_PERSONALITIES > 1 && SIZEOF_LONG > 4
1552         if (current_wordsize == 4) {
1553                 struct mmsghdr32 mmsg32;
1554
1555                 addr += sizeof(mmsg32) * idx;
1556                 if (umove(tcp, addr, &mmsg32) < 0) {
1557                         tprintf("%#lx", addr);
1558                         return;
1559                 }
1560                 mmsg.msg_hdr.msg_name       = (void*)(long)mmsg32.msg_hdr.msg_name;
1561                 mmsg.msg_hdr.msg_namelen    =              mmsg32.msg_hdr.msg_namelen;
1562                 mmsg.msg_hdr.msg_iov        = (void*)(long)mmsg32.msg_hdr.msg_iov;
1563                 mmsg.msg_hdr.msg_iovlen     =              mmsg32.msg_hdr.msg_iovlen;
1564                 mmsg.msg_hdr.msg_control    = (void*)(long)mmsg32.msg_hdr.msg_control;
1565                 mmsg.msg_hdr.msg_controllen =              mmsg32.msg_hdr.msg_controllen;
1566                 mmsg.msg_hdr.msg_flags      =              mmsg32.msg_hdr.msg_flags;
1567                 mmsg.msg_len                =              mmsg32.msg_len;
1568         } else
1569 #endif
1570         {
1571                 addr += sizeof(mmsg) * idx;
1572                 if (umove(tcp, addr, &mmsg) < 0) {
1573                         tprintf("%#lx", addr);
1574                         return;
1575                 }
1576         }
1577         tprints("{");
1578         do_msghdr(tcp, &mmsg.msg_hdr, msg_len ? msg_len : mmsg.msg_len);
1579         tprintf(", %u}", mmsg.msg_len);
1580 }
1581
1582 static void
1583 decode_mmsg(struct tcb *tcp, unsigned long msg_len)
1584 {
1585         /* mmsgvec */
1586         if (syserror(tcp)) {
1587                 tprintf("%#lx", tcp->u_arg[1]);
1588         } else {
1589                 unsigned int len = tcp->u_rval;
1590                 unsigned int i;
1591
1592                 tprints("{");
1593                 for (i = 0; i < len; ++i) {
1594                         if (i)
1595                                 tprints(", ");
1596                         printmmsghdr(tcp, tcp->u_arg[1], i, msg_len);
1597                 }
1598                 tprints("}");
1599         }
1600         /* vlen */
1601         tprintf(", %u, ", (unsigned int) tcp->u_arg[2]);
1602         /* flags */
1603         printflags(msg_flags, tcp->u_arg[3], "MSG_???");
1604 }
1605
1606 #endif /* HAVE_SENDMSG */
1607
1608 /*
1609  * low bits of the socket type define real socket type,
1610  * other bits are socket type flags.
1611  */
1612 static void
1613 tprint_sock_type(struct tcb *tcp, int flags)
1614 {
1615         const char *str = xlookup(socktypes, flags & SOCK_TYPE_MASK);
1616
1617         if (str) {
1618                 tprints(str);
1619                 flags &= ~SOCK_TYPE_MASK;
1620                 if (!flags)
1621                         return;
1622                 tprints("|");
1623         }
1624         printflags(sock_type_flags, flags, "SOCK_???");
1625 }
1626
1627 int
1628 sys_socket(struct tcb *tcp)
1629 {
1630         if (entering(tcp)) {
1631                 printxval(domains, tcp->u_arg[0], "PF_???");
1632                 tprints(", ");
1633                 tprint_sock_type(tcp, tcp->u_arg[1]);
1634                 tprints(", ");
1635                 switch (tcp->u_arg[0]) {
1636                 case PF_INET:
1637 #ifdef PF_INET6
1638                 case PF_INET6:
1639 #endif
1640                         printxval(protocols, tcp->u_arg[2], "IPPROTO_???");
1641                         break;
1642 #ifdef PF_IPX
1643                 case PF_IPX:
1644                         /* BTW: I don't believe this.. */
1645                         tprints("[");
1646                         printxval(domains, tcp->u_arg[2], "PF_???");
1647                         tprints("]");
1648                         break;
1649 #endif /* PF_IPX */
1650                 default:
1651                         tprintf("%lu", tcp->u_arg[2]);
1652                         break;
1653                 }
1654         }
1655         return 0;
1656 }
1657
1658 int
1659 sys_bind(struct tcb *tcp)
1660 {
1661         if (entering(tcp)) {
1662                 tprintf("%ld, ", tcp->u_arg[0]);
1663                 printsock(tcp, tcp->u_arg[1], tcp->u_arg[2]);
1664                 tprintf(", %lu", tcp->u_arg[2]);
1665         }
1666         return 0;
1667 }
1668
1669 int
1670 sys_connect(struct tcb *tcp)
1671 {
1672         return sys_bind(tcp);
1673 }
1674
1675 int
1676 sys_listen(struct tcb *tcp)
1677 {
1678         if (entering(tcp)) {
1679                 tprintf("%ld, %lu", tcp->u_arg[0], tcp->u_arg[1]);
1680         }
1681         return 0;
1682 }
1683
1684 static int
1685 do_accept(struct tcb *tcp, int flags_arg)
1686 {
1687         if (entering(tcp)) {
1688                 tprintf("%ld, ", tcp->u_arg[0]);
1689                 return 0;
1690         }
1691         if (!tcp->u_arg[2])
1692                 tprintf("%#lx, NULL", tcp->u_arg[1]);
1693         else {
1694                 int len;
1695                 if (tcp->u_arg[1] == 0 || syserror(tcp)
1696                     || umove(tcp, tcp->u_arg[2], &len) < 0) {
1697                         tprintf("%#lx", tcp->u_arg[1]);
1698                 } else {
1699                         printsock(tcp, tcp->u_arg[1], len);
1700                 }
1701                 tprints(", ");
1702                 printnum_int(tcp, tcp->u_arg[2], "%u");
1703         }
1704         if (flags_arg >= 0) {
1705                 tprints(", ");
1706                 printflags(sock_type_flags, tcp->u_arg[flags_arg],
1707                            "SOCK_???");
1708         }
1709         return 0;
1710 }
1711
1712 int
1713 sys_accept(struct tcb *tcp)
1714 {
1715         return do_accept(tcp, -1);
1716 }
1717
1718 int
1719 sys_accept4(struct tcb *tcp)
1720 {
1721         return do_accept(tcp, 3);
1722 }
1723
1724 int
1725 sys_send(struct tcb *tcp)
1726 {
1727         if (entering(tcp)) {
1728                 tprintf("%ld, ", tcp->u_arg[0]);
1729                 printstr(tcp, tcp->u_arg[1], tcp->u_arg[2]);
1730                 tprintf(", %lu, ", tcp->u_arg[2]);
1731                 /* flags */
1732                 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
1733         }
1734         return 0;
1735 }
1736
1737 int
1738 sys_sendto(struct tcb *tcp)
1739 {
1740         if (entering(tcp)) {
1741                 tprintf("%ld, ", tcp->u_arg[0]);
1742                 printstr(tcp, tcp->u_arg[1], tcp->u_arg[2]);
1743                 tprintf(", %lu, ", tcp->u_arg[2]);
1744                 /* flags */
1745                 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
1746                 /* to address */
1747                 tprints(", ");
1748                 printsock(tcp, tcp->u_arg[4], tcp->u_arg[5]);
1749                 /* to length */
1750                 tprintf(", %lu", tcp->u_arg[5]);
1751         }
1752         return 0;
1753 }
1754
1755 #ifdef HAVE_SENDMSG
1756
1757 int
1758 sys_sendmsg(struct tcb *tcp)
1759 {
1760         if (entering(tcp)) {
1761                 tprintf("%ld, ", tcp->u_arg[0]);
1762                 printmsghdr(tcp, tcp->u_arg[1], (unsigned long) -1L);
1763                 /* flags */
1764                 tprints(", ");
1765                 printflags(msg_flags, tcp->u_arg[2], "MSG_???");
1766         }
1767         return 0;
1768 }
1769
1770 int
1771 sys_sendmmsg(struct tcb *tcp)
1772 {
1773         if (entering(tcp)) {
1774                 /* sockfd */
1775                 tprintf("%d, ", (int) tcp->u_arg[0]);
1776                 if (!verbose(tcp)) {
1777                         tprintf("%#lx, %u, ",
1778                                 tcp->u_arg[1], (unsigned int) tcp->u_arg[2]);
1779                         printflags(msg_flags, tcp->u_arg[3], "MSG_???");
1780                 }
1781         } else {
1782                 if (verbose(tcp))
1783                         decode_mmsg(tcp, (unsigned long) -1L);
1784         }
1785         return 0;
1786 }
1787
1788 #endif /* HAVE_SENDMSG */
1789
1790 int
1791 sys_recv(struct tcb *tcp)
1792 {
1793         if (entering(tcp)) {
1794                 tprintf("%ld, ", tcp->u_arg[0]);
1795         } else {
1796                 if (syserror(tcp))
1797                         tprintf("%#lx", tcp->u_arg[1]);
1798                 else
1799                         printstr(tcp, tcp->u_arg[1], tcp->u_rval);
1800
1801                 tprintf(", %lu, ", tcp->u_arg[2]);
1802                 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
1803         }
1804         return 0;
1805 }
1806
1807 int
1808 sys_recvfrom(struct tcb *tcp)
1809 {
1810         int fromlen;
1811
1812         if (entering(tcp)) {
1813                 tprintf("%ld, ", tcp->u_arg[0]);
1814         } else {
1815                 if (syserror(tcp)) {
1816                         tprintf("%#lx, %lu, %lu, %#lx, %#lx",
1817                                 tcp->u_arg[1], tcp->u_arg[2], tcp->u_arg[3],
1818                                 tcp->u_arg[4], tcp->u_arg[5]);
1819                         return 0;
1820                 }
1821                 /* buf */
1822                 printstr(tcp, tcp->u_arg[1], tcp->u_rval);
1823                 /* len */
1824                 tprintf(", %lu, ", tcp->u_arg[2]);
1825                 /* flags */
1826                 printflags(msg_flags, tcp->u_arg[3], "MSG_???");
1827                 /* from address, len */
1828                 if (!tcp->u_arg[4] || !tcp->u_arg[5]) {
1829                         if (tcp->u_arg[4] == 0)
1830                                 tprints(", NULL");
1831                         else
1832                                 tprintf(", %#lx", tcp->u_arg[4]);
1833                         if (tcp->u_arg[5] == 0)
1834                                 tprints(", NULL");
1835                         else
1836                                 tprintf(", %#lx", tcp->u_arg[5]);
1837                         return 0;
1838                 }
1839                 if (umove(tcp, tcp->u_arg[5], &fromlen) < 0) {
1840                         tprints(", {...}, [?]");
1841                         return 0;
1842                 }
1843                 tprints(", ");
1844                 printsock(tcp, tcp->u_arg[4], tcp->u_arg[5]);
1845                 /* from length */
1846                 tprintf(", [%u]", fromlen);
1847         }
1848         return 0;
1849 }
1850
1851 #ifdef HAVE_SENDMSG
1852
1853 int
1854 sys_recvmsg(struct tcb *tcp)
1855 {
1856         if (entering(tcp)) {
1857                 tprintf("%ld, ", tcp->u_arg[0]);
1858         } else {
1859                 if (syserror(tcp) || !verbose(tcp))
1860                         tprintf("%#lx", tcp->u_arg[1]);
1861                 else
1862                         printmsghdr(tcp, tcp->u_arg[1], tcp->u_rval);
1863                 /* flags */
1864                 tprints(", ");
1865                 printflags(msg_flags, tcp->u_arg[2], "MSG_???");
1866         }
1867         return 0;
1868 }
1869
1870 int
1871 sys_recvmmsg(struct tcb *tcp)
1872 {
1873         /* +5 chars are for "left " prefix */
1874         static char str[5 + TIMESPEC_TEXT_BUFSIZE];
1875
1876         if (entering(tcp)) {
1877                 tprintf("%ld, ", tcp->u_arg[0]);
1878                 if (verbose(tcp)) {
1879                         sprint_timespec(str, tcp, tcp->u_arg[4]);
1880                         /* Abusing tcp->auxstr as temp storage.
1881                          * Will be used and freed on syscall exit.
1882                          */
1883                         tcp->auxstr = strdup(str);
1884                 } else {
1885                         tprintf("%#lx, %ld, ", tcp->u_arg[1], tcp->u_arg[2]);
1886                         printflags(msg_flags, tcp->u_arg[3], "MSG_???");
1887                         tprints(", ");
1888                         print_timespec(tcp, tcp->u_arg[4]);
1889                 }
1890                 return 0;
1891         } else {
1892                 if (verbose(tcp)) {
1893                         decode_mmsg(tcp, 0);
1894                         /* timeout on entrance */
1895                         tprintf(", %s", tcp->auxstr ? tcp->auxstr : "{...}");
1896                         free((void *) tcp->auxstr);
1897                         tcp->auxstr = NULL;
1898                 }
1899                 if (syserror(tcp))
1900                         return 0;
1901                 if (tcp->u_rval == 0) {
1902                         tcp->auxstr = "Timeout";
1903                         return RVAL_STR;
1904                 }
1905                 if (!verbose(tcp))
1906                         return 0;
1907                 /* timeout on exit */
1908                 sprint_timespec(stpcpy(str, "left "), tcp, tcp->u_arg[4]);
1909                 tcp->auxstr = str;
1910                 return RVAL_STR;
1911         }
1912 }
1913
1914 #endif /* HAVE_SENDMSG */
1915
1916 static const struct xlat shutdown_modes[] = {
1917         { 0,    "SHUT_RD"       },
1918         { 1,    "SHUT_WR"       },
1919         { 2,    "SHUT_RDWR"     },
1920         { 0,    NULL            }
1921 };
1922
1923 int
1924 sys_shutdown(struct tcb *tcp)
1925 {
1926         if (entering(tcp)) {
1927                 tprintf("%ld, ", tcp->u_arg[0]);
1928                 printxval(shutdown_modes, tcp->u_arg[1], "SHUT_???");
1929         }
1930         return 0;
1931 }
1932
1933 int
1934 sys_getsockname(struct tcb *tcp)
1935 {
1936         return sys_accept(tcp);
1937 }
1938
1939 int
1940 sys_getpeername(struct tcb *tcp)
1941 {
1942         return sys_accept(tcp);
1943 }
1944
1945 static int
1946 do_pipe(struct tcb *tcp, int flags_arg)
1947 {
1948         if (exiting(tcp)) {
1949                 if (syserror(tcp)) {
1950                         tprintf("%#lx", tcp->u_arg[0]);
1951                 } else {
1952 #if !defined(SPARC) && !defined(SPARC64) && !defined(SH) && !defined(IA64)
1953                         int fds[2];
1954
1955                         if (umoven(tcp, tcp->u_arg[0], sizeof fds, (char *) fds) < 0)
1956                                 tprints("[...]");
1957                         else
1958                                 tprintf("[%u, %u]", fds[0], fds[1]);
1959 #elif defined(SPARC) || defined(SPARC64) || defined(SH) || defined(IA64)
1960                         tprintf("[%lu, %lu]", tcp->u_rval, getrval2(tcp));
1961 #else
1962                         tprintf("%#lx", tcp->u_arg[0]);
1963 #endif
1964                 }
1965                 if (flags_arg >= 0) {
1966                         tprints(", ");
1967                         printflags(open_mode_flags, tcp->u_arg[flags_arg], "O_???");
1968                 }
1969         }
1970         return 0;
1971 }
1972
1973 int
1974 sys_pipe(struct tcb *tcp)
1975 {
1976         return do_pipe(tcp, -1);
1977 }
1978
1979 int
1980 sys_pipe2(struct tcb *tcp)
1981 {
1982         return do_pipe(tcp, 1);
1983 }
1984
1985 int
1986 sys_socketpair(struct tcb *tcp)
1987 {
1988         int fds[2];
1989
1990         if (entering(tcp)) {
1991                 printxval(domains, tcp->u_arg[0], "PF_???");
1992                 tprints(", ");
1993                 tprint_sock_type(tcp, tcp->u_arg[1]);
1994                 tprints(", ");
1995                 switch (tcp->u_arg[0]) {
1996                 case PF_INET:
1997                         printxval(protocols, tcp->u_arg[2], "IPPROTO_???");
1998                         break;
1999 #ifdef PF_IPX
2000                 case PF_IPX:
2001                         /* BTW: I don't believe this.. */
2002                         tprints("[");
2003                         printxval(domains, tcp->u_arg[2], "PF_???");
2004                         tprints("]");
2005                         break;
2006 #endif /* PF_IPX */
2007                 default:
2008                         tprintf("%lu", tcp->u_arg[2]);
2009                         break;
2010                 }
2011         } else {
2012                 if (syserror(tcp)) {
2013                         tprintf(", %#lx", tcp->u_arg[3]);
2014                         return 0;
2015                 }
2016                 if (umoven(tcp, tcp->u_arg[3], sizeof fds, (char *) fds) < 0)
2017                         tprints(", [...]");
2018                 else
2019                         tprintf(", [%u, %u]", fds[0], fds[1]);
2020         }
2021         return 0;
2022 }
2023
2024 int
2025 sys_getsockopt(struct tcb *tcp)
2026 {
2027         if (entering(tcp)) {
2028                 tprintf("%ld, ", tcp->u_arg[0]);
2029                 printxval(socketlayers, tcp->u_arg[1], "SOL_???");
2030                 tprints(", ");
2031                 switch (tcp->u_arg[1]) {
2032                 case SOL_SOCKET:
2033                         printxval(sockoptions, tcp->u_arg[2], "SO_???");
2034                         break;
2035 #ifdef SOL_IP
2036                 case SOL_IP:
2037                         printxval(sockipoptions, tcp->u_arg[2], "IP_???");
2038                         break;
2039 #endif
2040 #ifdef SOL_IPV6
2041                 case SOL_IPV6:
2042                         printxval(sockipv6options, tcp->u_arg[2], "IPV6_???");
2043                         break;
2044 #endif
2045 #ifdef SOL_IPX
2046                 case SOL_IPX:
2047                         printxval(sockipxoptions, tcp->u_arg[2], "IPX_???");
2048                         break;
2049 #endif
2050 #ifdef SOL_PACKET
2051                 case SOL_PACKET:
2052                         printxval(sockpacketoptions, tcp->u_arg[2], "PACKET_???");
2053                         break;
2054 #endif
2055 #ifdef SOL_TCP
2056                 case SOL_TCP:
2057                         printxval(socktcpoptions, tcp->u_arg[2], "TCP_???");
2058                         break;
2059 #endif
2060 #ifdef SOL_SCTP
2061                 case SOL_SCTP:
2062                         printxval(socksctpoptions, tcp->u_arg[2], "SCTP_???");
2063                         break;
2064 #endif
2065
2066                 /* SOL_AX25 SOL_ROSE SOL_ATALK SOL_NETROM SOL_UDP SOL_DECNET SOL_X25
2067                  * etc. still need work */
2068                 default:
2069                         tprintf("%lu", tcp->u_arg[2]);
2070                         break;
2071                 }
2072                 tprints(", ");
2073         } else {
2074                 int len;
2075                 if (syserror(tcp) || umove(tcp, tcp->u_arg[4], &len) < 0) {
2076                         tprintf("%#lx, %#lx",
2077                                 tcp->u_arg[3], tcp->u_arg[4]);
2078                         return 0;
2079                 }
2080
2081                 switch (tcp->u_arg[1]) {
2082                 case SOL_SOCKET:
2083                         switch (tcp->u_arg[2]) {
2084 #ifdef SO_LINGER
2085                         case SO_LINGER:
2086                                 if (len == sizeof(struct linger)) {
2087                                         struct linger linger;
2088                                         if (umove(tcp,
2089                                                    tcp->u_arg[3],
2090                                                    &linger) < 0)
2091                                                 break;
2092                                         tprintf("{onoff=%d, linger=%d}, "
2093                                                 "[%d]",
2094                                                 linger.l_onoff,
2095                                                 linger.l_linger,
2096                                                 len);
2097                                         return 0;
2098                                 }
2099                                 break;
2100 #endif
2101 #ifdef SO_PEERCRED
2102                         case SO_PEERCRED:
2103                                 if (len == sizeof(struct ucred)) {
2104                                         struct ucred uc;
2105                                         if (umove(tcp,
2106                                                    tcp->u_arg[3],
2107                                                    &uc) < 0)
2108                                                 break;
2109                                         tprintf("{pid=%ld, uid=%ld, gid=%ld}, "
2110                                                 "[%d]",
2111                                                 (long)uc.pid,
2112                                                 (long)uc.uid,
2113                                                 (long)uc.gid,
2114                                                 len);
2115                                         return 0;
2116                                 }
2117                                 break;
2118 #endif
2119                         }
2120                         break;
2121                 case SOL_PACKET:
2122                         switch (tcp->u_arg[2]) {
2123 #ifdef PACKET_STATISTICS
2124                         case PACKET_STATISTICS:
2125                                 if (len == sizeof(struct tpacket_stats)) {
2126                                         struct tpacket_stats stats;
2127                                         if (umove(tcp,
2128                                                    tcp->u_arg[3],
2129                                                    &stats) < 0)
2130                                                 break;
2131                                         tprintf("{packets=%u, drops=%u}, "
2132                                                 "[%d]",
2133                                                 stats.tp_packets,
2134                                                 stats.tp_drops,
2135                                                 len);
2136                                         return 0;
2137                                 }
2138                                 break;
2139 #endif
2140                         }
2141                         break;
2142                 }
2143
2144                 if (len == sizeof(int)) {
2145                         printnum_int(tcp, tcp->u_arg[3], "%d");
2146                 }
2147                 else {
2148                         printstr(tcp, tcp->u_arg[3], len);
2149                 }
2150                 tprintf(", [%d]", len);
2151         }
2152         return 0;
2153 }
2154
2155 #if defined(ICMP_FILTER)
2156 static void printicmpfilter(struct tcb *tcp, long addr)
2157 {
2158         struct icmp_filter      filter;
2159
2160         if (!addr) {
2161                 tprints("NULL");
2162                 return;
2163         }
2164         if (syserror(tcp) || !verbose(tcp)) {
2165                 tprintf("%#lx", addr);
2166                 return;
2167         }
2168         if (umove(tcp, addr, &filter) < 0) {
2169                 tprints("{...}");
2170                 return;
2171         }
2172
2173         tprints("~(");
2174         printflags(icmpfilterflags, ~filter.data, "ICMP_???");
2175         tprints(")");
2176 }
2177 #endif /* ICMP_FILTER */
2178
2179 static int
2180 printsockopt(struct tcb *tcp, int level, int name, long addr, int len)
2181 {
2182         printxval(socketlayers, level, "SOL_??");
2183         tprints(", ");
2184         switch (level) {
2185         case SOL_SOCKET:
2186                 printxval(sockoptions, name, "SO_???");
2187                 switch (name) {
2188 #if defined(SO_LINGER)
2189                 case SO_LINGER:
2190                         if (len == sizeof(struct linger)) {
2191                                 struct linger linger;
2192                                 if (umove(tcp, addr, &linger) < 0)
2193                                         break;
2194                                 tprintf(", {onoff=%d, linger=%d}",
2195                                         linger.l_onoff,
2196                                         linger.l_linger);
2197                                 return 0;
2198                         }
2199                         break;
2200 #endif
2201                 }
2202                 break;
2203 #ifdef SOL_IP
2204         case SOL_IP:
2205                 printxval(sockipoptions, name, "IP_???");
2206                 break;
2207 #endif
2208 #ifdef SOL_IPV6
2209         case SOL_IPV6:
2210                 printxval(sockipv6options, name, "IPV6_???");
2211                 break;
2212 #endif
2213 #ifdef SOL_IPX
2214         case SOL_IPX:
2215                 printxval(sockipxoptions, name, "IPX_???");
2216                 break;
2217 #endif
2218 #ifdef SOL_PACKET
2219         case SOL_PACKET:
2220                 printxval(sockpacketoptions, name, "PACKET_???");
2221                 /* TODO: decode packate_mreq for PACKET_*_MEMBERSHIP */
2222                 switch (name) {
2223 #ifdef PACKET_RX_RING
2224                 case PACKET_RX_RING:
2225 #endif
2226 #ifdef PACKET_TX_RING
2227                 case PACKET_TX_RING:
2228 #endif
2229 #if defined(PACKET_RX_RING) || defined(PACKET_TX_RING)
2230                         if (len == sizeof(struct tpacket_req)) {
2231                                 struct tpacket_req req;
2232                                 if (umove(tcp, addr, &req) < 0)
2233                                         break;
2234                                 tprintf(", {block_size=%u, block_nr=%u, frame_size=%u, frame_nr=%u}",
2235                                         req.tp_block_size,
2236                                         req.tp_block_nr,
2237                                         req.tp_frame_size,
2238                                         req.tp_frame_nr);
2239                                 return 0;
2240                         }
2241                         break;
2242 #endif /* PACKET_RX_RING || PACKET_TX_RING */
2243                 }
2244                 break;
2245 #endif
2246 #ifdef SOL_TCP
2247         case SOL_TCP:
2248                 printxval(socktcpoptions, name, "TCP_???");
2249                 break;
2250 #endif
2251 #ifdef SOL_SCTP
2252         case SOL_SCTP:
2253                 printxval(socksctpoptions, name, "SCTP_???");
2254                 break;
2255 #endif
2256 #ifdef SOL_RAW
2257         case SOL_RAW:
2258                 printxval(sockrawoptions, name, "RAW_???");
2259                 switch (name) {
2260 #if defined(ICMP_FILTER)
2261                         case ICMP_FILTER:
2262                                 tprints(", ");
2263                                 printicmpfilter(tcp, addr);
2264                                 return 0;
2265 #endif
2266                 }
2267                 break;
2268 #endif
2269
2270                 /* SOL_AX25 SOL_ATALK SOL_NETROM SOL_UDP SOL_DECNET SOL_X25
2271                  * etc. still need work  */
2272
2273         default:
2274                 tprintf("%u", name);
2275         }
2276
2277         /* default arg printing */
2278
2279         tprints(", ");
2280
2281         if (len == sizeof(int)) {
2282                 printnum_int(tcp, addr, "%d");
2283         }
2284         else {
2285                 printstr(tcp, addr, len);
2286         }
2287         return 0;
2288 }
2289
2290 #ifdef HAVE_STRUCT_OPTHDR
2291
2292 void
2293 print_sock_optmgmt(struct tcb *tcp, long addr, int len)
2294 {
2295         int c = 0;
2296         struct opthdr hdr;
2297
2298         while (len >= (int) sizeof hdr) {
2299                 if (umove(tcp, addr, &hdr) < 0) break;
2300                 if (c++) {
2301                         tprints(", ");
2302                 }
2303                 else if (len > hdr.len + sizeof hdr) {
2304                         tprints("[");
2305                 }
2306                 tprints("{");
2307                 addr += sizeof hdr;
2308                 len -= sizeof hdr;
2309                 printsockopt(tcp, hdr.level, hdr.name, addr, hdr.len);
2310                 if (hdr.len > 0) {
2311                         addr += hdr.len;
2312                         len -= hdr.len;
2313                 }
2314                 tprints("}");
2315         }
2316         if (len > 0) {
2317                 if (c++) tprints(", ");
2318                 printstr(tcp, addr, len);
2319         }
2320         if (c > 1) tprints("]");
2321 }
2322
2323 #endif
2324
2325 int
2326 sys_setsockopt(struct tcb *tcp)
2327 {
2328         if (entering(tcp)) {
2329                 tprintf("%ld, ", tcp->u_arg[0]);
2330                 printsockopt(tcp, tcp->u_arg[1], tcp->u_arg[2],
2331                               tcp->u_arg[3], tcp->u_arg[4]);
2332                 tprintf(", %lu", tcp->u_arg[4]);
2333         }
2334         return 0;
2335 }