--- libaitrpc/src/blob.c 2011/03/15 15:13:22 1.1.2.15 +++ libaitrpc/src/blob.c 2015/07/02 17:52:53 1.16.4.1 @@ -1,26 +1,82 @@ +/************************************************************************* +* (C) 2010 AITNET ltd - Sofia/Bulgaria - +* by Michael Pounov +* +* $Author: misho $ +* $Id: blob.c,v 1.16.4.1 2015/07/02 17:52:53 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 - 2015 + 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" +static void * +toutBLOB(sched_task_t *task) +{ + rpc_srv_unregisterBLOB(TASK_DATA(task), ((rpc_blob_t*) TASK_ARG(task))->blob_var); + + return NULL; +} + + /* - * rpc_srv_blobCreate() Create map blob to memory region and return object + * rpc_srv_blobCreate() - Create and map blob to memory region and return object + * * @srv = RPC Server instance * @len = BLOB length object + * @tout = BLOB live timeout in seconds * return: NULL error or !=NULL allocated BLOB object */ -inline rpc_blob_t * -rpc_srv_blobCreate(rpc_srv_t * __restrict srv, int len) +rpc_blob_t * +rpc_srv_blobCreate(rpc_srv_t * __restrict srv, int len, int tout) { rpc_blob_t *blob = NULL; char szFName[MAXPATHLEN]; int f; u_int rnd; + struct timespec ts = { tout ? tout : DEF_RPC_BLOB_TIMEOUT, 0 }; - srandomdev(); again: rnd = random() % UINT_MAX; - memset(szFName, 0, MAXPATHLEN); - snprintf(szFName, MAXPATHLEN, BLOB_FILE, srv->srv_blob.dir, rnd); + memset(szFName, 0, sizeof szFName); + snprintf(szFName, sizeof szFName, BLOB_FILE, AIT_GET_STRZ(&srv->srv_blob.dir), rnd); f = open(szFName, O_CREAT | O_EXCL | O_RDWR, 0600); if (f == -1) { if (errno == EEXIST) @@ -29,15 +85,14 @@ again: LOGERR; return NULL; } - if (lseek(f, len - 1, SEEK_SET) == -1) { + if (ftruncate(f, len) == -1) { LOGERR; close(f); unlink(szFName); return NULL; - } else - write(f, "", 1); + } - blob = malloc(sizeof(rpc_blob_t)); + blob = e_malloc(sizeof(rpc_blob_t)); if (!blob) { LOGERR; close(f); @@ -48,37 +103,47 @@ again: blob->blob_data = mmap(NULL, len, PROT_READ | PROT_WRITE, MAP_SHARED, f, 0); if (blob->blob_data == MAP_FAILED) { LOGERR; - free(blob); + e_free(blob); close(f); unlink(szFName); return NULL; - } else + } else { close(f); + madvise(blob->blob_data, len, MADV_SEQUENTIAL); + } + blob->blob_len = len; blob->blob_var = rnd; + + schedTimer(srv->srv_blob.root, toutBLOB, blob, ts, srv, 0); return blob; } /* - * rpc_srv_blobMap() Map blob to memory region + * rpc_srv_blobMap() - Map blob to memory region + * * @srv = RPC Server instance * @blob = Map to this BLOB element * return: -1 error or 0 ok */ -inline int +int rpc_srv_blobMap(rpc_srv_t * __restrict srv, rpc_blob_t * __restrict blob) { int f; char szFName[MAXPATHLEN]; if (!blob) { - rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); + rpc_SetErr(EINVAL, "Invalid argument BLOB"); return -1; } + if (blob->blob_data) { + rpc_SetErr(EPERM, "Already mmapped object found!"); + return -1; + } - memset(szFName, 0, MAXPATHLEN); - snprintf(szFName, MAXPATHLEN, BLOB_FILE, srv->srv_blob.dir, blob->blob_var); + memset(szFName, 0, sizeof szFName); + snprintf(szFName, sizeof szFName, BLOB_FILE, AIT_GET_STRZ(&srv->srv_blob.dir), blob->blob_var); f = open(szFName, O_RDWR); if (f == -1) { LOGERR; @@ -101,43 +166,43 @@ rpc_srv_blobMap(rpc_srv_t * __restrict srv, rpc_blob_t } /* - * rpc_srv_blobUnmap() Unmap blob memory region + * rpc_srv_blobUnmap() - Unmap blob memory region + * * @blob = Mapped BLOB element * return: none */ -inline void +void rpc_srv_blobUnmap(rpc_blob_t * __restrict blob) { - if (!blob || !blob->blob_data) - rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); - else { + if (blob && blob->blob_data) { munmap(blob->blob_data, blob->blob_len); blob->blob_data = NULL; } } /* - * rpc_srv_blobFree() Free blob from disk & memory + * rpc_srv_blobFree() - Free blob from disk & memory + * * @srv = RPC Server instance * @blob = Mapped BLOB element * return: -1 error or 0 ok */ -inline int +int rpc_srv_blobFree(rpc_srv_t * __restrict srv, rpc_blob_t * __restrict blob) { char szFName[MAXPATHLEN]; if (!blob) { - rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); + rpc_SetErr(EINVAL, "Invalid argument BLOB"); return -1; - } - - if (blob->blob_data) + } else rpc_srv_blobUnmap(blob); - memset(szFName, 0, MAXPATHLEN); - snprintf(szFName, MAXPATHLEN, BLOB_FILE, srv->srv_blob.dir, blob->blob_var); - if (remove(szFName) == -1) { + schedCancelby(srv->srv_blob.root, taskTIMER, CRITERIA_ARG, blob, NULL); + + memset(szFName, 0, sizeof szFName); + snprintf(szFName, sizeof szFName, BLOB_FILE, AIT_GET_STRZ(&srv->srv_blob.dir), blob->blob_var); + if (unlink(szFName) == -1) { LOGERR; return -1; } @@ -145,10 +210,11 @@ rpc_srv_blobFree(rpc_srv_t * __restrict srv, rpc_blob_ return 0; } -// ------------------------------------------------------------ +/* ------------------------------------------------------------ */ /* - * rpc_srv_sendBLOB() Send mapped BLOB to client + * rpc_srv_sendBLOB() - Send mapped BLOB to client + * * @cli = Client instance * @blob = Mapped BLOB element * return: -1 error, 0 ok @@ -160,21 +226,24 @@ rpc_srv_sendBLOB(rpc_cli_t * __restrict cli, rpc_blob_ uint8_t *pos; if (!cli || !blob || !blob->blob_data) { - rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); + rpc_SetErr(EINVAL, "Invalid arguments"); return -1; } - for (ret = blob->blob_len, pos = blob->blob_data; ret > 0; ret -= len, pos += len) - if ((len = send(cli->cli_sock, pos, ret > BLOBSIZ ? BLOBSIZ : ret, 0)) == -1) { + for (ret = blob->blob_len, pos = blob->blob_data; ret > 0; ret -= len, pos += len) { + len = send(cli->cli_sock, pos, ret, MSG_NOSIGNAL); + if (len == -1) { LOGERR; return -1; } + } return ret; } /* - * rpc_srv_recvBLOB() Receive BLOB from client + * rpc_srv_recvBLOB() - Receive BLOB from client + * * @cli = Client instance * @blob = Mapped BLOB element * return: -1 error, 0 ok, >0 unreceived data from client, may be error? @@ -184,248 +253,31 @@ rpc_srv_recvBLOB(rpc_cli_t * __restrict cli, rpc_blob_ { int ret, len; uint8_t *pos; - fd_set fds; - struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; + struct pollfd pfd; if (!cli || !blob || !blob->blob_data) { - rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); + rpc_SetErr(EINVAL, "Invalid arguments"); return -1; } + pfd.fd = cli->cli_sock; + pfd.events = POLLIN | POLLPRI; for (ret = blob->blob_len, pos = blob->blob_data; ret > 0; ret -= len, pos += len) { - FD_ZERO(&fds); - FD_SET(cli->cli_sock, &fds); - len = select(cli->cli_sock + 1, &fds, NULL, NULL, &tv); - if (len < 1) { - LOGERR; + if ((len = poll(&pfd, 1, DEF_RPC_TIMEOUT * 1000)) < 1 || + pfd.revents & (POLLERR | POLLHUP | POLLNVAL)) { + if (len) + LOGERR; + else + rpc_SetErr(ETIMEDOUT, "Timeout reached! Server not respond"); return -1; } - if ((len = recv(cli->cli_sock, pos, BLOBSIZ, 0)) == -1) { + len = recv(cli->cli_sock, pos, ret, 0); + if (len == -1) { LOGERR; return -1; } } - - return ret; -} - -// ------------------------------------------------------------ - -/* - * rpc_cli_sendBLOB() Send BLOB to server - * @cli = Client instance - * @var = BLOB variable - * @data = BLOB data - * return: -1 error, 0 ok, 1 remote error - */ -int -rpc_cli_sendBLOB(rpc_cli_t * __restrict cli, rpc_val_t * __restrict var, void * __restrict data) -{ - int ret, len; - uint8_t *pos; - struct tagBLOBHdr hdr; - fd_set fds; - struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; - - if (!cli || !var || !data) { - rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); - return -1; - } - - memcpy(&hdr.hdr_session, cli->cli_parent, sizeof(rpc_sess_t)); - hdr.hdr_cmd = set; - hdr.hdr_var = 0; - hdr.hdr_ret = 0; - hdr.hdr_len = var->val_len; - if (send(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) { - LOGERR; - return -1; - } - - for (ret = var->val_len, pos = data; ret > 0; ret -= len, pos += len) - if ((len = send(cli->cli_sock, pos, ret > BLOBSIZ ? BLOBSIZ : ret, 0)) == -1) { - LOGERR; - return -1; - } - - FD_ZERO(&fds); - FD_SET(cli->cli_sock, &fds); - switch (select(cli->cli_sock + 1, &fds, NULL, NULL, &tv)) { - case -1: - LOGERR; - return -1; - case 0: - rpc_SetErr(ETIMEDOUT, "Error:: Timeout reached! Server not responde ...\n"); - return -1; - } - if (recv(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) { - LOGERR; - return -1; - } - if (hdr.hdr_cmd != error) { - if (hdr.hdr_len != var->val_len) { - rpc_SetErr(ECANCELED, "Error:: Bad return length packet ...\n"); - return -1; - } - - var->val.blob = hdr.hdr_var; - } - - return hdr.hdr_cmd == error; -} - -/* - * rpc_cli_recvBLOB() Receive BLOB from server - * @cli = Client instance - * @var = BLOB variable - * @data = BLOB data, must be free after use! - * return: -1 error, 0 ok, 1 remote error - */ -int -rpc_cli_recvBLOB(rpc_cli_t * __restrict cli, rpc_val_t * __restrict var, void ** data) -{ - int ret, len; - uint8_t *pos; - fd_set fds; - struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; - struct tagBLOBHdr hdr; - - if (!cli || !var || !data) { - rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); - return -1; - } - - *data = malloc(var->val_len); - if (!*data) { - LOGERR; - return -1; - } else - memset(*data, 0, var->val_len); - - memcpy(&hdr.hdr_session, cli->cli_parent, sizeof(rpc_sess_t)); - hdr.hdr_cmd = get; - hdr.hdr_var = (uint32_t) RPC_GET_BLOB(var); - hdr.hdr_ret = 0; - hdr.hdr_len = 0; - if (send(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) { - LOGERR; - free(*data); - *data = NULL; - return -1; - } - - for (ret = var->val_len, pos = *data; ret > 0; ret -= len, pos += len) { - FD_ZERO(&fds); - FD_SET(cli->cli_sock, &fds); - len = select(cli->cli_sock + 1, &fds, NULL, NULL, &tv); - if (len < 1) { - LOGERR; - free(*data); - *data = NULL; - return -1; - } - - if ((len = recv(cli->cli_sock, pos, BLOBSIZ, 0)) == -1) { - LOGERR; - free(*data); - *data = NULL; - return -1; - } - } - - FD_ZERO(&fds); - FD_SET(cli->cli_sock, &fds); - switch (select(cli->cli_sock + 1, &fds, NULL, NULL, &tv)) { - case -1: - LOGERR; - free(*data); - *data = NULL; - return -1; - case 0: - rpc_SetErr(ETIMEDOUT, "Error:: Timeout reached! Server not responde ...\n"); - free(*data); - *data = NULL; - return -1; - } - if (recv(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) { - LOGERR; - free(*data); - *data = NULL; - return -1; - } - if (hdr.hdr_cmd != error) { - if (hdr.hdr_len != var->val_len) { - rpc_SetErr(ECANCELED, "Error:: Bad return length packet ...\n"); - free(*data); - *data = NULL; - return -1; - } - } - - return hdr.hdr_cmd == error; -} - -/* - * rpc_cli_delBLOB() Delete BLOB from server - * @cli = Client instance - * @var = BLOB variable - * return: -1 error, 0 ok, 1 remote error - */ -int -rpc_cli_delBLOB(rpc_cli_t * __restrict cli, rpc_val_t * __restrict var) -{ - struct tagBLOBHdr hdr; - fd_set fds; - struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; - - if (!cli || !var) { - rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); - return -1; - } - - memcpy(&hdr.hdr_session, cli->cli_parent, sizeof(rpc_sess_t)); - hdr.hdr_cmd = unset; - hdr.hdr_var = (uint32_t) RPC_GET_BLOB(var); - hdr.hdr_ret = 0; - hdr.hdr_len = 0; - if (send(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) { - LOGERR; - return -1; - } - - FD_ZERO(&fds); - FD_SET(cli->cli_sock, &fds); - switch (select(cli->cli_sock + 1, &fds, NULL, NULL, &tv)) { - case -1: - LOGERR; - return -1; - case 0: - rpc_SetErr(ETIMEDOUT, "Error:: Timeout reached! Server not responde ...\n"); - return -1; - } - if (recv(cli->cli_sock, &hdr, sizeof hdr, 0) == -1) { - LOGERR; - return -1; - } - - return hdr.hdr_cmd == error; -} - -/* - * rpc_cli_getBLOB() Receive BLOB from server and Delete after that - * @cli = Client instance - * @var = BLOB variable - * @data = BLOB data, must be free after use! - * return: -1 error, 0 ok, 1 remote error - */ -inline int -rpc_cli_getBLOB(rpc_cli_t * __restrict cli, rpc_val_t * __restrict var, void ** data) -{ - int ret; - - ret = rpc_cli_recvBLOB(cli, var, data); - ret |= rpc_cli_delBLOB(cli, var) > 0 ? 2 : 0; return ret; }