simple-compass 0.0.1

data/.gitignore

@@ -0,0 +1,2 @@
+.sass-cache
+pkg

data/.rspec

@@ -0,0 +1 @@
+--color

data/Gemfile

@@ -0,0 +1,6 @@
+source "http://rubygems.org"
+
+gemspec
+
+gem 'simple-compass', :path => '.'
+gem 'rspec'

data/Gemfile.lock

@@ -0,0 +1,26 @@
+PATH
+  remote: .
+  specs:
+    simple-compass (0.0.1)
+      sass
+
+GEM
+  remote: http://rubygems.org/
+  specs:
+    diff-lcs (1.2.1)
+    rspec (2.13.0)
+      rspec-core (~> 2.13.0)
+      rspec-expectations (~> 2.13.0)
+      rspec-mocks (~> 2.13.0)
+    rspec-core (2.13.0)
+    rspec-expectations (2.13.0)
+      diff-lcs (>= 1.1.3, < 2.0)
+    rspec-mocks (2.13.0)
+    sass (3.2.6)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  rspec
+  simple-compass!

data/Rakefile

@@ -0,0 +1,8 @@
+require 'bundler/gem_tasks'
+require 'rspec/core/rake_task'
+
+RSpec::Core::RakeTask.new(:spec) do |spec|
+  spec.verbose = false
+end
+
+task :default => :spec

data/lib/simple-compass.rb

@@ -0,0 +1,17 @@
+require 'sass'
+
+module Compass
+  module Frameworks
+    def self.register(name, options = {})
+      Sass.load_paths << options[:stylesheets_directory]
+    end
+  end
+end
+
+root_dir = File.join(File.dirname(__FILE__), '..')
+
+sass_dir = File.expand_path File.join root_dir, 'sass'
+Sass.load_paths << sass_dir
+
+functions_dir = File.expand_path File.join root_dir, 'lib', 'simple-compass', 'sass', 'functions'
+Dir[File.join(functions_dir, "**/*.rb")].each { |f| require f }

data/lib/simple-compass/sass/functions/display.rb

@@ -0,0 +1,27 @@
+module Sass::Script::Functions
+  DEFAULT_DISPLAY = {
+    :block => %w{address article aside blockquote center dir div dd details dl dt fieldset
+                  figcaption figure form footer frameset h1 h2 h3 h4 h5 h6 hr header hgroup
+                  isindex menu nav noframes noscript ol p pre section summary ul},
+    :inline => %w{a abbr acronym audio b basefont bdo big br canvas cite code command
+                  datalist dfn em embed font i img input keygen kbd label mark meter output
+                  progress q rp rt ruby s samp select small span strike strong sub
+                  sup textarea time tt u var video wbr},
+    :"inline-block" => %w{img},
+    :table => %w{table},
+    :"list-item" => %w{li},
+    :"table-row-group" => %w{tbody},
+    :"table-header-group" => %w{thead},
+    :"table-footer-group" => %w{tfoot},
+    :"table-row" => %w{tr},
+    :"table-cell" => %w{th td},
+    :"html5-block" => %w{article aside details figcaption figure footer header hgroup menu nav section summary},
+    :"html5-inline" => %w{audio canvas command datalist embed keygen mark meter output progress rp rt ruby time video wbr},
+  }
+  DEFAULT_DISPLAY[:html5] = (DEFAULT_DISPLAY[:"html5-block"] + DEFAULT_DISPLAY[:"html5-inline"]).sort
+  # returns a comma delimited string for all the
+  # elements according to their default css3 display value.
+  def elements_of_type(display)
+    Sass::Script::String.new(DEFAULT_DISPLAY.fetch(display.value.to_sym).join(", "))
+  end
+end

data/lib/simple-compass/sass/functions/lists.rb

