#include <stdio.h>
#include <pthread.h>
#include <aitrpc.h>

//ait_val_t valz[3];


int main()
{
	rpc_cli_t *cli, *cli2;
	int c, i, ret;
	ait_val_t tval, *v = NULL;
	array_t *valz, *arr;
	char *mem, *blob43 = malloc(512);

	cli = rpc_cli_openClient(100, 2, 1024 * 10, AF_INET, "127.0.0.1", 11111);
//	cli = rpc_cli_openClient(100, 2, AF_LOCAL, "0.0.0.0", 11111);
	if (!cli) {
		printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 1;
	}

	cli2 = rpc_cli_openBLOBClient(cli, 0);
	if (!cli2) {
		printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 1;
	}

	memset(blob43, 0, 512);
	strlcpy(blob43, "aaaaaaaaaaaaaaa cddddddddddddddd zzzzzzzzzzzzzzzzzzzzz !!!!\n\n\n675675676...\n", 512);

	valz = io_allocVars(3);
	v = io_array(valz, 0, ait_val_t*);
	AIT_SET_I32(v, 12345678);
	v = io_array(valz, 1, ait_val_t*);
	AIT_SET_STR(v, "gniah_blah SHMINK!");
	v = io_array(valz, 2, ait_val_t*);
	AIT_NEW_BLOB(v, 512);
	if (rpc_cli_sendBLOB(cli2, v, blob43) == -1) {
		printf("!!!!! blob error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 2;
	} else
		printf("Get BLOB = %x\n", AIT_GET_BLOB(v));

	/* test case for unknown blob ... 
	AIT_SET_BLOB(&tval, 0x554C1BC7, BUFSIZ);
	printf("test not found blob=%d\n", rpc_cli_getBLOB(cli2, &tval, (void**) &mem));
	if (mem)
		free(mem);
	*/

//	for (i = 0; i < 1000000; i++)
		if ((ret = rpc_cli_execCall(cli, NULL, "BBB", valz, &arr)) < 0) {
			printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
			return 2;
		} else {
			printf("ret=%d\n", ret);
			if (arr) {
				v = io_array(arr, 0, ait_val_t*);
				printf("ret_val0:: %p %s len=%d type=%d\n", 
						v, AIT_GET_BUF(v), AIT_LEN(v), AIT_TYPE(v));
				v = io_array(arr, 1, ait_val_t*);
				printf("ret_val1:: %d len=%d type=%d\n", 
						AIT_GET_I8(v), AIT_LEN(v), AIT_TYPE(v));
				v = io_array(arr, 2, ait_val_t*);
				printf("ret_val2:: is_empty? %d %s len=%d type=%d\n", 
						AIT_ISEMPTY(v), AIT_GET_STR(v), AIT_LEN(v), AIT_TYPE(v));
				v = io_array(arr, 3, ait_val_t*);
				printf("ret_val3:: %X %d\n", AIT_GET_BLOB(v), AIT_LEN(v));
				printf("test found blob=%d\n", rpc_cli_getBLOB(cli2, v, (void**) &mem));
//				printf("+++++++++ test found blob=%d\n", rpc_cli_recvBLOB(cli2, v, (void**) &mem));
				if (mem) {
					printf("+++++++ BLOB=%s", mem);
					free(mem);
				}
				io_freeVars(&arr);
			}
		}
	io_freeVars(&valz);
	free(blob43);

	if (rpc_cli_execCall(cli, NULL, "aaa", NULL, &arr) < 0) {
		printf("error:: \"aaa\" errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 3;
	}
	printf("return=%d aaa arr=%p\n", arr ? io_arraySize(arr) : 42424242, arr);

	if (rpc_cli_execCall(cli, NULL, CALL_SRVCLIENTS, NULL, &arr) < 0) {
		printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 4;
	}
	printf("return=%d registeredClient\n", (arr ? io_arraySize(arr) : 0));
	for (i = 0; i < (arr ? io_arraySize(arr) : 0); i++)
		printf("registeredClient(%d)=%s\n", i, AIT_GET_STR(io_array(arr, i, ait_val_t*)));
	io_freeVars(&arr);

	if (rpc_cli_execCall(cli, NULL, CALL_BLOBCLIENTS, NULL, &arr) < 0) {
		printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 4;
	}
	printf("return=%d registeredBLOBClient\n", (arr ? io_arraySize(arr) : 0));
	for (i = 0; i < (arr ? io_arraySize(arr) : 0); i++)
		printf("registeredBLOBClient(%d)=%s\n", i, AIT_GET_STR(io_array(arr, i, ait_val_t*)));
	io_freeVars(&arr);
	
	if (rpc_cli_execCall(cli, NULL, CALL_BLOBVARS, NULL, &arr) < 0) {
		printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 5;
	}
	for (i = 0; i < (arr ? io_arraySize(arr) : 0); i++)
		printf("registeredBLOBVars(%d)=%s\n", i, AIT_GET_STR(io_array(arr, i, ait_val_t*)));
	io_freeVars(&arr);

	if (rpc_cli_execCall(cli, NULL, CALL_SRVCALLS, NULL, &arr) < 0) {
		printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 5;
	}
	for (i = 0; i < (arr ? io_arraySize(arr) : 0); i++)
		printf("registeredCall(%d)=%s\n", i, AIT_GET_STR(io_array(arr, i, ait_val_t*)));
	io_freeVars(&arr);

	if (rpc_cli_execCall(cli, NULL, CALL_SRVSESSIONS, NULL, &arr) < 0) {
		printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 6;
	}
	printf("c=%d v=%p\n", io_arraySize(arr), arr);
	printf("session(%d:%d:%d) clients=%d\n", (uint8_t) AIT_GET_U8(io_array(arr, 0, ait_val_t*)), 
			(uint32_t) AIT_GET_U32(io_array(arr, 1, ait_val_t*)), 
			AIT_GET_U32(io_array(arr, 2, ait_val_t*)), AIT_GET_I32(io_array(arr, 3, ait_val_t*)));
	io_freeVars(&arr);

	rpc_cli_execCall(cli, NULL, CALL_SRVSHUTDOWN, NULL, NULL);

	rpc_cli_closeBLOBClient(cli2);
	rpc_cli_closeClient(cli);
	return 0;
}