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

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.9.2.1 ! misho       6: * $Id: lists.c,v 1.9 2012/05/14 08:39:06 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.7       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: */
                     46: #include "global.h"
                     47: 
                     48: 
                     49: /*
1.7       misho      50:  * rpc_srv_registerCall() - Register call to RPC server
                     51:  *
1.2       misho      52:  * @srv = RPC Server instance
1.9.2.1 ! misho      53:  * @tag = Function tag
        !            54:  * @funcaddr = Function address
        !            55:  * @args = Number of return function arguments
        !            56:  * return: -1 error, 0 already registered tag or 1 register ok
1.2       misho      57:  */
                     58: int
1.9.2.1 ! misho      59: rpc_srv_registerCall(rpc_srv_t * __restrict srv, u_short tag, void *funcaddr, u_short args)
1.2       misho      60: {
                     61:        rpc_func_t *func;
                     62: 
1.9.2.1 ! misho      63:        if (!srv || !funcaddr) {
1.7       misho      64:                rpc_SetErr(EINVAL, "Invalid parameter can`t register function");
1.2       misho      65:                return -1;
1.9.2.1 ! misho      66:        } else {
        !            67:                /* search for duplicate */
        !            68:                TAILQ_FOREACH(func, &srv->srv_funcs, func_node)
        !            69:                        if (AIT_KEY(&func->func_name) == tag)
        !            70:                                return 0;
1.2       misho      71:        }
1.9.2.1 ! misho      72: 
1.2       misho      73:        if (!(func = malloc(sizeof(rpc_func_t)))) {
                     74:                LOGERR;
                     75:                return -1;
1.9.2.1 ! misho      76:        } else {
1.2       misho      77:                memset(func, 0, sizeof(rpc_func_t));
1.9.2.1 ! misho      78:                func->func_parent = srv;
1.2       misho      79:        }
                     80: 
1.9.2.1 ! misho      81:        AIT_KEY(&func->func_name) = tag;
        !            82:        AIT_SET_PTR(&func->func_name, funcaddr, 0);
1.2       misho      83: 
1.7       misho      84:        /* allocate return variables */
1.9.2.1 ! misho      85:        if (args > 0 && !(func->func_vars = io_allocVars(args))) {
1.7       misho      86:                AIT_FREE_VAL(&func->func_name);
1.2       misho      87:                free(func);
                     88:                return -1;
                     89:        }
                     90: 
1.7       misho      91:        /* add to list of functions */
1.9.2.1 ! misho      92:        TAILQ_INSERT_TAIL(&srv->srv_funcs, func, func_node);
        !            93:        return 1;
1.2       misho      94: }
                     95: 
                     96: /*
1.7       misho      97:  * rpc_srv_unregisterCall() - Unregister call from RPC server
                     98:  *
1.2       misho      99:  * @srv = RPC Server instance
1.9.2.1 ! misho     100:  * @tag = Function tag
1.2       misho     101:  * return: -1 error, 0 not found call, 1 unregister ok
                    102:  */
                    103: int
1.9.2.1 ! misho     104: rpc_srv_unregisterCall(rpc_srv_t * __restrict srv, u_short tag)
1.2       misho     105: {
1.9.2.1 ! misho     106:        rpc_func_t *f;
1.2       misho     107: 
1.9.2.1 ! misho     108:        if (!srv) {
1.7       misho     109:                rpc_SetErr(EINVAL, "Invalid parameter can`t unregister function");
1.2       misho     110:                return -1;
1.9.2.1 ! misho     111:        }
1.2       misho     112: 
1.9.2.1 ! misho     113:        f = rpc_srv_getCall(srv, tag);
1.9       misho     114:        if (!f)                 /* not found element for unregister */
1.2       misho     115:                return 0;
                    116: 
1.9.2.1 ! misho     117:        TAILQ_REMOVE(&srv->srv_funcs, f, func_node);
        !           118: 
1.6       misho     119:        io_freeVars(&f->func_vars);
1.7       misho     120:        AIT_FREE_VAL(&f->func_name);
1.5       misho     121:        free(f);
1.2       misho     122:        return 1;
                    123: }
                    124: 
                    125: /*
1.7       misho     126:  * rpc_srv_getCall()  - Get registered call from RPC server
                    127:  *
1.2       misho     128:  * @srv = RPC Server instance
                    129:  * @tag = tag for function
                    130:  * return: NULL not found call, !=NULL return call
                    131:  */
                    132: inline rpc_func_t *
