frontsau 0.0.1

data/lib/Phamlp/sass/extensions/compass/functions/colourStops.php

@@ -0,0 +1,268 @@
+<?php
+/* SVN FILE: $Id: SassBoolean.php 49 2010-04-04 10:51:24Z chris.l.yates $ */
+/**
+ * Compass extension SassScript colour stop objects and functions 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	Sass.extensions.compass.functions
+ */
+ 
+/**
+ * Compass extension List object.
+ * @package			PHamlP
+ * @subpackage	Sass.extensions.compass.functions
+ */
+class CompassList extends SassLiteral {	
+	public function __construct($values) {
+		$this->value = $values;
+	}
+	
+	public function getValues() {
+		return $this->value;
+	}
+
+	/**
+	 * Returns the type of this
+	 * @return string the type of this
+	 */
+	protected function getTypeOf() {
+		return 'list';
+	}
+
+	public function toString() {
+		$values = array();
+		foreach ($this->value as $value) {
+			$values[] = $value->toString();
+		}
+		return join(', ', $values);
+	}
+	
+	public static function isa($subject) {}
+}
+
+class CompassColourStop extends SassLiteral {
+	private $colour;
+	public $stop;
+	  
+	public function __construct($colour, $stop = null) {
+		$this->colour = $colour;
+		$this->stop = $stop;
+	}
+	
+	protected function getColor() {
+		return $this->getColour();
+	}
+	
+	protected function getColour() {
+		return $this->colour;
+	}
+	
+	public function toString() {
+		$s = $this->colour->toString();
+		if (!empty($this->stop)) {
+			$s .= ' ';
+			if ($this->stop->isUnitless()) {
+				$s .= $this->stop->op_times(new SassNumber('100%'))->toString();
+			}
+			else {
+				$s .= $this->stop->toString();
+			}
+		}
+		return $s;
+	}
+	
+	public static function isa($subject) {}
+}
+ 
+/**
+ * Compass extension SassScript colour stops functions class.
+ * A collection of functions for use in SassSCript.
+ * @package			PHamlP
+ * @subpackage	Sass.extensions.compass.functions
+ */
+class SassExtentionsCompassFunctionsColourStops {
+	# returns color-stop() calls for use in webkit.
+	public static function grad_color_stops($colour_list) {
+		return self::grad_colour_stops($colour_list);
+	}
+	
+	public static function grad_colour_stops($colour_list) {
+		SassLiteral::assertType($colour_list, 'CompassList');
+		self::normalize_stops($colour_list);
+		$v = array_reverse($colour_list->values);
+		$max = $v[0]->stop;
+		$last_value = null;
+		
+		$colourStops = array();
+		
+		foreach ($colour_list->values as $pos) {
+			# have to convert absolute units to percentages for use in colour stop functions.
+			$stop = $pos->stop;
+			if ($stop->numeratorUnits === $max->numeratorUnits) {
+				$stop = $stop->op_div($max)->op_times(new SassNumber('100%'));
+			}
+			# Make sure the colour stops are specified in the right order.
+			if ($last_value && $last_value->value > $stop->value) {
+				throw new SassScriptFunctionException('Colour stops must be specified in increasing order', array(), SassScriptParser::$context->node);
+			}
+		 
+			$last_value = $stop;
+			$colourStops[] = "colour-stop({$stop->toString()}, {$pos->colour->toString()})";
+		}
+		
+		return new SassString(join(', ', $colourStops));
+	}
+
+	# returns the end position of the gradient from the colour stop
+	public static function grad_end_position($colourList, $radial = null) {
+		SassLiteral::assertType($colourList, 'CompassList');
+		if (is_null($radial)) {
+			$radial = new SassBoolean(false);
+		}
+		else {
+			SassLiteral::assertType($radial, 'SassBoolean');
+		}
+		return self::grad_position($colourList, new SassNumber(sizeof($colourList->values)), new SassNumber(100), $radial);
+	}
+
+	public static function grad_position($colourList, $index, $default, $radial = null) {
+		SassLiteral::assertType($colourList, 'CompassList');
+		if (is_null($radial)) {
+			$radial = new SassBoolean(false);
+		}
+		else {
+			SassLiteral::assertType($radial, 'SassBoolean');
+		}
+		$stop = $colourList->values[$index->value - 1]->stop;
+		if ($stop && $radial->value) {
+			$orig_stop = $stop;
+			if ($stop->isUnitless()) {
+				if ($stop->value <= 1) {
+					# A unitless number is assumed to be a percentage when it's between 0 and 1
+					$stop = $stop->op_times(new SassNumber('100%'));
+				}
+				else {
+					# Otherwise, a unitless number is assumed to be in pixels
+					$stop = $stop->op_times(new SassNumber('1px'));
+				}
+			}
+			
+			if ($stop->numeratorUnits === '%' && isset($colourList->values[sizeof($colourList->values)-1]->stop) && $colourList->values[sizeof($colourList->values)-1]->stop->numeratorUnits === 'px')
+				$stop = $stop->op_times($colourList->values[sizeof($colourList->values)-1]->stop)->op_div(new SassNumber('100%'));
+			//Compass::Logger.new.record(:warning, "Webkit only supports pixels for the start and end stops for radial gradients. Got: #{orig_stop}") if stop.numerator_units != ["px"];
+			return $stop->op_div(new SassNumber('1'.$stop->units));
+		}
+		elseif ($stop)
+			return $stop;
+		else
+			return $default;
+	}
+
+	# takes the given position and returns a point in percentages
+	public static function grad_point($position) {
+		$position = $position->value;
+		if (strpos($position, ' ') !== false) {
+			if (preg_match('/(top|bottom|center) (left|right|center)/', $position, $matches)) 
+				$position =  "{$matches[2]} {$matches[1]}";
+		}
+		else {
+			switch ($position) {
+				case 'top':
+				case 'bottom':
+					$position = "left $position";
+					break;
+				case 'left':
+				case 'right':
+					$position .= ' top';
+					break;
+			}
+		}
+
+		return new SassString(preg_replace(
+			array('/top/', '/bottom/', '/left/', '/right/', '/center/'),
+			array('0%', '100%', '0%', '100%', '50%'), $position
+		));
+	}
+
+	public static function color_stops() {
+		return self::colour_stops(func_get_args());
+	}
+	
+	public static function colour_stops() {
+		$args = func_get_args();
+		$list = array();
+		
+		foreach ($args as $arg) {
+			if ($arg instanceof SassColour) {
+				$list[] = new CompassColourStop($arg);
+			}
+			elseif ($arg instanceof SassString) {
+				# We get a string as the result of concatenation
+				# So we have to reparse the expression
+				$colour = $stop = null;
+				if (empty($parser))
+					$parser = new SassScriptParser();
+				$expr = $parser->parse($arg->value, SassScriptParser::$context);
+				
+				$x = array_pop($expr);
+				
+				if ($x instanceof SassColour)
+					$colour = $x;
+				elseif ($x instanceof SassScriptOperation) {
+					if ($x->operator != 'concat')
+						# This should never happen.
+						throw new SassScriptFunctionException("Couldn't parse a colour stop from: {value}", array('{value}'=>$arg->value), SassScriptParser::$context->node);
+					$colour = $expr[0];
+					$stop = $expr[1];
+				}
+				else
+					throw new SassScriptFunctionException("Couldn't parse a colour stop from: {value}", array('{value}'=>$arg->value), SassScriptParser::$context->node);
+				$list[] = new CompassColourStop($colour, $stop);
+			}
+			else
+				throw new SassScriptFunctionException('Not a valid color stop: {arg}', array('{arg}'=>$arg->value), SassScriptParser::$context->node);
+		}
+		return new CompassList($list);
+	}
+	
+	private static function normalize_stops($colourList) {
+		$positions = $colourList->values;
+		$s = sizeof($positions);
+		
+		# fill in the start and end positions, if unspecified
+		if (empty($positions[0]->stop))
+			$positions[0]->stop = new SassNumber(0);
+		if (empty($positions[$s-1]->stop))
+			$positions[$s-1]->stop = new SassNumber('100%');
+
+		# fill in empty values
+		for ($i = 0; $i<$s; $i++) {
+			if (is_null($positions[$i]->stop)) {
+				$num = 2;
+				for ($j = $i+1; $j<$s; $j++) {
+					if (isset($positions[$j]->stop)) {
+						$positions[$i]->stop = $positions[$i-1]->stop->op_plus($positions[$j]->stop->op_minus($positions[$i-1]->stop))->op_div(new SassNumber($num));
+						break;
+					}
+					else
+						$num += 1;
+				}
+			}
+		}
+		# normalize unitless numbers
+		foreach ($positions as &$pos) {
+			if ($pos->stop->isUnitless()) {
+				$pos->stop = ($pos->stop->value <= 1 ?
+					$pos->stop->op_times(new SassNumber('100%')) :
+					$pos->stop->op_times(new SassNumber('1px'))
+				);
+			}
+		}
+		if ($positions[$s-1]->stop->op_eq(new SassNumber('0px'))->toBoolean() ||
+			 $positions[$s-1]->stop->op_eq(new SassNumber('0%'))->toBoolean())
+			 	throw new SassScriptFunctionException('Colour stops must be specified in increasing order', array(), SassScriptParser::$context->node);
+		return null;
+	}
+}

