Diff for /libaitrpc/src/cli.c between versions 1.1 and 1.5

version 1.1, 2010/06/18 01:48:06 version 1.5, 2011/09/07 07:24:21
Line 5 Line 5
 * $Author$  * $Author$
 * $Id$  * $Id$
 *  *
*************************************************************************/**************************************************************************
 The ELWIX and AITNET software is distributed under the following
 terms:
 
 All of the documentation and software included in the ELWIX and AITNET
 Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
 
 Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
         by Michael Pounov <misho@elwix.org>.  All rights reserved.
 
 Redistribution and use in source and binary forms, with or without
 modification, are permitted provided that the following conditions
 are met:
 1. Redistributions of source code must retain the above copyright
    notice, this list of conditions and the following disclaimer.
 2. Redistributions in binary form must reproduce the above copyright
    notice, this list of conditions and the following disclaimer in the
    documentation and/or other materials provided with the distribution.
 3. All advertising materials mentioning features or use of this software
    must display the following acknowledgement:
 This product includes software developed by Michael Pounov <misho@elwix.org>
 ELWIX - Embedded LightWeight unIX and its contributors.
 4. Neither the name of AITNET nor the names of its contributors
    may be used to endorse or promote products derived from this software
    without specific prior written permission.
 
 THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND
 ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 SUCH DAMAGE.
 */
 #include "global.h"  #include "global.h"
   
   
 /*  /*
    * rpc_cli_openBLOBClient() Connect to BLOB Server
    * @rpccli = RPC Client session
    * @Port = Port for bind server, if Port == 0 default port is selected
    * return: NULL == error or !=NULL connection to BLOB server established
    */
   rpc_cli_t *
   rpc_cli_openBLOBClient(rpc_cli_t * __restrict rpccli, u_short Port)
   {
           rpc_cli_t *cli = NULL;
           struct sockaddr sa;
           struct sockaddr_in *sin = (struct sockaddr_in*) &sa;
           struct sockaddr_in6 *sin6 = (struct sockaddr_in6*) &sa;
           struct sockaddr_un *sun = (struct sockaddr_un*) &sa;
           int n;
   
           if (!rpccli || 
                           (rpccli->cli_sa.sa_family != AF_INET && rpccli->cli_sa.sa_family != AF_INET6 && 
                            rpccli->cli_sa.sa_family != AF_LOCAL)) {
                   rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t connect to BLOB server ...\n");
                   return NULL;
           }
           if (!Port)
                   Port = RPC_DEFPORT + 1;
   
           cli = malloc(sizeof(rpc_cli_t));
           if (!cli) {
                   LOGERR;
                   return NULL;
           } else
                   memcpy(cli, rpccli, sizeof(rpc_cli_t));
   
           memcpy(&sa, &rpccli->cli_sa, sizeof sa);
           switch (rpccli->cli_sa.sa_family) {
                   case AF_INET:
                           sin->sin_port = htons(Port);
                           memcpy(&cli->cli_sa, sin, sizeof(struct sockaddr));
                           break;
                   case AF_INET6:
                           sin6->sin6_port = htons(Port);
                           memcpy(&cli->cli_sa, sin6, sizeof(struct sockaddr));
                           break;
                   case AF_LOCAL:
                           strlcat(sun->sun_path, ".blob", sizeof sun->sun_path);
                           memcpy(&cli->cli_sa, sun, sizeof(struct sockaddr));
                           break;
           }
   
           /* connect to BLOB server */
           cli->cli_sock = socket(cli->cli_sa.sa_family, SOCK_STREAM, 0);
           if (cli->cli_sock == -1) {
                   LOGERR;
                   free(cli);
                   return NULL;
           }
           n = cli->cli_netbuf;
           if (setsockopt(cli->cli_sock, SOL_SOCKET, SO_SNDBUF, &n, sizeof n) == -1) {
                   LOGERR;
                   close(cli->cli_sock);
                   free(cli);
                   return NULL;
           }
           if (setsockopt(cli->cli_sock, SOL_SOCKET, SO_RCVBUF, &n, sizeof n) == -1) {
                   LOGERR;
                   close(cli->cli_sock);
                   free(cli);
                   return NULL;
           }
           if (connect(cli->cli_sock, &cli->cli_sa, sizeof cli->cli_sa) == -1) {
                   LOGERR;
                   close(cli->cli_sock);
                   free(cli);
                   return NULL;
           }
   
           return cli;
   }
   
   /*
    * rpc_cli_closeBLOBClient() Close connection to BLOB server and free resources
    * @cli = BLOB Client session
    * return: none
    */
   void
   rpc_cli_closeBLOBClient(rpc_cli_t * __restrict cli)
   {
           if (!cli) {
                   rpc_SetErr(EINVAL, "Error:: Can`t close connection because parameter is null!\n");
                   return;
           }
   
           shutdown(cli->cli_sock, SHUT_RDWR);
           close(cli->cli_sock);
   
           free(cli);
           cli = NULL;
   }
   
   // --------------------------------------------------------------
   
   /*
  * rpc_cli_openClient() Connect to RPC Server   * rpc_cli_openClient() Connect to RPC Server
  * @ProgID = ProgramID for RPC session request   * @ProgID = ProgramID for RPC session request
  * @ProcID = ProcessID for RPC session request   * @ProcID = ProcessID for RPC session request
    * @netBuf = Network buffer length, if =0 == BUFSIZ (also meaning max RPC packet)
  * @family = Family socket type, AF_INET or AF_INET6   * @family = Family socket type, AF_INET or AF_INET6
  * @csHost = Host name or IP address for bind server   * @csHost = Host name or IP address for bind server
  * @Port = Port for bind server, if Port == 0 default port is selected   * @Port = Port for bind server, if Port == 0 default port is selected
  * return: NULL == error or !=NULL connection to RPC server established   * return: NULL == error or !=NULL connection to RPC server established
  */   */
 rpc_cli_t *  rpc_cli_t *
