Annotation of libaitrpc/src/lists.c, revision 1.18

1.2       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.18    ! misho       6: * $Id: lists.c,v 1.17.4.1 2015/07/02 22:20:48 misho Exp $
1.2       misho       7: *
                      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.17      misho      15: Copyright 2004 - 2015
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: */
                     46: #include "global.h"
                     47: 
                     48: 
1.18    ! misho      49: #pragma GCC visibility push(hidden)
        !            50: 
        !            51: static int
        !            52: rpc_funcs_cmp(struct tagRPCFunc *a, struct tagRPCFunc *b)
        !            53: {
        !            54:        int ret;
        !            55: 
        !            56:        assert(a && b);
        !            57: 
        !            58:        ret = AIT_KEY(&a->func_name) - AIT_KEY(&b->func_name);
        !            59: 
        !            60:        if (ret < 0)
        !            61:                return -1;
        !            62:        else if (ret > 0)
        !            63:                return 1;
        !            64: 
        !            65:        return ret;
        !            66: }
        !            67: 
        !            68: AVL_GENERATE(tagRPCFuncs, tagRPCFunc, func_node, rpc_funcs_cmp);
        !            69: 
        !            70: #pragma GCC visibility pop
        !            71: 
1.2       misho      72: /*
1.7       misho      73:  * rpc_srv_registerCall() - Register call to RPC server
                     74:  *
1.2       misho      75:  * @srv = RPC Server instance
1.10      misho      76:  * @tag = Function tag
                     77:  * @funcaddr = Function address
                     78:  * return: -1 error, 0 already registered tag or 1 register ok
1.2       misho      79:  */
                     80: int
1.10      misho      81: rpc_srv_registerCall(rpc_srv_t * __restrict srv, u_short tag, void *funcaddr)
1.2       misho      82: {
                     83:        rpc_func_t *func;
                     84: 
1.10      misho      85:        if (!srv || !funcaddr) {
1.7       misho      86:                rpc_SetErr(EINVAL, "Invalid parameter can`t register function");
1.2       misho      87:                return -1;
                     88:        }
1.10      misho      89: 
1.13      misho      90:        if (!(func = e_malloc(sizeof(rpc_func_t)))) {
1.2       misho      91:                LOGERR;
                     92:                return -1;
1.10      misho      93:        } else {
1.2       misho      94:                memset(func, 0, sizeof(rpc_func_t));
1.12      misho      95:                AIT_KEY(&func->func_name) = tag;
                     96:        }
                     97: 
                     98:        /* search for duplicate */
                     99:        if (AVL_FIND(tagRPCFuncs, &srv->srv_funcs, func)) {
1.13      misho     100:                e_free(func);
1.12      misho     101:                return 0;
1.2       misho     102:        }
                    103: 
1.12      misho     104:        func->func_parent = srv;
1.10      misho     105:        AIT_SET_PTR(&func->func_name, funcaddr, 0);
1.2       misho     106: 
1.7       misho     107:        /* add to list of functions */
1.12      misho     108:        RPC_FUNCS_LOCK(&srv->srv_funcs);
                    109:        SLIST_INSERT_HEAD(&srv->srv_funcs, func, func_next);
                    110:        AVL_INSERT(tagRPCFuncs, &srv->srv_funcs, func);
                    111:        RPC_FUNCS_UNLOCK(&srv->srv_funcs);
1.10      misho     112:        return 1;
1.2       misho     113: }
                    114: 
                    115: /*
1.7       misho     116:  * rpc_srv_unregisterCall() - Unregister call from RPC server
                    117:  *
1.2       misho     118:  * @srv = RPC Server instance
1.10      misho     119:  * @tag = Function tag
1.2       misho     120:  * return: -1 error, 0 not found call, 1 unregister ok
                    121:  */
                    122: int
1.10      misho     123: rpc_srv_unregisterCall(rpc_srv_t * __restrict srv, u_short tag)
1.2       misho     124: {
1.10      misho     125:        rpc_func_t *f;
1.2       misho     126: 
1.10      misho     127:        if (!srv) {
1.7       misho     128:                rpc_SetErr(EINVAL, "Invalid parameter can`t unregister function");
1.2       misho     129:                return -1;
1.10      misho     130:        }
1.2       misho     131: 
1.10      misho     132:        f = rpc_srv_getCall(srv, tag);
1.9       misho     133:        if (!f)                 /* not found element for unregister */
1.2       misho     134:                return 0;
                    135: 
1.12      misho     136:        RPC_FUNCS_LOCK(&srv->srv_funcs);
                    137:        AVL_REMOVE(tagRPCFuncs, &srv->srv_funcs, f);
                    138:        SLIST_REMOVE(&srv->srv_funcs, f, tagRPCFunc, func_next);
                    139:        RPC_FUNCS_UNLOCK(&srv->srv_funcs);
1.10      misho     140: 
1.7       misho     141:        AIT_FREE_VAL(&f->func_name);
1.13      misho     142:        e_free(f);
1.2       misho     143:        return 1;
                    144: }
                    145: 
                    146: /*
1.7       misho     147:  * rpc_srv_getCall()  - Get registered call from RPC server
                    148:  *
1.2       misho     149:  * @srv = RPC Server instance
                    150:  * @tag = tag for function
                    151:  * return: NULL not found call, !=NULL return call
                    152:  */
