src/rx/rx_rdwr.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 #include <afsconfig.h>
  11 #ifdef KERNEL
  12 #include "afs/param.h"
  13 #else
  14 #include <afs/param.h>
  15 #endif
  16
  17
  18 #ifdef KERNEL
  19 #ifndef UKERNEL
  20 #ifdef RX_KERNEL_TRACE
  21 #include "rx_kcommon.h"
  22 #endif
  23 #if defined(AFS_DARWIN_ENV) || defined(AFS_XBSD_ENV)
  24 #include "afs/sysincludes.h"
  25 #else
  26 #include "h/types.h"
  27 #include "h/time.h"
  28 #include "h/stat.h"
  29 #if defined(AFS_AIX_ENV) || defined(AFS_AUX_ENV) || defined(AFS_SUN5_ENV)
  30 #include "h/systm.h"
  31 #endif
  32 #ifdef  AFS_OSF_ENV
  33 #include <net/net_globals.h>
  34 #endif /* AFS_OSF_ENV */
  35 #ifdef AFS_LINUX20_ENV
  36 #include "h/socket.h"
  37 #endif
  38 #include "netinet/in.h"
  39 #if defined(AFS_SGI_ENV)
  40 #include "afs/sysincludes.h"
  41 #endif
  42 #endif
  43 #include "afs/afs_args.h"
  44 #include "afs/afs_osi.h"
  45 #if     (defined(AFS_AUX_ENV) || defined(AFS_AIX_ENV))
  46 #include "h/systm.h"
  47 #endif
  48 #else /* !UKERNEL */
  49 #include "afs/sysincludes.h"
  50 #endif /* !UKERNEL */
  51 #ifdef RXDEBUG
  52 #undef RXDEBUG                  /* turn off debugging */
  53 #endif /* RXDEBUG */
  54
  55 #include "rx_kmutex.h"
  56 #include "rx/rx_kernel.h"
  57 #include "rx/rx_clock.h"
  58 #include "rx/rx_queue.h"
  59 #include "rx/rx.h"
  60 #include "rx/rx_globals.h"
  61 #include "afs/lock.h"
  62 #include "afsint.h"
  63 #ifdef  AFS_OSF_ENV
  64 #undef kmem_alloc
  65 #undef kmem_free
  66 #undef mem_alloc
  67 #undef mem_free
  68 #endif /* AFS_OSF_ENV */
  69 #else /* KERNEL */
  70 # include <sys/types.h>
  71 #ifdef AFS_NT40_ENV
  72 # include <winsock2.h>
  73 #else /* !AFS_NT40_ENV */
  74 # include <sys/socket.h>
  75 # include <sys/file.h>
  76 # include <netdb.h>
  77 # include <netinet/in.h>
  78 # include <sys/stat.h>
  79 # include <sys/time.h>
  80 #endif /* !AFS_NT40_ENV */
  81 #include <string.h>
  82 #ifdef HAVE_UNISTD_H
  83 #include <unistd.h>
  84 #endif
  85 # include "rx_user.h"
  86 # include "rx_clock.h"
  87 # include "rx_queue.h"
  88 # include "rx.h"
  89 # include "rx_globals.h"
  90 #endif /* KERNEL */
  91
  92 #ifdef RX_LOCKS_DB
  93 /* rxdb_fileID is used to identify the lock location, along with line#. */
  94 static int rxdb_fileID = RXDB_FILE_RX_RDWR;
  95 #endif /* RX_LOCKS_DB */
  96 /* rxi_ReadProc -- internal version.
  97  *
  98  * LOCKS USED -- called at netpri with rx global lock and call->lock held.
  99  */
 100 int
 101 rxi_ReadProc(struct rx_call *call, char *buf,
 102              int nbytes)
 103 {
 104     struct rx_packet *cp = call->currentPacket;
 105     struct rx_packet *rp;
 106     int requestCount;
 107     unsigned int t;
 108
 109 /* XXXX took out clock_NewTime from here.  Was it needed? */
 110     requestCount = nbytes;
 111
 112     /* Free any packets from the last call to ReadvProc/WritevProc */
 113     if (queue_IsNotEmpty(&call->iovq)) {
 114 #ifdef RXDEBUG_PACKET
 115         call->iovqc -=
 116 #endif /* RXDEBUG_PACKET */
 117             rxi_FreePackets(0, &call->iovq);
 118     }
 119
 120     do {
 121         if (call->nLeft == 0) {
 122             /* Get next packet */
 123             for (;;) {
 124                 if (call->error || (call->mode != RX_MODE_RECEIVING)) {
 125                     if (call->error) {
 126                         return 0;
 127                     }
 128                     if (call->mode == RX_MODE_SENDING) {
 129                         rxi_FlushWrite(call);
 130                         continue;
 131                     }
 132                 }
 133                 if (queue_IsNotEmpty(&call->rq)) {
 134                     /* Check that next packet available is next in sequence */
 135                     rp = queue_First(&call->rq, rx_packet);
 136                     if (rp->header.seq == call->rnext) {
 137                         afs_int32 error;
 138                         struct rx_connection *conn = call->conn;
 139                         queue_Remove(rp);
 140 #ifdef RX_TRACK_PACKETS
 141                         rp->flags &= ~RX_PKTFLAG_RQ;
 142 #endif
 143 #ifdef RXDEBUG_PACKET
 144                         call->rqc--;
 145 #endif /* RXDEBUG_PACKET */
 146
 147                         /* RXS_CheckPacket called to undo RXS_PreparePacket's
 148                          * work.  It may reduce the length of the packet by up
 149                          * to conn->maxTrailerSize, to reflect the length of the
 150                          * data + the header. */
 151                         if ((error =
 152                              RXS_CheckPacket(conn->securityObject, call,
 153                                              rp))) {
 154                             /* Used to merely shut down the call, but now we
 155                              * shut down the whole connection since this may
 156                              * indicate an attempt to hijack it */
 157
 158                             MUTEX_EXIT(&call->lock);
 159                             rxi_ConnectionError(conn, error);
 160                             MUTEX_ENTER(&conn->conn_data_lock);
 161                             rp = rxi_SendConnectionAbort(conn, rp, 0, 0);
 162                             MUTEX_EXIT(&conn->conn_data_lock);
 163                             rxi_FreePacket(rp);
 164                             MUTEX_ENTER(&call->lock);
 165
 166                             return 0;
 167                         }
 168                         call->rnext++;
 169                         cp = call->currentPacket = rp;
 170 #ifdef RX_TRACK_PACKETS
 171                         call->currentPacket->flags |= RX_PKTFLAG_CP;
 172 #endif
 173                         call->curvec = 1;       /* 0th vec is always header */
 174                         /* begin at the beginning [ more or less ], continue
 175                          * on until the end, then stop. */
 176                         call->curpos =
 177                             (char *)cp->wirevec[1].iov_base +
 178                             call->conn->securityHeaderSize;
 179                         call->curlen =
 180                             cp->wirevec[1].iov_len -
 181                             call->conn->securityHeaderSize;
 182
 183                         /* Notice that this code works correctly if the data
 184                          * size is 0 (which it may be--no reply arguments from
 185                          * server, for example).  This relies heavily on the
 186                          * fact that the code below immediately frees the packet
 187                          * (no yields, etc.).  If it didn't, this would be a
 188                          * problem because a value of zero for call->nLeft
 189                          * normally means that there is no read packet */
 190                         call->nLeft = cp->length;
 191                         hadd32(call->bytesRcvd, cp->length);
 192
 193                         /* Send a hard ack for every rxi_HardAckRate+1 packets
 194                          * consumed. Otherwise schedule an event to send
 195                          * the hard ack later on.
 196                          */
 197                         call->nHardAcks++;
 198                         if (!(call->flags & RX_CALL_RECEIVE_DONE)) {
 199                             if (call->nHardAcks > (u_short) rxi_HardAckRate) {
 200                                 rxevent_Cancel(call->delayedAckEvent, call,
 201                                                RX_CALL_REFCOUNT_DELAY);
 202                                 rxi_SendAck(call, 0, 0, RX_ACK_DELAY, 0);
 203                             } else {
 204                                 struct clock when, now;
 205                                 clock_GetTime(&now);
 206                                 when = now;
 207                                 /* Delay to consolidate ack packets */
 208                                 clock_Add(&when, &rx_hardAckDelay);
 209                                 if (!call->delayedAckEvent
 210                                     || clock_Gt(&call->delayedAckEvent->
 211                                                 eventTime, &when)) {
 212                                     rxevent_Cancel(call->delayedAckEvent,
 213                                                    call,
 214                                                    RX_CALL_REFCOUNT_DELAY);
 215                                     CALL_HOLD(call, RX_CALL_REFCOUNT_DELAY);
 216                                     call->delayedAckEvent =
 217                                       rxevent_PostNow(&when, &now,
 218                                                      rxi_SendDelayedAck, call,
 219                                                      0);
 220                                 }
 221                             }
 222                         }
 223                         break;
 224                     }
 225                 }
 226
 227                 /*
 228                  * If we reach this point either we have no packets in the
 229                  * receive queue or the next packet in the queue is not the
 230                  * one we are looking for.  There is nothing else for us to
 231                  * do but wait for another packet to arrive.
 232                  */
 233
 234                 /* Are there ever going to be any more packets? */
 235                 if (call->flags & RX_CALL_RECEIVE_DONE) {
 236                     return requestCount - nbytes;
 237                 }
 238                 /* Wait for in-sequence packet */
 239                 call->flags |= RX_CALL_READER_WAIT;
 240                 clock_NewTime();
 241                 call->startWait = clock_Sec();
 242                 while (call->flags & RX_CALL_READER_WAIT) {
 243 #ifdef  RX_ENABLE_LOCKS
 244                     CV_WAIT(&call->cv_rq, &call->lock);
 245 #else
 246                     osi_rxSleep(&call->rq);
 247 #endif
 248                 }
 249                 cp = call->currentPacket;
 250
 251                 call->startWait = 0;
 252 #ifdef RX_ENABLE_LOCKS
 253                 if (call->error) {
 254                     return 0;
 255                 }
 256 #endif /* RX_ENABLE_LOCKS */
 257             }
 258         } else
 259             /* assert(cp); */
 260             /* MTUXXX  this should be replaced by some error-recovery code before shipping */
 261             /* yes, the following block is allowed to be the ELSE clause (or not) */
 262             /* It's possible for call->nLeft to be smaller than any particular
 263              * iov_len.  Usually, recvmsg doesn't change the iov_len, since it
 264              * reflects the size of the buffer.  We have to keep track of the
 265              * number of bytes read in the length field of the packet struct.  On
 266              * the final portion of a received packet, it's almost certain that
 267              * call->nLeft will be smaller than the final buffer. */
 268             while (nbytes && cp) {
 269                 t = MIN((int)call->curlen, nbytes);
 270                 t = MIN(t, (int)call->nLeft);
 271                 memcpy(buf, call->curpos, t);
 272                 buf += t;
 273                 nbytes -= t;
 274                 call->curpos += t;
 275                 call->curlen -= t;
 276                 call->nLeft -= t;
 277
 278                 if (!call->nLeft) {
 279                     /* out of packet.  Get another one. */
 280 #ifdef RX_TRACK_PACKETS
 281                     call->currentPacket->flags &= ~RX_PKTFLAG_CP;
 282 #endif
 283                     rxi_FreePacket(cp);
 284                     cp = call->currentPacket = (struct rx_packet *)0;
 285                 } else if (!call->curlen) {
 286                     /* need to get another struct iov */
 287                     if (++call->curvec >= cp->niovecs) {
 288                         /* current packet is exhausted, get ready for another */
 289                         /* don't worry about curvec and stuff, they get set somewhere else */
 290 #ifdef RX_TRACK_PACKETS
 291                         call->currentPacket->flags &= ~RX_PKTFLAG_CP;
 292 #endif
 293                         rxi_FreePacket(cp);
 294                         cp = call->currentPacket = (struct rx_packet *)0;
 295                         call->nLeft = 0;
 296                     } else {
 297                         call->curpos =
 298                             (char *)cp->wirevec[call->curvec].iov_base;
 299                         call->curlen = cp->wirevec[call->curvec].iov_len;
 300                     }
 301                 }
 302             }
 303         if (!nbytes) {
 304             /* user buffer is full, return */
 305             return requestCount;
 306         }
 307
 308     } while (nbytes);
 309
 310     return requestCount;
 311 }
 312
 313 int
 314 rx_ReadProc(struct rx_call *call, char *buf, int nbytes)
 315 {
 316     int bytes;
 317     int tcurlen;
 318     int tnLeft;
 319     char *tcurpos;
 320     SPLVAR;
 321
 322     /* Free any packets from the last call to ReadvProc/WritevProc */
 323     if (!queue_IsEmpty(&call->iovq)) {
 324 #ifdef RXDEBUG_PACKET
 325         call->iovqc -=
 326 #endif /* RXDEBUG_PACKET */
 327             rxi_FreePackets(0, &call->iovq);
 328     }
 329
 330     /*
 331      * Most common case, all of the data is in the current iovec.
 332      * We are relying on nLeft being zero unless the call is in receive mode.
 333      */
 334     tcurlen = call->curlen;
 335     tnLeft = call->nLeft;
 336     if (!call->error && tcurlen > nbytes && tnLeft > nbytes) {
 337         tcurpos = call->curpos;
 338         memcpy(buf, tcurpos, nbytes);
 339
 340         call->curpos = tcurpos + nbytes;
 341         call->curlen = tcurlen - nbytes;
 342         call->nLeft = tnLeft - nbytes;
 343
 344         if (!call->nLeft && call->currentPacket != NULL) {
 345             /* out of packet.  Get another one. */
 346             rxi_FreePacket(call->currentPacket);
 347             call->currentPacket = (struct rx_packet *)0;
 348         }
 349         return nbytes;
 350     }
 351
 352     NETPRI;
 353     MUTEX_ENTER(&call->lock);
 354     bytes = rxi_ReadProc(call, buf, nbytes);
 355     MUTEX_EXIT(&call->lock);
 356     USERPRI;
 357     return bytes;
 358 }
 359
 360 /* Optimization for unmarshalling 32 bit integers */
 361 int
 362 rx_ReadProc32(struct rx_call *call, afs_int32 * value)
 363 {
 364     int bytes;
 365     int tcurlen;
 366     int tnLeft;
 367     char *tcurpos;
 368     SPLVAR;
 369
 370     /* Free any packets from the last call to ReadvProc/WritevProc */
 371     if (!queue_IsEmpty(&call->iovq)) {
 372 #ifdef RXDEBUG_PACKET
 373         call->iovqc -=
 374 #endif /* RXDEBUG_PACKET */
 375             rxi_FreePackets(0, &call->iovq);
 376     }
 377
 378     /*
 379      * Most common case, all of the data is in the current iovec.
 380      * We are relying on nLeft being zero unless the call is in receive mode.
 381      */
 382     tcurlen = call->curlen;
 383     tnLeft = call->nLeft;
 384     if (!call->error && tcurlen >= sizeof(afs_int32)
 385         && tnLeft >= sizeof(afs_int32)) {
 386         tcurpos = call->curpos;
 387
 388         memcpy((char *)value, tcurpos, sizeof(afs_int32));
 389
 390         call->curpos = tcurpos + sizeof(afs_int32);
 391         call->curlen = (u_short)(tcurlen - sizeof(afs_int32));
 392         call->nLeft = (u_short)(tnLeft - sizeof(afs_int32));
 393         if (!call->nLeft && call->currentPacket != NULL) {
 394             /* out of packet.  Get another one. */
 395             rxi_FreePacket(call->currentPacket);
 396             call->currentPacket = (struct rx_packet *)0;
 397         }
 398         return sizeof(afs_int32);
 399     }
 400
 401     NETPRI;
 402     MUTEX_ENTER(&call->lock);
 403     bytes = rxi_ReadProc(call, (char *)value, sizeof(afs_int32));
 404     MUTEX_EXIT(&call->lock);
 405     USERPRI;
 406
 407     return bytes;
 408 }
 409
 410 /* rxi_FillReadVec
 411  *
 412  * Uses packets in the receive queue to fill in as much of the
 413  * current iovec as possible. Does not block if it runs out
 414  * of packets to complete the iovec. Return true if an ack packet
 415  * was sent, otherwise return false */
 416 int
 417 rxi_FillReadVec(struct rx_call *call, afs_uint32 serial)
 418 {
 419     int didConsume = 0;
 420     int didHardAck = 0;
 421     unsigned int t;
 422     struct rx_packet *rp;
 423     struct rx_packet *curp;
 424     struct iovec *call_iov;
 425     struct iovec *cur_iov = NULL;
 426
 427     curp = call->currentPacket;
 428     if (curp) {
 429         cur_iov = &curp->wirevec[call->curvec];
 430     }
 431     call_iov = &call->iov[call->iovNext];
 432
 433     while (!call->error && call->iovNBytes && call->iovNext < call->iovMax) {
 434         if (call->nLeft == 0) {
 435             /* Get next packet */
 436             if (queue_IsNotEmpty(&call->rq)) {
 437                 /* Check that next packet available is next in sequence */
 438                 rp = queue_First(&call->rq, rx_packet);
 439                 if (rp->header.seq == call->rnext) {
 440                     afs_int32 error;
 441                     struct rx_connection *conn = call->conn;
 442                     queue_Remove(rp);
 443 #ifdef RX_TRACK_PACKETS
 444                     rp->flags &= ~RX_PKTFLAG_RQ;
 445 #endif
 446 #ifdef RXDEBUG_PACKET
 447                     call->rqc--;
 448 #endif /* RXDEBUG_PACKET */
 449
 450                     /* RXS_CheckPacket called to undo RXS_PreparePacket's
 451                      * work.  It may reduce the length of the packet by up
 452                      * to conn->maxTrailerSize, to reflect the length of the
 453                      * data + the header. */
 454                     if ((error =
 455                          RXS_CheckPacket(conn->securityObject, call, rp))) {
 456                         /* Used to merely shut down the call, but now we
 457                          * shut down the whole connection since this may
 458                          * indicate an attempt to hijack it */
 459
 460                         MUTEX_EXIT(&call->lock);
 461                         rxi_ConnectionError(conn, error);
 462                         MUTEX_ENTER(&conn->conn_data_lock);
 463                         rp = rxi_SendConnectionAbort(conn, rp, 0, 0);
 464                         MUTEX_EXIT(&conn->conn_data_lock);
 465                         rxi_FreePacket(rp);
 466                         MUTEX_ENTER(&call->lock);
 467
 468                         return 1;
 469                     }
 470                     call->rnext++;
 471                     curp = call->currentPacket = rp;
 472 #ifdef RX_TRACK_PACKETS
 473                     call->currentPacket->flags |= RX_PKTFLAG_CP;
 474 #endif
 475                     call->curvec = 1;   /* 0th vec is always header */
 476                     cur_iov = &curp->wirevec[1];
 477                     /* begin at the beginning [ more or less ], continue
 478                      * on until the end, then stop. */
 479                     call->curpos =
 480                         (char *)curp->wirevec[1].iov_base +
 481                         call->conn->securityHeaderSize;
 482                     call->curlen =
 483                         curp->wirevec[1].iov_len -
 484                         call->conn->securityHeaderSize;
 485
 486                     /* Notice that this code works correctly if the data
 487                      * size is 0 (which it may be--no reply arguments from
 488                      * server, for example).  This relies heavily on the
 489                      * fact that the code below immediately frees the packet
 490                      * (no yields, etc.).  If it didn't, this would be a
 491                      * problem because a value of zero for call->nLeft
 492                      * normally means that there is no read packet */
 493                     call->nLeft = curp->length;
 494                     hadd32(call->bytesRcvd, curp->length);
 495
 496                     /* Send a hard ack for every rxi_HardAckRate+1 packets
 497                      * consumed. Otherwise schedule an event to send
 498                      * the hard ack later on.
 499                      */
 500                     call->nHardAcks++;
 501                     didConsume = 1;
 502                     continue;
 503                 }
 504             }
 505             break;
 506         }
 507
 508         /* It's possible for call->nLeft to be smaller than any particular
 509          * iov_len.  Usually, recvmsg doesn't change the iov_len, since it
 510          * reflects the size of the buffer.  We have to keep track of the
 511          * number of bytes read in the length field of the packet struct.  On
 512          * the final portion of a received packet, it's almost certain that
 513          * call->nLeft will be smaller than the final buffer. */
 514         while (call->iovNBytes && call->iovNext < call->iovMax && curp) {
 515
 516             t = MIN((int)call->curlen, call->iovNBytes);
 517             t = MIN(t, (int)call->nLeft);
 518             call_iov->iov_base = call->curpos;
 519             call_iov->iov_len = t;
 520             call_iov++;
 521             call->iovNext++;
 522             call->iovNBytes -= t;
 523             call->curpos += t;
 524             call->curlen -= t;
 525             call->nLeft -= t;
 526
 527             if (!call->nLeft) {
 528                 /* out of packet.  Get another one. */
 529 #ifdef RX_TRACK_PACKETS
 530                 curp->flags &= ~RX_PKTFLAG_CP;
 531                 curp->flags |= RX_PKTFLAG_IOVQ;
 532 #endif
 533                 queue_Append(&call->iovq, curp);
 534 #ifdef RXDEBUG_PACKET
 535                 call->iovqc++;
 536 #endif /* RXDEBUG_PACKET */
 537                 curp = call->currentPacket = (struct rx_packet *)0;
 538             } else if (!call->curlen) {
 539                 /* need to get another struct iov */
 540                 if (++call->curvec >= curp->niovecs) {
 541                     /* current packet is exhausted, get ready for another */
 542                     /* don't worry about curvec and stuff, they get set somewhere else */
 543 #ifdef RX_TRACK_PACKETS
 544                     curp->flags &= ~RX_PKTFLAG_CP;
 545                     curp->flags |= RX_PKTFLAG_IOVQ;
 546 #endif
 547                     queue_Append(&call->iovq, curp);
 548 #ifdef RXDEBUG_PACKET
 549                     call->iovqc++;
 550 #endif /* RXDEBUG_PACKET */
 551                     curp = call->currentPacket = (struct rx_packet *)0;
 552                     call->nLeft = 0;
 553                 } else {
 554                     cur_iov++;
 555                     call->curpos = (char *)cur_iov->iov_base;
 556                     call->curlen = cur_iov->iov_len;
 557                 }
 558             }
 559         }
 560     }
 561
 562     /* If we consumed any packets then check whether we need to
 563      * send a hard ack. */
 564     if (didConsume && (!(call->flags & RX_CALL_RECEIVE_DONE))) {
 565         if (call->nHardAcks > (u_short) rxi_HardAckRate) {
 566             rxevent_Cancel(call->delayedAckEvent, call,
 567                            RX_CALL_REFCOUNT_DELAY);
 568             rxi_SendAck(call, 0, serial, RX_ACK_DELAY, 0);
 569             didHardAck = 1;
 570         } else {
 571             struct clock when, now;
 572             clock_GetTime(&now);
 573             when = now;
 574             /* Delay to consolidate ack packets */
 575             clock_Add(&when, &rx_hardAckDelay);
 576             if (!call->delayedAckEvent
 577                 || clock_Gt(&call->delayedAckEvent->eventTime, &when)) {
 578                 rxevent_Cancel(call->delayedAckEvent, call,
 579                                RX_CALL_REFCOUNT_DELAY);
 580                 CALL_HOLD(call, RX_CALL_REFCOUNT_DELAY);
 581                 call->delayedAckEvent =
 582                     rxevent_PostNow(&when, &now, rxi_SendDelayedAck, call, 0);
 583             }
 584         }
 585     }
 586     return didHardAck;
 587 }
 588
 589
 590 /* rxi_ReadvProc -- internal version.
 591  *
 592  * Fills in an iovec with pointers to the packet buffers. All packets
 593  * except the last packet (new current packet) are moved to the iovq
 594  * while the application is processing the data.
 595  *
 596  * LOCKS USED -- called at netpri with rx global lock and call->lock held.
 597  */
 598 int
 599 rxi_ReadvProc(struct rx_call *call, struct iovec *iov, int *nio, int maxio,
 600               int nbytes)
 601 {
 602     /* Free any packets from the last call to ReadvProc/WritevProc */
 603     if (queue_IsNotEmpty(&call->iovq)) {
 604 #ifdef RXDEBUG_PACKET
 605         call->iovqc -=
 606 #endif /* RXDEBUG_PACKET */
 607             rxi_FreePackets(0, &call->iovq);
 608     }
 609
 610     if (call->mode == RX_MODE_SENDING) {
 611         rxi_FlushWrite(call);
 612     }
 613
 614     if (call->error) {
 615         return 0;
 616     }
 617
 618     /* Get whatever data is currently available in the receive queue.
 619      * If rxi_FillReadVec sends an ack packet then it is possible
 620      * that we will receive more data while we drop the call lock
 621      * to send the packet. Set the RX_CALL_IOVEC_WAIT flag
 622      * here to avoid a race with the receive thread if we send
 623      * hard acks in rxi_FillReadVec. */
 624     call->flags |= RX_CALL_IOVEC_WAIT;
 625     call->iovNBytes = nbytes;
 626     call->iovMax = maxio;
 627     call->iovNext = 0;
 628     call->iov = iov;
 629     rxi_FillReadVec(call, 0);
 630
 631     /* if we need more data then sleep until the receive thread has
 632      * filled in the rest. */
 633     if (!call->error && call->iovNBytes && call->iovNext < call->iovMax
 634         && !(call->flags & RX_CALL_RECEIVE_DONE)) {
 635         call->flags |= RX_CALL_READER_WAIT;
 636         clock_NewTime();
 637         call->startWait = clock_Sec();
 638         while (call->flags & RX_CALL_READER_WAIT) {
 639 #ifdef  RX_ENABLE_LOCKS
 640             CV_WAIT(&call->cv_rq, &call->lock);
 641 #else
 642             osi_rxSleep(&call->rq);
 643 #endif
 644         }
 645         call->startWait = 0;
 646     }
 647     call->flags &= ~RX_CALL_IOVEC_WAIT;
 648 #ifdef RX_ENABLE_LOCKS
 649     if (call->error) {
 650         return 0;
 651     }
 652 #endif /* RX_ENABLE_LOCKS */
 653
 654     call->iov = NULL;
 655     *nio = call->iovNext;
 656     return nbytes - call->iovNBytes;
 657 }
 658
 659 int
 660 rx_ReadvProc(struct rx_call *call, struct iovec *iov, int *nio, int maxio,
 661              int nbytes)
 662 {
 663     int bytes;
 664     SPLVAR;
 665
 666     NETPRI;
 667     MUTEX_ENTER(&call->lock);
 668     bytes = rxi_ReadvProc(call, iov, nio, maxio, nbytes);
 669     MUTEX_EXIT(&call->lock);
 670     USERPRI;
 671     return bytes;
 672 }
 673
 674 /* rxi_WriteProc -- internal version.
 675  *
 676  * LOCKS USED -- called at netpri with rx global lock and call->lock held. */
 677
 678 int
 679 rxi_WriteProc(struct rx_call *call, char *buf,
 680               int nbytes)
 681 {
 682     struct rx_connection *conn = call->conn;
 683     struct rx_packet *cp = call->currentPacket;
 684     unsigned int t;
 685     int requestCount = nbytes;
 686
 687     /* Free any packets from the last call to ReadvProc/WritevProc */
 688     if (queue_IsNotEmpty(&call->iovq)) {
 689 #ifdef RXDEBUG_PACKET
 690         call->iovqc -=
 691 #endif /* RXDEBUG_PACKET */
 692             rxi_FreePackets(0, &call->iovq);
 693     }
 694
 695     if (call->mode != RX_MODE_SENDING) {
 696         if ((conn->type == RX_SERVER_CONNECTION)
 697             && (call->mode == RX_MODE_RECEIVING)) {
 698             call->mode = RX_MODE_SENDING;
 699             if (cp) {
 700 #ifdef RX_TRACK_PACKETS
 701                 cp->flags &= ~RX_PKTFLAG_CP;
 702 #endif
 703                 rxi_FreePacket(cp);
 704                 cp = call->currentPacket = (struct rx_packet *)0;
 705                 call->nLeft = 0;
 706                 call->nFree = 0;
 707             }
 708         } else {
 709             return 0;
 710         }
 711     }
 712
 713     /* Loop condition is checked at end, so that a write of 0 bytes
 714      * will force a packet to be created--specially for the case where
 715      * there are 0 bytes on the stream, but we must send a packet
 716      * anyway. */
 717     do {
 718         if (call->nFree == 0) {
 719             if (!call->error && cp) {
 720                 /* Clear the current packet now so that if
 721                  * we are forced to wait and drop the lock
 722                  * the packet we are planning on using
 723                  * cannot be freed.
 724                  */
 725 #ifdef RX_TRACK_PACKETS
 726                 cp->flags &= ~RX_PKTFLAG_CP;
 727 #endif
 728                 call->currentPacket = (struct rx_packet *)0;
 729 #ifdef AFS_GLOBAL_RXLOCK_KERNEL
 730                 /* Wait until TQ_BUSY is reset before adding any
 731                  * packets to the transmit queue
 732                  */
 733                 while (call->flags & RX_CALL_TQ_BUSY) {
 734                     call->flags |= RX_CALL_TQ_WAIT;
 735                     call->tqWaiters++;
 736 #ifdef RX_ENABLE_LOCKS
 737                     CV_WAIT(&call->cv_tq, &call->lock);
 738 #else /* RX_ENABLE_LOCKS */
 739                     osi_rxSleep(&call->tq);
 740 #endif /* RX_ENABLE_LOCKS */
 741                     call->tqWaiters--;
 742                     if (call->tqWaiters == 0)
 743                         call->flags &= ~RX_CALL_TQ_WAIT;
 744                 }
 745 #endif /* AFS_GLOBAL_RXLOCK_KERNEL */
 746                 clock_NewTime();        /* Bogus:  need new time package */
 747                 /* The 0, below, specifies that it is not the last packet:
 748                  * there will be others. PrepareSendPacket may
 749                  * alter the packet length by up to
 750                  * conn->securityMaxTrailerSize */
 751                 hadd32(call->bytesSent, cp->length);
 752                 rxi_PrepareSendPacket(call, cp, 0);
 753 #ifdef RX_TRACK_PACKETS
 754                 cp->flags |= RX_PKTFLAG_TQ;
 755 #endif
 756                 queue_Append(&call->tq, cp);
 757 #ifdef RXDEBUG_PACKET
 758                 call->tqc++;
 759 #endif /* RXDEBUG_PACKET */
 760                 cp = (struct rx_packet *)0;
 761                 if (!
 762                     (call->
 763                      flags & (RX_CALL_FAST_RECOVER |
 764                               RX_CALL_FAST_RECOVER_WAIT))) {
 765                     rxi_Start(0, call, 0, 0);
 766                 }
 767             } else if (cp) {
 768 #ifdef RX_TRACK_PACKETS
 769                 cp->flags &= ~RX_PKTFLAG_CP;
 770 #endif
 771                 rxi_FreePacket(cp);
 772                 cp = call->currentPacket = (struct rx_packet *)0;
 773             }
 774             /* Wait for transmit window to open up */
 775             while (!call->error
 776                    && call->tnext + 1 > call->tfirst + (2 * call->twind)) {
 777                 clock_NewTime();
 778                 call->startWait = clock_Sec();
 779
 780 #ifdef  RX_ENABLE_LOCKS
 781                 CV_WAIT(&call->cv_twind, &call->lock);
 782 #else
 783                 call->flags |= RX_CALL_WAIT_WINDOW_ALLOC;
 784                 osi_rxSleep(&call->twind);
 785 #endif
 786
 787                 call->startWait = 0;
 788 #ifdef RX_ENABLE_LOCKS
 789                 if (call->error) {
 790                     return 0;
 791                 }
 792 #endif /* RX_ENABLE_LOCKS */
 793             }
 794             if ((cp = rxi_AllocSendPacket(call, nbytes))) {
 795 #ifdef RX_TRACK_PACKETS
 796                 cp->flags |= RX_PKTFLAG_CP;
 797 #endif
 798                 call->currentPacket = cp;
 799                 call->nFree = cp->length;
 800                 call->curvec = 1;       /* 0th vec is always header */
 801                 /* begin at the beginning [ more or less ], continue
 802                  * on until the end, then stop. */
 803                 call->curpos =
 804                     (char *)cp->wirevec[1].iov_base +
 805                     call->conn->securityHeaderSize;
 806                 call->curlen =
 807                     cp->wirevec[1].iov_len - call->conn->securityHeaderSize;
 808             }
 809             if (call->error) {
 810                 if (cp) {
 811 #ifdef RX_TRACK_PACKETS
 812                     cp->flags &= ~RX_PKTFLAG_CP;
 813 #endif
 814                     rxi_FreePacket(cp);
 815                     call->currentPacket = NULL;
 816                 }
 817                 return 0;
 818             }
 819         }
 820
 821         if (cp && (int)call->nFree < nbytes) {
 822             /* Try to extend the current buffer */
 823             int len, mud;
 824             len = cp->length;
 825             mud = rx_MaxUserDataSize(call);
 826             if (mud > len) {
 827                 int want;
 828                 want = MIN(nbytes - (int)call->nFree, mud - len);
 829                 rxi_AllocDataBuf(cp, want, RX_PACKET_CLASS_SEND_CBUF);
 830                 if (cp->length > (unsigned)mud)
 831                     cp->length = mud;
 832                 call->nFree += (cp->length - len);
 833             }
 834         }
 835
 836         /* If the remaining bytes fit in the buffer, then store them
 837          * and return.  Don't ship a buffer that's full immediately to
 838          * the peer--we don't know if it's the last buffer yet */
 839
 840         if (!cp) {
 841             call->nFree = 0;
 842         }
 843
 844         while (nbytes && call->nFree) {
 845
 846             t = MIN((int)call->curlen, nbytes);
 847             t = MIN((int)call->nFree, t);
 848             memcpy(call->curpos, buf, t);
 849             buf += t;
 850             nbytes -= t;
 851             call->curpos += t;
 852             call->curlen -= (u_short)t;
 853             call->nFree -= (u_short)t;
 854
 855             if (!call->curlen) {
 856                 /* need to get another struct iov */
 857                 if (++call->curvec >= cp->niovecs) {
 858                     /* current packet is full, extend or send it */
 859                     call->nFree = 0;
 860                 } else {
 861                     call->curpos = (char *)cp->wirevec[call->curvec].iov_base;
 862                     call->curlen = cp->wirevec[call->curvec].iov_len;
 863                 }
 864             }
 865         }                       /* while bytes to send and room to send them */
 866
 867         /* might be out of space now */
 868         if (!nbytes) {
 869             return requestCount;
 870         } else;                 /* more data to send, so get another packet and keep going */
 871     } while (nbytes);
 872
 873     return requestCount - nbytes;
 874 }
 875
 876 int
 877 rx_WriteProc(struct rx_call *call, char *buf, int nbytes)
 878 {
 879     int bytes;
 880     int tcurlen;
 881     int tnFree;
 882     char *tcurpos;
 883     SPLVAR;
 884
 885     /* Free any packets from the last call to ReadvProc/WritevProc */
 886     if (queue_IsNotEmpty(&call->iovq)) {
 887 #ifdef RXDEBUG_PACKET
 888         call->iovqc -=
 889 #endif /* RXDEBUG_PACKET */
 890             rxi_FreePackets(0, &call->iovq);
 891     }
 892
 893     /*
 894      * Most common case: all of the data fits in the current iovec.
 895      * We are relying on nFree being zero unless the call is in send mode.
 896      */
 897     tcurlen = (int)call->curlen;
 898     tnFree = (int)call->nFree;
 899     if (!call->error && tcurlen >= nbytes && tnFree >= nbytes) {
 900         tcurpos = call->curpos;
 901
 902         memcpy(tcurpos, buf, nbytes);
 903         call->curpos = tcurpos + nbytes;
 904         call->curlen = (u_short)(tcurlen - nbytes);
 905         call->nFree = (u_short)(tnFree - nbytes);
 906         return nbytes;
 907     }
 908
 909     NETPRI;
 910     MUTEX_ENTER(&call->lock);
 911     bytes = rxi_WriteProc(call, buf, nbytes);
 912     MUTEX_EXIT(&call->lock);
 913     USERPRI;
 914     return bytes;
 915 }
 916
 917 /* Optimization for marshalling 32 bit arguments */
 918 int
 919 rx_WriteProc32(struct rx_call *call, afs_int32 * value)
 920 {
 921     int bytes;
 922     int tcurlen;
 923     int tnFree;
 924     char *tcurpos;
 925     SPLVAR;
 926
 927     if (queue_IsNotEmpty(&call->iovq)) {
 928 #ifdef RXDEBUG_PACKET
 929         call->iovqc -=
 930 #endif /* RXDEBUG_PACKET */
 931             rxi_FreePackets(0, &call->iovq);
 932     }
 933
 934     /*
 935      * Most common case: all of the data fits in the current iovec.
 936      * We are relying on nFree being zero unless the call is in send mode.
 937      */
 938     tcurlen = call->curlen;
 939     tnFree = call->nFree;
 940     if (!call->error && tcurlen >= sizeof(afs_int32)
 941         && tnFree >= sizeof(afs_int32)) {
 942         tcurpos = call->curpos;
 943
 944         if (!((size_t)tcurpos & (sizeof(afs_int32) - 1))) {
 945             *((afs_int32 *) (tcurpos)) = *value;
 946         } else {
 947             memcpy(tcurpos, (char *)value, sizeof(afs_int32));
 948         }
 949         call->curpos = tcurpos + sizeof(afs_int32);
 950         call->curlen = (u_short)(tcurlen - sizeof(afs_int32));
 951         call->nFree = (u_short)(tnFree - sizeof(afs_int32));
 952         return sizeof(afs_int32);
 953     }
 954
 955     NETPRI;
 956     MUTEX_ENTER(&call->lock);
 957     bytes = rxi_WriteProc(call, (char *)value, sizeof(afs_int32));
 958     MUTEX_EXIT(&call->lock);
 959     USERPRI;
 960     return bytes;
 961 }
 962
 963 /* rxi_WritevAlloc -- internal version.
 964  *
 965  * Fill in an iovec to point to data in packet buffers. The application
 966  * calls rxi_WritevProc when the buffers are full.
 967  *
 968  * LOCKS USED -- called at netpri with rx global lock and call->lock held. */
 969
 970 int
 971 rxi_WritevAlloc(struct rx_call *call, struct iovec *iov, int *nio, int maxio,
 972                 int nbytes)
 973 {
 974     struct rx_connection *conn = call->conn;
 975     struct rx_packet *cp = call->currentPacket;
 976     int requestCount;
 977     int nextio;
 978     /* Temporary values, real work is done in rxi_WritevProc */
 979     int tnFree;
 980     unsigned int tcurvec;
 981     char *tcurpos;
 982     int tcurlen;
 983
 984     requestCount = nbytes;
 985     nextio = 0;
 986
 987     /* Free any packets from the last call to ReadvProc/WritevProc */
 988     if (queue_IsNotEmpty(&call->iovq)) {
 989 #ifdef RXDEBUG_PACKET
 990         call->iovqc -=
 991 #endif /* RXDEBUG_PACKET */
 992             rxi_FreePackets(0, &call->iovq);
 993     }
 994
 995     if (call->mode != RX_MODE_SENDING) {
 996         if ((conn->type == RX_SERVER_CONNECTION)
 997             && (call->mode == RX_MODE_RECEIVING)) {
 998             call->mode = RX_MODE_SENDING;
 999             if (cp) {
1000 #ifdef RX_TRACK_PACKETS
1001                 cp->flags &= ~RX_PKTFLAG_CP;
1002 #endif
1003                 rxi_FreePacket(cp);
1004                 cp = call->currentPacket = (struct rx_packet *)0;
1005                 call->nLeft = 0;
1006                 call->nFree = 0;
1007             }
1008         } else {
1009             return 0;
1010         }
1011     }
1012
1013     /* Set up the iovec to point to data in packet buffers. */
1014     tnFree = call->nFree;
1015     tcurvec = call->curvec;
1016     tcurpos = call->curpos;
1017     tcurlen = call->curlen;
1018     do {
1019         int t;
1020
1021         if (tnFree == 0) {
1022             /* current packet is full, allocate a new one */
1023             cp = rxi_AllocSendPacket(call, nbytes);
1024             if (cp == NULL) {
1025                 /* out of space, return what we have */
1026                 *nio = nextio;
1027                 return requestCount - nbytes;
1028             }
1029 #ifdef RX_TRACK_PACKETS
1030             cp->flags |= RX_PKTFLAG_IOVQ;
1031 #endif
1032             queue_Append(&call->iovq, cp);
1033 #ifdef RXDEBUG_PACKET
1034             call->iovqc++;
1035 #endif /* RXDEBUG_PACKET */
1036             tnFree = cp->length;
1037             tcurvec = 1;
1038             tcurpos =
1039                 (char *)cp->wirevec[1].iov_base +
1040                 call->conn->securityHeaderSize;
1041             tcurlen = cp->wirevec[1].iov_len - call->conn->securityHeaderSize;
1042         }
1043
1044         if (tnFree < nbytes) {
1045             /* try to extend the current packet */
1046             int len, mud;
1047             len = cp->length;
1048             mud = rx_MaxUserDataSize(call);
1049             if (mud > len) {
1050                 int want;
1051                 want = MIN(nbytes - tnFree, mud - len);
1052                 rxi_AllocDataBuf(cp, want, RX_PACKET_CLASS_SEND_CBUF);
1053                 if (cp->length > (unsigned)mud)
1054                     cp->length = mud;
1055                 tnFree += (cp->length - len);
1056                 if (cp == call->currentPacket) {
1057                     call->nFree += (cp->length - len);
1058                 }
1059             }
1060         }
1061
1062         /* fill in the next entry in the iovec */
1063         t = MIN(tcurlen, nbytes);
1064         t = MIN(tnFree, t);
1065         iov[nextio].iov_base = tcurpos;
1066         iov[nextio].iov_len = t;
1067         nbytes -= t;
1068         tcurpos += t;
1069         tcurlen -= t;
1070         tnFree -= t;
1071         nextio++;
1072
1073         if (!tcurlen) {
1074             /* need to get another struct iov */
1075             if (++tcurvec >= cp->niovecs) {
1076                 /* current packet is full, extend it or move on to next packet */
1077                 tnFree = 0;
1078             } else {
1079                 tcurpos = (char *)cp->wirevec[tcurvec].iov_base;
1080                 tcurlen = cp->wirevec[tcurvec].iov_len;
1081             }
1082         }
1083     } while (nbytes && nextio < maxio);
1084     *nio = nextio;
1085     return requestCount - nbytes;
1086 }
1087
1088 int
1089 rx_WritevAlloc(struct rx_call *call, struct iovec *iov, int *nio, int maxio,
1090                int nbytes)
1091 {
1092     int bytes;
1093     SPLVAR;
1094
1095     NETPRI;
1096     MUTEX_ENTER(&call->lock);
1097     bytes = rxi_WritevAlloc(call, iov, nio, maxio, nbytes);
1098     MUTEX_EXIT(&call->lock);
1099     USERPRI;
1100     return bytes;
1101 }
1102
1103 /* rxi_WritevProc -- internal version.
1104  *
1105  * Send buffers allocated in rxi_WritevAlloc.
1106  *
1107  * LOCKS USED -- called at netpri with rx global lock and call->lock held. */
1108
1109 int
1110 rxi_WritevProc(struct rx_call *call, struct iovec *iov, int nio, int nbytes)
1111 {
1112     struct rx_packet *cp = NULL;
1113 #ifdef RX_TRACK_PACKETS
1114     struct rx_packet *p, *np;
1115 #endif
1116     int nextio;
1117     int requestCount;
1118     struct rx_queue tmpq;
1119 #ifdef RXDEBUG_PACKET
1120     u_short tmpqc;
1121 #endif
1122
1123     requestCount = nbytes;
1124     nextio = 0;
1125
1126     if (call->mode != RX_MODE_SENDING) {
1127         call->error = RX_PROTOCOL_ERROR;
1128     }
1129 #ifdef AFS_GLOBAL_RXLOCK_KERNEL
1130     /* Wait until TQ_BUSY is reset before trying to move any
1131      * packets to the transmit queue.  */
1132     while (!call->error && call->flags & RX_CALL_TQ_BUSY) {
1133         call->flags |= RX_CALL_TQ_WAIT;
1134         call->tqWaiters++;
1135 #ifdef RX_ENABLE_LOCKS
1136         CV_WAIT(&call->cv_tq, &call->lock);
1137 #else /* RX_ENABLE_LOCKS */
1138         osi_rxSleep(&call->tq);
1139 #endif /* RX_ENABLE_LOCKS */
1140         call->tqWaiters--;
1141         if (call->tqWaiters == 0)
1142             call->flags &= ~RX_CALL_TQ_WAIT;
1143     }
1144 #endif /* AFS_GLOBAL_RXLOCK_KERNEL */
1145     /* cp is no longer valid since we may have given up the lock */
1146     cp = call->currentPacket;
1147
1148     if (call->error) {
1149         if (cp) {
1150 #ifdef RX_TRACK_PACKETS
1151             cp->flags &= ~RX_PKTFLAG_CP;
1152             cp->flags |= RX_PKTFLAG_IOVQ;
1153 #endif
1154             queue_Prepend(&call->iovq, cp);
1155 #ifdef RXDEBUG_PACKET
1156             call->iovqc++;
1157 #endif /* RXDEBUG_PACKET */
1158             cp = call->currentPacket = (struct rx_packet *)0;
1159         }
1160 #ifdef RXDEBUG_PACKET
1161         call->iovqc -=
1162 #endif /* RXDEBUG_PACKET */
1163             rxi_FreePackets(0, &call->iovq);
1164         return 0;
1165     }
1166
1167     /* Loop through the I/O vector adjusting packet pointers.
1168      * Place full packets back onto the iovq once they are ready
1169      * to send. Set RX_PROTOCOL_ERROR if any problems are found in
1170      * the iovec. We put the loop condition at the end to ensure that
1171      * a zero length write will push a short packet. */
1172     nextio = 0;
1173     queue_Init(&tmpq);
1174 #ifdef RXDEBUG_PACKET
1175     tmpqc = 0;
1176 #endif /* RXDEBUG_PACKET */
1177     do {
1178         if (call->nFree == 0 && cp) {
1179             clock_NewTime();    /* Bogus:  need new time package */
1180             /* The 0, below, specifies that it is not the last packet:
1181              * there will be others. PrepareSendPacket may
1182              * alter the packet length by up to
1183              * conn->securityMaxTrailerSize */
1184             hadd32(call->bytesSent, cp->length);
1185             rxi_PrepareSendPacket(call, cp, 0);
1186             queue_Append(&tmpq, cp);
1187 #ifdef RXDEBUG_PACKET
1188             tmpqc++;
1189 #endif /* RXDEBUG_PACKET */
1190             cp = call->currentPacket = (struct rx_packet *)0;
1191
1192             /* The head of the iovq is now the current packet */
1193             if (nbytes) {
1194                 if (queue_IsEmpty(&call->iovq)) {
1195                     call->error = RX_PROTOCOL_ERROR;
1196 #ifdef RXDEBUG_PACKET
1197                     tmpqc -=
1198 #endif /* RXDEBUG_PACKET */
1199                         rxi_FreePackets(0, &tmpq);
1200                     return 0;
1201                 }
1202                 cp = queue_First(&call->iovq, rx_packet);
1203                 queue_Remove(cp);
1204 #ifdef RX_TRACK_PACKETS
1205                 cp->flags &= ~RX_PKTFLAG_IOVQ;
1206 #endif
1207 #ifdef RXDEBUG_PACKET
1208                 call->iovqc--;
1209 #endif /* RXDEBUG_PACKET */
1210 #ifdef RX_TRACK_PACKETS
1211                 cp->flags |= RX_PKTFLAG_CP;
1212 #endif
1213                 call->currentPacket = cp;
1214                 call->nFree = cp->length;
1215                 call->curvec = 1;
1216                 call->curpos =
1217                     (char *)cp->wirevec[1].iov_base +
1218                     call->conn->securityHeaderSize;
1219                 call->curlen =
1220                     cp->wirevec[1].iov_len - call->conn->securityHeaderSize;
1221             }
1222         }
1223
1224         if (nbytes) {
1225             /* The next iovec should point to the current position */
1226             if (iov[nextio].iov_base != call->curpos
1227                 || iov[nextio].iov_len > (int)call->curlen) {
1228                 call->error = RX_PROTOCOL_ERROR;
1229                 if (cp) {
1230 #ifdef RX_TRACK_PACKETS
1231                     cp->flags &= ~RX_PKTFLAG_CP;
1232 #endif
1233                     queue_Prepend(&tmpq, cp);
1234 #ifdef RXDEBUG_PACKET
1235                     tmpqc++;
1236 #endif /* RXDEBUG_PACKET */
1237                     cp = call->currentPacket = (struct rx_packet *)0;
1238                 }
1239 #ifdef RXDEBUG_PACKET
1240                 tmpqc -=
1241 #endif /* RXDEBUG_PACKET */
1242                     rxi_FreePackets(0, &tmpq);
1243                 return 0;
1244             }
1245             nbytes -= iov[nextio].iov_len;
1246             call->curpos += iov[nextio].iov_len;
1247             call->curlen -= iov[nextio].iov_len;
1248             call->nFree -= iov[nextio].iov_len;
1249             nextio++;
1250             if (call->curlen == 0) {
1251                 if (++call->curvec > cp->niovecs) {
1252                     call->nFree = 0;
1253                 } else {
1254                     call->curpos = (char *)cp->wirevec[call->curvec].iov_base;
1255                     call->curlen = cp->wirevec[call->curvec].iov_len;
1256                 }
1257             }
1258         }
1259     } while (nbytes && nextio < nio);
1260
1261     /* Move the packets from the temporary queue onto the transmit queue.
1262      * We may end up with more than call->twind packets on the queue. */
1263
1264 #ifdef RX_TRACK_PACKETS
1265     for (queue_Scan(&tmpq, p, np, rx_packet))
1266     {
1267         p->flags |= RX_PKTFLAG_TQ;
1268     }
1269 #endif
1270     queue_SpliceAppend(&call->tq, &tmpq);
1271
1272     if (!(call->flags & (RX_CALL_FAST_RECOVER | RX_CALL_FAST_RECOVER_WAIT))) {
1273         rxi_Start(0, call, 0, 0);
1274     }
1275
1276     /* Wait for the length of the transmit queue to fall below call->twind */
1277     while (!call->error && call->tnext + 1 > call->tfirst + (2 * call->twind)) {
1278         clock_NewTime();
1279         call->startWait = clock_Sec();
1280 #ifdef  RX_ENABLE_LOCKS
1281         CV_WAIT(&call->cv_twind, &call->lock);
1282 #else
1283         call->flags |= RX_CALL_WAIT_WINDOW_ALLOC;
1284         osi_rxSleep(&call->twind);
1285 #endif
1286         call->startWait = 0;
1287     }
1288     /* cp is no longer valid since we may have given up the lock */
1289     cp = call->currentPacket;
1290
1291     if (call->error) {
1292         if (cp) {
1293 #ifdef RX_TRACK_PACKETS
1294             cp->flags &= ~RX_PKTFLAG_CP;
1295 #endif
1296             rxi_FreePacket(cp);
1297             cp = call->currentPacket = (struct rx_packet *)0;
1298         }
1299         return 0;
1300     }
1301
1302     return requestCount - nbytes;
1303 }
1304
1305 int
1306 rx_WritevProc(struct rx_call *call, struct iovec *iov, int nio, int nbytes)
1307 {
1308     int bytes;
1309     SPLVAR;
1310
1311     NETPRI;
1312     MUTEX_ENTER(&call->lock);
1313     bytes = rxi_WritevProc(call, iov, nio, nbytes);
1314     MUTEX_EXIT(&call->lock);
1315     USERPRI;
1316     return bytes;
1317 }
1318
1319 /* Flush any buffered data to the stream, switch to read mode
1320  * (clients) or to EOF mode (servers) */
1321 void
1322 rxi_FlushWrite(struct rx_call *call)
1323 {
1324     struct rx_packet *cp = NULL;
1325
1326     /* Free any packets from the last call to ReadvProc/WritevProc */
1327     if (queue_IsNotEmpty(&call->iovq)) {
1328 #ifdef RXDEBUG_PACKET
1329         call->iovqc -=
1330 #endif /* RXDEBUG_PACKET */
1331             rxi_FreePackets(0, &call->iovq);
1332     }
1333
1334     if (call->mode == RX_MODE_SENDING) {
1335
1336         call->mode =
1337             (call->conn->type ==
1338              RX_CLIENT_CONNECTION ? RX_MODE_RECEIVING : RX_MODE_EOF);
1339
1340 #ifdef RX_KERNEL_TRACE
1341         {
1342             int glockOwner = ISAFS_GLOCK();
1343             if (!glockOwner)
1344                 AFS_GLOCK();
1345             afs_Trace3(afs_iclSetp, CM_TRACE_WASHERE, ICL_TYPE_STRING,
1346                        __FILE__, ICL_TYPE_INT32, __LINE__, ICL_TYPE_POINTER,
1347                        call);
1348             if (!glockOwner)
1349                 AFS_GUNLOCK();
1350         }
1351 #endif
1352
1353 #ifdef AFS_GLOBAL_RXLOCK_KERNEL
1354         /* Wait until TQ_BUSY is reset before adding any
1355          * packets to the transmit queue
1356          */
1357         while (call->flags & RX_CALL_TQ_BUSY) {
1358             call->flags |= RX_CALL_TQ_WAIT;
1359             call->tqWaiters++;
1360 #ifdef RX_ENABLE_LOCKS
1361             CV_WAIT(&call->cv_tq, &call->lock);
1362 #else /* RX_ENABLE_LOCKS */
1363             osi_rxSleep(&call->tq);
1364 #endif /* RX_ENABLE_LOCKS */
1365             call->tqWaiters--;
1366             if (call->tqWaiters == 0)
1367                 call->flags &= ~RX_CALL_TQ_WAIT;
1368         }
1369 #endif /* AFS_GLOBAL_RXLOCK_KERNEL */
1370
1371         /* cp is no longer valid since we may have given up the lock */
1372         cp = call->currentPacket;
1373
1374         if (cp) {
1375             /* cp->length is only supposed to be the user's data */
1376             /* cp->length was already set to (then-current)
1377              * MaxUserDataSize or less. */
1378 #ifdef RX_TRACK_PACKETS
1379             cp->flags &= ~RX_PKTFLAG_CP;
1380 #endif
1381             cp->length -= call->nFree;
1382             call->currentPacket = (struct rx_packet *)0;
1383             call->nFree = 0;
1384         } else {
1385             cp = rxi_AllocSendPacket(call, 0);
1386             if (!cp) {
1387                 /* Mode can no longer be MODE_SENDING */
1388                 return;
1389             }
1390             cp->length = 0;
1391             cp->niovecs = 2;    /* header + space for rxkad stuff */
1392             call->nFree = 0;
1393         }
1394
1395         /* The 1 specifies that this is the last packet */
1396         hadd32(call->bytesSent, cp->length);
1397         rxi_PrepareSendPacket(call, cp, 1);
1398 #ifdef RX_TRACK_PACKETS
1399         cp->flags |= RX_PKTFLAG_TQ;
1400 #endif
1401         queue_Append(&call->tq, cp);
1402 #ifdef RXDEBUG_PACKET
1403         call->tqc++;
1404 #endif /* RXDEBUG_PACKET */
1405         if (!
1406             (call->
1407              flags & (RX_CALL_FAST_RECOVER | RX_CALL_FAST_RECOVER_WAIT))) {
1408             rxi_Start(0, call, 0, 0);
1409         }
1410     }
1411 }
1412
1413 /* Flush any buffered data to the stream, switch to read mode
1414  * (clients) or to EOF mode (servers) */
1415 void
1416 rx_FlushWrite(struct rx_call *call)
1417 {
1418     SPLVAR;
1419     NETPRI;
1420     MUTEX_ENTER(&call->lock);
1421     rxi_FlushWrite(call);
1422     MUTEX_EXIT(&call->lock);
1423     USERPRI;
1424 }