/**************************************************
** New SlashApp Code
** Justin Maurer, justin@slashdot.org
** Stolen from old code by many others, See AUTHORS
**************************************************/

#include "slashapp.h"
#include <ghttp.h>
#include "slashsplash.xpm"
#include <errno.h>
#include <ctype.h>

int refresh_time = 1800000;	/* frequency of updates (in seconds) */

int main(int argc, char *argv[])
{
	GtkWidget *applet;

	bindtextdomain(PACKAGE, GNOMELOCALEDIR);
	textdomain(PACKAGE);

	applet_widget_init("slash_applet", VERSION, argc, argv, NULL, 0, NULL);
	applet = applet_widget_new("slash_applet");

	if(!applet)	/* a little error checking...*/
		g_error("Can't create applet!\n");

	create_new_app(applet);

	applet_widget_gtk_main();
	return 0;
}

static AppData *create_new_app(GtkWidget *applet)
{
	AppData *ad;
	GtkWidget *icon;
	ad = g_new0(AppData, 1);

	ad->applet = applet;
	ad->article_window = NULL;
	ad->slashapp_dir = check_for_dir(gnome_util_home_file("slashapp"));
	if(!ad->slashapp_dir)
		g_error("Can't create slashapp dir in .gnome/\n");

	init_app_display(ad);

	/* connect all the signals to handlers */
	gtk_signal_connect(GTK_OBJECT(ad->applet), "destroy",
			GTK_SIGNAL_FUNC(destroy_applet), ad);
	gtk_signal_connect(GTK_OBJECT(ad->applet), "save_session",
			GTK_SIGNAL_FUNC(applet_save_session), ad);
	applet_widget_register_stock_callback(APPLET_WIDGET(ad->applet), 
			"properties", GNOME_STOCK_MENU_PROP, 
			_("Properties..."), property_show, ad);
	applet_widget_register_stock_callback(APPLET_WIDGET(ad->applet), 
			"about", GNOME_STOCK_MENU_ABOUT, 
			_("About..."), about_cb, NULL);
	applet_widget_register_stock_callback(APPLET_WIDGET(ad->applet), 
			"articles", GNOME_STOCK_MENU_BOOK_OPEN, 
			_("Articles"), show_article_window, ad);
	applet_widget_register_stock_callback(APPLET_WIDGET(ad->applet), 
			"refresh", GNOME_STOCK_MENU_REFRESH, 
			_("Refresh"), refresh_cb, ad);

	property_load(APPLET_WIDGET(applet)->privcfgpath, ad);
	gtk_timeout_add(refresh_time, get_current_headlines, ad);

	icon = gnome_pixmap_new_from_xpm_d(slashsplash_xpm);
	add_info_line_with_pixmap(ad, "", icon, 0, FALSE, 1, 0);
	add_info_line(ad, "SlashApp\n", NULL, 0, TRUE, 1, 0);
	add_info_line(ad, _("Loading headlines..."), NULL, 0, FALSE, 1, 20);
	
	gtk_widget_show(ad->applet);
	ad->startup_timeout_id = gtk_timeout_add(5000, startup_delay_cb, ad);

	return ad;
}

static gchar *check_for_dir(char *d)
{
	if(!g_file_exists(d)) {
		g_print(_("Creating user directory: %s\n"), d);
		if (mkdir(d, 0755) < 0) {
			g_print(_("Unable to create user directory: %s\n"), d);
			g_free(d);
			d = NULL;
		}	
	}
	return d;
}

static void destroy_applet(GtkWidget *widget, gpointer data)
{
	AppData *ad = data;

	gtk_timeout_remove(ad->display_timeout_id);
	gtk_timeout_remove(ad->headline_timeout_id);
	if (ad->startup_timeout_id > 0)
		gtk_timeout_remove(ad->startup_timeout_id);

	free_all_info_lines(ad);

	gtk_widget_destroy(ad->display_w);
	gtk_widget_destroy(ad->disp_buf_w);
	gtk_widget_destroy(ad->background_w);
	g_free(ad);
}

static gint applet_save_session(GtkWidget *widget, gchar *privcfgpath, 
		gpointer data)
{
	AppData *ad = data;
	property_save(privcfgpath, ad);
	return FALSE;
}

static void about_cb(AppletWidget *widget, gpointer data)
{
	GtkWidget *about;
	const gchar *authors[5];
	gchar version[32];

	sprintf(version, _("%d.%d.%d"), APPLET_VERSION_MAJ, 
			APPLET_VERSION_MIN, APPLET_VERSION_REV);
	authors[0] = _("Justin Maurer <justin@slashdot.org>");
	authors[1] = _("John Ellis <johne@bellatlantic.net>");
	authors[2] = _("Craig Small <csmall@eye-net.com.au>");
	authors[3] = _("Frederic Devernay <devernay@istar.fr>");
	authors[4] = NULL;

	about = gnome_about_new(_("SlashApp"), version,
			_("(C) 1998-1999"),
			authors,
			_("A stock ticker-like applet\n"),
			NULL);
	gtk_widget_show(about);
}

