--- libaitrpc/src/srv.c 2012/05/16 13:17:51 1.9.2.16 +++ libaitrpc/src/srv.c 2012/05/18 15:24:33 1.9.2.29 @@ -3,7 +3,7 @@ * by Michael Pounov * * $Author: misho $ -* $Id: srv.c,v 1.9.2.16 2012/05/16 13:17:51 misho Exp $ +* $Id: srv.c,v 1.9.2.29 2012/05/18 15:24:33 misho Exp $ * ************************************************************************** The ELWIX and AITNET software is distributed under the following @@ -52,7 +52,7 @@ 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_ARG, TASK_ARG(task), NULL); + schedCancelby(TASK_ROOT(task), taskMAX, CRITERIA_ARG, TASK_ARG(task), NULL); /* close client socket */ if (TASK_VAL(task)) @@ -62,7 +62,9 @@ closeClient(sched_task_t *task) /* free buffer */ 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) + free(c); return NULL; } @@ -82,15 +84,16 @@ txPacket(sched_task_t *task) if (rpc->call_argc) { f = rpc_srv_getCall(s, ntohs(rpc->call_tag)); if (!f) { + rpc_SetErr(EPROGUNAVAIL, "Function not found at RPC server"); rpc->call_argc ^= rpc->call_argc; rpc->call_rep.ret = RPC_ERROR(-1); rpc->call_rep.eno = RPC_ERROR(rpc_Errno); } else { - rpc->call_argc = htons(io_arraySize(f->func_vars)); + rpc->call_argc = htons(io_arraySize(RPC_RETVARS(c))); /* 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 */ - io_clrVars(f->func_vars); + io_freeVars(&c->cli_vars); if (ret == -1) { rpc_SetErr(EBADRPC, "Prepare RPC packet failed"); rpc->call_argc ^= rpc->call_argc; @@ -150,8 +153,8 @@ execCall(sched_task_t *task) rpc->call_rep.eno = RPC_ERROR(rpc_Errno); } else { /* if client doesn't want reply */ - argc = rpc->call_req.flags & RPC_NOREPLY; - rpc->call_rep.ret = RPC_ERROR(rpc_srv_execCall(f, rpc, arr)); + argc = RPC_CHK_NOREPLY(rpc); + rpc->call_rep.ret = RPC_ERROR(rpc_srv_execCall(c, rpc, f->func_name, arr)); if (rpc->call_rep.ret == htonl(-1)) { rpc->call_rep.eno = RPC_ERROR(errno); rpc->call_argc ^= rpc->call_argc; @@ -159,11 +162,11 @@ execCall(sched_task_t *task) rpc->call_rep.eno ^= rpc->call_rep.eno; if (argc) { /* without reply */ - io_clrVars(f->func_vars); + io_freeVars(&c->cli_vars); rpc->call_argc ^= rpc->call_argc; } else { /* reply */ - rpc->call_argc = htons(io_arraySize(f->func_vars)); + rpc->call_argc = htons(io_arraySize(RPC_RETVARS(c))); } } } @@ -177,17 +180,20 @@ rxPacket(sched_task_t *task) { rpc_cli_t *c = TASK_ARG(task); rpc_srv_t *s = c->cli_parent; - u_char *buf = AIT_GET_BUF(&c->cli_buf); 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; 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) { /* close connection */ schedEvent(TASK_ROOT(task), closeClient, c, 42, NULL, 0); return NULL; + } else { + rlen += off; /* add reminded bytes from previous rxPacket, if exists! */ + off = 0; /* process buffer from start offset == 0 */ } do { @@ -195,7 +201,9 @@ rxPacket(sched_task_t *task) if (rlen < sizeof(struct tagRPCCall)) { 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; } else rpc = (struct tagRPCCall*) (buf + off); @@ -203,20 +211,25 @@ rxPacket(sched_task_t *task) len = ntohs(rpc->call_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 */ crc = ntohs(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"); off += len; - if (rlen < 1) - break; - else - continue; + /* try next packet remaining into buffer */ + continue; } - noreply = rpc->call_req.flags & RPC_NOREPLY; + noreply = RPC_CHK_NOREPLY(rpc); /* check RPC packet session info */ if (rpc_chkPktSession(&rpc->call_session, &s->srv_session)) { @@ -237,7 +250,7 @@ rxPacket(sched_task_t *task) } while (rlen > 0); /* 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; } @@ -293,7 +306,7 @@ closeBLOBClient(sched_task_t *task) rpc_cli_t *c = TASK_ARG(task); 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 */ if (TASK_VAL(task)) @@ -303,7 +316,9 @@ closeBLOBClient(sched_task_t *task) /* free buffer */ 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) + free(c); return NULL; } @@ -335,13 +350,12 @@ rxBLOB(sched_task_t *task) rpc_cli_t *c = TASK_ARG(task); rpc_srv_t *s = c->cli_parent; rpc_blob_t *b; - u_char *buf = AIT_GET_BUF(&c->cli_buf); - struct tagBLOBHdr *blob = (struct tagBLOBHdr *) buf; + struct tagBLOBHdr blob; int rlen; u_short crc; - memset(buf, 0, AIT_LEN(&c->cli_buf)); - rlen = recv(TASK_FD(task), buf, AIT_LEN(&c->cli_buf), 0); + memset(&blob, 0, sizeof blob); + rlen = recv(TASK_FD(task), &blob, sizeof blob, 0); if (rlen < 1) { /* close blob connection */ schedEvent(TASK_ROOT(task), closeBLOBClient, c, 42, NULL, 0); @@ -357,9 +371,9 @@ rxBLOB(sched_task_t *task) } /* check integrity of packet */ - crc = ntohs(blob->hdr_crc); - blob->hdr_crc ^= blob->hdr_crc; - if (crc != crcFletcher16((u_short*) buf, rlen / 2)) { + crc = ntohs(blob.hdr_crc); + blob.hdr_crc ^= blob.hdr_crc; + if (crc != crcFletcher16((u_short*) &blob, rlen / 2)) { rpc_SetErr(ERPCMISMATCH, "Bad CRC BLOB packet"); schedReadSelf(task); @@ -367,58 +381,59 @@ rxBLOB(sched_task_t *task) } /* 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"); - blob->hdr_cmd = error; + blob.hdr_cmd = error; goto end; } /* Go to proceed packet ... */ - switch (blob->hdr_cmd) { + switch (blob.hdr_cmd) { case get: - if (!(b = rpc_srv_getBLOB(s, ntohl(blob->hdr_var)))) { - rpc_SetErr(EINVAL, "Var=%x not found", ntohl(blob->hdr_var)); - blob->hdr_cmd = no; - blob->hdr_ret = RPC_ERROR(-1); + if (!(b = rpc_srv_getBLOB(s, ntohl(blob.hdr_var)))) { + rpc_SetErr(EINVAL, "Var=%x not found", ntohl(blob.hdr_var)); + blob.hdr_cmd = no; + blob.hdr_ret = RPC_ERROR(-1); break; } else - blob->hdr_len = htonl(b->blob_len); + blob.hdr_len = htonl(b->blob_len); if (rpc_srv_blobMap(s, b) != -1) { /* 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); } else { - blob->hdr_cmd = error; - blob->hdr_ret = RPC_ERROR(-1); + blob.hdr_cmd = error; + blob.hdr_ret = RPC_ERROR(-1); } break; 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 :) */ - blob->hdr_var = htonl(b->blob_var); + blob.hdr_var = htonl(b->blob_var); /* 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); } else { - blob->hdr_cmd = error; - blob->hdr_ret = RPC_ERROR(-1); + blob.hdr_cmd = error; + blob.hdr_ret = RPC_ERROR(-1); } break; case unset: - if (rpc_srv_unregisterBLOB(s, blob->hdr_var) == -1) { - blob->hdr_cmd = error; - blob->hdr_ret = RPC_ERROR(-1); + if (rpc_srv_unregisterBLOB(s, blob.hdr_var) == -1) { + blob.hdr_cmd = error; + blob.hdr_ret = RPC_ERROR(-1); } break; default: - rpc_SetErr(EPROCUNAVAIL, "Unsupported BLOB command %d", blob->hdr_cmd); - blob->hdr_cmd = error; - blob->hdr_ret = RPC_ERROR(-1); + rpc_SetErr(EPROCUNAVAIL, "Unsupported BLOB command %d", blob.hdr_cmd); + blob.hdr_cmd = error; + blob.hdr_ret = RPC_ERROR(-1); } end: + memcpy(AIT_ADDR(&c->cli_buf), &blob, sizeof blob); schedWrite(TASK_ROOT(task), txBLOB, TASK_ARG(task), TASK_FD(task), NULL, 0); schedReadSelf(task); return NULL; @@ -581,41 +596,12 @@ rpc_srv_initBLOBServer(rpc_srv_t * __restrict srv, u_s * @srv = RPC Server instance * return: none */ -void +inline void rpc_srv_endBLOBServer(rpc_srv_t * __restrict srv) { - rpc_cli_t *c; - register int i; - rpc_blob_t *b, *tmp; - if (!srv) 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; } @@ -628,6 +614,11 @@ rpc_srv_endBLOBServer(rpc_srv_t * __restrict srv) int 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) { rpc_SetErr(EINVAL, "Invalid parameter can`t start BLOB server"); return -1; @@ -647,29 +638,36 @@ rpc_srv_loopBLOBServer(rpc_srv_t * __restrict srv) return -1; } -#if 0 - for (c = srv->srv_blob.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(); -#endif - usleep(1000000); - continue; + schedPolling(srv->srv_blob.root, &ts, NULL); + /* main rpc loop */ + schedRun(srv->srv_blob.root, &srv->srv_blob.kill); + + /* 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); + + 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); - if (c->cli_sock == -1) { - LOGERR; - continue; - } else - c->cli_parent = srv; + 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); } -#endif - /* main rpc loop */ - schedRun(srv->srv_blob.root, &srv->srv_blob.kill); + schedEnd(&srv->srv_blob.root); + AIT_FREE_VAL(&srv->srv_blob.dir); return 0; } @@ -680,7 +678,7 @@ rpc_srv_loopBLOBServer(rpc_srv_t * __restrict srv) * @regProgID = ProgramID for authentication & recognition * @regProcID = ProcessID for authentication & recognition * @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 * @Port = Port for bind server, if Port == 0 default port is selected * return: NULL == error or !=NULL bind and created RPC server instance @@ -701,7 +699,7 @@ rpc_srv_initServer(u_int regProgID, u_char regProcID, return NULL; if (!Port) Port = RPC_DEFPORT; - if (!netBuf) + if (netBuf < RPC_MIN_BUFSIZ) netBuf = BUFSIZ; else netBuf = io_align(netBuf, 1); /* align netBuf length */ @@ -777,6 +775,8 @@ rpc_srv_initServer(u_int regProgID, u_char regProcID, goto err; } + rpc_register_srvPing(srv); + return srv; err: /* error condition */ close(srv->srv_server.cli_sock); @@ -792,43 +792,19 @@ err: /* error condition */ * @psrv = RPC Server instance * return: none */ -void +inline void rpc_srv_endServer(rpc_srv_t ** __restrict psrv) { - rpc_cli_t *c; - register int i; - rpc_func_t *f, *tmp; - if (!psrv || !*psrv) return; + /* if send kill to blob server */ if (!(*psrv)->srv_blob.kill) rpc_srv_endBLOBServer(*psrv); - /* close all clients connections & server socket */ - for (i = 0; i < io_arraySize((*psrv)->srv_clients); i++) { - c = io_array((*psrv)->srv_clients, i, rpc_cli_t*); - if (c) { - shutdown(c->cli_sock, SHUT_RDWR); - close(c->cli_sock); + (*psrv)->srv_kill = 1; + sleep(RPC_SCHED_POLLING); - io_arrayDel((*psrv)->srv_clients, i, 42); - } - } - 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; } @@ -842,6 +818,11 @@ rpc_srv_endServer(rpc_srv_t ** __restrict psrv) int 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) { rpc_SetErr(EINVAL, "Invalid parameter can`t start RPC server"); return -1; @@ -860,8 +841,36 @@ rpc_srv_loopServer(rpc_srv_t * __restrict srv) return -1; } + schedPolling(srv->srv_root, &ts, NULL); /* main rpc loop */ 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); + free(f); + } + + schedEnd(&srv->srv_root); return 0; } @@ -869,22 +878,23 @@ rpc_srv_loopServer(rpc_srv_t * __restrict srv) /* * rpc_srv_execCall() Execute registered call from RPC server * - * @call = Register RPC call + * @cli = RPC client * @rpc = IN RPC call structure + * @funcname = Execute RPC function * @args = IN RPC calling arguments from RPC client * return: -1 error, !=-1 ok */ int -rpc_srv_execCall(rpc_func_t * __restrict call, struct tagRPCCall * __restrict rpc, - array_t * __restrict args) +rpc_srv_execCall(rpc_cli_t * __restrict cli, struct tagRPCCall * __restrict rpc, + ait_val_t funcname, array_t * __restrict args) { 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"); return -1; } - func = AIT_GET_LIKE(&call->func_name, rpc_callback_t); - return func(call, ntohs(rpc->call_argc), args); + func = AIT_GET_LIKE(&funcname, rpc_callback_t); + return func(cli, rpc, args); }