/*

* Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description: 

*

*/

#include<stdio.h> 

#include <dbus/dbus.h>

#include <stdlib.h>

#include <string.h>

#include <pthread.h>

#include <fcntl.h>

#include <unistd.h>

#include <sys/stat.h>

#define LOG_FILE "c:\\logs\\dbus_signal_log1.txt"

#include "std_log_result.h"

#define LOG_FILENAME_LINE __FILE__, __LINE__

#define MAX_SIGNALS 3

void create_xml(int result)

{

	if(result)

		assert_failed = 1;

	testResultXml("dbus_signal");

	close_log_file();

}

int handle_error(DBusError* error)

	{

	std_log(LOG_FILENAME_LINE, "%s", error->name);

	std_log(LOG_FILENAME_LINE, "%s", error->message);

	dbus_error_free(error);

	create_xml(1);

	return 1; 

	} 

int main()

{

	DBusConnection* connection;

	DBusError error;

	DBusMessage* msg;

	dbus_int32_t arg_int32 = 1010;

	DBusObjectPathVTable vtable =

	{

	NULL,NULL,NULL	

	};

	char* str = "DBus Testing. hjgfyh34348#$!%^45678901730952698376092869876DBus Testing. hjgfyh34348#$!%^~!@#$%^&*()_+`-=<>?:{},./;'[]45678901730952698376092869876";

	FILE* fp[MAX_SIGNALS]={NULL};

	char buf[20] = "";

	int cnt=0;

	char exe_param[100];

	char names[][40]={"test.Signal.Send3 ",

					"test.Signal.Send4 ",

					"test.Signal.Send5 "};

	char obj_path[][40]={"/Test/Signal/Object3",

					"/Test/Signal/Object4",

					"/Test/Signal/Object5"};

	int fd;

	const char* fifopath = "C:\\signalfifo.file";

	int err;

	err = mkfifo(fifopath, 0666);

	if (err != 0)

	    {

	    // probably file already exists, delete the file

        unlink(fifopath);

        // try once more..

        err = mkfifo(fifopath, 0666);

        if (err != 0)

            {

            create_xml(1);

            return 1;

            }

        }

	for(cnt=0;cnt< MAX_SIGNALS;cnt++)

	{

#if defined(__WINSCW__) || defined(__WINS__)

		strcpy(exe_param,"Z:\\sys\\bin\\Simple_Server.exe ");

#else

		strcpy(exe_param,"C:\\sys\\bin\\Simple_Server.exe ");

#endif

		strcat(exe_param, names[cnt]);

		strcat(exe_param, obj_path[cnt]);

		fp[cnt] = popen(exe_param, "r");

			if(!fp[cnt])

				{

				std_log(LOG_FILENAME_LINE, "fp %d is NULL", cnt); 

				create_xml(1);

				return 1;

				}

		//wait till the server is up

		fd = open(fifopath, O_RDONLY);

	    if (fd> 0)

	        {

	        err = read(fd, buf, 20);

	        close(fd);

	        }

	    else

	        {

	        std_log(LOG_FILENAME_LINE, "Error in FIFO open().");

	        create_xml(1);

	        return 1;

	        }

	    if (strcmp("done", buf))

	        {

	        std_log(LOG_FILENAME_LINE,"done is not returned from server.");

	        create_xml(1);

	        return 1;

	        }

	}

	unlink(fifopath);

	dbus_error_init(&error);

	connection = dbus_bus_get_private(DBUS_BUS_SESSION, &error);

	if(!connection || dbus_error_is_set(&error))

		return handle_error(&error);

	msg = dbus_message_new_signal("/Test/Signal/Object", "Test.Signal.Send", "first");

//	sleep(2);

	if(!msg) 

	{

		std_log(LOG_FILENAME_LINE, "msg is NULL");

		create_xml(1);

		return 1;

	}

	if(!dbus_message_append_args(msg, DBUS_TYPE_STRING, &str, DBUS_TYPE_INVALID))

	{

		std_log(LOG_FILENAME_LINE, "Fail to append args");

		create_xml(1);

		return 1;

	}

   dbus_bus_add_match(connection, "type='signal',interface='Test.Signal.Send1'",&error);

    if(dbus_error_is_set(&error))

        return handle_error(&error);

    std_log(LOG_FILENAME_LINE, "Registering path");

    if(!dbus_connection_register_object_path (connection, "/Test/Signal/Object1", &vtable, NULL))

    { 

        std_log(LOG_FILENAME_LINE, "Registering path fail");

        create_xml(1);

        return 1;

    }

    std_log(LOG_FILENAME_LINE, "Requesting name");  

    if(!dbus_bus_request_name (connection, "test.Signal.Send1", DBUS_NAME_FLAG_ALLOW_REPLACEMENT, &error) == -1)

    {

        std_log(LOG_FILENAME_LINE, "Requesting name fail");

        create_xml(1);      

        return 1;

    }

	dbus_connection_send(connection, msg, NULL);

	dbus_connection_flush(connection);

	dbus_message_unref(msg);

	str = "";

	std_log(LOG_FILENAME_LINE, "First part over");

	cnt=0;

	while(TRUE)  

	{	

		dbus_connection_read_write(connection, 0);

		msg = dbus_connection_pop_message(connection);

		if(msg == NULL)

		{

			continue; 

		} 

		std_log(LOG_FILENAME_LINE, "Message Detected");

		if(dbus_message_is_signal(msg, "Test.Signal.Send1", "second"))

		{

			if(!dbus_message_get_args(msg, &error, DBUS_TYPE_STRING, &str, DBUS_TYPE_INVALID))

				{

					std_log(LOG_FILENAME_LINE, "Error while retriving arguments :: %s", error.name);

					dbus_error_free(&error);

					create_xml(1);

					return 1;

				}  

			std_log(LOG_FILENAME_LINE, "Got %d MSG : %s", cnt, str);

			cnt++;

			if(cnt==MAX_SIGNALS)

				break; 

		}  

		dbus_message_unref(msg);

	}

	dbus_connection_close(connection);

	dbus_connection_unref(connection);

	dbus_shutdown();

	for(cnt=0;cnt<MAX_SIGNALS;cnt++)

		if(fp[cnt])

			pclose(fp[cnt]);

	std_log(LOG_FILENAME_LINE, "Test Successful"); 

	create_xml(0);

	return 0;

}