version 1.1.1.1.2.10, 2010/06/24 13:58:17
|
version 1.6.2.6, 2012/03/13 17:21:52
|
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, 2012 |
| 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" |
|
|
|
|
|
static void *rxPacket(sched_task_t*); |
|
|
static void * |
static void * |
rpc_srv_dispatchCall(void *arg) | txPacket(sched_task_t *task) |
{ |
{ |
rpc_cli_t *c = arg; | rpc_cli_t *c = TASK_ARG(task); |
rpc_srv_t *s; | rpc_srv_t *s = c->cli_parent; |
rpc_val_t *vals, *v = NULL; | rpc_func_t *f = NULL; |
rpc_func_t *f; | u_char *buf = TASK_DATA(task); |
| struct tagRPCCall *rpc = (struct tagRPCCall*) buf; |
| int ret, wlen = sizeof(struct tagRPCCall); |
| array_t *arr = NULL; |
| |
| if (rpc->call_argc) { |
| f = rpc_srv_getCall(s, ntohs(rpc->call_tag), ntohl(rpc->call_hash)); |
| if (!f) { |
| 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(rpc_srv_getVars(f, &arr)); |
| /* Go Encapsulate variables */ |
| ret = io_vars2buffer(buf + wlen, TASK_DATLEN(task) - wlen, arr); |
| io_clrVars(f->func_vars); |
| if (ret == -1) { |
| rpc_SetErr(EBADRPC, "Prepare RPC packet failed"); |
| rpc->call_argc ^= rpc->call_argc; |
| rpc->call_rep.ret = RPC_ERROR(-1); |
| rpc->call_rep.eno = RPC_ERROR(rpc_Errno); |
| } else |
| wlen += ret; |
| } |
| } |
| |
| /* send reply */ |
| ret = send(TASK_FD(task), buf, wlen, 0); |
| if (ret == -1) |
| LOGERR; |
| else if (ret != wlen) |
| rpc_SetErr(EPROCUNAVAIL, "RPC reply, should be send %d bytes, " |
| "really sended %d bytes", wlen, ret); |
| |
| /* lets get next packet */ |
| schedRead(TASK_ROOT(task), rxPacket, TASK_ARG(task), TASK_FD(task), |
| TASK_DATA(task), TASK_DATLEN(task)); |
| return NULL; |
| } |
| |
| static void * |
| execCall(sched_task_t *task) |
| { |
| rpc_cli_t *c = TASK_ARG(task); |
| rpc_srv_t *s = c->cli_parent; |
| rpc_func_t *f = NULL; |
| array_t *arr = NULL; |
| u_char *buf = TASK_DATA(task); |
| struct tagRPCCall *rpc = (struct tagRPCCall*) buf; |
| int argc = ntohs(rpc->call_argc); |
| |
| /* Go decapsulate variables ... */ |
| if (!(rpc->call_req.flags & RPC_NOREPLY) && argc) { |
| arr = io_buffer2vars(buf + sizeof(struct tagRPCCall), |
| TASK_DATLEN(task) - sizeof(struct tagRPCCall), argc, 1); |
| if (!arr) { |
| rpc_SetErr(ERPCMISMATCH, "#%d - %s", io_GetErrno(), io_GetError()); |
| rpc->call_argc ^= rpc->call_argc; |
| rpc->call_rep.ret = RPC_ERROR(-1); |
| rpc->call_rep.eno = RPC_ERROR(rpc_Errno); |
| return NULL; |
| } |
| } |
| |
| if (!(f = rpc_srv_getCall(s, ntohs(rpc->call_tag), ntohl(rpc->call_hash)))) { |
| 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_rep.ret = RPC_ERROR(rpc_srv_execCall(f, rpc, arr)); |
| if (rpc->call_rep.ret == htonl(-1)) { |
| rpc->call_rep.eno = RPC_ERROR(errno); |
| rpc->call_argc ^= rpc->call_argc; |
| } else { |
| rpc->call_rep.eno ^= rpc->call_rep.eno; |
| rpc->call_argc = htons(rpc_srv_getVars(f, NULL)); |
| } |
| } |
| |
| if (arr) |
| io_arrayDestroy(&arr); |
| return NULL; |
| } |
| |
| static void * |
| rxPacket(sched_task_t *task) |
| { |
| rpc_cli_t *c = TASK_ARG(task); |
| rpc_srv_t *s = c->cli_parent; |
| u_char *buf = TASK_DATA(task); |
| int rlen; |
| u_short crc; |
struct tagRPCCall *rpc; |
struct tagRPCCall *rpc; |
struct tagRPCRet rrpc; | struct timespec ts; |
fd_set fds; | |
u_char buf[BUFSIZ], *data; | |
int ret, argc, Limit = 0; | |
register int i; | |
|
|
if (!arg) { | memset(buf, 0, TASK_DATLEN(task)); |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t procced RPC client ...\n"); | rlen = recv(TASK_FD(task), buf, TASK_DATLEN(task), 0); |
| if (rlen == -1) { |
| LOGERR; |
| s->srv_kill = kill; |
| |
| schedRead(TASK_ROOT(task), rxPacket, TASK_ARG(task), TASK_FD(task), |
| TASK_DATA(task), TASK_DATLEN(task)); |
return NULL; |
return NULL; |
|
} else if (!rlen) { /* receive EOF */ |
|
s->srv_kill = kill; |
|
|
|
schedRead(TASK_ROOT(task), rxPacket, TASK_ARG(task), TASK_FD(task), |
|
TASK_DATA(task), TASK_DATLEN(task)); |
|
return NULL; |
|
} |
|
if (rlen < sizeof(struct tagRPCCall)) { |
|
rpc_SetErr(ERPCMISMATCH, "Too short RPC packet"); |
|
|
|
schedRead(TASK_ROOT(task), rxPacket, TASK_ARG(task), TASK_FD(task), |
|
TASK_DATA(task), TASK_DATLEN(task)); |
|
return NULL; |
} else |
} else |
s = c->cli_parent; | rpc = (struct tagRPCCall*) buf; |
|
|
do { | /* check integrity of packet */ |
FD_ZERO(&fds); | crc = ntohs(rpc->call_crc); |
FD_SET(c->cli_sock, &fds); | rpc->call_crc ^= rpc->call_crc; |
ret = select(c->cli_sock + 1, &fds, NULL, NULL, NULL); | if (crc != crcFletcher16((u_short*) buf, ((rlen + 1) & ~1) / 2)) { |
if (ret == -1) { | rpc_SetErr(ERPCMISMATCH, "Bad CRC RPC packet"); |
ret = -2; | |
} | |
memset(&rrpc, 0, sizeof rrpc); | |
memset(buf, 0, BUFSIZ); | |
if ((ret = recv(c->cli_sock, buf, BUFSIZ, 0)) == -1) { | |
LOGERR; | |
ret = -3; | |
break; | |
} | |
if (!ret) { // receive EOF | |
ret = 0; | |
break; | |
} | |
if (ret < sizeof(struct tagRPCCall)) { | |
rpc_SetErr(EMSGSIZE, "Error:: too short RPC packet ...\n"); | |
ret = -4; | |
break; | |
} else | |
rpc = (struct tagRPCCall*) buf; | |
// check RPC packet session info | |
if (memcmp(&rpc->call_session, &s->srv_session, sizeof rpc->call_session)) { | |
rpc_SetErr(EINVAL, "Error:: get invalid RPC session ...\n"); | |
ret = -5; | |
break; | |
} | |
// RPC is OK! Go decapsulate variables ... | |
if (rpc->call_argc) { | |
v = (rpc_val_t*) (buf + sizeof(struct tagRPCCall)); | |
// RPC received variables types OK! | |
data = (u_char*) v + rpc->call_argc * sizeof(rpc_val_t); | |
for (i = 0; i < rpc->call_argc; i++) { | |
switch (v[i].val_type) { | |
case buffer: | |
v[i].val.buffer = data; | |
data += v[i].val_len; | |
break; | |
case string: | |
v[i].val.string = (int8_t*) data; | |
data += v[i].val_len + 1; | |
break; | |
default: | |
break; | |
} | |
} | |
} | |
|
|
argc = 0; | schedRead(TASK_ROOT(task), rxPacket, TASK_ARG(task), TASK_FD(task), |
vals = NULL; | TASK_DATA(task), TASK_DATLEN(task)); |
if (!(f = rpc_srv_getCall(s, rpc->call_tag, rpc->call_hash))) { | return NULL; |
rpc_SetErr(EINVAL, "Error:: call not found into RPC server ...\n"); | } |
ret = -6; | |
} else | |
if ((ret = rpc_srv_execCall(s, f, rpc, v)) == -1) | |
ret = -6; | |
else | |
argc = rpc_srv_getValsCall(f, &vals); | |
|
|
memcpy(&rrpc.ret_session, &rpc->call_session, sizeof rrpc.ret_session); | /* check RPC packet session info */ |
rrpc.ret_tag = rpc->call_tag; | if (rpc_chkPktSession(&rpc->call_session, &s->srv_session)) { |
rrpc.ret_hash = rpc->call_hash; | rpc_SetErr(ERPCMISMATCH, "Get invalid RPC session"); |
rrpc.ret_errno = rpc_Errno; | rpc->call_argc ^= rpc->call_argc; |
rrpc.ret_retcode = ret; | rpc->call_rep.ret = RPC_ERROR(-1); |
rrpc.ret_argc = argc; | rpc->call_rep.eno = RPC_ERROR(errno); |
| goto end; |
| } 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); |
| } |
|
|
memset(buf, 0, BUFSIZ); | /* execute RPC call */ |
memcpy(buf, &rrpc, (Limit = sizeof rrpc)); | schedEvent(TASK_ROOT(task), execCall, TASK_ARG(task), 0, |
if (argc && vals) { | TASK_DATA(task), TASK_DATLEN(task)); |
v = (rpc_val_t*) (buf + sizeof rrpc); | |
memcpy(v, vals, argc * sizeof(rpc_val_t)); | |
Limit += argc * sizeof(rpc_val_t); | |
data = (u_char*) v + argc * sizeof(rpc_val_t); | |
for (ret = i = 0; i < argc; i++) { | |
switch (vals[i].val_type) { | |
case buffer: | |
if (ret || Limit + vals[i].val_len > BUFSIZ) { | |
rpc_SetErr(EMSGSIZE, "Error:: in prepare RPC packet (-7) ...\n"); | |
rrpc.ret_retcode = ret = -7; | |
rrpc.ret_argc = 0; | |
break; | |
} | |
|
|
memcpy(data, vals[i].val.buffer, vals[i].val_len); | end: |
data += vals[i].val_len; | /* send RPC reply */ |
Limit += vals[i].val_len; | if (!(rpc->call_req.flags & RPC_NOREPLY)) |
break; | schedWrite(TASK_ROOT(task), txPacket, TASK_ARG(task), TASK_FD(task), |
case string: | TASK_DATA(task), TASK_DATLEN(task)); |
if (ret || Limit + vals[i].val_len + 1 > BUFSIZ) { | else |
rpc_SetErr(EMSGSIZE, "Error:: in prepare RPC packet (-7) ...\n"); | schedRead(TASK_ROOT(task), rxPacket, TASK_ARG(task), TASK_FD(task), |
rrpc.ret_retcode = ret = -7; | TASK_DATA(task), TASK_DATLEN(task)); |
rrpc.ret_argc = 0; | return NULL; |
break; | } |
} | |
|
|
memcpy(data, vals[i].val.string, vals[i].val_len + 1); | static void * |
data += vals[i].val_len + 1; | rpc_srv_dispatchCall(void *arg) |
Limit += vals[i].val_len + 1; | { |
break; | rpc_cli_t *c = arg; |
default: | rpc_srv_t *s; |
break; | u_char *buf; |
} | sched_root_task_t *root; |
| struct timespec ts = { DEF_RPC_TIMEOUT, 0 }; |
|
|
RPC_FREE_VAL(&vals[i]); | if (!arg) { |
} | rpc_SetErr(EINVAL, "Invalid parameter can`t procced RPC client"); |
} | return NULL; |
| } else |
| s = c->cli_parent; |
|
|
if ((ret = send(c->cli_sock, buf, Limit, 0)) == -1) { | /* allocate net buffer */ |
LOGERR; | buf = malloc(s->srv_netbuf); |
ret = -8; | if (!buf) { |
break; | LOGERR; |
} | return NULL; |
if (ret != Limit) { | } |
rpc_SetErr(EBADMSG, "Error:: in send RPC request, should be send %d bytes, " | |
"really is %d\n", Limit, ret); | |
ret = -9; | |
break; | |
} | |
} while (ret > -1); | |
|
|
|
root = schedBegin(); |
|
if (!root) { |
|
rpc_SetErr(sched_GetErrno(), "%s", sched_GetError()); |
|
free(buf); |
|
return NULL; |
|
} else { |
|
schedTermCondition(root, kill); |
|
schedPolling(root, &ts, NULL); |
|
} |
|
|
|
schedRead(root, rxPacket, c, c->cli_sock, buf, s->srv_netbuf); |
|
|
|
schedRun(root, (void*) &s->srv_kill); |
|
schedEnd(&root); |
|
|
shutdown(c->cli_sock, SHUT_RDWR); |
shutdown(c->cli_sock, SHUT_RDWR); |
close(c->cli_sock); |
close(c->cli_sock); |
memset(c, 0, sizeof(rpc_cli_t)); |
memset(c, 0, sizeof(rpc_cli_t)); |
return (void*) ret; | free(buf); |
| return NULL; |
} |
} |
|
|
|
|
Line 165 rpc_srv_dispatchVars(void *arg)
|
Line 266 rpc_srv_dispatchVars(void *arg)
|
rpc_cli_t *c = arg; |
rpc_cli_t *c = arg; |
rpc_srv_t *s; |
rpc_srv_t *s; |
rpc_blob_t *b; |
rpc_blob_t *b; |
int cx, ret; | int ret = 0; |
fd_set fds; |
fd_set fds; |
u_char buf[sizeof(struct tagBLOBHdr)]; |
u_char buf[sizeof(struct tagBLOBHdr)]; |
struct tagBLOBHdr *blob; |
struct tagBLOBHdr *blob; |
Line 176 rpc_srv_dispatchVars(void *arg)
|
Line 277 rpc_srv_dispatchVars(void *arg)
|
} else |
} else |
s = c->cli_parent; |
s = c->cli_parent; |
|
|
cx = -1; |
|
do { |
do { |
|
/* check for disable service at this moment? */ |
|
if (s->srv_blob.state == disable && s->srv_kill != kill) { |
|
usleep(100000); |
|
#ifdef HAVE_PTHREAD_YIELD |
|
pthread_yield(); |
|
#endif |
|
continue; |
|
} |
|
|
FD_ZERO(&fds); |
FD_ZERO(&fds); |
FD_SET(c->cli_sock, &fds); |
FD_SET(c->cli_sock, &fds); |
ret = select(c->cli_sock + 1, &fds, NULL, NULL, NULL); |
ret = select(c->cli_sock + 1, &fds, NULL, NULL, NULL); |
if (ret == -1) { |
if (ret == -1) { |
|
if (errno == EINTR && s->srv_kill != kill && s->srv_blob.state != kill) |
|
continue; |
|
|
|
LOGERR; |
ret = -2; |
ret = -2; |
} else | break; |
cx++; | } |
| |
memset(buf, 0, sizeof buf); |
memset(buf, 0, sizeof buf); |
if ((ret = recv(c->cli_sock, buf, sizeof buf, 0)) == -1) { | ret = recv(c->cli_sock, buf, sizeof buf, 0); |
| if (ret == -1) { |
LOGERR; |
LOGERR; |
ret = -3; |
ret = -3; |
break; |
break; |
} |
} |
if (!ret || s->srv_blob.state == disable) { // receive EOF or disable service | /* receive EOF, disable or kill service */ |
| if (!ret || s->srv_blob.state == kill || s->srv_kill == kill) { |
ret = 0; |
ret = 0; |
break; |
break; |
} |
} |
if (ret < sizeof(struct tagBLOBHdr)) { |
if (ret < sizeof(struct tagBLOBHdr)) { |
rpc_SetErr(EMSGSIZE, "Error:: too short BLOB packet ...\n"); | rpc_SetErr(ERPCMISMATCH, "Error:: too short BLOB packet ...\n"); |
ret = -4; |
ret = -4; |
break; | if (s->srv_kill != kill && s->srv_blob.state != kill) |
| continue; |
| else |
| break; |
} else |
} else |
blob = (struct tagBLOBHdr*) buf; |
blob = (struct tagBLOBHdr*) buf; |
// check BLOB packet session info | /* check BLOB packet session info */ |
if (memcmp(&blob->hdr_session, &s->srv_session, sizeof blob->hdr_session) || | if (memcmp(&blob->hdr_session, &s->srv_session, sizeof blob->hdr_session)) { |
blob->hdr_seq != cx) { | rpc_SetErr(EINVAL, "Error:: get invalid BLOB session ...\n"); |
rpc_SetErr(EINVAL, "Error:: get invalid BLOB session in seq=%d...\n", blob->hdr_seq); | |
ret = -5; |
ret = -5; |
break; | goto makeReply; |
} |
} |
// 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, blob->hdr_var))) { |
if (!(b = rpc_srv_getBLOB(s, blob->hdr_var))) { |
Line 216 rpc_srv_dispatchVars(void *arg)
|
Line 334 rpc_srv_dispatchVars(void *arg)
|
blob->hdr_var); |
blob->hdr_var); |
ret = -6; |
ret = -6; |
break; |
break; |
} | } else |
| blob->hdr_len = b->blob_len; |
|
|
if (rpc_srv_blobMap(s, b) != -1) { |
if (rpc_srv_blobMap(s, b) != -1) { |
ret = rpc_srv_sendBLOB(c, b); |
ret = rpc_srv_sendBLOB(c, b); |
Line 226 rpc_srv_dispatchVars(void *arg)
|
Line 345 rpc_srv_dispatchVars(void *arg)
|
break; |
break; |
case set: |
case set: |
if ((b = rpc_srv_registerBLOB(s, blob->hdr_len))) { |
if ((b = rpc_srv_registerBLOB(s, blob->hdr_len))) { |
// set new BLOB variable for reply :) | /* set new BLOB variable for reply :) */ |
blob->hdr_var = b->blob_var; |
blob->hdr_var = b->blob_var; |
|
|
ret = rpc_srv_recvBLOB(c, b); |
ret = rpc_srv_recvBLOB(c, b); |
Line 240 rpc_srv_dispatchVars(void *arg)
|
Line 359 rpc_srv_dispatchVars(void *arg)
|
ret = -7; |
ret = -7; |
break; |
break; |
default: |
default: |
rpc_SetErr(EINVAL, "Error:: unsupported BLOB command (%d)...\n", | rpc_SetErr(EPROCUNAVAIL, "Error:: unsupported BLOB command (%d)...\n", |
blob->hdr_cmd); |
blob->hdr_cmd); |
ret = -7; |
ret = -7; |
} |
} |
|
|
// Replay to client! | makeReply: |
| /* Replay to client! */ |
blob->hdr_cmd = ret < 0 ? error : ok; |
blob->hdr_cmd = ret < 0 ? error : ok; |
blob->hdr_seq = ret; | blob->hdr_ret = ret; |
if ((ret = send(c->cli_sock, buf, sizeof buf, 0)) == -1) { | ret = send(c->cli_sock, buf, sizeof buf, 0); |
| if (ret == -1) { |
LOGERR; |
LOGERR; |
ret = -8; |
ret = -8; |
break; |
break; |
} |
} |
if (ret != sizeof buf) { |
if (ret != sizeof buf) { |
rpc_SetErr(EBADMSG, "Error:: in send BLOB reply, should be send %d bytes, " | rpc_SetErr(EPROCUNAVAIL, "Error:: in send BLOB reply, should be send %d bytes, " |
"really is %d\n", sizeof buf, ret); |
"really is %d\n", sizeof buf, ret); |
ret = -9; |
ret = -9; |
break; | if (s->srv_kill != kill && s->srv_blob.state != kill) |
| continue; |
| else |
| break; |
} |
} |
} while (ret > -1); | } while (ret > -1 || s->srv_kill != kill); |
|
|
shutdown(c->cli_sock, SHUT_RDWR); |
shutdown(c->cli_sock, SHUT_RDWR); |
close(c->cli_sock); |
close(c->cli_sock); |
memset(c, 0, sizeof(rpc_cli_t)); |
memset(c, 0, sizeof(rpc_cli_t)); |
return (void*) ret; | return (void*) ((long)ret); |
} |
} |
|
|
// ------------------------------------------------- |
// ------------------------------------------------- |
|
|
/* |
/* |
* rpc_srv_initBLOBServer() Init & create BLOB Server | * rpc_srv_initBLOBServer() - Init & create BLOB Server |
| * |
| * @srv = RPC server instance |
* @Port = Port for bind server, if Port == 0 default port is selected |
* @Port = Port for bind server, if Port == 0 default port is selected |
* @diskDir = Disk place for BLOB file objects |
* @diskDir = Disk place for BLOB file objects |
* return: -1 == error or 0 bind and created BLOB server instance |
* return: -1 == error or 0 bind and created BLOB server instance |
Line 279 int
|
Line 405 int
|
rpc_srv_initBLOBServer(rpc_srv_t * __restrict srv, u_short Port, const char *diskDir) |
rpc_srv_initBLOBServer(rpc_srv_t * __restrict srv, u_short Port, const char *diskDir) |
{ |
{ |
int n = 1; |
int n = 1; |
struct sockaddr_in sin; | io_sockaddr_t sa; |
struct sockaddr_in6 sin6; | |
|
|
if (!srv) { |
if (!srv) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t init BLOB server ...\n"); | rpc_SetErr(EINVAL, "Invalid parameters can`t init BLOB server"); |
return -1; |
return -1; |
} |
} |
if (srv->srv_blob.state) { |
if (srv->srv_blob.state) { |
rpc_SetErr(EPERM, "Warning:: Already started BLOB server!\n"); | rpc_SetErr(EPERM, "Already started BLOB server!"); |
return 0; |
return 0; |
} |
} |
if (!Port) |
|
Port = RPC_DEFPORT + 1; |
|
|
|
memset(&srv->srv_blob, 0, sizeof srv->srv_blob); |
memset(&srv->srv_blob, 0, sizeof srv->srv_blob); |
if (access(diskDir, R_OK | W_OK) == -1) { |
if (access(diskDir, R_OK | W_OK) == -1) { |
LOGERR; |
LOGERR; |
return -1; |
return -1; |
} else |
} else |
strlcpy(srv->srv_blob.dir, diskDir, UCHAR_MAX + 1); | AIT_SET_STR(&srv->srv_blob.dir, diskDir); |
|
|
srv->srv_blob.server.cli_tid = pthread_self(); |
srv->srv_blob.server.cli_tid = pthread_self(); |
srv->srv_blob.server.cli_parent = srv; |
srv->srv_blob.server.cli_parent = srv; |
if (srv->srv_server.cli_sa.sa_family == AF_INET) { | |
memcpy(&sin, &srv->srv_server.cli_sa, sizeof sin); | memcpy(&sa, &srv->srv_server.cli_sa, sizeof sa); |
sin.sin_port = htons(Port); | switch (sa.sa.sa_family) { |
memcpy(&srv->srv_blob.server.cli_sa, &sin, sizeof(struct sockaddr)); | case AF_INET: |
} else { | sa.sin.sin_port = htons(Port ? Port : ntohs(sa.sin.sin_port) + 1); |
memcpy(&sin6, &srv->srv_server.cli_sa, sizeof sin6); | break; |
sin6.sin6_port = htons(Port); | case AF_INET6: |
memcpy(&srv->srv_blob.server.cli_sa, &sin6, sizeof(struct sockaddr)); | sa.sin6.sin6_port = htons(Port ? Port : ntohs(sa.sin6.sin6_port) + 1); |
| break; |
| case AF_LOCAL: |
| strlcat(sa.sun.sun_path, ".blob", sizeof sa.sun.sun_path); |
| break; |
| default: |
| AIT_FREE_VAL(&srv->srv_blob.dir); |
| return -1; |
} |
} |
|
memcpy(&srv->srv_blob.server.cli_sa, &sa, sizeof sa); |
|
|
srv->srv_blob.server.cli_sock = socket(srv->srv_server.cli_sa.sa_family, SOCK_STREAM, 0); | /* create BLOB server socket */ |
| srv->srv_blob.server.cli_sock = socket(srv->srv_server.cli_sa.sa.sa_family, SOCK_STREAM, 0); |
if (srv->srv_blob.server.cli_sock == -1) { |
if (srv->srv_blob.server.cli_sock == -1) { |
LOGERR; |
LOGERR; |
|
AIT_FREE_VAL(&srv->srv_blob.dir); |
return -1; |
return -1; |
} |
} |
if (setsockopt(srv->srv_blob.server.cli_sock, SOL_SOCKET, SO_REUSEADDR, &n, sizeof n) == -1) { |
if (setsockopt(srv->srv_blob.server.cli_sock, SOL_SOCKET, SO_REUSEADDR, &n, sizeof n) == -1) { |
LOGERR; |
LOGERR; |
close(srv->srv_blob.server.cli_sock); |
close(srv->srv_blob.server.cli_sock); |
|
AIT_FREE_VAL(&srv->srv_blob.dir); |
return -1; |
return -1; |
} |
} |
if (bind(srv->srv_blob.server.cli_sock, &srv->srv_blob.server.cli_sa, | n = srv->srv_netbuf; |
sizeof srv->srv_blob.server.cli_sa) == -1) { | if (setsockopt(srv->srv_blob.server.cli_sock, SOL_SOCKET, SO_SNDBUF, &n, sizeof n) == -1) { |
LOGERR; |
LOGERR; |
close(srv->srv_blob.server.cli_sock); |
close(srv->srv_blob.server.cli_sock); |
|
AIT_FREE_VAL(&srv->srv_blob.dir); |
return -1; |
return -1; |
} |
} |
|
if (setsockopt(srv->srv_blob.server.cli_sock, SOL_SOCKET, SO_RCVBUF, &n, sizeof n) == -1) { |
|
LOGERR; |
|
close(srv->srv_blob.server.cli_sock); |
|
AIT_FREE_VAL(&srv->srv_blob.dir); |
|
return -1; |
|
} |
|
if (bind(srv->srv_blob.server.cli_sock, &srv->srv_blob.server.cli_sa.sa, |
|
srv->srv_blob.server.cli_sa.sa.sa_len) == -1) { |
|
LOGERR; |
|
close(srv->srv_blob.server.cli_sock); |
|
AIT_FREE_VAL(&srv->srv_blob.dir); |
|
return -1; |
|
} |
|
|
|
/* allocate pool for concurent clients */ |
srv->srv_blob.clients = calloc(srv->srv_numcli, sizeof(rpc_cli_t)); |
srv->srv_blob.clients = calloc(srv->srv_numcli, sizeof(rpc_cli_t)); |
if (!srv->srv_blob.clients) { |
if (!srv->srv_blob.clients) { |
LOGERR; |
LOGERR; |
close(srv->srv_blob.server.cli_sock); |
close(srv->srv_blob.server.cli_sock); |
|
AIT_FREE_VAL(&srv->srv_blob.dir); |
return -1; |
return -1; |
} else |
} else |
memset(srv->srv_blob.clients, 0, srv->srv_numcli * sizeof(rpc_cli_t)); |
memset(srv->srv_blob.clients, 0, srv->srv_numcli * sizeof(rpc_cli_t)); |
|
|
pthread_mutex_init(&srv->srv_blob.mtx, NULL); |
pthread_mutex_init(&srv->srv_blob.mtx, NULL); |
|
|
pthread_mutex_lock(&srv->srv_mtx); |
|
rpc_srv_registerCall(srv, NULL, CALL_BLOBSHUTDOWN, 0); |
rpc_srv_registerCall(srv, NULL, CALL_BLOBSHUTDOWN, 0); |
rpc_srv_registerCall(srv, NULL, CALL_BLOBCLIENTS, 0); | rpc_srv_registerCall(srv, NULL, CALL_BLOBCLIENTS, 1); |
rpc_srv_registerCall(srv, NULL, CALL_BLOBVARS, 0); | rpc_srv_registerCall(srv, NULL, CALL_BLOBVARS, 1); |
pthread_mutex_unlock(&srv->srv_mtx); | rpc_srv_registerCall(srv, NULL, CALL_BLOBSTATE, 0); |
|
|
srv->srv_blob.state = enable; // enable BLOB | srv->srv_blob.state = enable; /* enable BLOB */ |
return 0; |
return 0; |
} |
} |
|
|
/* |
/* |
* rpc_srv_endBLOBServer() Destroy BLOB server, close all opened sockets and free resources | * rpc_srv_endBLOBServer() - Destroy BLOB server, close all opened sockets and free resources |
| * |
* @srv = RPC Server instance |
* @srv = RPC Server instance |
* return: none |
* return: none |
*/ |
*/ |
Line 362 rpc_srv_endBLOBServer(rpc_srv_t * __restrict srv)
|
Line 512 rpc_srv_endBLOBServer(rpc_srv_t * __restrict srv)
|
rpc_blob_t *f; |
rpc_blob_t *f; |
|
|
if (!srv) { |
if (!srv) { |
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; |
} else |
} else |
srv->srv_blob.state = disable; | srv->srv_blob.state = kill; |
|
|
rpc_srv_unregisterCall(srv, NULL, CALL_BLOBSHUTDOWN); |
rpc_srv_unregisterCall(srv, NULL, CALL_BLOBSHUTDOWN); |
rpc_srv_unregisterCall(srv, NULL, CALL_BLOBCLIENTS); |
rpc_srv_unregisterCall(srv, NULL, CALL_BLOBCLIENTS); |
rpc_srv_unregisterCall(srv, NULL, CALL_BLOBVARS); |
rpc_srv_unregisterCall(srv, NULL, CALL_BLOBVARS); |
|
rpc_srv_unregisterCall(srv, NULL, CALL_BLOBSTATE); |
|
|
|
AIT_FREE_VAL(&srv->srv_blob.dir); |
|
|
|
/* close all clients connections & server socket */ |
for (i = 0, c = srv->srv_blob.clients; i < srv->srv_numcli && c; i++, c++) |
for (i = 0, c = srv->srv_blob.clients; i < srv->srv_numcli && c; i++, c++) |
if (c->cli_sa.sa_family) | if (c->cli_sa.sa.sa_family) |
shutdown(c->cli_sock, SHUT_RDWR); |
shutdown(c->cli_sock, SHUT_RDWR); |
close(srv->srv_blob.server.cli_sock); |
close(srv->srv_blob.server.cli_sock); |
|
|
if (srv->srv_blob.clients) | pthread_mutex_lock(&srv->srv_blob.mtx); |
| if (srv->srv_blob.clients) { |
free(srv->srv_blob.clients); |
free(srv->srv_blob.clients); |
|
srv->srv_blob.clients = NULL; |
|
} |
|
|
pthread_mutex_lock(&srv->srv_blob.mtx); | /* detach blobs */ |
while ((f = srv->srv_blob.blobs)) { |
while ((f = srv->srv_blob.blobs)) { |
srv->srv_blob.blobs = f->blob_next; |
srv->srv_blob.blobs = f->blob_next; |
|
rpc_srv_blobFree(srv, f); |
free(f); |
free(f); |
} |
} |
pthread_mutex_unlock(&srv->srv_blob.mtx); |
pthread_mutex_unlock(&srv->srv_blob.mtx); |
|
|
|
while (pthread_mutex_trylock(&srv->srv_blob.mtx) == EBUSY); |
pthread_mutex_destroy(&srv->srv_blob.mtx); |
pthread_mutex_destroy(&srv->srv_blob.mtx); |
} |
} |
|
|
/* |
/* |
* rpc_srv_execBLOBServer() Execute Main BLOB server loop and wait for clients requests | * rpc_srv_loopBLOB() - Execute Main BLOB server loop and wait for clients requests |
| * |
* @srv = RPC Server instance |
* @srv = RPC Server instance |
* return: -1 error or 0 ok, infinite loop ... |
* return: -1 error or 0 ok, infinite loop ... |
*/ |
*/ |
int |
int |
rpc_srv_execBLOBServer(rpc_srv_t * __restrict srv) | rpc_srv_loopBLOB(rpc_srv_t * __restrict srv) |
{ |
{ |
socklen_t salen = sizeof(struct sockaddr); | socklen_t salen = sizeof(io_sockaddr_t); |
register int i; |
register int i; |
rpc_cli_t *c; |
rpc_cli_t *c; |
fd_set fds; |
fd_set fds; |
int ret; |
int ret; |
struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; |
struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; |
|
pthread_attr_t attr; |
|
|
if (!srv || !srv->srv_blob.state) { | if (!srv || srv->srv_blob.state == kill) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t start BLOB server ...\n"); |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t start BLOB server ...\n"); |
return -1; |
return -1; |
} |
} |
|
|
|
tv.tv_sec = srv->srv_session.sess_timeout; |
|
|
if (listen(srv->srv_blob.server.cli_sock, SOMAXCONN) == -1) { |
if (listen(srv->srv_blob.server.cli_sock, SOMAXCONN) == -1) { |
LOGERR; |
LOGERR; |
return -1; |
return -1; |
} |
} |
|
|
while (!rpc_Kill) { | pthread_attr_init(&attr); |
| pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED); |
| |
| /* main BLOB loop */ |
| while (srv->srv_blob.state != kill && srv->srv_kill != kill) { |
for (c = srv->srv_blob.clients, i = 0; i < srv->srv_numcli && c; i++, c++) |
for (c = srv->srv_blob.clients, i = 0; i < srv->srv_numcli && c; i++, c++) |
if (!c->cli_sa.sa_family) | if (!c->cli_sa.sa.sa_family) |
break; |
break; |
if (c && c->cli_sa.sa_family && c->cli_parent) { | if (i >= srv->srv_numcli) { |
| #ifdef HAVE_PTHREAD_YIELD |
| pthread_yield(); |
| #else |
usleep(1000000); |
usleep(1000000); |
|
#endif |
continue; |
continue; |
} |
} |
|
|
Line 434 rpc_srv_execBLOBServer(rpc_srv_t * __restrict srv)
|
Line 605 rpc_srv_execBLOBServer(rpc_srv_t * __restrict srv)
|
if (!ret) |
if (!ret) |
continue; |
continue; |
|
|
c->cli_sock = accept(srv->srv_blob.server.cli_sock, &c->cli_sa, &salen); | c->cli_sock = accept(srv->srv_blob.server.cli_sock, &c->cli_sa.sa, &salen); |
if (c->cli_sock == -1) { |
if (c->cli_sock == -1) { |
LOGERR; |
LOGERR; |
continue; |
continue; |
} else |
} else |
c->cli_parent = srv; |
c->cli_parent = srv; |
|
|
if (pthread_create(&c->cli_tid, NULL, rpc_srv_dispatchVars, c)) { | /* spawn dispatch thread for BLOB client */ |
| if (pthread_create(&c->cli_tid, &attr, rpc_srv_dispatchVars, c)) { |
LOGERR; |
LOGERR; |
continue; |
continue; |
} |
} |
} |
} |
|
|
|
srv->srv_blob.state = kill; |
|
|
|
pthread_attr_destroy(&attr); |
return 0; |
return 0; |
} |
} |
|
|
|
|
/* |
/* |
* rpc_srv_initServer() Init & create RPC Server | * rpc_srv_initServer() - Init & create RPC Server |
| * |
* @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 |
* @family = Family socket type, AF_INET or AF_INET6 | * @netBuf = Network buffer length, if =0 == BUFSIZ (also meaning max RPC packet) |
* @csHost = Host name or IP address for bind server, if NULL any address | * @family = Family type, AF_INET, AF_INET6 or AF_LOCAL |
| * @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, |
u_short family, const char *csHost, u_short Port) | int netBuf, u_short family, const char *csHost, u_short Port) |
{ |
{ |
rpc_srv_t *srv = NULL; |
rpc_srv_t *srv = NULL; |
int n = 1; |
int n = 1; |
struct hostent *host = NULL; |
struct hostent *host = NULL; |
struct sockaddr_in sin; | io_sockaddr_t sa; |
struct sockaddr_in6 sin6; | |
|
|
if (!concurentClients || !regProgID || (family != AF_INET && family != AF_INET6)) { | if (!concurentClients || !regProgID || |
| (family != AF_INET && family != AF_INET6 && family != AF_LOCAL)) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t init RPC server ...\n"); |
rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t init 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.sa_family = family; |
switch (family) { |
switch (family) { |
case AF_INET: |
case AF_INET: |
memset(&sin, 0, sizeof sin); | sa.sin.sin_len = sizeof(struct sockaddr_in); |
sin.sin_len = sizeof sin; | sa.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(&sa.sin.sin_addr, host->h_addr, host->h_length); |
break; |
break; |
case AF_INET6: |
case AF_INET6: |
memset(&sin6, 0, sizeof sin6); | sa.sin6.sin6_len = sizeof(struct sockaddr_in6); |
sin6.sin6_len = sizeof sin6; | sa.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(&sa.sin6.sin6_addr, host->h_addr, host->h_length); |
break; |
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: |
default: |
rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t start RPC server ...\n"); |
rpc_SetErr(EINVAL, "Error:: Invalid parameters can`t start RPC server ...\n"); |
return NULL; |
return NULL; |
Line 513 rpc_srv_initServer(u_int regProgID, u_int regProcID, i
|
Line 696 rpc_srv_initServer(u_int regProgID, u_int regProcID, i
|
} else |
} else |
memset(srv, 0, sizeof(rpc_srv_t)); |
memset(srv, 0, sizeof(rpc_srv_t)); |
|
|
|
srv->srv_netbuf = netBuf; |
srv->srv_numcli = concurentClients; |
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_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_tid = pthread_self(); |
srv->srv_server.cli_parent = srv; |
srv->srv_server.cli_parent = srv; |
if (family == AF_INET) | memcpy(&srv->srv_server.cli_sa, &sa, sizeof sa); |
memcpy(&srv->srv_server.cli_sa, &sin, sizeof srv->srv_server.cli_sa); | |
else | /* create server socket */ |
memcpy(&srv->srv_server.cli_sa, &sin6, sizeof srv->srv_server.cli_sa); | |
srv->srv_server.cli_sock = socket(family, SOCK_STREAM, 0); |
srv->srv_server.cli_sock = socket(family, SOCK_STREAM, 0); |
if (srv->srv_server.cli_sock == -1) { |
if (srv->srv_server.cli_sock == -1) { |
LOGERR; |
LOGERR; |
Line 536 rpc_srv_initServer(u_int regProgID, u_int regProcID, i
|
Line 720 rpc_srv_initServer(u_int regProgID, u_int regProcID, i
|
free(srv); |
free(srv); |
return NULL; |
return NULL; |
} |
} |
if (bind(srv->srv_server.cli_sock, &srv->srv_server.cli_sa, sizeof srv->srv_server.cli_sa) == -1) { | n = srv->srv_netbuf; |
| if (setsockopt(srv->srv_server.cli_sock, SOL_SOCKET, SO_SNDBUF, &n, sizeof n) == -1) { |
LOGERR; |
LOGERR; |
close(srv->srv_server.cli_sock); |
close(srv->srv_server.cli_sock); |
free(srv); |
free(srv); |
return NULL; |
return NULL; |
} |
} |
|
if (setsockopt(srv->srv_server.cli_sock, SOL_SOCKET, SO_RCVBUF, &n, sizeof n) == -1) { |
|
LOGERR; |
|
close(srv->srv_server.cli_sock); |
|
free(srv); |
|
return NULL; |
|
} |
|
if (bind(srv->srv_server.cli_sock, &srv->srv_server.cli_sa.sa, |
|
srv->srv_server.cli_sa.sa.sa_len) == -1) { |
|
LOGERR; |
|
close(srv->srv_server.cli_sock); |
|
free(srv); |
|
return NULL; |
|
} |
|
|
|
/* allocate pool for concurent clients */ |
srv->srv_clients = calloc(srv->srv_numcli, sizeof(rpc_cli_t)); |
srv->srv_clients = calloc(srv->srv_numcli, sizeof(rpc_cli_t)); |
if (!srv->srv_clients) { |
if (!srv->srv_clients) { |
LOGERR; |
LOGERR; |
Line 552 rpc_srv_initServer(u_int regProgID, u_int regProcID, i
|
Line 751 rpc_srv_initServer(u_int regProgID, u_int regProcID, i
|
} else |
} else |
memset(srv->srv_clients, 0, srv->srv_numcli * sizeof(rpc_cli_t)); |
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, 0); |
|
rpc_srv_registerCall(srv, NULL, CALL_SRVCALLS, 0); |
|
rpc_srv_registerCall(srv, NULL, CALL_SRVSESSIONS, 0); |
|
|
|
pthread_mutex_init(&srv->srv_mtx, NULL); |
pthread_mutex_init(&srv->srv_mtx, NULL); |
|
|
|
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; |
} |
} |
|
|
/* |
/* |
* rpc_srv_endServer() Destroy RPC server, close all opened sockets and free resources | * rpc_srv_endServer() - Destroy RPC server, close all opened sockets and free resources |
* @srv = RPC Server instance | * |
| * @psrv = RPC Server instance |
* return: none |
* return: none |
*/ |
*/ |
void |
void |
rpc_srv_endServer(rpc_srv_t * __restrict srv) | 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; |
|
|
if (!srv) { | if (!psrv || !*psrv) { |
rpc_SetErr(EINVAL, "Error:: Can`t destroy server because parameter is null!\n"); |
rpc_SetErr(EINVAL, "Error:: Can`t destroy server because parameter is null!\n"); |
return; |
return; |
} |
} |
|
|
rpc_srv_endBLOBServer(srv); | rpc_srv_endBLOBServer(*psrv); |
|
|
for (i = 0, c = srv->srv_clients; i < srv->srv_numcli && c; i++, c++) | /* close all clients connections & server socket */ |
if (c->cli_sa.sa_family) | for (i = 0, c = (*psrv)->srv_clients; i < (*psrv)->srv_numcli && c; i++, c++) |
| if (c->cli_sa.sa.sa_family) { |
shutdown(c->cli_sock, SHUT_RDWR); |
shutdown(c->cli_sock, SHUT_RDWR); |
close(srv->srv_server.cli_sock); | close(c->cli_sock); |
| } |
| close((*psrv)->srv_server.cli_sock); |
|
|
if (srv->srv_clients) { | if ((*psrv)->srv_clients) { |
free(srv->srv_clients); | free((*psrv)->srv_clients); |
srv->srv_numcli = 0; | (*psrv)->srv_clients = NULL; |
| (*psrv)->srv_numcli = 0; |
} |
} |
|
|
pthread_mutex_lock(&srv->srv_mtx); | /* detach exported calls */ |
while ((f = srv->srv_funcs)) { | pthread_mutex_lock(&(*psrv)->srv_mtx); |
srv->srv_funcs = f->func_next; | while ((f = (*psrv)->srv_funcs)) { |
| (*psrv)->srv_funcs = f->func_next; |
| io_freeVars(&f->func_vars); |
| AIT_FREE_VAL(&f->func_name); |
| AIT_FREE_VAL(&f->func_file); |
free(f); |
free(f); |
} |
} |
pthread_mutex_unlock(&srv->srv_mtx); | pthread_mutex_unlock(&(*psrv)->srv_mtx); |
|
|
pthread_mutex_destroy(&srv->srv_mtx); | while (pthread_mutex_trylock(&(*psrv)->srv_mtx) == EBUSY); |
| pthread_mutex_destroy(&(*psrv)->srv_mtx); |
|
|
free(srv); | free(*psrv); |
srv = NULL; | *psrv = NULL; |
} |
} |
|
|
/* |
/* |
* rpc_srv_execServer() Execute Main server loop and wait for clients requests | * rpc_srv_loopServer() - Execute Main server loop and wait for clients requests |
| * |
* @srv = RPC Server instance |
* @srv = RPC Server instance |
* return: -1 error or 0 ok, infinite loop ... |
* return: -1 error or 0 ok, infinite loop ... |
*/ |
*/ |
int |
int |
rpc_srv_execServer(rpc_srv_t * __restrict srv) | rpc_srv_loopServer(rpc_srv_t * __restrict srv) |
{ |
{ |
socklen_t salen = sizeof(struct sockaddr); | socklen_t salen = sizeof(io_sockaddr_t); |
register int i; |
register int i; |
rpc_cli_t *c; |
rpc_cli_t *c; |
fd_set fds; |
fd_set fds; |
int ret; |
int ret; |
struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; |
struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; |
|
pthread_attr_t attr; |
|
|
if (!srv) { |
if (!srv) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t start RPC server ...\n"); |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t start RPC server ...\n"); |
return -1; |
return -1; |
} |
} |
|
|
|
tv.tv_sec = srv->srv_session.sess_timeout; |
|
|
|
/* activate BLOB server worker if srv->srv_blob.state == enable */ |
|
rpc_srv_execBLOBServer(srv); |
|
|
if (listen(srv->srv_server.cli_sock, SOMAXCONN) == -1) { |
if (listen(srv->srv_server.cli_sock, SOMAXCONN) == -1) { |
LOGERR; |
LOGERR; |
return -1; |
return -1; |
} |
} |
|
|
while (!rpc_Kill) { | pthread_attr_init(&attr); |
| pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED); |
| |
| /* main rpc loop */ |
| while (srv->srv_kill != kill) { |
for (c = srv->srv_clients, i = 0; i < srv->srv_numcli && c; i++, c++) |
for (c = srv->srv_clients, i = 0; i < srv->srv_numcli && c; i++, c++) |
if (!c->cli_sa.sa_family) | if (!c->cli_sa.sa.sa_family) |
break; |
break; |
if (c && c->cli_sa.sa_family && c->cli_parent) { | if (i >= srv->srv_numcli) { |
| #ifdef HAVE_PTHREAD_YIELD |
| pthread_yield(); |
| #else |
usleep(1000000); |
usleep(1000000); |
|
#endif |
continue; |
continue; |
} |
} |
|
|
Line 648 rpc_srv_execServer(rpc_srv_t * __restrict srv)
|
Line 872 rpc_srv_execServer(rpc_srv_t * __restrict srv)
|
if (!ret) |
if (!ret) |
continue; |
continue; |
|
|
c->cli_sock = accept(srv->srv_server.cli_sock, &c->cli_sa, &salen); | c->cli_sock = accept(srv->srv_server.cli_sock, &c->cli_sa.sa, &salen); |
if (c->cli_sock == -1) { |
if (c->cli_sock == -1) { |
LOGERR; |
LOGERR; |
continue; |
continue; |
} else |
} else |
c->cli_parent = srv; |
c->cli_parent = srv; |
|
|
if (pthread_create(&c->cli_tid, NULL, rpc_srv_dispatchCall, c)) { | /* spawn rpc client dispatcher */ |
| if (pthread_create(&c->cli_tid, &attr, rpc_srv_dispatchCall, c)) { |
LOGERR; |
LOGERR; |
continue; |
continue; |
} |
} |
} |
} |
|
|
|
pthread_attr_destroy(&attr); |
return 0; |
return 0; |
} |
} |
|
|
Line 668 rpc_srv_execServer(rpc_srv_t * __restrict srv)
|
Line 894 rpc_srv_execServer(rpc_srv_t * __restrict srv)
|
|
|
/* |
/* |
* rpc_srv_execCall() Execute registered call from RPC server |
* rpc_srv_execCall() Execute registered call from RPC server |
* @data = RPC const data | * |
* @call = Register RPC call |
* @call = Register RPC call |
* @rpc = IN RPC call structure |
* @rpc = IN RPC call structure |
* @args = IN RPC call array of rpc values | * @args = IN RPC calling arguments from RPC client |
* return: -1 error, !=-1 ok |
* return: -1 error, !=-1 ok |
*/ |
*/ |
int |
int |
rpc_srv_execCall(void * const data, rpc_func_t * __restrict call, | rpc_srv_execCall(rpc_func_t * __restrict call, struct tagRPCCall * __restrict rpc, |
struct tagRPCCall * __restrict rpc, rpc_val_t * __restrict args) | array_t * __restrict args) |
{ |
{ |
void *dl; |
void *dl; |
rpc_callback_t func; |
rpc_callback_t func; |
int ret; |
int ret; |
|
|
if (!data || !call || !rpc) { | if (!call || !rpc || !call->func_parent) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t exec call from RPC server ...\n"); | rpc_SetErr(EINVAL, "Invalid parameter can`t exec function"); |
return -1; |
return -1; |
} |
} |
|
|
dl = dlopen((char*) (*call->func_file ? call->func_file : NULL), RTLD_NOW); | dl = dlopen(AIT_VOID(&call->func_file), RTLD_NOW); |
if (!dl) { |
if (!dl) { |
rpc_SetErr(ENOENT, "Error:: Can`t attach module %s!\n", dlerror()); | rpc_SetErr(ENOENT, "Can`t attach module %s!", dlerror()); |
return -1; |
return -1; |
} |
} |
|
|
func = dlsym(dl, (char*) call->func_name); | func = dlsym(dl, (const char*) AIT_GET_STR(&call->func_name)); |
if (func) |
if (func) |
ret = func(data, call, rpc->call_argc, args); | ret = func(call, ntohs(rpc->call_argc), args); |
else { |
else { |
rpc_SetErr(ENOEXEC, "Error:: Can`t find function %s!\n", dlerror()); | rpc_SetErr(ENOEXEC, "Can`t find function %s!", dlerror()); |
ret = -1; |
ret = -1; |
} |
} |
|
|