@@ -0,0 +1,101 @@
+module Sass::Script::Functions
+
+  # Returns true when the object is false, an empty string, or an empty list
+  def blank(obj)
+    case obj
+    when Sass::Script::Bool
+      Sass::Script::Bool.new !obj.to_bool
+    when Sass::Script::String
+      Sass::Script::Bool.new obj.value.strip.size == 0
+    when Sass::Script::List
+      Sass::Script::Bool.new obj.value.size == 0 || obj.value.all?{|el| blank(el).to_bool}
+    else
+      Sass::Script::Bool.new false
+    end
+  end
+
+  # Returns a new list after removing any non-true values
+  def compact(*args)
+    sep = :comma
+    if args.size == 1 && args.first.is_a?(Sass::Script::List)
+      list = args.first
+      args = list.value
+      sep = list.separator
+    end
+    Sass::Script::List.new(args.reject{|a| !a.to_bool}, sep)
+  end
+
+  # Get the nth value from a list
+  def _compass_nth(list, place)
+    assert_type list, :List
+    if place.value == "first"
+      list.value.first
+    elsif place.value == "last"
+      list.value.last
+    else
+      list.value[place.value - 1]
+    end
+  end
+
+  # Returns a list object from a value that was passed.
+  # This can be used to unpack a space separated list that got turned
+  # into a string by sass before it was passed to a mixin.
+  def _compass_list(arg)
+    if arg.is_a?(Sass::Script::List)
+      Sass::Script::List.new(arg.value.dup, arg.separator)
+    else
+      Sass::Script::List.new([arg], :space)
+    end
+  end
+
+  # If the argument is a list, it will return a new list that is space delimited
+  # Otherwise it returns a new, single element, space-delimited list.
+  def _compass_space_list(list)
+    if list.is_a?(Sass::Script::List)
+      Sass::Script::List.new(list.value.dup, :space)
+    else
+      Sass::Script::List.new([list], :space)
+    end
+  end
+
+  # Returns the size of the list.
+  def _compass_list_size(list)
+    assert_list list
+    Sass::Script::Number.new(list.value.size)
+  end
+
+  # slice a sublist from a list
+  def _compass_slice(list, start_index, end_index = nil)
+    end_index ||= Sass::Script::Number.new(-1)
+    start_index = start_index.value
+    end_index = end_index.value
+    start_index -= 1 unless start_index < 0
+    end_index -= 1 unless end_index < 0
+    Sass::Script::List.new list.values[start_index..end_index], list.separator
+  end
+
+  # removes the given values from the list.
+  def reject(list, *values)
+    Sass::Script::List.new(list.value.reject{|v| values.any?{|o| v == o}}, list.separator)
+  end
+
+  # returns the first value of a space delimited list.
+  def first_value_of(list)
+    if list.is_a?(Sass::Script::String)
+      Sass::Script::String.new(list.value.split(/\s+/).first)
+    elsif defined?(Sass::Script::List) && list.is_a?(Sass::Script::List)
+      list.value.first
+    else
+      list
+    end
+  end
+
+  protected
+
+  def assert_list(value)
+    unless value.is_a?(Sass::Script::List)
+      raise ArgumentError.new("#{value.inspect} is not a list")
+    end
+  end
+
+end

data/lib/simple-compass/sass/functions/selectors.rb

@@ -0,0 +1,64 @@
+module Sass::Script::Functions
+  COMMA_SEPARATOR = /\s*,\s*/
+
+  # 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)
+  #   #{nest(!selector, !selector2, !selector3)}
+  #     width: 2px
+  def nest(*arguments)
+    nested = arguments.map{|a| a.value}.inject do |memo,arg|
+      ancestors = memo.split(COMMA_SEPARATOR)
+      descendants = arg.split(COMMA_SEPARATOR)
+      ancestors.map{|a| descendants.map{|d| "#{a} #{d}"}.join(", ")}.join(", ")
+    end
+    Sass::Script::String.new(nested)
+  end
+
+  # 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
+  def append_selector(selector, to_append)
+    ancestors = selector.value.split(COMMA_SEPARATOR)
+    descendants = to_append.value.split(COMMA_SEPARATOR)
+    nested = ancestors.map{|a| descendants.map{|d| "#{a}#{d}"}.join(", ")}.join(", ")
+    Sass::Script::String.new(nested)
+  end
+
+  # 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
+  def headers(from = nil, to = nil)
+    if from && !to
+      if from.is_a?(Sass::Script::String) && from.value == "all"
+        from = Sass::Script::Number.new(1)
+        to = Sass::Script::Number.new(6)
+      else
+        to = from
+        from = Sass::Script::Number.new(1)
+      end
+    else
+      from ||= Sass::Script::Number.new(1)
+      to ||= Sass::Script::Number.new(6)
+    end
+    Sass::Script::String.new((from.value..to.value).map{|n| "h#{n}"}.join(", "))
+  end
+  alias headings headers
+end

data/lib/simple-compass/sass/functions/sprites.rb

