// This file has code that has been documented by the NodeJS GameDig library
// (MIT) from https://github.com/gamedig/node-gamedig/blob/master/protocols/minecraftbedrock.js
use crate::{
    buffer::{Buffer, Utf8Decoder},
    games::minecraft::{BedrockResponse, GameMode, Server},
    protocols::types::TimeoutSettings,
    socket::{Socket, UdpSocket},
    utils::{error_by_expected_size, retry_on_timeout},
    GDErrorKind::{PacketBad, TypeParse},
    GDResult,
};

use std::net::SocketAddr;

use byteorder::LittleEndian;

pub struct Bedrock {
    socket: UdpSocket,
    retry_count: usize,
}

impl Bedrock {
    fn new(address: &SocketAddr, timeout_settings: Option<TimeoutSettings>) -> GDResult<Self> {
        let socket = UdpSocket::new(address)?;
        socket.apply_timeout(&timeout_settings)?;

        let retry_count = TimeoutSettings::get_retries_or_default(&timeout_settings);
        Ok(Self {
            socket,
            retry_count,
        })
    }

    fn send_status_request(&mut self) -> GDResult<()> {
        self.socket.send(&[
            0x01, // Message ID: ID_UNCONNECTED_PING
            0x11, 0x22, 0x33, 0x44, 0x55, 0x66, 0x77, 0x88, // Nonce / timestamp
            0x00, 0xff, 0xff, 0x00, 0xfe, 0xfe, 0xfe, 0xfe, 0xfd, 0xfd, 0xfd, 0xfd, 0x12, 0x34, // Magic
            0x56, 0x78, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // Client GUID
        ])?;

        Ok(())
    }

    /// Send a status request, and parse the response.
    /// This function will retry fetch on timeouts.
    fn get_info(&mut self) -> GDResult<BedrockResponse> {
        retry_on_timeout(self.retry_count, move || self.get_info_impl())
    }

    /// Send a status request, and parse the response (without retry logic).
    fn get_info_impl(&mut self) -> GDResult<BedrockResponse> {
        self.send_status_request()?;

        let received = self.socket.receive(None)?;
        let mut buffer = Buffer::<LittleEndian>::new(&received);

        if buffer.read::<u8>()? != 0x1c {
            return Err(PacketBad.context("Expected 0x1c"));
        }

        // Checking for our nonce directly from a u64 (as the nonce is 8 bytes).
        if buffer.read::<u64>()? != 9_833_440_827_789_222_417 {
            return Err(PacketBad.context("Invalid nonce"));
        }

        // These 8 bytes are identical to the serverId string we receive in decimal
        // below
        buffer.move_cursor(8)?;

        // Verifying the magic value (as we need 16 bytes, cast to two u64 values)
        if buffer.read::<u64>()? != 18_374_403_896_610_127_616 {
            return Err(PacketBad.context("Invalid magic"));
        }

        if buffer.read::<u64>()? != 8_671_175_388_723_805_693 {
            return Err(PacketBad.context("Invalid magic"));
        }

        let remaining_length = buffer.switch_endian_chunk(2)?.read::<u16>()? as usize;

        error_by_expected_size(remaining_length, buffer.remaining_length())?;

        let binding = buffer.read_string::<Utf8Decoder>(None)?;
        let status: Vec<&str> = binding.split(';').collect();

        // We must have at least 6 values
        if status.len() < 6 {
            return Err(PacketBad.context("Not enough values"));
        }

        Ok(BedrockResponse {
            edition: status[0].to_string(),
            name: status[1].to_string(),
            version_name: status[3].to_string(),
            protocol_version: status[2].to_string(),
            players_maximum: status[5].parse().map_err(|e| TypeParse.context(e))?,
            players_online: status[4].parse().map_err(|e| TypeParse.context(e))?,
            id: status.get(6).map(std::string::ToString::to_string),
            map: status.get(7).map(std::string::ToString::to_string),
            game_mode: match status.get(8) {
                None => None,
                Some(v) => Some(GameMode::from_bedrock(v)?),
            },
            server_type: Server::Bedrock,
        })
    }

    pub fn query(address: &SocketAddr, timeout_settings: Option<TimeoutSettings>) -> GDResult<BedrockResponse> {
        Self::new(address, timeout_settings)?.get_info()
    }
}