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

Diff for /libaitrpc/src/srv.c between versions 1.9.2.16 and 1.10.2.3

version 1.9.2.16, 2012/05/16 13:17:51 version 1.10.2.3, 2012/07/22 19:28:44
Line 52  closeClient(sched_task_t *task) Line 52  closeClient(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;
   
        schedCancelby(s->srv_root, taskMAX, CRITERIA_ARG, TASK_ARG(task), NULL);        schedCancelby(TASK_ROOT(task), taskMAX, CRITERIA_ARG, TASK_ARG(task), NULL);
   
         /* close client socket */          /* close client socket */
         if (TASK_VAL(task))          if (TASK_VAL(task))
Line 62  closeClient(sched_task_t *task) Line 62  closeClient(sched_task_t *task)
         /* free buffer */          /* free buffer */
         AIT_FREE_VAL(&c->cli_buf);          AIT_FREE_VAL(&c->cli_buf);
   
        io_arrayDel(s->srv_clients, c->cli_id, 42);        io_arrayDel(s->srv_clients, c->cli_id, 0);
         if (c)
                 io_free(c);
         return NULL;          return NULL;
 }  }
   
Line 82  txPacket(sched_task_t *task) Line 84  txPacket(sched_task_t *task)
         if (rpc->call_argc) {          if (rpc->call_argc) {
                 f = rpc_srv_getCall(s, ntohs(rpc->call_tag));                  f = rpc_srv_getCall(s, ntohs(rpc->call_tag));
                 if (!f) {                  if (!f) {
                           rpc_SetErr(EPROGUNAVAIL, "Function not found at RPC server");
                         rpc->call_argc ^= rpc->call_argc;                          rpc->call_argc ^= rpc->call_argc;
                         rpc->call_rep.ret = RPC_ERROR(-1);                          rpc->call_rep.ret = RPC_ERROR(-1);
                         rpc->call_rep.eno = RPC_ERROR(rpc_Errno);                          rpc->call_rep.eno = RPC_ERROR(rpc_Errno);
                 } else {                  } else {
                        rpc->call_argc = htons(io_arraySize(f->func_vars));                        rpc->call_argc = htons(io_arraySize(RPC_RETVARS(c)));
                         /* Go Encapsulate variables */                          /* Go Encapsulate variables */
                        ret = io_vars2buffer(buf + wlen, sizeof buf - wlen, f->func_vars);                        ret = io_vars2buffer(buf + wlen, sizeof buf - wlen, RPC_RETVARS(c));
                         /* Free return values */                          /* Free return values */
                        io_clrVars(f->func_vars);                        io_freeVars(&c->cli_vars);
                         if (ret == -1) {                          if (ret == -1) {
                                 rpc_SetErr(EBADRPC, "Prepare RPC packet failed");                                  rpc_SetErr(EBADRPC, "Prepare RPC packet failed");
                                 rpc->call_argc ^= rpc->call_argc;                                  rpc->call_argc ^= rpc->call_argc;
Line 150  execCall(sched_task_t *task) Line 153  execCall(sched_task_t *task)
                 rpc->call_rep.eno = RPC_ERROR(rpc_Errno);                  rpc->call_rep.eno = RPC_ERROR(rpc_Errno);
         } else {          } else {
                 /* if client doesn't want reply */                  /* if client doesn't want reply */
                argc = rpc->call_req.flags & RPC_NOREPLY;                argc = RPC_CHK_NOREPLY(rpc);
                rpc->call_rep.ret = RPC_ERROR(rpc_srv_execCall(f, rpc, arr));                rpc->call_rep.ret = RPC_ERROR(rpc_srv_execCall(c, rpc, f->func_name, arr));
                 if (rpc->call_rep.ret == htonl(-1)) {                  if (rpc->call_rep.ret == htonl(-1)) {
                         rpc->call_rep.eno = RPC_ERROR(errno);                          rpc->call_rep.eno = RPC_ERROR(errno);
                         rpc->call_argc ^= rpc->call_argc;                          rpc->call_argc ^= rpc->call_argc;
Line 159  execCall(sched_task_t *task) Line 162  execCall(sched_task_t *task)
                         rpc->call_rep.eno ^= rpc->call_rep.eno;                          rpc->call_rep.eno ^= rpc->call_rep.eno;
                         if (argc) {                          if (argc) {
                                 /* without reply */                                  /* without reply */
                                io_clrVars(f->func_vars);                                io_freeVars(&c->cli_vars);
                                 rpc->call_argc ^= rpc->call_argc;                                  rpc->call_argc ^= rpc->call_argc;
                         } else {                          } else {
                                 /* reply */                                  /* reply */
                                rpc->call_argc = htons(io_arraySize(f->func_vars));                                rpc->call_argc = htons(io_arraySize(RPC_RETVARS(c)));
                         }                          }
                 }                  }
         }          }
Line 177  rxPacket(sched_task_t *task) Line 180  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 = AIT_GET_BUF(&c->cli_buf);  
         int len, rlen, noreply;          int len, rlen, noreply;
        u_short crc, off = 0;        u_short crc, off = TASK_DATLEN(task);
         u_char *buf = AIT_GET_BUF(&c->cli_buf);
         struct tagRPCCall *rpc;          struct tagRPCCall *rpc;
   
         memset(buf, 0, AIT_LEN(&c->cli_buf));          memset(buf, 0, AIT_LEN(&c->cli_buf));
        rlen = recv(TASK_FD(task), buf, AIT_LEN(&c->cli_buf), 0);        rlen = recv(TASK_FD(task), buf + off, AIT_LEN(&c->cli_buf) - off, 0);
         if (rlen < 1) {          if (rlen < 1) {
                 /* close connection */                  /* close connection */
                 schedEvent(TASK_ROOT(task), closeClient, c, 42, NULL, 0);                  schedEvent(TASK_ROOT(task), closeClient, c, 42, NULL, 0);
                 return NULL;                  return NULL;
           } else {
                   rlen += off;    /* add reminded bytes from previous rxPacket, if exists! */
                   off = 0;        /* process buffer from start offset == 0 */
         }          }
   
         do {          do {
Line 195  rxPacket(sched_task_t *task) Line 201  rxPacket(sched_task_t *task)
                 if (rlen < sizeof(struct tagRPCCall)) {                  if (rlen < sizeof(struct tagRPCCall)) {
                         rpc_SetErr(ERPCMISMATCH, "Short RPC packet");                          rpc_SetErr(ERPCMISMATCH, "Short RPC packet");
   
                        schedReadSelf(task);                        /* reminder received previous bytes ;) */
                         schedRead(TASK_ROOT(task), TASK_FUNC(task), TASK_ARG(task), 
                                         TASK_FD(task), TASK_DATA(task), rlen);
                         return NULL;                          return NULL;
                 } else                  } else
                         rpc = (struct tagRPCCall*) (buf + off);                          rpc = (struct tagRPCCall*) (buf + off);
Line 203  rxPacket(sched_task_t *task) Line 211  rxPacket(sched_task_t *task)
                 len = ntohs(rpc->call_len);                  len = ntohs(rpc->call_len);
                 rlen -= len;                  rlen -= len;
   
                   /* check RPC packet lengths */
                   if (rlen < 0 || len < sizeof(struct tagRPCCall)) {
                           rpc_SetErr(ERPCMISMATCH, "Broken RPC packet length");
                           /* skip entire packet */
                           break;
                   }
   
                 /* 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), len / 2)) {                if (crc != crcFletcher16((u_short*) rpc, len / 2)) {
                         rpc_SetErr(ERPCMISMATCH, "Bad CRC RPC packet");                          rpc_SetErr(ERPCMISMATCH, "Bad CRC RPC packet");
   
                         off += len;                          off += len;
                        if (rlen < 1)                        /* try next packet remaining into buffer */
                                break;                        continue;
                        else 
                                continue; 
                 }                  }
   
                noreply = rpc->call_req.flags & RPC_NOREPLY;                noreply = RPC_CHK_NOREPLY(rpc);
   
                 /* check RPC packet session info */                  /* check RPC packet session info */
                 if (rpc_chkPktSession(&rpc->call_session, &s->srv_session)) {                  if (rpc_chkPktSession(&rpc->call_session, &s->srv_session)) {
Line 237  rxPacket(sched_task_t *task) Line 250  rxPacket(sched_task_t *task)
         } while (rlen > 0);          } while (rlen > 0);
   
         /* lets get next packet */          /* lets get next packet */
        schedReadSelf(task);        schedRead(TASK_ROOT(task), TASK_FUNC(task), TASK_ARG(task), TASK_FD(task), TASK_DATA(task), 0);
         return NULL;          return NULL;
 }  }
   
Line 254  acceptClients(sched_task_t *task) Line 267  acceptClients(sched_task_t *task)
                         (c = io_array(srv->srv_clients, i, rpc_cli_t*)); i++);                          (c = io_array(srv->srv_clients, i, rpc_cli_t*)); i++);
         if (c)  /* no more free slots! */          if (c)  /* no more free slots! */
                 goto end;                  goto end;
        c = malloc(sizeof(rpc_cli_t));        c = io_malloc(sizeof(rpc_cli_t));
         if (!c) {          if (!c) {
                 LOGERR;                  LOGERR;
                 srv->srv_kill = 1;                  srv->srv_kill = 1;
Line 293  closeBLOBClient(sched_task_t *task) Line 306  closeBLOBClient(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;
   
        schedCancelby(s->srv_blob.root, taskMAX, CRITERIA_ARG, TASK_ARG(task), NULL);        schedCancelby(TASK_ROOT(task), taskMAX, CRITERIA_ARG, TASK_ARG(task), NULL);
   
         /* close client socket */          /* close client socket */
         if (TASK_VAL(task))          if (TASK_VAL(task))
Line 303  closeBLOBClient(sched_task_t *task) Line 316  closeBLOBClient(sched_task_t *task)
         /* free buffer */          /* free buffer */
         AIT_FREE_VAL(&c->cli_buf);          AIT_FREE_VAL(&c->cli_buf);
   
        io_arrayDel(s->srv_blob.clients, c->cli_id, 42);        io_arrayDel(s->srv_blob.clients, c->cli_id, 0);
         if (c)
                 io_free(c);
         return NULL;          return NULL;
 }  }
   
Line 335  rxBLOB(sched_task_t *task) Line 350  rxBLOB(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_blob_t *b;          rpc_blob_t *b;
        u_char *buf = AIT_GET_BUF(&c->cli_buf);        struct tagBLOBHdr blob;
        struct tagBLOBHdr *blob = (struct tagBLOBHdr *) buf; 
         int rlen;          int rlen;
         u_short crc;          u_short crc;
   
        memset(buf, 0, AIT_LEN(&c->cli_buf));        memset(&blob, 0, sizeof blob);
        rlen = recv(TASK_FD(task), buf, AIT_LEN(&c->cli_buf), 0);        rlen = recv(TASK_FD(task), &blob, sizeof blob, 0);
         if (rlen < 1) {          if (rlen < 1) {
                 /* close blob connection */                  /* close blob connection */
                 schedEvent(TASK_ROOT(task), closeBLOBClient, c, 42, NULL, 0);                  schedEvent(TASK_ROOT(task), closeBLOBClient, c, 42, NULL, 0);
Line 357  rxBLOB(sched_task_t *task) Line 371  rxBLOB(sched_task_t *task)
         }          }
   
         /* check integrity of packet */          /* check integrity of packet */
        crc = ntohs(blob->hdr_crc);        crc = ntohs(blob.hdr_crc);
        blob->hdr_crc ^= blob->hdr_crc;        blob.hdr_crc ^= blob.hdr_crc;
        if (crc != crcFletcher16((u_short*) buf, rlen / 2)) {        if (crc != crcFletcher16((u_short*) &blob, rlen / 2)) {
                 rpc_SetErr(ERPCMISMATCH, "Bad CRC BLOB packet");                  rpc_SetErr(ERPCMISMATCH, "Bad CRC BLOB packet");
   
                 schedReadSelf(task);                  schedReadSelf(task);
Line 367  rxBLOB(sched_task_t *task) Line 381  rxBLOB(sched_task_t *task)
         }          }
   
         /* check RPC packet session info */          /* check RPC packet session info */
        if ((crc = rpc_chkPktSession(&blob->hdr_session, &s->srv_session))) {        if ((crc = rpc_chkPktSession(&blob.hdr_session, &s->srv_session))) {
                 rpc_SetErr(ERPCMISMATCH, "Get invalid RPC session");                  rpc_SetErr(ERPCMISMATCH, "Get invalid RPC session");
                blob->hdr_cmd = error;                blob.hdr_cmd = error;
                 goto end;                  goto end;
         }          }
   
         /* Go to proceed packet ... */          /* Go to proceed packet ... */
        switch (blob->hdr_cmd) {        switch (blob.hdr_cmd) {
                 case get:                  case get:
                        if (!(b = rpc_srv_getBLOB(s, ntohl(blob->hdr_var)))) {                        if (!(b = rpc_srv_getBLOB(s, ntohl(blob.hdr_var)))) {
                                rpc_SetErr(EINVAL, "Var=%x not found", ntohl(blob->hdr_var));                                rpc_SetErr(EINVAL, "Var=%x not found", ntohl(blob.hdr_var));
                                blob->hdr_cmd = no;                                blob.hdr_cmd = no;
                                blob->hdr_ret = RPC_ERROR(-1);                                blob.hdr_ret = RPC_ERROR(-1);
                                 break;                                  break;
                         } else                          } else
                                blob->hdr_len = htonl(b->blob_len);                                blob.hdr_len = htonl(b->blob_len);
   
                         if (rpc_srv_blobMap(s, b) != -1) {                          if (rpc_srv_blobMap(s, b) != -1) {
                                 /* deliver BLOB variable to client */                                  /* deliver BLOB variable to client */
                                blob->hdr_ret = htonl(rpc_srv_sendBLOB(c, b));                                blob.hdr_ret = htonl(rpc_srv_sendBLOB(c, b));
                                 rpc_srv_blobUnmap(b);                                  rpc_srv_blobUnmap(b);
                         } else {                          } else {
                                blob->hdr_cmd = error;                                blob.hdr_cmd = error;
                                blob->hdr_ret = RPC_ERROR(-1);                                blob.hdr_ret = RPC_ERROR(-1);
                         }                          }
                         break;                          break;
                 case set:                  case set:
                        if ((b = rpc_srv_registerBLOB(s, ntohl(blob->hdr_len)))) {                        if ((b = rpc_srv_registerBLOB(s, ntohl(blob.hdr_len)))) {
                                 /* set new BLOB variable for reply :) */                                  /* set new BLOB variable for reply :) */
                                blob->hdr_var = htonl(b->blob_var);                                blob.hdr_var = htonl(b->blob_var);
   
                                 /* receive BLOB from client */                                  /* receive BLOB from client */
                                blob->hdr_ret = htonl(rpc_srv_recvBLOB(c, b));                                blob.hdr_ret = htonl(rpc_srv_recvBLOB(c, b));
                                 rpc_srv_blobUnmap(b);                                  rpc_srv_blobUnmap(b);
                         } else {                          } else {
                                blob->hdr_cmd = error;                                blob.hdr_cmd = error;
                                blob->hdr_ret = RPC_ERROR(-1);                                blob.hdr_ret = RPC_ERROR(-1);
                         }                          }
                         break;                          break;
                 case unset:                  case unset:
                        if (rpc_srv_unregisterBLOB(s, blob->hdr_var) == -1) {                        if (rpc_srv_unregisterBLOB(s, ntohl(blob.hdr_var)) == -1) {
                                blob->hdr_cmd = error;                                blob.hdr_cmd = error;
                                blob->hdr_ret = RPC_ERROR(-1);                                blob.hdr_ret = RPC_ERROR(-1);
                         }                          }
                         break;                          break;
                 default:                  default:
                        rpc_SetErr(EPROCUNAVAIL, "Unsupported BLOB command %d", blob->hdr_cmd);                        rpc_SetErr(EPROCUNAVAIL, "Unsupported BLOB command %d", blob.hdr_cmd);
                        blob->hdr_cmd = error;                        blob.hdr_cmd = error;
                        blob->hdr_ret = RPC_ERROR(-1);                        blob.hdr_ret = RPC_ERROR(-1);
         }          }
   
 end:  end:
           memcpy(AIT_ADDR(&c->cli_buf), &blob, sizeof blob);
         schedWrite(TASK_ROOT(task), txBLOB, TASK_ARG(task), TASK_FD(task), NULL, 0);          schedWrite(TASK_ROOT(task), txBLOB, TASK_ARG(task), TASK_FD(task), NULL, 0);
         schedReadSelf(task);          schedReadSelf(task);
         return NULL;          return NULL;
Line 437  acceptBLOBClients(sched_task_t *task) Line 452  acceptBLOBClients(sched_task_t *task)
                         (c = io_array(srv->srv_blob.clients, i, rpc_cli_t*)); i++);                          (c = io_array(srv->srv_blob.clients, i, rpc_cli_t*)); i++);
         if (c)  /* no more free slots! */          if (c)  /* no more free slots! */
                 goto end;                  goto end;
        c = malloc(sizeof(rpc_cli_t));        c = io_malloc(sizeof(rpc_cli_t));
         if (!c) {          if (!c) {
                 LOGERR;                  LOGERR;
                 srv->srv_kill = srv->srv_blob.kill = 1;                  srv->srv_kill = srv->srv_blob.kill = 1;
Line 581  rpc_srv_initBLOBServer(rpc_srv_t * __restrict srv, u_s Line 596  rpc_srv_initBLOBServer(rpc_srv_t * __restrict srv, u_s
  * @srv = RPC Server instance   * @srv = RPC Server instance
  * return: none   * return: none
  */   */
voidinline void
 rpc_srv_endBLOBServer(rpc_srv_t * __restrict srv)  rpc_srv_endBLOBServer(rpc_srv_t * __restrict srv)
 {  {
         rpc_cli_t *c;  
         register int i;  
         rpc_blob_t *b, *tmp;  
   
         if (!srv)          if (!srv)
                 return;                  return;
   
         /* close all clients connections & server socket */  
         for (i = 0; i < io_arraySize(srv->srv_blob.clients); i++) {  
                 c = io_array(srv->srv_blob.clients, i, rpc_cli_t*);  
                 if (c) {  
                         shutdown(c->cli_sock, SHUT_RDWR);  
                         close(c->cli_sock);  
   
                         io_arrayDel(srv->srv_blob.clients, i, 42);  
                 }  
         }  
         io_arrayDestroy(&srv->srv_blob.clients);  
   
         close(srv->srv_blob.server.cli_sock);  
   
         /* detach blobs */  
         TAILQ_FOREACH_SAFE(b, &srv->srv_blob.blobs, blob_node, tmp) {  
                 TAILQ_REMOVE(&srv->srv_blob.blobs, b, blob_node);  
   
                 rpc_srv_blobFree(srv, b);  
                 free(b);  
         }  
   
         schedEnd(&srv->srv_blob.root);  
         AIT_FREE_VAL(&srv->srv_blob.dir);  
   
         srv->srv_blob.kill = 1;          srv->srv_blob.kill = 1;
 }  }
   
Line 628  rpc_srv_endBLOBServer(rpc_srv_t * __restrict srv) Line 614  rpc_srv_endBLOBServer(rpc_srv_t * __restrict srv)
 int  int
 rpc_srv_loopBLOBServer(rpc_srv_t * __restrict srv)  rpc_srv_loopBLOBServer(rpc_srv_t * __restrict srv)
 {  {
           rpc_cli_t *c;
           register int i;
           rpc_blob_t *b, *tmp;
           struct timespec ts = { RPC_SCHED_POLLING, 0 };
   
         if (!srv || srv->srv_kill) {          if (!srv || srv->srv_kill) {
                 rpc_SetErr(EINVAL, "Invalid parameter can`t start BLOB server");                  rpc_SetErr(EINVAL, "Invalid parameter can`t start BLOB server");
                 return -1;                  return -1;
Line 647  rpc_srv_loopBLOBServer(rpc_srv_t * __restrict srv) Line 638  rpc_srv_loopBLOBServer(rpc_srv_t * __restrict srv)
                 return -1;                  return -1;
         }          }
   
#if 0        schedPolling(srv->srv_blob.root, &ts, NULL);
                for (c = srv->srv_blob.clients, i = 0; i < srv->srv_numcli && c; i++, c++)        /* main rpc loop */
                        if (!c->cli_sa.sa.sa_family)        schedRun(srv->srv_blob.root, &srv->srv_blob.kill);
                                break;
                if (i >= srv->srv_numcli) {        /* close all clients connections & server socket */
#ifdef HAVE_PTHREAD_YIELD        for (i = 0; i < io_arraySize(srv->srv_blob.clients); i++) {
                        pthread_yield();                c = io_array(srv->srv_blob.clients, i, rpc_cli_t*);
#endif                if (c) {
                        usleep(1000000);                        shutdown(c->cli_sock, SHUT_RDWR);
                        continue;                        close(c->cli_sock);
 
                         schedCancelby(srv->srv_blob.root, taskMAX, CRITERIA_ARG, c, NULL);
                         AIT_FREE_VAL(&c->cli_buf);
                 }                  }
                   io_arrayDel(srv->srv_blob.clients, i, 42);
           }
           io_arrayDestroy(&srv->srv_blob.clients);
   
                c->cli_sock = accept(srv->srv_blob.server.cli_sock, &c->cli_sa.sa, &salen);        close(srv->srv_blob.server.cli_sock);
                if (c->cli_sock == -1) {
                        LOGERR;        /* detach blobs */
                        continue;        TAILQ_FOREACH_SAFE(b, &srv->srv_blob.blobs, blob_node, tmp) {
                } else                TAILQ_REMOVE(&srv->srv_blob.blobs, b, blob_node);
                        c->cli_parent = srv;
                 rpc_srv_blobFree(srv, b);
                 io_free(b);
         }          }
 #endif  
   
        /* main rpc loop */        schedEnd(&srv->srv_blob.root);
        schedRun(srv->srv_blob.root, &srv->srv_blob.kill);        AIT_FREE_VAL(&srv->srv_blob.dir);
         return 0;          return 0;
 }  }
   
Line 680  rpc_srv_loopBLOBServer(rpc_srv_t * __restrict srv) Line 678  rpc_srv_loopBLOBServer(rpc_srv_t * __restrict srv)
  * @regProgID = ProgramID for authentication & recognition   * @regProgID = ProgramID for authentication & recognition
  * @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 (min:512 bytes), if =0 == BUFSIZ (also meaning max RPC packet)
  * @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
Line 691  rpc_srv_initServer(u_int regProgID, u_char regProcID,  Line 689  rpc_srv_initServer(u_int regProgID, u_char regProcID, 
 {  {
         int n = 1;          int n = 1;
         rpc_srv_t *srv = NULL;          rpc_srv_t *srv = NULL;
        io_sockaddr_t sa;        io_sockaddr_t sa = IO_SOCKADDR_INIT;
   
         if (!concurentClients || !regProgID) {          if (!concurentClients || !regProgID) {
                 rpc_SetErr(EINVAL, "Invalid parameters can`t init RPC server");                  rpc_SetErr(EINVAL, "Invalid parameters can`t init RPC server");
Line 701  rpc_srv_initServer(u_int regProgID, u_char regProcID,  Line 699  rpc_srv_initServer(u_int regProgID, u_char regProcID, 
                 return NULL;                  return NULL;
         if (!Port)          if (!Port)
                 Port = RPC_DEFPORT;                  Port = RPC_DEFPORT;
        if (!netBuf)        if (netBuf < RPC_MIN_BUFSIZ)
                 netBuf = BUFSIZ;                  netBuf = BUFSIZ;
         else          else
                 netBuf = io_align(netBuf, 1);   /* align netBuf length */                  netBuf = io_align(netBuf, 1);   /* align netBuf length */
Line 714  rpc_srv_initServer(u_int regProgID, u_char regProcID,  Line 712  rpc_srv_initServer(u_int regProgID, u_char regProcID, 
         srandom((time(&tim) ^ getpid()));          srandom((time(&tim) ^ getpid()));
 #endif  #endif
   
        srv = malloc(sizeof(rpc_srv_t));        srv = io_malloc(sizeof(rpc_srv_t));
         if (!srv) {          if (!srv) {
                 LOGERR;                  LOGERR;
                 return NULL;                  return NULL;
Line 736  rpc_srv_initServer(u_int regProgID, u_char regProcID,  Line 734  rpc_srv_initServer(u_int regProgID, u_char regProcID, 
         srv->srv_root = schedBegin();          srv->srv_root = schedBegin();
         if (!srv->srv_root) {          if (!srv->srv_root) {
                 rpc_SetErr(sched_GetErrno(), "%s", sched_GetError());                  rpc_SetErr(sched_GetErrno(), "%s", sched_GetError());
                free(srv);                io_free(srv);
                 return NULL;                  return NULL;
         }          }
   
Line 745  rpc_srv_initServer(u_int regProgID, u_char regProcID,  Line 743  rpc_srv_initServer(u_int regProgID, u_char regProcID, 
         if (!srv->srv_clients) {          if (!srv->srv_clients) {
                 rpc_SetErr(io_GetErrno(), "%s", io_GetError());                  rpc_SetErr(io_GetErrno(), "%s", io_GetError());
                 schedEnd(&srv->srv_root);                  schedEnd(&srv->srv_root);
                free(srv);                io_free(srv);
                 return NULL;                  return NULL;
         }          }
   
Line 755  rpc_srv_initServer(u_int regProgID, u_char regProcID,  Line 753  rpc_srv_initServer(u_int regProgID, u_char regProcID, 
                 LOGERR;                  LOGERR;
                 io_arrayDestroy(&srv->srv_clients);                  io_arrayDestroy(&srv->srv_clients);
                 schedEnd(&srv->srv_root);                  schedEnd(&srv->srv_root);
                free(srv);                io_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) {
Line 777  rpc_srv_initServer(u_int regProgID, u_char regProcID,  Line 775  rpc_srv_initServer(u_int regProgID, u_char regProcID, 
                 goto err;                  goto err;
         }          }
   
           rpc_register_srvPing(srv);
   
         return srv;          return srv;
 err:    /* error condition */  err:    /* error condition */
         close(srv->srv_server.cli_sock);          close(srv->srv_server.cli_sock);
         io_arrayDestroy(&srv->srv_clients);          io_arrayDestroy(&srv->srv_clients);
         schedEnd(&srv->srv_root);          schedEnd(&srv->srv_root);
        free(srv);        io_free(srv);
         return NULL;          return NULL;
 }  }
   
Line 792  err: /* error condition */ Line 792  err: /* error condition */
  * @psrv = RPC Server instance   * @psrv = RPC Server instance
  * return: none   * return: none
  */   */
voidinline void
 rpc_srv_endServer(rpc_srv_t ** __restrict psrv)  rpc_srv_endServer(rpc_srv_t ** __restrict psrv)
 {  {
         rpc_cli_t *c;  
         register int i;  
         rpc_func_t *f, *tmp;  
   
         if (!psrv || !*psrv)          if (!psrv || !*psrv)
                 return;                  return;
   
           /* if send kill to blob server */
         if (!(*psrv)->srv_blob.kill)          if (!(*psrv)->srv_blob.kill)
                 rpc_srv_endBLOBServer(*psrv);                  rpc_srv_endBLOBServer(*psrv);
   
        /* close all clients connections & server socket */        (*psrv)->srv_kill = 1;
        for (i = 0; i < io_arraySize((*psrv)->srv_clients); i++) {        sleep(RPC_SCHED_POLLING);
                c = io_array((*psrv)->srv_clients, i, rpc_cli_t*); 
                if (c) { 
                        shutdown(c->cli_sock, SHUT_RDWR); 
                        close(c->cli_sock); 
   
                        io_arrayDel((*psrv)->srv_clients, i, 42);        io_free(*psrv);
                } 
        } 
        io_arrayDestroy(&(*psrv)->srv_clients); 
 
        close((*psrv)->srv_server.cli_sock); 
 
        /* detach exported calls */ 
        TAILQ_FOREACH_SAFE(f, &(*psrv)->srv_funcs, func_node, tmp) { 
                TAILQ_REMOVE(&(*psrv)->srv_funcs, f, func_node); 
 
                io_freeVars(&f->func_vars); 
                AIT_FREE_VAL(&f->func_name); 
                free(f); 
        } 
 
        schedEnd(&(*psrv)->srv_root); 
        free(*psrv); 
         *psrv = NULL;          *psrv = NULL;
 }  }
   
Line 842  rpc_srv_endServer(rpc_srv_t ** __restrict psrv) Line 818  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)
 {  {
           rpc_cli_t *c;
           register int i;
           rpc_func_t *f, *tmp;
           struct timespec ts = { RPC_SCHED_POLLING, 0 };
   
         if (!srv) {          if (!srv) {
                 rpc_SetErr(EINVAL, "Invalid parameter can`t start RPC server");                  rpc_SetErr(EINVAL, "Invalid parameter can`t start RPC server");
                 return -1;                  return -1;
Line 860  rpc_srv_loopServer(rpc_srv_t * __restrict srv) Line 841  rpc_srv_loopServer(rpc_srv_t * __restrict srv)
                 return -1;                  return -1;
         }          }
   
           schedPolling(srv->srv_root, &ts, NULL);
         /* main rpc loop */          /* main rpc loop */
         schedRun(srv->srv_root, &srv->srv_kill);          schedRun(srv->srv_root, &srv->srv_kill);
   
           /* close all clients connections & server socket */
           for (i = 0; i < io_arraySize(srv->srv_clients); i++) {
                   c = io_array(srv->srv_clients, i, rpc_cli_t*);
                   if (c) {
                           shutdown(c->cli_sock, SHUT_RDWR);
                           close(c->cli_sock);
   
                           schedCancelby(srv->srv_root, taskMAX, CRITERIA_ARG, c, NULL);
                           io_freeVars(&RPC_RETVARS(c));
                           AIT_FREE_VAL(&c->cli_buf);
                   }
                   io_arrayDel(srv->srv_clients, i, 42);
           }
           io_arrayDestroy(&srv->srv_clients);
   
           close(srv->srv_server.cli_sock);
   
           /* detach exported calls */
           TAILQ_FOREACH_SAFE(f, &srv->srv_funcs, func_node, tmp) {
                   TAILQ_REMOVE(&srv->srv_funcs, f, func_node);
   
                   AIT_FREE_VAL(&f->func_name);
                   io_free(f);
           }
   
           schedEnd(&srv->srv_root);
         return 0;          return 0;
 }  }
   
Line 869  rpc_srv_loopServer(rpc_srv_t * __restrict srv) Line 878  rpc_srv_loopServer(rpc_srv_t * __restrict srv)
 /*  /*
  * rpc_srv_execCall() Execute registered call from RPC server   * rpc_srv_execCall() Execute registered call from RPC server
  *   *
 * @call = Register RPC call * @cli = RPC client
  * @rpc = IN RPC call structure   * @rpc = IN RPC call structure
    * @funcname = Execute RPC function
  * @args = IN RPC calling arguments from RPC client   * @args = IN RPC calling arguments from RPC client
  * return: -1 error, !=-1 ok   * return: -1 error, !=-1 ok
  */   */
 int  int
rpc_srv_execCall(rpc_func_t * __restrict call, struct tagRPCCall * __restrict rpc, rpc_srv_execCall(rpc_cli_t * __restrict cli, struct tagRPCCall * __restrict rpc, 
                array_t * __restrict args)                ait_val_t funcname, array_t * __restrict args)
 {  {
         rpc_callback_t func;          rpc_callback_t func;
   
        if (!call || !rpc || !call->func_parent || !AIT_ADDR(&call->func_name)) {        if (!cli || !rpc || !AIT_ADDR(&funcname)) {
                 rpc_SetErr(EINVAL, "Invalid parameter can`t exec function");                  rpc_SetErr(EINVAL, "Invalid parameter can`t exec function");
                 return -1;                  return -1;
         }          }
   
        func = AIT_GET_LIKE(&call->func_name, rpc_callback_t);        func = AIT_GET_LIKE(&funcname, rpc_callback_t);
        return func(call, ntohs(rpc->call_argc), args);        return func(cli, rpc, args);
 }  }
Removed from v.1.9.2.16  
changed lines
  Added in v.1.10.2.3

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