<?php

/**
 * @version   1.0 12.0.2012
 * @author    Queldorei http://www.queldorei.com <mail@queldorei.com>
 * @copyright Copyright (C) 2010 - 2012 Queldorei
 */
class Queldorei_ShopperSettings_Block_Navigation extends Mage_Catalog_Block_Navigation
{

    /**
     * columns html
     *
     * @var array
     */
    protected $_columnHtml;

    /*
     * @var Mage_Catalog_Model_Resource_Eav_Mysql4_Category_Collection
     */
    protected $_leftCategories;

    /**
     * top level parent category for current category
     *
     * @var int
     */
    protected $_parent;

    protected function _construct()
    {
        $path = $this->getCurrentCategoryPath();
        $parent = $path[count($path) - 1];
        if (!$parent) {
            $parent = Mage::app()->getStore()->getRootCategoryId();
        }
        $this->_parent = $parent;
    }


    /**
     * render category html
     *
     * @param Mage_Catalog_Model_Category $category
     * @param integer $level
     * @param array $levelClass
     * @return string
     */
    public function drawOpenCategoryItem($category, $level = 0, array $levelClass = null)
    {
        $html = array();

        if (!$category->getIsActive()) return '';

        if (!isset($levelClass)) $levelClass = array();
        $combineClasses = array();

        $combineClasses[] = 'level' . $level;
        if ($this->_isCurrentCategory($category)) {
            $combineClasses[] = 'active';
        } else {
            $combineClasses[] = $this->isCategoryActive($category) ? 'parent' : 'inactive';
        }
        $levelClass[] = implode('-', $combineClasses);
        $levelClass = array_merge($levelClass, $combineClasses);
        $levelClass[] = $this->_getClassNameFromCategoryName($category);

        $productCount = (int)$category->getProductCount();
        $_categories = $category->getChildrenCategories();
        $productCollection = Mage::getResourceModel('catalog/product_collection');
        $productCollection->addCountToCategories($_categories);
        foreach ($_categories as $_category) {
            if ($_category->getIsActive()) {
                $productCount+= (int)$_category->getProductCount();
            }
        }

        $html[1] = '<a href="' . $this->getCategoryUrl($category) . '">' . $this->escapeHtml($category->getName()) . '</a> (' .$productCount . ')' . "\n";

        if (in_array($category->getId(), $this->getCurrentCategoryPath())) {
            $children = $this->_getLeftCategoryCollection()
                ->addIdFilter($category->getChildren());

            $hasChildren = $children && ($childrenCount = count($children));
            if ($hasChildren) {
                $htmlChildren = '';

                foreach ($children as $i => $child) {
                    $class = array();
                    if ($childrenCount == 1) {
                        $class[] = 'only';
                    } else {
                        if (!$i) $class[] = 'first';
                        if ($i == $childrenCount - 1) $class[] = 'last';
                    }
                    $htmlChildren .= $this->drawOpenCategoryItem($child, $level + 1, $class);
                }

                if (!empty($htmlChildren)) {
                    $levelClass[] = 'open';

                    $html[2] = '<ul>' . "\n"
                        . $htmlChildren . "\n"
                        . '</ul>';
                }
            }
        }

        $html[0] = sprintf('<li class="%s">', implode(" ", $levelClass)) . "\n";
        $html[3] = "\n" . '</li>' . "\n";

        ksort($html);

        return implode('', $html);
    }

    /**
     * Convert the category name into a string that can be used as a css class
     *
     * @param Mage_Catalog_Model_Category $category
     * @return string
     */
    protected function _getClassNameFromCategoryName($category)
    {
        $name = $category->getName();
        $name = preg_replace('/-{2,}/', '-', preg_replace('/[^a-z-]/', '-', strtolower($name)));
        while ($name && $name{0} == '-') $name = substr($name, 1);
        while ($name && substr($name, -1) == '-') $name = substr($name, 0, -1);

        return $name;
    }

    /**
     * Check if the current category matches the passed in category
     *
     * @param Mage_Catalog_Model_Category $category
     * @return bool
     */
    protected function _isCurrentCategory($category)
    {
        return ($cat = $this->getCurrentCategory()) && $cat->getId() == $category->getId();
    }

    /**
     * return top level category name
     *
     * @return string
     */
    public function getBlockTitle()
    {
        if ($this->_parent == Mage::app()->getStore()->getRootCategoryId()) {
            return '';
        } else {
            return Mage::getModel('catalog/category')->load($this->_parent)->getName();
        }
    }

