haml 3.0.25 → 3.1.0.alpha.2

data/lib/sass/tree/prop_node.rb

@@ -1,220 +0,0 @@
-module Sass::Tree
-  # A static node reprenting a CSS property.
-  #
-  # @see Sass::Tree
-  class PropNode < Node
-    # The name of the property,
-    # interspersed with {Sass::Script::Node}s
-    # representing `#{}`-interpolation.
-    # Any adjacent strings will be merged together.
-    #
-    # @return [Array<String, Sass::Script::Node>]
-    attr_accessor :name
-
-    # The name of the property
-    # after any interpolated SassScript has been resolved.
-    # Only set once \{Tree::Node#perform} has been called.
-    #
-    # @return [String]
-    attr_accessor :resolved_name
-
-    # The value of the property.
-    #
-    # @return [Sass::Script::Node]
-    attr_accessor :value
-
-    # The value of the property
-    # after any interpolated SassScript has been resolved.
-    # Only set once \{Tree::Node#perform} has been called.
-    #
-    # @return [String]
-    attr_accessor :resolved_value
-
-    # How deep this property is indented
-    # relative to a normal property.
-    # This is only greater than 0 in the case that:
-    #
-    # * This node is in a CSS tree
-    # * The style is :nested
-    # * This is a child property of another property
-    # * The parent property has a value, and thus will be rendered
-    #
-    # @return [Fixnum]
-    attr_accessor :tabs
-
-    # @param name [Array<String, Sass::Script::Node>] See \{#name}
-    # @param value [Sass::Script::Node] See \{#value}
-    # @param prop_syntax [Symbol] `:new` if this property uses `a: b`-style syntax,
-    #   `:old` if it uses `:a b`-style syntax
-    def initialize(name, value, prop_syntax)
-      @name = Haml::Util.strip_string_array(
-        Haml::Util.merge_adjacent_strings(name))
-      @value = value
-      @tabs = 0
-      @prop_syntax = prop_syntax
-      super()
-    end
-
-    # Compares the names and values of two properties.
-    #
-    # @param other [Object] The object to compare with
-    # @return [Boolean] Whether or not this node and the other object
-    #   are the same
-    def ==(other)
-      self.class == other.class && name == other.name && value == other.value && super
-    end
-
-    # Returns a appropriate message indicating how to escape pseudo-class selectors.
-    # This only applies for old-style properties with no value,
-    # so returns the empty string if this is new-style.
-    #
-    # @return [String] The message
-    def pseudo_class_selector_message
-      return "" if @prop_syntax == :new || !value.is_a?(Sass::Script::String) || !value.value.empty?
-      "\nIf #{declaration.dump} should be a selector, use \"\\#{declaration}\" instead."
-    end
-
-    protected
-
-    # @see Node#to_src
-    def to_src(tabs, opts, fmt)
-      res = declaration(tabs, opts, fmt)
-      return res + "#{semi fmt}\n" if children.empty?
-      res + children_to_src(tabs, opts, fmt).rstrip + semi(fmt) + "\n"
-    end
-
-    # Computes the CSS for the property.
-    #
-    # @param tabs [Fixnum] The level of indentation for the CSS
-    # @return [String] The resulting CSS
-    def _to_s(tabs)
-      to_return = '  ' * (tabs - 1 + self.tabs) + resolved_name + ":" +
-        (style == :compressed ? '' : ' ') + resolved_value + (style == :compressed ? "" : ";")
-    end
-
-    # Converts nested properties into flat properties.
-    #
-    # @param extends [Haml::Util::SubsetMap{Selector::Simple => Selector::Sequence}]
-    #   The extensions defined for this tree
-    # @param parent [PropNode, nil] The parent node of this node,
-    #   or nil if the parent isn't a {PropNode}
-    # @raise [Sass::SyntaxError] if the property uses invalid syntax
-    def _cssize(extends, parent)
-      node = super
-      result = node.children.dup
-      if !node.resolved_value.empty? || node.children.empty?
-        node.send(:check!)
-        result.unshift(node)
-      end
-      result
-    end
-
-    # Updates the name and indentation of this node based on the parent name
-    # and nesting level.
-    #
-    # @param extends [Haml::Util::SubsetMap{Selector::Simple => Selector::Sequence}]
-    #   The extensions defined for this tree
-    # @param parent [PropNode, nil] The parent node of this node,
-    #   or nil if the parent isn't a {PropNode}
-    def cssize!(extends, parent)
-      self.resolved_name = "#{parent.resolved_name}-#{resolved_name}" if parent
-      self.tabs = parent.tabs + (parent.resolved_value.empty? ? 0 : 1) if parent && style == :nested
-      super
-    end
-
-    # Runs any SassScript that may be embedded in the property,
-    # and invludes the parent property, if any.
-    #
-    # @param environment [Sass::Environment] The lexical environment containing
-    #   variable and mixin values
-    def perform!(environment)
-      @resolved_name = run_interp(@name, environment)
-      val = @value.perform(environment)
-      @resolved_value =
-        if @value.context == :equals && val.is_a?(Sass::Script::String)
-          val.value
-        else
-          val.to_s
-        end
-      super
-    end
-
-    # Returns an error message if the given child node is invalid,
-    # and false otherwise.
-    #
-    # {PropNode} only allows other {PropNode}s and {CommentNode}s as children.
-    # @param child [Tree::Node] A potential child node
-    # @return [String] An error message if the child is invalid, or nil otherwise
-    def invalid_child?(child)
-      if !child.is_a?(PropNode) && !child.is_a?(CommentNode)
-        "Illegal nesting: Only properties may be nested beneath properties."
-      end
-    end
-
-    private
-
-    def check!
-      if @options[:property_syntax] == :old && @prop_syntax == :new
-        raise Sass::SyntaxError.new("Illegal property syntax: can't use new syntax when :property_syntax => :old is set.")
-      elsif @options[:property_syntax] == :new && @prop_syntax == :old
-        raise Sass::SyntaxError.new("Illegal property syntax: can't use old syntax when :property_syntax => :new is set.")
-      elsif resolved_value.empty?
-        raise Sass::SyntaxError.new("Invalid property: #{declaration.dump} (no value)." +
-          pseudo_class_selector_message)
-      end
-    end
-
-    def declaration(tabs = 0, opts = {:old => @prop_syntax == :old}, fmt = :sass)
-      name = self.name.map {|n| n.is_a?(String) ? n : "\#{#{n.to_sass(opts)}}"}.join
-      if name[0] == ?:
-        raise Sass::SyntaxError.new("The \"#{name}: #{self.class.val_to_sass(value, opts)}\" hack is not allowed in the Sass indented syntax")
-      end
-
-      old = opts[:old] && fmt == :sass
-      initial = old ? ':' : ''
-      mid = old ? '' : ':'
-      "#{'  ' * tabs}#{initial}#{name}#{mid} #{self.class.val_to_sass(value, opts)}".rstrip
-    end
-
-    class << self
-      # @private
-      def val_to_sass(value, opts)
-        val_to_sass_comma(value, opts).to_sass(opts)
-      end
-
-      private
-
-      def val_to_sass_comma(node, opts)
-        return node unless node.is_a?(Sass::Script::Operation)
-        return val_to_sass_concat(node, opts) unless node.operator == :comma
-
-        Sass::Script::Operation.new(
-          val_to_sass_concat(node.operand1, opts),
-          val_to_sass_comma(node.operand2, opts),
-          node.operator)
-      end
-
-      def val_to_sass_concat(node, opts)
-        return node unless node.is_a?(Sass::Script::Operation)
-        return val_to_sass_div(node, opts) unless node.operator == :concat
-
-        Sass::Script::Operation.new(
-          val_to_sass_div(node.operand1, opts),
-          val_to_sass_concat(node.operand2, opts),
-          node.operator)
-      end
-
-      def val_to_sass_div(node, opts)
-        unless node.is_a?(Sass::Script::Operation) && node.operator == :div &&
-            node.operand1.is_a?(Sass::Script::Number) &&
-            node.operand2.is_a?(Sass::Script::Number) &&
-            (node.context == :equals || !node.operand1.original || !node.operand2.original)
-          return node
-        end
-
-        Sass::Script::String.new("(#{node.to_sass(opts)})")
-      end
-
-    end
-  end
-end

