<?php
/*
* DuckBrain - Microframework
* 
* Modelo ORM para objetos que hagan uso de una base de datos MySQL.
* Depende de que exista Libs\Database para poder funcionar.
*
* Autor: KJ
* Web: https://kj2.me
* Licencia: MIT
*/

namespace Libs;

use Libs\Database;

class ModelMySQL {
  
  public $id;
  protected $toNull = [];
  
  static protected $primaryKey = 'id';
  static protected $ignoreSave = ['id'];
  static protected $forceSave = [];
  static protected $table;
  static protected $tableSufix = 's';
  static protected $db;
  static protected $querySelect = [
                    'select'    => ['*'],
                    'where'     => '',
                    'from'      => '',
                    'leftJoin'  => '',
                    'rightJoin' => '',
                    'innerJoin' => '',
                    'AndOr'     => '',
                    'orderBy'   => '',
                    'groupBy'   => '',
                    'limit'     => '',
                   ];

  /*
  * Sirve para obtener la instancia de la base de datos 
  *
  * @return mysqli
  */
  protected static function db() {
    if (is_null(static::$db))
      static::$db = Database::getConnection();

    return static::$db;
  }
  
  /*
  * Ejecuta una sentencia SQL en la base de datos.
  *
  * @param string $query
  *   Contiene la sentencia SQL que se desea ejecutar
  *
  * @throws \Exception
  *   En caso de que la sentencia SQL falle, devolverá un error en pantalla.
  *
  * @return mysqli_result
  *   Contiene el resultado de la llamada SQL.
  */
  protected static function query($query) {
    $db = static::db();
    
    $result = $db->query($query);
    if ($db->errno) {
        echo '<style>body{white-space: pre-line;}</style>';
        throw new \Exception(
        "\nFallo al consultar la base de datos\n" .
        "Errno: $db->errno\n" .
        "Error: $db->error\n" .
        "Query: $query\n"
      );
    }
    
    return $result;
  }
  
  /*
  * Reinicia la configuración de la sentencia SQL.
  */
  protected static function resetQuery() {
    static::$querySelect = [
                    'select'    => ['*'],
                    'where'     => '',
                    'from'      => '',
                    'leftJoin'  => '',
                    'rightJoin' => '',
                    'innerJoin' => '',
                    'AndOr'     => '',
                    'orderBy'   => '',
                    'groupBy'   => '',
                    'limit'     => '',
                   ];
  }
  
  /*
  * Construye la sentencia SQL a partir static::$querySelect y una vez
  * construída, llama a resetQuery.
  *
  * @return string
  *   Contiene la sentencia SQL.
  */
  protected static function buildQuery() {
    $sql = 'SELECT '.join(', ', static::$querySelect['select']);
    
    if (static::$querySelect['from'] != '') {
      $sql .= ' FROM '.static::$querySelect['from'];
    } else {
      $sql .= ' FROM '.static::table();
    }

    if(static::$querySelect['innerJoin'] != '') {
      $sql .= static::$querySelect['innerJoin'];
    }
    
    if (static::$querySelect['leftJoin'] != '') {
      $sql .= static::$querySelect['leftJoin'];
    } 
    
    if(static::$querySelect['rightJoin'] != '') {
      $sql .= static::$querySelect['rightJoin'];
    }
    
    if (static::$querySelect['where'] != '') {
      $sql .= ' WHERE '.static::$querySelect['where'];
      
      if (static::$querySelect['AndOr'] != '') {
        $sql .= static::$querySelect['AndOr'];
      }
    }
    
    if (static::$querySelect['groupBy'] != '') {
      $sql .= ' GROUP BY '.static::$querySelect['groupBy'];
    }
    
    if (static::$querySelect['orderBy'] != '') {
      $sql .= ' ORDER BY '.static::$querySelect['orderBy'];
    }
    
    if (static::$querySelect['limit'] != '') {
      $sql .= ' LIMIT '.static::$querySelect['limit'];
    }
    
    static::resetQuery();
    
    return $sql;
  }
  
