/*
 * Copyright (C) 2012 Canonical Ltd.
 * Author: Robert Ancell <robert.ancell@canonical.com>
 *
 * 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, either version 3 of the License, or (at your option) any later
 * version. See http://www.gnu.org/copyleft/gpl.html the full text of the
 * license.
 */

public class BluetoothIndicator : AppIndicator.Indicator
{
    private GnomeBluetooth.Client client;
    private GnomeBluetooth.Killswitch killswitch;
    private bool updating_killswitch = false;
    private Gtk.MenuItem status_item;
    private Gtk.MenuItem enable_item;
    private bool enable_value = false;
    private Gtk.CheckMenuItem visible_item;
    private bool updating_visible = false;
    private Gtk.SeparatorMenuItem devices_separator;
    private List<BluetoothMenuItem> device_items;
    private Gtk.MenuItem settings_item;
    private Gtk.Menu menu;

    public BluetoothIndicator ()
    {
        Object (id: "indicator-bluetooth", icon_name: "bluetooth-active", category: "Hardware");

        killswitch = new GnomeBluetooth.Killswitch ();
        killswitch.state_changed.connect (killswitch_state_changed_cb);

        client = new GnomeBluetooth.Client ();

        set_status (AppIndicator.IndicatorStatus.ACTIVE);

        menu = new Gtk.Menu ();
        set_menu (menu);

        status_item = new Gtk.MenuItem ();
        status_item.sensitive = false;
        status_item.visible = true;
        menu.append (status_item);

        enable_item = new Gtk.MenuItem ();
        enable_item.activate.connect (() =>
        {
            if (updating_killswitch)
                return;
            if (killswitch.state == GnomeBluetooth.KillswitchState.UNBLOCKED)
                killswitch.state = GnomeBluetooth.KillswitchState.SOFT_BLOCKED;
            else
                killswitch.state = GnomeBluetooth.KillswitchState.UNBLOCKED;
        });
        menu.append (enable_item);

        visible_item = new Gtk.CheckMenuItem.with_label (_("Visible"));
        bool discoverable;
        client.get ("default-adapter-discoverable", out discoverable);
        visible_item.active = discoverable;
        client.notify["default-adapter-discoverable"].connect (() =>
        {
            updating_visible = true;
            bool is_discoverable;
            client.get ("default-adapter-discoverable", out is_discoverable);
            visible_item.active = is_discoverable;
            updating_visible = false;
        });
        visible_item.activate.connect (() =>
        {
            if (updating_visible)
                return;
            client.set ("default-adapter-discoverable", visible_item.active);
        });
        menu.append (visible_item);
    
        devices_separator = new Gtk.SeparatorMenuItem ();
        menu.append (devices_separator);

        device_items = new List<BluetoothMenuItem> ();

        client.model.row_inserted.connect (device_changed_cb);
        client.model.row_changed.connect (device_changed_cb);
        client.model.row_deleted.connect (device_removed_cb);
        Gtk.TreeIter iter;
        var have_iter = client.model.get_iter_first (out iter);
        while (have_iter)
        {
            Gtk.TreeIter child_iter;
            var have_child_iter = client.model.iter_children (out child_iter, iter);
            while (have_child_iter)
            {
                device_changed_cb (null, child_iter);
                have_child_iter = client.model.iter_next (ref child_iter);
            }
            have_iter = client.model.iter_next (ref iter);
        }

        var sep = new Gtk.SeparatorMenuItem ();
        sep.visible = true;
        menu.append (sep);

        settings_item = new Gtk.MenuItem.with_label (_("Bluetooth Settings..."));
        settings_item.activate.connect (() => { show_control_center ("bluetooth"); });
        settings_item.visible = true;
        menu.append (settings_item);

        killswitch_state_changed_cb (killswitch.state);
    }

    private BluetoothMenuItem? find_menu_item (DBusProxy proxy)
    {
        foreach (var item in device_items)
            if (item.proxy == proxy)
                return item;

        return null;
    }