data/lib/sass/tree/root_node.rb

@@ -1,163 +0,0 @@
-module Sass
-  module Tree
-    # A static node that is the root node of the Sass document.
-    class RootNode < Node
-      # The Sass template from which this node was created
-      #
-      # @param template [String]
-      attr_reader :template
-
-      # @param template [String] The Sass template from which this node was created
-      def initialize(template)
-        super()
-        @template = template
-      end
-
-      # @see Node#to_s
-      def to_s(*args)
-        super
-      rescue Sass::SyntaxError => e
-        e.sass_template ||= @template
-        raise e
-      end
-
-      # Runs the dynamic Sass code *and* computes the CSS for the tree.
-      #
-      # @see #perform
-      # @see #to_s
-      def render
-        result, extends = perform(Environment.new).cssize
-        result = result.do_extend(extends) unless extends.empty?
-        result.to_s
-      end
-
-      # @see Node#perform
-      def perform(environment)
-        environment.options = @options if environment.options.nil? || environment.options.empty?
-        super
-      rescue Sass::SyntaxError => e
-        e.sass_template ||= @template
-        raise e
-      end
-
-      # Like {Node#cssize}, except that this method
-      # will create its own `extends` map if necessary,
-      # and it returns that map along with the cssized tree.
-      #
-      # @return [(Tree::Node, Haml::Util::SubsetMap)] The resulting tree of static nodes
-      #   *and* the extensions defined for this tree
-      def cssize(extends = Haml::Util::SubsetMap.new, parent = nil)
-        return super(extends, parent), extends
-      rescue Sass::SyntaxError => e
-        e.sass_template ||= @template
-        raise e
-      end
-
-      # @see \{Node#perform!}
-      def perform!(environment)
-        environment.options = @options if environment.options.nil? || environment.options.empty?
-        super
-      end
-
-      # Converts a node to Sass code that will generate it.
-      #
-      # @param opts [{Symbol => Object}] An options hash (see {Sass::CSS#initialize})
-      # @return [String] The Sass code corresponding to the node
-      def to_sass(opts = {})
-        to_src(opts, :sass)
-      end
-
-      # Converts a node to SCSS code that will generate it.
-      #
-      # @param opts [{Symbol => Object}] An options hash (see {Sass::CSS#initialize})
-      # @return [String] The SCSS code corresponding to the node
-      def to_scss(opts = {})
-        to_src(opts, :scss)
-      end
-
-      protected
-
-      # @see Node#to_src
-      def to_src(opts, fmt)
-        Haml::Util.enum_cons(children + [nil], 2).map do |child, nxt|
-          child.send("to_#{fmt}", 0, opts) +
-            if nxt &&
-                (child.is_a?(CommentNode) && child.line + child.value.count("\n") + 1 == nxt.line) ||
-                (child.is_a?(ImportNode) && nxt.is_a?(ImportNode) && child.line + 1 == nxt.line) ||
-                (child.is_a?(VariableNode) && nxt.is_a?(VariableNode) && child.line + 1 == nxt.line)
-              ""
-            else
-              "\n"
-            end
-        end.join.rstrip + "\n"
-      end
-
-      # Computes the CSS corresponding to this Sass tree.
-      #
-      # @param args [Array] ignored
-      # @return [String] The resulting CSS
-      # @see Sass::Tree
-      def _to_s(*args)
-        result = String.new
-        children.each do |child|
-          next if child.invisible?
-          child_str = child.to_s(1)
-          result << child_str + (style == :compressed ? '' : "\n")
-        end
-        result.rstrip!
-        return "" if result.empty?
-        result << "\n"
-        unless Haml::Util.ruby1_8? || result.ascii_only?
-          if children.first.is_a?(CharsetNode)
-            begin
-              encoding = children.first.name
-              # Default to big-endian encoding, because we have to decide somehow
-              encoding << 'BE' if encoding =~ /\Autf-(16|32)\Z/i
-              result = result.encode(Encoding.find(encoding))
-            rescue EncodingError
-            end
-          end
-
-          result = "@charset \"#{result.encoding.name}\";#{
-            style == :compressed ? '' : "\n"
-          }".encode(result.encoding) + result
-        end
-        result
-      end
-
-      # In Ruby 1.8, ensures that there's only one @charset directive
-      # and that it's at the top of the document.
-      #
-      # @see Node#cssize
-      def cssize!(extends, parent)
-        super
-
-        # In Ruby 1.9 we can make all @charset nodes invisible
-        # and infer the final @charset from the encoding of the final string.
-        if Haml::Util.ruby1_8? && parent.nil?
-          charset = self.children.find {|c| c.is_a?(CharsetNode)}
-          self.children.reject! {|c| c.is_a?(CharsetNode)}
-          self.children.unshift charset if charset
-        end
-      end
-
-      # Returns an error message if the given child node is invalid,
-      # and false otherwise.
-      #
-      # Only property nodes are invalid at root level.
-      #
-      # @see Node#invalid_child?
-      def invalid_child?(child)
-        case child
-        when Tree::ExtendNode
-          "Extend directives may only be used within rules."
-        when Tree::PropNode
-          "Properties aren't allowed at the root of a document." +
-            child.pseudo_class_selector_message
-        else
-          return
-        end
-      end
-    end
-  end
-end

