<?php
/**
 * Mikio Core Syntax Plugin
 *
 * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
 * @author     James Collins <james.collins@outlook.com.au>
 */
 
if (!defined('DOKU_INC')) die();
if (!defined('DOKU_PLUGIN')) define('DOKU_PLUGIN',DOKU_INC.'lib/plugins/');

 
class syntax_plugin_mikioplugin_core extends DokuWiki_Syntax_Plugin {
    public $pattern_entry       = '';
    public $pattern_exit        = '';
    public $tag                 = '';
    public $noEndTag            = false;
    public $defaults            = array();
    public $options             = array();
    public $values              = array();
    public $incClasses          = array('shadow', 'text-center', 'text-right');


    function __construct() {
        if(count($this->incClasses) > 0) {
            $this->options = array_merge($this->options, $this->incClasses);
        }
    }

    public function getType() {
        return 'formatting';
    }
    
    
    public function getAllowedTypes() { return array('formatting', 'substition', 'disabled'); }   
    public function getSort(){ return 32; }


    public function connectTo($mode) {
        if($this->pattern_entry == '' && $this->tag != '') {
            if($this->noEndTag) {
                $this->pattern_entry = '<(?:' . strtoupper($this->tag) . '|' . strtolower($this->tag) . ').*?>';
            } else {
                $this->pattern_entry = '<(?:' . strtoupper($this->tag) . '|' . strtolower($this->tag) . ').*?>(?=.*?</(?:' . strtoupper($this->tag) . '|' . strtolower($this->tag) . ')>)';
            }
        }

        if($this->pattern_entry != '') {
            if($this->noEndTag) {
                $this->Lexer->addSpecialPattern($this->pattern_entry, $mode, 'plugin_mikioplugin_'.$this->getPluginComponent());
            } else {
                $this->Lexer->addEntryPattern($this->pattern_entry, $mode, 'plugin_mikioplugin_'.$this->getPluginComponent());
            }
        }
    }
    
    
    public function postConnect() {
        if(!$this->noEndTag) {
            if($this->pattern_exit == '' && $this->tag != '') {
                $this->pattern_exit = '</(?:' . strtoupper($this->tag) . '|' . strtolower($this->tag) . ')>';
            }

            if($this->pattern_exit != '') {
                $this->Lexer->addExitPattern($this->pattern_exit, 'plugin_mikioplugin_'.$this->getPluginComponent());
            }
        }
    }
   
    public function handle($match, $state, $pos, Doku_Handler $handler){
        switch($state) {
            case DOKU_LEXER_ENTER:
            case DOKU_LEXER_SPECIAL:
                $optionlist = preg_split('/\s(?=([^"]*"[^"]*")*[^"]*$)/', substr($match, strlen($this->tag) + 1, -1));
                
                $options = array();
                foreach($optionlist as $item) {
                    $i = strpos($item, '=');
                    if($i !== false) {
                        $value = substr($item, $i + 1);

                        if(substr($value, 0, 1) == '"') $value = substr($value, 1);
                        if(substr($value, -1) == '"') $value = substr($value, 0, -1);
                        
                        $options[substr($item, 0, $i)] = $value;
                    } else {
                        $options[$item] = true;
                    }
                }

                $options_clean = $this->cleanOptions($options);

                $this->values = $options_clean;

                return array($state, $options_clean);

            case DOKU_LEXER_UNMATCHED:
                return array($state, $match);
            
            case DOKU_LEXER_EXIT:
                return array($state, '');
        }
    
        return array();
    }


    public function cleanOptions($options) {
        $options_clean = array();

        foreach($this->options as $item => $value) {
            if(is_string($value)) {
                if(array_key_exists($value, $options)) {
                    $options_clean[$value] = $options[$value];
                } else {
                    $options_clean[$value] = false;
                }
            } else if(is_array($value)) {
                foreach($value as $avalue) {
                    if(array_key_exists($avalue, $options)) {
                        $options_clean[$item] = $avalue;
                    }
                }
            }
        }

        foreach($this->defaults as $item => $value) {
            if(array_key_exists($item, $options_clean) == false) {
                $options_clean[$item] = $value;
            }
        }

        return $options_clean;
    }
   

    public function render_lexer_enter(Doku_Renderer $renderer, $data) {

    }