1.14      misho     153: rpc_func_t *
1.10      misho     154: rpc_srv_getCall(rpc_srv_t * __restrict srv, uint16_t tag)
1.2       misho     155: {
1.12      misho     156:        rpc_func_t tmp;
1.2       misho     157: 
                    158:        if (!srv) {
1.7       misho     159:                rpc_SetErr(EINVAL, "Invalid parameter can`t get function");
1.2       misho     160:                return NULL;
1.12      misho     161:        } else
                    162:                memset(&tmp, 0, sizeof tmp);
1.2       misho     163: 
1.12      misho     164:        AIT_KEY(&tmp.func_name) = tag;
                    165:        return AVL_FIND(tagRPCFuncs, &srv->srv_funcs, &tmp);
1.2       misho     166: }
                    167: 
1.10      misho     168: /* --------------------------------------------------------- */
1.2       misho     169: 
                    170: /*
1.7       misho     171:  * rpc_srv_getBLOB() - Get registered BLOB 
                    172:  *
1.2       misho     173:  * @srv = RPC Server instance
                    174:  * @var = hash for variable
                    175:  * return: NULL not found, !=NULL return blob var
                    176:  */
1.14      misho     177: rpc_blob_t *
1.2       misho     178: rpc_srv_getBLOB(rpc_srv_t * __restrict srv, uint32_t var)
                    179: {
1.10      misho     180:        rpc_blob_t *b, *tmp;
1.2       misho     181: 
                    182:        if (!srv) {
1.7       misho     183:                rpc_SetErr(EINVAL, "Invalid parameter can`t get BLOB variable");
1.2       misho     184:                return NULL;
                    185:        }
                    186: 
1.10      misho     187:        TAILQ_FOREACH_SAFE(b, &srv->srv_blob.blobs, blob_node, tmp)
1.2       misho     188:                if (b->blob_var == var)
                    189:                        break;
                    190: 
                    191:        return b;
                    192: }
                    193: 
                    194: /*
1.7       misho     195:  * rpc_srv_registerBLOB() - Register new BLOB to server
                    196:  *
1.2       misho     197:  * @srv = RPC Server instance
                    198:  * @len = BLOB length
1.15      misho     199:  * @tout = BLOB live timeout in seconds
1.2       misho     200:  * return: NULL error or new registered BLOB
                    201:  */
                    202: rpc_blob_t *
1.15      misho     203: rpc_srv_registerBLOB(rpc_srv_t * __restrict srv, size_t len, int tout)
1.2       misho     204: {
                    205:        rpc_blob_t *blob = NULL;
                    206: 
                    207:        if (!srv || !len) {
1.7       misho     208:                rpc_SetErr(EINVAL, "Invalid parameter can`t register BLOB variable");
1.2       misho     209:                return blob;
                    210:        }
                    211: 
1.15      misho     212:        blob = rpc_srv_blobCreate(srv, len, tout);
1.2       misho     213: 
1.10      misho     214:        TAILQ_INSERT_TAIL(&srv->srv_blob.blobs, blob, blob_node);
1.15      misho     215: 
1.2       misho     216:        return blob;
                    217: }
                    218: 
                    219: /*
1.7       misho     220:  * rpc_srv_unregisterBLOB() - Unregister BLOB from server
                    221:  *
1.2       misho     222:  * @srv = RPC Server instance
                    223:  * @var = BLOB Variable for unregister
                    224:  * return: -1 error, 0 not found call, 1 unregister ok
                    225:  */
                    226: int
                    227: rpc_srv_unregisterBLOB(rpc_srv_t * __restrict srv, uint32_t var)
                    228: {
1.10      misho     229:        rpc_blob_t *b;
1.2       misho     230: 
                    231:        if (!srv) {
1.7       misho     232:                rpc_SetErr(EINVAL, "Invalid parameter can`t unregister BLOB variable");
1.2       misho     233:                return -1;
                    234:        }
                    235: 
                    236:        b = rpc_srv_getBLOB(srv, var);
1.3       misho     237:        if (!b)                         /* not found element for unregister */
1.2       misho     238:                return 0;
                    239: 
1.10      misho     240:        TAILQ_REMOVE(&srv->srv_blob.blobs, b, blob_node);
                    241: 
1.2       misho     242:        rpc_srv_blobFree(srv, b);
1.13      misho     243:        e_free(b);
1.2       misho     244:        return 1;
                    245: }

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