use std::collections::HashMap;

use super::{Builtin, GLOBAL_FUNCTIONS};
use crate::common::{Brackets, QuoteKind};
use crate::scope::global_var_exists;
use crate::unit::Unit;
use crate::value::{SassFunction, Value};

pub(crate) fn register(f: &mut HashMap<String, Builtin>) {
    f.insert(
        "if".to_owned(),
        Builtin::new(|mut args, _| {
            max_args!(args, 3);
            if arg!(args, 0, "condition").is_true()? {
                Ok(arg!(args, 1, "if-true"))
            } else {
                Ok(arg!(args, 2, "if-false"))
            }
        }),
    );
    f.insert(
        "feature-exists".to_owned(),
        Builtin::new(|mut args, _| {
            max_args!(args, 1);
            match arg!(args, 0, "feature") {
                Value::Ident(s, _) => match s.as_str() {
                    // A local variable will shadow a global variable unless
                    // `!global` is used.
                    "global-variable-shadowing" => Ok(Value::True),
                    // the @extend rule will affect selectors nested in pseudo-classes
                    // like :not()
                    "extend-selector-pseudoclass" => Ok(Value::False),
                    // Full support for unit arithmetic using units defined in the
                    // [Values and Units Level 3][] spec.
                    "units-level-3" => Ok(Value::True),
                    // The Sass `@error` directive is supported.
                    "at-error" => Ok(Value::True),
                    // The "Custom Properties Level 1" spec is supported. This means
                    // that custom properties are parsed statically, with only
                    // interpolation treated as SassScript.
                    "custom-property" => Ok(Value::False),
                    _ => Ok(Value::False),
                },
                v => Err(format!("$feature: {} is not a string.", v).into()),
            }
        }),
    );
    f.insert(
        "unit".to_owned(),
        Builtin::new(|mut args, _| {
            max_args!(args, 1);
            let unit = match arg!(args, 0, "number") {
                Value::Dimension(_, u) => u.to_string(),
                v => return Err(format!("$number: {} is not a number.", v).into()),
            };
            Ok(Value::Ident(unit, QuoteKind::Double))
        }),
    );
    f.insert(
        "type-of".to_owned(),
        Builtin::new(|mut args, _| {
            max_args!(args, 1);
            let value = arg!(args, 0, "value");
            Ok(Value::Ident(value.kind()?.to_owned(), QuoteKind::None))
        }),
    );
    f.insert(
        "unitless".to_owned(),
        Builtin::new(|mut args, _| {
            max_args!(args, 1);
            match arg!(args, 0, "number") {
                Value::Dimension(_, Unit::None) => Ok(Value::True),
                Value::Dimension(_, _) => Ok(Value::False),
                _ => Ok(Value::True),
            }
        }),
    );
    f.insert(
        "inspect".to_owned(),
        Builtin::new(|mut args, _| {
            max_args!(args, 1);
            Ok(Value::Ident(
                match arg!(args, 0, "value") {
                    Value::List(v, _, brackets) if v.is_empty() => match brackets {
                        Brackets::None => "()".to_string(),
                        Brackets::Bracketed => "[]".to_string(),
                    },
                    Value::Function(f) => format!("get-function(\"{}\")", f.name()),
                    v => v.to_string(),
                },
                QuoteKind::None,
            ))
        }),
    );
    f.insert(
        "variable-exists".to_owned(),
        Builtin::new(|mut args, scope| {
            max_args!(args, 1);
            match arg!(args, 0, "name") {
                Value::Ident(s, _) => Ok(Value::bool(scope.var_exists(&s))),
                v => Err(format!("$name: {} is not a string.", v).into()),
            }
        }),
    );
    f.insert(
        "global-variable-exists".to_owned(),
        Builtin::new(|mut args, _| {
            max_args!(args, 1);
            match arg!(args, 0, "name") {
                Value::Ident(s, _) => Ok(Value::bool(global_var_exists(&s))),
                v => Err(format!("$name: {} is not a string.", v).into()),
            }
        }),
    );
    f.insert(
        "mixin-exists".to_owned(),
        Builtin::new(|mut args, scope| {
            max_args!(args, 2);
            match arg!(args, 0, "name") {
                Value::Ident(s, _) => Ok(Value::bool(scope.mixin_exists(&s))),
                v => Err(format!("$name: {} is not a string.", v).into()),
            }
        }),
    );
    f.insert(
        "function-exists".to_owned(),
        Builtin::new(|mut args, scope| {
            max_args!(args, 2);
            match arg!(args, 0, "name") {
                Value::Ident(s, _) => Ok(Value::bool(
                    scope.fn_exists(&s) || GLOBAL_FUNCTIONS.contains_key(&s),
                )),
                v => Err(format!("$name: {} is not a string.", v).into()),
            }
        }),
    );
    f.insert(
        "get-function".to_owned(),
        Builtin::new(|mut args, scope| {
            max_args!(args, 3);
            let name = match arg!(args, 0, "name") {
                Value::Ident(s, _) => s,
                v => return Err(format!("$name: {} is not a string.", v).into()),
            };
            let css = arg!(args, 1, "css" = Value::False).is_true()?;
            let module = arg!(args, 2, "module" = Value::Null);

            if !module.is_null() && css {
                return Err("$css and $module may not both be passed at once.".into());
            }

            let func = match scope.get_fn(&name) {
                Ok(f) => SassFunction::UserDefined(Box::new(f), name),
                Err(..) => match GLOBAL_FUNCTIONS.get(&name) {
                    Some(f) => SassFunction::Builtin(f.clone(), name),
                    None => return Err(format!("Function not found: {}", name).into()),
                },
            };

            Ok(Value::Function(func))
        }),
    );
    f.insert(
        "call".to_owned(),
        Builtin::new(|mut args, scope| {
            let func = match arg!(args, 0, "function") {
                Value::Function(f) => f,
                v => return Err(format!("$function: {} is not a function reference.", v).into()),
            };
            func.call(args.decrement(), scope)
        }),
    );
}