  /*
  * Crea una instancia del objeto actual a partir de un arreglo.
  *
  * @param mixed $elem
  *   Puede recibir un arreglo o un objeto que contiene los valores
  *   que tendrán sus atributos.
  *
  * @return ModelMySQL
  *   Retorna un objeto de la clase actual.
  */
  protected static function getInstance($elem = []) {
    $class = get_called_class();
    $instance = new $class;
    
    foreach ($elem as $key => $value) {
      $instance->$key = $value;
    }
    
    return $instance;
  }

  /*
  * @return array
  *   Contiene los atributos indexados del objeto actual.
  */
  protected function getVars() { 
    $reflection = new \ReflectionClass($this);
    $properties = $reflection->getProperties(\ReflectionProperty::IS_PUBLIC);
    $result = [];
    
    foreach($properties as $property) {
      $att = $property->name;
      $result[$att] = $this->$att;
    }
    
    foreach (static::$ignoreSave as $del) {
      unset($result[$del]);
    }
    
    foreach (static::$forceSave as $value) {
      $result[$value] = $this->$value;
    }
    
    return $result;
  }
  
  /*
  * @return string
  *   Devuelve el nombre de la clase actual
  */
  public static function className() {
    return strtolower(substr(strrchr(get_called_class(), '\\'), 1));
  }
  
  /*
  * Construye (a partir del nombre de la clase y el sufijo en static::$tableSufix) 
  * y/o develve el nombre de la tabla de la BD en la que se alojará o
  * se aloja el objeto actual.
  * 
  * @return string
  */
  protected static function table() {
    if (isset(static::$table))
      return static::$table;
    return static::className().static::$tableSufix;
  }

  /*
  * Actualiza los valores en la BD con los valores del objeto actual
  */
  protected function update() {
    $atts = $this->getVars();
    
    foreach ($atts as $key => $value) {
      if (isset($value)) {
        $value = static::db()->real_escape_string($value);
        if (in_array($key, $this->toNull))
          $set[]="$key=NULL";
        else
          $set[]="$key='$value'";
      } else {
        if (in_array($key, $this->toNull))
          $set[]="$key=NULL";
      }
    }
    
    $table = static::table();
    $pk = static::$primaryKey;
    $pkv = $this->$pk;
    $sql = "UPDATE $table SET ".join(', ', $set)." WHERE $pk='$pkv'";
    static::query($sql);
  }
  
  /*
  * Inserta una nueva fila en la base de datos a partir del
  * objeto actual.
  */
  protected function add() {
    $db = static::db();
    $atts = $this->getVars();
    
    foreach ($atts as $key => $value) {
      if (isset($value)) {
        $into[] = "`$key`";
        $values[] = "'".$db->real_escape_string($value)."'";
      }
    }
    
    $table = static::table();
    $sql = "INSERT INTO $table (".join(', ', $into).") VALUES (".join(', ', $values).")";
    static::query($sql);
    
    $pk = static::$primaryKey;
    $this->$pk = $db->insert_id;
  }
  
  /*
  * Revisa si el objeto a guardar es nuevo o no y según el resultado
  * llama a update para actualizar o add para insertar una nueva fila.
  */
  public function save() {
    $pk = static::$primaryKey;
    if (isset($this->$pk))
      $this->update();
    else
      $this->add();
  }
  
  /*
  * Elimina el objeto actual de la base de datos.
  */
  public function delete() {
    $atts = $this->getVars();
    
    foreach ($atts as $key => $value) {
      $value = static::db()->real_escape_string($value);
      $set[]="$key='$value'";
    }
    
    $table = static::table();
    $pk = static::$primaryKey;
    $pkv = $this->$pk;
    $sql = "DELETE FROM $table WHERE $pk='$pkv'";
    static::query($sql);
  }
  
  /*
  * Define SELECT en la sentencia SQL.
  *
  * @param array $columns
  *   Columnas que se selecionarán en la consulta SQL.
  */
  public static function select($columns) {
    $db = static::db();
    $select = [];
    foreach($columns as $column) {
      $select[] = $db->real_escape_string($column);
    }
    
    static::$querySelect['select'] = $select;
    
    return new static();
  }
  
