libApp
/* $Id$ */
							/* Copyright (c) 2012-2019 Pierre Pronchery <khorben@defora.org> */
							/* This file is part of DeforaOS System libApp */
							/* This program is free software: you can redistribute it and/or modify
							 * it under the terms of the GNU General Public License as published by
							 * the Free Software Foundation, version 3 of the License.
							 *
							 * This program is distributed in the hope that it will be useful,
							 * but WITHOUT ANY WARRANTY; without even the implied warranty of
							 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
							 * GNU General Public License for more details.
							 *
							 * You should have received a copy of the GNU General Public License
							 * along with this program.  If not, see <http://www.gnu.org/licenses/>. */
							#include <unistd.h>
							#include <stdlib.h>
							#include <stdio.h>
							#include <string.h>
							#include <errno.h>
							#include <System.h>
							#include "App.h"
							#ifndef PROGNAME
							# define PROGNAME	"transport"
							#endif
							/* private */
							/* types */
							typedef struct _AppTransport
							{
								int ret;
								AppTransportPluginHelper helper;
								AppTransportPluginDefinition * plugind;
								AppTransportPlugin * server;
								AppTransportPlugin * client;
								AppMessage * message;
							} Transport;
							/* prototypes */
							static int _transport(char const * protocol, char const * name);
							/* helpers */
							static int _transport_helper_receive(AppTransport * transport,
									AppMessage * message);
							static int _transport_helper_status(AppTransport * transport,
									AppTransportStatus status, unsigned int code,
									char const * message);
							static AppTransportClient * _transport_helper_client_new(
									AppTransport * transport, char const * name);
							static void _transport_helper_client_delete(AppTransport * transport,
									AppTransportClient * client);
							static int _transport_helper_client_receive(AppTransport * transport,
									AppTransportClient * client, AppMessage * message);
							/* callbacks */
							static int _transport_callback_idle(void * data);
							static int _transport_callback_timeout(void * data);
							static int _usage(void);
							/* functions */
							/* transport */
							static int _transport(char const * protocol, char const * name)
							{
								char * cwd;
								char const * p;
								Plugin * plugin;
								AppTransport transport;
								AppTransportPluginHelper * helper = &transport.helper;
								struct timeval tv;
								/* load the transport plug-in */
								if((cwd = getcwd(NULL, 0)) == NULL)
									return error_set_print(PROGNAME, 2, "%s", strerror(errno));
								/* XXX rather ugly but does the trick */
								if((p = getenv("OBJDIR")) != NULL)
									plugin = plugin_new(p, "../src", "transport", protocol);
								else
									plugin = plugin_new(cwd, "../src", "transport", protocol);
								free(cwd);
								if(plugin == NULL)
									return error_print(PROGNAME);
								transport.ret = 0;
								if((transport.plugind = plugin_lookup(plugin, "transport")) == NULL)
								{
									plugin_delete(plugin);
									return error_print(PROGNAME);
								}
								/* initialize the helper */
								memset(helper, 0, sizeof(*helper));
								helper->transport = &transport;
								helper->event = event_new();
								helper->receive = _transport_helper_receive;
								helper->status = _transport_helper_status;
								helper->client_new = _transport_helper_client_new;
								helper->client_delete = _transport_helper_client_delete;
								helper->client_receive = _transport_helper_client_receive;
								/* create a server and a client */
								transport.server = (helper->event != NULL)
									? transport.plugind->init(helper, ATM_SERVER, name) : NULL;
								transport.client = (helper->event != NULL)
									? transport.plugind->init(helper, ATM_CLIENT, name) : NULL;
								if(helper->event == NULL
										|| transport.server == NULL
										|| transport.client == NULL)
								{
									if(helper->event != NULL)
										event_delete(helper->event);
									if(transport.client != NULL)
										transport.plugind->destroy(transport.client);
									if(transport.server != NULL)
										transport.plugind->destroy(transport.server);
									plugin_delete(plugin);
									return error_print(PROGNAME);
								}
								transport.message = appmessage_new_callv("hello", -1);
								tv.tv_sec = 1;
								tv.tv_usec = 0;
								/* enter the main loop */
								if(event_register_idle(helper->event, _transport_callback_idle,
											&transport) != 0
										|| event_register_timeout(helper->event, &tv,
											_transport_callback_timeout, &transport) != 0
										|| event_loop(helper->event) != 0)
								{
									error_print(PROGNAME);
									transport.ret = -1;
								}
								else if(transport.ret != 0)
									error_print(PROGNAME);
								appmessage_delete(transport.message);
								transport.plugind->destroy(transport.client);
								transport.plugind->destroy(transport.server);
								event_delete(helper->event);
								plugin_delete(plugin);
								return transport.ret;
							}
							/* helpers */
							/* transport_helper_client_new */
							static AppTransportClient * _transport_helper_client_new(
									AppTransport * transport, char const * name)
							{
							#ifdef DEBUG
								fprintf(stderr, "DEBUG: %s(\"%s\")\n", __func__, name);
							#endif
								/* FIXME really implement */
								return (AppTransportClient *)transport;
							}
							/* transport_helper_client_delete */
							static void _transport_helper_client_delete(AppTransport * transport,
									AppTransportClient * client)
							{
							}
							/* transport_helper_client_receive */
							static int _transport_helper_client_receive(AppTransport * transport,
									AppTransportClient * client, AppMessage * message)
							{
								String const * method;
							#ifdef DEBUG
								fprintf(stderr, "DEBUG: %s() %u \"%s\"\n", __func__,
										appmessage_get_type(message),
										appmessage_get_method(message));
							#endif
								if(appmessage_get_type(message) == AMT_CALL
										&& (method = appmessage_get_method(message)) != NULL
										&& strcmp(method, "hello") == 0)
									event_loop_quit(transport->helper.event);
								return 0;
							}
							/* transport_helper_receive */
							static int _transport_helper_receive(AppTransport * transport,
									AppMessage * message)
							{
							#ifdef DEBUG
								fprintf(stderr, "DEBUG: %s()\n", __func__);
							#endif
								return 0;
							}
							/* transport_helper_status */
							static int _transport_helper_status(AppTransport * transport,
									AppTransportStatus status, unsigned int code,
									char const * message)
							{
							#ifdef DEBUG
								fprintf(stderr, "DEBUG: %s(%u, %u, \"%s\")\n", __func__, status, code,
										message);
							#endif
								return 0;
							}
							/* callbacks */
							/* transport_callback_idle */
							static int _transport_callback_idle(void * data)
							{
								Transport * transport = data;
							#ifdef DEBUG
								fprintf(stderr, "DEBUG: %s()\n", __func__);
							#endif
								transport->plugind->client_send(transport->client, transport->message);
								return 1;
							}
							/* transport_callback_timeout */
							static int _transport_callback_timeout(void * data)
							{
								Transport * transport = data;
							#ifdef DEBUG
								fprintf(stderr, "DEBUG: %s()\n", __func__);
							#endif
								event_loop_quit(transport->helper.event);
								/* report the error */
								transport->ret = error_set_code(2, "%s", "Timeout");
								return 1;
							}
							/* usage */
							static int _usage(void)
							{
								fputs("Usage: " PROGNAME " [-p protocol] [name]\n", stderr);
								return 1;
							}
							/* public */
							/* functions */
							/* main */
							int main(int argc, char * argv[])
							{
								char const * protocol = "udp";
								char const * name = "127.0.0.1:4242";
								int o;
								while((o = getopt(argc, argv, "p:")) != -1)
									switch(o)
									{
										case 'p':
											protocol = optarg;
											break;
										default:
											return _usage();
									}
								if(optind == argc - 1)
									name = argv[optind];
								else if(optind != argc)
									return _usage();
								return (_transport(protocol, name) == 0) ? 0 : 2;
							}
							