Annotation of libaitrpc/src/builtin.c, revision 1.7.2.9

1.1       misho       1: /*************************************************************************
                      2: * (C) 2010 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com>
                      3: *  by Michael Pounov <misho@openbsd-bg.org>
                      4: *
                      5: * $Author: misho $
1.7.2.9 ! misho       6: * $Id: builtin.c,v 1.7.2.8 2012/05/17 08:45:08 misho Exp $
1.1       misho       7: *
1.2       misho       8: **************************************************************************
                      9: The ELWIX and AITNET software is distributed under the following
                     10: terms:
                     11: 
                     12: All of the documentation and software included in the ELWIX and AITNET
                     13: Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
                     14: 
1.6       misho      15: Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
1.2       misho      16:        by Michael Pounov <misho@elwix.org>.  All rights reserved.
                     17: 
                     18: Redistribution and use in source and binary forms, with or without
                     19: modification, are permitted provided that the following conditions
                     20: are met:
                     21: 1. Redistributions of source code must retain the above copyright
                     22:    notice, this list of conditions and the following disclaimer.
                     23: 2. Redistributions in binary form must reproduce the above copyright
                     24:    notice, this list of conditions and the following disclaimer in the
                     25:    documentation and/or other materials provided with the distribution.
                     26: 3. All advertising materials mentioning features or use of this software
                     27:    must display the following acknowledgement:
                     28: This product includes software developed by Michael Pounov <misho@elwix.org>
                     29: ELWIX - Embedded LightWeight unIX and its contributors.
                     30: 4. Neither the name of AITNET nor the names of its contributors
                     31:    may be used to endorse or promote products derived from this software
                     32:    without specific prior written permission.
                     33: 
                     34: THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND
                     35: ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     36: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     37: ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     38: FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     39: DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     40: OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     41: HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     42: LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     43: OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     44: SUCH DAMAGE.
                     45: */
1.1       misho      46: #include "global.h"
                     47: 
                     48: 
                     49: /* builtin RPC server functions */
                     50: 
1.7.2.4   misho      51: static int
1.7.2.9 ! misho      52: rpcServerClients(rpc_cli_t *cli, struct tagRPCCall *rpc, array_t *iv)
1.1       misho      53: {
1.2       misho      54:        rpc_srv_t *srv;
1.7.2.9 ! misho      55:        rpc_cli_t *c;
1.1       misho      56:        register int i;
1.4       misho      57:        int len;
1.3       misho      58:        const char *str = NULL;
1.7.2.1   misho      59:        char *val;
                     60:        ait_val_t v;
1.1       misho      61: 
1.7.2.9 ! misho      62:        RPC_CALLBACK_CHECK_INPUT(cli);
        !            63:        srv = RPC_SRV_SERVER(cli);
1.2       misho      64: 
1.7.2.1   misho      65:        len = io_arraySize(srv->srv_clients) * STRSIZ;
1.4       misho      66:        if (!(val = malloc(len))) {
                     67:                LOGERR;
1.1       misho      68:                return -1;
1.4       misho      69:        } else
                     70:                memset(val, 0, len);
1.1       misho      71: 
1.7.2.1   misho      72:        for (i = 0; i < io_arraySize(srv->srv_clients); i++) {
1.7.2.9 ! misho      73:                c = io_array(srv->srv_clients, i, rpc_cli_t*);
        !            74:                if (!c)
1.1       misho      75:                        continue;
                     76: 
1.7.2.9 ! misho      77:                str = io_n2addr(&c->cli_sa, &v);
1.2       misho      78:                if (str)
1.4       misho      79:                        strlcat(val, (char*) str, len);
1.2       misho      80:                else
1.4       misho      81:                        strlcat(val, "0.0.0.0", len);
                     82:                strlcat(val, " ", len);
1.7.2.1   misho      83:                AIT_FREE_VAL(&v);
1.1       misho      84:        }
                     85: 
1.7.2.9 ! misho      86:        /* return values */
        !            87:        AIT_SET_STR(io_getVars(&RPC_RETVARS(cli), 0), val);
1.4       misho      88:        free(val);
1.1       misho      89:        return 0;
                     90: }
                     91: 