data/lib/Phamlp/sass/extensions/compass/functions/constants.php

@@ -0,0 +1,44 @@
+<?php
+/* SVN FILE: $Id: SassBoolean.php 49 2010-04-04 10:51:24Z chris.l.yates $ */
+/**
+ * Compass extension SassScript constants functions 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	Sass.extensions.compass.functions
+ */
+ 
+/**
+ * Compass extension SassScript constants functions class.
+ * A collection of functions for use in SassSCript.
+ * @package			PHamlP
+ * @subpackage	Sass.extensions.compass.functions
+ */
+class SassExtentionsCompassFunctionsConstants {
+	public static function opposite_position($pos) {
+		$opposites = array();
+		foreach (explode(' ', $pos->toString()) as $position) {
+			switch (trim($position)) {
+				case 'top':
+					$opposites[] = 'bottom';
+					break;
+				case 'right':
+					$opposites[] = 'left';
+					break;
+				case 'bottom':
+					$opposites[] = 'top';
+					break;
+				case 'left':
+					$opposites[] = 'right';
+					break;
+				case 'center':
+					$opposites[] = 'center';
+					break;
+				default:
+					throw new Exception('Cannot determine the opposite of '.trim($position));
+			}
+		}
+		return new SassString(join(' ', $opposites));
+	}
+}

