File:  [ELWIX - Embedded LightWeight unIX -] / libaitrpc / src / blob.c
Revision 1.13: download - view: text, annotated - select for diffs - revision graph
Thu May 30 09:22:01 2013 UTC (11 years, 1 month ago) by misho
Branches: MAIN
CVS tags: rpc5_3, RPC5_2, HEAD
version 5.2

    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: blob.c,v 1.13 2013/05/30 09:22:01 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, 2013
   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_blobCreate() - Create and map blob to memory region and return object
   51:  *
   52:  * @srv = RPC Server instance
   53:  * @len = BLOB length object
   54:  * return: NULL error or !=NULL allocated BLOB object
   55:  */
   56: rpc_blob_t *
   57: rpc_srv_blobCreate(rpc_srv_t * __restrict srv, int len)
   58: {
   59: 	rpc_blob_t *blob = NULL;
   60: 	char szFName[MAXPATHLEN];
   61: 	int f;
   62: 	u_int rnd;
   63: 
   64: again:
   65: 	rnd = random() % UINT_MAX;
   66: 
   67: 	memset(szFName, 0, sizeof szFName);
   68: 	snprintf(szFName, sizeof szFName, BLOB_FILE, AIT_GET_STRZ(&srv->srv_blob.dir), rnd);
   69: 	f = open(szFName, O_CREAT | O_EXCL | O_RDWR, 0600);
   70: 	if (f == -1) {
   71: 		if (errno == EEXIST)
   72: 			goto again;
   73: 
   74: 		LOGERR;
   75: 		return NULL;
   76: 	}
   77: 	if (ftruncate(f, len) == -1) {
   78: 		LOGERR;
   79: 		close(f);
   80: 		unlink(szFName);
   81: 		return NULL;
   82: 	}
   83: 
   84: 	blob = e_malloc(sizeof(rpc_blob_t));
   85: 	if (!blob) {
   86: 		LOGERR;
   87: 		close(f);
   88: 		unlink(szFName);
   89: 		return NULL;
   90: 	}
   91: 
   92: 	blob->blob_data = mmap(NULL, len, PROT_READ | PROT_WRITE, MAP_SHARED, f, 0);
   93: 	if (blob->blob_data == MAP_FAILED) {
   94: 		LOGERR;
   95: 		e_free(blob);
   96: 		close(f);
   97: 		unlink(szFName);
   98: 		return NULL;
   99: 	} else
  100: 		close(f);
  101: 
  102: 	blob->blob_len = len;
  103: 	blob->blob_var = rnd;
  104: 	return blob;
  105: }
  106: 
  107: /*
  108:  * rpc_srv_blobMap() - Map blob to memory region 
  109:  *
  110:  * @srv = RPC Server instance
  111:  * @blob = Map to this BLOB element
  112:  * return: -1 error or 0 ok
  113:  */
  114: int
  115: rpc_srv_blobMap(rpc_srv_t * __restrict srv, rpc_blob_t * __restrict blob)
  116: {
  117: 	int f;
  118: 	char szFName[MAXPATHLEN];
  119: 
  120: 	if (!blob) {
  121: 		rpc_SetErr(EINVAL, "Invalid argument BLOB");
  122: 		return -1;
  123: 	}
  124: 	if (blob->blob_data) {
  125: 		rpc_SetErr(EPERM, "Already mmapped object found!");
  126: 		return -1;
  127: 	}
  128: 
  129: 	memset(szFName, 0, sizeof szFName);
  130: 	snprintf(szFName, sizeof szFName, BLOB_FILE, AIT_GET_STRZ(&srv->srv_blob.dir), blob->blob_var);
  131: 	f = open(szFName, O_RDWR);
  132: 	if (f == -1) {
  133: 		LOGERR;
  134: 		return -1;
  135: 	}
  136: 
  137: 	blob->blob_data = mmap(NULL, blob->blob_len, PROT_READ | PROT_WRITE, MAP_SHARED, f, 0);
  138: 	if (blob->blob_data == MAP_FAILED) {
  139: 		LOGERR;
  140: 		close(f);
  141: 		blob->blob_data = NULL;
  142: 		return -1;
  143: 	} else {
  144: 		close(f);
  145: 
  146: 		madvise(blob->blob_data, blob->blob_len, MADV_SEQUENTIAL);
  147: 	}
  148: 
  149: 	return 0;
  150: }
  151: 
  152: /*
  153:  * rpc_srv_blobUnmap() - Unmap blob memory region 
  154:  *
  155:  * @blob = Mapped BLOB element
  156:  * return: none
  157:  */
  158: void
  159: rpc_srv_blobUnmap(rpc_blob_t * __restrict blob)
  160: {
  161: 	if (blob && blob->blob_data) {
  162: 		munmap(blob->blob_data, blob->blob_len);
  163: 		blob->blob_data = NULL;
  164: 	}
  165: }
  166: 
  167: /*
  168:  * rpc_srv_blobFree() - Free blob from disk & memory
  169:  *
  170:  * @srv = RPC Server instance
  171:  * @blob = Mapped BLOB element
  172:  * return: -1 error or 0 ok
  173:  */
  174: int
  175: rpc_srv_blobFree(rpc_srv_t * __restrict srv, rpc_blob_t * __restrict blob)
  176: {
  177: 	char szFName[MAXPATHLEN];
  178: 
  179: 	if (!blob) {
  180: 		rpc_SetErr(EINVAL, "Invalid argument BLOB");
  181: 		return -1;
  182: 	} else
  183: 		rpc_srv_blobUnmap(blob);
  184: 
  185: 	memset(szFName, 0, sizeof szFName);
  186: 	snprintf(szFName, sizeof szFName, BLOB_FILE, AIT_GET_STRZ(&srv->srv_blob.dir), blob->blob_var);
  187: 	if (unlink(szFName) == -1) {
  188: 		LOGERR;
  189: 		return -1;
  190: 	}
  191: 
  192: 	return 0;
  193: }
  194: 
  195: /* ------------------------------------------------------------ */
  196: 
  197: /*
  198:  * rpc_srv_sendBLOB() - Send mapped BLOB to client
  199:  *
  200:  * @cli = Client instance
  201:  * @blob = Mapped BLOB element
  202:  * return: -1 error, 0 ok
  203:  */
  204: int
  205: rpc_srv_sendBLOB(rpc_cli_t * __restrict cli, rpc_blob_t * __restrict blob)
  206: {
  207: 	int ret, len;
  208: 	uint8_t *pos;
  209: 
  210: 	if (!cli || !blob || !blob->blob_data) {
  211: 		rpc_SetErr(EINVAL, "Invalid arguments");
  212: 		return -1;
  213: 	}
  214: 
  215: 	for (ret = blob->blob_len, pos = blob->blob_data; ret > 0; ret -= len, pos += len) {
  216: 		len = send(cli->cli_sock, pos, ret, MSG_NOSIGNAL);
  217: 		if (len == -1) {
  218: 			LOGERR;
  219: 			return -1;
  220: 		}
  221: 	}
  222: 
  223: 	return ret;
  224: }
  225: 
  226: /*
  227:  * rpc_srv_recvBLOB() - Receive BLOB from client
  228:  *
  229:  * @cli = Client instance
  230:  * @blob = Mapped BLOB element
  231:  * return: -1 error, 0 ok, >0 unreceived data from client, may be error?
  232:  */
  233: int
  234: rpc_srv_recvBLOB(rpc_cli_t * __restrict cli, rpc_blob_t * __restrict blob)
  235: {
  236: 	int ret, len;
  237: 	uint8_t *pos;
  238: 	struct pollfd pfd;
  239: 
  240: 	if (!cli || !blob || !blob->blob_data) {
  241: 		rpc_SetErr(EINVAL, "Invalid arguments");
  242: 		return -1;
  243: 	}
  244: 
  245: 	pfd.fd = cli->cli_sock;
  246: 	pfd.events = POLLIN | POLLPRI;
  247: 	for (ret = blob->blob_len, pos = blob->blob_data; ret > 0; ret -= len, pos += len) {
  248: 		if ((len = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || 
  249: 				pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
  250: 			if (len)
  251: 				LOGERR;
  252: 			else
  253: 				rpc_SetErr(ETIMEDOUT, "Timeout reached! Server not respond");
  254: 			return -1;
  255: 		}
  256: 
  257: 		len = recv(cli->cli_sock, pos, ret, 0);
  258: 		if (len == -1) {
  259: 			LOGERR;
  260: 			return -1;
  261: 		}
  262: 	}
  263: 
  264: 	return ret;
  265: }
  266: 
  267: /* ------------------------------------------------------------ */
  268: 
  269: /*
  270:  * rpc_cli_sendBLOB() - Send BLOB to server
  271:  *
  272:  * @cli = Client instance
  273:  * @var = BLOB variable
  274:  * @data = BLOB data
  275:  * return: -1 error, 0 ok, 1 remote error
  276:  */
  277: int
  278: rpc_cli_sendBLOB(rpc_cli_t * __restrict cli, ait_val_t * __restrict var, void * __restrict data)
  279: {
  280: 	int ret, len;
  281: 	uint8_t *pos;
  282: 	struct tagBLOBHdr hdr;
  283: 	struct pollfd pfd;
  284: 
  285: 	if (!cli || !var || !data) {
  286: 		rpc_SetErr(EINVAL, "Invalid arguments");
  287: 		return -1;
  288: 	} else
  289: 		memset(&hdr, 0, sizeof hdr);
  290: 
  291: 	rpc_addPktSession(&hdr.hdr_session, cli->cli_parent);
  292: 	hdr.hdr_cmd = set;
  293: 	hdr.hdr_var = 0;
  294: 	hdr.hdr_ret = 0;
  295: 	hdr.hdr_len = htonl(AIT_LEN(var));
  296: 
  297: 	/* send SET request */
  298: 	pfd.fd = cli->cli_sock;
  299: 	pfd.events = POLLOUT;
  300: 	if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) == -1 || 
  301: 			pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
  302: 		LOGERR;
  303: 		return -1;
  304: 	}
  305: 	if (send(cli->cli_sock, &hdr, sizeof hdr, MSG_NOSIGNAL) == -1) {
  306: 		LOGERR;
  307: 		return -1;
  308: 	}
  309: 
  310: 	/* send BLOB to server */
  311: 	for (ret = AIT_LEN(var), pos = data; ret > 0; ret -= len, pos += len)
  312: 		if ((len = send(cli->cli_sock, pos, ret, MSG_NOSIGNAL)) == -1) {
  313: 			LOGERR;
  314: 			return -1;
  315: 		}
  316: 
  317: 	/* wait for reply */
  318: 	pfd.events = POLLIN | POLLPRI;
  319: 	if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || 
  320: 			pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
  321: 		if (ret)
  322: 			LOGERR;
  323: 		else
  324: 			rpc_SetErr(ETIMEDOUT, "Timeout reached! Server not respond");
  325: 		return -1;
  326: 	}
  327: 	if (recv(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) {
  328: 		LOGERR;
  329: 		return 1;
  330: 	}
  331: 
  332: 	if (hdr.hdr_cmd != error) {
  333: 		if (ntohl(hdr.hdr_len) != AIT_LEN(var)) {
  334: 			rpc_SetErr(ECANCELED, "Bad return length packet");
  335: 			return 1;
  336: 		}
  337: 
  338: 		AIT_SET_BLOB(var, ntohl(hdr.hdr_var), ntohl(hdr.hdr_len));
  339: 	}
  340: 
  341: 	return hdr.hdr_cmd == error;
  342: }
  343: 
  344: /*
  345:  * rpc_cli_recvBLOB() - Receive BLOB from server
  346:  *
  347:  * @cli = Client instance
  348:  * @var = BLOB variable
  349:  * @data = BLOB data, must be e_free after use!
  350:  * return: -1 error, 0 ok, 1 remote error
  351:  */
  352: int
  353: rpc_cli_recvBLOB(rpc_cli_t * __restrict cli, ait_val_t * __restrict var, void ** __restrict data)
  354: {
  355: 	int ret, len;
  356: 	uint8_t *pos;
  357: 	struct pollfd pfd;
  358: 	struct tagBLOBHdr hdr;
  359: 
  360: 	if (!cli || !var || !data) {
  361: 		rpc_SetErr(EINVAL, "Invalid arguments");
  362: 		return -1;
  363: 	}
  364: 
  365: 	*data = e_malloc(AIT_LEN(var));
  366: 	if (!*data) {
  367: 		LOGERR;
  368: 		return -1;
  369: 	} else {
  370: 		memset(&hdr, 0, sizeof hdr);
  371: 		memset(*data, 0, AIT_LEN(var));
  372: 	}
  373: 
  374: 	rpc_addPktSession(&hdr.hdr_session, cli->cli_parent);
  375: 	hdr.hdr_cmd = get;
  376: 	hdr.hdr_var = htonl((uint32_t) AIT_GET_BLOB(var));
  377: 	hdr.hdr_ret = 0;
  378: 	hdr.hdr_len = 0;
  379: 
  380: 	/* send GET request */
  381: 	pfd.fd = cli->cli_sock;
  382: 	pfd.events = POLLOUT;
  383: 	if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) == -1 || 
  384: 			pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
  385: 		LOGERR;
  386: 		e_free(*data);
  387: 		*data = NULL;
  388: 		return -1;
  389: 	}
  390: 	if (send(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) {
  391: 		LOGERR;
  392: 		e_free(*data);
  393: 		*data = NULL;
  394: 		return -1;
  395: 	}
  396: 
  397: 	/* receive BLOB from server */
  398: 	pfd.events = POLLIN | POLLPRI;
  399: 	for (ret = AIT_LEN(var), pos = *data; ret > 0; ret -= len, pos += len) {
  400: 		if ((len = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || 
  401: 				pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
  402: 			LOGERR;
  403: 			e_free(*data);
  404: 			*data = NULL;
  405: 			return -1;
  406: 		}
  407: 
  408: 		if ((len = recv(cli->cli_sock, pos, ret, 0)) == -1) {
  409: 			LOGERR;
  410: 			e_free(*data);
  411: 			*data = NULL;
  412: 			return -1;
  413: 		}
  414: 	}
  415: 
  416: 	/* wait for reply */
  417: 	if ((len = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || 
  418: 			pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
  419: 		if (len)
  420: 			LOGERR;
  421: 		else
  422: 			rpc_SetErr(ETIMEDOUT, "Timeout reached! Server not respond");
  423: 		e_free(*data);
  424: 		*data = NULL;
  425: 		return 1;
  426: 	}
  427: 	if (recv(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) {
  428: 		LOGERR;
  429: 		e_free(*data);
  430: 		*data = NULL;
  431: 		return 1;
  432: 	}
  433: 	if (hdr.hdr_cmd != error) {
  434: 		if (ntohl(hdr.hdr_len) != AIT_LEN(var)) {
  435: 			rpc_SetErr(ECANCELED, "Bad return length packet");
  436: 			e_free(*data);
  437: 			*data = NULL;
  438: 			return 1;
  439: 		}
  440: 	}
  441: 
  442: 	return hdr.hdr_cmd == error;
  443: }
  444: 
  445: /*
  446:  * rpc_cli_delBLOB() - Delete BLOB from server
  447:  *
  448:  * @cli = Client instance
  449:  * @var = BLOB variable
  450:  * return: -1 error, 0 ok, 1 remote error
  451:  */
  452: int
  453: rpc_cli_delBLOB(rpc_cli_t * __restrict cli, ait_val_t * __restrict var)
  454: {
  455: 	struct tagBLOBHdr hdr;
  456: 	struct pollfd pfd;
  457: 	int ret;
  458: 
  459: 	if (!cli || !var) {
  460: 		rpc_SetErr(EINVAL, "Invalid arguments");
  461: 		return -1;
  462: 	} else
  463: 		memset(&hdr, 0, sizeof hdr);
  464: 
  465: 	rpc_addPktSession(&hdr.hdr_session, cli->cli_parent);
  466: 	hdr.hdr_cmd = unset;
  467: 	hdr.hdr_var = htonl((uint32_t) AIT_GET_BLOB(var));
  468: 	hdr.hdr_ret = 0;
  469: 	hdr.hdr_len = 0;
  470: 
  471: 	/* send UNSET request */
  472: 	pfd.fd = cli->cli_sock;
  473: 	pfd.events = POLLOUT;
  474: 	if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) == -1 || 
  475: 			pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
  476: 		LOGERR;
  477: 		return -1;
  478: 	}
  479: 	if (send(cli->cli_sock, &hdr, sizeof hdr, MSG_NOSIGNAL) == -1) {
  480: 		LOGERR;
  481: 		return -1;
  482: 	}
  483: 
  484: 	/* wait for reply */
  485: 	pfd.events = POLLIN | POLLPRI;
  486: 	if ((ret = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || 
  487: 			pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) {
  488: 		if (ret)
  489: 			LOGERR;
  490: 		else
  491: 			rpc_SetErr(ETIMEDOUT, "Timeout reached! Server not respond");
  492: 		return 1;
  493: 	}
  494: 	if (recv(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) {
  495: 		LOGERR;
  496: 		return 1;
  497: 	}
  498: 
  499: 	return hdr.hdr_cmd == error;
  500: }
  501: 
  502: /*
  503:  * rpc_cli_getBLOB() - Receive BLOB from server and Delete after that
  504:  *
  505:  * @cli = Client instance
  506:  * @var = BLOB variable
  507:  * @data = BLOB data, must be e_free after use!
  508:  * return: -1 error, 0 ok, 1 remote error
  509:  */
  510: int
  511: rpc_cli_getBLOB(rpc_cli_t * __restrict cli, ait_val_t * __restrict var, void ** __restrict data)
  512: {
  513: 	int ret;
  514: 
  515: 	ret = rpc_cli_recvBLOB(cli, var, data);
  516: 	ret |= rpc_cli_delBLOB(cli, var) > 0 ? 2 : 0;
  517: 
  518: 	return ret;
  519: }

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