[BACK]Return to aitrpc.c CVS log [TXT] [DIR] Up to [ELWIX - Embedded LightWeight unIX -] / libaitrpc / src

Diff for /libaitrpc/src/aitrpc.c between versions 1.10 and 1.17.2.3

version 1.10, 2013/05/30 09:22:01 version 1.17.2.3, 2015/05/18 15:00:54
Line 12  terms: Line 12  terms:
 All of the documentation and software included in the ELWIX and AITNET  All of the documentation and software included in the ELWIX and AITNET
 Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>  Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
   
Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013Copyright 2004 - 2015
         by Michael Pounov <misho@elwix.org>.  All rights reserved.          by Michael Pounov <misho@elwix.org>.  All rights reserved.
   
 Redistribution and use in source and binary forms, with or without  Redistribution and use in source and binary forms, with or without
Line 138  rpc_addPktSession(rpc_sess_t *p, rpc_sess_t *s) Line 138  rpc_addPktSession(rpc_sess_t *p, rpc_sess_t *s)
         p->sess_instance = s->sess_instance;          p->sess_instance = s->sess_instance;
   
         return 0;          return 0;
   }
   
   /*
    * rpc_Read() - RPC read operation
    *
    * @sock = socket
    * @type = type of socket
    * @flags = receive flags
    * @sa = check client address, if you use udp protocol
    * @pkt = RPC packet
    * return: -1 error, 0 EOF or or >0 readed bytes into buffer
    */
   ssize_t
   rpc_Read(int sock, int type, int flags, sockaddr_t * __restrict sa, ait_val_t * __restrict pkt)
   {
           struct pollfd pfd;
           sockaddr_t sa2;
           socklen_t salen;
           int ret = 0, len, hlen, cx = 0;
           ait_val_t v = AIT_VAL_INIT;
           struct ether_header *eh;
           struct bpf_hdr *h;
           ether_addr_t bcst = {{ [0 ... sizeof bcst - 1] = 0xff }};
           u_char *buf = AIT_GET_BUF(pkt);
           size_t blen = AIT_LEN(pkt);
           struct tagRPCCall *rpc = (struct tagRPCCall *) buf;
   
           if (type == SOCK_BPF && sa) {
                   AIT_SET_BUF(&v, NULL, blen);
                   h = (struct bpf_hdr*) AIT_GET_BUF(&v);
           }
   
           pfd.fd = sock;
           pfd.events = POLLIN | POLLPRI;
           memset(buf, 0, blen);
           memset(&sa2, 0, sizeof sa2);
           salen = sa2.ss.ss_len = sizeof(sockaddr_t);
   
           for (len = blen; len > 0; len -= ret, buf += ret) {
                   if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || 
                                   pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
                           if (ret)
                                   LOGERR;
                           else
                                   rpc_SetErr(ETIMEDOUT, "Timeout reached! Server not respond");
                           if (type == SOCK_BPF)
                                   AIT_FREE_VAL(&v);
                           return -1;
                   }
                   if (type == SOCK_STREAM)
                           ret = recv(sock, buf, len, flags);
                   else if (type == SOCK_EXT)
                           ret = read(sock, buf, len);
                   else if (type == SOCK_BPF && sa) {
                           ret = read(sock, AIT_GET_BUF(&v), AIT_LEN(&v));
                           if (ret > 0) {
                                   ret -= h->bh_hdrlen;
                                   if (ret < h->bh_caplen || h->bh_caplen != h->bh_datalen || 
                                                   ret < ETHER_HDR_LEN + sizeof(struct tagRPCCall)) {
                                           if (cx < 3) {
                                                   cx++;
                                                   ret ^= ret;
                                                   continue;       /* wait for known address */
                                           } else {
                                                   AIT_FREE_VAL(&v);
                                                   return -1;
                                           }
                                   }
                                   ret = h->bh_caplen;
                                   eh = (struct ether_header*) (AIT_GET_BUF(&v) + h->bh_hdrlen);
                                   ret -= ETHER_HDR_LEN;
                                   if (eh->ether_type != ntohs(RPC_DEFPORT)) {
                                           if (cx < 3) {
                                                   cx++;
                                                   ret ^= ret;
                                                   continue;       /* wait for known address */
                                           } else {
                                                   AIT_FREE_VAL(&v);
                                                   return -1;
                                           }
                                   }
   
                                   if (!memcmp(bcst.octet, eh->ether_dhost, sizeof bcst) || 
                                                   !memcmp(bcst.octet, eh->ether_shost, sizeof bcst)) {
                                           if (cx < 3) {
                                                   cx++;
                                                   ret ^= ret;
                                                   continue;       /* wait for known address */
                                           } else {
                                                   AIT_FREE_VAL(&v);
                                                   return -1;
                                           }
                                   }
                                   memcpy(buf, (u_char*) (eh + 1), MIN(ret, len));
                                   AIT_FREE_VAL(&v);
                                   return ret;
                           }
                   } else {
                           ret = recvfrom(sock, buf, len, flags, &sa2.sa, &salen);
                           if (ret > -1 && sa && e_addrcmp(sa, &sa2, 42)) {
                                   if (cx < 3) {
                                           cx++;
                                           ret ^= ret;
                                           continue;       /* wait for known address */
                                   } else
                                           return -1;
                           }
                   }
                   if (ret < 0) {
                           LOGERR;
                           if (type == SOCK_BPF)
                                   AIT_FREE_VAL(&v);
                           return -1;
                   }
                   if (!ret) {     /* EOF */
                           if (type == SOCK_BPF)
                                   AIT_FREE_VAL(&v);
                           return 0;
                   }
   
                   /* check RPC packet header */
                   if ((u_char*) rpc == buf) {
                           if (type == SOCK_RAW) {
                                   hlen = sa->sa.sa_family == AF_INET ? sizeof(struct ip) : sizeof(struct ip6_hdr);
                                   ret -= hlen;
                                   if (ret > 0)
                                           memmove(buf, buf + hlen, blen - hlen);
                           }
   
                           /* 1st read for RPC header */
                           if (ret < sizeof(struct tagRPCCall)) {
                                   rpc_SetErr(ERPCMISMATCH, "Short RPC packet %d bytes", ret);
                                   if (type == SOCK_BPF)
                                           AIT_FREE_VAL(&v);
                                   return -1;
                           }
                           /* check for loop request */
                           if (!(rpc->call_io & RPC_ACK)) {
                                   ret ^= ret;
                                   continue;
                           }
                           /* calc estimated length */
                           blen = len = ntohl(rpc->call_len);
                           if (blen > AIT_LEN(pkt)) {
                                   AIT_RE_BUF(pkt, blen);
                                   buf = AIT_GET_BUF(pkt);
                                   rpc = (struct tagRPCCall*) buf;
                           }
                   }
           }
           ret = blen - len;
   
           if (type == SOCK_BPF)
                   AIT_FREE_VAL(&v);
           return ret;
   }
   
   /*
    * rpc_Write() - RPC write operation
    *
    * @sock = socket
    * @type = type of socket
    * @flags = send flags
    * @sa = send to client address, if you use udp protocol
    * @pkt = RPC packet
    * @blen = buffer length
    * return: -1 error, 0 EOF or >0 written bytes into buffer
    */
   ssize_t
   rpc_Write(int sock, int type, int flags, sockaddr_t * __restrict sa, 
                   ait_val_t * __restrict pkt, size_t blen)
   {
           struct pollfd pfd;
           int ret = 0, len = 0;
           ait_val_t v = AIT_VAL_INIT;
           struct ether_header *eh;
           u_char *buf = AIT_GET_BUF(pkt);
   
           if (type == SOCK_BPF && sa) {
                   AIT_SET_BUF(&v, NULL, blen + sizeof(struct ether_header));
                   eh = (struct ether_header*) AIT_GET_BUF(&v);
                   memcpy(eh->ether_dhost, LLADDR(&sa->sdl), ETHER_ADDR_LEN);
                   eh->ether_type = htons(RPC_DEFPORT);
                   memcpy(eh + 1, buf, blen);
                   blen += sizeof(struct ether_header);
           }
   
           pfd.fd = sock;
           pfd.events = POLLOUT;
           for (len = blen; len > 0; len -= ret, buf += ret) {
                   if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || 
                                   pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
   #if 0
                           if (!ret)
                                   continue;
   #endif
                           if (ret > 0)
                                   rpc_SetErr(EPIPE, "Disconnected RPC session\n");
                           else
                                   LOGERR;
                           if (type == SOCK_BPF)
                                   AIT_FREE_VAL(&v);
                           return -1;
                   }
                   if (type == SOCK_STREAM)
                           ret = send(sock, buf, len, flags);
                   else if (type == SOCK_EXT)
                           ret = write(sock, buf, len);
                   else if (type == SOCK_BPF && sa) {
                           ret = write(sock, AIT_GET_BUF(&v), AIT_LEN(&v));
                   } else if (sa)
                           ret = sendto(sock, buf, len, flags, &sa->sa, sa->sa.sa_len);
                   else {
                           rpc_SetErr(EINVAL, "Invalid argument(s)!");
                           if (type == SOCK_BPF)
                                   AIT_FREE_VAL(&v);
                           return -1;
                   }
                   if (ret < 0) {
                           LOGERR;
                           if (type == SOCK_BPF)
                                   AIT_FREE_VAL(&v);
                           return -1;
                   }
                   if (!ret) {     /* EOF */
                           if (type == SOCK_BPF)
                                   AIT_FREE_VAL(&v);
                           return 0;
                   }
           }
           ret = blen - len;
           if (ret != blen) {
                   rpc_SetErr(EPROCUNAVAIL, "RPC request, should be send %d bytes, "
                                   "really sended %d bytes", blen, ret);
                   if (type == SOCK_BPF)
                           AIT_FREE_VAL(&v);
                   return -1;
           }
   
           if (type == SOCK_BPF)
                   AIT_FREE_VAL(&v);
           return ret;
 }  }
Removed from v.1.10  
changed lines
  Added in v.1.17.2.3

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>