frontsau 0.0.1

data/lib/Phamlp/haml/tree/HamlNode.php

@@ -0,0 +1,253 @@
+<?php
+/* SVN FILE: $Id: HamlNode.php 92 2010-05-20 17:42:59Z chris.l.yates $ */
+/**
+ * HamlNode class file.
+ * @author			Chris Yates <chris.l.yates@gmail.com>
+ * @copyright 	Copyright (c) 2010 PBM Web Development
+ * @license			http://phamlp.googlecode.com/files/license.txt
+ * @package			PHamlP
+ * @subpackage	Haml.tree
+ */
+
+require_once('HamlRootNode.php');
+require_once('HamlCommentNode.php');
+require_once('HamlDoctypeNode.php');
+require_once('HamlElementNode.php');
+require_once('HamlFilterNode.php');
+require_once('HamlHelperNode.php');
+require_once('HamlCodeBlockNode.php');
+require_once('HamlNodeExceptions.php');
+
+/**
+ * HamlNode class.
+ * Base class for all Haml nodes.
+ * @package			PHamlP
+ * @subpackage	Haml.tree
+ */
+class HamlNode {
+	/**
+	 * @var HamlNode root node of this node
+	 */
+	protected $root;
+	/**
+	 * @var HamlNode parent of this node
+	 */
+	protected $parent;
+	/**
+	 * @var array children of this node
+	 */
+	protected $children = array();
+	/**
+	 * @var array source line token
+	 */
+	public $token;
+	/**
+	 * @var boolean whether to show the output in the browser for debug
+	 */
+	public $showOutput;
+	/**
+	 * @var boolean whether to show the source in the browser for debug
+	 */
+	public $showSource;
+	/**
+	 * @var string content to render
+	 */
+	public $content;
+	/**
+	 * @var string output buffer
+	 */
+	protected $output;
+	/**
+	 * @var HamlRenderer Renderer object
+	 */
+	private $_r; 
+	/**
+	 * @var array Options
+	 */
+	private $_o;
+
+	public function __construct($content, $parent) {
+	  $this->content = $content;
+	  if (!is_null($parent)) { // $parent === null for "else" code blocks
+		  $this->parent = $parent;
+		  $this->root = $parent->root;
+		  $parent->children[] = $this;			
+	  }
+
+	}
+
+	/**
+	 * Getter.
+	 * @param string name of property to get
+	 * @return mixed return value of getter function
+	 */
+	public function __get($name) {
+		$getter = 'get' . ucfirst($name);
+		if (method_exists($this, $getter)) {
+			return $this->$getter();
+		}
+		throw new HamlNodeException('No getter function for {what}', array('{what}'=>$name));
+	}
+
+	/**
+	 * Setter.
+	 * @param string name of property to set
+	 * @return mixed value of property
+	 * @return HamlNode this node
+	 */
+	public function __set($name, $value) {
+		$setter = 'set' . ucfirst($name);
+		if (method_exists($this, $setter)) {
+			$this->$setter($value);
+			return $this;
+		}
+		throw new HamlNodeException('No setter function for {what}', array('{what}'=>$name));
+	}
+
+	/**
+	 * Return a value indicating if this node has a parent
+	 * @return array the node's parent
+	 */
+	public function hasParent() {
+		return !empty($this->parent);
+	}
+
+	/**
+	 * Returns the node's content and that of its child nodes
+	 * @param integer the indent level. This is to allow properly indented output
+	 * that filters (e.g. Sass) may need.
+	 * @return string the node's content and that of its child nodes
+	 */
+	public function getContent($indentLevel = 0) {
+		$output = str_repeat(' ', 2 * $indentLevel++) . $this->content . "\n";
+		foreach ($this->children as $child) {
+			$output .= $child->getContent($indentLevel);
+		} // foreach
+		return $output;
+	}
+
+	/**
+	 * Returns the node's parent
+	 * @return array the node's parent
+	 */
+	public function getParent() {
+		return $this->parent;
+	}
+
+	/**
+	 * Returns a value indicating if this node has children
+	 * @return boolean true if the node has children, false if not
+	 */
+	public function hasChildren() {
+		return !empty($this->children);
+	}
+
+	/**
+	 * Returns the node's children
+	 * @return array the node's children
+	 */
+	public function getChildren() {
+		return $this->children;
+	}
+
+	/**
+	 * Returns the last child node of this node.
+	 * @return HamlNode the last child node of this node
+	 */
+	public function getLastChild() {
+	  return $this->children[count($this->children) - 1];
+	}
+
+	/**
+	 * Returns the indent level of this node.
+	 * @return integer the indent level of this node
+	 */
+	private function getLevel() {
+		return $this->token['level'];
+	}
+
+	/**
+	 * Sets the indent level of this node.
+	 * Used during rendering to give correct indentation.
+	 * @param integer the indent level of this node
+	 * @return HamlNode this node
+	 */
+	private function setLevel($level) {
+		$this->token['level'] = $level;
+		return $this;
+	}
+
+	/**
+	 * Returns the source for this node
+	 * @return string the source for this node
+	 */
+	private function getSource() {
+		return $this->token[HamlParser::HAML_SOURCE];
+	}
+
+	/**
+	 * Returns the source for this node
+	 * @return string the source for this node
+	 */
+	private function getLine() {
+		return $this->token['line'];
+	}
+
+	/**
+	 * Returns the filename for this node
+	 * @return string the filename for this node
+	 */
+	private function getFilename() {
+		return $this->token['filename'];
+	}
+
+	/**
+	 * Returns the options.
+	 * @return array the options
+	 */
+	public function getOptions() {
+		if (empty($this->_o)) {
+			$this->_r = $this->root->options;
+		}
+	  return $this->_o;
+	}
+
+	/**
+	 * Returns the renderer.
+	 * @return HamlRenderer the rendered
+	 */
+	public function getRenderer() {
+		if (empty($this->_r)) {
+			$this->_r = $this->root->renderer;
+		}
+	  return $this->_r;
+	}
+
+	public function render() {
+		$output = $this->renderer->renderContent($this);
+		foreach ($this->children as $child) {
+			$output .= $child->render();
+		} // foreach
+		return $this->debug($output);
+	}
+
+	protected function debug($output) {
+		$output = ($this->showSource ? $this->showSource($output) : $output);
+		return ($this->showOutput && $this->line['indentLevel'] == 0 ?
+			nl2br(str_replace(' ', '&nbsp;', htmlspecialchars($output))) :
+			$output);
+	}
+
+	/**
+	 * Adds a comment with source debug information for the current line to the output.
+	 * The debug information is:
+	 * + source file (relative to the application path)
+	 * + line number
+	 * + indent level
+	 * + source code
+	 * @param array source line(s) that generated the ouput
+	 */
+	protected function showSource($output) {
+		return "<!--\n  ({$this->line['file']} {$this->line['number']}:{$this->line['indentLevel']})\n  {$this->line[HamlParser::HAML_SOURCE]}\n-->\n$output";
+	}
+}