    /**
     * Get sibling catagories
     *
     * @return Mage_Catalog_Model_Resource_Eav_Mysql4_Category_Collection
     */
    public function getLeftCategories()
    {
        $parent = Mage::getModel('catalog/category')->load($this->_parent);
        if ($parent['is_active'] == 0 || $parent['include_in_menu'] == 0)
            return null;

        if (!isset($this->_leftCategories)) {
            $this->_leftCategories = $this->_getLeftCategoryCollection()
                ->addIdFilter($parent->getChildren());
        }

        return $this->_leftCategories;
    }

    /**
     * @return Mage_Catalog_Model_Resource_Eav_Mysql4_Category_Collection
     */
    protected function _getLeftCategoryCollection()
    {
        $collection = Mage::getResourceModel('catalog/category_collection');
        $collection->addAttributeToSelect('url_key')
            ->addAttributeToSelect('name')
            ->addAttributeToSelect('all_children')
            ->addAttributeToFilter('is_active', 1)
            ->addAttributeToFilter('include_in_menu', 1)
            ->setOrder('position', 'ASC')
            ->joinUrlRewrite();

        return $collection;
    }

    /**
     * Render category to html
     *
     * @param Mage_Catalog_Model_Category $category
     * @param int Nesting level number
     * @param boolean Whether ot not this item is last, affects list item class
     * @param boolean Whether ot not this item is first, affects list item class
     * @param boolean Whether ot not this item is outermost, affects list item class
     * @param string Extra class of outermost list items
     * @param string If specified wraps children list in div with this class
     * @param boolean Whether ot not to add on* attributes to list item
     * @return string
     */
    protected function _renderCategoryMenuItemHtml($category, $level = 0, $isLast = false, $isFirst = false,
                                                   $isOutermost = false, $outermostItemClass = '', $childrenWrapClass = '', $noEventAttributes = false)
    {
        if (!$category->getIsActive()) {
            return '';
        }
        $html = array();

        // get all children
        if (Mage::helper('catalog/category_flat')->isEnabled()) {
            $children = (array)$category->getChildrenNodes();
            $childrenCount = count($children);
        } else {
            $children = $category->getChildren();
            $childrenCount = $children->count();
        }
        $hasChildren = ($children && $childrenCount);

        // select active children
        $activeChildren = array();
        foreach ($children as $child) {
            if ($child->getIsActive()) {
                $activeChildren[] = $child;
            }
        }
        $activeChildrenCount = count($activeChildren);
        $hasActiveChildren = ($activeChildrenCount > 0);

        // prepare list item html classes
        $classes = array();
        $classes[] = 'level' . $level;
        $classes[] = 'nav-' . $this->_getItemPosition($level);
        if ($this->isCategoryActive($category)) {
            $classes[] = 'active';
        }
        $linkClass = '';
        if ($isOutermost && $outermostItemClass) {
            $classes[] = $outermostItemClass;
            $linkClass = ' class="' . $outermostItemClass . '"';
        }
        if ($isFirst) {
            $classes[] = 'first';
        }
        if ($isLast) {
            $classes[] = 'last';
        }
        if ($hasActiveChildren) {
            $classes[] = 'parent';
        }

        // prepare list item attributes
        $attributes = array();
        if (count($classes) > 0) {
            $attributes['class'] = implode(' ', $classes);
        }
        if ($hasActiveChildren && !$noEventAttributes) {
            $attributes['onmouseover'] = 'toggleMenu(this,1)';
            $attributes['onmouseout'] = 'toggleMenu(this,0)';
        }

        // assemble list item with attributes
        $htmlLi = '<li';
        foreach ($attributes as $attrName => $attrValue) {
            $htmlLi .= ' ' . $attrName . '="' . str_replace('"', '\"', $attrValue) . '"';
        }
        $htmlLi .= '>';
        $html[] = $htmlLi;

        $html[] = '<a href="' . $this->getCategoryUrl($category) . '"' . $linkClass . '>';
        $html[] = '<span>' . $this->escapeHtml($category->getName()) . '</span>';
        $html[] = '</a>';

        $columnItemsNum = array();
        if ($level == 0 && $activeChildrenCount) {
            $items_per_column = Mage::getStoreConfig('shoppersettings/navigation/column_items');
            $columns = ceil($activeChildrenCount / $items_per_column);
            $columnItemsNum = array_fill(0, $columns, $items_per_column);
            $this->_columnHtml = array();
        }

        // render children
        $htmlChildren = '';
        $j = 0; //child index
        $i = 0; //column index
        $itemsCount = $activeChildrenCount;
        if (isset($columnItemsNum[$i])) {
            $itemsCount = $columnItemsNum[$i];
        }
        foreach ($activeChildren as $child) {

            if ($level == 0) {
                $isLast = (($j + 1) == $itemsCount || $j == $activeChildrenCount - 1);
                if ($isLast) {
                    $i++;
                    if (isset($columnItemsNum[$i])) {
                        $itemsCount += $columnItemsNum[$i];
                    }
                }
            } else {
                $isLast = ($j == $activeChildrenCount - 1);
            }

            $childHtml = $this->_renderCategoryMenuItemHtml(
                $child,
                ($level + 1),
                $isLast,
                ($j == 0),
                false,
                $outermostItemClass,
                $childrenWrapClass,
                $noEventAttributes
            );
            if ($level == 0) {
                $this->_columnHtml[] = $childHtml;
            } else {
                $htmlChildren .= $childHtml;
            }
            $j++;
        }

        if ($level == 0 && $this->_columnHtml) {
            $i = 0;
            foreach ($columnItemsNum as $columnNum) {
                $chunk = array_slice($this->_columnHtml, $i, $columnNum);
                $i += $columnNum;
                $htmlChildren .= '<li ' . (count($this->_columnHtml) == $i ? 'class="last"' : '') . '><ol>';
                foreach ($chunk as $item) {
                    $htmlChildren .= $item;
                }
                $htmlChildren .= '</ol></li>';
            }
        }

        if (!empty($htmlChildren)) {
            if ($childrenWrapClass) {
                $html[] = '<div class="' . $childrenWrapClass . '">';
            }
            $html[] = '<ul class="level' . $level . '">';
            $html[] = $htmlChildren;
            $html[] = '</ul>';
            if ($childrenWrapClass) {
                $html[] = '</div>';
            }
        }

        $html[] = '</li>';

        $html = implode("\n", $html);

        return $html;
    }


