<?php // -*- mode:php; tab-width:4; indent-tabs-mode:t; c-basic-offset:4; -*-
#CMS - CMS Made Simple
#(c)2004-2008 by Ted Kulp (ted@cmsmadesimple.org)
#This project's homepage is: http://cmsmadesimple.org
#
#This program is free software; you can redistribute it and/or modify
#it under the terms of the GNU General Public License as published by
#the Free Software Foundation; either version 2 of the License, or
#(at your option) any later version.
#
#This program is distributed in the hope that it will be useful,
#but WITHOUT ANY WARRANTY; without even the implied warranty of
#MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#GNU General Public License for more details.
#You should have received a copy of the GNU General Public License
#along with this program; if not, write to the Free Software
#Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
#
#$Id$
 
function smarty_cms_outputfilter_header($compiled, &$smarty)
{
  $search = "/<!-- headertag(.*?)?--\\>/";
    preg_match_all($search, $compiled, $match, PREG_SET_ORDER);
 
  if (count($match) > 0 && count($match[0]) > 1)
  {
    $params = trim($match[0][1]);
    preg_match_all('~(?:(?>[^"\'=]+)
                         )+ |
                         [=]
                        ~x', $params, $match2);
 
    $params = array();
    $keyval = 'key';
    $key = '';
    
    foreach ($match2[0] as $token)
    {
      if ($keyval == 'key')
      {
        if (preg_match('~^\w+$~', trim($token)))
        {
          $key = trim($token);
          $keyval = 'equal';
        }
      }
      else if ($keyval == 'equal')
      {
        if ($token == '=')
        {
          $keyval = 'val';
        }
      }
      else if ($keyval == 'val')
      {
        if ($token != '')
        {
          $params[$key] = str_replace('xxx_double_quote_here_xxx', '"', $token);
          $keyval = 'key';
        }
      }
    }
    
    $compiled = preg_replace($search, cms_header_filter_plugin_function($params, $smarty), $compiled);
  }
  
  return $compiled;
}
 
function cms_header_filter_plugin_function($params, &$smarty)
{
  global $gCms;
  $pageinfo =& $gCms->variables['pageinfo'];
  $root_url = CmsConfig::get('root_url');
  
  $result = '';
  
  if (isset($params['name']) && $params['name'] != '')
  {
    $result .= '<link rel="result" type="text/css" ';
    if (isset($params['media']) && $params['media'] != '')
    {
      $result .= 'media="' . $params['media'] . '" ';
    }
    $result .= 'href="'.$root_url.'/stylesheet.php?name='.$params['name'];
    $result .= "\" />\n"; 
  }
  else
  {
    $template = cms_orm('cms_template')->find_by_id($pageinfo->template_id);
    if ($template)
    {
      foreach ($template->get_stylesheet_media_types() as $media)
      {
        $result .= '<link rel="result" type="text/css" ';
        if ($media != '')
        {
          $result .= 'media="'.$media.'" ';
        }
        $result .= "href=\"{$root_url}/stylesheet.php?templateid={$pageinfo->template_id}";
        if ($media != '')
        {
          $result .= '&amp;mediatype='.urlencode($media);
        }
        $result .= "\" />\n"; 
      }
    }
  }
  
  $result .= CmsApplication::get_preference('metadata', '');
 
  if (isset($pageinfo) && $pageinfo !== FALSE)
  {
    if (isset($pageinfo->content_metadata) && $pageinfo->content_metadata != '')
    {
      $result .= "\n" . $pageinfo->content_metadata;
    }
  }
 
  if ((!strpos($result,$smarty->left_delimiter) === false) and (!strpos($result,$smarty->right_delimiter) === false))
  {
    $smarty->_compile_source('metadata template', $result, $_compiled);
    @ob_start();
    $smarty->_eval('?>' . $_compiled);
    $result = @ob_get_contents();
    @ob_end_clean();
  }
  
  $showbase = true;
  
  #Show a base tag unless showbase is false in config.php
  #It really can't hinder, only help.
  if (isset($params['showbase']))
  {
    if ($params['showbase'] == 'false')
    {
      $showbase = false;
    }
  }
  
  if (cmsms()->get('header_additions') != null)
  {
    foreach (cmsms()->get('header_additions') as $addt)
    {
      $result .= $addt . "\n";
    }
  }
 
  if ($showbase)
  {
    $result .= "\n<base href=\"".$root_url."/\" />\n";
  }
  
  CmsEventOperations::send_event('Core', 'HeaderTagRender', array('content' => &$result));
  
  return $result;
}
 
# vim:ts=4 sw=4 noet
?>