version 1.1, 2010/06/23 15:07:15
|
version 1.2, 2011/05/02 23:12:08
|
Line 0
|
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" |
|
|
|
|
|
/* |
|
* rpc_srv_blobCreate() Create map blob to memory region and return object |
|
* @srv = RPC Server instance |
|
* @len = BLOB length object |
|
* 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 *blob = NULL; |
|
char szFName[MAXPATHLEN]; |
|
int f; |
|
u_int rnd; |
|
|
|
#ifdef HAVE_SRANDOMDEV |
|
srandomdev(); |
|
#else |
|
time_t tim; |
|
|
|
srandom((time(&tim) ^ getpid())); |
|
#endif |
|
again: |
|
rnd = random() % UINT_MAX; |
|
|
|
memset(szFName, 0, MAXPATHLEN); |
|
snprintf(szFName, MAXPATHLEN, BLOB_FILE, srv->srv_blob.dir, rnd); |
|
f = open(szFName, O_CREAT | O_EXCL | O_RDWR, 0600); |
|
if (f == -1) { |
|
if (errno == EEXIST) |
|
goto again; |
|
|
|
LOGERR; |
|
return NULL; |
|
} |
|
if (lseek(f, len - 1, SEEK_SET) == -1) { |
|
LOGERR; |
|
close(f); |
|
unlink(szFName); |
|
return NULL; |
|
} else |
|
write(f, "", 1); |
|
|
|
blob = malloc(sizeof(rpc_blob_t)); |
|
if (!blob) { |
|
LOGERR; |
|
close(f); |
|
unlink(szFName); |
|
return NULL; |
|
} |
|
|
|
blob->blob_data = mmap(NULL, len, PROT_READ | PROT_WRITE, MAP_SHARED, f, 0); |
|
if (blob->blob_data == MAP_FAILED) { |
|
LOGERR; |
|
free(blob); |
|
close(f); |
|
unlink(szFName); |
|
return NULL; |
|
} else |
|
close(f); |
|
|
|
blob->blob_len = len; |
|
blob->blob_var = rnd; |
|
return blob; |
|
} |
|
|
|
/* |
|
* 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 |
|
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"); |
|
return -1; |
|
} |
|
|
|
memset(szFName, 0, MAXPATHLEN); |
|
snprintf(szFName, MAXPATHLEN, BLOB_FILE, srv->srv_blob.dir, blob->blob_var); |
|
f = open(szFName, O_RDWR); |
|
if (f == -1) { |
|
LOGERR; |
|
return -1; |
|
} |
|
|
|
blob->blob_data = mmap(NULL, blob->blob_len, PROT_READ | PROT_WRITE, MAP_SHARED, f, 0); |
|
if (blob->blob_data == MAP_FAILED) { |
|
LOGERR; |
|
close(f); |
|
blob->blob_data = NULL; |
|
return -1; |
|
} else { |
|
close(f); |
|
|
|
madvise(blob->blob_data, blob->blob_len, MADV_SEQUENTIAL); |
|
} |
|
|
|
return 0; |
|
} |
|
|
|
/* |
|
* rpc_srv_blobUnmap() Unmap blob memory region |
|
* @blob = Mapped BLOB element |
|
* return: none |
|
*/ |
|
inline void |
|
rpc_srv_blobUnmap(rpc_blob_t * __restrict blob) |
|
{ |
|
if (!blob || !blob->blob_data) |
|
rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); |
|
else { |
|
munmap(blob->blob_data, blob->blob_len); |
|
blob->blob_data = NULL; |
|
} |
|
} |
|
|
|
/* |
|
* rpc_srv_blobFree() Free blob from disk & memory |
|
* @srv = RPC Server instance |
|
* @blob = Mapped BLOB element |
|
* return: -1 error or 0 ok |
|
*/ |
|
inline 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"); |
|
return -1; |
|
} |
|
|
|
if (blob->blob_data) |
|
rpc_srv_blobUnmap(blob); |
|
|
|
memset(szFName, 0, MAXPATHLEN); |
|
snprintf(szFName, MAXPATHLEN, BLOB_FILE, srv->srv_blob.dir, blob->blob_var); |
|
if (remove(szFName) == -1) { |
|
LOGERR; |
|
return -1; |
|
} |
|
|
|
return 0; |
|
} |
|
|
|
// ------------------------------------------------------------ |
|
|
|
/* |
|
* rpc_srv_sendBLOB() Send mapped BLOB to client |
|
* @cli = Client instance |
|
* @blob = Mapped BLOB element |
|
* return: -1 error, 0 ok |
|
*/ |
|
int |
|
rpc_srv_sendBLOB(rpc_cli_t * __restrict cli, rpc_blob_t * __restrict blob) |
|
{ |
|
int ret, len; |
|
uint8_t *pos; |
|
|
|
if (!cli || !blob || !blob->blob_data) { |
|
rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); |
|
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) { |
|
LOGERR; |
|
return -1; |
|
} |
|
|
|
return ret; |
|
} |
|
|
|
/* |
|
* 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? |
|
*/ |
|
int |
|
rpc_srv_recvBLOB(rpc_cli_t * __restrict cli, rpc_blob_t * __restrict blob) |
|
{ |
|
int ret, len; |
|
uint8_t *pos; |
|
fd_set fds; |
|
struct timeval tv = { DEF_RPC_TIMEOUT, 0 }; |
|
|
|
if (!cli || !blob || !blob->blob_data) { |
|
rpc_SetErr(EINVAL, "Error:: invalid arguments ...\n"); |
|
return -1; |
|
} |
|
|
|
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; |
|
return -1; |
|
} |
|
|
|
if ((len = recv(cli->cli_sock, pos, BLOBSIZ, 0)) == -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; |
|
} |