data/lib/Phamlp/haml/tree/HamlNodeExceptions.php

@@ -0,0 +1,19 @@
+<?php
+/* SVN FILE: $Id: HamlNodeExceptions.php 61 2010-04-16 10:19:59Z chris.l.yates $ */
+/**
+ * HamlNode exception classes.
+ * @author			Chris Yates <chris.l.yates@gmail.com>
+ * @copyright 	Copyright (c) 2010 PBM Web Development
+ * @license			http://phamlp.googlecode.com/files/license.txt
+ * @package			PHamlP
+ * @subpackage	Haml.tree
+ */
+
+require_once(dirname(__FILE__).'/../HamlException.php');
+
+/**
+ * HamlNodeException class.
+ * @package			PHamlP
+ * @subpackage	Haml.tree
+ */
+class HamlNodeException extends HamlException {}

data/lib/Phamlp/haml/tree/HamlRootNode.php

@@ -0,0 +1,58 @@
+<?php
+/* SVN FILE: $Id: HamlRootNode.php 49 2010-04-04 10:51:24Z chris.l.yates $ */
+/**
+ * HamlRootNode class file.
+ * @author			Chris Yates <chris.l.yates@gmail.com>
+ * @copyright 	Copyright (c) 2010 PBM Web Development
+ * @license			http://phamlp.googlecode.com/files/license.txt
+ * @package			PHamlP
+ * @subpackage	Haml.tree
+ */
+
+require_once(dirname(__FILE__).'/../renderers/HamlRenderer.php');
+
+/**
+ * HamlRootNode class.
+ * Also the root node of a document.
+ * @package			PHamlP
+ * @subpackage	Haml.tree
+ */
+class HamlRootNode extends HamlNode {
+	/**
+	 * @var HamlRenderer the renderer for this node
+	 */
+	protected $renderer;
+	/**
+	 * @var array options
+	 */
+	protected $options;
+
+	/**
+	 * Root HamlNode constructor.
+	 * @param array options for the tree
+	 * @return HamlNode
+	 */
+	public function __construct($options) {
+		$this->root = $this;
+		$this->options = $options;
+		$this->renderer = HamlRenderer::getRenderer($this->options['style'],
+			array(
+				'format' => $this->options['format'],
+				'attrWrapper' => $this->options['attrWrapper'],
+				'minimizedAttributes' => $this->options['minimizedAttributes'],
+			)
+		);
+		$this->token = array('level' => -1);
+	}
+
+	/**
+	 * Render this node.
+	 * @return string the rendered node
+	 */
+	public function render() {
+		foreach ($this->children as $child) {
+			$this->output .= $child->render();
+		} // foreach
+		return $this->output;
+	}
+}

