eadkp 0.20.0

use enum_iterator::Sequence;

/// Représente l'état du clavier en utilisant un entier de 64 bits, où chaque bit correspond à une touche spécifique.
type EadkKeyboardState = u64;

/// Représentation binaire brute de chaque touche du clavier.
/// 
/// Permet a l'aide de `KeyboardState::key_down` de vérifier si une touche spécifique est enfoncée ou relâchée.
/// **Différent de `Event`** qui représente des événements de touches individuelles (y compris les touches alphanumériques)
/// plutôt que l'état global du clavier.
#[allow(dead_code)]
#[derive(Clone, Copy, PartialEq, Eq, Sequence, Debug)]
#[repr(u8)]
pub enum Key {
        Left = 0,
        Up = 1,
        Down = 2,
        Right = 3,
        Ok = 4,
        Back = 5,
        Home = 6,
        OnOff = 8,
        Shift = 12,
        Alpha = 13,
        Xnt = 14,
        Var = 15,
        Toolbox = 16,
        Backspace = 17,
        Exp = 18,
        Ln = 19,
        Log = 20,
        Imaginary = 21,
        Comma = 22,
        Power = 23,
        Sine = 24,
        Cosine = 25,
        Tangent = 26,
        Pi = 27,
        Sqrt = 28,
        Square = 29,
        Seven = 30,
        Eight = 31,
        Nine = 32,
        LeftParenthesis = 33,
        RightParenthesis = 34,
        Four = 36,
        Five = 37,
        Six = 38,
        Multiplication = 39,
        Division = 40,
        One = 42,
        Two = 43,
        Three = 44,
        Plus = 45,
    Minus = 46,
    Zero = 48,
    Dot = 49,
    Ee = 50,
    Ans = 51,
    Exe = 52,
}


/// Fournit des méthodes pour interagir avec l'état du clavier.
/// 
/// Permet :
/// - de savoir quelles touches sont actuellement enfoncées ou relâchées.
/// - de détecter les touches qui viennent d'être enfoncées
/// - de détecter les touches qui viennent d'être relâchées
/// 
/// # Attention
/// `Event` et `Key` sont deux types différents :
/// - `Key` représente les touches physiques du clavier et est utilisé pour vérifier l'état de ces touches dans `KeyboardState`.
/// - `Event` représente des événements de touches individuelles (y compris les touches alphanumériques) et est utilisé pour détecter
/// les événements de touches spécifiques via `event_get`.
#[derive(Clone, Copy)]
pub struct KeyboardState(EadkKeyboardState);

impl Default for KeyboardState {
    /// Crée un nouvel état de clavier avec toutes les touches relâchées.
    fn default() -> Self {
        Self::new()
    }
}

impl KeyboardState {
    /// Scanne l'état actuel du clavier et retourne une nouvelle instance de KeyboardState représentant cet état.
    pub fn scan() -> Self {
        Self::from_raw(unsafe { eadk_keyboard_scan() })
    }

    /// Crée un nouvel état de clavier avec toutes les touches relâchées (valeur par défaut).
    pub fn new() -> Self {
        KeyboardState(0)
    }

    /// Crée une instance de KeyboardState à partir d'un état brut (EadkKeyboardState).
    pub fn from_raw(state: EadkKeyboardState) -> Self {
        Self(state)
    }

    /// Vérifie si une touche spécifique est actuellement enfoncée.
    /// 
    /// Permet de vérifier l'**état d'une touche physique** spécifique (pas un événement de touche) !
    pub fn key_down(&self, key: Key) -> bool {
        (self.0 >> (key as u8)) & 1 != 0
    }
    
    /// Vérifie si une touche spécifique est actuellement relâchée.
    pub fn get_just_pressed(&self, old: KeyboardState) -> Self {
        KeyboardState(self.0 & (!old.0))
    }

    /// Vérifie si une touche spécifique vient d'être relâchée par rapport à un état précédent.
    pub fn get_just_realeased(&self, old: KeyboardState) -> Self {
        KeyboardState((!self.0) & old.0)
    }
}