    private void device_changed_cb (Gtk.TreePath? path, Gtk.TreeIter iter)
    {
        /* Ignore adapters */
        Gtk.TreeIter parent_iter;
        if (!client.model.iter_parent (out parent_iter, iter))
            return;

        DBusProxy proxy;
        string address;
        string alias;
        GnomeBluetooth.Type type;
        string icon;
        bool connected;
        HashTable services;
        string[] uuids;
        client.model.get (iter,
                          GnomeBluetooth.Column.PROXY, out proxy,
                          GnomeBluetooth.Column.ADDRESS, out address,
                          GnomeBluetooth.Column.ALIAS, out alias,
                          GnomeBluetooth.Column.TYPE, out type,
                          GnomeBluetooth.Column.ICON, out icon,
                          GnomeBluetooth.Column.CONNECTED, out connected,
                          GnomeBluetooth.Column.SERVICES, out services,
                          GnomeBluetooth.Column.UUIDS, out uuids);

        /* Skip if haven't actually got any information yet */
        if (proxy == null)
            return;
            
        /* Find or create menu item */
        var item = find_menu_item (proxy);
        if (item == null)
        {
            item = new BluetoothMenuItem (client, proxy);
            item.visible = true;
            var last_item = devices_separator as Gtk.MenuItem;
            if (device_items != null)
                last_item = device_items.last ().data;
            device_items.append (item);
            menu.insert (item, menu.get_children ().index (last_item) + 1);
        }

        item.update (type, address, alias, icon, connected, services, uuids);
    }

    private void device_removed_cb (Gtk.TreePath path)
    {
        Gtk.TreeIter iter;
        if (!client.model.get_iter (out iter, path))
            return;

        DBusProxy proxy;
        client.model.get (iter, GnomeBluetooth.Column.PROXY, out proxy);

        var item = find_menu_item (proxy);
        if (item == null)
            return;

        device_items.remove (item);
        menu.remove (item);
    }

    private void killswitch_state_changed_cb (GnomeBluetooth.KillswitchState state)
    {
        updating_killswitch = true;

        if (state == GnomeBluetooth.KillswitchState.HARD_BLOCKED)
        {
            icon_name = "bluetooth-inactive";
            status_item.label = _("Bluetooth: Disabled");
            enable_item.visible = false;
        }
        if (state == GnomeBluetooth.KillswitchState.SOFT_BLOCKED)
        {
            icon_name = "bluetooth-inactive";
            status_item.label = _("Bluetooth: Off");
            enable_item.label = _("Turn on Bluetooth");
            enable_item.visible = true;
            enable_value = false;
        }
        else
        {
            status_item.label = _("Bluetooth: On");
            enable_item.label = _("Turn off Bluetooth");
            enable_item.visible = true;
            enable_value = true;
        }

        if (state == GnomeBluetooth.KillswitchState.UNBLOCKED)
            icon_name = "bluetooth-active";
        else
            icon_name = "bluetooth-disabled";

        /* Disable devices when locked */
        visible_item.visible = state == GnomeBluetooth.KillswitchState.UNBLOCKED;
        devices_separator.visible = state == GnomeBluetooth.KillswitchState.UNBLOCKED;
        foreach (var item in device_items)
            item.visible = state == GnomeBluetooth.KillswitchState.UNBLOCKED;

        updating_killswitch = false;
    }
}

private class BluetoothMenuItem : Gtk.ImageMenuItem
{
    private GnomeBluetooth.Client client;
    public DBusProxy proxy;
    private Gtk.MenuItem? status_item = null;
    private Gtk.MenuItem? connect_item = null;

    public BluetoothMenuItem (GnomeBluetooth.Client client, DBusProxy proxy)
    {
        this.client = client;
        this.proxy = proxy;
        label = ""; /* Workaround for https://bugs.launchpad.net/bugs/1086563 - without a label it thinks this is a separator */
        image = new Gtk.Image ();
        always_show_image = true;
    }

