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