/// Représente un événement de touche, qui peut être une touche de navigation, une touche de fonction ou une touche alphanumérique.
#[allow(dead_code)]
#[derive(Clone, Copy, PartialEq, Eq)]
#[repr(u16)]
pub enum Event {
        Left = 0,
        Up = 1,
        Down = 2,
        Right = 3,
        Ok = 4,
        Back = 5,
        Shift = 12,
        Alpha = 13,
        Xnt = 14,
        Var = 15,
        Toolbox = 16,
        Backspace = 17,
        Exp = 18,
        Ln = 19,
        Log = 20,
        Imaginary = 21,
        Comma = 22,
        Power = 23,
        Sine = 24,
        Cosine = 25,
        Tangent = 26,
        Pi = 27,
        Sqrt = 28,
        Square = 29,
        Seven = 30,
        Eight = 31,
        Nine = 32,
        LeftParenthesis = 33,
        RightParenthesis = 34,
        Four = 36,
        Five = 37,
        Six = 38,
        Multiplication = 39,
        Division = 40,
        One = 42,
        Two = 43,
        Three = 44,
        Plus = 45,
        Minus = 46,
        Zero = 48,
        Dot = 49,
        Ee = 50,
        Ans = 51,
        Exe = 52,
        ShiftLeft = 54,
        ShiftUp = 55,
        ShiftDown = 56,
        ShiftRight = 57,
        AlphaLock = 67,
        Cut = 68,
        Copy = 69,
        Paste = 70,
        Clear = 71,
        LeftBracket = 72,
        RightBracket = 73,
        LeftBrace = 74,
        RightBrace = 75,
        Underscore = 76,
        Sto = 77,
        Arcsine = 78,
        Arccosine = 79,
        Arctangent = 80,
        Equal = 81,
        Lower = 82,
        Greater = 83,
        Colon = 122,
        Semicolon = 123,
        DoubleQuotes = 124,
        Percent = 125,
        LowerA = 126,
        LowerB = 127,
        LowerC = 128,
        LowerD = 129,
        LowerE = 130,
        LowerF = 131,
        LowerG = 132,
        LowerH = 133,
        LowerI = 134,
        LowerJ = 135,
        LowerK = 136,
        LowerL = 137,
        LowerM = 138,
        LowerN = 139,
        LowerO = 140,
        LowerP = 141,
        LowerQ = 142,
        LowerR = 144,
        LowerS = 145,
        LowerT = 146,
        LowerU = 147,
        LowerV = 148,
        LowerW = 150,
        LowerX = 151,
        LowerY = 152,
        LowerZ = 153,
        Space = 154,
        Question = 156,
        Exclamation = 157,
        UpperA = 180,
        UpperB = 181,
        UpperC = 182,
        UpperD = 183,
        UpperE = 184,
        UpperF = 185,
        UpperG = 186,
        UpperH = 187,
        UpperI = 188,
        UpperJ = 189,
        UpperK = 190,
        UpperL = 191,
        UpperM = 192,
        UpperN = 193,
        UpperO = 194,
        UpperP = 195,
        UpperQ = 196,
        UpperR = 198,
        UpperS = 199,
        UpperT = 200,
        UpperU = 201,
        UpperV = 202,
        UpperW = 204,
        UpperX = 205,
        UpperY = 206,
        UpperZ = 207,
}

impl Event {
    /// Vérifie si l'événement correspond à une touche numérique (0-9).
    pub fn is_digit(&self) -> bool {
        matches!(
            self,
            Event::Zero
                | Event::One
                | Event::Two
                | Event::Three
                | Event::Four
                | Event::Five
                | Event::Six
                | Event::Seven
                | Event::Eight
                | Event::Nine
        )
    }

    /// Convertit une touche numérique en sa valeur correspondante (0-9). Retourne None si ce n'est pas une touche numérique.
    pub fn to_digit(&self) -> Option<u8> {
        match self {
            Event::Zero => Some(0),
            Event::One => Some(1),
            Event::Two => Some(2),
            Event::Three => Some(3),
            Event::Four => Some(4),
            Event::Five => Some(5),
            Event::Six => Some(6),
            Event::Seven => Some(7),
            Event::Eight => Some(8),
            Event::Nine => Some(9),
            _ => None,
        }
    }

    /// Vérifie si l'événement correspond à une touche alphanumérique (lettre ou symbole) plutôt qu'à une touche de navigation ou de fonction.
    pub fn is_alphanumeric(&self) -> bool {
        !matches!(
            self,
            Event::Left
            | Event::Up
            | Event::Down
            | Event::Right
            | Event::Ok
            | Event::Back
            | Event::Shift
            | Event::Alpha
            | Event::Backspace
            | Event::Toolbox
            | Event::Exe
            | Event::AlphaLock
            | Event::Cut
            | Event::Copy
            | Event::Paste 
            | Event::Clear
            | Event::ShiftLeft
            | Event::ShiftUp
            | Event::ShiftDown
            | Event::ShiftRight
        )
    }