data/lib/sass/tree/rule_node.rb

@@ -1,261 +0,0 @@
-require 'pathname'
-require 'uri'
-
-module Sass::Tree
-  # A static node reprenting a CSS rule.
-  #
-  # @see Sass::Tree
-  class RuleNode < Node
-    # The character used to include the parent selector
-    PARENT = '&'
-
-    # The CSS selector for this rule,
-    # interspersed with {Sass::Script::Node}s
-    # representing `#{}`-interpolation.
-    # Any adjacent strings will be merged together.
-    #
-    # @return [Array<String, Sass::Script::Node>]
-    attr_accessor :rule
-
-    # The CSS selector for this rule,
-    # without any unresolved interpolation
-    # but with parent references still intact.
-    # It's only set once {Tree::Node#perform} has been called.
-    #
-    # @return [Selector::CommaSequence]
-    attr_accessor :parsed_rules
-
-    # The CSS selector for this rule,
-    # without any unresolved interpolation or parent references.
-    # It's only set once {Tree::Node#cssize} has been called.
-    #
-    # @return [Selector::CommaSequence]
-    attr_accessor :resolved_rules
-
-    # How deep this rule is indented
-    # relative to a base-level rule.
-    # This is only greater than 0 in the case that:
-    #
-    # * This node is in a CSS tree
-    # * The style is :nested
-    # * This is a child rule of another rule
-    # * The parent rule has properties, and thus will be rendered
-    #
-    # @return [Fixnum]
-    attr_accessor :tabs
-
-    # Whether or not this rule is the last rule in a nested group.
-    # This is only set in a CSS tree.
-    #
-    # @return [Boolean]
-    attr_accessor :group_end
-
-    # @param rule [Array<String, Sass::Script::Node>]
-    #   The CSS rule. See \{#rule}
-    def initialize(rule)
-      #p rule
-      merged = Haml::Util.merge_adjacent_strings(rule)
-      #p merged
-      @rule = Haml::Util.strip_string_array(merged)
-      #p @rule
-      @tabs = 0
-      super()
-    end
-
-    # Compares the contents of two rules.
-    #
-    # @param other [Object] The object to compare with
-    # @return [Boolean] Whether or not this node and the other object
-    #   are the same
-    def ==(other)
-      self.class == other.class && rule == other.rule && super
-    end
-
-    # Adds another {RuleNode}'s rules to this one's.
-    #
-    # @param node [RuleNode] The other node
-    def add_rules(node)
-      @rule = Haml::Util.strip_string_array(
-        Haml::Util.merge_adjacent_strings(@rule + ["\n"] + node.rule))
-    end
-
-    # @return [Boolean] Whether or not this rule is continued on the next line
-    def continued?
-      last = @rule.last
-      last.is_a?(String) && last[-1] == ?,
-    end
-
-    # @see Node#to_sass
-    def to_sass(tabs, opts = {})
-      name = selector_to_sass(rule, opts)
-      name = "\\" + name if name[0] == ?:
-      name.gsub(/^/, '  ' * tabs) + children_to_src(tabs, opts, :sass)
-    end
-
-    # @see Node#to_scss
-    def to_scss(tabs, opts = {})
-      name = selector_to_scss(rule, tabs, opts)
-      res = name + children_to_src(tabs, opts, :scss)
-
-      if children.last.is_a?(CommentNode) && children.last.silent
-        res.slice!(-3..-1)
-        res << "\n" << ('  ' * tabs) << "}\n"
-      end
-
-      res
-    end
-
-    # Extends this Rule's selector with the given `extends`.
-    #
-    # @see Node#do_extend
-    def do_extend(extends)
-      node = dup
-      node.resolved_rules = resolved_rules.do_extend(extends)
-      node
-    end
-
-    protected
-
-    # Computes the CSS for the rule.
-    #
-    # @param tabs [Fixnum] The level of indentation for the CSS
-    # @return [String] The resulting CSS
-    def _to_s(tabs)
-      tabs = tabs + self.tabs
-
-      rule_separator = style == :compressed ? ',' : ', '
-      line_separator =
-        case style
-          when :nested, :expanded; "\n"
-          when :compressed; ""
-          else; " "
-        end
-      rule_indent = '  ' * (tabs - 1)
-      per_rule_indent, total_indent = [:nested, :expanded].include?(style) ? [rule_indent, ''] : ['', rule_indent]
-
-      total_rule = total_indent + resolved_rules.members.
-        map {|seq| seq.to_a.join.gsub(/([^,])\n/m, style == :compressed ? '\1 ' : "\\1\n")}.
-        join(rule_separator).split("\n").map do |line|
-        per_rule_indent + line.strip
-      end.join(line_separator)
-
-      to_return = ''
-      old_spaces = '  ' * (tabs - 1)
-      spaces = '  ' * tabs
-      if style != :compressed
-        if @options[:debug_info]
-          to_return << debug_info_rule.to_s(tabs) << "\n"
-        elsif @options[:line_comments]
-          to_return << "#{old_spaces}/* line #{line}"
-
-          if filename
-            relative_filename = if @options[:css_filename]
-              begin
-                Pathname.new(filename).relative_path_from(
-                  Pathname.new(File.dirname(@options[:css_filename]))).to_s
-              rescue ArgumentError
-                nil
-              end
-            end
-            relative_filename ||= filename
-            to_return << ", #{relative_filename}"
-          end
-
-          to_return << " */\n"
-        end
-      end
-
-      if style == :compact
-        properties = children.map { |a| a.to_s(1) }.join(' ')
-        to_return << "#{total_rule} { #{properties} }#{"\n" if group_end}"
-      elsif style == :compressed
-        properties = children.map { |a| a.to_s(1) }.join(';')
-        to_return << "#{total_rule}{#{properties}}"
-      else
-        properties = children.map { |a| a.to_s(tabs + 1) }.join("\n")
-        end_props = (style == :expanded ? "\n" + old_spaces : ' ')
-        to_return << "#{total_rule} {\n#{properties}#{end_props}}#{"\n" if group_end}"
-      end
-
-      to_return
-    end
-
-    # Runs SassScript interpolation in the selector,
-    # and then parses the result into a {Sass::Selector::CommaSequence}.
-    #
-    # @param environment [Sass::Environment] The lexical environment containing
-    #   variable and mixin values
-    def perform!(environment)
-      @parsed_rules = Sass::SCSS::StaticParser.new(run_interp(@rule, environment), self.line).
-        parse_selector(self.filename)
-      super
-    end
-
-    # Converts nested rules into a flat list of rules.
-    #
-    # @param extends [Haml::Util::SubsetMap{Selector::Simple => Selector::Sequence}]
-    #   The extensions defined for this tree
-    # @param parent [RuleNode, nil] The parent node of this node,
-    #   or nil if the parent isn't a {RuleNode}
-    def _cssize(extends, parent)
-      node = super
-      rules = node.children.select {|c| c.is_a?(RuleNode)}
-      props = node.children.reject {|c| c.is_a?(RuleNode) || c.invisible?}
-
-      unless props.empty?
-        node.children = props
-        rules.each {|r| r.tabs += 1} if style == :nested
-        rules.unshift(node)
-      end
-
-      rules.last.group_end = true unless parent || rules.empty?
-
-      rules
-    end
-
-    # Resolves parent references and nested selectors,
-    # and updates the indentation based on the parent's indentation.
-    #
-    # @param extends [Haml::Util::SubsetMap{Selector::Simple => Selector::Sequence}]
-    #   The extensions defined for this tree
-    # @param parent [RuleNode, nil] The parent node of this node,
-    #   or nil if the parent isn't a {RuleNode}
-    # @raise [Sass::SyntaxError] if the rule has no parents but uses `&`
-    def cssize!(extends, parent)
-      self.resolved_rules = @parsed_rules.resolve_parent_refs(parent && parent.resolved_rules)
-      super
-    end
-
-    # A hash that will be associated with this rule in the CSS document
-    # if the {file:SASS_REFERENCE.md#debug_info-option `:debug_info` option} is enabled.
-    # This data is used by e.g. [the FireSass Firebug extension](https://addons.mozilla.org/en-US/firefox/addon/103988).
-    #
-    # @return [{#to_s => #to_s}]
-    def debug_info
-      {:filename => filename && ("file://" + URI.escape(File.expand_path(filename))),
-       :line => self.line}
-    end
-
-    private
-
-    def debug_info_rule
-      node = DirectiveNode.new("@media -sass-debug-info")
-      debug_info.map {|k, v| [k.to_s, v.to_s]}.sort.each do |k, v|
-        rule = RuleNode.new([""])
-        rule.resolved_rules = Sass::Selector::CommaSequence.new(
-          [Sass::Selector::Sequence.new(
-              [Sass::Selector::SimpleSequence.new(
-                  [Sass::Selector::Element.new(k.to_s.gsub(/[^\w-]/, "\\\\\\0"), nil)])
-              ])
-          ])
-        prop = PropNode.new([""], "", :new)
-        prop.resolved_name = "font-family"
-        prop.resolved_value = Sass::SCSS::RX.escape_ident(v.to_s)
-        rule << prop
-        node << rule
-      end
-      node.options = @options.merge(:debug_info => false, :line_comments => false, :style => :compressed)
-      node
-    end
-  end
-end