--- libaitrpc/src/aitrpc.c 2010/06/18 01:48:06 1.1 +++ libaitrpc/src/aitrpc.c 2013/08/23 13:53:15 1.11 @@ -3,47 +3,261 @@ * by Michael Pounov * * $Author: misho $ -* $Id: aitrpc.c,v 1.1 2010/06/18 01:48:06 misho Exp $ +* $Id: aitrpc.c,v 1.11 2013/08/23 13:53:15 misho Exp $ * -*************************************************************************/ +************************************************************************** +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 + +Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013 + by Michael Pounov . 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 +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" #pragma GCC visibility push(hidden) -// ------------------------------------------------ - int rpc_Errno; char rpc_Error[STRSIZ]; +inline int +rpc_funcs_cmp(struct tagRPCFunc *a, struct tagRPCFunc *b) +{ + int ret; + + assert(a && b); + + ret = AIT_KEY(&a->func_name) - AIT_KEY(&b->func_name); + + if (ret < 0) + return -1; + else if (ret > 0) + return 1; + + return ret; +} + +AVL_GENERATE(tagRPCFuncs, tagRPCFunc, func_node, rpc_funcs_cmp); + #pragma GCC visibility pop // rpc_GetErrno() Get error code of last operation -inline int +int rpc_GetErrno() { return rpc_Errno; } // rpc_GetError() Get error text of last operation -inline const char * +const char * rpc_GetError() { return rpc_Error; } // rpc_SetErr() Set error to variables for internal use!!! -inline void +void rpc_SetErr(int eno, char *estr, ...) { va_list lst; rpc_Errno = eno; - memset(rpc_Error, 0, STRSIZ); + memset(rpc_Error, 0, sizeof rpc_Error); va_start(lst, estr); - vsnprintf(rpc_Error, STRSIZ, estr, lst); + vsnprintf(rpc_Error, sizeof rpc_Error, estr, lst); va_end(lst); } -// ------------------------------------------------------------ +/* + * rpc_chkPktSession() - Check RPC session + * + * @p = packet session + * @s = active session + * return: -1, 1, 2, 3 are errors or 0 ok + */ +int +rpc_chkPktSession(rpc_sess_t *p, rpc_sess_t *s) +{ + if (!p || !s) + return -1; + + if (p->sess_version != s->sess_version) + return 1; + if (p->sess_instance != s->sess_instance) + return 2; + + return 0; +} + +/* + * rpc_addPktSession() - Prepare session into network format + * + * @p = packet session + * @s = host session + * return: -1 error or 0 ok + */ +int +rpc_addPktSession(rpc_sess_t *p, rpc_sess_t *s) +{ + if (!p || !s) + return -1; + + p->sess_version = s->sess_version; + p->sess_instance = s->sess_instance; + + return 0; +} + +/* + * rpc_Read() - RPC read operation + * + * @sock = socket + * @type = type of socket + * @flags = receive flags + * @sa = check client address, if you use udp protocol + * @buf = buffer + * @blen = buffer length + * return: -1 error or >-1 readed bytes into buffer + */ +ssize_t +rpc_Read(int sock, int type, int flags, sockaddr_t * __restrict sa, + u_char * __restrict buf, size_t blen) +{ + struct pollfd pfd; + sockaddr_t sa2; + socklen_t salen; + int ret = 0, len; + + pfd.fd = sock; + pfd.events = POLLIN | POLLPRI; + memset(buf, 0, blen); + memset(&sa2, 0, sizeof sa2); + salen = sa2.ss.ss_len = sizeof(sockaddr_t); + + if (type == SOCK_STREAM) { + for (len = blen; len > 0; len -= ret, buf += ret) { + if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || + pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) { + LOGERR; + return -1; + } else + ret = recv(sock, buf, len, flags); + if (ret == -1) { + LOGERR; + return -1; + } + } + if (ret > -1) + ret = blen - len; + } else { + do { + if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || + pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) { + LOGERR; + return -1; + } else + ret = recvfrom(sock, buf, blen, flags, &sa2.sa, &salen); + if (ret < 0) { + LOGERR; + return -1; + } + if (e_addrcmp(sa, &sa2, 42)) + rpc_SetErr(ERPCMISMATCH, "Received RPC response from unknown address"); + else + break; + } while (42); + } + + return ret; +} + +/* + * rpc_Write() - RPC write operation + * + * @sock = socket + * @type = type of socket + * @flags = send flags + * @sa = send to client address, if you use udp protocol + * @buf = buffer + * @blen = buffer length + * return: -1 error or >-1 written bytes into buffer + */ +ssize_t +rpc_Write(int sock, int type, int flags, sockaddr_t * __restrict sa, + u_char * __restrict buf, size_t blen) +{ + struct pollfd pfd; + int ret = 0, len = 0; + + pfd.fd = sock; + pfd.events = POLLOUT; + + if (type == SOCK_STREAM) { + for (len = blen; len > 0; len -= ret, buf += ret) { + if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || + pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) { + LOGERR; + return -1; + } else + ret = send(sock, buf, len, flags); + if (ret == -1) { + LOGERR; + return -1; + } + } + if (ret > -1) + ret = blen - len; + } else if (sa) { + if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || + pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) { + LOGERR; + return -1; + } else + ret = sendto(sock, buf, blen, flags, &sa->sa, sa->sa.sa_len); + } else { + rpc_SetErr(EINVAL, "Invalid argument(s)!"); + return -1; + } + if (ret == -1) { + LOGERR; + return -1; + } else if (ret != blen) { + rpc_SetErr(EPROCUNAVAIL, "RPC request, should be send %d bytes, " + "really sended %d bytes", len, ret); + return -1; + } + + return ret; +}