  /*
  * Define FROM en la sentencia SQL.
  *
  * @param array $tables
  *   Tablas que se selecionarán en la consulta SQL.
  */
  public static function from($tables) {
    $db = static::db();
    $from = [];
    foreach($tables as $table) {
      $from[] = $db->real_escape_string($table);
    }
    
    static::$querySelect['from'] = join(', ', $from);
    
    return new static();
  }
  
  /*
  * Define el WHERE en la sentencia SQL.
  *
  * @param string $column
  *   La columna a comparar.
  *
  * @param string $operador
  *   El operador o el valor a comparar en la columna en caso de que eloperador sea "=".
  *
  * @param string $value
  *   El valor el valor a comparar en la columna.
  *
  * @param $no_quote
  *   Se usa cuando $value es una columna o un valor que no requiere comillas
  *
  * Sintaxis posibles: 
  *  - static::where(columna, operador, valor)
  *  - static::where(columna, valor)  // Operador por defecto "="
  */
  public static function where($column, $operator, $value=null, $no_quote = false) {
    if (is_null($value)) {
      $value = $operator;
      $operator = '=';
    }
    
    $value = static::db()->real_escape_string($value);
    
    if ($no_quote)
      static::$querySelect['where'] = "$column$operator$value";
    else
      static::$querySelect['where'] = "$column$operator'$value'";
    
    return new static();
  }
  
  /*
  * Define WHERE usando IN en la sentencia SQL.
  *
  * @param string $column
  *   La columna a comparar.
  *
  * @param array $arr
  *   Arreglo con todos los valores a comparar con la columna.
  *
  * @param boolean $in
  *   Define si se usará IN o NOT IN en la sentencia SQL.
  */
  public static function where_in($column,$arr, $in = true) {
    foreach($arr as $index => $value) {
      $arr[$index] = static::db()->real_escape_string($value);
    }
    
    if ($in)
      static::$querySelect['where'] = "$column IN (".join(', ',$arr).")";
    else
      static::$querySelect['where'] = "$column NOT IN (".join(', ',$arr).")";
    
    return new static();
  }
  
  /*
  * Define LEFT JOIN en la sentencia SQL.
  *
  * @param string $table
  *   Tabla que se va a juntar a la del objeto actual.
  *
  * @param string $columnA
  *   Columna a comparar para hacer el join.
  *
  * @param string $operador
  *   Operador o columna a comparar para hacer el join en caso de que el operador sea "=".
  *
  * @param string $columnB
  *   Columna a comparar para hacer el join.
  *
  * Sintaxis posibles: 
  *  - static::leftJoin(tabla,columnaA, operador, columnB)
  *  - static::leftJoin(tabla,columnaA, columnB) // Operador por defecto "="
  */
  public static function leftJoin($table, $columnA, $operator, $columnB = null) {
    if (is_null($columnB)) {
      $columnB = $operator;
      $operator = '=';
    }
    
    $columnA = static::db()->real_escape_string($columnA);
    $columnB = static::db()->real_escape_string($columnB);
    
    static::$querySelect['leftJoin'] .= ' LEFT JOIN ' . $table . ' ON ' . "$columnA$operator$columnB";
    
    
    return new static();
  }
  
  /*
  * Define RIGHT JOIN en la sentencia SQL.
  *
  * @param string $table
  *   Tabla que se va a juntar a la del objeto actual.
  *
  * @param string $columnA
  *   Columna a comparar para hacer el join.
  *
  * @param string $operador
  *   Operador o columna a comparar para hacer el join en caso de que el operador sea "=".
  *
  * @param string $columnB
  *   Columna a comparar para hacer el join.
  *
  * Sintaxis posibles: 
  *  - static::rightJoin(tabla,columnaA, operador, columnB)
  *  - static::rightJoin(tabla,columnaA, columnB) // Operador por defecto "="
  */
  public static function rightJoin($table, $columnA, $operator, $columnB = null) {
    if (is_null($columnB)) {
      $columnB = $operator;
      $operator = '=';
    }
    
    $columnA = static::db()->real_escape_string($columnA);
    $columnB = static::db()->real_escape_string($columnB);
    
    static::$querySelect['rightJoin'] .= ' RIGHT JOIN ' . $table . ' ON ' . "$columnA$operator$columnB";
    
    return new static();
  }
  