    /**
     * Render categories menu in selectbox element
     *
     * @param int Level number for list item class to start from
     * @param string Extra class of outermost list items
     * @param string If specified wraps children list in div with this class
     * @return string
     */
    public function renderCategoriesSelectOptions($level = 0, $outermostItemClass = '', $childrenWrapClass = '')
    {
        $activeCategories = array();
        foreach ($this->getStoreCategories() as $child) {
            if ($child->getIsActive()) {
                $activeCategories[] = $child;
            }
        }
        $activeCategoriesCount = count($activeCategories);
        $hasActiveCategoriesCount = ($activeCategoriesCount > 0);

        if (!$hasActiveCategoriesCount) {
            return '';
        }

        $html = '<option value="">' . $this->__('- Please select category -') . '</option>';
        $j = 0;
        foreach ($activeCategories as $category) {
            $html .= $this->_renderCategorySelectOption(
                $category,
                $level,
                ($j == $activeCategoriesCount - 1),
                ($j == 0),
                true,
                $outermostItemClass,
                $childrenWrapClass,
                true
            );
            $j++;
        }

        return $html;
    }


    /**
     * Render category to html
     *
     * @param Mage_Catalog_Model_Category $category
     * @param int Nesting level number
     * @param boolean Whether ot not this item is last, affects list item class
     * @param boolean Whether ot not this item is first, affects list item class
     * @param boolean Whether ot not this item is outermost, affects list item class
     * @param string Extra class of outermost list items
     * @param string If specified wraps children list in div with this class
     * @param boolean Whether ot not to add on* attributes to list item
     * @return string
     */
    protected function _renderCategorySelectOption($category, $level = 0, $isLast = false, $isFirst = false,
                                                   $isOutermost = false, $outermostItemClass = '', $childrenWrapClass = '', $noEventAttributes = false)
    {
        if (!$category->getIsActive()) {
            return '';
        }
        $html = array();

        // get all children
        if (Mage::helper('catalog/category_flat')->isEnabled()) {
            $children = (array)$category->getChildrenNodes();
        } else {
            $children = $category->getChildren();
        }

        // select active children
        $activeChildren = array();
        foreach ($children as $child) {
            if ($child->getIsActive()) {
                $activeChildren[] = $child;
            }
        }

        $active = '';
        if ($this->isCategoryActive($category)) {
            $active = 'selected="selected"';
        }
        // assemble list item with attributes
        $html[] = '<option value="' . $this->getCategoryUrl($category) . '" ' . $active . '>' . str_repeat('&nbsp;&nbsp;&nbsp;&nbsp;', $level) . $this->escapeHtml($category->getName()) . '</option>';

        // render children
        $htmlChildren = '';
        foreach ($activeChildren as $child) {
            $childHtml = $this->_renderCategorySelectOption(
                $child,
                ($level + 1),
                0,
                0,
                false,
                $outermostItemClass,
                $childrenWrapClass,
                $noEventAttributes
            );
            $htmlChildren .= $childHtml;
        }

        if (!empty($htmlChildren)) {
            $html[] = $htmlChildren;
        }

        $html = implode("\n", $html);

        return $html;
    }


}