Line data    Source code

       1             : /*
       2             :  * Copyright (c) 1997, 1998 Kungliga Tekniska Högskolan
       3             :  * (Royal Institute of Technology, Stockholm, Sweden).
       4             :  * All rights reserved.
       5             :  *
       6             :  * Redistribution and use in source and binary forms, with or without
       7             :  * modification, are permitted provided that the following conditions
       8             :  * are met:
       9             :  *
      10             :  * 1. Redistributions of source code must retain the above copyright
      11             :  *    notice, this list of conditions and the following disclaimer.
      12             :  *
      13             :  * 2. Redistributions in binary form must reproduce the above copyright
      14             :  *    notice, this list of conditions and the following disclaimer in the
      15             :  *    documentation and/or other materials provided with the distribution.
      16             :  *
      17             :  * 3. Neither the name of the Institute nor the names of its contributors
      18             :  *    may be used to endorse or promote products derived from this software
      19             :  *    without specific prior written permission.
      20             :  *
      21             :  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
      22             :  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
      23             :  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
      24             :  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
      25             :  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
      26             :  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
      27             :  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
      28             :  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
      29             :  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
      30             :  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
      31             :  * SUCH DAMAGE.
      32             :  */
      33             : 
      34             : #include "krb5_locl.h"
      35             : 
      36             : KRB5_LIB_FUNCTION krb5_ssize_t KRB5_LIB_CALL
      37       38013 : krb5_net_write (krb5_context context,
      38             :                 void *p_fd,
      39             :                 const void *buf,
      40             :                 size_t len)
      41             : {
      42       38013 :     krb5_socket_t fd = *((krb5_socket_t *)p_fd);
      43       38013 :     return net_write(fd, buf, len);
      44             : }
      45             : 
      46             : KRB5_LIB_FUNCTION krb5_ssize_t KRB5_LIB_CALL
      47           0 : krb5_net_write_block(krb5_context context,
      48             :                      void *p_fd,
      49             :                      const void *buf,
      50             :                      size_t len,
      51             :                      time_t timeout)
      52             : {
      53           0 :   krb5_socket_t fd = *((krb5_socket_t *)p_fd);
      54           0 :   int ret;
      55           0 :   struct timeval tv, *tvp;
      56           0 :   const char *cbuf = (const char *)buf;
      57           0 :   size_t rem = len;
      58           0 :   ssize_t count;
      59           0 :   fd_set wfds;
      60             : 
      61           0 :   do {
      62           0 :       FD_ZERO(&wfds);
      63           0 :       FD_SET(fd, &wfds);
      64             : 
      65           0 :       if (timeout != 0) {
      66           0 :           tv.tv_sec = timeout;
      67           0 :           tv.tv_usec = 0;
      68           0 :           tvp = &tv;
      69             :       } else
      70           0 :           tvp = NULL;
      71             : 
      72           0 :       ret = select(fd + 1, NULL, &wfds, NULL, tvp);
      73           0 :       if (rk_IS_SOCKET_ERROR(ret)) {
      74           0 :           if (rk_SOCK_ERRNO == EINTR)
      75           0 :               continue;
      76           0 :           return -1;
      77             :       }
      78             : 
      79             : #ifdef HAVE_WINSOCK
      80             :       if (ret == 0) {
      81             :           WSASetLastError( WSAETIMEDOUT );
      82             :           return 0;
      83             :       }
      84             : 
      85             :       count = send (fd, cbuf, rem, 0);
      86             : 
      87             :       if (rk_IS_SOCKET_ERROR(count)) {
      88             :           return -1;
      89             :       }
      90             : 
      91             : #else
      92           0 :       if (ret == 0) {
      93           0 :           return 0;
      94             :       }
      95             : 
      96           0 :       if (!FD_ISSET(fd, &wfds)) {
      97           0 :           errno = ETIMEDOUT;
      98           0 :           return -1;
      99             :       }
     100             : 
     101           0 :       count = write (fd, cbuf, rem);
     102             : 
     103           0 :       if (count < 0) {
     104           0 :           if (errno == EINTR)
     105           0 :               continue;
     106             :           else
     107           0 :               return count;
     108             :       }
     109             : 
     110             : #endif
     111             : 
     112           0 :       cbuf += count;
     113           0 :       rem -= count;
     114             : 
     115           0 :   } while (rem > 0);
     116             : 
     117           0 :   return len;
     118             : }