version 1.1.2.4, 2010/06/24 15:01:19
|
version 1.3.2.1, 2011/08/19 08:24:13
|
Line 1
|
Line 1
|
|
/************************************************************************* |
|
* (C) 2010 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com> |
|
* by Michael Pounov <misho@openbsd-bg.org> |
|
* |
|
* $Author$ |
|
* $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" |
|
|
|
|
/* |
/* |
* rpc_srv_retValsCall() Declare return variables for RPC call and zeroed values | * rpc_srv_returnVars() Init return variables for RPC call and zeroed values |
(for safe handling return values, use this!) |
(for safe handling return values, use this!) |
* @call = RPC function call |
* @call = RPC function call |
* @return_vals = Number of return variables | * @varnum = Number of return variables |
* return: NULL error, !=NULL array with return values for RPC call with return_vals items | * return: NULL error, !=NULL array with return values for RPC call with varnum items |
*/ |
*/ |
inline rpc_val_t * |
inline rpc_val_t * |
rpc_srv_retValsCall(rpc_func_t * __restrict call, int return_vals) | rpc_srv_returnVars(rpc_func_t * __restrict call, int varnum) |
{ |
{ |
rpc_val_t *v = NULL; |
rpc_val_t *v = NULL; |
|
|
if (rpc_srv_declValsCall(call, return_vals) == -1) | if (rpc_srv_allocVars(call, varnum) == -1) |
return NULL; |
return NULL; |
else |
else |
rpc_srv_zeroValsCall(call); | rpc_srv_zeroVars(call); |
if (rpc_srv_getValsCall(call, &v) == -1) | if (rpc_srv_getVars(call, &v) == -1) |
return NULL; |
return NULL; |
|
|
return v; |
return v; |
} |
} |
|
|
/* |
/* |
* rpc_srv_freeValsCall() Free return variables for RPC call | * rpc_srv_allocVars() Allocate array for call variables, |
| if already allocated memory for RPC call reallocate used space |
* @call = RPC function call |
* @call = RPC function call |
* return: none | * @varnum = Number of variables, if ==0 free previous allocated variables |
| * return: -1 error, !=-1 return varnum value |
*/ |
*/ |
inline void |
|
rpc_srv_freeValsCall(rpc_func_t * __restrict call) |
|
{ |
|
rpc_srv_declValsCall(call, 0); |
|
} |
|
|
|
/* |
|
* rpc_srv_declValsCall() Declare return variables for RPC call, |
|
if already allocated memory for RPC call return values |
|
function reallocate used space with return_vals count elements |
|
* @call = RPC function call |
|
* @return_vals = Number of return variables |
|
* return: -1 error, !=-1 ok |
|
*/ |
|
inline int |
inline int |
rpc_srv_declValsCall(rpc_func_t * __restrict call, int return_vals) | rpc_srv_allocVars(rpc_func_t * __restrict call, int varnum) |
{ |
{ |
void *ptr; |
void *ptr; |
|
|
if (!call || return_vals < 0) { | if (!call || varnum < 0) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t declare return variables for RPC call...\n"); | rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t allocate variables for RPC call...\n"); |
return -1; |
return -1; |
} else |
} else |
call->func_args = return_vals; | call->func_args = varnum; |
|
|
if (!return_vals) { | if (!varnum) { |
if (call->func_vals) { | if (call->func_vars) { |
free(call->func_vals); | free(call->func_vars); |
call->func_vals = NULL; | call->func_vars = NULL; |
} |
} |
} else { |
} else { |
ptr = realloc(call->func_vals, return_vals * sizeof(rpc_val_t)); | ptr = realloc(call->func_vars, varnum * sizeof(rpc_val_t)); |
if (!ptr) { |
if (!ptr) { |
LOGERR; |
LOGERR; |
|
call->func_args = 0; |
return -1; |
return -1; |
} else |
} else |
call->func_vals = ptr; | call->func_vars = ptr; |
} |
} |
|
|
return call->func_args; | return varnum; |
} |
} |
|
|
/* |
/* |
* rpc_srv_zeroValsCall() Clean values from return variables of RPC call | * rpc_srv_zeroVars() Clean values from variables of RPC call |
* @call = RPC function call |
* @call = RPC function call |
* return: -1 error, !=-1 Returned number of cleaned RPC variables |
* return: -1 error, !=-1 Returned number of cleaned RPC variables |
*/ |
*/ |
inline int |
inline int |
rpc_srv_zeroValsCall(rpc_func_t * __restrict call) | rpc_srv_zeroVars(rpc_func_t * __restrict call) |
{ |
{ |
if (!call) { |
if (!call) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t delete return variables ...\n"); | rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t delete variables ...\n"); |
return -1; |
return -1; |
} |
} |
|
|
memset(call->func_vals, 0, call->func_args * sizeof(rpc_val_t)); | memset(call->func_vars, 0, call->func_args * sizeof(rpc_val_t)); |
return call->func_args; |
return call->func_args; |
} |
} |
|
|
/* |
/* |
* rpc_srv_copyValsCall() Copy return variables for RPC call to new variable | * rpc_srv_copyVars() Copy variables for RPC call to new variable array |
* @call = RPC function call |
* @call = RPC function call |
* @newvals = New allocated variables array, must be free after use | * @newvars = New allocated variables array, must be free after use |
* return: -1 error, !=-1 Returned number of copied RPC variables |
* return: -1 error, !=-1 Returned number of copied RPC variables |
*/ |
*/ |
inline int |
inline int |
rpc_srv_copyValsCall(rpc_func_t * __restrict call, rpc_val_t ** __restrict newvals) | rpc_srv_copyVars(rpc_func_t * __restrict call, rpc_val_t ** __restrict newvars) |
{ |
{ |
if (!call || !newvals) { | if (!call || !newvars) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t copy return variables to new array\n"); | rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t copy variables to new array\n"); |
return -1; |
return -1; |
} |
} |
|
|
*newvals = calloc(call->func_args, sizeof(rpc_val_t)); | *newvars = calloc(call->func_args, sizeof(rpc_val_t)); |
if (!*newvals) { | if (!*newvars) { |
LOGERR; |
LOGERR; |
return -1; |
return -1; |
} else |
} else |
memcpy(*newvals, call->func_vals, call->func_args * sizeof(rpc_val_t)); | memcpy(*newvars, call->func_vars, call->func_args * sizeof(rpc_val_t)); |
|
|
return call->func_args; |
return call->func_args; |
} |
} |
|
|
/* |
/* |
* rpc_srv_getValsCall() Get return variables for RPC call | * rpc_srv_getVars() Get variables array for RPC call |
* @call = RPC function call |
* @call = RPC function call |
* @vals = Returned variables, may be NULL | * @vars = Returned variables array, may be NULL |
* return: -1 error, !=-1 Number of returned variables |
* return: -1 error, !=-1 Number of returned variables |
*/ |
*/ |
inline int |
inline int |
rpc_srv_getValsCall(rpc_func_t * __restrict call, rpc_val_t ** __restrict vals) | rpc_srv_getVars(rpc_func_t * __restrict call, rpc_val_t ** __restrict vars) |
{ |
{ |
if (!call) { |
if (!call) { |
rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t get return variables ...\n"); | rpc_SetErr(EINVAL, "Error:: Invalid parameter can`t get variables ...\n"); |
return -1; |
return -1; |
} |
} |
|
|
if (vals) | if (vars) |
*vals = call->func_vals; | *vars = call->func_vars; |
return call->func_args; |
return call->func_args; |
} |
} |
|
|
Line 137 rpc_srv_getValsCall(rpc_func_t * __restrict call, rpc_
|
Line 171 rpc_srv_getValsCall(rpc_func_t * __restrict call, rpc_
|
* @srv = RPC Server instance |
* @srv = RPC Server instance |
* @csModule = Module name, if NULL self binary |
* @csModule = Module name, if NULL self binary |
* @csFunc = Function name |
* @csFunc = Function name |
* @args = Number of function arguments | * @args = Number of return function arguments, use for restriction case! |
* return: -1 error or 0 register ok |
* return: -1 error or 0 register ok |
*/ |
*/ |
int |
int |
Line 170 rpc_srv_registerCall(rpc_srv_t * __restrict srv, const
|
Line 204 rpc_srv_registerCall(rpc_srv_t * __restrict srv, const
|
|
|
func->func_parent = srv; |
func->func_parent = srv; |
|
|
if (rpc_srv_declValsCall(func, args) == -1) { | if (args > 0 && rpc_srv_allocVars(func, args) == -1) { |
free(func); |
free(func); |
return -1; |
return -1; |
} |
} |
Line 213 rpc_srv_unregisterCall(rpc_srv_t * __restrict srv, con
|
Line 247 rpc_srv_unregisterCall(rpc_srv_t * __restrict srv, con
|
func.func_hash = hash_fnv((char*) str, MAXPATHLEN + UCHAR_MAX + 1); |
func.func_hash = hash_fnv((char*) str, MAXPATHLEN + UCHAR_MAX + 1); |
|
|
f = rpc_srv_getCall(srv, func.func_tag, func.func_hash); |
f = rpc_srv_getCall(srv, func.func_tag, func.func_hash); |
if (!f) // not found element for unregister | if (!f) /* not found element for unregister */ |
return 0; |
return 0; |
|
|
pthread_mutex_lock(&srv->srv_mtx); |
pthread_mutex_lock(&srv->srv_mtx); |
if (srv->srv_funcs == f) { // if is 1st element | if (srv->srv_funcs == f) { /* if is 1st element */ |
srv->srv_funcs = srv->srv_funcs->func_next; |
srv->srv_funcs = srv->srv_funcs->func_next; |
|
|
if (f->func_args && f->func_vals) | if (f->func_args && f->func_vars) |
free(f->func_vals); | free(f->func_vars); |
free(f); |
free(f); |
} else { |
} else { |
for (curr = srv->srv_funcs; curr->func_next != f; curr = curr->func_next); |
for (curr = srv->srv_funcs; curr->func_next != f; curr = curr->func_next); |
curr->func_next = curr->func_next->func_next; |
curr->func_next = curr->func_next->func_next; |
|
|
if (f->func_args && f->func_vals) | if (f->func_args && f->func_vars) |
free(f->func_vals); | free(f->func_vars); |
free(f); |
free(f); |
} |
} |
pthread_mutex_unlock(&srv->srv_mtx); |
pthread_mutex_unlock(&srv->srv_mtx); |
Line 311 rpc_srv_getBLOB(rpc_srv_t * __restrict srv, uint32_t v
|
Line 345 rpc_srv_getBLOB(rpc_srv_t * __restrict srv, uint32_t v
|
return NULL; |
return NULL; |
} |
} |
|
|
for (b = srv->srv_blob.blobs; b; b = b->blob_next) | pthread_mutex_lock(&srv->srv_blob.mtx); |
| for (b = srv->srv_blob.blobs; b; b = b->blob_next) { |
if (b->blob_var == var) |
if (b->blob_var == var) |
break; |
break; |
|
} |
|
pthread_mutex_unlock(&srv->srv_blob.mtx); |
|
|
return b; |
return b; |
} |
} |
Line 322 rpc_srv_getBLOB(rpc_srv_t * __restrict srv, uint32_t v
|
Line 359 rpc_srv_getBLOB(rpc_srv_t * __restrict srv, uint32_t v
|
* rpc_srv_registerBLOB() Register new BLOB to server |
* rpc_srv_registerBLOB() Register new BLOB to server |
* @srv = RPC Server instance |
* @srv = RPC Server instance |
* @len = BLOB length |
* @len = BLOB length |
* return: -1 error or 0 register ok | * return: NULL error or new registered BLOB |
*/ |
*/ |
rpc_blob_t * |
rpc_blob_t * |
rpc_srv_registerBLOB(rpc_srv_t * __restrict srv, size_t len) |
rpc_srv_registerBLOB(rpc_srv_t * __restrict srv, size_t len) |
Line 362 rpc_srv_unregisterBLOB(rpc_srv_t * __restrict srv, uin
|
Line 399 rpc_srv_unregisterBLOB(rpc_srv_t * __restrict srv, uin
|
} |
} |
|
|
b = rpc_srv_getBLOB(srv, var); |
b = rpc_srv_getBLOB(srv, var); |
if (!b) // not found element for unregister | if (!b) /* not found element for unregister */ |
return 0; |
return 0; |
|
|
pthread_mutex_lock(&srv->srv_blob.mtx); |
pthread_mutex_lock(&srv->srv_blob.mtx); |
if (srv->srv_blob.blobs == b) { // if is 1st element | if (srv->srv_blob.blobs == b) { /* if is 1st element */ |
srv->srv_blob.blobs = srv->srv_blob.blobs->blob_next; |
srv->srv_blob.blobs = srv->srv_blob.blobs->blob_next; |
} else { |
} else { |
for (curr = srv->srv_blob.blobs; curr->blob_next != b; curr = curr->blob_next); |
for (curr = srv->srv_blob.blobs; curr->blob_next != b; curr = curr->blob_next); |