data/lib/Phamlp/sass/extensions/compass/functions/fontFiles.php

@@ -0,0 +1,30 @@
+<?php
+/* SVN FILE: $Id: SassBoolean.php 49 2010-04-04 10:51:24Z chris.l.yates $ */
+/**
+ * Compass extension SassScript font files functions 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	Sass.extensions.compass.functions
+ */
+ 
+/**
+ * Compass extension SassScript font files functions class.
+ * A collection of functions for use in SassSCript.
+ * @package			PHamlP
+ * @subpackage	Sass.extensions.compass.functions
+ */
+class SassExtentionsCompassFunctionsFontFiles {
+	public function font_files() {
+		if (func_num_args() % 2)
+			throw new SassScriptFunctionException('An even number of arguments must be passed to font_files()', array(), SassScriptParser::$context->node);
+
+		$args = func_get_args();
+		$files = array();
+		while ($args) {
+			$files[] = '#{font_url('.array_shift($args)."} format('".array_shift($args)."')";
+		}
+		return new SassString(join(", ", $files));
+	}
+}

data/lib/Phamlp/sass/extensions/compass/functions/imageSize.php

@@ -0,0 +1,39 @@
+<?php
+/* SVN FILE: $Id: SassBoolean.php 49 2010-04-04 10:51:24Z chris.l.yates $ */
+/**
+ * Compass extension SassScript image size functions 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	Sass.extensions.compass.functions
+ */
+ 
+/**
+ * Compass extension SassScript image size functions class.
+ * A collection of functions for use in SassSCript.
+ * @package			PHamlP
+ * @subpackage	Sass.extensions.compass.functions
+ */
+class SassExtentionsCompassFunctionsImageSize {
+	# Returns the $width of the image relative to the images directory
+	public function image_width($image_file) {
+		$image_size = getimagesize(self::real_path($image_file));
+		return new SassNumber($image_size[0].'px');
+	}
+
+	# Returns the height of the image relative to the images directory
+	public function image_height($image_file) {
+		$image_size = getimagesize(self::real_path($image_file));
+		return new SassNumber($image_size[1].'px');
+	}
+
+	private function real_path($image_file) {
+		$path = $image_file->value;
+		# Compute the real path to the image on the file stystem if the images_dir is set.
+		if (SassExtentionsCompassConfig::config('images_path'))
+			return SassExtentionsCompassConfig::config('images_path').DIRECTORY_SEPARATOR.$path;
+		else
+			return SassExtentionsCompassConfig::config('project_path').DIRECTORY_SEPARATOR.$path;
+	}
+}

