<?php

/**
 * Simpla CMS
 *
 * @copyright   2011 Denis Pikusov
 * @link        http://simplacms.ru
 * @author      Denis Pikusov
 *
 */

require_once('Simpla.php');

class Categories extends Simpla
{
    // Список указателей на категории в дереве категорий (ключ = id категории)
    private $all_categories;
    // Дерево категорий
    private $categories_tree;

    // Функция возвращает массив категорий
    public function get_categories($filter = array())
    {
        if(!isset($this->categories_tree))
            $this->init_categories();

        if(!empty($filter['product_id']))
        {
            $query = $this->db->placehold("SELECT category_id FROM __products_categories WHERE product_id in(?@) ORDER BY position", (array)$filter['product_id']);
            $this->db->query($query);
            $categories_ids = $this->db->results('category_id');
            $result = array();
            foreach($categories_ids as $id)
                if(isset($this->all_categories[$id]))
                    $result[$id] = $this->all_categories[$id];
            return $result;
        }

        return $this->all_categories;
    }

    // Функция возвращает id категорий для заданного товара
    public function get_product_categories($product_id)
    {
        $query = $this->db->placehold("SELECT product_id, category_id, position FROM __products_categories WHERE product_id in(?@) ORDER BY position", (array)$product_id);
        $this->db->query($query);
        return $this->db->results();
    }

    // Функция возвращает id категорий для всех товаров
    public function get_products_categories()
    {
        $query = $this->db->placehold("SELECT product_id, category_id, position FROM __products_categories ORDER BY position");
        $this->db->query($query);
        return $this->db->results();
    }

    // Функция возвращает дерево категорий
    public function get_categories_tree()
    {
        if(!isset($this->categories_tree))
            $this->init_categories();

        return $this->categories_tree;
    }

    // Функция возвращает заданную категорию
    public function get_category($id)
    {
        if(!isset($this->all_categories))
            $this->init_categories();
        if(is_int($id) && array_key_exists(intval($id), $this->all_categories))
            return $category = $this->all_categories[intval($id)];
        elseif(is_string($id))
            foreach ($this->all_categories as $category)
                if ($category->url == $id)
                    return $this->get_category((int)$category->id);

        return false;
    }

    // Добавление категории
    public function add_category($category)
    {
        $category = (array)$category;
        if(empty($category['url']))
        {
            $category['url'] = preg_replace("/[\s]+/ui", '_', $category['name']);
            $category['url'] = strtolower(preg_replace("/[^0-9a-zа-я_]+/ui", '', $category['url']));
        }

        // Если есть категория с таким URL, добавляем к нему число
        while($this->get_category((string)$category['url']))
        {
            if(preg_match('/(.+)_([0-9]+)$/', $category['url'], $parts))
                $category['url'] = $parts[1].'_'.($parts[2]+1);
            else
                $category['url'] = $category['url'].'_2';
        }

        $this->db->query("INSERT INTO __categories SET ?%", $category);
        $id = $this->db->insert_id();
        $this->db->query("UPDATE __categories SET position=id WHERE id=?", $id);
        $this->init_categories();
        return $id;
    }

    // Изменение категории
    public function update_category($id, $category)
    {
        $query = $this->db->placehold("UPDATE __categories SET ?% WHERE id=? LIMIT 1", $category, intval($id));
        $this->db->query($query);
        $this->init_categories();
        return $id;
    }

    // Удаление категории
    public function delete_category($id)
    {
        if(!$category = $this->get_category(intval($id)))
            return false;
        foreach($category->children as $id)
        {
            if(!empty($id))
            {
                $this->delete_image($id);
                $query = $this->db->placehold("DELETE FROM __categories WHERE id=? LIMIT 1", $id);
                $this->db->query($query);
                $query = $this->db->placehold("DELETE FROM __products_categories WHERE category_id=?", $id);
                $this->db->query($query);
                $this->init_categories();
            }
        }
        return true;
    }

    // Добавить категорию к заданному товару
    public function add_product_category($product_id, $category_id, $position=0)
    {
        $query = $this->db->placehold("INSERT IGNORE INTO __products_categories SET product_id=?, category_id=?, position=?", $product_id, $category_id, $position);
        $this->db->query($query);
    }