1.7.2.4   misho      92: static int
1.7.2.9 ! misho      93: rpcServerCalls(rpc_cli_t *cli, struct tagRPCCall *rpc, array_t *iv)
1.1       misho      94: {
1.2       misho      95:        rpc_srv_t *srv;
1.1       misho      96:        rpc_func_t *f;
1.7.2.1   misho      97:        register int i = 0;
1.4       misho      98:        int len;
                     99:        char *val, str[MAXPATHLEN];
1.1       misho     100: 
1.7.2.9 ! misho     101:        RPC_CALLBACK_CHECK_INPUT(cli);
        !           102:        srv = RPC_SRV_SERVER(cli);
1.1       misho     103: 
1.7.2.1   misho     104:        TAILQ_FOREACH(f, &srv->srv_funcs, func_node)
                    105:                i++;
1.4       misho     106:        len = i * STRSIZ;
                    107: 
                    108:        if (!(val = malloc(len))) {
                    109:                LOGERR;
1.1       misho     110:                return -1;
1.4       misho     111:        } else
                    112:                memset(val, 0, len);
1.1       misho     113: 
1.7.2.1   misho     114:        TAILQ_FOREACH(f, &srv->srv_funcs, func_node)
                    115:                if (AIT_ADDR(&f->func_name)) {
1.3       misho     116:                        memset(str, 0, sizeof str);
1.7.2.9 ! misho     117:                        snprintf(str, sizeof str, "/%hu/0x%p; ", AIT_KEY(&f->func_name), 
        !           118:                                        AIT_ADDR(&f->func_name));
1.4       misho     119:                        strlcat(val, str, len);
1.1       misho     120:                }
                    121: 
1.7.2.9 ! misho     122:        /* return variables */
        !           123:        AIT_SET_STR(io_getVars(&RPC_RETVARS(cli), 0), val);
1.4       misho     124:        free(val);
1.1       misho     125:        return 0;
                    126: }
                    127: 
1.7.2.4   misho     128: static int
1.7.2.9 ! misho     129: rpcServerSessions(rpc_cli_t *cli, struct tagRPCCall *rpc, array_t *iv)
1.1       misho     130: {
1.2       misho     131:        rpc_srv_t *srv;
1.1       misho     132: 
1.7.2.9 ! misho     133:        RPC_CALLBACK_CHECK_INPUT(cli);
        !           134:        srv = RPC_SRV_SERVER(cli);
1.1       misho     135: 
1.7.2.9 ! misho     136:        AIT_SET_I32(io_getVars(&RPC_RETVARS(cli), 3), io_arraySize(srv->srv_clients));
        !           137:        AIT_SET_U8(io_getVars(&RPC_RETVARS(cli), 0), srv->srv_session.sess_version);
        !           138:        AIT_SET_U32(io_getVars(&RPC_RETVARS(cli), 1), srv->srv_session.sess_program);
        !           139:        AIT_SET_U8(io_getVars(&RPC_RETVARS(cli), 2), srv->srv_session.sess_process);
1.1       misho     140: 
                    141:        return 0;
                    142: }
1.2       misho     143: 
1.7.2.4   misho     144: static int
1.7.2.9 ! misho     145: rpcServerShutdown(rpc_cli_t *cli, struct tagRPCCall *rpc, array_t *iv)
1.2       misho     146: {
                    147:        rpc_srv_t *srv;
                    148: 
1.7.2.9 ! misho     149:        RPC_CALLBACK_CHECK_INPUT(cli);
        !           150:        srv = RPC_SRV_SERVER(cli);
1.2       misho     151: 
1.7.2.2   misho     152:        srv->srv_kill = 1;
1.2       misho     153: 
                    154:        return 0;
                    155: }
                    156: 
1.7.2.6   misho     157: static int
1.7.2.9 ! misho     158: rpcServerPing(rpc_cli_t *cli, struct tagRPCCall *rpc, array_t *iv)
1.7.2.6   misho     159: {
1.7.2.8   misho     160:        if (rpc->call_req.flags == RPC_REPLY)
1.7.2.9 ! misho     161:                AIT_SET_U16(io_getVars(&RPC_RETVARS(cli), 0), ntohs(rpc->call_seq));
1.7.2.6   misho     162:        return 0;
                    163: }
                    164: 