  /*
  * Define INNER JOIN en la sentencia SQL.
  *
  * @param string $table
  *   Tabla que se va a juntar a la del objeto actual.
  *
  * @param string $columnA
  *   Columna a comparar para hacer el join.
  *
  * @param string $operador
  *   Operador o columna a comparar para hacer el join en caso de que el operador sea "=".
  *
  * @param string $columnB
  *   Columna a comparar para hacer el join.
  *
  * Sintaxis posibles: 
  *  - static::innerJoin(tabla,columnaA, operador, columnB)
  *  - static::innerJoin(tabla,columnaA, columnB) // Operador por defecto "="
  */
  public static function innerJoin($table, $columnA, $operator, $columnB = null) {
    if (is_null($columnB)) {
      $columnB = $operator;
      $operator = '=';
    }
    
    $columnA = static::db()->real_escape_string($columnA);
    $columnB = static::db()->real_escape_string($columnB);
    
    static::$querySelect['innerJoin'] .= ' INNER JOIN ' . $table . ' ON ' . "$columnA$operator$columnB";
    
    return new static();
  }
  
  /*
  * Define AND en la sentencia SQL (se puede anidar).
  *
  * @param string $column
  *   La columna a comparar.
  *
  * @param string $operador
  *   El operador o el valor a comparar en la columna en caso de que eloperador sea "=".
  *
  * @param string $value
  *   El valor el valor a comparar en la columna.
  *
  * @param $no_quote
  *   Se usa cuando $value es una columna o un valor que no requiere comillas
  *
  * Sintaxis posibles: 
  *  - static::and(columna, operador, valor)
  *  - static::and(columna, valor)  // Operador por defecto "="
  *  - static::and(columna, valor)->and(columna, valor)->and(columna, valor) // anidado
  */
  public static function and($column, $operator, $value=null, $no_quote = false) {
    if (is_null($value)) {
      $value = $operator;
      $operator = '=';
    }
    
    $value = static::db()->real_escape_string($value);
    
    if ($no_quote)
      static::$querySelect['AndOr'] .= " AND $column$operator$value";
    else
      static::$querySelect['AndOr'] .= " AND $column$operator'$value'";
    
    return new static();
  }
  
  /*
  * Define OR en la sentencia SQL (se puede anidar).
  *
  * @param string $column
  *   La columna a comparar.
  *
  * @param string $operador
  *   El operador o el valor a comparar en la columna en caso de que eloperador sea "=".
  *
  * @param string $value
  *   El valor el valor a comparar en la columna.
  *
  * @param $no_quote
  *   Se usa cuando $value es una columna o un valor que no requiere comillas
  *
  * Sintaxis posibles: 
  *  - static::or(columna, operador, valor)
  *  - static::or(columna, valor)  // Operador por defecto "="
  *  - static::or(columna, valor)->or(columna, valor)->or(columna, valor) // anidado
  */
  public static function or($column, $operator, $value=null, $no_quote = false) {
    if (is_null($value)) {
      $value = $operator;
      $operator = '=';
    }
    
    $value = static::db()->real_escape_string($value);
    
    if ($no_quote)
      static::$querySelect['AndOr'] .= " OR $column$operator$value";
    else
      static::$querySelect['AndOr'] .= " OR $column$operator'$value'";
    
    return new static();
  }
  
  /*
  * Define GROUP BY en la sentencia SQL
  *
  * @param array $arr
  *   Columnas por las que se agrupará.
  */
  public static function groupBy($arr) {
    static::$querySelect['groupBy'] = join(', ', $arr);
    return new static();
  }
  