data/lib/Phamlp/sass/extensions/compass/functions/inlineData.php

@@ -0,0 +1,84 @@
+<?php
+/* SVN FILE: $Id: SassBoolean.php 49 2010-04-04 10:51:24Z chris.l.yates $ */
+/**
+ * Compass extension SassScript inline data 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	Sass.extensions.compass.functions
+ */
+ 
+/**
+ * Compass extension SassScript inline data functions class.
+ * A collection of functions for use in SassSCript.
+ * @package			PHamlP
+ * @subpackage	Sass.extensions.compass.functions
+ */
+class SassExtentionsCompassFunctionsInlineData {
+	public function inline_image($path, $mime_type = null) {
+		$path = $path->value;
+		$real_path = SassExtentionsCompassConfig::config('images_path').DIRECTORY_SEPARATOR.$path;
+		$url = 'url(data:'.self::compute_mime_type($path, $mime_type).';base64,'.self::data($real_path).')';
+		return new SassString($url);
+	}
+
+	public function inline_font_files() {
+		if (func_num_args() % 2)
+			throw new SassScriptFunctionException('An even number of arguments must be passed to inline_font_files()', array(), SassScriptParser::$context->node);
+
+		$args = func_get_args();
+		$files = array();
+		while ($args) {
+			$path = array_shift($args);
+			$real_path = SassExtentionsCompassConfig::config('fonts_path').DIRECTORY_SEPARATOR.$path->value;
+			$fp = fopen($real_path, 'rb');
+			$url = 'url(data:'.self::compute_mime_type($path).';base64,'.self::data($real_path).')';
+			$files[] = "$url format('".array_shift($args)."')";
+		}
+		return new SassString(join(", ", $files));
+	}
+
+	private function compute_mime_type($path, $mime_type = null) {
+		if ($mime_type) return $mime_type;
+		
+		switch (true) {
+			case preg_match('/\.png$/i', $path):
+				return 'image/png';
+				break;
+			case preg_match('/\.jpe?g$/i', $path):
+				return 'image/jpeg';
+				break;
+			case preg_match('/\.gif$/i', $path):
+				return 'image/gif';
+				break;
+			case preg_match('/\.otf$/i', $path):
+				return 'font/opentype';
+				break;
+			case preg_match('/\.ttf$/i', $path):
+				return 'font/truetype';
+				break;
+			case preg_match(' /\.woff$/i', $path):
+				return 'font/woff';
+				break;
+			case preg_match(' /\.off$/i', $path):
+				return 'font/openfont';
+				break;
+			case preg_match('/\.([a-zA-Z]+)$/i', $path, $matches):
+				return 'image/'.strtolower($matches[1]);
+				break;
+			default:
+				throw new SassScriptFunctionException('Unable to determine mime type for {what}, please specify one explicitly', array('{what}'=>$path), SassScriptParser::$context->node);
+				break;
+		}
+	}
+
+	private function data($real_path) {
+		if (file_exists($real_path)) {
+			$fp = fopen($real_path, 'rb');
+			return base64_encode(fread($fp, filesize($real_path)));
+		}
+		else
+			throw new SassScriptFunctionException('Unable to find {what}: {filename}', array('{what}'=>'file', '{filename}'=>$real_path), SassScriptParser::$context->node);
+	}
+}