static void show_article_window(AppletWidget *applet, gpointer data)
{
	AppData *ad = data;

	if(ad->article_window) {
		gdk_window_raise(ad->article_window->window);
		return;
	}

	ad->article_window = gnome_dialog_new(_("SlashApp Article List"), 
			GNOME_STOCK_BUTTON_CLOSE, NULL);
	gtk_widget_set_usize(ad->article_window, 400, 350);
	
	ad->article_list = gtk_scrolled_window_new(NULL, NULL);
	gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(ad->article_list),
			GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
	gtk_box_pack_start(GTK_BOX(GNOME_DIALOG(ad->article_window)->vbox), 
			ad->article_list, TRUE, TRUE, 0);
	gtk_widget_show(ad->article_list);

	gtk_object_set_user_data(GTK_OBJECT(ad->article_list), NULL);
	gtk_signal_connect(GTK_OBJECT(ad->article_list), "destroy",
			(GtkSignalFunc) destroy_article_window, ad);

	populate_article_window(ad);
	gtk_widget_show(ad->article_window);
}

static void populate_article_window(AppData *ad)
{
	GtkWidget *vbox, *hbox;
	GtkWidget *label, *button;
	GtkWidget *pixmap;
	GList *list;
	gint added = FALSE;

	if(!ad->article_window) return;

        vbox = gtk_object_get_user_data(GTK_OBJECT(ad->article_list));
        if (vbox)
		gtk_widget_destroy(vbox);
        vbox = gtk_vbox_new(FALSE, 5);
	gtk_scrolled_window_add_with_viewport(
			GTK_SCROLLED_WINDOW(ad->article_list), vbox);
	gtk_widget_show(vbox);
	gtk_object_set_user_data(GTK_OBJECT(ad->article_list), vbox);

	list = ad->text;

	while(list) {
		InfoData *id = list->data;

		if(id && id->data && id->show_count == 0) {
				if(added) {
					GtkWidget *sep = gtk_hseparator_new();
					gtk_box_pack_start(GTK_BOX(vbox), sep, 
							FALSE, FALSE, 0);
					gtk_widget_show(sep);
				}
			hbox = gtk_hbox_new(FALSE, 5);
			gtk_box_pack_start(GTK_BOX(vbox), hbox,
					FALSE, FALSE, 0);
			gtk_widget_show(hbox);

			label = gtk_label_new(id->text);
			gtk_label_set_justify(GTK_LABEL(label), 
					GTK_JUSTIFY_LEFT);
			gtk_box_pack_start(GTK_BOX(hbox), label,
					FALSE, FALSE, 5);
			gtk_widget_show(label);

			button = gtk_button_new();
			gtk_object_set_user_data(GTK_OBJECT(button), id->data);
			gtk_signal_connect(GTK_OBJECT(button), "clicked",
					(GtkSignalFunc) article_button_cb, ad);
			gtk_box_pack_end(GTK_BOX(hbox), button, 
					FALSE, FALSE, 5);
			gtk_widget_show(button);

			pixmap = gnome_stock_pixmap_widget_new(
					ad->article_window, 
					GNOME_STOCK_PIXMAP_JUMP_TO);
			gtk_container_add(GTK_CONTAINER(button), pixmap);
			gtk_widget_show(pixmap);

			added = TRUE;
		}

		list = list->next;
	}

	if(!added) {
		hbox = gtk_hbox_new(FALSE, 5);
		gtk_box_pack_start(GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
		gtk_widget_show(hbox);

		label = gtk_label_new(_("No articles"));
		gtk_box_pack_start(GTK_BOX(hbox), label, FALSE, FALSE, 0);
		gtk_widget_show(label);
	}
}

static void refresh_cb(AppletWidget *widget, gpointer data)
{
	AppData *ad = data;
	GtkWidget *icon;
	
	remove_all_lines(ad);
	icon = gnome_pixmap_new_from_xpm_d(slashsplash_xpm);
        add_info_line_with_pixmap(ad, "", icon, 0, FALSE, 1, 0);
			
	if(ad->startup_timeout_id > 0)
		return;
	ad->startup_timeout_id = gtk_timeout_add(5000, startup_delay_cb, ad);
}

static int startup_delay_cb(gpointer data)
{
	AppData *ad = data;
	get_current_headlines(ad); 
	ad->startup_timeout_id = 0;
	return FALSE;
}

static int get_current_headlines(gpointer data)
{
	AppData *ad = data;
	FILE *file;
	GtkWidget *icon;
	gchar *filename;
	gint delay = ad->article_delay / 10 * (1000 / UPDATE_DELAY);

	filename = g_strconcat(ad->slashapp_dir, "/", "headlines", NULL);
	file = fopen(filename, "w");
	if(file) {
		http_get_to_file(ad->host, ad->port, ad->proxy, ad->resource, 
				file, data);
		fclose(file);
		parse_headlines(data);
	}
	return TRUE;
}

static void parse_headlines(gpointer data)
{
	xmlDocPtr doc;
	
	doc=xmlParseFile(gnome_util_home_file("slashapp/headlines"));	

	if(doc==NULL) 
		g_error(_("Unable to parse document\n"));

	tree_walk(doc->root, data); /* the bulk of the work) */
}

static int http_get_to_file(gchar *host, gint port, gchar *proxy, 
		gchar *resource, FILE *file, gpointer data)
{
	int length = -1;
	ghttp_request *request = NULL;
	gchar s_port[8];
	gchar *body, *uri = NULL;

	g_snprintf(s_port, 8, "%d", port); /* int to (g)char */
	uri = g_strconcat("http://", host, ":", s_port, "/", resource, NULL);
	request = ghttp_request_new();

	if(!request){
		g_warning(_("Unable to initialize request. Shouldn't 
					happen\n"));
		if(request) ghttp_request_destroy(request);
		if(uri) g_free(uri);
		return length;
	}
/*	if(proxy && (ghttp_set_proxy(request, proxy) != 0)) {
		g_warning(_("Unable to set proxy.\n"));
                if(request) ghttp_request_destroy(request);
                if(uri) g_free(uri);
		return length;
	} 
	if(ghttp_set_uri(request, uri) != 0) {
		g_warning(_("Unable to set URI (URL)\n"));
                if(request) ghttp_request_destroy(request);
                if(uri) g_free(uri);
		return length;
	} */
	
	ghttp_set_uri(request, "http://slashdot.org:80/slashdot.xml");
	ghttp_set_header(request, http_hdr_Connection, "close");
	
	if(ghttp_prepare(request) != 0) {
	        if(request) ghttp_request_destroy(request);
	        if(uri) g_free(uri);
		g_warning(_("Unable to prepare request.\n"));
		return length;
	}
	if(ghttp_process(request) != ghttp_done) {
		g_warning(_("Unable to process request.\n"));
                if(request) ghttp_request_destroy(request);
                if(uri) g_free(uri);
		return length;
	}

	length = ghttp_get_body_len(request);
	body = ghttp_get_body(request);

	if(body!=NULL)
		fwrite(body, length, 1, file);

	return length;
}

static void tree_walk(xmlNodePtr root, gpointer data)
{
	AppData *ad = data;
	InfoData *id; 
	xmlNodePtr walk = root->childs;
	xmlNodePtr image = NULL;
	xmlNodePtr item[16];
	int i=0;
	int items=0, itemcount=0;
	gint delay = ad->article_delay / 10 * (1000 / UPDATE_DELAY);

	while(walk!=NULL) {
		if(strcasecmp(walk->name, "story")==0 && items<16) {
			item[i++] = walk;
			itemcount++;
		}
	walk=walk->next;
	}

	remove_all_lines(ad);
	for(i=0;i<itemcount;i++) {
		char *title = layer_find(item[i]->childs, "title", "No title");
		char *url = layer_find(item[i]->childs, "url", "No url");
/*		char *time = layer_find(item[i]->childs, "time", "No time");
		char *author = layer_find(item[i]->childs, "author", 
				"No author");
		char *image = layer_find(item[i]->childs, "iamge", "No image");
*/
		char *temp = g_strconcat(title, NULL);
                id = add_info_line(ad, temp, NULL, 0, FALSE, FALSE, delay); 
		set_info_click_signal(id, click_headline_cb, g_strdup(url), 
				g_free);
		add_info_line(ad, "", NULL, 0, FALSE, FALSE, delay);
	}
}

static void destroy_article_window(GtkWidget *widget, gpointer data)
{
	AppData *ad = data;
	ad->article_window = NULL;
}

static void article_button_cb(GtkWidget *widget, gpointer data)
{
	AppData *ad = data;
	gchar *url = gtk_object_get_user_data(GTK_OBJECT(widget));
	gnome_url_show(url);
}
			
static char *layer_find(xmlNodePtr node, char *match, char *fail)
{
	while(node!=NULL) {
		if(strcasecmp(node->name, match)==0) {
			if(node->childs != NULL && 
			   node->childs->content != NULL) 
				return node->childs->content;
			else
				return fail;
		}
		node = node->next;
	}
	return fail;
}

static void click_headline_cb(AppData *ad, gpointer data)
{
	gchar *url = data;
	if(url)
		gnome_url_show(url);
}