use std::sync::Arc;

use chrono::NaiveDateTime;
use crossterm::event::{KeyCode, KeyEvent, KeyModifiers};
use tokio::sync::mpsc;

use crate::domain::models::*;
use crate::infrastructure::api::ApiClient;
use crate::infrastructure::db::Db;
use crate::ui::{Focus, NetworkStatus, Popup};

pub struct App {
    pub lists: Vec<TaskList>,
    pub tasks: Vec<Task>,
    pub selected_list: usize,
    pub selected_task: usize,
    pub focus: Focus,
    pub show_popup: Option<Popup>,
    pub network_status: NetworkStatus,
    pub popup_input: String,
    pub popup_cursor: usize,
    pub draft_date: NaiveDateTime,
    pub should_quit: bool,
    pub task_list_scroll: u16,
    pub detail_scroll: u16,
    pub db: Arc<Db>,
    pub api_client: Arc<ApiClient>,
    sync_tx: mpsc::Sender<SyncCommand>,
}

pub enum SyncCommand {
    TriggerSync,
    Shutdown,
}

impl App {
    pub fn new(db: Arc<Db>, api_client: Arc<ApiClient>, sync_tx: mpsc::Sender<SyncCommand>) -> Self {
        let lists = db.get_lists();
        let tasks = if !lists.is_empty() {
            let list_id = &lists[0].id;
            db.get_tasks(list_id)
        } else {
            Vec::new()
        };

        Self {
            lists,
            tasks,
            selected_list: 0,
            selected_task: 0,
            focus: Focus::Tabs,
            show_popup: None,
            network_status: NetworkStatus::Online,
            popup_input: String::new(),
            popup_cursor: 0,
            draft_date: chrono::Local::now().naive_local(),
            should_quit: false,
            task_list_scroll: 0,
            detail_scroll: 0,
            db,
            api_client,
            sync_tx,
        }
    }

    fn trigger_sync(&self) {
        let _ = self.sync_tx.try_send(SyncCommand::TriggerSync);
    }

    pub fn handle_key(&mut self, key: KeyEvent) {
        if let Some(ref popup) = self.show_popup.clone() {
            self.handle_popup_key(key, popup);
            return;
        }

        match key.code {
            KeyCode::Tab => {
                self.focus = match self.focus {
                    Focus::Tabs => Focus::TaskList,
                    Focus::TaskList => Focus::Detail,
                    Focus::Detail => Focus::Tabs,
                };
            }
            KeyCode::Up if key.modifiers.contains(KeyModifiers::ALT) => {
                if self.focus == Focus::TaskList && !self.tasks.is_empty() {
                    self.reorder_task(-1);
                }
            }
            KeyCode::Down if key.modifiers.contains(KeyModifiers::ALT) => {
                if self.focus == Focus::TaskList && !self.tasks.is_empty() {
                    self.reorder_task(1);
                }
            }
            KeyCode::Up => match self.focus {
                Focus::TaskList => {
                    if self.selected_task > 0 {
                        self.selected_task -= 1;
                        self.task_list_scroll = self.task_list_scroll.saturating_sub(1);
                    }
                }
                Focus::Detail => {
                    self.detail_scroll = self.detail_scroll.saturating_sub(1);
                }
                _ => {}
            },
            KeyCode::Down => match self.focus {
                Focus::TaskList => {
                    if self.selected_task + 1 < self.tasks.len() {
                        self.selected_task += 1;
                        self.task_list_scroll += 1;
                    }
                }
                Focus::Detail => {
                    self.detail_scroll += 1;
                }
                _ => {}
            },
            KeyCode::Right => {
                if self.focus == Focus::Tabs && !self.lists.is_empty() {
                    if self.selected_list + 1 < self.lists.len() {
                        self.selected_list += 1;
                        self.load_tasks();
                    }
                }
            }
            KeyCode::Left => {
                if self.focus == Focus::Tabs && !self.lists.is_empty() {
                    if self.selected_list > 0 {
                        self.selected_list -= 1;
                        self.load_tasks();
                    }
                }
            }
            KeyCode::Char('n') | KeyCode::Char('N') => {
                self.popup_input.clear();
                self.popup_cursor = 0;
                self.show_popup = Some(Popup::Input);
            }
            KeyCode::Char('d') | KeyCode::Char('D') => {
                self.show_popup = Some(Popup::ConfirmDelete);
            }
            KeyCode::Char('e') | KeyCode::Char('E') => {
                if self.focus == Focus::TaskList && !self.tasks.is_empty() {
                    let task = &self.tasks[self.selected_task];
                    self.popup_input = task.title.clone();
                    self.popup_cursor = task.title.len();
                    self.show_popup = Some(Popup::Input);
                }
            }
            KeyCode::Enter => {
                if self.focus == Focus::Detail && !self.tasks.is_empty() {
                    self.show_popup = Some(Popup::DatePicker);
                }
            }
            KeyCode::Esc => {
                self.show_popup = None;
            }
            KeyCode::Char('q') | KeyCode::Char('Q') => {
                self.should_quit = true;
            }
            _ => {}
        }
    }