1.7.2.1   misho     165: /* ---------------------------------------------------- */
1.2       misho     166: 
1.7.2.4   misho     167: static int
1.7.2.9 ! misho     168: rpcBLOBServerShutdown(rpc_cli_t *cli, struct tagRPCCall *rpc, array_t *iv)
1.2       misho     169: {
                    170:        rpc_srv_t *srv;
                    171: 
1.7.2.9 ! misho     172:        RPC_CALLBACK_CHECK_INPUT(cli);
        !           173:        srv = RPC_SRV_SERVER(cli);
1.2       misho     174: 
1.7.2.3   misho     175:        srv->srv_blob.kill = 1;
1.2       misho     176: 
                    177:        return 0;
                    178: }
                    179: 
1.7.2.4   misho     180: static int
1.7.2.9 ! misho     181: rpcBLOBServerVars(rpc_cli_t *cli, struct tagRPCCall *rpc, array_t *iv)
1.2       misho     182: {
                    183:        rpc_srv_t *srv;
                    184:        rpc_blob_t *b;
1.7.2.3   misho     185:        register int i = 0;
1.4       misho     186:        char *val, str[64];
                    187:        int len;
1.2       misho     188: 
1.7.2.9 ! misho     189:        RPC_CALLBACK_CHECK_INPUT(cli);
        !           190:        srv = RPC_SRV_SERVER(cli);
1.2       misho     191: 
1.7.2.3   misho     192:        if (srv->srv_blob.kill) {
1.7.2.9 ! misho     193:                AIT_SET_STR(io_getVars(&RPC_RETVARS(cli), 0), "BLOB Server is killed");
1.4       misho     194:                return 1;
                    195:        }
                    196: 
1.7.2.3   misho     197:        TAILQ_FOREACH(b, &srv->srv_blob.blobs, blob_node)
                    198:                i++;
1.4       misho     199:        len = i * sizeof str;
                    200: 
                    201:        if (!len) {
1.7.2.9 ! misho     202:                AIT_SET_STR(io_getVars(&RPC_RETVARS(cli), 0), "");
1.2       misho     203:                return 0;
                    204:        }
                    205: 
1.4       misho     206:        if (!(val = malloc(len))) {
                    207:                LOGERR;
                    208:                return -1;
                    209:        } else
                    210:                memset(val, 0, len);
                    211: 
1.7.2.3   misho     212:        TAILQ_FOREACH(b, &srv->srv_blob.blobs, blob_node) {
1.4       misho     213:                memset(str, 0, sizeof str);
                    214:                snprintf(str, sizeof str, "0x%0X(%lu)=%p ", b->blob_var, (u_long) b->blob_len, b->blob_data);
                    215:                strlcat(val, str, len);
                    216:        }
                    217: 
1.7.2.9 ! misho     218:        AIT_SET_STR(io_getVars(&RPC_RETVARS(cli), 0), val);
1.4       misho     219:        free(val);
1.2       misho     220:        return 0;
                    221: }
                    222: 
1.7.2.4   misho     223: static int
1.7.2.9 ! misho     224: rpcBLOBServerClients(rpc_cli_t *cli, struct tagRPCCall *rpc, array_t *iv)
1.2       misho     225: {
                    226:        rpc_srv_t *srv;
1.7.2.9 ! misho     227:        rpc_cli_t *c;
1.2       misho     228:        register int i;
1.4       misho     229:        int len;
1.3       misho     230:        const char *str = NULL;
1.7.2.3   misho     231:        char *val;
                    232:        ait_val_t v;
1.2       misho     233: 
1.7.2.9 ! misho     234:        RPC_CALLBACK_CHECK_INPUT(cli);
        !           235:        srv = RPC_SRV_SERVER(cli);
1.2       misho     236: 
1.7.2.3   misho     237:        if (srv->srv_blob.kill) {
1.7.2.9 ! misho     238:                AIT_SET_STR(io_getVars(&RPC_RETVARS(cli), 0), "BLOB Server is killed");
1.4       misho     239:                return 1;
                    240:        }
                    241: 
1.7.2.3   misho     242:        len = io_arraySize(srv->srv_blob.clients) * STRSIZ;
1.4       misho     243:        if (!(val = malloc(len))) {
                    244:                LOGERR;
1.2       misho     245:                return -1;
1.4       misho     246:        } else
                    247:                memset(val, 0, len);
1.2       misho     248: 
1.7.2.3   misho     249:        for (i = 0; i < io_arraySize(srv->srv_clients); i++) {
1.7.2.9 ! misho     250:                c = io_array(srv->srv_blob.clients, i, rpc_cli_t*);
        !           251:                if (!c)
1.2       misho     252:                        continue;
                    253: 
1.7.2.9 ! misho     254:                str = io_n2addr(&c->cli_sa, &v);
1.2       misho     255:                if (str)
1.4       misho     256:                        strlcat(val, (char*) str, len);
1.2       misho     257:                else
1.4       misho     258:                        strlcat(val, "0.0.0.0", len);
                    259:                strlcat(val, " ", len);
1.7.2.3   misho     260:                AIT_FREE_VAL(&v);
1.2       misho     261:        }
                    262: 
1.7.2.9 ! misho     263:        AIT_SET_STR(io_getVars(&RPC_RETVARS(cli), 0), val);
1.4       misho     264:        free(val);
1.2       misho     265:        return 0;
                    266: }
