Diff for /libaitrpc/src/srv.c between versions 1.9 and 1.9.2.5

version 1.9, 2012/05/14 08:39:06 version 1.9.2.5, 2012/05/15 16:10:58
Line 46  SUCH DAMAGE. Line 46  SUCH DAMAGE.
 #include "global.h"  #include "global.h"
   
   
static void *rxPacket(sched_task_t*);static void *
static void *rxBLOB(sched_task_t*);closeClient(sched_task_t *task)
 {
         rpc_cli_t *c = TASK_ARG(task);
         rpc_srv_t *s = c->cli_parent;
   
           schedCancelby(s->srv_root, taskMAX, CRITERIA_FD, (void*) c->cli_sock, NULL);
   
           /* close client socket */
           if (TASK_VAL(task))
                   shutdown(c->cli_sock, SHUT_RDWR);
           close(c->cli_sock);
   
           /* free buffer */
           AIT_FREE_VAL(&c->cli_buf);
   
           io_arrayDel(s->srv_clients, c->cli_id, 42);
           return NULL;
   }
   
 static void *  static void *
 txPacket(sched_task_t *task)  txPacket(sched_task_t *task)
 {  {
         rpc_cli_t *c = TASK_ARG(task);          rpc_cli_t *c = TASK_ARG(task);
         rpc_srv_t *s = c->cli_parent;          rpc_srv_t *s = c->cli_parent;
         rpc_func_t *f = NULL;          rpc_func_t *f = NULL;
        u_char *buf = TASK_DATA(task);        u_char buf[USHRT_MAX] = { 0 };
         struct tagRPCCall *rpc = (struct tagRPCCall*) buf;          struct tagRPCCall *rpc = (struct tagRPCCall*) buf;
         int ret, wlen = sizeof(struct tagRPCCall);          int ret, wlen = sizeof(struct tagRPCCall);
         array_t *arr = NULL;          array_t *arr = NULL;
   
           /* copy RPC header */
           memcpy(buf, TASK_DATA(task), wlen);
   
         if (rpc->call_argc) {          if (rpc->call_argc) {
                 f = rpc_srv_getCall(s, ntohs(rpc->call_tag), ntohl(rpc->call_hash));                  f = rpc_srv_getCall(s, ntohs(rpc->call_tag), ntohl(rpc->call_hash));
                 if (!f) {                  if (!f) {
Line 69  txPacket(sched_task_t *task) Line 89  txPacket(sched_task_t *task)
                 } else {                  } else {
                         rpc->call_argc = htons(rpc_srv_getVars(f, &arr));                          rpc->call_argc = htons(rpc_srv_getVars(f, &arr));
                         /* Go Encapsulate variables */                          /* Go Encapsulate variables */
                        ret = io_vars2buffer(buf + wlen, TASK_DATLEN(task) - wlen, arr);                        ret = io_vars2buffer(buf + wlen, sizeof buf - wlen, arr);
                         /* Free return values */
                         io_clrVars(f->func_vars);                          io_clrVars(f->func_vars);
                         if (ret == -1) {                          if (ret == -1) {
                                 rpc_SetErr(EBADRPC, "Prepare RPC packet failed");                                  rpc_SetErr(EBADRPC, "Prepare RPC packet failed");
Line 88  txPacket(sched_task_t *task) Line 109  txPacket(sched_task_t *task)
         rpc->call_crc = htons(crcFletcher16((u_short*) buf, wlen / 2));          rpc->call_crc = htons(crcFletcher16((u_short*) buf, wlen / 2));
   
         /* send reply */          /* send reply */
        ret = send(TASK_FD(task), buf, wlen, 0);        ret = send(TASK_FD(task), buf, wlen, MSG_NOSIGNAL);
        if (ret == -1)        if (ret == -1 || ret != wlen) {
                LOGERR;                /* close connection */
        else if (ret != wlen)                schedEvent(TASK_ROOT(task), closeClient, c, 42, NULL, 0);
                rpc_SetErr(EPROCUNAVAIL, "RPC reply, should be send %d bytes, "        }
                                "really sended %d bytes", wlen, ret); 
   
         return NULL;          return NULL;
 }  }
Line 105  execCall(sched_task_t *task) Line 125  execCall(sched_task_t *task)
         rpc_srv_t *s = c->cli_parent;          rpc_srv_t *s = c->cli_parent;
         rpc_func_t *f = NULL;          rpc_func_t *f = NULL;
         array_t *arr = NULL;          array_t *arr = NULL;
        u_char *buf = TASK_DATA(task) + TASK_VAL(task);        u_char *buf = AIT_GET_BUF(&c->cli_buf) + TASK_VAL(task);
         struct tagRPCCall *rpc = (struct tagRPCCall*) buf;          struct tagRPCCall *rpc = (struct tagRPCCall*) buf;
         int argc = ntohs(rpc->call_argc);          int argc = ntohs(rpc->call_argc);
   
         /* Go decapsulate variables ... */          /* Go decapsulate variables ... */
         if (argc) {          if (argc) {
                 arr = io_buffer2vars(buf + sizeof(struct tagRPCCall),                   arr = io_buffer2vars(buf + sizeof(struct tagRPCCall), 
                                TASK_DATLEN(task) - TASK_VAL(task) - sizeof(struct tagRPCCall),                                 AIT_LEN(&c->cli_buf) - TASK_VAL(task) - sizeof(struct tagRPCCall), 
                                 argc, 1);                                  argc, 1);
                 if (!arr) {                  if (!arr) {
                         rpc_SetErr(ERPCMISMATCH, "#%d - %s", io_GetErrno(), io_GetError());                          rpc_SetErr(ERPCMISMATCH, "#%d - %s", io_GetErrno(), io_GetError());
Line 156  rxPacket(sched_task_t *task) Line 176  rxPacket(sched_task_t *task)
 {  {
         rpc_cli_t *c = TASK_ARG(task);          rpc_cli_t *c = TASK_ARG(task);
         rpc_srv_t *s = c->cli_parent;          rpc_srv_t *s = c->cli_parent;
        u_char *buf = TASK_DATA(task);        u_char *buf = AIT_GET_BUF(&c->cli_buf);
        int rlen, noreply;        int len, rlen, noreply;
         u_short crc, off = 0;          u_short crc, off = 0;
         struct tagRPCCall *rpc;          struct tagRPCCall *rpc;
         struct timespec ts;  
   
        memset(buf, 0, TASK_DATLEN(task));        memset(buf, 0, AIT_LEN(&c->cli_buf));
        rlen = recv(TASK_FD(task), buf, TASK_DATLEN(task), 0);        rlen = recv(TASK_FD(task), buf, AIT_LEN(&c->cli_buf), 0);
        if (rlen == -1) {        if (rlen < 1) {
                LOGERR;                /* close connection */
                c->cli_kill = kill;                schedEvent(TASK_ROOT(task), closeClient, c, 0, NULL, 0);
                 return NULL;                  return NULL;
         } else if (!rlen) {     /* receive EOF */  
                 c->cli_kill = kill;  
                 return NULL;  
         }          }
   
         do {          do {
                   /* check RPC packet */
                 if (rlen < sizeof(struct tagRPCCall)) {                  if (rlen < sizeof(struct tagRPCCall)) {
                         rpc_SetErr(ERPCMISMATCH, "Too short RPC packet");                          rpc_SetErr(ERPCMISMATCH, "Too short RPC packet");
   
                        schedRead(TASK_ROOT(task), rxPacket, TASK_ARG(task), TASK_FD(task),                         schedReadSelf(task);
                                        TASK_DATA(task), TASK_DATLEN(task)); 
                         return NULL;                          return NULL;
                 } else                  } else
                         rpc = (struct tagRPCCall*) (buf + off);                          rpc = (struct tagRPCCall*) (buf + off);
   
                rlen -= ntohs(rpc->call_len);                len = ntohs(rpc->call_len);
                 rlen -= len;
   
                 /* check integrity of packet */                  /* check integrity of packet */
                 crc = ntohs(rpc->call_crc);                  crc = ntohs(rpc->call_crc);
                 rpc->call_crc ^= rpc->call_crc;                  rpc->call_crc ^= rpc->call_crc;
                if (crc != crcFletcher16((u_short*) (buf + off), ntohs(rpc->call_len) / 2)) {                if (crc != crcFletcher16((u_short*) (buf + off), len / 2)) {
                         rpc_SetErr(ERPCMISMATCH, "Bad CRC RPC packet");                          rpc_SetErr(ERPCMISMATCH, "Bad CRC RPC packet");
   
                        off += ntohs(rpc->call_len);                        off += len;
                         if (rlen < 1)                          if (rlen < 1)
                                 break;                                  break;
                         else                          else
Line 207  rxPacket(sched_task_t *task) Line 224  rxPacket(sched_task_t *task)
                         rpc->call_rep.ret = RPC_ERROR(-1);                          rpc->call_rep.ret = RPC_ERROR(-1);
                         rpc->call_rep.eno = RPC_ERROR(errno);                          rpc->call_rep.eno = RPC_ERROR(errno);
                 } else {                  } else {
                         /* change socket timeout from last packet */  
                         ts.tv_sec = rpc->call_session.sess_timeout;  
                         ts.tv_nsec = 0;  
                         schedPolling(TASK_ROOT(task), &ts, NULL);  
   
                         /* execute RPC call */                          /* execute RPC call */
                        schedEvent(TASK_ROOT(task), execCall, TASK_ARG(task), off,                         schedEvent(TASK_ROOT(task), execCall, TASK_ARG(task), off, NULL, 0);
                                        TASK_DATA(task), TASK_DATLEN(task)); 
                 }                  }
   
                 /* send RPC reply */                  /* send RPC reply */
                 if (!noreply)                  if (!noreply)
                        schedWrite(TASK_ROOT(task), txPacket, TASK_ARG(task), TASK_FD(task),                         schedWrite(TASK_ROOT(task), txPacket, TASK_ARG(task), TASK_FD(task), rpc, len);
                                        buf + off, TASK_DATLEN(task) - off); 
   
                off += ntohs(rpc->call_len);                off += len;
         } while (rlen > 0);          } while (rlen > 0);
   
         /* lets get next packet */          /* lets get next packet */
        schedRead(TASK_ROOT(task), rxPacket, TASK_ARG(task), TASK_FD(task),         schedReadSelf(task);
                        TASK_DATA(task), TASK_DATLEN(task)); 
         return NULL;          return NULL;
 }  }
   
 static void *  static void *
rpc_srv_dispatchCall(void *arg)acceptClients(sched_task_t *task)
 {  {
        rpc_cli_t *c = arg;        rpc_srv_t *srv = TASK_ARG(task);
        rpc_srv_t *s;        rpc_cli_t *c = NULL;
        u_char *buf;        register int i;
        sched_root_task_t *root;        socklen_t salen = sizeof(io_sockaddr_t);
        struct timespec ts = { DEF_RPC_TIMEOUT, 0 }; 
   
        if (!arg) {        /* check free slots for connect */
                rpc_SetErr(EINVAL, "Invalid parameter can`t procced RPC client");        for (i = 0; i < io_arraySize(srv->srv_clients) && 
                return NULL;                        (c = io_array(srv->srv_clients, i, rpc_cli_t*)); i++);
        } else        if (c)  /* no more free slots! */
                s = c->cli_parent;                goto end;
        c = malloc(sizeof(rpc_cli_t));
        /* allocate net buffer */        if (!c) {
        buf = malloc(s->srv_netbuf); 
        if (!buf) { 
                 LOGERR;                  LOGERR;
                   srv->srv_kill = kill;
                 return NULL;                  return NULL;
         }  
   
         root = schedBegin();  
         if (!root) {  
                 rpc_SetErr(sched_GetErrno(), "%s", sched_GetError());  
                 free(buf);  
                 return NULL;  
         } else {          } else {
                schedTermCondition(root, kill);                memset(c, 0, sizeof(rpc_cli_t));
                schedPolling(root, &ts, NULL);                io_arraySet(srv->srv_clients, i, c);
                 c->cli_id = i;
                 c->cli_parent = srv;
         }          }
   
        schedRead(root, rxPacket, c, c->cli_sock, buf, s->srv_netbuf);        /* accept client */
         c->cli_sock = accept(srv->srv_server.cli_sock, &c->cli_sa.sa, &salen);
         if (c->cli_sock == -1) {
                 LOGERR;
                 io_arrayDel(srv->srv_clients, i, 42);
                 goto end;
         } else
                 fcntl(c->cli_sock, F_SETFL, fcntl(c->cli_sock, F_GETFL) | O_NONBLOCK);
   
        schedRun(root, (void*) &c->cli_kill);        /* alloc empty buffer */
        schedEnd(&root);        AIT_SET_BUF2(&c->cli_buf, 0, srv->srv_netbuf);
   
        shutdown(c->cli_sock, SHUT_RDWR);        schedRead(TASK_ROOT(task), rxPacket, c, c->cli_sock, NULL, 0);
        close(c->cli_sock);end:
        memset(c, 0, sizeof(rpc_cli_t));        schedReadSelf(task);
        free(buf); 
         return NULL;          return NULL;
 }  }
   
#if 0
 static void *  static void *
 txBLOB(sched_task_t *task)  txBLOB(sched_task_t *task)
 {  {
Line 651  rpc_srv_loopBLOB(rpc_srv_t * __restrict srv) Line 659  rpc_srv_loopBLOB(rpc_srv_t * __restrict srv)
                 if (i >= srv->srv_numcli) {                  if (i >= srv->srv_numcli) {
 #ifdef HAVE_PTHREAD_YIELD  #ifdef HAVE_PTHREAD_YIELD
                         pthread_yield();                          pthread_yield();
 #else  
                         usleep(1000000);  
 #endif  #endif
                           usleep(1000000);
                         continue;                          continue;
                 }                  }
   
Line 685  rpc_srv_loopBLOB(rpc_srv_t * __restrict srv) Line 692  rpc_srv_loopBLOB(rpc_srv_t * __restrict srv)
         pthread_attr_destroy(&attr);          pthread_attr_destroy(&attr);
         return 0;          return 0;
 }  }
   #endif
   
   
 /*  /*
Line 694  rpc_srv_loopBLOB(rpc_srv_t * __restrict srv) Line 702  rpc_srv_loopBLOB(rpc_srv_t * __restrict srv)
  * @regProcID = ProcessID for authentication & recognition   * @regProcID = ProcessID for authentication & recognition
  * @concurentClients = Concurent clients at same time to this server   * @concurentClients = Concurent clients at same time to this server
  * @netBuf = Network buffer length, if =0 == BUFSIZ (also meaning max RPC packet)   * @netBuf = Network buffer length, if =0 == BUFSIZ (also meaning max RPC packet)
  * @family = Family type, AF_INET, AF_INET6 or AF_LOCAL  
  * @csHost = Host name or address for bind server, if NULL any address   * @csHost = Host name or address for bind server, if NULL any address
  * @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 bind and created RPC server instance   * return: NULL == error or !=NULL bind and created RPC server instance
  */   */
 rpc_srv_t *  rpc_srv_t *
 rpc_srv_initServer(u_int regProgID, u_int regProcID, int concurentClients,   rpc_srv_initServer(u_int regProgID, u_int regProcID, int concurentClients, 
                int netBuf, u_short family, const char *csHost, u_short Port)                int netBuf, const char *csHost, u_short Port)
 {  {
         rpc_srv_t *srv = NULL;  
         int n = 1;          int n = 1;
        struct hostent *host = NULL;        rpc_srv_t *srv = NULL;
         io_sockaddr_t sa;          io_sockaddr_t sa;
   
        if (!concurentClients || !regProgID ||         if (!concurentClients || !regProgID) {
                        (family != AF_INET && family != AF_INET6 && family != AF_LOCAL)) {                rpc_SetErr(EINVAL, "Invalid parameters can`t init RPC server");
                rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t init RPC server ...\n"); 
                 return NULL;                  return NULL;
         }          }
           if (!io_gethostbyname(csHost, Port, &sa))
                   return NULL;
         if (!Port)          if (!Port)
                 Port = RPC_DEFPORT;                  Port = RPC_DEFPORT;
         if (!netBuf)          if (!netBuf)
                 netBuf = BUFSIZ;                  netBuf = BUFSIZ;
         else          else
                 netBuf = io_align(netBuf, 1);   /* align netBuf length */                  netBuf = io_align(netBuf, 1);   /* align netBuf length */
         if (csHost && family != AF_LOCAL) {  
                 host = gethostbyname2(csHost, family);  
                 if (!host) {  
                         rpc_SetErr(h_errno, "Error:: %s\n", hstrerror(h_errno));  
                         return NULL;  
                 }  
         }  
         memset(&sa, 0, sizeof sa);  
         sa.sa.sa_family = family;  
         switch (family) {  
                 case AF_INET:  
                         sa.sin.sin_len = sizeof(struct sockaddr_in);  
                         sa.sin.sin_port = htons(Port);  
                         if (csHost)  
                                 memcpy(&sa.sin.sin_addr, host->h_addr, host->h_length);  
                         break;  
                 case AF_INET6:  
                         sa.sin6.sin6_len = sizeof(struct sockaddr_in6);  
                         sa.sin6.sin6_port = htons(Port);  
                         if (csHost)  
                                 memcpy(&sa.sin6.sin6_addr, host->h_addr, host->h_length);  
                         break;  
                 case AF_LOCAL:  
                         sa.sun.sun_len = sizeof(struct sockaddr_un);  
                         if (csHost)  
                                 strlcpy(sa.sun.sun_path, csHost, sizeof sa.sun.sun_path);  
                         unlink(sa.sun.sun_path);  
                         break;  
                 default:  
                         rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t start RPC server ...\n");  
                         return NULL;  
         }  
   
         srv = malloc(sizeof(rpc_srv_t));          srv = malloc(sizeof(rpc_srv_t));
         if (!srv) {          if (!srv) {
Line 760  rpc_srv_initServer(u_int regProgID, u_int regProcID, i Line 735  rpc_srv_initServer(u_int regProgID, u_int regProcID, i
                 memset(srv, 0, sizeof(rpc_srv_t));                  memset(srv, 0, sizeof(rpc_srv_t));
   
         srv->srv_netbuf = netBuf;          srv->srv_netbuf = netBuf;
         srv->srv_numcli = concurentClients;  
         srv->srv_session.sess_version = RPC_VERSION;          srv->srv_session.sess_version = RPC_VERSION;
         srv->srv_session.sess_timeout = DEF_RPC_TIMEOUT;          srv->srv_session.sess_timeout = DEF_RPC_TIMEOUT;
         srv->srv_session.sess_program = regProgID;          srv->srv_session.sess_program = regProgID;
         srv->srv_session.sess_process = regProcID;          srv->srv_session.sess_process = regProcID;
   
         srv->srv_server.cli_tid = pthread_self();  
         srv->srv_server.cli_parent = srv;          srv->srv_server.cli_parent = srv;
        memcpy(&srv->srv_server.cli_sa, &sa, sizeof sa);        memcpy(&srv->srv_server.cli_sa, &sa, sizeof srv->srv_server.cli_sa);
   
           /* init functions list */
           TAILQ_INIT(&srv->srv_funcs);
   
           /* init scheduler */
           srv->srv_root = schedBegin();
           if (!srv->srv_root) {
                   rpc_SetErr(sched_GetErrno(), "%s", sched_GetError());
                   free(srv);
                   return NULL;
           }
   
           /* init pool for clients */
           srv->srv_clients = io_arrayInit(concurentClients);
           if (!srv->srv_clients) {
                   rpc_SetErr(io_GetErrno(), "%s", io_GetError());
                   schedEnd(&srv->srv_root);
                   free(srv);
                   return NULL;
           }
   
         /* create server socket */          /* create server socket */
        srv->srv_server.cli_sock = socket(family, SOCK_STREAM, 0);        srv->srv_server.cli_sock = socket(srv->srv_server.cli_sa.sa.sa_family, SOCK_STREAM, 0);
         if (srv->srv_server.cli_sock == -1) {          if (srv->srv_server.cli_sock == -1) {
                 LOGERR;                  LOGERR;
                   io_arrayDestroy(&srv->srv_clients);
                   schedEnd(&srv->srv_root);
                 free(srv);                  free(srv);
                 return NULL;                  return NULL;
         }          }
         if (setsockopt(srv->srv_server.cli_sock, SOL_SOCKET, SO_REUSEADDR, &n, sizeof n) == -1) {          if (setsockopt(srv->srv_server.cli_sock, SOL_SOCKET, SO_REUSEADDR, &n, sizeof n) == -1) {
                 LOGERR;                  LOGERR;
                close(srv->srv_server.cli_sock);                goto err;
                free(srv); 
                return NULL; 
         }          }
         n = srv->srv_netbuf;          n = srv->srv_netbuf;
         if (setsockopt(srv->srv_server.cli_sock, SOL_SOCKET, SO_SNDBUF, &n, sizeof n) == -1) {          if (setsockopt(srv->srv_server.cli_sock, SOL_SOCKET, SO_SNDBUF, &n, sizeof n) == -1) {
                 LOGERR;                  LOGERR;
                close(srv->srv_server.cli_sock);                goto err;
                free(srv); 
                return NULL; 
         }          }
         if (setsockopt(srv->srv_server.cli_sock, SOL_SOCKET, SO_RCVBUF, &n, sizeof n) == -1) {          if (setsockopt(srv->srv_server.cli_sock, SOL_SOCKET, SO_RCVBUF, &n, sizeof n) == -1) {
                 LOGERR;                  LOGERR;
                close(srv->srv_server.cli_sock);                goto err;
                free(srv); 
                return NULL; 
         }          }
         if (bind(srv->srv_server.cli_sock, &srv->srv_server.cli_sa.sa,           if (bind(srv->srv_server.cli_sock, &srv->srv_server.cli_sa.sa, 
                                 srv->srv_server.cli_sa.sa.sa_len) == -1) {                                  srv->srv_server.cli_sa.sa.sa_len) == -1) {
                 LOGERR;                  LOGERR;
                close(srv->srv_server.cli_sock);                goto err;
                free(srv); 
                return NULL; 
         }          }
   
         /* allocate pool for concurent clients */  
         srv->srv_clients = calloc(srv->srv_numcli, sizeof(rpc_cli_t));  
         if (!srv->srv_clients) {  
                 LOGERR;  
                 close(srv->srv_server.cli_sock);  
                 free(srv);  
                 return NULL;  
         } else  
                 memset(srv->srv_clients, 0, srv->srv_numcli * sizeof(rpc_cli_t));  
   
         rpc_srv_registerCall(srv, NULL, CALL_SRVSHUTDOWN, 0);  
         rpc_srv_registerCall(srv, NULL, CALL_SRVCLIENTS, 1);  
         rpc_srv_registerCall(srv, NULL, CALL_SRVSESSIONS, 4);  
         rpc_srv_registerCall(srv, NULL, CALL_SRVCALLS, 1);  
   
         return srv;          return srv;
   err:    /* error condition */
           close(srv->srv_server.cli_sock);
           io_arrayDestroy(&srv->srv_clients);
           schedEnd(&srv->srv_root);
           free(srv);
           return NULL;
 }  }
   
 /*  /*
Line 833  rpc_srv_endServer(rpc_srv_t ** __restrict psrv) Line 811  rpc_srv_endServer(rpc_srv_t ** __restrict psrv)
 {  {
         rpc_cli_t *c;          rpc_cli_t *c;
         register int i;          register int i;
        rpc_func_t *f;        rpc_func_t *f, *tmp;
   
         if (!psrv || !*psrv) {          if (!psrv || !*psrv) {
                rpc_SetErr(EINVAL, "Error:: Can`t destroy server because parameter is null!\n");                rpc_SetErr(EINVAL, "Can`t destroy server because parameter is null!");
                 return;                  return;
         }          }
   
         rpc_srv_endBLOBServer(*psrv);  
   
         /* close all clients connections & server socket */          /* close all clients connections & server socket */
        for (i = 0, c = (*psrv)->srv_clients; i < (*psrv)->srv_numcli && c; i++, c++)        for (i = 0; i < io_arraySize((*psrv)->srv_clients); i++) {
                if (c->cli_sa.sa.sa_family) {                c = io_array((*psrv)->srv_clients, i, rpc_cli_t*);
                 if (c) {
                         shutdown(c->cli_sock, SHUT_RDWR);                          shutdown(c->cli_sock, SHUT_RDWR);
                         close(c->cli_sock);                          close(c->cli_sock);
                           free(c);
                           io_arrayDel((*psrv)->srv_clients, i, 0);
                 }                  }
         close((*psrv)->srv_server.cli_sock);  
   
         if ((*psrv)->srv_clients) {  
                 free((*psrv)->srv_clients);  
                 (*psrv)->srv_clients = NULL;  
                 (*psrv)->srv_numcli = 0;  
         }          }
           io_arrayDestroy(&(*psrv)->srv_clients);
   
           close((*psrv)->srv_server.cli_sock);
   
         /* detach exported calls */          /* detach exported calls */
        while ((f = (*psrv)->srv_funcs)) {        TAILQ_FOREACH_SAFE(f, &(*psrv)->srv_funcs, func_node, tmp) {
                (*psrv)->srv_funcs = f->func_next; 
                 io_freeVars(&f->func_vars);                  io_freeVars(&f->func_vars);
                 AIT_FREE_VAL(&f->func_name);                  AIT_FREE_VAL(&f->func_name);
                 AIT_FREE_VAL(&f->func_file);                  AIT_FREE_VAL(&f->func_file);
                 free(f);                  free(f);
         }          }
   
           schedEnd(&(*psrv)->srv_root);
         free(*psrv);          free(*psrv);
         *psrv = NULL;          *psrv = NULL;
 }  }
Line 878  rpc_srv_endServer(rpc_srv_t ** __restrict psrv) Line 854  rpc_srv_endServer(rpc_srv_t ** __restrict psrv)
 int  int
 rpc_srv_loopServer(rpc_srv_t * __restrict srv)  rpc_srv_loopServer(rpc_srv_t * __restrict srv)
 {  {
        socklen_t salen = sizeof(io_sockaddr_t);        /*
        register int i; 
        rpc_cli_t *c; 
         int ret;          int ret;
        pthread_attr_t attr;        */
        struct pollfd pfd; 
   
         if (!srv) {          if (!srv) {
                rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t start RPC server ...\n");                rpc_SetErr(EINVAL, "Invalid parameter can`t start RPC server");
                 return -1;                  return -1;
         }          }
   
        /* activate BLOB server worker if srv->srv_blob.state == enable */        if (listen(srv->srv_server.cli_sock, io_arraySize(srv->srv_clients)) == -1) {
        rpc_srv_execBLOBServer(srv); 
 
        if (listen(srv->srv_server.cli_sock, SOMAXCONN) == -1) { 
                 LOGERR;                  LOGERR;
                 return -1;                  return -1;
         } else          } else
                fcntl(srv->srv_server.cli_sock, F_SETFL, fcntl(srv->srv_server.cli_sock, F_GETFL) | O_NONBLOCK);                fcntl(srv->srv_server.cli_sock, F_SETFL, 
                                 fcntl(srv->srv_server.cli_sock, F_GETFL) | O_NONBLOCK);
   
        pthread_attr_init(&attr);        if (!schedRead(srv->srv_root, acceptClients, srv, srv->srv_server.cli_sock, NULL, 0)) {
        pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);                rpc_SetErr(sched_GetErrno(), "%s", sched_GetError());
                return -1;
        pfd.fd = srv->srv_server.cli_sock; 
        pfd.events = POLLIN | POLLPRI; 
        /* main rpc loop */ 
        while (srv->srv_kill != kill) { 
                for (c = srv->srv_clients, i = 0; i < srv->srv_numcli && c; i++, c++) 
                        if (!c->cli_sa.sa.sa_family) 
                                break; 
                if (i >= srv->srv_numcli) { 
#ifdef HAVE_PTHREAD_YIELD 
                        pthread_yield(); 
#else 
                        usleep(1000000); 
#endif 
                        continue; 
                } 
 
                if ((ret = poll(&pfd, 1, srv->srv_session.sess_timeout * 1000)) == -1 ||  
                                pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) { 
                        LOGERR; 
                        ret = 1; 
                        break; 
                } else if (!ret) 
                        continue; 
 
                c->cli_sock = accept(srv->srv_server.cli_sock, &c->cli_sa.sa, &salen); 
                if (c->cli_sock == -1) { 
                        LOGERR; 
                        continue; 
                } else 
                        c->cli_parent = srv; 
 
                /* spawn rpc client dispatcher */ 
                c->cli_kill = enable; 
                if (pthread_create(&c->cli_tid, &attr, rpc_srv_dispatchCall, c)) { 
                        LOGERR; 
                        continue; 
                } 
         }          }
   
        pthread_attr_destroy(&attr);        /* main rpc loop */
         schedRun(srv->srv_root, &srv->srv_kill);
         return 0;          return 0;
 }  }
   
 // ---------------------------------------------------------  
   
 /*  /*
  * rpc_srv_execCall() Execute registered call from RPC server   * rpc_srv_execCall() Execute registered call from RPC server
Line 968  rpc_srv_execCall(rpc_func_t * __restrict call, struct  Line 902  rpc_srv_execCall(rpc_func_t * __restrict call, struct 
                 return -1;                  return -1;
         }          }
   
        dl = dlopen(AIT_ADDR(&call->func_file), RTLD_NOW);        dl = dlopen(AIT_ADDR(&call->func_file), RTLD_LAZY | RTLD_GLOBAL);
         if (!dl) {          if (!dl) {
                 rpc_SetErr(ENOENT, "Can`t attach module %s!", dlerror());                  rpc_SetErr(ENOENT, "Can`t attach module %s!", dlerror());
                 return -1;                  return -1;

Removed from v.1.9  
changed lines
  Added in v.1.9.2.5


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