    fn handle_popup_key(&mut self, key: KeyEvent, popup: &Popup) {
        match popup {
            Popup::Input => match key.code {
                KeyCode::Esc => {
                    self.show_popup = None;
                }
                KeyCode::Enter => {
                    let input = self.popup_input.trim().to_string();
                    if !input.is_empty() {
                        match self.focus {
                            Focus::Tabs => {
                                let list = TaskList {
                                    id: uuid_v4(),
                                    title: input,
                                };
                                self.db.insert_list(&list).ok();
                                self.db.push_sync(
                                    SyncAction::Create,
                                    &list.id,
                                    &list.id,
                                    &serde_json::to_string(&list).unwrap_or_default(),
                                ).ok();
                                self.trigger_sync();
                                self.load_lists();
                            }
                            Focus::TaskList => {
                                if !self.lists.is_empty() {
                                    let list_id = &self.lists[self.selected_list].id;
                                    let task = Task {
                                        id: uuid_v4(),
                                        list_id: list_id.clone(),
                                        title: input,
                                        notes: None,
                                        status: TaskStatus::NeedsAction,
                                        due: None,
                                        position: 0,
                                    };
                                    self.db.insert_task(&task).ok();
                                    self.db.push_sync(
                                        SyncAction::Create,
                                        &task.id,
                                        list_id,
                                        &serde_json::to_string(&task).unwrap_or_default(),
                                    ).ok();
                                    self.trigger_sync();
                                    self.load_tasks();
                                }
                            }
                            Focus::Detail => {
                                if !self.tasks.is_empty() {
                                    let task = &mut self.tasks[self.selected_task];
                                    task.title = input;
                                    self.db.update_task(task).ok();
                                    self.db.push_sync(
                                        SyncAction::Update,
                                        &task.id,
                                        &task.list_id,
                                        &serde_json::to_string(task).unwrap_or_default(),
                                    ).ok();
                                    self.trigger_sync();
                                    self.load_tasks();
                                }
                            }
                        }
                    }
                    self.show_popup = None;
                }
                KeyCode::Char(c) => {
                    self.popup_input.insert(self.popup_cursor, c);
                    self.popup_cursor += 1;
                }
                KeyCode::Backspace => {
                    if self.popup_cursor > 0 {
                        self.popup_cursor -= 1;
                        self.popup_input.remove(self.popup_cursor);
                    }
                }
                KeyCode::Delete => {
                    if self.popup_cursor < self.popup_input.len() {
                        self.popup_input.remove(self.popup_cursor);
                    }
                }
                KeyCode::Left => {
                    self.popup_cursor = self.popup_cursor.saturating_sub(1);
                }
                KeyCode::Right => {
                    if self.popup_cursor < self.popup_input.len() {
                        self.popup_cursor += 1;
                    }
                }
                KeyCode::Home => {
                    self.popup_cursor = 0;
                }
                KeyCode::End => {
                    self.popup_cursor = self.popup_input.len();
                }
                _ => {}
            },
            Popup::DatePicker => match key.code {
                KeyCode::Esc => {
                    self.show_popup = None;
                }
                KeyCode::Enter => {
                    if !self.tasks.is_empty() {
                        let task = &mut self.tasks[self.selected_task];
                        task.due = Some(self.draft_date);
                        self.db.update_task(task).ok();
                        self.db.push_sync(
                            SyncAction::Update,
                            &task.id,
                            &task.list_id,
                            &serde_json::to_string(task).unwrap_or_default(),
                        ).ok();
                        self.trigger_sync();
                        self.load_tasks();
                    }
                    self.show_popup = None;
                }
                KeyCode::Up => {
                    self.draft_date = self.draft_date + chrono::Duration::hours(1);
                }
                KeyCode::Down => {
                    self.draft_date = self.draft_date - chrono::Duration::hours(1);
                }
                _ => {}
            },
            Popup::ConfirmDelete => match key.code {
                KeyCode::Esc => {
                    self.show_popup = None;
                }
                KeyCode::Enter => {
                    match self.focus {
                        Focus::Tabs => {
                            if self.selected_list < self.lists.len() {
                                let list_id = self.lists[self.selected_list].id.clone();
                                self.db.delete_list(&list_id).ok();
                                self.db.push_sync(
                                    SyncAction::Delete,
                                    &list_id,
                                    &list_id,
                                    "",
                                ).ok();
                                self.trigger_sync();
                                self.load_lists();
                                if self.selected_list >= self.lists.len() {
                                    self.selected_list = self.lists.len().saturating_sub(1);
                                }
                                self.load_tasks();
                            }
                        }
                        Focus::TaskList | Focus::Detail => {
                            if !self.tasks.is_empty() && self.selected_task < self.tasks.len() {
                                let task = &self.tasks[self.selected_task];
                                let task_id = task.id.clone();
                                let list_id = task.list_id.clone();
                                self.db.delete_task(&task_id).ok();
                                self.db.push_sync(
                                    SyncAction::Delete,
                                    &task_id,
                                    &list_id,
                                    "",
                                ).ok();
                                self.trigger_sync();
                                self.load_tasks();
                                if self.selected_task >= self.tasks.len() {
                                    self.selected_task = self.tasks.len().saturating_sub(1);
                                }
                            }
                        }
                    }
                    self.show_popup = None;
                }
                _ => {}
            },
            Popup::DeviceAuth { .. } => match key.code {
                KeyCode::Enter | KeyCode::Esc => {
                    self.show_popup = None;
                }
                _ => {}
            },
        }
    }

