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



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

	RPC_CALLBACK_CHECK_INPUT(f);

	printf("%s(%d): Piuk! %s\n", __func__, __LINE__, 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, rpc_val_t *iv)
{
	rpc_val_t *v;
	rpc_blob_t *b;

	RPC_CALLBACK_CHECK_INPUT(f);

	printf("%s(%d): Piuk! %s  %d %s %X\n", __func__, __LINE__, f->func_name, 
			RPC_GET_I32(&iv[0]), RPC_GET_STR(&iv[1]), RPC_GET_BLOB(&iv[2]));

	// input blob object
	if (!(b = rpc_srv_getBLOB(f->func_parent, RPC_GET_BLOB(&iv[2]))))
		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_unregisterBLOB(f->func_parent, RPC_GET_BLOB(&iv[2]));


	rpc_srv_allocVars(f, 4);
	rpc_srv_getVars(f, &v);
	RPC_SET_BUF(&v[0], "00!oo", 6);
	RPC_SET_I8(&v[1], 65);
	RPC_SET_STR(&v[2], "Oho boho i cheburashka");

	// return blob object
	b = rpc_srv_registerBLOB(f->func_parent, 128);
	if (!b)
		return -1;
	else
		RPC_SET_BLOB2(&v[3], b);

	if (rpc_srv_blobMap(f->func_parent, b) == -1) {
		rpc_srv_blobFree(f->func_parent, b);
		return -1;
	}

	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 main()
{
	rpc_srv_t *srv;
	rpc_func_t *f;
	pthread_t tid[2];
	int ret;

	srv = rpc_srv_initServer(100, 2, 1, AF_INET, "0.0.0.0", 11111);
//	srv = rpc_srv_initServer(100, 2, 1, AF_LOCAL, "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;
	}

	/* dump register functions
	for (f = srv->srv_funcs; f; f = f->func_next)
		printf("func::name=%s args=%d\n", f->func_name, f->func_args);
		*/

	if (!fork()) {
		setsid();

		rpc_srv_registerCall(srv, NULL, "aaa", 0);
		rpc_srv_registerCall(srv, NULL, "BBB", 4);
		rpc_srv_registerCall(srv, NULL, "dummy", 1);
		rpc_srv_registerCall(srv, NULL, "xYz", 2);

		rpc_srv_unregisterCall(srv, NULL, "dummy");

		pthread_create(&tid[1], NULL, (void*(*)(void*)) rpc_srv_execBLOBServer, srv);
		rpc_srv_execServer(srv);
	}

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