#include <stdio.h>
#include <string.h>
#include <glade/glade.h>
#include <libmpd/libmpd.h>
#include <libmpd/debug_printf.h>
#include  "plugin.h"
#include "main.h"
#include "gmpc_easy_download.h"
int url_right_mouse_menu(GtkWidget *menu, int type, GtkWidget *tree, GdkEventButton *event);


static int url_get_enabled(void);
static void url_set_enabled(int enabled);

/** in gmpc */
void pl3_option_menu_activate(); 
void pl3_push_statusbar_message(char *mesg);	


gmpcPlBrowserPlugin url_gpb  = {
	NULL, /**Add */
	NULL, /** Selected */
	NULL, /** Unselected */
	NULL, /** slection changed */ 
	NULL, /** expanded */ 
	url_right_mouse_menu, /* right mouse menu */
	NULL, /** cat key press */
	NULL, /** add go menu */
	NULL /** key press event */ 
};

gmpcPlugin url_plugin = {
	"Url Parser Plugin",
	{0,0,3},
	GMPC_PLUGIN_PL_BROWSER,
	0,  	/* plugin id */
	NULL,   /* path to plugin */
	NULL,   /* initialization */
        NULL,   /* Destroy */
	&url_gpb, /* browser intergration */
	NULL,	/* status changed */
	NULL,	/* connection changed */
	NULL,	/* preferences */
	NULL,	/* Metadata */
	url_get_enabled,
	url_set_enabled
};

static int url_get_enabled(void)
{
	return cfg_get_single_value_as_int_with_default(config, "url", "enable", TRUE);
}
static void url_set_enabled(int enabled)
{
	cfg_set_single_value_as_int(config, "url", "enable", enabled);
	pl3_option_menu_activate(); 
}

/***
 * Parse PLS files:
 */
static void url_parse_pls_file(const char *data, int size)
{
	int i=0;
	int songs = 0;
	gchar **tokens = g_strsplit(data, "\n", -1);
	if(tokens)
	{
		for(i=0;tokens[i];i++)
		{
			/* Check for File */
			if(!strncmp(tokens[i], "File", 4))
			{
				int del = 0;
				/* split the string, look for delimiter = */
				for(del = 3; tokens[i][del] != '\0' && tokens[i][del] != '=';del++);
				/** if delimiter is found, and the url behind it starts with http:// add it*/
				if(tokens[i][del] == '=' && strncmp(&tokens[i][del+1], "http://", 7) == 0)
				{
					printf("Adding %s\n", &tokens[i][del+1]);		
					mpd_playlist_add(connection, &tokens[i][del+1]);	
					songs++;
				}
			}
		}
		g_strfreev(tokens);
	}
	if(songs)
	{
		char *string = g_strdup_printf(_("Added %i %s"), songs, (songs > 1)? _("streams"):_("stream"));
		pl3_push_statusbar_message(string);
		q_free(string);
	}
}
/***
 * Parse EXTM3U Files:
 */
static void url_parse_extm3u_file(const char *data, int size)
{
	int i=0;
	int songs = 0;
	gchar **tokens = g_strsplit(data, "\n", -1);
	if(tokens)
	{
		for(i=0;tokens[i];i++)
		{
			/* Check for File */
			if(!strncmp(tokens[i], "http://", 7))
			{
				printf("Adding %s\n", tokens[i]);
				mpd_playlist_add(connection, tokens[i]);		
				songs++;
			}
		}
		g_strfreev(tokens);
	}
	if(songs)
	{
		char *string = g_strdup_printf(_("Added %i %s"), songs, (songs > 1)? _("streams"):_("stream"));
		pl3_push_statusbar_message(string);
		q_free(string);
	}
}

/**
 * Check url for correctness
 */
static gboolean url_validate_url(const gchar *text)
{
	/** test if text has a length */
	if(!text || text[0] == '\0')
		return FALSE;
	/* you need at least 8 chars to form http://<url> */
	if(strlen(text) < 8)
		return FALSE;
	/* must start with http */
	if(strncmp(text, "http://", 7))
		return FALSE;

	return TRUE;
}
/**
 * Handle user input
 */
static void url_entry_changed(GtkEntry *entry, GtkWidget *add_button)
{
	const gchar *text = gtk_entry_get_text(entry);
	gtk_widget_set_sensitive(add_button, url_validate_url(text));
}
static void url_progress_callback(int size, int total,GtkProgressBar *pb)
{
	if(total > 0)
	{
		gtk_progress_bar_set_fraction(pb, size/(double)total);
	}
	else{
		gtk_progress_bar_pulse(pb);
	}
	while(gtk_events_pending())
		gtk_main_iteration();
}
static int url_check_binary(char *data, int size)
{
	int i=0;
	int binary = FALSE;
	for(i=0;i < size;i++) {
		if((unsigned int)data[i] > 127) binary = TRUE;
	}
	if(binary)
		printf("Binary data found\n");
	return binary;
}

static void url_start()
{
	url_start_real(NULL);
}

