use crate::websocket::meta::*;
use crate::websocket::user::*;
use crate::AppState;
use crate::Game;
use crate::NewGameManifest;
use anyhow::Result;
use axum::extract::ws::CloseFrame;
use axum::{
    extract::{
        ws::{Message, WebSocket},
        ConnectInfo, State, WebSocketUpgrade,
    },
    response::IntoResponse,
};
use futures::{SinkExt, StreamExt};
use lib::*;
use serde_json::{from_str, to_string};
use std::{
    net::SocketAddr,
    sync::{Arc, RwLock},
};
use tokio::sync::broadcast::Sender;
pub mod meta;
pub mod user;

/// Establish the WebSocket connection
pub async fn websocket_connection_handler(
    ws: WebSocketUpgrade,
    // user_agent: Option<TypedHeader<headers::UserAgent>>,
    ConnectInfo(addr): ConnectInfo<SocketAddr>,
    State(state): State<Arc<AppState>>,
) -> impl IntoResponse {
    tracing::debug!("New connection from {}", &addr);
    ws.on_upgrade(move |socket| websocket_on_connection(socket, state, addr))
}

/// This runs right after a WebSocket connection is established
pub async fn websocket_on_connection(stream: WebSocket, state: Arc<AppState>, addr: SocketAddr) {
    // Split channels to send and receive asynchronously.
    let (mut sender, mut receiver) = stream.split();

    // Set up new user
    user_handle_new(&mut sender, &state, &addr)
        .await
        .expect("Error creating new user!");

    // Subscribe to receive from global broadcast channel
    let mut rx = state.tx.subscribe();

    // Send messages to this client
    let mut send_task = tokio::spawn(async move {
        while let Ok(msg) = rx.recv().await {
            if sender.send(Message::Text(msg)).await.is_err() {
                break;
            }
        }
    });

    // Receive messages from this client
    let mut recv_task = tokio::spawn(async move {
        while let Some(Ok(message)) = receiver.next().await {
            websocket_message_handler(state.clone(), addr, message)
                .await
                .expect("Message Handler exploded!")
        }
    });

    // If either task completes then abort the other
    tokio::select! {
        _ = (&mut send_task) => recv_task.abort(),
        _ = (&mut recv_task) => send_task.abort(),
    };
}

/// Handle incoming messages over the WebSocket
pub async fn websocket_message_handler(
    state: Arc<AppState>,
    addr: SocketAddr,
    message: Message,
) -> Result<()> {
    let tx = &state.tx;

    match message {
        Message::Text(text) => match text {
            _new_game if let Ok(_new_game) = from_str::<NewGameRequest>(&text) => {
                tracing::debug!("New game request received.");
                game_handle_new_game(_new_game, &state, tx, addr)?;
            }
            _chat_message if let Ok(_chat_message) = from_str::<ChatMessage>(&text) => {
                websocket_handle_chat_message(_chat_message, &state, tx, addr)?;
            }
            _user_log_in if let Ok(_user_log_in) = from_str::<UserLogIn>(&text) => {
                websocket_handle_user_log_in(_user_log_in, &state, tx, addr)?;
            }
            _ => {
                tracing::debug!("Unhandled text message: {}", &text);
            }
        },
        Message::Binary(data) => {
            tracing::debug!("Binary: {:?}", data)
        }
        Message::Close(close_frame) => {
            websocket_handle_close(close_frame, &state, tx, addr)?;
        }
        Message::Pong(ping) => {
            tracing::debug!("Pong received with: {:?}", ping);
        }
        Message::Ping(pong) => {
            tracing::debug!("Pong received with: {:?}", pong);
        }
    }

    Ok(())
}

/// This runs when a NewGameRequest is received
fn game_handle_new_game(
    new_game: NewGameRequest,
    state: &Arc<AppState>,
    tx: &Sender<String>,
    addr: SocketAddr,
) -> Result<()> {
    let manifest = NewGameManifest {
        name: new_game.name,
        host: state
            .online_users
            .read()
            .unwrap()
            .get(&addr)
            .unwrap()
            .clone(),
    };
    tracing::debug!("Game Packs {:?}", new_game.packs);

    // create game
    if let Ok(new_game_object) = Game::new(manifest) {
        state
            .games
            .write()
            .unwrap()
            .insert(new_game_object.name.clone(), RwLock::new(new_game_object));
        tx.send(meta_games_browser_update(state))?;
        tx.send(meta_server_summary_update(state))?;
    }

    Ok(())
}