    public function render_lexer_unmatched(Doku_Renderer $renderer, $data) {
        $renderer->doc .= $renderer->_xmlEntities($data);
    }


    public function render_lexer_exit(Doku_Renderer $renderer, $data) {

    }


    public function render_lexer_special(Doku_Renderer $renderer, $data) {

    }


    public function render($mode, Doku_Renderer $renderer, $data) {
        if($mode == 'xhtml'){
            list($state,$match) = $data;

            switch ($state) {
                case DOKU_LEXER_ENTER:
                    $this->render_lexer_enter($renderer, $match);
                    return true;

                case DOKU_LEXER_UNMATCHED :  
                    $this->render_lexer_unmatched($renderer, $match);
                    return true;
    
                case DOKU_LEXER_EXIT :
                    $this->render_lexer_exit($renderer, $match);
                    return true;

                    case DOKU_LEXER_SPECIAL:
                        $this->render_lexer_special($renderer, $match);
                        return true;
            }
    
            return true;
        }

        return false;
    }


    public function buildClassString($options=null, $classes=null, $prefix='') {
        $s = array();

        if($options != null) {
            if($classes != null) {
                foreach($classes as $item) {
                    if(array_key_exists($item, $options) && $options[$item] !== false) {
                        $classname = $item;
                        
                        if(is_string($options[$item])) {
                            $classname = $options[$item];
                        }

                        if(is_string($prefix)) {
                            $classname = $prefix . $classname;
                        } else if(is_array($prefix)) {
                            foreach($prefix as $pitem => $pvalue) {
                                if(is_string($pvalue)) {
                                    if($pvalue == $item) {
                                        if(is_string($options[$item])) {
                                            $classname = $pitem . $options[$item];
                                        } else {
                                            $classname = $pitem . $item;
                                        }
                                    }
                                }

                                if(is_array($pvalue)) {
                                    foreach($pvalue as $ppitem) {
                                        if($ppitem == $item) {
                                            if(is_string($options[$item])) {
                                                $classname = $pitem . $options[$item];
                                            } else {
                                                $classname = $pitem . $item;
                                            }
                                        }
                                    }
                                }
                            }
                        }

                        $s[] = $classname;
                    }
                }
            }

            foreach($this->incClasses as $item) {
                if(array_key_exists($item, $options) && $options[$item] == true) $s[] = $item;
            }
        }

        $s = ' ' . implode(' ', $s);
        return $s;
    }


    public function getMediaFile($str) {
        $i = strpos($str, '?');
        if($i !== false) $str = substr($str, 0, $i);
     
        $str = preg_replace('/[^\da-zA-Z:_.]+/', '', $str);

        return(tpl_getMediaFile(array($str), false));
    }


    public function getLink($str) {
        $i = strpos($str, '://');
        if($i !== false) return $str;

        return wl($str);
    }


    public function setAttr(&$attrList, $attr, $data, $newAttrName='', $newAttrVal='') {
        if(array_key_exists($attr, $data) && $data[$attr] !== false) {
            $value = $data[$attr];

            if($newAttrName != '') $attr = $newAttrName;
            if($newAttrVal != '') {
                $newAttrVal = str_replace('%%VALUE%%', $value, $newAttrVal);
                if(strpos($newAttrVal, '%%MEDIA%%') !== false) {
                    $newAttrVal = str_replace('%%MEDIA%%', $this->getMediaFile($value), $newAttrVal);
                }

                $value = $newAttrVal;
            }

            $attrList[$attr] = $value;
        }
    }

    
    public function listAttr($attrName, $attrs) {
        $s = '';
        
        if(count($attrs) > 0) {
            foreach($attrs as $item => $value) {
                $s .= $item . ':' . $value . ';';
            }

            $s = $attrName . '="' . $s . '" ';
        }

        return $s;
    }


    public function syntaxRender(Doku_Renderer $renderer, $className, $text, $data=null) {
        $class = new $className;

        if(!is_array($data)) $data = array();

        $data = $class->cleanOptions($data);

        if($class->noEndTag) {
            $class->render_lexer_special($renderer, $data);
        } else {
            $class->render_lexer_enter($renderer, $data);
            $renderer->doc .= $text;
            $class->render_lexer_exit($renderer, null);    
        }
    }
}