void url_start_real(const gchar *url)
{
	/**
	 * Setup the Dialog
	 */
	GtkWidget *vbox = NULL, *label = NULL, *entry=NULL,*ali = NULL, *progress = NULL;
	GtkWidget *add_button = NULL;
	GtkWidget *dialog = gtk_dialog_new_with_buttons
		("Open URL", NULL,
		 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
		 NULL);
	gtk_window_set_resizable(GTK_WINDOW(dialog), FALSE);
	/* Add buttons */
	gtk_dialog_add_button(GTK_DIALOG(dialog), GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL); /** CANCEL BUTTON */
	add_button = gtk_dialog_add_button(GTK_DIALOG(dialog), GTK_STOCK_ADD, GTK_RESPONSE_OK); /** ADD BUTTON */

	/* set default state */
	gtk_widget_set_sensitive(add_button, FALSE);
	/**
	 * Setup widgets in dialog
	 */
	vbox = gtk_vbox_new(FALSE, 6);
	gtk_container_add(GTK_CONTAINER(GTK_DIALOG(dialog)->vbox), vbox);

	/* set hig margins */
	gtk_container_set_border_width(GTK_CONTAINER(vbox), 9);
	gtk_container_set_border_width(GTK_CONTAINER(dialog), 3);
	/**
	 * Setup the label
	 */
	label = gtk_label_new(_("Enter an url")); 
	ali = gtk_alignment_new(0,0.5,0,0);
	gtk_container_add(GTK_CONTAINER(ali), label);
	gtk_box_pack_start(GTK_BOX(vbox), ali, FALSE, TRUE, 0);
	/**
	 * Setup the entry box
	 */
	entry = gtk_entry_new();
	gtk_box_pack_start(GTK_BOX(vbox), entry, FALSE, TRUE, 0);
	g_signal_connect(G_OBJECT(entry), "changed", G_CALLBACK(url_entry_changed), add_button);
	if(url)
		gtk_entry_set_text(GTK_ENTRY(entry), url);
	progress = gtk_progress_bar_new();
	gtk_box_pack_start(GTK_BOX(vbox), progress, FALSE, TRUE, 0);

	gtk_widget_show_all(dialog);
	gtk_widget_hide(progress);
	switch(gtk_dialog_run(GTK_DIALOG(dialog)))
	{
		case GTK_RESPONSE_OK:
			{	

				const gchar *text = gtk_entry_get_text(GTK_ENTRY(entry));
				/*  In any case, don't download more then 2 kbyte */
				gmpc_easy_download_struct dld = {NULL, 0, 4096,(ProgressCallback)url_progress_callback, progress};
				gtk_widget_show(progress);
				gtk_widget_set_sensitive(dialog, FALSE);
				if(gmpc_easy_download(text, &dld) && dld.size)
				{
					if(url_check_binary(dld.data, dld.size))
					{
						printf("Adding url: %s\n", text);
						mpd_playlist_add(connection, (char *)text);
						pl3_push_statusbar_message(_("Added 1 stream"));
					}	
					/** pls file: */
					else if(!strncasecmp(dld.data, "[playlist]",10))
					{
						printf("Detected a PLS\n");
						url_parse_pls_file(dld.data, dld.size);
					}
					/** Extended M3U file */
					else if (!strncasecmp(dld.data, "#EXTM3U", 7))
					{
						printf("Detected a Extended M3U\n");
						url_parse_extm3u_file(dld.data, dld.size);
					}
					/** Hack to detect most non-extended m3u files */
					else if (!strncasecmp(dld.data, "http://", 7))
					{
						printf("Might be a M3U, or generic list\n");
						url_parse_extm3u_file(dld.data, dld.size);
					}
					/** Assume Binary file */
					else
					{
						printf("Adding url: %s\n", text);
						mpd_playlist_add(connection, (char *)text);

						pl3_push_statusbar_message(_("Added 1 stream"));
					}
					gmpc_easy_download_clean(&dld);
				}
				else{
					/** 
					 * Failed to contact %s
					 * Show an error dialog  
					 */
					/* Make a copy so we can safely destroy the widget */
					gchar *url = g_strdup(text);
					/* Destroy old popup */
					gtk_widget_destroy(dialog);
					/* Create info dialog */
					dialog = gtk_message_dialog_new(NULL, GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
						GTK_MESSAGE_INFO,GTK_BUTTONS_CLOSE,
						_("Failed to contact url: '%s'"), url);
					q_free(url);
					/* run it */
					gtk_dialog_run(GTK_DIALOG(dialog));

				}
			}		
		default:
			break;
	}	
	gtk_widget_destroy(dialog);
}



int url_right_mouse_menu(GtkWidget *menu, int type, GtkWidget *tree, GdkEventButton *event)
{
	gmpcPlugin *plug = plugin_get_from_id(type);
	if(!cfg_get_single_value_as_int_with_default(config, "url", "enable", TRUE)) {
		return 0;
	}
	debug_printf(DEBUG_INFO,"URL right mouse clicked");	
	if(!strcmp(plug->name, "Current Playlist Browser")) 
	{
		GtkWidget *item;
		item = gtk_image_menu_item_new_with_label(_("Add URL"));
		gtk_image_menu_item_set_image(GTK_IMAGE_MENU_ITEM(item),
				gtk_image_new_from_icon_name("gmpc-add-url", GTK_ICON_SIZE_MENU));
		gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);
		g_signal_connect(G_OBJECT(item), "activate", G_CALLBACK(url_start), NULL);
		return 1;
	}
	return 0;
}