/*
 * dhcpcd-gtk
 * Copyright 2009-2014 Roy Marples <roy@marples.name>
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

#include "config.h"
#include "dhcpcd-gtk.h"

static const char *copyright = "Copyright (c) 2009-2013 Roy Marples";
static const char *authors[] = { "Roy Marples <roy@marples.name>", NULL };

static void
on_pref(_unused GObject *o, gpointer data)
{

	dhcpcd_prefs_show((DHCPCD_CONNECTION *)data);
}

static void
on_quit(void)
{

	gtk_main_quit();
}

#if GTK_MAJOR_VERSION == 2
static void
url_show(GtkAboutDialog *dialog, const char *url)
{
	GdkScreen *screen;

	screen = gtk_widget_get_screen(GTK_WIDGET(dialog));
	gtk_show_uri(screen, url, GDK_CURRENT_TIME, NULL);
}

static void
email_hook(GtkAboutDialog *dialog, const char *url, _unused gpointer data)
{
	char *address;

	address = g_strdup_printf("mailto:%s", url);
	url_show(dialog, address);
	g_free(address);
}


static void
url_hook(GtkAboutDialog *dialog, const char *url, _unused gpointer data)
{
	url_show(dialog, url);
}
#endif

static void
ssid_hook(_unused GtkMenuItem *item, gpointer data)
{
	DHCPCD_WI_SCAN *scan;
	WI_SCAN *wi;

	scan = (DHCPCD_WI_SCAN *)data;
	wi = wi_scan_find(scan);
	if (wi)
		wpa_configure(wi->connection, wi->interface, scan);
}

static void
on_about(_unused GtkMenuItem *item)
{

	gtk_window_set_default_icon_name("network-transmit-receive");
#if GTK_MAJOR_VERSION == 2
	gtk_about_dialog_set_email_hook(email_hook, NULL, NULL);
	gtk_about_dialog_set_url_hook(url_hook, NULL, NULL);
#endif
	gtk_show_about_dialog(NULL,
	    "version", VERSION,
	    "copyright", copyright,
	    "website-label", "dhcpcd Website",
	    "website", "http://roy.marples.name/projects/dhcpcd",
	    "authors", authors,
	    "logo-icon-name", "network-transmit-receive",
	    "comments", "Part of the dhcpcd project",
	    NULL);
}

static GtkWidget *
add_scans(WI_SCAN *scan)
{
	DHCPCD_WI_SCAN *wis;
	GtkWidget *menu, *item, *image, *box, *label, *bar;
	double perc;
	int strength;
	const char *icon;
	char *tip;

	if (scan->scans == NULL)
		return NULL;
	menu = gtk_menu_new();
	for (wis = scan->scans; wis; wis = wis->next) {
		item = gtk_check_menu_item_new();
		gtk_check_menu_item_set_draw_as_radio(
			GTK_CHECK_MENU_ITEM(item), true); 
		box = gtk_box_new(GTK_ORIENTATION_HORIZONTAL, 4);
		gtk_container_add(GTK_CONTAINER(item), box); 
		label = gtk_label_new(wis->ssid);
		gtk_box_pack_start(GTK_BOX(box), label, TRUE, TRUE, 0);

		if (g_strcmp0(wis->ssid, scan->interface->ssid) == 0)
			gtk_check_menu_item_set_active(
				GTK_CHECK_MENU_ITEM(item), true);
		if (wis->flags == NULL)
			icon = "network-wireless";
		else
			icon = "network-wireless-encrypted";
		image = gtk_image_new_from_icon_name(icon,
		    GTK_ICON_SIZE_MENU);
		gtk_box_pack_start(GTK_BOX(box), image, FALSE, FALSE, 0);

		bar = gtk_progress_bar_new();
		gtk_widget_set_size_request(bar, 100, -1);
		gtk_box_pack_end(GTK_BOX(box), bar, FALSE, TRUE, 0);
		if (wis->quality.value == 0)
			strength = wis->level.average;
		else
			strength = wis->quality.average;
		perc = CLAMP(strength, 0, 100) / 100.0;
		gtk_progress_bar_set_fraction(GTK_PROGRESS_BAR(bar), perc);

		tip = g_strconcat(wis->bssid, " ", wis->flags, NULL);
		gtk_widget_set_tooltip_text(item, tip);
		g_free(tip);

		gtk_widget_show(label);
		gtk_widget_show(bar);
		gtk_widget_show(image);
		gtk_widget_show(box);
		g_signal_connect(G_OBJECT(item), "activate",
		    G_CALLBACK(ssid_hook), wis);
		gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);
	}
	return menu;
}

static void
on_activate(GtkStatusIcon *icon)
{
	WI_SCAN *w;
	GtkWidget *menu, *item, *image;

	notify_close();
	if (wi_scans == NULL)
		return;
	if (wi_scans->next) {
		menu = gtk_menu_new();
		for (w = wi_scans; w; w = w->next) {
			item = gtk_image_menu_item_new_with_label(
				w->interface->ifname);
			image = gtk_image_new_from_icon_name(
				"network-wireless", GTK_ICON_SIZE_MENU);
			gtk_image_menu_item_set_image(
				GTK_IMAGE_MENU_ITEM(item), image);
			gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);
			gtk_menu_item_set_submenu(GTK_MENU_ITEM(item),
			    add_scans(w));
		}
	} else
		menu = add_scans(wi_scans);

	if (menu) {
		gtk_widget_show_all(GTK_WIDGET(menu));
		gtk_menu_popup(GTK_MENU(menu), NULL, NULL,
		    gtk_status_icon_position_menu, icon,
		    1, gtk_get_current_event_time());
	}
}

static void
on_popup(GtkStatusIcon *icon, guint button, guint32 atime, gpointer data)
{
	DHCPCD_CONNECTION *con;
	GtkMenu *menu;
	GtkWidget *item, *image;

	notify_close();

	con = (DHCPCD_CONNECTION *)data;
	menu = (GtkMenu *)gtk_menu_new();

	item = gtk_image_menu_item_new_with_mnemonic(_("_Preferences"));
	image = gtk_image_new_from_icon_name(GTK_STOCK_PREFERENCES,
	    GTK_ICON_SIZE_MENU);
	gtk_image_menu_item_set_image(GTK_IMAGE_MENU_ITEM(item), image);
	if (g_strcmp0(dhcpcd_status(con), "down") == 0)
		gtk_widget_set_sensitive(item, false);
	else
		g_signal_connect(G_OBJECT(item), "activate",
		    G_CALLBACK(on_pref), data);
	gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);

	item = gtk_separator_menu_item_new();
	gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);

	item = gtk_image_menu_item_new_with_mnemonic(_("_About"));
	image = gtk_image_new_from_icon_name(GTK_STOCK_ABOUT,
	    GTK_ICON_SIZE_MENU);
	gtk_image_menu_item_set_image(GTK_IMAGE_MENU_ITEM(item), image);
	g_signal_connect(G_OBJECT(item), "activate",
	    G_CALLBACK(on_about), icon);
	gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);

	item = gtk_image_menu_item_new_with_mnemonic(_("_Quit"));
	image = gtk_image_new_from_icon_name(GTK_STOCK_QUIT,
	    GTK_ICON_SIZE_MENU);
	gtk_image_menu_item_set_image(GTK_IMAGE_MENU_ITEM(item), image);
	g_signal_connect(G_OBJECT(item), "activate",
	    G_CALLBACK(on_quit), icon);
	gtk_menu_shell_append(GTK_MENU_SHELL(menu), item);

	gtk_widget_show_all(GTK_WIDGET(menu));
	gtk_menu_popup(GTK_MENU(menu), NULL, NULL,
	    gtk_status_icon_position_menu, icon, button, atime);
	if (button == 0)
		gtk_menu_shell_select_first(GTK_MENU_SHELL(menu), FALSE);
}

void
menu_init(GtkStatusIcon *icon, DHCPCD_CONNECTION *con)
{

	g_signal_connect(G_OBJECT(icon), "activate",
	    G_CALLBACK(on_activate), con);
	g_signal_connect(G_OBJECT(icon), "popup_menu",
	    G_CALLBACK(on_popup), con);
}


#if GTK_MAJOR_VERSION == 2
GtkWidget *
gtk_box_new(GtkOrientation o, gint s)
{

	if (o == GTK_ORIENTATION_HORIZONTAL)
		return gtk_hbox_new(false, s);
	else
		return gtk_vbox_new(false, s);
}
#endif