  public static function limit($initial, $final = 0) {
    $initial = (int)$initial;
    $final = (int)$final;
  
    if ($final==0)
      static::$querySelect['limit'] = $initial;
    else
      static::$querySelect['limit'] = $initial.', '.$final;
      
    return new static();
  }
  
  /*
  * Define ORDER BY en la sentencia SQL
  *
  * @param string $value
  *   Columna por la que se ordenará.
  * 
  * @param string $order
  *   Define si el orden será de manera ascendente (ASC), 
  *   descendente (DESC) o aleatorio (RAND).
  */
  public static function orderBy($value, $order = 'ASC') {
    if ($value == "RAND") {
      static::$querySelect['orderBy'] = 'RAND()';
      return new static();
    }
    
    $value = static::db()->real_escape_string($value);
    
    if (!(strtoupper($order) == 'ASC' || strtoupper($order) == 'DESC'))
      $order = 'ASC';    
      
    static::$querySelect['orderBy'] = $value.' '.$order;
    
    return new static();
  }
  
  /*
  * Retorna la cantidad de filas que hay en un query.
  *
  * @return int
  */
  public static function count() {
    if (static::$querySelect['select'] == ['*'])
      static::$querySelect['select'] = ['count(*) as quantity'];
    else 
      static::$querySelect['select'][] = 'count(*) as quantity';
    $sql = static::buildQuery();
    $result = static::query($sql)->fetch_assoc();
    return $result['quantity'];
  }
  
  /*
  * Obtiene una instancia según su id.
  *
  * @param int $id
  * @return ModelMySQL
  */
  public static function getById($id) {
    return static::where(static::$primaryKey, $id)->getFirst();
  }
  
  /*
  * Realiza una búsqueda en la tabla de la instancia actual.
  *
  * @param string $search
  *   Contenido a buscar.
  *
  * @param array $in
  *   Columnas en las que se va a buscar (null para buscar en todas)
  */
  public static function search($search, $in = null) {
    if ($in == null) {
      $className = get_called_class();
      $in = array_keys((new $className())->getVars());
    }
    
    $db = static::db();
    
    $search = $db->real_escape_string($search);
    
    $where = [];
    
    foreach($in as $row) {
      $where[] = "$row LIKE '%$search%'";
    }
    
    if (static::$querySelect['where']=='')
      static::$querySelect['where'] = join(' OR ', $where);
    else
      static::$querySelect['where'] = static::$querySelect['where'] .' AND ('.join(' OR ', $where).')';
    
    return new static();
  }
  
  /*
  * Obtener los resultados de la consulta SQL.
  *
  * @return ModelMySQL[]
  */
  public static function get() { // Devuelve array vacío si no encuentra nada
    $sql = static::buildQuery();
    $result = static::query($sql);
    
    $instances = [];
    
    while ($row = $result->fetch_assoc()) {
      $instances[] = static::getInstance($row);
    }
                   
    return $instances;
  }
  
  /*
  * El primer elemento de la consulta SQL.
  *
  * @return mixed
  *   Puede retornar un objeto ModelMySQL o null.
  */
  public static function getFirst() { // Devuelve null si no encuentra nada
    static::limit(1);
    $instances = static::get();
    return empty($instances) ? null : $instances[0];
  }

  /*
  * Obtener todos los elementos del la tabla de la instancia actual.
  *
  * @return ModelMySQL[]
  */
  public static function all() {
    $sql = 'SELECT * FROM '.static::table();
    
    $result = static::query($sql);
    
    $instances = [];
    
    while ($row = $result->fetch_assoc()) {
      $instances[] = static::getInstance($row);
    }
    
    return $instances;
  }

  /*
   * Permite definir como nulo el valor de un atributo.
   * Sólo funciona para actualizar un elemento de la BD, no para insertar.
   *
   * @param array $atts
   */
  public function setNull($atts) {
    if (!isset($this->id))
      throw new \Exception(
        "\nEl método setNull sólo funciona para actualizar, no al insertar."
      );
    
    foreach ($atts as $att) {
      if (!in_array($att, $this->toNull))
        $this->toNull[] = $att;
    }
  }
}
?>