1.9.2.1 ! misho     133: rpc_srv_getCall(rpc_srv_t * __restrict srv, uint16_t tag)
1.2       misho     134: {
1.9.2.1 ! misho     135:        rpc_func_t *f, *tmp;
1.2       misho     136: 
                    137:        if (!srv) {
1.7       misho     138:                rpc_SetErr(EINVAL, "Invalid parameter can`t get function");
1.2       misho     139:                return NULL;
                    140:        }
                    141: 
1.9.2.1 ! misho     142:        TAILQ_FOREACH_SAFE(f, &srv->srv_funcs, func_node, tmp)
        !           143:                if (AIT_KEY(&f->func_name) == tag)
1.2       misho     144:                        break;
                    145: 
                    146:        return f;
                    147: }
                    148: 
1.9.2.1 ! misho     149: /* --------------------------------------------------------- */
1.2       misho     150: 
                    151: /*
1.7       misho     152:  * rpc_srv_getBLOB() - Get registered BLOB 
                    153:  *
1.2       misho     154:  * @srv = RPC Server instance
                    155:  * @var = hash for variable
                    156:  * return: NULL not found, !=NULL return blob var
                    157:  */
                    158: inline rpc_blob_t *
                    159: rpc_srv_getBLOB(rpc_srv_t * __restrict srv, uint32_t var)
                    160: {
                    161:        rpc_blob_t *b;
                    162: 
                    163:        if (!srv) {
1.7       misho     164:                rpc_SetErr(EINVAL, "Invalid parameter can`t get BLOB variable");
1.2       misho     165:                return NULL;
                    166:        }
                    167: 
                    168:        for (b = srv->srv_blob.blobs; b; b = b->blob_next) {
                    169:                if (b->blob_var == var)
                    170:                        break;
                    171:        }
                    172: 
                    173:        return b;
                    174: }
                    175: 
                    176: /*
1.7       misho     177:  * rpc_srv_registerBLOB() - Register new BLOB to server
                    178:  *
1.2       misho     179:  * @srv = RPC Server instance
                    180:  * @len = BLOB length
                    181:  * return: NULL error or new registered BLOB
                    182:  */
                    183: rpc_blob_t *
                    184: rpc_srv_registerBLOB(rpc_srv_t * __restrict srv, size_t len)
                    185: {
                    186:        rpc_blob_t *blob = NULL;
                    187: 
                    188:        if (!srv || !len) {
1.7       misho     189:                rpc_SetErr(EINVAL, "Invalid parameter can`t register BLOB variable");
1.2       misho     190:                return blob;
                    191:        }
                    192: 
                    193:        blob = rpc_srv_blobCreate(srv, len);
                    194:        if (blob) {
                    195:                blob->blob_next = srv->srv_blob.blobs;
                    196:                srv->srv_blob.blobs = blob;
                    197:        }
                    198: 
                    199:        return blob;
                    200: }
                    201: 
                    202: /*
1.7       misho     203:  * rpc_srv_unregisterBLOB() - Unregister BLOB from server
                    204:  *
1.2       misho     205:  * @srv = RPC Server instance
                    206:  * @var = BLOB Variable for unregister
                    207:  * return: -1 error, 0 not found call, 1 unregister ok
                    208:  */
                    209: int
                    210: rpc_srv_unregisterBLOB(rpc_srv_t * __restrict srv, uint32_t var)
                    211: {
                    212:        rpc_blob_t *b, *curr;
                    213: 
                    214:        if (!srv) {
1.7       misho     215:                rpc_SetErr(EINVAL, "Invalid parameter can`t unregister BLOB variable");
1.2       misho     216:                return -1;
                    217:        }
                    218: 
                    219:        b = rpc_srv_getBLOB(srv, var);
1.3       misho     220:        if (!b)                         /* not found element for unregister */
1.2       misho     221:                return 0;
1.5       misho     222:        /* if BLOB is unmapped force to unmap object */
                    223:        if (b->blob_data)
                    224:                rpc_srv_blobUnmap(b);
1.2       misho     225: 
1.3       misho     226:        if (srv->srv_blob.blobs == b) { /* if is 1st element */
1.2       misho     227:                srv->srv_blob.blobs = srv->srv_blob.blobs->blob_next;
                    228:        } else {
                    229:                for (curr = srv->srv_blob.blobs; curr->blob_next != b; curr = curr->blob_next);
                    230:                curr->blob_next = curr->blob_next->blob_next;
                    231:        }
                    232:        rpc_srv_blobFree(srv, b);
                    233:        free(b);
                    234: 
                    235:        return 1;
                    236: }

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