    public void update (GnomeBluetooth.Type type, string address, string alias, string icon, bool connected, HashTable? services, string[] uuids)
    {
        label = alias;
        (image as Gtk.Image).icon_name = icon;

        submenu = new Gtk.Menu ();

        if (services != null)
        {
            status_item = new Gtk.MenuItem ();
            status_item.visible = true;
            status_item.sensitive = false;
            submenu.append (status_item);

            connect_item = new Gtk.MenuItem ();
            connect_item.visible = true;
            connect_item.activate.connect (() => { connect_service (proxy.get_object_path (), true); });
            submenu.append (connect_item);
        }

        update_connect_items (connected);
        
        var can_send = false;
        var can_browse = false;
        if (uuids != null)
        {
            for (var i = 0; uuids[i] != null; i++)
            {
                if (uuids[i] == "OBEXObjectPush")
                    can_send = true;
                if (uuids[i] == "OBEXFileTransfer")
                    can_browse = true;
            }
        }

        if (can_send)
        {
            var send_item = new Gtk.MenuItem.with_label (_("Send files..."));
            send_item.visible = true;
            send_item.activate.connect (() => { GnomeBluetooth.send_to_address (address, alias); });
            submenu.append (send_item);
        }

        if (can_browse)
        {
            var browse_item = new Gtk.MenuItem.with_label (_("Browse files..."));
            browse_item.visible = true;
            browse_item.activate.connect (() => { GnomeBluetooth.browse_address (null, address, Gdk.CURRENT_TIME, null); });
            submenu.append (browse_item);
        }

        switch (type)
        {
        case GnomeBluetooth.Type.KEYBOARD:
            var keyboard_item = new Gtk.MenuItem.with_label (_("Keyboard Settings..."));
            keyboard_item.visible = true;
            keyboard_item.activate.connect (() => { show_control_center ("keyboard"); });
            submenu.append (keyboard_item);
            break;

        case GnomeBluetooth.Type.MOUSE:
        case GnomeBluetooth.Type.TABLET:
            var mouse_item = new Gtk.MenuItem.with_label (_("Mouse and Touchpad Settings..."));
            mouse_item.visible = true;
            mouse_item.activate.connect (() => { show_control_center ("mouse"); });
            submenu.append (mouse_item);
            break;

        case GnomeBluetooth.Type.HEADSET:
        case GnomeBluetooth.Type.HEADPHONES:
        case GnomeBluetooth.Type.OTHER_AUDIO:
            var sound_item = new Gtk.MenuItem.with_label (_("Sound Settings..."));
            sound_item.visible = true;
            sound_item.activate.connect (() => { show_control_center ("sound"); });
            submenu.append (sound_item);
            break;
        }
    }

    private void connect_service (string device, bool connect)
    {
        status_item.label = _("Connecting...");
        client.connect_service.begin (device, connect, null, (object, result) =>
        {
            var connected = false;
            try
            {
                connected = client.connect_service.end (result);
            }
            catch (Error e)
            {
                warning ("Failed to connect service: %s", e.message);
            }
            update_connect_items (connected);
        });
    }

    private void update_connect_items (bool connected)
    {
        if (status_item != null)
        {
            if (connected)
                status_item.label = _("Connected");
            else
                status_item.label = _("Disconnected");
        }
        if (connect_item != null)
        {
            if (connected)
                connect_item.label = _("Disconnect");
            else
                connect_item.label = _("Connect");
        }
    }
}

private void show_control_center (string panel)
{
    try
    {
        Process.spawn_command_line_async ("gnome-control-center %s".printf (panel));
    }
    catch (GLib.SpawnError e)
    {
        warning ("Failed to open control center: %s", e.message);
    }
}

public static int main (string[] args)
{
    Intl.setlocale (LocaleCategory.ALL, "");
    Intl.bindtextdomain (GETTEXT_PACKAGE, LOCALE_DIR);
    Intl.bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8");
    Intl.textdomain (GETTEXT_PACKAGE);

    Gtk.init (ref args);

    var indicator = new BluetoothIndicator ();
    
    Gtk.main ();
    
    indicator = null;

    return Posix.EXIT_SUCCESS;
}