data/lib/Phamlp/sass/extensions/compass/functions/lists.php

@@ -0,0 +1,47 @@
+<?php
+/* SVN FILE: $Id: SassBoolean.php 49 2010-04-04 10:51:24Z chris.l.yates $ */
+/**
+ * Compass extension SassScript lists functions 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	Sass.extensions.compass.functions
+ */
+ 
+/**
+ * Compass extension SassScript lists functions class.
+ * A collection of functions for use in SassSCript.
+ * @package			PHamlP
+ * @subpackage	Sass.extensions.compass.functions
+ */
+class SassExtentionsCompassFunctionsLists {
+	const SPACE_SEPARATOR = '/\s+/';
+	
+	# Return the first value from a space separated list.
+	public static function first_value_of($list) {
+		if ($list instanceof SassString) {
+			$items = preg_split(self::SPACE_SEPARATOR, $list->value);
+			return new SassString($items[0]);
+		}
+		else return $list;
+	}
+	
+	# Return the nth value from a space separated list.
+	public static function nth_value_of($list, $n) {
+		if ($list instanceof SassString) {
+			$items = preg_split(self::SPACE_SEPARATOR, $list->value);
+			return new SassString($items[$n->toInt()-1]);
+		}
+		else return $list;
+	}
+	
+	# Return the last value from a space separated list.
+	public static function last_value_of($list) {
+		if ($list instanceof SassString) {
+			$items = array_reverse(preg_split(self::SPACE_SEPARATOR, $list->value));
+			return new SassString($items[0]);
+		}
+		else return $list;
+	}
+}

data/lib/Phamlp/sass/extensions/compass/functions/selectors.php

