File:  [ELWIX - Embedded LightWeight unIX -] / libaitrpc / src / lists.c
Revision 1.9.2.3: download - view: text, annotated - select for diffs - revision graph
Wed May 16 08:10:39 2012 UTC (12 years, 1 month ago) by misho
Branches: rpc3_3
Diff to: branchpoint 1.9: preferred, unified
... blob

    1: /*************************************************************************
    2: * (C) 2010 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com>
    3: *  by Michael Pounov <misho@openbsd-bg.org>
    4: *
    5: * $Author: misho $
    6: * $Id: lists.c,v 1.9.2.3 2012/05/16 08:10:39 misho Exp $
    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: 
   15: Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
   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: /*
   50:  * rpc_srv_registerCall() - Register call to RPC server
   51:  *
   52:  * @srv = RPC Server instance
   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
   57:  */
   58: int
   59: rpc_srv_registerCall(rpc_srv_t * __restrict srv, u_short tag, void *funcaddr, u_short args)
   60: {
   61: 	rpc_func_t *func;
   62: 
   63: 	if (!srv || !funcaddr) {
   64: 		rpc_SetErr(EINVAL, "Invalid parameter can`t register function");
   65: 		return -1;
   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;
   71: 	}
   72: 
   73: 	if (!(func = malloc(sizeof(rpc_func_t)))) {
   74: 		LOGERR;
   75: 		return -1;
   76: 	} else {
   77: 		memset(func, 0, sizeof(rpc_func_t));
   78: 		func->func_parent = srv;
   79: 	}
   80: 
   81: 	AIT_KEY(&func->func_name) = tag;
   82: 	AIT_SET_PTR(&func->func_name, funcaddr, 0);
   83: 
   84: 	/* allocate return variables */
   85: 	if (args > 0 && !(func->func_vars = io_allocVars(args))) {
   86: 		AIT_FREE_VAL(&func->func_name);
   87: 		free(func);
   88: 		return -1;
   89: 	}
   90: 
   91: 	/* add to list of functions */
   92: 	TAILQ_INSERT_TAIL(&srv->srv_funcs, func, func_node);
   93: 	return 1;
   94: }
   95: 
   96: /*
   97:  * rpc_srv_unregisterCall() - Unregister call from RPC server
   98:  *
   99:  * @srv = RPC Server instance
  100:  * @tag = Function tag
  101:  * return: -1 error, 0 not found call, 1 unregister ok
  102:  */
  103: int
  104: rpc_srv_unregisterCall(rpc_srv_t * __restrict srv, u_short tag)
  105: {
  106: 	rpc_func_t *f;
  107: 
  108: 	if (!srv) {
  109: 		rpc_SetErr(EINVAL, "Invalid parameter can`t unregister function");
  110: 		return -1;
  111: 	}
  112: 
  113: 	f = rpc_srv_getCall(srv, tag);
  114: 	if (!f) 		/* not found element for unregister */
  115: 		return 0;
  116: 
  117: 	TAILQ_REMOVE(&srv->srv_funcs, f, func_node);
  118: 
  119: 	io_freeVars(&f->func_vars);
  120: 	AIT_FREE_VAL(&f->func_name);
  121: 	free(f);
  122: 	return 1;
  123: }
  124: 
  125: /*
  126:  * rpc_srv_getCall()  - Get registered call from RPC server
  127:  *
  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 *
  133: rpc_srv_getCall(rpc_srv_t * __restrict srv, uint16_t tag)
  134: {
  135: 	rpc_func_t *f, *tmp;
  136: 
  137: 	if (!srv) {
  138: 		rpc_SetErr(EINVAL, "Invalid parameter can`t get function");
  139: 		return NULL;
  140: 	}
  141: 
  142: 	TAILQ_FOREACH_SAFE(f, &srv->srv_funcs, func_node, tmp)
  143: 		if (AIT_KEY(&f->func_name) == tag)
  144: 			break;
  145: 
  146: 	return f;
  147: }
  148: 
  149: /* --------------------------------------------------------- */
  150: 
  151: /*
  152:  * rpc_srv_getBLOB() - Get registered BLOB 
  153:  *
  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, *tmp;
  162: 
  163: 	if (!srv) {
  164: 		rpc_SetErr(EINVAL, "Invalid parameter can`t get BLOB variable");
  165: 		return NULL;
  166: 	}
  167: 
  168: 	TAILQ_FOREACH_SAFE(b, &srv->srv_blob.blobs, blob_node, tmp)
  169: 		if (b->blob_var == var)
  170: 			break;
  171: 
  172: 	return b;
  173: }
  174: 
  175: /*
  176:  * rpc_srv_registerBLOB() - Register new BLOB to server
  177:  *
  178:  * @srv = RPC Server instance
  179:  * @len = BLOB length
  180:  * return: NULL error or new registered BLOB
  181:  */
  182: rpc_blob_t *
  183: rpc_srv_registerBLOB(rpc_srv_t * __restrict srv, size_t len)
  184: {
  185: 	rpc_blob_t *blob = NULL;
  186: 
  187: 	if (!srv || !len) {
  188: 		rpc_SetErr(EINVAL, "Invalid parameter can`t register BLOB variable");
  189: 		return blob;
  190: 	}
  191: 
  192: 	blob = rpc_srv_blobCreate(srv, len);
  193: 
  194: 	TAILQ_INSERT_TAIL(&srv->srv_blob.blobs, blob, blob_node);
  195: 	return blob;
  196: }
  197: 
  198: /*
  199:  * rpc_srv_unregisterBLOB() - Unregister BLOB from server
  200:  *
  201:  * @srv = RPC Server instance
  202:  * @var = BLOB Variable for unregister
  203:  * return: -1 error, 0 not found call, 1 unregister ok
  204:  */
  205: int
  206: rpc_srv_unregisterBLOB(rpc_srv_t * __restrict srv, uint32_t var)
  207: {
  208: 	rpc_blob_t *b;
  209: 
  210: 	if (!srv) {
  211: 		rpc_SetErr(EINVAL, "Invalid parameter can`t unregister BLOB variable");
  212: 		return -1;
  213: 	}
  214: 
  215: 	b = rpc_srv_getBLOB(srv, var);
  216: 	if (!b)				/* not found element for unregister */
  217: 		return 0;
  218: 
  219: 	TAILQ_REMOVE(&srv->srv_blob.blobs, b, blob_node);
  220: 
  221: 	rpc_srv_blobFree(srv, b);
  222: 	free(b);
  223: 	return 1;
  224: }

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