rpc_cli_openClient(u_int ProgID, u_int ProcID, u_short family, const char *csHost, u_short Port)rpc_cli_openClient(u_int ProgID, u_int ProcID, int netBuf, u_short family, const char *csHost, u_short Port)
 {  {
         rpc_cli_t *cli = NULL;          rpc_cli_t *cli = NULL;
         struct hostent *host = NULL;          struct hostent *host = NULL;
        struct sockaddr_in sin;        struct sockaddr sa;
        struct sockaddr_in6 sin6;        struct sockaddr_in *sin = (struct sockaddr_in*) &sa;
         struct sockaddr_in6 *sin6 = (struct sockaddr_in6*) &sa;
         struct sockaddr_un *sun = (struct sockaddr_un*) &sa;
         int n;
   
        if (!csHost || (family != AF_INET && family != AF_INET6)) {        if (!csHost || (family != AF_INET && family != AF_INET6 && family != AF_LOCAL)) {
                 rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t connect to RPC server ...\n");                  rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t connect to RPC server ...\n");
                 return NULL;                  return NULL;
         }          }
         if (!Port)          if (!Port)
                 Port = RPC_DEFPORT;                  Port = RPC_DEFPORT;
        if (csHost) {        if (!netBuf)
                 netBuf = BUFSIZ;
         if (csHost && family != AF_LOCAL) {
                 host = gethostbyname2(csHost, family);                  host = gethostbyname2(csHost, family);
                 if (!host) {                  if (!host) {
                         rpc_SetErr(h_errno, "Error:: %s\n", hstrerror(h_errno));                          rpc_SetErr(h_errno, "Error:: %s\n", hstrerror(h_errno));
                         return NULL;                          return NULL;
                 }                  }
         }          }
           memset(&sa, 0, sizeof sa);
           sa.sa_family = family;
         switch (family) {          switch (family) {
                 case AF_INET:                  case AF_INET:
                        memset(&sin, 0, sizeof sin);                        sin->sin_len = sizeof(struct sockaddr_in);
                        sin.sin_len = sizeof sin;                        sin->sin_port = htons(Port);
                        sin.sin_family = family; 
                        sin.sin_port = htons(Port); 
                         if (csHost)                          if (csHost)
                                memcpy(&sin.sin_addr, host->h_addr, host->h_length);                                memcpy(&sin->sin_addr, host->h_addr, host->h_length);
                         break;                          break;
                 case AF_INET6:                  case AF_INET6:
                        memset(&sin6, 0, sizeof sin6);                        sin6->sin6_len = sizeof(struct sockaddr_in6);
                        sin6.sin6_len = sizeof sin6;                        sin6->sin6_port = htons(Port);
                        sin6.sin6_family = family; 
                        sin6.sin6_port = htons(Port); 
                         if (csHost)                          if (csHost)
                                memcpy(&sin6.sin6_addr, host->h_addr, host->h_length);                                memcpy(&sin6->sin6_addr, host->h_addr, host->h_length);
                         break;                          break;
                   case AF_LOCAL:
                           sun->sun_len = sizeof(struct sockaddr_un);
                           if (csHost)
                                   strlcpy(sun->sun_path, csHost, sizeof sun->sun_path);
                           break;
                 default:                  default:
                         rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t connect to RPC server ...\n");                          rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t connect to RPC server ...\n");
                         return NULL;                          return NULL;
Line 67  rpc_cli_openClient(u_int ProgID, u_int ProcID, u_short Line 213  rpc_cli_openClient(u_int ProgID, u_int ProcID, u_short
                 return NULL;                  return NULL;
         } else          } else
                 memset(cli, 0, sizeof(rpc_cli_t));                  memset(cli, 0, sizeof(rpc_cli_t));
   
           cli->cli_netbuf = netBuf;
         cli->cli_parent = malloc(sizeof(rpc_sess_t));          cli->cli_parent = malloc(sizeof(rpc_sess_t));
         if (!cli->cli_parent) {          if (!cli->cli_parent) {
                 LOGERR;                  LOGERR;
Line 78  rpc_cli_openClient(u_int ProgID, u_int ProcID, u_short Line 226  rpc_cli_openClient(u_int ProgID, u_int ProcID, u_short
                 ((rpc_sess_t*) cli->cli_parent)->sess_process = ProcID;                  ((rpc_sess_t*) cli->cli_parent)->sess_process = ProcID;
         }          }
   
        if (family == AF_INET)        switch (family) {
                memcpy(&cli->cli_sa, &sin, sizeof cli->cli_sa);                case AF_INET:
        else                        memcpy(&cli->cli_sa, sin, sizeof cli->cli_sa);
                memcpy(&cli->cli_sa, &sin6, sizeof cli->cli_sa);                        break;
                 case AF_INET6:
                         memcpy(&cli->cli_sa, sin6, sizeof cli->cli_sa);
                         break;
                 case AF_LOCAL:
                         memcpy(&cli->cli_sa, sun, sizeof cli->cli_sa);
                         break;
         }
 
         /* connect to RPC server */
         cli->cli_sock = socket(family, SOCK_STREAM, 0);          cli->cli_sock = socket(family, SOCK_STREAM, 0);
         if (cli->cli_sock == -1) {          if (cli->cli_sock == -1) {
                 LOGERR;                  LOGERR;
Line 89  rpc_cli_openClient(u_int ProgID, u_int ProcID, u_short Line 246  rpc_cli_openClient(u_int ProgID, u_int ProcID, u_short
                 free(cli);                  free(cli);
                 return NULL;                  return NULL;
         }          }
           n = cli->cli_netbuf;
           if (setsockopt(cli->cli_sock, SOL_SOCKET, SO_SNDBUF, &n, sizeof n) == -1) {
                   LOGERR;
                   close(cli->cli_sock);
                   free(cli->cli_parent);
                   free(cli);
                   return NULL;
           }
           if (setsockopt(cli->cli_sock, SOL_SOCKET, SO_RCVBUF, &n, sizeof n) == -1) {
                   LOGERR;
                   close(cli->cli_sock);
                   free(cli->cli_parent);
                   free(cli);
                   return NULL;
           }
         if (connect(cli->cli_sock, &cli->cli_sa, sizeof cli->cli_sa) == -1) {          if (connect(cli->cli_sock, &cli->cli_sa, sizeof cli->cli_sa) == -1) {
                 LOGERR;                  LOGERR;
                   close(cli->cli_sock);
                 free(cli->cli_parent);                  free(cli->cli_parent);
                 free(cli);                  free(cli);
                 return NULL;                  return NULL;
Line 127  rpc_cli_closeClient(rpc_cli_t * __restrict cli) Line 300  rpc_cli_closeClient(rpc_cli_t * __restrict cli)
  * @cli = RPC Client session   * @cli = RPC Client session
  * @csModule = Module name, if NULL self binary   * @csModule = Module name, if NULL self binary
  * @csFunc = Function name for execute   * @csFunc = Function name for execute
 * @in_argc = IN count of arguments * @in_vars = IN RPC call array of rpc values
 * @in_vals = IN RPC call array of rpc values * @out_vars = OUT returned array of rpc values, must be free after use with rpc_cli_freeVals()
 * @out_argc = OUT returned count of arguments 
 * @out_vals = OUT returned array of rpc values, must be free after use (see rpc_cli_freeVals()) 
  * return: -1 error or != -1 ok result   * return: -1 error or != -1 ok result
  */   */
 int  int
rpc_cli_execCall(rpc_cli_t *cli, const char *csModule, const char *csFunc, int in_argc, rpc_cli_execCall(rpc_cli_t *cli, const char *csModule, const char *csFunc, 
                rpc_val_t * __restrict in_vals, int *out_argc, rpc_val_t ** __restrict out_vals)                array_t * __restrict in_vars, array_t ** __restrict out_vars)
 {  {
         fd_set fds;          fd_set fds;
        u_char buf[BUFSIZ], str[MAXPATHLEN + UCHAR_MAX + 1], *data;        u_char *buf, str[MAXPATHLEN + UCHAR_MAX + 1];
        struct tagRPCCall *rpc = (struct tagRPCCall*) buf;        struct tagRPCCall *rpc;
        struct tagRPCRet *rrpc;        struct tagRPCRet *rrpc = NULL;
         int ret = 0, Limit = 0;          int ret = 0, Limit = 0;
        register int i;        struct timeval tv = { DEF_RPC_TIMEOUT, 0 };
        rpc_val_t *v; 
        struct timeval tv = { DEF_CLI_TIMEOUT, 0 }; 
   
        FD_ZERO(&fds);        if (!cli || !csFunc) {
        memset(buf, 0, BUFSIZ); 
        memset(str, 0, MAXPATHLEN + UCHAR_MAX + 1); 
        if (!cli || !csFunc || (in_argc && !in_vals)) { 
                 rpc_SetErr(EINVAL, "Error:: Can`t execute call because parameter is null or invalid!\n");                  rpc_SetErr(EINVAL, "Error:: Can`t execute call because parameter is null or invalid!\n");
                 return -1;                  return -1;
         }          }
           if (out_vars)
                   *out_vars = NULL;
   
           buf = malloc(cli->cli_netbuf);
           if (!buf) {
                   LOGERR;
                   return -1;
           } else
                   memset(buf, 0, cli->cli_netbuf);
   
           /* build RPC call string for hash */
           memset(str, 0, sizeof str);
         if (csModule)          if (csModule)
                strlcpy((char*) str, csModule, MAXPATHLEN + UCHAR_MAX + 1);                strlcpy((char*) str, csModule, sizeof str);
        strlcat((char*) str, "__", MAXPATHLEN + UCHAR_MAX + 1);        strlcat((char*) str, "__", sizeof str);
        strlcat((char*) str, csFunc, MAXPATHLEN + UCHAR_MAX + 1);        strlcat((char*) str, csFunc, sizeof str);
   
           /* prepare RPC call */
           rpc = (struct tagRPCCall*) buf;
         memcpy(&rpc->call_session, cli->cli_parent, sizeof rpc->call_session);          memcpy(&rpc->call_session, cli->cli_parent, sizeof rpc->call_session);
        rpc->call_argc = in_argc;        rpc->call_argc = in_vars ? io_arraySize(in_vars) : 0;
        rpc->call_tag = crcFletcher16((u_short*) str, (MAXPATHLEN + UCHAR_MAX + 1) / 2);        rpc->call_tag = crcFletcher16((u_short*) str, sizeof str / 2);
        rpc->call_hash = hash_fnv((char*) str, MAXPATHLEN + UCHAR_MAX + 1);        rpc->call_hash = hash_fnv((char*) str, sizeof str);
         Limit = sizeof(struct tagRPCCall);          Limit = sizeof(struct tagRPCCall);
         if (in_argc) {  
                 v = (rpc_val_t*) (buf + sizeof(struct tagRPCCall));  
                 memcpy(v, in_vals, in_argc * sizeof(rpc_val_t));  
                 Limit += in_argc * sizeof(rpc_val_t);  
                 data = (u_char*) v + in_argc * sizeof(rpc_val_t);  
                 for (i = 0; i < in_argc; i++) {  
                         switch (in_vals[i].val_type) {  
                                 case buffer:  
                                         if (Limit + in_vals[i].val_len > BUFSIZ) {  
                                                 ret = -7;  
                                                 break;  
                                         }  
   
                                        memcpy(data, in_vals[i].val.buffer, in_vals[i].val_len);        if (in_vars && io_arraySize(in_vars)) {
                                        v[i].val.buffer = (uint8_t*) ((void*) data - (void*) v);                /* marshaling variables */
                                        data += in_vals[i].val_len;                ret = io_vals2buffer(buf + Limit, cli->cli_netbuf - Limit, in_vars);
                                        Limit += in_vals[i].val_len;                if (ret == -1) {
                                        break;                        rpc_SetErr(EBADRPC, "Error:: in prepare RPC packet values (-7) ...\n");
                                case string:                        free(buf);
                                        if (Limit + in_vals[i].val_len + 1 > BUFSIZ) {                        return -7;
                                                ret = -7;                } else
                                                break;                        Limit += ret;
                                        } 
 
                                        memcpy(data, in_vals[i].val.string, in_vals[i].val_len); 
                                        v[i].val.string = (int8_t*) ((void*) data - (void*) v); 
                                        data += in_vals[i].val_len; 
                                        Limit += in_vals[i].val_len; 
                                        break; 
                                case array: 
                                        if (Limit + in_vals[i].val_len > BUFSIZ) { 
                                                ret = -7; 
                                                break; 
                                        } 
 
                                        memcpy(data, in_vals[i].val.array, in_vals[i].val_len); 
                                        v[i].val.array = (int8_t**) ((void*) data - (void*) v); 
                                        data += in_vals[i].val_len; 
                                        Limit += in_vals[i].val_len; 
                                        break; 
                                default: 
                                        break; 
                        } 
                } 
                if (ret < 0) { 
                        rpc_SetErr(EMSGSIZE, "Error:: in prepare RPC packet (-7) ...\n"); 
                        return ret; 
                } 
         }          }
   
         if ((ret = send(cli->cli_sock, buf, Limit, 0)) == -1) {          if ((ret = send(cli->cli_sock, buf, Limit, 0)) == -1) {
                 LOGERR;                  LOGERR;
                   free(buf);
                 return -1;                  return -1;
         }          }
         if (ret != Limit) {          if (ret != Limit) {
                rpc_SetErr(EBADMSG, "Error:: in send RPC request, should be send %d bytes, really is %d\n",                 rpc_SetErr(EPROCUNAVAIL, "Error:: in send RPC request, should be send %d bytes, really is %d\n", 
                                 Limit, ret);                                  Limit, ret);
                   free(buf);
                 return -9;                  return -9;
         }          }
   
           /* reply from RPC server */
           FD_ZERO(&fds);
         FD_SET(cli->cli_sock, &fds);          FD_SET(cli->cli_sock, &fds);
         if ((ret = select(cli->cli_sock + 1, &fds, NULL, NULL, &tv)) < 1) {          if ((ret = select(cli->cli_sock + 1, &fds, NULL, NULL, &tv)) < 1) {
                if (ret) {                if (ret)
                         LOGERR;                          LOGERR;
                } else                else
                         rpc_SetErr(ETIMEDOUT, "Error:: timeout, no return from RPC server?\n");                          rpc_SetErr(ETIMEDOUT, "Error:: timeout, no return from RPC server?\n");
   
                   free(buf);
                 return -1;                  return -1;
         }          }
        memset(buf, 0, BUFSIZ);        memset(buf, 0, cli->cli_netbuf);
        if ((ret = recv(cli->cli_sock, buf, BUFSIZ, 0)) == -1) {        if ((ret = recv(cli->cli_sock, buf, cli->cli_netbuf, 0)) == -1) {
                 LOGERR;                  LOGERR;
                   free(buf);
                 return -3;                  return -3;
         }          }
        if (!ret)       // receive EOF        if (!ret) {       /* receive EOF! */
                 free(buf);
                 return 0;                  return 0;
        if (ret < sizeof(struct tagRPCCall)) {        }
                rpc_SetErr(EMSGSIZE, "Error:: too short RPC packet ...\n");        if (ret < sizeof(struct tagRPCRet)) {
                 rpc_SetErr(ERPCMISMATCH, "Error:: too short RPC packet ...\n");
                 free(buf);
                 return -4;                  return -4;
         } else          } else
                 rrpc = (struct tagRPCRet*) buf;                  rrpc = (struct tagRPCRet*) buf;
        // check RPC packet session info        /* check RPC packet session info */
         if (memcmp(&rrpc->ret_session, cli->cli_parent, sizeof rrpc->ret_session)) {          if (memcmp(&rrpc->ret_session, cli->cli_parent, sizeof rrpc->ret_session)) {
                rpc_SetErr(EINVAL, "Error:: get invalid RPC session ...\n");                rpc_SetErr(ERPCMISMATCH, "Error:: get invalid RPC session ...\n");
                 free(buf);
                 return -5;                  return -5;
        }        } else
                 Limit = sizeof(struct tagRPCRet);
         if (rrpc->ret_retcode < 0 && rrpc->ret_errno) {          if (rrpc->ret_retcode < 0 && rrpc->ret_errno) {
                rpc_SetErr(rrpc->ret_errno, "Error::Server side: %s\n", strerror(rrpc->ret_errno));                rpc_SetErr(rrpc->ret_errno, "Error::Server side: retcode=%d #%d %s\n"
                                 rrpc->ret_retcode, rrpc->ret_errno, strerror(rrpc->ret_errno));
                 free(buf);
                 return -6;                  return -6;
         }          }
        // RPC is OK! Go decapsulate variables ...        if (rrpc->ret_argc * sizeof(ait_val_t) > cli->cli_netbuf - Limit) {
                 rpc_SetErr(EMSGSIZE, "Error:: reply RPC packet is too long ...\n");
                 free(buf);
                 return -7;
         }
 
         /* RPC is OK! Go de-marshaling variables ... */
         if (rrpc->ret_argc) {          if (rrpc->ret_argc) {
                *out_argc = rrpc->ret_argc;                *out_vars = io_buffer2vals(buf + Limit, cli->cli_netbuf - Limit, rrpc->ret_argc, 0);
                *out_vals = calloc(rrpc->ret_argc, sizeof(rpc_val_t));                if (!*out_vars) {
                if (!*out_vals) {                        free(buf);
                        LOGERR; 
                        *out_argc = 0; 
                         return -1;                          return -1;
                } else                }
                        Limit = rrpc->ret_argc * sizeof(rpc_val_t); 
                memcpy(*out_vals, buf + sizeof(struct tagRPCRet), Limit); 
                // RPC received variables types OK! 
                data = (u_char*) buf + sizeof(struct tagRPCRet) + Limit; 
                for (i = 0; i < rrpc->ret_argc; i++) 
                        switch ((*out_vals)[i].val_type) { 
                                case buffer: 
                                        (*out_vals)[i].val.buffer = malloc((*out_vals)[i].val_len); 
                                        if (!(*out_vals)[i].val.buffer) { 
                                                rpc_SetErr(errno, "Error:: in prepare RPC reply ...\n"); 
                                                free(*out_vals); 
                                                *out_vals = NULL; 
                                                *out_argc = 0; 
                                                return -1; 
                                        } else 
                                                memcpy((*out_vals)[i].val.buffer, data, (*out_vals)[i].val_len); 
                                        data += (*out_vals)[i].val_len; 
                                        break; 
                                case string: 
                                        (*out_vals)[i].val.string = (int8_t*) strdup((char*) data); 
                                        if (!(*out_vals)[i].val.string) { 
                                                rpc_SetErr(errno, "Error:: in prepare RPC reply ...\n"); 
                                                free(*out_vals); 
                                                *out_vals = NULL; 
                                                *out_argc = 0; 
                                                return -1; 
                                        } 
                                        data += (*out_vals)[i].val_len + 1; 
                                        break; 
                                case array: 
                                        (*out_vals)[i].val.array = malloc((*out_vals)[i].val_len); 
                                        if (!(*out_vals)[i].val.array) { 
                                                rpc_SetErr(errno, "Error:: in prepare RPC reply ...\n"); 
                                                free(*out_vals); 
                                                *out_vals = NULL; 
                                                *out_argc = 0; 
                                                return -1; 
                                        } else 
                                                memcpy((*out_vals)[i].val.array, data, (*out_vals)[i].val_len); 
                                        data += (*out_vals)[i].val_len; 
                                        break; 
                                default: 
                                        break; 
                        } 
        } else { 
                *out_argc = 0; 
                *out_vals = NULL; 
         }          }
   
        return rrpc->ret_retcode;        ret = rrpc->ret_retcode;
         free(buf);
         return ret;
 }  }
   
 /*  /*
 * rpc_cli_freeVals() Free rpc_val_t array returned from RPC call * rpc_cli_freeVals() Free ait_val_t array returned from RPC call
 * @args = Number of arguments in array * @vars = Variable array
 * @vals = Value elements 
  * return: none   * return: none
  */   */
 inline void  inline void
rpc_cli_freeVals(int args, rpc_val_t *vals)rpc_cli_freeVals(array_t ** __restrict vars)
 {  {
         register int i;          register int i;
   
        if (!vals)        if (!vars || !*vars)
                 return;                  return;
   
        for (i = 0; i < args; i++)        for (i = 0; i < io_arraySize(*vars); i++)
                RPC_FREE_VAL(&vals[i]);                if (io_arrayGet(*vars, i))
                         AIT_FREE_VAL(io_array(*vars, i, ait_val_t*));
   
        free(vals);        io_arrayFree(*vars);
        vals = NULL;        io_arrayDestroy(vars);
 }
 
 /*
  * rpc_cli_allocVals() Allocate ait_val_t array for RPC call
  * @args = Number of arguments
  * return: =NULL error or !=NULL allocated array
  */
 inline array_t *
 rpc_cli_allocVals(u_short args)
 {
         array_t *arr;
         register int i;
         ait_val_t *v;
 
         if (!args)
                 return NULL;
 
         if (!(arr = io_arrayInit(args)))
                 return NULL;
 
         for (i = 0; i < io_arraySize(arr); i++) {
                 v = malloc(sizeof(ait_val_t));
                 if (!v) {
                         LOGERR;
                         rpc_cli_freeVals(&arr);
                         return NULL;
                 } else {
                         memset(v, 0, sizeof(ait_val_t));
                         io_arraySet(arr, i, v);
                 }
         }
 
         return arr;
 }  }

Removed from v.1.1  
changed lines
  Added in v.1.5


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