1.7.2.4   misho     267: 
                    268: /* ----------------------------------------------------------------- */
                    269: 
                    270: /*
1.7.2.7   misho     271:  * rpc_register_srvPing() - Register ping service function
                    272:  *
                    273:  * @srv = RPC server instance
                    274:  * return: -1 error or 0 ok
                    275:  */
                    276: inline int
                    277: rpc_register_srvPing(rpc_srv_t * __restrict srv)
                    278: {
                    279:        if (!srv)
                    280:                return -1;
                    281: 
1.7.2.9 ! misho     282:        if (rpc_srv_registerCall(srv, CALL_SRVPING, rpcServerPing) < 1)
1.7.2.7   misho     283:                return -1;
                    284: 
                    285:        return 0;
                    286: }
                    287: 
                    288: /*
1.7.2.4   misho     289:  * rpc_register_srvServices() - Register internal service functions
                    290:  *
                    291:  * @srv = RPC server instance
                    292:  * return: -1 error or 0 ok
                    293:  */
                    294: int
                    295: rpc_register_srvServices(rpc_srv_t * __restrict srv)
                    296: {
                    297:        if (!srv)
                    298:                return -1;
                    299: 
1.7.2.9 ! misho     300:        if (rpc_srv_registerCall(srv, CALL_SRVSHUTDOWN, rpcServerShutdown) < 1)
1.7.2.4   misho     301:                return -1;
1.7.2.9 ! misho     302:        if (rpc_srv_registerCall(srv, CALL_SRVCLIENTS, rpcServerClients) < 1)
1.7.2.4   misho     303:                return -1;
1.7.2.9 ! misho     304:        if (rpc_srv_registerCall(srv, CALL_SRVSESSIONS, rpcServerSessions) < 1)
1.7.2.4   misho     305:                return -1;
1.7.2.9 ! misho     306:        if (rpc_srv_registerCall(srv, CALL_SRVCALLS, rpcServerCalls) < 1)
1.7.2.4   misho     307:                return -1;
                    308: 
                    309:        return 0;
                    310: }
                    311: 
                    312: /*
                    313:  * rpc_register_blobServices() - Register internal service functions
                    314:  *
                    315:  * @srv = RPC server instance
                    316:  * return: -1 error or 0 ok
                    317:  */
                    318: int
                    319: rpc_register_blobServices(rpc_srv_t * __restrict srv)
                    320: {
                    321:        if (!srv)
                    322:                return -1;
                    323: 
1.7.2.9 ! misho     324:        if (rpc_srv_registerCall(srv, CALL_BLOBSHUTDOWN, rpcBLOBServerShutdown) < 1)
1.7.2.4   misho     325:                return -1;
1.7.2.9 ! misho     326:        if (rpc_srv_registerCall(srv, CALL_BLOBCLIENTS, rpcBLOBServerClients) < 1)
1.7.2.4   misho     327:                return -1;
1.7.2.9 ! misho     328:        if (rpc_srv_registerCall(srv, CALL_BLOBVARS, rpcBLOBServerVars) < 1)
1.7.2.4   misho     329:                return -1;
                    330: 
                    331:        return 0;
                    332: }

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