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


int aaa(rpc_func_t *f, int in, array_t *iv)
{
	rpc_blob_t *b;

	RPC_CALLBACK_CHECK_INPUT(f);

	printf("%s(%d): Piuk! %p(0x%x)\n", __func__, __LINE__, 
			AIT_GET_PTR(&f->func_name), AIT_KEY(&f->func_name));

	/*
	b = rpc_srv_registerBLOB(f->func_parent, BUFSIZ);
	if (!b)
		return -1;
	if (rpc_srv_blobMap(f->func_parent, b) == -1) {
		rpc_srv_blobFree(f->func_parent, b);
		return -1;
	}

	memset(b->blob_data, 0, b->blob_len);
	strcpy(b->blob_data, "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAa dsfsfsfnskjfnk\n");

	rpc_srv_blobUnmap(b);
	*/
	return 0;
}

int BBB(rpc_func_t *f, int in, array_t *iv)
{
	ait_val_t *v;
	rpc_blob_t *b;

	RPC_CALLBACK_CHECK_INPUT(f);

	printf("%s(%d): Piuk! %p(0x%x)  %d %s %X\n", __func__, __LINE__, 
			AIT_GET_PTR(&f->func_name), AIT_KEY(&f->func_name), 
			AIT_GET_I32(io_array(iv, 0, ait_val_t*)), AIT_GET_STR(io_array(iv, 1, ait_val_t*)), 
			AIT_GET_BLOB(io_array(iv, 2, ait_val_t*)));
	printf("%s(%d): Piuk! %p(0x%x)  %d %s %X\n", __func__, __LINE__, 
			AIT_GET_PTR(&f->func_name), AIT_KEY(&f->func_name), 
			AIT_GET_I32(io_array(iv, 0, ait_val_t*)), AIT_GET_STR(io_array(iv, 1, ait_val_t*)));

	// input blob object
	if (!(b = rpc_srv_getBLOB(f->func_parent, AIT_GET_BLOB(io_array(iv, 2, ait_val_t*)))))
		return -1;
	if (rpc_srv_blobMap(f->func_parent, b) == -1) {
		rpc_srv_blobFree(f->func_parent, b);
		return -1;
	}
	printf("VAR=%X(%d):: %s\n", b->blob_var, b->blob_len, b->blob_data);
	rpc_srv_blobUnmap(b);
	rpc_srv_unregisterBLOB(f->func_parent, AIT_GET_BLOB(io_array(iv, 2, ait_val_t*)));


	v = io_array(f->func_vars, 0, ait_val_t*);
	AIT_SET_BUF(v, "00!oo", 6);
	v = io_array(f->func_vars, 1, ait_val_t*);
	AIT_SET_I8(v, 65);
	v = io_array(f->func_vars, 2, ait_val_t*);
	AIT_SET_STR(v, "Oho boho i cheburashka");

	// return blob object
	b = rpc_srv_registerBLOB(f->func_parent, 128);
	if (!b)
		return -1;
	else {
		v = io_array(f->func_vars, 3, ait_val_t*);
		AIT_SET_BLOB2(v, b);
	}

	printf("data=%p blen=%d\n", b->blob_data, b->blob_len);
	memset(b->blob_data, 0, b->blob_len);
	strcpy(b->blob_data, "Hello Worldzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz mzdnfdskf\naddfs\n");

	rpc_srv_blobUnmap(b);
	return 33;
}

int xxx(rpc_func_t *f, int in, array_t *iv)
{
	ait_val_t *v;

	RPC_CALLBACK_CHECK_INPUT(f);

	printf("iv_s=%d\n", io_arraySize(iv));
	printf("%s(%d): Piuk! %p(0x%x) --- %s\n", __func__, __LINE__, 
			AIT_GET_PTR(&f->func_name), AIT_KEY(&f->func_name), 
			AIT_GET_BUF(io_array(iv, 0, ait_val_t*)));
	fflush(stdout);

	v = io_array(f->func_vars, 0, ait_val_t*);
	AIT_SET_DATA(v, "00!oo", 6);
	io_arraySet(f->func_vars, 0, v);
	v = io_array(f->func_vars, 1, ait_val_t*);
	AIT_SET_I8(v, 65);
	io_arraySet(f->func_vars, 1, v);
	return 111;
}

int xYz(rpc_func_t *f, int in, array_t *iv)
{
	return 0;
}


int main()
{
	rpc_srv_t *srv;
	rpc_func_t *f;
	int ret;

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

	if (rpc_srv_initBLOBServer(srv, 0, "/tmp")) {
		printf("error:: errno=%d %s\n", rpc_GetErrno(), rpc_GetError());
		return 1;
	}

	rpc_srv_registerCall(srv, RC_aaa, aaa, 0);
	rpc_srv_registerCall(srv, RC_BBB, BBB, 4);
	rpc_srv_registerCall(srv, 3, NULL, 1);
	rpc_srv_registerCall(srv, RC_xYz, xYz, 2);
	rpc_srv_registerCall(srv, RC_xxx, xxx, 2);

	rpc_srv_unregisterCall(srv, 4);

	rpc_srv_execBLOBServer(srv);
	rpc_srv_loopServer(srv);

	rpc_srv_endBLOBServer(srv);
	rpc_srv_endServer(&srv);
	return 0;
}