    /// Convertit une touche alphanumérique en sa représentation string correspondante (Retourne None si ce n'est pas une touche alphanumérique).
    /// 
    /// Exemples :
    /// ```
    /// A -> "A"
    /// a -> "a"
    /// 1 -> "1"
    /// + -> "+"
    /// Cosine -> "cos("
    /// Pi -> "π"
    /// ...
    /// ```
    pub fn to_alphanumeric(&self) -> Option<&'static str> {
        match self {
            Event::Zero =>  Some("0"),
            Event::One =>   Some("1"),
            Event::Two =>   Some("2"),
            Event::Three => Some("3"),
            Event::Four =>  Some("4"),
            Event::Five =>  Some("5"),
            Event::Six =>   Some("6"),
            Event::Seven => Some("7"),
            Event::Eight => Some("8"),
            Event::Nine =>  Some("9"),

            Event::Space =>            Some(" "),
            Event::Question =>         Some("?"),
            Event::Exclamation =>      Some("!"),
            Event::Comma =>            Some(","),
            Event::Colon =>            Some(":"),
            Event::Semicolon =>        Some(";"),
            Event::DoubleQuotes =>     Some("\""),
            Event::Percent =>          Some("%"),
            Event::Plus =>             Some("+"),
            Event::Minus =>            Some("-"),
            Event::Multiplication =>   Some("*"),
            Event::Division =>         Some("/"),
            Event::Dot =>              Some("."),
            Event::Equal =>            Some("="),
            Event::Underscore =>       Some("_"),
            Event::Greater =>          Some(">"),
            Event::Lower =>            Some("<"),
            Event::Sto =>              Some("→"),
            Event::Pi =>               Some("π"),
            Event::Imaginary =>        Some("i"),
            Event::Square =>           Some("^2"),
            Event::Power =>            Some("^"),
            Event::LeftParenthesis =>  Some("("),
            Event::RightParenthesis => Some(")"),
            Event::LeftBrace =>        Some("{"),
            Event::RightBrace =>       Some("}"),
            Event::LeftBracket =>      Some("["),
            Event::RightBracket =>     Some("]"),
            Event::Ee =>               Some("*10^"),
            
            Event::Log =>        Some("log("),
            Event::Ln =>         Some("ln("),
            Event::Sine =>       Some("sin("),
            Event::Cosine =>     Some("cos("),
            Event::Tangent =>    Some("tan("),
            Event::Sqrt =>       Some("sqrt("),
//          Event::Ans =>        Some("Ans"),
            Event::Xnt =>        Some("xnt("),
            Event::Var =>        Some("var("),
            Event::Exp =>        Some("exp("),
            Event::Arcsine =>    Some("arsin("),
            Event::Arccosine =>  Some("arcos("),
            Event::Arctangent => Some("artan("),

            Event::UpperA => Some("A"),
            Event::UpperB => Some("B"),
            Event::UpperC => Some("C"),
            Event::UpperD => Some("D"),
            Event::UpperE => Some("E"),
            Event::UpperF => Some("F"),
            Event::UpperG => Some("G"),
            Event::UpperH => Some("H"),
            Event::UpperI => Some("I"),
            Event::UpperJ => Some("J"),
            Event::UpperK => Some("K"),
            Event::UpperL => Some("L"),
            Event::UpperM => Some("M"),
            Event::UpperN => Some("N"),
            Event::UpperO => Some("O"),
            Event::UpperP => Some("P"),
            Event::UpperQ => Some("Q"),
            Event::UpperR => Some("R"),
            Event::UpperS => Some("S"),
            Event::UpperT => Some("T"),
            Event::UpperU => Some("U"),
            Event::UpperV => Some("V"),
            Event::UpperW => Some("W"),
            Event::UpperX => Some("X"),
            Event::UpperY => Some("Y"),
            Event::UpperZ => Some("Z"),

            Event::LowerA => Some("a"),
            Event::LowerB => Some("b"),
            Event::LowerC => Some("c"),
            Event::LowerD => Some("d"),
            Event::LowerE => Some("e"),
            Event::LowerF => Some("f"),
            Event::LowerG => Some("g"),
            Event::LowerH => Some("h"),
            Event::LowerI => Some("i"),
            Event::LowerJ => Some("j"),
            Event::LowerK => Some("k"),
            Event::LowerL => Some("l"),
            Event::LowerM => Some("m"),
            Event::LowerN => Some("n"),
            Event::LowerO => Some("o"),
            Event::LowerP => Some("p"),
            Event::LowerQ => Some("q"),
            Event::LowerR => Some("r"),
            Event::LowerS => Some("s"),
            Event::LowerT => Some("t"),
            Event::LowerU => Some("u"),
            Event::LowerV => Some("v"),
            Event::LowerW => Some("w"),
            Event::LowerX => Some("x"),
            Event::LowerY => Some("y"),
            Event::LowerZ => Some("z"),
             _=> None,
        }
    }
}

unsafe extern "C" {
    fn eadk_event_get(timeout: &i32) -> Event;
}

unsafe extern "C" {
    fn eadk_keyboard_scan() -> EadkKeyboardState;
}

pub fn event_get(timeout: i32) -> Event {
    unsafe { eadk_event_get(&timeout) }
}