/// This runs when a ChatMessage is received
fn websocket_handle_chat_message(
    chat_message: ChatMessage,
    state: &Arc<AppState>,
    tx: &Sender<String>,
    addr: SocketAddr,
) -> Result<()> {
    let msg = format! {"{0}: {1}", state.online_users.read().unwrap().get(&addr).unwrap().read().unwrap().name, chat_message.text};
    tracing::debug!("{msg}");
    tx.send(to_string::<ChatMessage>(&ChatMessage { text: msg })?)?;

    Ok(())
}

/// This runs when a UserLogIn is received
fn websocket_handle_user_log_in(
    user_log_in: UserLogIn,
    state: &Arc<AppState>,
    tx: &Sender<String>,
    addr: SocketAddr,
) -> Result<()> {
    let old_name = state
        .online_users
        .read()
        .unwrap()
        .get(&addr)
        .unwrap()
        .read()
        .unwrap()
        .name
        .clone();
    let new_name = user_log_in.username.clone();

    if state.offline_users.read().unwrap().contains_key(&new_name) {
        state
            .online_users
            .write()
            .unwrap()
            .insert(
                addr,
                state
                    .offline_users
                    .write()
                    .unwrap()
                    .remove(&new_name)
                    .unwrap(),
            )
            .unwrap();

        let msg = format! {
            "{0} changed name to {1}. Welcome back!",
            old_name,
            new_name
        };

        tracing::debug!("{msg}");
    } else if state.reserved_names.read().unwrap().contains(&new_name) {
        tracing::debug!("name is taken");
    } else {
        state
            .online_users
            .write()
            .unwrap()
            .get_mut(&addr)
            .unwrap()
            .write()
            .unwrap()
            .change_name(user_log_in.username);

        let msg = format! {
            "{0} changed name to {1}.",
            old_name,
            new_name
        };

        // Reserve name
        state
            .reserved_names
            .write()
            .unwrap()
            .insert(new_name.clone());

        tracing::debug!("{msg}");
        tx.send(to_string::<ChatMessage>(&ChatMessage { text: msg })?)?;
        tracing::debug!("Name {} reserved.", &new_name);
    }

    tracing::debug!(
        "Online Users: {} Offline Users: {}",
        state.online_users.read().unwrap().len(),
        state.offline_users.read().unwrap().len()
    );
    tx.send(meta_games_browser_update(state))?;
    tx.send(meta_chat_update(state))?;

    // send the user their new name

    Ok(())
}

/// This runs when a connection closes
fn websocket_handle_close(
    close_frame: Option<CloseFrame>,
    state: &Arc<AppState>,
    tx: &Sender<String>,
    addr: SocketAddr,
) -> Result<()> {
    if let Some(cf) = close_frame {
        tracing::debug!(
            "Close received from {0} with code: {1} and reason: {2}",
            state
                .online_users
                .read()
                .unwrap()
                .get(&addr)
                .unwrap()
                .read()
                .unwrap()
                .name,
            cf.code,
            cf.reason
        )
    } else {
        tracing::debug!("close received without close frame")
    }

    let msg = ChatMessage {
        text: format!(
            "{0} left.",
            state
                .online_users
                .read()
                .unwrap()
                .get(&addr)
                .unwrap()
                .read()
                .unwrap()
                .name
        ),
    };

    tracing::debug!("{}", msg.text);
    tx.send(to_string::<ChatMessage>(&msg)?)?;
    let name = state
        .online_users
        .read()
        .unwrap()
        .get(&addr)
        .unwrap()
        .read()
        .unwrap()
        .name
        .clone();

    state.offline_users.write().unwrap().insert(
        name.clone(),
        state.online_users.write().unwrap().remove(&addr).unwrap(),
    );

    tx.send(meta_server_summary_update(state))?;
    tx.send(meta_chat_update(state))?;

    Ok(())
}