version 1.1, 2010/06/18 01:48:06
|
version 1.3.2.2, 2011/08/30 11:13:29
|
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 |
| 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" |
|
|
|
|
/* builtin RPC server functions */ |
/* builtin RPC server functions */ |
|
|
int |
int |
rpcServerClients(rpc_srv_t * __restrict srv, rpc_func_t *call, int ic, rpc_val_t *iv) | rpcServerClients(rpc_func_t *call, int ic, ait_val_t *iv) |
{ |
{ |
rpc_val_t *v, *vals = NULL; | rpc_srv_t *srv; |
| ait_val_t *v, *vals; |
rpc_cli_t *cli; |
rpc_cli_t *cli; |
register int i; |
register int i; |
const char *str; | const char *str = NULL; |
char wrk[INET6_ADDRSTRLEN]; |
char wrk[INET6_ADDRSTRLEN]; |
struct sockaddr_in *s; |
struct sockaddr_in *s; |
struct sockaddr_in6 *s6; |
struct sockaddr_in6 *s6; |
|
struct sockaddr_un *su; |
|
|
if (!srv || !call) { | RPC_CALLBACK_CHECK_INPUT(call); |
rpc_SetErr(EINVAL, "Error:: invalid parameters ...\n"); | if (!call->func_parent) |
return -1; |
return -1; |
} |
|
if (rpc_srv_declValsCall(call, srv->srv_numcli) == -1) |
|
return -1; |
|
else |
else |
rpc_srv_delValsCall(call); | srv = call->func_parent; |
if (rpc_srv_getValsCall(call, &vals) == -1) | |
| if (!(vals = rpc_srv_returnVars(call, srv->srv_numcli))) |
return -1; |
return -1; |
|
|
for (i = 0, cli = srv->srv_clients, v = vals; i < srv->srv_numcli; cli++) { | for (i = 0, cli = srv->srv_clients, v = vals; i < srv->srv_numcli; i++, cli++) { |
if (!cli->cli_sa.sa_family) | if (!cli->cli_sa.sa_family) { |
| AIT_SET_STR(v++, ""); |
continue; |
continue; |
|
} |
|
|
if (AF_INET == cli->cli_sa.sa_family) { | switch (cli->cli_sa.sa_family) { |
s = (struct sockaddr_in*) &cli->cli_sa; | case AF_INET: |
str = inet_ntop(cli->cli_sa.sa_family, &s->sin_addr, wrk, sizeof wrk); | s = (struct sockaddr_in*) &cli->cli_sa; |
} else { | str = inet_ntop(cli->cli_sa.sa_family, &s->sin_addr, wrk, sizeof wrk); |
s6 = (struct sockaddr_in6*) &cli->cli_sa; | break; |
str = inet_ntop(cli->cli_sa.sa_family, &s6->sin6_addr, wrk, sizeof wrk); | 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) |
RPC_SET_STR(v++, (char*) str); | AIT_SET_STR(v++, (char*) str); |
i++; | else |
} | AIT_SET_STR(v++, "0.0.0.0"); |
} |
} |
|
|
return 0; |
return 0; |
} |
} |
|
|
int |
int |
rpcServerCalls(rpc_srv_t * __restrict srv, rpc_func_t *call, int ic, rpc_val_t *iv) | rpcServerCalls(rpc_func_t *call, int ic, ait_val_t *iv) |
{ |
{ |
rpc_val_t *v, *vals = NULL; | rpc_srv_t *srv; |
| ait_val_t *v, *vals; |
rpc_func_t *f; |
rpc_func_t *f; |
register int i; |
register int i; |
char str[MAXPATHLEN]; |
char str[MAXPATHLEN]; |
|
|
if (!srv || !call) { | RPC_CALLBACK_CHECK_INPUT(call); |
rpc_SetErr(EINVAL, "Error:: invalid parameters ...\n"); | if (!call->func_parent) |
return -1; |
return -1; |
} | else |
| srv = call->func_parent; |
|
|
for (i = 0, f = srv->srv_funcs; f; i++, f = f->func_next); |
for (i = 0, f = srv->srv_funcs; f; i++, f = f->func_next); |
| if (!(vals = rpc_srv_returnVars(call, i))) |
if (rpc_srv_declValsCall(call, i) == -1) | |
return -1; |
return -1; |
else |
|
rpc_srv_delValsCall(call); |
|
if (rpc_srv_getValsCall(call, &vals) == -1) |
|
return -1; |
|
|
|
for (f = srv->srv_funcs, v = vals; f; f = f->func_next) { |
for (f = srv->srv_funcs, v = vals; f; f = f->func_next) { |
if (*f->func_name) { |
if (*f->func_name) { |
memset(str, 0, MAXPATHLEN); | memset(str, 0, sizeof str); |
snprintf(str, MAXPATHLEN, "/%s/%s()", f->func_file, f->func_name); | snprintf(str, sizeof str, "/%s/%s()", f->func_file, f->func_name); |
RPC_SET_STR(v++, str); | AIT_SET_STR(v++, str); |
} |
} |
} |
} |
|
|
Line 87 rpcServerCalls(rpc_srv_t * __restrict srv, rpc_func_t
|
Line 130 rpcServerCalls(rpc_srv_t * __restrict srv, rpc_func_t
|
} |
} |
|
|
int |
int |
rpcServerSessions(rpc_srv_t * __restrict srv, rpc_func_t *call, int ic, rpc_val_t *iv) | rpcServerSessions(rpc_func_t *call, int ic, ait_val_t *iv) |
{ |
{ |
rpc_val_t *vals = NULL; | rpc_srv_t *srv; |
| ait_val_t *vals; |
|
|
if (!srv || !call) { | RPC_CALLBACK_CHECK_INPUT(call); |
rpc_SetErr(EINVAL, "Error:: invalid parameters ...\n"); | if (!call->func_parent) |
return -1; |
return -1; |
|
else |
|
srv = call->func_parent; |
|
|
|
if (!(vals = rpc_srv_returnVars(call, 4))) |
|
return -1; |
|
|
|
AIT_SET_U8(&vals[0], srv->srv_session.sess_version); |
|
AIT_SET_U32(&vals[1], srv->srv_session.sess_program); |
|
AIT_SET_U32(&vals[2], srv->srv_session.sess_process); |
|
AIT_SET_I32(&vals[3], srv->srv_numcli); |
|
|
|
return 0; |
|
} |
|
|
|
int |
|
rpcServerShutdown(rpc_func_t *call, int ic, ait_val_t *iv) |
|
{ |
|
rpc_srv_t *srv; |
|
|
|
RPC_CALLBACK_CHECK_INPUT(call); |
|
if (!call->func_parent) |
|
return -1; |
|
else |
|
srv = call->func_parent; |
|
|
|
pthread_mutex_lock(&srv->srv_mtx); |
|
srv->srv_kill = kill; |
|
pthread_mutex_unlock(&srv->srv_mtx); |
|
|
|
return 0; |
|
} |
|
|
|
// ---------------------------------------------------- |
|
|
|
int |
|
rpcBLOBServerShutdown(rpc_func_t *call, int ic, ait_val_t *iv) |
|
{ |
|
rpc_srv_t *srv; |
|
|
|
RPC_CALLBACK_CHECK_INPUT(call); |
|
if (!call->func_parent) |
|
return -1; |
|
else |
|
srv = call->func_parent; |
|
|
|
pthread_mutex_lock(&srv->srv_blob.mtx); |
|
srv->srv_blob.state = kill; |
|
pthread_mutex_unlock(&srv->srv_blob.mtx); |
|
|
|
return 0; |
|
} |
|
|
|
int |
|
rpcBLOBServerVars(rpc_func_t *call, int ic, ait_val_t *iv) |
|
{ |
|
rpc_srv_t *srv; |
|
ait_val_t *v, *vals; |
|
rpc_blob_t *b; |
|
register int i; |
|
|
|
RPC_CALLBACK_CHECK_INPUT(call); |
|
if (!call->func_parent) |
|
return -1; |
|
else |
|
srv = call->func_parent; |
|
|
|
pthread_mutex_lock(&srv->srv_blob.mtx); |
|
for (i = 0, b = srv->srv_blob.blobs; b; i++, b = b->blob_next); |
|
if (!(vals = rpc_srv_returnVars(call, i))) { |
|
pthread_mutex_unlock(&srv->srv_blob.mtx); |
|
return 0; |
} |
} |
|
|
if (rpc_srv_declValsCall(call, 4) == -1) | for (b = srv->srv_blob.blobs, v = vals; b; b = b->blob_next) |
| AIT_SET_U32(v++, b->blob_var); |
| pthread_mutex_unlock(&srv->srv_blob.mtx); |
| |
| return 0; |
| } |
| |
| int |
| rpcBLOBServerState(rpc_func_t *call, int ic, ait_val_t *iv) |
| { |
| rpc_srv_t *srv; |
| |
| RPC_CALLBACK_CHK_ARGS(call, ic); |
| if (!call->func_parent) |
return -1; |
return -1; |
else |
else |
rpc_srv_delValsCall(call); | srv = call->func_parent; |
if (rpc_srv_getValsCall(call, &vals) == -1) | |
| if (AIT_TYPE(&iv[0]) != i32) |
return -1; |
return -1; |
|
|
RPC_SET_U8(&vals[0], srv->srv_session.sess_version); | srv->srv_blob.state = AIT_GET_I32(&iv[0]); |
RPC_SET_U32(&vals[1], srv->srv_session.sess_program); | return 0; |
RPC_SET_U32(&vals[2], srv->srv_session.sess_process); | } |
RPC_SET_I32(&vals[3], srv->srv_numcli); | |
| int |
| rpcBLOBServerClients(rpc_func_t *call, int ic, ait_val_t *iv) |
| { |
| rpc_srv_t *srv; |
| ait_val_t *v, *vals; |
| rpc_cli_t *cli; |
| register int i; |
| const char *str = NULL; |
| char wrk[INET6_ADDRSTRLEN]; |
| struct sockaddr_in *s; |
| struct sockaddr_in6 *s6; |
| struct sockaddr_un *su; |
| |
| RPC_CALLBACK_CHECK_INPUT(call); |
| if (!call->func_parent) |
| return -1; |
| else |
| srv = call->func_parent; |
| |
| if (!(vals = rpc_srv_returnVars(call, srv->srv_numcli))) |
| return -1; |
| |
| for (i = 0, cli = srv->srv_blob.clients, v = vals; i < srv->srv_numcli; i++, cli++) { |
| if (!cli->cli_sa.sa_family) { |
| AIT_SET_STR(v++, ""); |
| continue; |
| } |
| |
| switch (cli->cli_sa.sa_family) { |
| 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) |
| AIT_SET_STR(v++, (char*) str); |
| else |
| AIT_SET_STR(v++, "0.0.0.0"); |
| } |
|
|
return 0; |
return 0; |
} |
} |