@@ -0,0 +1,128 @@
+<?php
+/* SVN FILE: $Id: SassBoolean.php 49 2010-04-04 10:51:24Z chris.l.yates $ */
+/**
+ * Compass extension SassScript selectors functions 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	Sass.extensions.compass.functions
+ */
+ 
+/**
+ * Compass extension SassScript selectors functions class.
+ * A collection of functions for use in SassSCript.
+ * @package			PHamlP
+ * @subpackage	Sass.extensions.compass.functions
+ */
+class SassExtentionsCompassFunctionsSelectors {
+	const COMMA_SEPARATOR = '/\s*,\s*/';
+	
+	private static $defaultDisplay = array(
+		'block' => array('address', 'blockquote', 'center', 'dir', 'div', 'dd',
+			'dl', 'dt', 'fieldset', 'form', 'frameset h1', 'h2', 'h3', 'h4', 'h5',
+			'h6', 'hr', 'isindex', 'menu', 'noframes', 'noscript', 'ol', 'p', 'pre',
+			'ul'),
+		'inline' => array('a', 'abbr', 'acronym', 'b', 'basefont', 'bdo', 'big',
+			'br', 'cite', 'code', 'dfn', 'em', 'font', 'i', 'img', 'input', 'kbd',
+			'label', 'q', 's', 'samp', 'select', 'small', 'span', 'strike', 'strong',
+			'sub', 'sup', 'textarea', 'tt', 'u', 'var'),
+		'table' => array('table'),
+		'list-item' => array('li'),
+		'table-row-group' => array('tbody'),
+		'table-header-group' => array('thead'),
+		'table-footer-group' => array('tfoot'),
+		'table-row' => array('tr'),
+		'table-cell' => array('th', 'td')
+	);
+	
+	# Permute multiple selectors each of which may be comma delimited, the end result is
+	# a new selector that is the equivalent of nesting each under the previous selector.
+	# To illustrate, the following mixins are equivalent:
+	# =mixin-a($selector1, $selector2, $selector3)
+	#	 #{$selector1}
+	#		 #{$selector2}
+	#			 #{$selector3}
+	#				 width: 2px
+	# =mixin-b($selector1, $selector2, $selector3)
+	#	 #{nest($selector, $selector2, $selector3)}
+	#		 width: 2px
+	public static function nest() {
+		if (func_num_args() < 2)
+			throw new SassScriptFunctionException('nest() requires two or more arguments', array(), SassScriptParser::$context->node);
+			
+		$args = func_get_args();
+		$arg = array_shift($args);
+		$ancestors = preg_split(self::COMMA_SEPARATOR, $arg->value);
+		
+		foreach ($args as $arg) {
+			$nested = array();
+			foreach (preg_split(self::COMMA_SEPARATOR, $arg->value) as $descenant) {
+				foreach ($ancestors as $ancestor) {
+					$nested[] = "$ancestor $descenant"; 
+				}
+			}
+			$ancestors = $nested;		
+		}
+		sort($nested);
+		return new SassString(join(', ', $nested));
+	}
+
+	# Permute two selectors, the first may be comma delimited.
+	# The end result is a new selector that is the equivalent of nesting the second
+	# selector under the first one in a sass file and preceding it with an &.
+	# To illustrate, the following mixins are equivalent:
+	# =mixin-a($selector, $to_append)
+	#	 #{$selector}
+	#		 &#{$to_append}
+	#			 width: 2px
+	# =mixin-b($selector, $to_append)
+	#	 #{append_selector($selector, $to_append)}
+	#		 width: 2px
+	public static function append_selector($selector, $to_append) {
+		$appended = array();
+		foreach (preg_split(self::COMMA_SEPARATOR, $selector->value) as $ancestor) {
+			foreach (preg_split(self::COMMA_SEPARATOR, $to_append->value) as $descendant) {
+				$appended[] = $ancestor.$descendant;
+			}
+		}
+		return new SassString(join(', ', $appended));
+	}
+
+	# Return the header selectors for the levels indicated
+	# Defaults to all headers h1 through h6
+	# For example:
+	# headers(all) => h1, h2, h3, h4, h5, h6
+	# headers(4) => h1, h2, h3, h4
+	# headers(2,4) => h2, h3, h4
+	public static function headers($from = null, $to = null) {
+		if (!$from || ($from instanceof SassString && $from->value === "all")) {
+			$from = new SassNumber(1);
+			$to = new SassNumber(6);
+		}
+		elseif ($from && !$to) {
+			$to = $from;
+			$from = new SassNumber(1);
+		}
+		
+		return new SassString('h' . join(', h', range($from->value, $to->value)));
+	}
+	
+	public static function headings($from = null, $to = null) {
+		return self::headers($from, $to);
+	}
+	
+	# Return an enumerated set of comma separated selectors.
+	# For example
+	# enumerate('foo', 1, 4) => foo-1, foo-2, foo-3, foo-4
+	public static function enumerate($prefix, $from, $to, $separator = null) {
+		$_prefix = $prefix->value . (!$separator ? '-' : $separator->value);
+	  return new SassString($_prefix . join(', '.$_prefix, range($from->value, $to->value)));
+	}
+	
+	# returns a comma delimited string for all the
+	# elements according to their default css3 display value.
+	public static function elements_of_type($display) {
+		return new SassString(join(', ', self::$defaultDisplay[$display->value]));
+	}
+}