    fn reorder_task(&mut self, direction: i64) {
        if self.tasks.is_empty() {
            return;
        }

        let new_index = self.selected_task as i64 + direction;
        if new_index < 0 || new_index >= self.tasks.len() as i64 {
            return;
        }

        let task_id = self.tasks[self.selected_task].id.clone();
        let list_id = self.tasks[self.selected_task].list_id.clone();

        let new_pos = if direction > 0 {
            self.tasks[new_index as usize].position
        } else {
            self.tasks[new_index as usize].position
        };

        if self.db.reorder_task(&task_id, new_pos).is_ok() {
            let payload = serde_json::json!({
                "task_id": task_id,
                "new_position": new_pos
            });
            self.db.push_sync(
                SyncAction::Reorder,
                &task_id,
                &list_id,
                &payload.to_string(),
            ).ok();
            self.trigger_sync();
            self.selected_task = new_index as usize;
            self.load_tasks();
        }
    }

    fn load_lists(&mut self) {
        self.lists = self.db.get_lists();
    }

    fn load_tasks(&mut self) {
        if self.selected_list < self.lists.len() {
            self.tasks = self.db.get_tasks(&self.lists[self.selected_list].id);
        } else {
            self.tasks.clear();
        }
        if self.selected_task >= self.tasks.len() && !self.tasks.is_empty() {
            self.selected_task = self.tasks.len() - 1;
        } else if self.tasks.is_empty() {
            self.selected_task = 0;
        }
    }
}

fn uuid_v4() -> String {
    use std::time::{SystemTime, UNIX_EPOCH};
    let now = SystemTime::now()
        .duration_since(UNIX_EPOCH)
        .unwrap_or_default();
    let nanos = now.as_nanos();
    format!(
        "{:08x}-{:04x}-4{:03x}-{:04x}-{:012x}",
        (nanos >> 32) as u32,
        (nanos >> 16) as u16 & 0xffff,
        (nanos >> 4) as u16 & 0xfff,
        (nanos >> 48) as u16 & 0xffff,
        (nanos & 0xfffffffffffff) as u64
    )
}

#[cfg(test)]
mod tests {
    use super::*;

    #[test]
    fn test_uuid_v4_format() {
        let id = uuid_v4();
        assert_eq!(id.len(), 36);
        assert_eq!(&id[8..9], "-");
        assert_eq!(&id[13..14], "-");
        assert_eq!(&id[18..19], "-");
        assert_eq!(&id[23..24], "-");
    }
}