data/lib/Phamlp/sass/SassException.php

@@ -0,0 +1,29 @@
+<?php
+/* SVN FILE: $Id: SassException.php 61 2010-04-16 10:19:59Z chris.l.yates $ */
+/**
+ * Sass exception.
+ * @author			Chris Yates <chris.l.yates@gmail.com>
+ * @copyright 	Copyright (c) 2010 PBM Web Development
+ * @license			http://phamlp.googlecode.com/files/license.txt
+ * @package			PHamlP
+ * @subpackage	Sass
+ */
+
+require_once(dirname(__FILE__).'/../PhamlpException.php');
+
+/**
+ * Sass exception class.
+ * @package			PHamlP
+ * @subpackage	Sass
+ */
+class SassException extends PhamlpException {
+	/**
+	 * Sass Exception.
+	 * @param string Exception message
+	 * @param array parameters to be applied to the message using <code>strtr</code>.
+	 * @param object object with source code and meta data
+	 */
+	public function __construct($message, $params = array(), $object = null) {
+		parent::__construct('sass', $message, $params, $object);
+	}
+}

data/lib/Phamlp/sass/SassFile.php

@@ -0,0 +1,164 @@
+<?php
+/* SVN FILE: $Id: SassFile.php 118 2010-09-21 09:45:11Z chris.l.yates@gmail.com $ */
+/**
+ * SassFile class file.
+ * File handling utilites.
+ * @author			Chris Yates <chris.l.yates@gmail.com>
+ * @copyright 	Copyright (c) 2010 PBM Web Development
+ * @license			http://phamlp.googlecode.com/files/license.txt
+ * @package			PHamlP
+ * @subpackage	Sass
+ */
+
+/**
+ * SassFile class.
+ * @package			PHamlP
+ * @subpackage	Sass
+ */
+class SassFile {
+	const SASS = 'sass';
+	const SCSS = 'scss';
+	const SASSC = 'sassc';
+	
+	private static $extensions = array(self::SASS, self::SCSS);
+
+	/**
+	 * Returns the parse tree for a file.
+	 * If caching is enabled a cached version will be used if possible; if not the
+	 * parsed file will be cached.
+	 * @param string filename to parse
+	 * @param SassParser Sass parser
+	 * @return SassRootNode
+	 */
+	public static function getTree($filename, $parser) {
+		if ($parser->cache) {
+			$cached = self::getCachedFile($filename, $parser->cache_location);
+			if ($cached !== false) {
+				return $cached;
+			}
+		}
+
+		$sassParser = new SassParser(array_merge($parser->options, array('line'=>1)));
+		$tree = $sassParser->parse($filename);
+		if ($parser->cache) {
+			self::setCachedFile($tree, $filename, $parser->cache_location);
+		}
+		return $tree;
+	 }
+
+	/**
+	 * Returns the full path to a file to parse.
+	 * The file is looked for recursively under the load_paths directories and
+	 * the template_location directory.
+	 * If the filename does not end in .sass or .scss try the current syntax first
+	 * then, if a file is not found, try the other syntax.
+	 * @param string filename to find
+	 * @param SassParser Sass parser
+	 * @return string path to file
+	 * @throws SassException if file not found
+	 */
+	public static function getFile($filename, $parser) {
+		$ext = substr($filename, -5);
+		
+		foreach (self::$extensions as $i=>$extension) {
+			if ($ext !== '.'.self::SASS && $ext !== '.'.self::SCSS) {
+				if ($i===0) {
+					$_filename = "$filename.{$parser->syntax}";
+				}
+				else {
+					$_filename = $filename.'.'.($parser->syntax === self::SASS ? self::SCSS : self::SASS);
+				}
+			}
+			else {
+				$_filename = $filename;
+			}
+
+			if (file_exists($_filename)) {
+				return $_filename;
+			}
+
+			foreach (array_merge(array(dirname($parser->filename)), $parser->load_paths) as $loadPath) {
+				$path = self::findFile($_filename, realpath($loadPath));
+				if ($path !== false) {
+					return $path;
+				}
+			} // foreach
+
+			if (!empty($parser->template_location)) {
+				$path = self::findFile($_filename, realpath($parser->template_location));
+				if ($path !== false) {
+					return $path;
+				}
+			}		
+		}
+
+		throw new SassException('Unable to find {what}: {filename}', array('{what}'=>'import file', '{filename}'=>$filename));
+	}
+
+	/**
+	 * Looks for the file recursively in the specified directory.
+	 * This will also look for _filename to handle Sass partials.
+	 * @param string filename to look for
+	 * @param string path to directory to look in and under
+	 * @return mixed string: full path to file if found, false if not
+	 */
+	public static function findFile($filename, $dir) {
+		$partialname = dirname($filename).DIRECTORY_SEPARATOR.'_'.basename($filename);
+		
+		foreach (array($filename, $partialname) as $file) {		
+			if (file_exists($dir . DIRECTORY_SEPARATOR . $file)) {
+				return realpath($dir . DIRECTORY_SEPARATOR . $file);
+			}		
+		}
+
+		$files = array_slice(scandir($dir), 2);
+
+		foreach ($files as $file) {
+			if (is_dir($dir . DIRECTORY_SEPARATOR . $file)) {
+				$path = self::findFile($filename, $dir . DIRECTORY_SEPARATOR . $file);
+				if ($path !== false) {
+					return $path;
+				}
+			}
+		} // foreach
+	  return false;
+	}
+
+	/**
+	 * Returns a cached version of the file if available.
+	 * @param string filename to fetch
+	 * @param string path to cache location
+	 * @return mixed the cached file if available or false if it is not
+	 */
+	public static function getCachedFile($filename, $cacheLocation) {
+		$cached = realpath($cacheLocation) . DIRECTORY_SEPARATOR .
+			md5($filename) . '.'.self::SASSC;
+
+		if ($cached && file_exists($cached) &&
+				filemtime($cached) >= filemtime($filename)) {
+			return unserialize(file_get_contents($cached));
+		}
+		return false;
+	}
+
+	/**
+	 * Saves a cached version of the file.
+	 * @param SassRootNode Sass tree to save
+	 * @param string filename to save
+	 * @param string path to cache location
+	 * @return mixed the cached file if available or false if it is not
+	 */
+	public static function setCachedFile($sassc, $filename, $cacheLocation) {
+		$cacheDir = realpath($cacheLocation);
+
+		if (!$cacheDir) {
+			mkdir($cacheLocation);
+			@chmod($cacheLocation, 0777);
+			$cacheDir = realpath($cacheLocation);
+		}
+
+		$cached = $cacheDir . DIRECTORY_SEPARATOR . md5($filename) . '.'.self::SASSC;
+
+		return file_put_contents($cached, serialize($sassc));
+	}
+}