src/rx/rx_user.c

   1 /*
   2  * Copyright 2000, International Business Machines Corporation and others.
   3  * All Rights Reserved.
   4  *
   5  * This software has been released under the terms of the IBM Public
   6  * License.  For details, see the LICENSE file in the top-level source
   7  * directory or online at http://www.openafs.org/dl/license10.html
   8  */
   9
  10 /* rx_user.c contains routines specific to the user space UNIX implementation of rx */
  11
  12 /* rxi_syscall is currently not prototyped */
  13
  14 #include <afsconfig.h>
  15 #include <afs/param.h>
  16
  17 #include <roken.h>
  18
  19 #include <afs/opr.h>
  20
  21 #ifdef AFS_NT40_ENV
  22 # include <WINNT/syscfg.h>
  23 #else
  24 # include <net/if.h>
  25 #endif
  26 #if !defined(AFS_AIX_ENV) && !defined(AFS_NT40_ENV)
  27 # include <sys/syscall.h>
  28 #endif
  29 #include <afs/afs_args.h>
  30 #include <afs/afsutil.h>
  31
  32 #ifndef IPPORT_USERRESERVED
  33 /* If in.h doesn't define this, define it anyway.  Unfortunately, defining
  34    this doesn't put the code into the kernel to restrict kernel assigned
  35    port numbers to numbers below IPPORT_USERRESERVED...  */
  36 #define IPPORT_USERRESERVED 5000
  37 # endif
  38
  39 #if defined(AFS_LINUX22_ENV) && defined(AFS_RXERRQ_ENV)
  40 # include <linux/types.h>
  41 # include <linux/errqueue.h>
  42 # if defined(AFS_ADAPT_PMTU) && !defined(IP_MTU)
  43 #  define IP_MTU 14
  44 # endif
  45 #endif
  46
  47 #include "rx.h"
  48 #include "rx_atomic.h"
  49 #include "rx_globals.h"
  50 #include "rx_stats.h"
  51 #include "rx_peer.h"
  52 #include "rx_packet.h"
  53 #include "rx_internal.h"
  54
  55 #ifdef AFS_PTHREAD_ENV
  56
  57 /*
  58  * The rx_if_init_mutex mutex protects the following global variables:
  59  * Inited
  60  */
  61
  62 afs_kmutex_t rx_if_init_mutex;
  63 #define LOCK_IF_INIT MUTEX_ENTER(&rx_if_init_mutex)
  64 #define UNLOCK_IF_INIT MUTEX_EXIT(&rx_if_init_mutex)
  65
  66 /*
  67  * The rx_if_mutex mutex protects the following global variables:
  68  * myNetFlags
  69  * myNetMTUs
  70  * myNetMasks
  71  */
  72
  73 afs_kmutex_t rx_if_mutex;
  74 #define LOCK_IF MUTEX_ENTER(&rx_if_mutex)
  75 #define UNLOCK_IF MUTEX_EXIT(&rx_if_mutex)
  76 #else
  77 #define LOCK_IF_INIT
  78 #define UNLOCK_IF_INIT
  79 #define LOCK_IF
  80 #define UNLOCK_IF
  81 #endif /* AFS_PTHREAD_ENV */
  82
  83
  84 /*
  85  * Make a socket for receiving/sending IP packets.  Set it into non-blocking
  86  * and large buffering modes.  If port isn't specified, the kernel will pick
  87  * one.  Returns the socket (>= 0) on success.  Returns OSI_NULLSOCKET on
  88  * failure. Port must be in network byte order.
  89  */
  90 osi_socket
  91 rxi_GetHostUDPSocket(u_int ahost, u_short port)
  92 {
  93     int binds, code = 0;
  94     osi_socket socketFd = OSI_NULLSOCKET;
  95     struct sockaddr_in taddr;
  96     char *name = "rxi_GetUDPSocket: ";
  97 #ifdef AFS_LINUX22_ENV
  98 # if defined(AFS_ADAPT_PMTU)
  99     int pmtu = IP_PMTUDISC_WANT;
 100 # else
 101     int pmtu = IP_PMTUDISC_DONT;
 102 # endif
 103 #endif
 104
 105 #if !defined(AFS_NT40_ENV)
 106     if (ntohs(port) >= IPPORT_RESERVED && ntohs(port) < IPPORT_USERRESERVED) {
 107 /*      (osi_Msg "%s*WARNING* port number %d is not a reserved port number.  Use port numbers above %d\n", name, port, IPPORT_USERRESERVED);
 108 */ ;
 109     }
 110     if (ntohs(port) > 0 && ntohs(port) < IPPORT_RESERVED && geteuid() != 0) {
 111         (osi_Msg
 112          "%sport number %d is a reserved port number which may only be used by root.  Use port numbers above %d\n",
 113          name, ntohs(port), IPPORT_USERRESERVED);
 114         goto error;
 115     }
 116 #endif
 117     socketFd = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
 118
 119     if (socketFd == OSI_NULLSOCKET) {
 120 #ifdef AFS_NT40_ENV
 121         fprintf(stderr, "socket() failed with error %u\n", WSAGetLastError());
 122 #else
 123         perror("socket");
 124 #endif
 125         goto error;
 126     }
 127
 128 #ifdef AFS_NT40_ENV
 129     rxi_xmit_init(socketFd);
 130 #endif /* AFS_NT40_ENV */
 131
 132     taddr.sin_addr.s_addr = ahost;
 133     taddr.sin_family = AF_INET;
 134     taddr.sin_port = (u_short) port;
 135     memset(&taddr.sin_zero, 0, sizeof(taddr.sin_zero));
 136 #ifdef STRUCT_SOCKADDR_HAS_SA_LEN
 137     taddr.sin_len = sizeof(struct sockaddr_in);
 138 #endif
 139 #define MAX_RX_BINDS 10
 140     for (binds = 0; binds < MAX_RX_BINDS; binds++) {
 141         if (binds)
 142             rxi_Delay(10);
 143         code = bind(socketFd, (struct sockaddr *)&taddr, sizeof(taddr));
 144         break;
 145     }
 146     if (code) {
 147         (osi_Msg "%sbind failed\n", name);
 148         goto error;
 149     }
 150 #if !defined(AFS_NT40_ENV)
 151     /*
 152      * Set close-on-exec on rx socket
 153      */
 154     fcntl(socketFd, F_SETFD, 1);
 155 #endif
 156
 157     /* Use one of three different ways of getting a socket buffer expanded to
 158      * a reasonable size.
 159      */
 160     {
 161         int greedy = 0;
 162         int len1, len2;
 163
 164         len1 = 32766;
 165         len2 = rx_UdpBufSize;
 166
 167         /* find the size closest to rx_UdpBufSize that will be accepted */
 168         while (!greedy && len2 > len1) {
 169             greedy =
 170                 (setsockopt
 171                   (socketFd, SOL_SOCKET, SO_RCVBUF, (char *)&len2,
 172                    sizeof(len2)) >= 0);
 173             if (!greedy)
 174                 len2 /= 2;
 175         }
 176
 177         /* but do not let it get smaller than 32K */
 178         if (len2 < len1)
 179             len2 = len1;
 180
 181         if (len1 < len2)
 182             len1 = len2;
 183
 184
 185         greedy =
 186             (setsockopt
 187              (socketFd, SOL_SOCKET, SO_SNDBUF, (char *)&len1,
 188               sizeof(len1)) >= 0)
 189             &&
 190             (setsockopt
 191              (socketFd, SOL_SOCKET, SO_RCVBUF, (char *)&len2,
 192               sizeof(len2)) >= 0);
 193         if (!greedy)
 194             (osi_Msg "%s*WARNING* Unable to increase buffering on socket\n",
 195              name);
 196         if (rx_stats_active)
 197             rx_atomic_set(&rx_stats.socketGreedy, greedy);
 198     }
 199
 200 #ifdef AFS_LINUX22_ENV
 201     setsockopt(socketFd, SOL_IP, IP_MTU_DISCOVER, &pmtu, sizeof(pmtu));
 202 #endif
 203 #ifdef AFS_RXERRQ_ENV
 204     {
 205         int recverr = 1;
 206         setsockopt(socketFd, SOL_IP, IP_RECVERR, &recverr, sizeof(recverr));
 207     }
 208 #endif
 209     if (rxi_Listen(socketFd) < 0) {
 210         goto error;
 211     }
 212
 213     return socketFd;
 214
 215   error:
 216 #ifdef AFS_NT40_ENV
 217     if (socketFd != OSI_NULLSOCKET)
 218         closesocket(socketFd);
 219 #else
 220     if (socketFd != OSI_NULLSOCKET)
 221         close(socketFd);
 222 #endif
 223
 224     return OSI_NULLSOCKET;
 225 }
 226
 227 osi_socket
 228 rxi_GetUDPSocket(u_short port)
 229 {
 230     return rxi_GetHostUDPSocket(htonl(INADDR_ANY), port);
 231 }
 232
 233 void
 234 osi_Panic(char *msg, ...)
 235 {
 236     va_list ap;
 237     va_start(ap, msg);
 238     (osi_Msg "Fatal Rx error: ");
 239     (osi_VMsg msg, ap);
 240     va_end(ap);
 241     fflush(stderr);
 242     fflush(stdout);
 243     opr_abort();
 244 }
 245
 246 /*
 247  * osi_AssertFailU() -- used by the osi_Assert() macro.
 248  */
 249
 250 void
 251 osi_AssertFailU(const char *expr, const char *file, int line)
 252 {
 253     osi_Panic("assertion failed: %s, file: %s, line: %d\n", expr,
 254               file, line);
 255 }
 256
 257 #if defined(AFS_AIX32_ENV) && !defined(KERNEL)
 258 #ifndef osi_Alloc
 259 static const char memZero;
 260 void *
 261 osi_Alloc(afs_int32 x)
 262 {
 263     /*
 264      * 0-length allocs may return NULL ptr from malloc, so we special-case
 265      * things so that NULL returned iff an error occurred
 266      */
 267     if (x == 0)
 268         return (void *)&memZero;
 269     return(malloc(x));
 270 }
 271
 272 void
 273 osi_Free(void *x, afs_int32 size)
 274 {
 275     if (x == &memZero)
 276         return;
 277     free(x);
 278 }
 279 #endif
 280 #endif /* defined(AFS_AIX32_ENV) && !defined(KERNEL) */
 281
 282 #define ADDRSPERSITE    16
 283
 284
 285 static afs_uint32 rxi_NetAddrs[ADDRSPERSITE];   /* host order */
 286 static int myNetMTUs[ADDRSPERSITE];
 287 static int myNetMasks[ADDRSPERSITE];
 288 static int myNetFlags[ADDRSPERSITE];
 289 static u_int rxi_numNetAddrs;
 290 static int Inited = 0;
 291
 292 #if defined(AFS_NT40_ENV)
 293 int
 294 rxi_getaddr(void)
 295 {
 296     /* The IP address list can change so we must query for it */
 297     rx_GetIFInfo();
 298
 299     /* we don't want to use the loopback adapter which is first */
 300     /* this is a bad bad hack */
 301     if (rxi_numNetAddrs > 1)
 302         return htonl(rxi_NetAddrs[1]);
 303     else if (rxi_numNetAddrs > 0)
 304         return htonl(rxi_NetAddrs[0]);
 305     else
 306         return 0;
 307 }
 308
 309 /*
 310 ** return number of addresses
 311 ** and the addresses themselves in the buffer
 312 ** maxSize - max number of interfaces to return.
 313 */
 314 int
 315 rx_getAllAddr(afs_uint32 * buffer, int maxSize)
 316 {
 317     int count = 0, offset = 0;
 318
 319     /* The IP address list can change so we must query for it */
 320     rx_GetIFInfo();
 321
 322     for (count = 0; offset < rxi_numNetAddrs && maxSize > 0;
 323          count++, offset++, maxSize--)
 324         buffer[count] = htonl(rxi_NetAddrs[offset]);
 325
 326     return count;
 327 }
 328
 329 /* this function returns the total number of interface addresses
 330  * the buffer has to be passed in by the caller. It also returns
 331  * the matching interface mask and mtu.  All values are returned
 332  * in network byte order.
 333  */
 334 int
 335 rx_getAllAddrMaskMtu(afs_uint32 addrBuffer[], afs_uint32 maskBuffer[],
 336                      afs_uint32 mtuBuffer[], int maxSize)
 337 {
 338     int count = 0, offset = 0;
 339
 340     /* The IP address list can change so we must query for it */
 341     rx_GetIFInfo();
 342
 343     for (count = 0;
 344          offset < rxi_numNetAddrs && maxSize > 0;
 345          count++, offset++, maxSize--) {
 346         addrBuffer[count] = htonl(rxi_NetAddrs[offset]);
 347         maskBuffer[count] = htonl(myNetMasks[offset]);
 348         mtuBuffer[count]  = htonl(myNetMTUs[offset]);
 349     }
 350     return count;
 351 }
 352 #endif
 353
 354 #ifdef AFS_NT40_ENV
 355 extern rx_atomic_t rxinit_status;
 356 void
 357 rxi_InitMorePackets(void) {
 358     int npackets, ncbufs;
 359
 360     ncbufs = (rx_maxJumboRecvSize - RX_FIRSTBUFFERSIZE);
 361     if (ncbufs > 0) {
 362         ncbufs = ncbufs / RX_CBUFFERSIZE;
 363         npackets = rx_initSendWindow - 1;
 364         rxi_MorePackets(npackets * (ncbufs + 1));
 365     }
 366 }
 367 void
 368 rx_GetIFInfo(void)
 369 {
 370     u_int maxsize;
 371     u_int rxsize;
 372     afs_uint32 i;
 373
 374     LOCK_IF_INIT;
 375     if (Inited) {
 376         if (Inited < 2 && !rx_atomic_test_bit(&rxinit_status, 0)) {
 377             /* We couldn't initialize more packets earlier.
 378              * Do it now. */
 379             rxi_InitMorePackets();
 380             Inited = 2;
 381         }
 382         UNLOCK_IF_INIT;
 383         return;
 384     }
 385     Inited = 1;
 386     UNLOCK_IF_INIT;
 387
 388     LOCK_IF;
 389     rxi_numNetAddrs = ADDRSPERSITE;
 390     (void)syscfg_GetIFInfo(&rxi_numNetAddrs, rxi_NetAddrs,
 391                            myNetMasks, myNetMTUs, myNetFlags);
 392
 393     for (i = 0; i < rxi_numNetAddrs; i++) {
 394         rxsize = rxi_AdjustIfMTU(myNetMTUs[i] - RX_IPUDP_SIZE);
 395         maxsize =
 396             rxi_nRecvFrags * rxsize + (rxi_nRecvFrags - 1) * UDP_HDR_SIZE;
 397         maxsize = rxi_AdjustMaxMTU(rxsize, maxsize);
 398         if (rx_maxReceiveSize > maxsize) {
 399             rx_maxReceiveSize = MIN(RX_MAX_PACKET_SIZE, maxsize);
 400             rx_maxReceiveSize =
 401                 MIN(rx_maxReceiveSize, rx_maxReceiveSizeUser);
 402         }
 403         if (rx_MyMaxSendSize > maxsize) {
 404             rx_MyMaxSendSize = MIN(RX_MAX_PACKET_SIZE, maxsize);
 405         }
 406     }
 407     UNLOCK_IF;
 408
 409     /*
 410      * If rxinit_status is still set, rx_InitHost() has yet to be called
 411      * and we therefore do not have any mutex locks initialized.  As a
 412      * result we cannot call rxi_MorePackets() without crashing.
 413      */
 414     if (rx_atomic_test_bit(&rxinit_status, 0))
 415         return;
 416
 417     rxi_InitMorePackets();
 418 }
 419 #endif
 420
 421 static afs_uint32
 422 fudge_netmask(afs_uint32 addr)
 423 {
 424     afs_uint32 msk;
 425
 426     if (IN_CLASSA(addr))
 427         msk = IN_CLASSA_NET;
 428     else if (IN_CLASSB(addr))
 429         msk = IN_CLASSB_NET;
 430     else if (IN_CLASSC(addr))
 431         msk = IN_CLASSC_NET;
 432     else
 433         msk = 0;
 434
 435     return msk;
 436 }
 437
 438
 439
 440 #if !defined(AFS_AIX_ENV) && !defined(AFS_NT40_ENV) && !defined(AFS_LINUX20_ENV) && !defined(AFS_DARWIN160_ENV)
 441 int
 442 rxi_syscall(afs_uint32 a3, afs_uint32 a4, void *a5)
 443 {
 444     afs_uint32 rcode;
 445     void (*old) (int);
 446
 447     old = signal(SIGSYS, SIG_IGN);
 448
 449 #if defined(AFS_SGI_ENV)
 450     rcode = afs_syscall(AFS_SYSCALL, 28, a3, a4, a5);
 451 #else
 452     rcode = syscall(AFS_SYSCALL, 28 /* AFSCALL_CALL */ , a3, a4, a5);
 453 #endif /* AFS_SGI_ENV */
 454
 455     signal(SIGSYS, old);
 456
 457     return rcode;
 458 }
 459 #endif /* AFS_AIX_ENV */
 460
 461 #ifndef AFS_NT40_ENV
 462 void
 463 rx_GetIFInfo(void)
 464 {
 465     int s;
 466     int i, j, len, res;
 467     struct ifconf ifc;
 468     struct ifreq ifs[ADDRSPERSITE];
 469     struct ifreq *ifr;
 470 #ifdef  AFS_AIX41_ENV
 471     char buf[BUFSIZ], *cp, *cplim;
 472 #endif
 473     struct sockaddr_in *a;
 474
 475     LOCK_IF_INIT;
 476     if (Inited) {
 477         UNLOCK_IF_INIT;
 478         return;
 479     }
 480     Inited = 1;
 481     UNLOCK_IF_INIT;
 482     LOCK_IF;
 483     rxi_numNetAddrs = 0;
 484     memset(rxi_NetAddrs, 0, sizeof(rxi_NetAddrs));
 485     memset(myNetFlags, 0, sizeof(myNetFlags));
 486     memset(myNetMTUs, 0, sizeof(myNetMTUs));
 487     memset(myNetMasks, 0, sizeof(myNetMasks));
 488     UNLOCK_IF;
 489     s = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
 490     if (s == OSI_NULLSOCKET)
 491         return;
 492 #ifdef  AFS_AIX41_ENV
 493     ifc.ifc_len = sizeof(buf);
 494     ifc.ifc_buf = buf;
 495     ifr = ifc.ifc_req;
 496 #else
 497     ifc.ifc_len = sizeof(ifs);
 498     ifc.ifc_buf = (caddr_t) & ifs[0];
 499     memset(&ifs[0], 0, sizeof(ifs));
 500 #endif
 501     res = ioctl(s, SIOCGIFCONF, &ifc);
 502     if (res < 0) {
 503         /* fputs(stderr, "ioctl error IFCONF\n"); */
 504         close(s);
 505         return;
 506     }
 507
 508     LOCK_IF;
 509 #ifdef  AFS_AIX41_ENV
 510 #define size(p) MAX((p).sa_len, sizeof(p))
 511     cplim = buf + ifc.ifc_len;  /*skip over if's with big ifr_addr's */
 512     for (cp = buf; cp < cplim;
 513          cp += sizeof(ifr->ifr_name) + MAX(a->sin_len, sizeof(*a))) {
 514         if (rxi_numNetAddrs >= ADDRSPERSITE)
 515             break;
 516
 517         ifr = (struct ifreq *)cp;
 518 #else
 519     len = ifc.ifc_len / sizeof(struct ifreq);
 520     if (len > ADDRSPERSITE)
 521         len = ADDRSPERSITE;
 522
 523     for (i = 0; i < len; ++i) {
 524         ifr = &ifs[i];
 525         res = ioctl(s, SIOCGIFADDR, ifr);
 526 #endif
 527         if (res < 0) {
 528             /* fputs(stderr, "ioctl error IFADDR\n");
 529              * perror(ifr->ifr_name);   */
 530             continue;
 531         }
 532         a = (struct sockaddr_in *)&ifr->ifr_addr;
 533         if (a->sin_family != AF_INET)
 534             continue;
 535         rxi_NetAddrs[rxi_numNetAddrs] = ntohl(a->sin_addr.s_addr);
 536         if (rx_IsLoopbackAddr(rxi_NetAddrs[rxi_numNetAddrs])) {
 537             /* we don't really care about "localhost" */
 538             continue;
 539         }
 540         for (j = 0; j < rxi_numNetAddrs; j++) {
 541             if (rxi_NetAddrs[j] == rxi_NetAddrs[rxi_numNetAddrs])
 542                 break;
 543         }
 544         if (j < rxi_numNetAddrs)
 545             continue;
 546
 547         /* fprintf(stderr, "if %s addr=%x\n", ifr->ifr_name,
 548          * rxi_NetAddrs[rxi_numNetAddrs]); */
 549
 550 #ifdef SIOCGIFFLAGS
 551         res = ioctl(s, SIOCGIFFLAGS, ifr);
 552         if (res == 0) {
 553             myNetFlags[rxi_numNetAddrs] = ifr->ifr_flags;
 554 #ifdef IFF_LOOPBACK
 555             /* Handle aliased loopbacks as well. */
 556             if (ifr->ifr_flags & IFF_LOOPBACK)
 557                 continue;
 558 #endif
 559             /* fprintf(stderr, "if %s flags=%x\n",
 560              * ifr->ifr_name, ifr->ifr_flags); */
 561         } else {                /*
 562                                  * fputs(stderr, "ioctl error IFFLAGS\n");
 563                                  * perror(ifr->ifr_name); */
 564         }
 565 #endif /* SIOCGIFFLAGS */
 566
 567 #if !defined(AFS_AIX_ENV) && !defined(AFS_LINUX20_ENV) && !defined(AFS_DARWIN160_ENV)
 568         /* this won't run on an AIX system w/o a cache manager */
 569         rxi_syscallp = rxi_syscall;
 570 #endif
 571
 572         /* If I refer to kernel extensions that aren't loaded on AIX, the
 573          * program refuses to load and run, so I simply can't include the
 574          * following code.  Fortunately, AIX is the one operating system in
 575          * which the subsequent ioctl works reliably. */
 576         if (rxi_syscallp) {
 577             if ((*rxi_syscallp) (20 /*AFSOP_GETMTU */ ,
 578                                  htonl(rxi_NetAddrs[rxi_numNetAddrs]),
 579                                  &(myNetMTUs[rxi_numNetAddrs]))) {
 580                 /* fputs(stderr, "syscall error GETMTU\n");
 581                  * perror(ifr->ifr_name); */
 582                 myNetMTUs[rxi_numNetAddrs] = 0;
 583             }
 584             if ((*rxi_syscallp) (42 /*AFSOP_GETMASK */ ,
 585                                  htonl(rxi_NetAddrs[rxi_numNetAddrs]),
 586                                  &(myNetMasks[rxi_numNetAddrs]))) {
 587                 /* fputs(stderr, "syscall error GETMASK\n");
 588                  * perror(ifr->ifr_name); */
 589                 myNetMasks[rxi_numNetAddrs] = 0;
 590             } else
 591                 myNetMasks[rxi_numNetAddrs] =
 592                     ntohl(myNetMasks[rxi_numNetAddrs]);
 593             /* fprintf(stderr, "if %s mask=0x%x\n",
 594              * ifr->ifr_name, myNetMasks[rxi_numNetAddrs]); */
 595         }
 596
 597         if (myNetMTUs[rxi_numNetAddrs] == 0) {
 598             myNetMTUs[rxi_numNetAddrs] = OLD_MAX_PACKET_SIZE + RX_IPUDP_SIZE;
 599 #ifdef SIOCGIFMTU
 600             res = ioctl(s, SIOCGIFMTU, ifr);
 601             if ((res == 0) && (ifr->ifr_metric > 128)) {        /* sanity check */
 602                 myNetMTUs[rxi_numNetAddrs] = ifr->ifr_metric;
 603                 /* fprintf(stderr, "if %s mtu=%d\n",
 604                  * ifr->ifr_name, ifr->ifr_metric); */
 605             } else {
 606                 /* fputs(stderr, "ioctl error IFMTU\n");
 607                  * perror(ifr->ifr_name); */
 608             }
 609 #endif
 610         }
 611
 612         if (myNetMasks[rxi_numNetAddrs] == 0) {
 613             myNetMasks[rxi_numNetAddrs] =
 614                 fudge_netmask(rxi_NetAddrs[rxi_numNetAddrs]);
 615 #ifdef SIOCGIFNETMASK
 616             res = ioctl(s, SIOCGIFNETMASK, ifr);
 617             if (res == 0) {
 618                 a = (struct sockaddr_in *)&ifr->ifr_addr;
 619                 myNetMasks[rxi_numNetAddrs] = ntohl(a->sin_addr.s_addr);
 620                 /* fprintf(stderr, "if %s subnetmask=0x%x\n",
 621                  * ifr->ifr_name, myNetMasks[rxi_numNetAddrs]); */
 622             } else {
 623                 /* fputs(stderr, "ioctl error IFMASK\n");
 624                  * perror(ifr->ifr_name); */
 625             }
 626 #endif
 627         }
 628
 629         if (!rx_IsLoopbackAddr(rxi_NetAddrs[rxi_numNetAddrs])) {        /* ignore lo0 */
 630             int maxsize;
 631             maxsize =
 632                 rxi_nRecvFrags * (myNetMTUs[rxi_numNetAddrs] - RX_IP_SIZE);
 633             maxsize -= UDP_HDR_SIZE;    /* only the first frag has a UDP hdr */
 634             if (rx_maxReceiveSize < maxsize)
 635                 rx_maxReceiveSize = MIN(RX_MAX_PACKET_SIZE, maxsize);
 636             ++rxi_numNetAddrs;
 637         }
 638     }
 639     UNLOCK_IF;
 640     close(s);
 641
 642     /* have to allocate at least enough to allow a single packet to reach its
 643      * maximum size, so ReadPacket will work.  Allocate enough for a couple
 644      * of packets to do so, for good measure */
 645     {
 646         int npackets, ncbufs;
 647
 648         rx_maxJumboRecvSize =
 649             RX_HEADER_SIZE + rxi_nDgramPackets * RX_JUMBOBUFFERSIZE +
 650             (rxi_nDgramPackets - 1) * RX_JUMBOHEADERSIZE;
 651         rx_maxJumboRecvSize = MAX(rx_maxJumboRecvSize, rx_maxReceiveSize);
 652         ncbufs = (rx_maxJumboRecvSize - RX_FIRSTBUFFERSIZE);
 653         if (ncbufs > 0) {
 654             ncbufs = ncbufs / RX_CBUFFERSIZE;
 655             npackets = rx_initSendWindow - 1;
 656             rxi_MorePackets(npackets * (ncbufs + 1));
 657         }
 658     }
 659 }
 660 #endif /* AFS_NT40_ENV */
 661
 662 /* Called from rxi_FindPeer, when initializing a clear rx_peer structure,
 663  * to get interesting information.
 664  * Curiously enough, the rx_peerHashTable_lock currently protects the
 665  * Inited variable (and hence rx_GetIFInfo). When the fs suite uses
 666  * pthreads, this issue will need to be revisited.
 667  */
 668
 669 void
 670 rxi_InitPeerParams(struct rx_peer *pp)
 671 {
 672     afs_uint32 ppaddr;
 673     u_short rxmtu;
 674     int ix;
 675 #ifdef AFS_ADAPT_PMTU
 676     int sock;
 677     struct sockaddr_in addr;
 678 #endif
 679
 680     LOCK_IF_INIT;
 681     if (!Inited) {
 682         UNLOCK_IF_INIT;
 683         /*
 684          * there's a race here since more than one thread could call
 685          * rx_GetIFInfo.  The race stops in rx_GetIFInfo.
 686          */
 687         rx_GetIFInfo();
 688     } else {
 689         UNLOCK_IF_INIT;
 690     }
 691
 692     /* try to second-guess IP, and identify which link is most likely to
 693      * be used for traffic to/from this host. */
 694     ppaddr = ntohl(pp->host);
 695
 696     pp->ifMTU = 0;
 697     rx_rto_setPeerTimeoutSecs(pp, 2);
 698     /* I don't initialize these, because I presume they are bzero'd...
 699      * pp->burstSize pp->burst pp->burstWait.sec pp->burstWait.usec
 700      */
 701
 702     LOCK_IF;
 703     for (ix = 0; ix < rxi_numNetAddrs; ++ix) {
 704         if ((rxi_NetAddrs[ix] & myNetMasks[ix]) == (ppaddr & myNetMasks[ix])) {
 705 #ifdef IFF_POINTOPOINT
 706             if (myNetFlags[ix] & IFF_POINTOPOINT)
 707                 rx_rto_setPeerTimeoutSecs(pp, 4);
 708 #endif /* IFF_POINTOPOINT */
 709
 710             rxmtu = myNetMTUs[ix] - RX_IPUDP_SIZE;
 711             if (rxmtu < RX_MIN_PACKET_SIZE)
 712                 rxmtu = RX_MIN_PACKET_SIZE;
 713             if (pp->ifMTU < rxmtu)
 714                 pp->ifMTU = MIN(rx_MyMaxSendSize, rxmtu);
 715         }
 716     }
 717     UNLOCK_IF;
 718     if (!pp->ifMTU) {           /* not local */
 719         rx_rto_setPeerTimeoutSecs(pp, 3);
 720         pp->ifMTU = MIN(rx_MyMaxSendSize, RX_REMOTE_PACKET_SIZE);
 721     }
 722 #ifdef AFS_ADAPT_PMTU
 723     sock=socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP);
 724     if (sock != OSI_NULLSOCKET) {
 725         addr.sin_family = AF_INET;
 726         addr.sin_addr.s_addr = pp->host;
 727         addr.sin_port = pp->port;
 728         memset(&addr.sin_zero, 0, sizeof(addr.sin_zero));
 729         if (connect(sock, (struct sockaddr *)&addr, sizeof(addr)) == 0) {
 730             int mtu=0;
 731             socklen_t s = sizeof(mtu);
 732             if (getsockopt(sock, SOL_IP, IP_MTU, &mtu, &s)== 0) {
 733                 pp->ifMTU = MIN(mtu - RX_IPUDP_SIZE, pp->ifMTU);
 734             }
 735         }
 736 # ifdef AFS_NT40_ENV
 737         closesocket(sock);
 738 # else
 739         close(sock);
 740 # endif
 741     }
 742 #endif
 743     pp->ifMTU = rxi_AdjustIfMTU(pp->ifMTU);
 744     pp->maxMTU = OLD_MAX_PACKET_SIZE;   /* for compatibility with old guys */
 745     pp->natMTU = MIN((int)pp->ifMTU, OLD_MAX_PACKET_SIZE);
 746     pp->maxDgramPackets =
 747         MIN(rxi_nDgramPackets,
 748             rxi_AdjustDgramPackets(rxi_nSendFrags, pp->ifMTU));
 749     pp->ifDgramPackets =
 750         MIN(rxi_nDgramPackets,
 751             rxi_AdjustDgramPackets(rxi_nSendFrags, pp->ifMTU));
 752     pp->maxDgramPackets = 1;
 753     /* Initialize slow start parameters */
 754     pp->MTU = MIN(pp->natMTU, pp->maxMTU);
 755     pp->cwind = 1;
 756     pp->nDgramPackets = 1;
 757     pp->congestSeq = 0;
 758 }
 759
 760 /* Don't expose jumobgram internals. */
 761 void
 762 rx_SetNoJumbo(void)
 763 {
 764     rx_maxReceiveSize = OLD_MAX_PACKET_SIZE;
 765     rxi_nSendFrags = rxi_nRecvFrags = 1;
 766 }
 767
 768 /* Override max MTU.  If rx_SetNoJumbo is called, it must be
 769    called before calling rx_SetMaxMTU since SetNoJumbo clobbers rx_maxReceiveSize */
 770 int
 771 rx_SetMaxMTU(int mtu)
 772 {
 773     if (mtu < RX_MIN_PACKET_SIZE || mtu > RX_MAX_PACKET_DATA_SIZE)
 774         return EINVAL;
 775
 776     rx_MyMaxSendSize = rx_maxReceiveSizeUser = rx_maxReceiveSize = mtu;
 777
 778     return 0;
 779 }
 780
 781 #ifdef AFS_RXERRQ_ENV
 782 int
 783 rxi_HandleSocketError(int socket)
 784 {
 785     struct msghdr msg;
 786     struct cmsghdr *cmsg;
 787     struct sock_extended_err *err;
 788     struct sockaddr_in addr;
 789     char controlmsgbuf[256];
 790     int code;
 791
 792     msg.msg_name = &addr;
 793     msg.msg_namelen = sizeof(addr);
 794     msg.msg_iov = NULL;
 795     msg.msg_iovlen = 0;
 796     msg.msg_control = controlmsgbuf;
 797     msg.msg_controllen = 256;
 798     msg.msg_flags = 0;
 799     code = recvmsg(socket, &msg, MSG_ERRQUEUE|MSG_DONTWAIT|MSG_TRUNC);
 800
 801     if (code < 0 || !(msg.msg_flags & MSG_ERRQUEUE))
 802         return 0;
 803
 804     for (cmsg = CMSG_FIRSTHDR(&msg); cmsg; cmsg = CMSG_NXTHDR(&msg, cmsg)) {
 805         if (cmsg->cmsg_level == SOL_IP && cmsg->cmsg_type == IP_RECVERR) {
 806             err = (struct sock_extended_err *)CMSG_DATA(cmsg);
 807             rxi_ProcessNetError(err, addr.sin_addr.s_addr, addr.sin_port);
 808         }
 809     }
 810
 811     return 1;
 812 }
 813 #endif