@@ -0,0 +1,218 @@
+module Sass::Script::Functions
+  ZERO = Sass::Script::Number::new(0)
+  VALID_SELECTORS = %w(hover active target)
+  # Provides a consistent interface for getting a variable in ruby
+  # from a keyword argument hash that accounts for underscores/dash equivalence
+  # and allows the caller to pass a symbol instead of a string.
+  module VariableReader
+    def get_var(variable_name)
+      self[variable_name.to_s.gsub(/-/,"_")]
+    end
+  end
+
+  #Returns a list of all sprite names
+  def sprite_names(map)
+    Sass::Script::List.new(map.sprite_names.map { |f| Sass::Script::String.new(f) }, ' ')
+  end
+  Sass::Script::Functions.declare :sprite_names, [:map]
+
+  # Returns the system path of the sprite file
+  def sprite_path(map)
+    Sass::Script::String.new(map.name_and_hash)
+  end
+  Sass::Script::Functions.declare :sprite_path, [:map]
+
+  # Returns the sprite file as an inline image
+  #    @include "icon/*.png";
+  #     #{$icon-sprite-base-class} {
+  #       background-image: inline-sprite($icon-sprites);
+  #      }
+  def inline_sprite(map)
+    verify_map(map, "sprite-url")
+    map.generate
+    inline_image(sprite_path(map))
+  end
+  Sass::Script::Functions.declare :inline_sprite, [:map]
+
+  # Creates a Compass::SassExtensions::Sprites::SpriteMap object. A sprite map, when used in a property is the same
+  # as calling sprite-url. So the following background properties are equivalent:
+  #
+  #     $icons: sprite-map("icons/*.png");
+  #     background: sprite-url($icons) no-repeat;
+  #     background: $icons no-repeat;
+  #
+  # The sprite map object will generate the sprite map image, if necessary,
+  # the first time it is converted to a url. Simply constructing it has no side-effects.
+  def sprite_map(glob, kwargs = {})
+    kwargs.extend VariableReader
+    Compass::SassExtensions::Sprites::SpriteMap.from_uri(glob, self, kwargs)
+  end
+  Sass::Script::Functions.declare :sprite_map, [:glob], :var_kwargs => true
+
+  # Returns the image and background position for use in a single shorthand property:
+  #
+  #     $icons: sprite-map("icons/*.png"); // contains icons/new.png among others.
+  #     background: sprite($icons, new) no-repeat;
+  #
+  # Becomes:
+  #
+  #     background: url('/images/icons.png?12345678') 0 -24px no-repeat;
+  def sprite(map, sprite, offset_x = ZERO, offset_y = ZERO)
+    sprite = convert_sprite_name(sprite)
+    verify_map(map)
+    unless sprite.is_a?(Sass::Script::String)
+      raise Sass::SyntaxError, %Q(The second argument to sprite() must be a sprite name. See http://beta.compass-style.org/help/tutorials/spriting/ for more information.)
+    end
+    url = sprite_url(map)
+    position = sprite_position(map, sprite, offset_x, offset_y)
+    Sass::Script::List.new([url] + position.value, :space)
+  end
+  Sass::Script::Functions.declare :sprite, [:map, :sprite]
+  Sass::Script::Functions.declare :sprite, [:map, :sprite, :offset_x]
+  Sass::Script::Functions.declare :sprite, [:map, :sprite, :offset_x, :offset_y]
+
+  # Returns the name of a sprite map
+  # The name is derived from the folder than contains the sprites.
+  def sprite_map_name(map)
+    verify_map(map, "sprite-map-name")
+    Sass::Script::String.new(map.name)
+  end
+  Sass::Script::Functions.declare :sprite_name, [:sprite]
+
+  # Returns the path to the original image file for the sprite with the given name
+  def sprite_file(map, sprite)
+    sprite = convert_sprite_name(sprite)
+    verify_map(map, "sprite")
+    verify_sprite(sprite)
+    if image = map.image_for(sprite.value)
+      Sass::Script::String.new(image.file)
+    else
+      missing_image!(map, sprite)
+    end
+  end
+  Sass::Script::Functions.declare :sprite_file, [:map, :sprite]
+
+  # Returns boolean if sprite has a parent
+  def sprite_does_not_have_parent(map, sprite)
+    sprite = convert_sprite_name(sprite)
+    verify_map map
+    verify_sprite sprite
+    Sass::Script::Bool.new map.image_for(sprite.value).parent.nil?
+  end
+
+  Sass::Script::Functions.declare :sprite_does_not_have_parent, [:map, :sprite]
+
+  # Returns boolean if sprite has the selector
+  def sprite_has_selector(map, sprite, selector)
+    sprite = convert_sprite_name(sprite)
+    verify_map map
+    verify_sprite sprite
+    unless VALID_SELECTORS.include?(selector.value)
+      raise Sass::SyntaxError, "Invalid Selctor did you mean one of: #{VALID_SELECTORS.join(', ')}"
+    end
+    Sass::Script::Bool.new map.send(:"has_#{selector.value}?", sprite.value)
+  end
+
+  Sass::Script::Functions.declare :sprite_has_selector, [:map, :sprite, :selector]
+
+
+  # Returns a url to the sprite image.
+  def sprite_url(map)
+    verify_map(map, "sprite-url")
+    map.generate
+    generated_image_url(Sass::Script::String.new("#{map.path}-s#{map.uniqueness_hash}.png"))
+  end
+  Sass::Script::Functions.declare :sprite_url, [:map]
+
+  # Returns the position for the original image in the sprite.
+  # This is suitable for use as a value to background-position:
+  #
+  #     $icons: sprite-map("icons/*.png");
+  #     background-position: sprite-position($icons, new);
+  #
+  # Might generate something like:
+  #
+  #     background-position: 0 -34px;
+  #
+  # You can adjust the background relative to this position by passing values for
+  # `$offset-x` and `$offset-y`:
+  #
+  #     $icons: sprite-map("icons/*.png");
+  #     background-position: sprite-position($icons, new, 3px, -2px);
+  #
+  # Would change the above output to:
+  #
+  #     background-position: 3px -36px;
+  def sprite_position(map, sprite = nil, offset_x = ZERO, offset_y = ZERO)
+    assert_type offset_x, :Number
+    assert_type offset_y, :Number
+    sprite = convert_sprite_name(sprite)
+    verify_map(map, "sprite-position")
+    unless sprite && sprite.is_a?(Sass::Script::String)
+      raise Sass::SyntaxError, %Q(The second argument to sprite-position must be a sprite name. See http://beta.compass-style.org/help/tutorials/spriting/ for more information.)
+    end
+    image = map.image_for(sprite.value)
+    unless image
+      missing_image!(map, sprite)
+    end
+    if offset_x.unit_str == "%"
+      x = offset_x # CE: Shouldn't this be a percentage of the total width?
+    else
+      x = offset_x.value - image.left
+      x = Sass::Script::Number.new(x, x == 0 ? [] : ["px"])
+    end
+    y = offset_y.value - image.top
+    y = Sass::Script::Number.new(y, y == 0 ? [] : ["px"])
+    Sass::Script::List.new([x, y],:space)
+  end
+  Sass::Script::Functions.declare :sprite_position, [:map]
+  Sass::Script::Functions.declare :sprite_position, [:map, :sprite]
+  Sass::Script::Functions.declare :sprite_position, [:map, :sprite, :offset_x]
+  Sass::Script::Functions.declare :sprite_position, [:map, :sprite, :offset_x, :offset_y]
+
+  def sprite_image(*args)
+    raise Sass::SyntaxError, %Q(The sprite-image() function has been replaced by sprite(). See http://compass-style.org/help/tutorials/spriting/ for more information.)
+  end
+
+protected
+
+  def reversed_color_names
+    if Sass::Script::Color.const_defined?(:HTML4_COLORS_REVERSE)
+      Sass::Script::Color::HTML4_COLORS_REVERSE
+    else
+      Sass::Script::Color::COLOR_NAMES_REVERSE
+    end
+  end
+
+  def convert_sprite_name(sprite)
+    case sprite
+      when Sass::Script::Color
+        Sass::Script::String.new(reversed_color_names[sprite.rgb])
+      when Sass::Script::Bool
+        Sass::Script::String.new(sprite.to_s)
+      else
+        sprite
+    end
+  end
+
+  def verify_map(map, error = "sprite")
+    unless map.is_a?(Compass::SassExtensions::Sprites::SpriteMap)
+      missing_sprite!(error)
+    end
+  end
+
+  def verify_sprite(sprite)
+    unless sprite.is_a?(Sass::Script::String)
+      raise Sass::SyntaxError, %Q(The second argument to sprite() must be a sprite name. See http://beta.compass-style.org/help/tutorials/spriting/ for more information.)
+    end
+  end
+
+  def missing_image!(map, sprite)
+    raise Sass::SyntaxError, "No sprite called #{sprite} found in sprite map #{map.path}/#{map.name}. Did you mean one of: #{map.sprite_names.join(", ")}"
+  end
+
+  def missing_sprite!(function_name)
+    raise Sass::SyntaxError, %Q(The first argument to #{function_name}() must be a sprite map. See http://beta.compass-style.org/help/tutorials/spriting/ for more information.)
+  end
+
+end