    // Удалить категорию заданного товара
    public function delete_product_category($product_id, $category_id)
    {
        $query = $this->db->placehold("DELETE FROM __products_categories WHERE product_id=? AND category_id=? LIMIT 1", intval($product_id), intval($category_id));
        $this->db->query($query);
    }

    // Удалить изображение категории
    public function delete_image($category_id)
    {
        $query = $this->db->placehold("SELECT image FROM __categories WHERE id=?", $category_id);
        $this->db->query($query);
        $filename = $this->db->result('image');
        if(!empty($filename))
        {
            $query = $this->db->placehold("UPDATE __categories SET image=NULL WHERE id=?", $category_id);
            $this->db->query($query);
            $query = $this->db->placehold("SELECT count(*) as count FROM __categories WHERE image=? LIMIT 1", $filename);
            $this->db->query($query);
            $count = $this->db->result('count');
            if($count == 0)
            {
                @unlink($this->config->root_dir.$this->config->categories_images_dir.$filename);
            }
            $this->init_categories();
        }
    }


    // Инициализация категорий, после которой категории будем выбирать из локальной переменной
    private function init_categories()
    {
        // Дерево категорий
        $tree = new stdClass();
        $tree->subcategories = array();

        // Указатели на узлы дерева
        $pointers = array();
        $pointers[0] = &$tree;
        $pointers[0]->path = array();

        // Выбираем все категории
        //      $query = $this->db->placehold("SELECT c.id, c.parent_id, c.name, c.description, c.url, c.meta_title, c.meta_keywords, c.meta_description, c.image, c.visible, c.position
        //                                  FROM __categories c ORDER BY c.parent_id, c.position");
        $query = $this->db->placehold("SELECT c.id, c.parent_id, c.name, c.description, c.url, c.meta_title, c.meta_keywords, c.meta_description, c.image, c.visible, c.position, COUNT(p.id) as products_count
                                       FROM __categories c LEFT JOIN __products_categories pc ON pc.category_id=c.id LEFT JOIN __products p ON p.id=pc.product_id AND p.visible GROUP BY c.id ORDER BY c.parent_id, c.position");
        $this->db->query($query);
        $categories = $this->db->results();

        $finish = false;
        // Не кончаем, пока не кончатся категории, или пока ниодну из оставшихся некуда приткнуть
        while(!empty($categories)  && !$finish)
        {
            $flag = false;
            // Проходим все выбранные категории
            foreach($categories as $k=>$category)
            {
                if(isset($pointers[$category->parent_id]))
                {
                    // В дерево категорий (через указатель) добавляем текущую категорию
                    $pointers[$category->id] = $pointers[$category->parent_id]->subcategories[] = $category;

                    // Путь к текущей категории
                    $curr = clone($pointers[$category->id]);
                    $pointers[$category->id]->path = array_merge((array)$pointers[$category->parent_id]->path, array($curr));

                    // Убираем использованную категорию из массива категорий
                    unset($categories[$k]);
                    $flag = true;
                }
            }
            if(!$flag) $finish = true;
        }

        // Для каждой категории id всех ее деток узнаем
        $ids = array_reverse(array_keys($pointers));
        foreach($ids as $id)
        {
            if($id>0)
            {
                $pointers[$id]->children[] = $id;

                if(isset($pointers[$pointers[$id]->parent_id]->children))
                    $pointers[$pointers[$id]->parent_id]->children = array_merge($pointers[$id]->children, $pointers[$pointers[$id]->parent_id]->children);
                else
                    $pointers[$pointers[$id]->parent_id]->children = $pointers[$id]->children;

                // Добавляем количество товаров к родительской категории, если текущая видима
                //if(isset($pointers[$pointers[$id]->parent_id]) && $pointers[$id]->visible)
                //  $pointers[$pointers[$id]->parent_id]->products_count += $pointers[$id]->products_count;
            }
        }
        unset($pointers[0]);

        $this->categories_tree = $tree->subcategories;
        $this->all_categories = $pointers;
    }
}