<?php
namespace nur\sery\schema;

use nur\sery\StateException;
use nur\sery\schema\values\AssocValue;
use nur\sery\schema\values\IValue;
use nur\sery\schema\values\ScalarValue;
use nur\sery\schema\values\SeqValue;

class Schema {
  /**
   * créer une nouvelle instance de cette classe à partir d'un schéma non
   * normalisé
   */
  static function new(&$md, $schema): self {
    if ($md === null) $md = new static($schema);
    return $md;
  }

  /** obtenir une instance de cette classe à partir d'un schéma normalisé */
  static function with(array $schema): self {
    return new static($schema, false);
  }

  static function normalize($schema): array {
    if ($schema === null) throw new SchemaException("schema is required");
    elseif (!is_array($schema)) $schema = [$schema];
    #XXX
    return $schema;
  }

  const SCHEMA = null;

  function __construct($schema=null, bool $normalize=true) {
    if ($schema === null) $schema = static::SCHEMA;
    if ($normalize) $schema = self::normalize($schema);
    $this->schema = $schema;
  }

  /**
   * @var array schéma normalisé
   *
   * il y a 3 formes pour un schéma:
   * - schéma valeur scalaire [0 => type, 1 => default, ...]
   * - schéma tableau séquentiel [schema]
   * - schéma tableau associatif [key => schema, ...]
   */
  protected $schema;

  /**
   * retourner true si le schéma est pour une valeur scalaire, false s'il s'agit
   * du schéma d'un tableau (séquentiel ou associatif)
   */
  function isScalar(): bool {
    return array_key_exists(0, $this->schema) && array_key_exists(1, $this->schema);
  }

  /** retourner true si le schéma est pour un tableau séquentiel */
  function isSeq(): bool {
    return array_key_exists(0, $this->schema) && !array_key_exists(1, $this->schema);
  }

  /** retourner true si le schéma est pour un tableau associatif */
  function isAssoc(): bool {
    return !array_key_exists(0, $this->schema) && !array_key_exists(1, $this->schema);
  }

  /**
   * @var bool true si toutes les clés du schéma doivent exister, avec leur
   * valeur par défaut le cas échéant
   */
  protected $ppEnsureKeys;

  /** @var bool true si les clés doivent être dans l'ordre du schéma */
  protected $ppOrderKeys;

  /**
   * @var bool true si les valeurs doivent être automatiquement vérifiées et
   * corrigées
   */
  protected $ppVerifix;

  function ensureSchema(&$value, $key=null, ?array $params=null): void {
  }

  /** retourner true si la valeur est scalaire */
  function getScalar(&$value, $key=null, ?ScalarValue &$scalar=null): bool {
    if (!$this->isScalar()) return false;
    if ($value instanceof Input) $input = $value;
    else $input = new Input($value);
    $scalar = new ScalarValue($input, $this->schema, $key);
    return true;
  }

  /** retourner true la valeur est un tableau séquentiel */
  function getSeq(&$value, $key=null, ?SeqValue &$seq=null): bool {
    if (!$this->isSeq()) return false;
    if ($value instanceof Input) $input = $value;
    else $input = new Input($value);
    $seq = new SeqValue($input, $this->schema, $key);
    return true;
  }

  /** retourner true la valeur est un tableau associatif */
  function getAssoc(&$value, $key=null, ?AssocValue &$assoc=null): bool {
    if (!$this->isAssoc()) return false;
    if ($value instanceof Input) $input = $value;
    else $input = new Input($value);
    $assoc = new AssocValue($input, $this->schema, $key);
    return true;
  }

  function getValue(&$value, $key=null): IValue {
    if ($this->getScalar($input, $key, $scalar)) return $scalar;
    elseif ($this->getSeq($input, $key, $seq)) return $seq;
    elseif ($this->getAssoc($input, $key, $assoc)) return $assoc;
    else throw StateException::unexpected_state();
  }
}