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

Diff for /libaitrpc/src/cli.c between versions 1.23 and 1.26

version 1.23, 2015/01/15 01:42:37 version 1.26, 2015/07/02 22:28:15
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 - 2014Copyright 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 158  rpc_cli_closeBLOBClient(rpc_cli_t ** __restrict cli) Line 158  rpc_cli_closeBLOBClient(rpc_cli_t ** __restrict cli)
 rpc_cli_t *  rpc_cli_t *
 rpc_cli_openClient(u_char InstID, int netBuf, const char *csHost, u_short Port, int proto)  rpc_cli_openClient(u_char InstID, int netBuf, const char *csHost, u_short Port, int proto)
 {  {
           int n = 1;
         rpc_cli_t *cli = NULL;          rpc_cli_t *cli = NULL;
         sockaddr_t sa = E_SOCKADDR_INIT;          sockaddr_t sa = E_SOCKADDR_INIT;
   
        if (!e_gethostbyname(csHost, Port, &sa))        if (proto < 0 || proto > SOCK_RAW) {
                 rpc_SetErr(EINVAL, "Invalid parameters can`t open RPC client");
                 return NULL;                  return NULL;
        if (!Port)        }
 
         srandom(time(NULL) ^ getpid());
 
         if (!Port && proto < SOCK_RAW)
                 Port = RPC_DEFPORT;                  Port = RPC_DEFPORT;
           if (!e_gethostbyname(csHost, Port, &sa))
                   return NULL;
         if (!proto)          if (!proto)
                 proto = SOCK_STREAM;                  proto = SOCK_STREAM;
         if (netBuf < RPC_MIN_BUFSIZ)          if (netBuf < RPC_MIN_BUFSIZ)
Line 195  rpc_cli_openClient(u_char InstID, int netBuf, const ch Line 203  rpc_cli_openClient(u_char InstID, int netBuf, const ch
         AIT_SET_BUFSIZ(&cli->cli_buf, 0, netBuf);          AIT_SET_BUFSIZ(&cli->cli_buf, 0, netBuf);
   
         /* connect to RPC server */          /* connect to RPC server */
        cli->cli_sock = socket(cli->cli_sa.sa.sa_family, cli->cli_id, 0);        cli->cli_sock = socket(cli->cli_sa.sa.sa_family, cli->cli_id, 
                         cli->cli_id == SOCK_RAW ? IPPROTO_ERPC : 0);
         if (cli->cli_sock == -1) {          if (cli->cli_sock == -1) {
                 LOGERR;                  LOGERR;
                 goto err;                  goto err;
Line 210  rpc_cli_openClient(u_char InstID, int netBuf, const ch Line 219  rpc_cli_openClient(u_char InstID, int netBuf, const ch
                 LOGERR;                  LOGERR;
                 goto err;                  goto err;
         }          }
        if (cli->cli_id == SOCK_STREAM)        if (cli->cli_id == SOCK_STREAM) {
                 setsockopt(cli->cli_sock, IPPROTO_TCP, TCP_NODELAY, &n, sizeof n);
                 if (connect(cli->cli_sock, &cli->cli_sa.sa, cli->cli_sa.sa.sa_len) == -1) {                  if (connect(cli->cli_sock, &cli->cli_sa.sa, cli->cli_sa.sa.sa_len) == -1) {
                         LOGERR;                          LOGERR;
                         goto err;                          goto err;
                 }                  }
           }
           if (cli->cli_id == SOCK_DGRAM) {
                   sockaddr_t sa2;
   
                   if (!e_gethostbyname(csHost, 0, &sa2))
                           goto err;
                   if (bind(cli->cli_sock, &sa2.sa, sa2.sa.sa_len) == -1) {
                           LOGERR;
                           goto err;
                   }
           }
   
         fcntl(cli->cli_sock, F_SETFL, fcntl(cli->cli_sock, F_GETFL) | O_NONBLOCK);          fcntl(cli->cli_sock, F_SETFL, fcntl(cli->cli_sock, F_GETFL) | O_NONBLOCK);
         return cli;          return cli;
 err:  err:
Line 243  rpc_cli_reconnectClient(rpc_cli_t * __restrict cli) Line 264  rpc_cli_reconnectClient(rpc_cli_t * __restrict cli)
         else          else
                 netBuf = AIT_LEN(&cli->cli_buf);                  netBuf = AIT_LEN(&cli->cli_buf);
   
           if (cli->cli_id == SOCK_STREAM)
                   shutdown(cli->cli_sock, SHUT_RDWR);
           if (cli->cli_id == SOCK_DGRAM && cli->cli_sa.sa.sa_family == AF_LOCAL) {
                   sockaddr_t sa2 = E_SOCKADDR_INIT;
                   socklen_t salen;
   
                   sa2.sa.sa_len = salen = sizeof sa2;
                   if (!getsockname(cli->cli_sock, &sa2.sa, &salen))
                           unlink(sa2.sun.sun_path);
           }
         close(cli->cli_sock);          close(cli->cli_sock);
   
           srandom(time(NULL) ^ getpid());
   
         cli->cli_sock = socket(cli->cli_sa.sa.sa_family, cli->cli_id, 0);          cli->cli_sock = socket(cli->cli_sa.sa.sa_family, cli->cli_id, 0);
         if (cli->cli_sock == -1) {          if (cli->cli_sock == -1) {
                 LOGERR;                  LOGERR;
Line 287  rpc_cli_closeClient(rpc_cli_t ** __restrict cli) Line 320  rpc_cli_closeClient(rpc_cli_t ** __restrict cli)
   
         if ((*cli)->cli_id == SOCK_STREAM)          if ((*cli)->cli_id == SOCK_STREAM)
                 shutdown((*cli)->cli_sock, SHUT_RDWR);                  shutdown((*cli)->cli_sock, SHUT_RDWR);
           if ((*cli)->cli_id == SOCK_DGRAM && (*cli)->cli_sa.sa.sa_family == AF_LOCAL) {
                   sockaddr_t sa2 = E_SOCKADDR_INIT;
                   socklen_t salen;
   
                   sa2.sa.sa_len = salen = sizeof sa2;
                   if (!getsockname((*cli)->cli_sock, &sa2.sa, &salen))
                           unlink(sa2.sun.sun_path);
           }
         close((*cli)->cli_sock);          close((*cli)->cli_sock);
   
         AIT_FREE_VAL(&(*cli)->cli_buf);          AIT_FREE_VAL(&(*cli)->cli_buf);
Line 311  rpc_cli_closeClient(rpc_cli_t ** __restrict cli) Line 352  rpc_cli_closeClient(rpc_cli_t ** __restrict cli)
 int  int
 rpc_pkt_Send(int sock, int type, sockaddr_t * __restrict sa, ait_val_t * __restrict pkt, int len)  rpc_pkt_Send(int sock, int type, sockaddr_t * __restrict sa, ait_val_t * __restrict pkt, int len)
 {  {
         u_char *buf;  
   
         if (!pkt) {          if (!pkt) {
                 rpc_SetErr(EINVAL, "Invalid argument(s)!");                  rpc_SetErr(EINVAL, "Invalid argument(s)!");
                 return -1;                  return -1;
        } else        }
                buf = AIT_GET_BUF(pkt); 
   
        return rpc_Write(sock, type, MSG_NOSIGNAL, sa, buf, len);        return rpc_Write(sock, type, MSG_NOSIGNAL, sa, pkt, len);
 }  }
   
 /*  /*
Line 329  rpc_pkt_Send(int sock, int type, sockaddr_t * __restri Line 367  rpc_pkt_Send(int sock, int type, sockaddr_t * __restri
  * @type = Type of socket   * @type = Type of socket
  * @sa = Server address   * @sa = Server address
  * @pkt = RPC packet   * @pkt = RPC packet
    * @seq = Signed packet with seq.no
  * return: -1 error, 0 EOF or >0 received bytes   * return: -1 error, 0 EOF or >0 received bytes
  */   */
 int  int
rpc_pkt_Receive(int sock, int type, sockaddr_t * __restrict sa, ait_val_t * __restrict pkt)rpc_pkt_Receive(int sock, int type, sockaddr_t * __restrict sa, ait_val_t * __restrict pkt, int seq)
 {  {
        int ret, estlen = 0, blen = sizeof(struct tagRPCCall);        int ret;
        u_char *buf; 
         struct tagRPCCall *rpc;          struct tagRPCCall *rpc;
   
         if (!pkt) {          if (!pkt) {
                 rpc_SetErr(EINVAL, "Invalid argument(s)!");                  rpc_SetErr(EINVAL, "Invalid argument(s)!");
                 return -1;                  return -1;
         } else {  
                 buf = AIT_GET_BUF(pkt);  
                 rpc = (struct tagRPCCall*) buf;  
         }          }
   
         /* reply from RPC server */          /* reply from RPC server */
         do {          do {
                if (type == SOCK_STREAM)                if (type == SOCK_STREAM || type == SOCK_EXT)
                        ret = rpc_Read(sock, type, !estlen ? MSG_PEEK : 0, NULL, buf, blen);                        ret = rpc_Read(sock, type, 0, NULL, pkt);
                else if (type == SOCK_BPF) {                else
                        ret = rpc_Read(sock, type, 0, sa, AIT_GET_BUF(pkt), AIT_LEN(pkt));                        ret = rpc_Read(sock, type, 0, sa, pkt);
                        if (ret > 0) 
                                estlen = ret; 
                 } else 
                        ret = rpc_Read(sock, type, !estlen ? MSG_PEEK : 0, sa, buf, blen); 
                if (ret < 1) 
                        return ret; 
   
                /* check for response from known address */                if (ret > 0) {
                if (!estlen) {                        rpc = (struct tagRPCCall*) AIT_GET_BUF(pkt);
                        /* 1st read for RPC header */                        if (ret < ntohl(rpc->call_len))
                        if (ret < sizeof(struct tagRPCCall)) {                                continue;
                                rpc_SetErr(ERPCMISMATCH, "Short RPC packet %d bytes", ret); 
                                return -1; 
                        } 
   
                        /* calc estimated length */                        /* check for loop request */
                        estlen = ntohl(rpc->call_len);                        if (!(rpc->call_io & RPC_ACK))
                        if (estlen > AIT_LEN(pkt))                                continue;
                                AIT_RE_BUF(pkt, estlen);                        /* check for signed request */
                        buf = AIT_GET_BUF(pkt);                        if (seq != ntohl(rpc->call_seq))
                        rpc = (struct tagRPCCall*) buf;                                continue;
                        blen = estlen; 
                        continue; 
                 }                  }
           } while (ret < 1);
   
                 /* compiler optimize loop if while(0) and stop working 'continue' on some platforms */  
                 break;  
         } while (42);  
   
         if (ret < sizeof(struct tagRPCCall) || estlen != ret) {  
                 rpc_SetErr(ERPCMISMATCH, "RPC packet mismatch estimate %d bytes, but received %d\n",   
                                 estlen, ret);  
                 return -1;  
         }  
   
         return ret;          return ret;
 }  }
   
Line 399  rpc_pkt_Receive(int sock, int type, sockaddr_t * __res Line 414  rpc_pkt_Receive(int sock, int type, sockaddr_t * __res
  * @vars = Function argument array of values, may be NULL   * @vars = Function argument array of values, may be NULL
  * @noreply = We not want RPC reply   * @noreply = We not want RPC reply
  * @nocrc = Without CRC calculation   * @nocrc = Without CRC calculation
    * @seq = Sign packet with seq.no
  * return: -1 error or != -1 prepared bytes into packet   * return: -1 error or != -1 prepared bytes into packet
  */   */
 int  int
 rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t * __restrict sess, u_short tag,   rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t * __restrict sess, u_short tag, 
                array_t * __restrict vars, int noreply, int nocrc)                array_t * __restrict vars, int noreply, int nocrc, int seq)
 {  {
         struct tagRPCCall *rpc;          struct tagRPCCall *rpc;
         int ret = 0, estlen, len = sizeof(struct tagRPCCall);          int ret = 0, estlen, len = sizeof(struct tagRPCCall);
Line 416  rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t Line 432  rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t
   
         /* calc estimated length */          /* calc estimated length */
         estlen = ait_resideVars(vars) + len;          estlen = ait_resideVars(vars) + len;
        if (estlen > AIT_LEN(pkt))        if (estlen > AIT_LEN(pkt)) {
                AIT_RE_BUF(pkt, estlen);                rpc_SetErr(EMSGSIZE, "Message too long");
                 return -1;
         }
         buf = AIT_GET_BUF(pkt);          buf = AIT_GET_BUF(pkt);
   
         /* prepare RPC call */          /* prepare RPC call */
Line 427  rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t Line 445  rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t
         if (!vars)          if (!vars)
                 rpc->call_argc = 0;                  rpc->call_argc = 0;
         else          else
                rpc->call_argc = htons(array_Size(vars));                rpc->call_argc = (u_char) array_Size(vars);
   
         /* set reply */          /* set reply */
         rpc->call_req.flags = (uint64_t) htonl(noreply ? RPC_NOREPLY : RPC_REPLY);          rpc->call_req.flags = (uint64_t) htonl(noreply ? RPC_NOREPLY : RPC_REPLY);
Line 444  rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t Line 462  rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t
   
         /* total packet length */          /* total packet length */
         rpc->call_len = htonl(len);          rpc->call_len = htonl(len);
           rpc->call_io = RPC_REQ;
   
           /* sign packet */
           rpc->call_seq = htonl(seq);
   
         if (!nocrc) {          if (!nocrc) {
                 /* calculate CRC */                  /* calculate CRC */
                 rpc->call_crc ^= rpc->call_crc;                  rpc->call_crc ^= rpc->call_crc;
Line 459  rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t Line 481  rpc_pkt_Request(ait_val_t * __restrict pkt, rpc_sess_t
  *   *
  * @pkt = Packet buffer   * @pkt = Packet buffer
  * @sess = RPC session info, if =NULL don't check session   * @sess = RPC session info, if =NULL don't check session
 * @tag = Function tag * @tag = Function tag, if =CALL_TAG_MAX don't check tag
  * @vars = Function argument array of values, may be NULL   * @vars = Function argument array of values, may be NULL
  * @nocrc = Without CRC calculation   * @nocrc = Without CRC calculation
  * return: -1 error or != -1 return value from function   * return: -1 error or != -1 return value from function
Line 495  rpc_pkt_Replay(ait_val_t * __restrict pkt, rpc_sess_t  Line 517  rpc_pkt_Replay(ait_val_t * __restrict pkt, rpc_sess_t 
                 rpc_SetErr(ERPCMISMATCH, "Get invalid RPC session");                  rpc_SetErr(ERPCMISMATCH, "Get invalid RPC session");
                 return -1;                  return -1;
         }          }
        if (ntohs(rpc->call_tag) != tag) {        if (tag != CALL_TAG_MAX && ntohs(rpc->call_tag) != tag) {
                 rpc_SetErr(ERPCMISMATCH, "Get wrong RPC reply");                  rpc_SetErr(ERPCMISMATCH, "Get wrong RPC reply");
                 return -1;                  return -1;
         }          }
Line 505  rpc_pkt_Replay(ait_val_t * __restrict pkt, rpc_sess_t  Line 527  rpc_pkt_Replay(ait_val_t * __restrict pkt, rpc_sess_t 
                                 strerror(ntohl(rpc->call_rep.eno)));                                  strerror(ntohl(rpc->call_rep.eno)));
                 return -1;                  return -1;
         }          }
        len = ntohs(rpc->call_argc) * sizeof(ait_val_t);        len = rpc->call_argc * sizeof(ait_val_t);
         if (len > AIT_LEN(pkt) - sizeof(struct tagRPCCall)) {          if (len > AIT_LEN(pkt) - sizeof(struct tagRPCCall)) {
                 rpc_SetErr(EMSGSIZE, "Reply RPC packet not enough buffer space ...");                  rpc_SetErr(EMSGSIZE, "Reply RPC packet not enough buffer space ...");
                 return -1;                  return -1;
Line 516  rpc_pkt_Replay(ait_val_t * __restrict pkt, rpc_sess_t  Line 538  rpc_pkt_Replay(ait_val_t * __restrict pkt, rpc_sess_t 
         }          }
   
         /* RPC is OK! Go de-marshaling variables ... */          /* RPC is OK! Go de-marshaling variables ... */
        if (vars && ntohs(rpc->call_argc)) {        if (vars && rpc->call_argc) {
 #ifdef CLI_RES_ZCOPY  #ifdef CLI_RES_ZCOPY
                 *vars = ait_buffer2vars(buf + sizeof(struct tagRPCCall), len,                   *vars = ait_buffer2vars(buf + sizeof(struct tagRPCCall), len, 
                                ntohs(rpc->call_argc), 42);                                rpc->call_argc, 42);
 #else  #else
                 *vars = ait_buffer2vars(buf + sizeof(struct tagRPCCall), len,                   *vars = ait_buffer2vars(buf + sizeof(struct tagRPCCall), len, 
                                ntohs(rpc->call_argc), 0);                                rpc->call_argc, 0);
 #endif  #endif
                 if (!*vars) {                  if (!*vars) {
                         rpc_SetErr(elwix_GetErrno(), "%s", elwix_GetError());                          rpc_SetErr(elwix_GetErrno(), "%s", elwix_GetError());
Line 549  rpc_cli_execCall(rpc_cli_t *cli, int noreply, u_short  Line 571  rpc_cli_execCall(rpc_cli_t *cli, int noreply, u_short 
 {  {
         int type = 0, wlen;          int type = 0, wlen;
         u_char *buf;          u_char *buf;
           u_int seq = 0;
   
         if (!cli) {          if (!cli) {
                 rpc_SetErr(EINVAL, "Can`t execute call because parameter is null or invalid!");                  rpc_SetErr(EINVAL, "Can`t execute call because parameter is null or invalid!");
                 return -1;                  return -1;
         } else {          } else {
                if (cli->cli_id == SOCK_STREAM)                if (cli->cli_id == SOCK_STREAM || cli->cli_id == SOCK_EXT)
                         type = cli->cli_id;                          type = cli->cli_id;
                   else
                           seq = random(); /* sign package */
                 buf = AIT_GET_BUF(&cli->cli_buf);                  buf = AIT_GET_BUF(&cli->cli_buf);
         }          }
         if (out_vars)          if (out_vars)
                 *out_vars = NULL;                  *out_vars = NULL;
   
        if ((wlen = rpc_pkt_Request(&cli->cli_buf, cli->cli_parent, tag, in_vars, noreply, type)) == -1)        if ((wlen = rpc_pkt_Request(&cli->cli_buf, cli->cli_parent, tag, 
                                         in_vars, noreply, type, seq)) == -1)
                 return -1;                  return -1;
   
        if ((wlen = rpc_pkt_Send(cli->cli_sock, cli->cli_id, &cli->cli_sa, &cli->cli_buf, wlen)) == -1)        if ((wlen = rpc_pkt_Send(cli->cli_sock, cli->cli_id, &cli->cli_sa, 
                                         &cli->cli_buf, wlen)) == -1)
                 return -1;                  return -1;
         if (!wlen)      /* closed rpc connection */          if (!wlen)      /* closed rpc connection */
                 return 1;                  return 1;
Line 572  rpc_cli_execCall(rpc_cli_t *cli, int noreply, u_short  Line 599  rpc_cli_execCall(rpc_cli_t *cli, int noreply, u_short 
         if (noreply)    /* we not want reply */          if (noreply)    /* we not want reply */
                 return 0;                  return 0;
   
        if ((wlen = rpc_pkt_Receive(cli->cli_sock, cli->cli_id, &cli->cli_sa, &cli->cli_buf)) == -1)        if ((wlen = rpc_pkt_Receive(cli->cli_sock, cli->cli_id, &cli->cli_sa, 
                                         &cli->cli_buf, seq)) == -1)
                 return -1;                  return -1;
         if (!wlen)      /* closed rpc connection */          if (!wlen)      /* closed rpc connection */
                 return 1;                  return 1;
   
        if ((wlen = rpc_pkt_Replay(&cli->cli_buf, cli->cli_parent, tag, out_vars, type)) == -1)        if ((wlen = rpc_pkt_Replay(&cli->cli_buf, cli->cli_parent, tag, 
                                         out_vars, type)) == -1)
                 return -1;                  return -1;
   
         return 0;          return 0;
Line 746  rpc_cli_closeClient2(rpc_cli_t ** __restrict cli) Line 775  rpc_cli_closeClient2(rpc_cli_t ** __restrict cli)
                 return;                  return;
   
         close((*cli)->cli_sock);          close((*cli)->cli_sock);
   
           AIT_FREE_VAL(&(*cli)->cli_buf);
   
           if ((*cli)->cli_parent)
                   e_free((*cli)->cli_parent);
   
           e_free(*cli);
           *cli = NULL;
   }
   
   /*
    * rpc_cli_openClientExt() - Connect to pipe RPC Server
    *
    * @InstID = InstID for RPC session request
    * @netBuf = Network buffer length (min:512 bytes), if =0 == BUFSIZ (also meaning max RPC packet)
    * @fd = File descriptor
    * return: NULL == error or !=NULL connection to RPC server established
    */
   rpc_cli_t *
   rpc_cli_openClientExt(u_char InstID, int netBuf, int fd)
   {
           rpc_cli_t *cli = NULL;
           int n;
   
           cli = e_malloc(sizeof(rpc_cli_t));
           if (!cli) {
                   LOGERR;
                   return NULL;
           } else
                   memset(cli, 0, sizeof(rpc_cli_t));
   
           /* build session */
           cli->cli_parent = e_malloc(sizeof(rpc_sess_t));
           if (!cli->cli_parent) {
                   LOGERR;
                   e_free(cli);
                   return NULL;
           } else {
                   ((rpc_sess_t*) cli->cli_parent)->sess_version = RPC_VERSION;
                   ((rpc_sess_t*) cli->cli_parent)->sess_instance = InstID;
           }
   
           cli->cli_id = SOCK_EXT;
           cli->cli_sock = fd;
   
           n = (netBuf < RPC_MIN_BUFSIZ) ? getpagesize() : E_ALIGN(netBuf, 2);
           AIT_SET_BUFSIZ(&cli->cli_buf, 0, n);
   
           fcntl(cli->cli_sock, F_SETFL, 
                           fcntl(cli->cli_sock, F_GETFL) | O_NONBLOCK);
   
           return cli;
   }
   
   /*
    * rpc_cli_closeClientExt() - Close pipe connection to RPC server and free resources
    *
    * @cli = RPC Client session
    * return: none
    */
   void
   rpc_cli_closeClientExt(rpc_cli_t ** __restrict cli)
   {
           if (!cli || !*cli || (*cli)->cli_id != SOCK_EXT)
                   return;
   
         AIT_FREE_VAL(&(*cli)->cli_buf);          AIT_FREE_VAL(&(*cli)->cli_buf);
   
Removed from v.1.23  
changed lines
  Added in v.1.26

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