version 1.3.2.12, 2011/09/07 01:19:19
|
version 1.23, 2015/07/22 20:01:46
|
Line 12 terms:
|
Line 12 terms:
|
All of the documentation and software included in the ELWIX and AITNET |
All of the documentation and software included in the ELWIX and AITNET |
Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org> |
Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org> |
|
|
Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 | Copyright 2004 - 2015 |
by Michael Pounov <misho@elwix.org>. All rights reserved. |
by Michael Pounov <misho@elwix.org>. All rights reserved. |
|
|
Redistribution and use in source and binary forms, with or without |
Redistribution and use in source and binary forms, with or without |
Line 48 SUCH DAMAGE.
|
Line 48 SUCH DAMAGE.
|
|
|
/* builtin RPC server functions */ |
/* builtin RPC server functions */ |
|
|
int | static int |
rpcServerClients(rpc_func_t *call, int ic, array_t *iv) | rpcServerClients(RPC_CALL_STDARGS) |
{ |
{ |
rpc_srv_t *srv; |
rpc_srv_t *srv; |
array_t *vals; | rpc_cli_t *c; |
rpc_cli_t *cli; | |
register int i; |
register int i; |
int len; |
int len; |
const char *str = NULL; |
const char *str = NULL; |
char *val, wrk[INET6_ADDRSTRLEN]; | char *val; |
struct sockaddr_in *s; | ait_val_t v; |
struct sockaddr_in6 *s6; | |
struct sockaddr_un *su; | |
|
|
RPC_CALLBACK_CHECK_INPUT(call); | RPC_CALLBACK_CHECK_INPUT(cli); |
if (!call->func_parent) | srv = RPC_SRV_SERVER(cli); |
return -1; | |
else | |
srv = call->func_parent; | |
|
|
rpc_srv_getVars(call, &vals); | len = array_Size(srv->srv_clients) * STRSIZ; |
| if (!(val = e_malloc(len))) { |
len = srv->srv_numcli * STRSIZ; | |
if (!(val = malloc(len))) { | |
LOGERR; |
LOGERR; |
return -1; |
return -1; |
} else |
} else |
memset(val, 0, len); |
memset(val, 0, len); |
|
|
for (i = 0, cli = srv->srv_clients; i < srv->srv_numcli; i++, cli++) { | for (i = 0; i < array_Size(srv->srv_clients); i++) { |
if (!cli->cli_sa.sa_family) | c = array(srv->srv_clients, i, rpc_cli_t*); |
| if (!c) |
continue; |
continue; |
|
|
switch (cli->cli_sa.sa_family) { | str = e_n2addr(&c->cli_sa, &v); |
case AF_INET: | |
s = (struct sockaddr_in*) &cli->cli_sa; | |
str = inet_ntop(cli->cli_sa.sa_family, &s->sin_addr, wrk, sizeof wrk); | |
break; | |
case AF_INET6: | |
s6 = (struct sockaddr_in6*) &cli->cli_sa; | |
str = inet_ntop(cli->cli_sa.sa_family, &s6->sin6_addr, wrk, sizeof wrk); | |
break; | |
case AF_LOCAL: | |
su = (struct sockaddr_un*) &cli->cli_sa; | |
str = su->sun_path; | |
break; | |
} | |
if (str) |
if (str) |
strlcat(val, (char*) str, len); |
strlcat(val, (char*) str, len); |
else |
else |
strlcat(val, "0.0.0.0", len); |
strlcat(val, "0.0.0.0", len); |
strlcat(val, " ", len); |
strlcat(val, " ", len); |
|
AIT_FREE_VAL(&v); |
} |
} |
|
|
AIT_SET_STR(io_array(vals, 0, ait_val_t*), val); | /* return values */ |
free(val); | AIT_SET_STR(ait_getVars(&RPC_RETVARS(cli), 0), val); |
| e_free(val); |
return 0; |
return 0; |
} |
} |
|
|
int | static int |
rpcServerCalls(rpc_func_t *call, int ic, array_t *iv) | rpcServerCalls(RPC_CALL_STDARGS) |
{ |
{ |
rpc_srv_t *srv; |
rpc_srv_t *srv; |
array_t *vals; |
|
rpc_func_t *f; |
rpc_func_t *f; |
register int i; | register int i = 0; |
int len; |
int len; |
char *val, str[MAXPATHLEN]; |
char *val, str[MAXPATHLEN]; |
|
|
RPC_CALLBACK_CHECK_INPUT(call); | RPC_CALLBACK_CHECK_INPUT(cli); |
if (!call->func_parent) | srv = RPC_SRV_SERVER(cli); |
return -1; | |
else | |
srv = call->func_parent; | |
|
|
for (i = 0, f = srv->srv_funcs; f; i++, f = f->func_next); | SLIST_FOREACH(f, &srv->srv_funcs, func_next) |
| i++; |
len = i * STRSIZ; |
len = i * STRSIZ; |
|
|
rpc_srv_getVars(call, &vals); | if (!(val = e_malloc(len))) { |
| |
if (!(val = malloc(len))) { | |
LOGERR; |
LOGERR; |
return -1; |
return -1; |
} else |
} else |
memset(val, 0, len); |
memset(val, 0, len); |
|
|
for (f = srv->srv_funcs, i = 0; f; f = f->func_next) { | SLIST_FOREACH(f, &srv->srv_funcs, func_next) |
if (*f->func_name) { | if (AIT_ADDR(&f->func_name)) { |
memset(str, 0, sizeof str); |
memset(str, 0, sizeof str); |
snprintf(str, sizeof str, "/%s/%s(%d); ", | snprintf(str, sizeof str, "/%hu/0x%p; ", AIT_KEY(&f->func_name), |
f->func_file, f->func_name, io_arraySize(f->func_vars)); | AIT_ADDR(&f->func_name)); |
strlcat(val, str, len); |
strlcat(val, str, len); |
} |
} |
} |
|
|
|
AIT_SET_STR(io_array(vals, 0, ait_val_t*), val); | /* return variables */ |
free(val); | AIT_SET_STR(ait_getVars(&RPC_RETVARS(cli), 0), val); |
| e_free(val); |
return 0; |
return 0; |
} |
} |
|
|
int | static int |
rpcServerSessions(rpc_func_t *call, int ic, array_t *iv) | rpcServerSessions(RPC_CALL_STDARGS) |
{ |
{ |
rpc_srv_t *srv; |
rpc_srv_t *srv; |
array_t *vals; |
|
ait_val_t *v; |
|
|
|
RPC_CALLBACK_CHECK_INPUT(call); | RPC_CALLBACK_CHECK_INPUT(cli); |
if (!call->func_parent) | srv = RPC_SRV_SERVER(cli); |
return -1; | |
else | |
srv = call->func_parent; | |
|
|
rpc_srv_getVars(call, &vals); | AIT_SET_I32(ait_getVars(&RPC_RETVARS(cli), 2), array_Size(srv->srv_clients)); |
| AIT_SET_U8(ait_getVars(&RPC_RETVARS(cli), 0), srv->srv_session.sess_version); |
| AIT_SET_U8(ait_getVars(&RPC_RETVARS(cli), 1), srv->srv_session.sess_instance); |
|
|
v = io_array(vals, 0, ait_val_t*); |
|
AIT_SET_U8(v, srv->srv_session.sess_version); |
|
v = io_array(vals, 1, ait_val_t*); |
|
AIT_SET_U32(v, srv->srv_session.sess_program); |
|
v = io_array(vals, 2, ait_val_t*); |
|
AIT_SET_U32(v, srv->srv_session.sess_process); |
|
v = io_array(vals, 3, ait_val_t*); |
|
AIT_SET_I32(v, srv->srv_numcli); |
|
|
|
return 0; |
return 0; |
} |
} |
|
|
int | static int |
rpcServerShutdown(rpc_func_t *call, int ic, array_t *iv) | rpcServerShutdown(RPC_CALL_STDARGS) |
{ |
{ |
rpc_srv_t *srv; |
rpc_srv_t *srv; |
|
|
RPC_CALLBACK_CHECK_INPUT(call); | RPC_CALLBACK_CHECK_INPUT(cli); |
if (!call->func_parent) | srv = RPC_SRV_SERVER(cli); |
return -1; | |
else | srv->srv_blob.kill = 1; |
srv = call->func_parent; | if (srv->srv_blob.tid) |
| pthread_kill(srv->srv_blob.tid, SIGFBLOB); |
| srv->srv_kill = 1; |
| return 0; |
| } |
|
|
pthread_mutex_lock(&srv->srv_mtx); | static int |
srv->srv_kill = kill; | rpcServerPing(RPC_CALL_STDARGS) |
pthread_mutex_unlock(&srv->srv_mtx); | { |
| if (ntohl((u_long) rpc->call_req.flags) == RPC_REPLY) |
| AIT_SET_U16(ait_getVars(&RPC_RETVARS(cli), 0), random() % USHRT_MAX); |
return 0; |
return 0; |
} |
} |
|
|
// ---------------------------------------------------- | /* ---------------------------------------------------- */ |
|
|
int | static int |
rpcBLOBServerShutdown(rpc_func_t *call, int ic, array_t *iv) | rpcBLOBServerShutdown(RPC_CALL_STDARGS) |
{ |
{ |
rpc_srv_t *srv; |
rpc_srv_t *srv; |
|
|
RPC_CALLBACK_CHECK_INPUT(call); | RPC_CALLBACK_CHECK_INPUT(cli); |
if (!call->func_parent) | srv = RPC_SRV_SERVER(cli); |
return -1; | |
else | |
srv = call->func_parent; | |
|
|
pthread_mutex_lock(&srv->srv_blob.mtx); | rpc_freeBLOBCli(cli); |
srv->srv_blob.state = kill; | |
pthread_mutex_unlock(&srv->srv_blob.mtx); | |
|
|
|
srv->srv_blob.kill = 1; |
return 0; |
return 0; |
} |
} |
|
|
int | static int |
rpcBLOBServerVars(rpc_func_t *call, int ic, array_t *iv) | rpcBLOBServerVars(RPC_CALL_STDARGS) |
{ |
{ |
rpc_srv_t *srv; |
rpc_srv_t *srv; |
array_t *vals; |
|
rpc_blob_t *b; |
rpc_blob_t *b; |
register int i; | register int i = 0; |
char *val, str[64]; |
char *val, str[64]; |
int len; |
int len; |
|
|
RPC_CALLBACK_CHECK_INPUT(call); | RPC_CALLBACK_CHECK_INPUT(cli); |
if (!call->func_parent) | srv = RPC_SRV_SERVER(cli); |
return -1; | |
else | |
srv = call->func_parent; | |
|
|
rpc_srv_getVars(call, &vals); | if (srv->srv_blob.kill) { |
| AIT_SET_STR(ait_getVars(&RPC_RETVARS(cli), 0), "BLOB Server is killed"); |
if (srv->srv_blob.state == kill) { | |
AIT_SET_STR(io_array(vals, 0, ait_val_t*), "BLOB Server is killed"); | |
return 1; |
return 1; |
} |
} |
if (srv->srv_blob.state == disable) { |
|
AIT_SET_STR(io_array(vals, 0, ait_val_t*), "BLOB Server is disabled"); |
|
return 1; |
|
} |
|
|
|
pthread_mutex_lock(&srv->srv_blob.mtx); | TAILQ_FOREACH(b, &srv->srv_blob.blobs, blob_node) |
for (i = 0, b = srv->srv_blob.blobs; b; i++, b = b->blob_next); | i++; |
len = i * sizeof str; |
len = i * sizeof str; |
|
|
if (!len) { |
if (!len) { |
AIT_SET_STR(io_array(vals, 0, ait_val_t*), ""); | AIT_SET_STR(ait_getVars(&RPC_RETVARS(cli), 0), ""); |
pthread_mutex_unlock(&srv->srv_blob.mtx); | |
return 0; |
return 0; |
} |
} |
|
|
if (!(val = malloc(len))) { | if (!(val = e_malloc(len))) { |
LOGERR; |
LOGERR; |
pthread_mutex_unlock(&srv->srv_blob.mtx); |
|
return -1; |
return -1; |
} else |
} else |
memset(val, 0, len); |
memset(val, 0, len); |
|
|
for (b = srv->srv_blob.blobs, i = 0; b; i++, b = b->blob_next) { | TAILQ_FOREACH(b, &srv->srv_blob.blobs, blob_node) { |
memset(str, 0, sizeof str); |
memset(str, 0, sizeof str); |
snprintf(str, sizeof str, "0x%0X(%lu)=%p ", b->blob_var, (u_long) b->blob_len, b->blob_data); |
snprintf(str, sizeof str, "0x%0X(%lu)=%p ", b->blob_var, (u_long) b->blob_len, b->blob_data); |
strlcat(val, str, len); |
strlcat(val, str, len); |
} |
} |
|
|
AIT_SET_STR(io_array(vals, 0, ait_val_t*), val); | AIT_SET_STR(ait_getVars(&RPC_RETVARS(cli), 0), val); |
free(val); | e_free(val); |
pthread_mutex_unlock(&srv->srv_blob.mtx); | |
return 0; |
return 0; |
} |
} |
|
|
int | static int |
rpcBLOBServerState(rpc_func_t *call, int ic, array_t *iv) | rpcBLOBServerClients(RPC_CALL_STDARGS) |
{ |
{ |
rpc_srv_t *srv; |
rpc_srv_t *srv; |
| rpc_cli_t *c; |
RPC_CALLBACK_CHK_ARGS(call, ic); | |
if (!call->func_parent) | |
return -1; | |
else | |
srv = call->func_parent; | |
| |
if (AIT_TYPE(io_array(iv, 0, ait_val_t*)) != i32) | |
return -1; | |
| |
pthread_mutex_lock(&srv->srv_mtx); | |
srv->srv_blob.state = AIT_GET_I32(io_array(iv, 0, ait_val_t*)); | |
pthread_mutex_unlock(&srv->srv_mtx); | |
return 0; | |
} | |
| |
int | |
rpcBLOBServerClients(rpc_func_t *call, int ic, array_t *iv) | |
{ | |
rpc_srv_t *srv; | |
array_t *vals; | |
rpc_cli_t *cli; | |
register int i; |
register int i; |
int len; |
int len; |
const char *str = NULL; |
const char *str = NULL; |
char *val, wrk[INET6_ADDRSTRLEN]; | char *val; |
struct sockaddr_in *s; | ait_val_t v; |
struct sockaddr_in6 *s6; | |
struct sockaddr_un *su; | |
|
|
RPC_CALLBACK_CHECK_INPUT(call); | RPC_CALLBACK_CHECK_INPUT(cli); |
if (!call->func_parent) | srv = RPC_SRV_SERVER(cli); |
return -1; | |
else | |
srv = call->func_parent; | |
|
|
rpc_srv_getVars(call, &vals); | if (srv->srv_blob.kill) { |
| AIT_SET_STR(ait_getVars(&RPC_RETVARS(cli), 0), "BLOB Server is killed"); |
if (srv->srv_blob.state == kill) { | |
AIT_SET_STR(io_array(vals, 0, ait_val_t*), "BLOB Server is killed"); | |
return 1; |
return 1; |
} |
} |
if (srv->srv_blob.state == disable) { |
|
AIT_SET_STR(io_array(vals, 0, ait_val_t*), "BLOB Server is disabled"); |
|
return 1; |
|
} |
|
|
|
len = srv->srv_numcli * STRSIZ; | len = array_Size(srv->srv_blob.clients) * STRSIZ; |
if (!(val = malloc(len))) { | if (!(val = e_malloc(len))) { |
LOGERR; |
LOGERR; |
return -1; |
return -1; |
} else |
} else |
memset(val, 0, len); |
memset(val, 0, len); |
|
|
for (i = 0, cli = srv->srv_blob.clients; i < srv->srv_numcli; i++, cli++) { | for (i = 0; i < array_Size(srv->srv_clients); i++) { |
if (!cli->cli_sa.sa_family) | c = array(srv->srv_blob.clients, i, rpc_cli_t*); |
| if (!c) |
continue; |
continue; |
|
|
switch (cli->cli_sa.sa_family) { | str = e_n2addr(&c->cli_sa, &v); |
case AF_INET: | |
s = (struct sockaddr_in*) &cli->cli_sa; | |
str = inet_ntop(cli->cli_sa.sa_family, &s->sin_addr, wrk, sizeof wrk); | |
break; | |
case AF_INET6: | |
s6 = (struct sockaddr_in6*) &cli->cli_sa; | |
str = inet_ntop(cli->cli_sa.sa_family, &s6->sin6_addr, wrk, sizeof wrk); | |
break; | |
case AF_LOCAL: | |
su = (struct sockaddr_un*) &cli->cli_sa; | |
str = su->sun_path; | |
break; | |
} | |
if (str) |
if (str) |
strlcat(val, (char*) str, len); |
strlcat(val, (char*) str, len); |
else |
else |
strlcat(val, "0.0.0.0", len); |
strlcat(val, "0.0.0.0", len); |
strlcat(val, " ", len); |
strlcat(val, " ", len); |
|
AIT_FREE_VAL(&v); |
} |
} |
|
|
AIT_SET_STR(io_array(vals, 0, ait_val_t*), val); | AIT_SET_STR(ait_getVars(&RPC_RETVARS(cli), 0), val); |
free(val); | e_free(val); |
| return 0; |
| } |
| |
| /* ----------------------------------------------------------------- */ |
| |
| /* |
| * rpc_register_srvPing() - Register ping service function |
| * |
| * @srv = RPC server instance |
| * return: -1 error or 0 ok |
| */ |
| int |
| rpc_register_srvPing(rpc_srv_t * __restrict srv) |
| { |
| if (!srv) |
| return -1; |
| |
| if (rpc_srv_registerCall(srv, CALL_SRVPING, rpcServerPing) < 1) |
| return -1; |
| |
| return 0; |
| } |
| |
| /* |
| * rpc_register_srvServices() - Register internal service functions |
| * |
| * @srv = RPC server instance |
| * return: -1 error or 0 ok |
| */ |
| int |
| rpc_register_srvServices(rpc_srv_t * __restrict srv) |
| { |
| if (!srv) |
| return -1; |
| |
| if (rpc_srv_registerCall(srv, CALL_SRVSHUTDOWN, rpcServerShutdown) < 1) |
| return -1; |
| if (rpc_srv_registerCall(srv, CALL_SRVCLIENTS, rpcServerClients) < 1) |
| return -1; |
| if (rpc_srv_registerCall(srv, CALL_SRVSESSIONS, rpcServerSessions) < 1) |
| return -1; |
| if (rpc_srv_registerCall(srv, CALL_SRVCALLS, rpcServerCalls) < 1) |
| return -1; |
| |
| return 0; |
| } |
| |
| /* |
| * rpc_register_blobServices() - Register internal service functions |
| * |
| * @srv = RPC server instance |
| * return: -1 error or 0 ok |
| */ |
| int |
| rpc_register_blobServices(rpc_srv_t * __restrict srv) |
| { |
| if (!srv) |
| return -1; |
| |
| if (rpc_srv_registerCall(srv, CALL_BLOBSHUTDOWN, rpcBLOBServerShutdown) < 1) |
| return -1; |
| if (rpc_srv_registerCall(srv, CALL_BLOBCLIENTS, rpcBLOBServerClients) < 1) |
| return -1; |
| if (rpc_srv_registerCall(srv, CALL_BLOBVARS, rpcBLOBServerVars) < 1) |
| return -1; |
| |
return 0; |
return 0; |
} |
} |