use anyhow::Result;
use cursive::Cursive;
use cursive::Printer;
use cursive::Rect;
use cursive::View;
use cursive::XY;
use cursive::direction::Direction;
use cursive::event::Callback;
use cursive::event::Event;
use cursive::event::EventResult;
use cursive::view::Nameable;
use cursive::view::Selector;
use cursive::views::Dialog;
use cursive::views::EditView;
use cursive::views::NamedView;
use cursive::views::ResizedView;
use cursive::traits::Resizable;

use crate::configuration::Configuration;
use crate::maillist_view::MaillistView;

pub const MAIN_VIEW_NAME: &'static str = "main_view";
pub const MAIN_MAIL_LIST_NAME: &'static str = "main_mail_list";

pub struct MainView {
    config: Configuration,
    tabs: cursive_tabs::TabPanel<String>,
}

impl View for MainView {
    fn draw(&self, printer: &Printer) {
        self.tabs.draw(printer)
    }

    fn layout(&mut self, xy: XY<usize>) {
        self.tabs.layout(xy)
    }

    fn needs_relayout(&self) -> bool {
        self.tabs.needs_relayout()
    }

    fn required_size(&mut self, constraint: XY<usize>) -> XY<usize> {
        self.tabs.required_size(constraint)
    }

    fn on_event(&mut self, e: Event) -> EventResult {
        match e {
            Event::Char('q') => {
                if self.tabs.tab_order().len() == 1 {
                    EventResult::Ignored
                } else {
                    if let Some(key) = self.tabs.active_tab().cloned() {
                        debug!("Removing tab: {}", key);
                        if let Err(e) = self.tabs.remove_tab(&key) {
                            error!("{:?}", e); // TODO do more than just logging
                        }
                        debug!("Remove tab");
                        EventResult::Consumed(None)
                    } else {
                        debug!("No tab to remove found.");
                        EventResult::Ignored
                    }
                }
            },

            Event::Char('o') => {
                EventResult::Consumed(Some(Callback::from_fn(MainView::add_notmuch_query_layer)))
            },

            other => self.tabs.on_event(other),
        }
    }

    fn call_on_any<'a>(&mut self, s: &Selector, tpl: &'a mut (dyn FnMut(&mut (dyn View + 'static)) + 'a)) {
        self.tabs.call_on_any(s, tpl);
    }

    fn focus_view(&mut self, s: &Selector) -> Result<(), ()> {
        self.tabs.focus_view(s)
    }

    fn take_focus(&mut self, source: Direction) -> bool {
        self.tabs.take_focus(source)
    }

    fn important_area(&self, view_size: XY<usize>) -> Rect {
        self.tabs.important_area(view_size)
    }

    fn type_name(&self) -> &'static str {
        self.tabs.type_name()
    }

}

impl MainView {
    pub fn new(config: Configuration) -> Result<NamedView<Self>> {
        let tabs = cursive_tabs::TabPanel::default()
            .with_bar_alignment(cursive_tabs::Align::Start)
            .with_bar_placement(cursive_tabs::Placement::HorizontalTop)
            .with_tab(config.notmuch_default_query().clone(), {
                ResizedView::new(cursive::view::SizeConstraint::Full,
                                 cursive::view::SizeConstraint::Full,
                                 MaillistView::create_for(config.notmuch_database_path().clone(), config.notmuch_default_query(), MAIN_MAIL_LIST_NAME.to_string())?)
            });

        Ok(MainView { config, tabs }.with_name(MAIN_VIEW_NAME))
    }

    pub fn add_tab<T: View>(&mut self, id: String, view: T) {
        self.tabs.add_tab(id, view)
    }

    pub fn config(&self) -> &Configuration {
        &self.config
    }

    fn add_notmuch_query_layer(siv: &mut Cursive) {
        use crate::util::dialog_for;
        use crate::util::error_dialog_for;

        let edit_view = EditView::new()
            .on_submit(move |siv: &mut Cursive, query: &str| {
                siv.call_on_name(MAIN_VIEW_NAME, move |main_view: &mut MainView| {
                        main_view.config().notmuch_database_path().clone()
                    })
                    .map(|dbpath| {
                        let t = MaillistView::create_for(dbpath, query, query.to_string())?
                            .full_screen()
                            .with_name(format!("{}-view", query));

                        siv.call_on_name(MAIN_VIEW_NAME, move |main_view: &mut MainView| {
                            main_view.add_tab(query.to_string(), t);
                        });

                        siv.pop_layer();
                        Ok(())
                    })
                    .unwrap_or_else(|| {
                        siv.pop_layer();
                        siv.add_layer(dialog_for("Failed to get database connection set up"));
                        Ok(())
                    })
                    .unwrap_or_else(|e: anyhow::Error| {
                        siv.pop_layer();
                        siv.add_layer(error_dialog_for(e))
                    });
            })
            .with_name("query");

        siv.add_layer({
            Dialog::around(edit_view)
                .title("Query")
                .min_width(80)
        })
    }

}