sitefuel 0.0.0a

data/lib/sitefuel/extensions/ArrayComparisons.rb

@@ -0,0 +1,34 @@
+#
+# File::      ArrayComparisons.rb
+# Author::    wkm
+# Copyright:: 2009
+# License::   GPL
+#
+# Adds methods to Array for comparing with other arrays
+#
+
+class Array
+
+  # gives true if self ends with the given array
+  #
+  #  [1, 2, 3].ends_with? [2, 3]  # ==> true
+  #  [1, 2, 3].ends_with? []  # ==> true
+  #  [1, 2, 3].ends_with? [1, 2, 3]  # ==> true
+  #  [1, 2, 3].ends_with? [1, 2]  # ==> false
+  def ends_with?(other)
+    # if the supposed 'ending' is longer, it can't be an ending
+    if length < other.length
+      return false
+    end
+
+    index = -1
+    while -index <= other.length and -index <= length
+      if other[index] != self[index]
+        return false
+      end
+      index -= 1
+    end
+    
+    return true
+  end
+end

data/lib/sitefuel/extensions/DynamicClassMethods.rb

@@ -0,0 +1,19 @@
+#
+# File::      DynamicClassMethods.rb
+# Author::    wkm
+# Copyright:: 2009
+# License::   GPL
+#
+# Adds a #meta_def function to Object so we can programmatically define class
+# methods.
+#
+
+class Object
+
+  # defines a class method
+  # based on: http://blog.jayfields.com/2007/10/ruby-defining-class-methods.html
+  # and: http://whytheluckystiff.net/articles/seeingMetaclassesClearly.html
+  def define_class_method name, &blk
+    (class << self; self; end).instance_eval { define_method name, &blk}
+  end
+end

data/lib/sitefuel/extensions/FileComparison.rb

@@ -0,0 +1,24 @@
+#
+# File::      FileComparison.rb
+# Author::    wkm
+# Copyright:: 2009
+# License::   GPL
+#
+# Adds File.equivalent? that tries to guess whether two files are equivalent
+#
+
+require 'sitefuel/extensions/ArrayComparisons'
+
+class File
+  # gives true if one of the paths is the ending of another path
+  #
+  #  File.equivalent?('b/a.rb', 'a.rb')  # ==> true
+  #  File.equivalent?('c/b/a.rb', 'c/a.rb')  # ==> false
+  def self.equivalent?(a, b)
+    list = [
+      File.expand_path(a, '/').split(File::SEPARATOR)[1 .. -1],
+      File.expand_path(b, '/').split(File::SEPARATOR)[1 .. -1]
+    ].sort {|l,r| l.length <=> r.length }.reverse
+    list.first.ends_with? list.last
+  end
+end

data/lib/sitefuel/extensions/Silently.rb

@@ -0,0 +1,27 @@
+#
+# File::      Silently.rb
+# Author::    wkm
+# Copyright:: 2009
+# License::   GPL
+#
+# Implements a silently method for executing code without warnings; intended for
+# wrapping around require statements
+#
+
+
+
+# this is sourced directly from
+# http://vidyapsi.wordpress.com/category/ruby/#warnings
+
+def silently(&block)
+  warn_level = $VERBOSE
+  $VERBOSE = nil
+
+  result = block.call
+
+  $VERBOSE = warn_level
+  result
+end
+
+# /end sourcing
+

data/lib/sitefuel/extensions/StringFormatting.rb

@@ -0,0 +1,75 @@
+#
+# File::      StringFormatting.rb
+# Author::    wkm
+# Copyright:: 2009
+# License::   GPL
+#
+# Adds String#cabbrev for abbreviating strings
+#
+
+class String
+
+  # gives an abbreviated form of a string, showing some of the beginning
+  # and some of the end.
+  # 
+  #  "the quick brown dog".cabbrev 12  # => "the q... dog"
+  def cabbrev(len)
+    if length <= len
+      self
+    else
+      self[0..(len/2-2).floor] + "..." + self[(length - len/2+2) .. (length)]
+    end
+  end
+
+  # gives an abbreviated form of the string, showing as much of the beginning
+  # as possible
+  #
+  #  "the quick brown dog".labbrev 12  # => "the quick ..."
+  def labbrev(len)
+    if length <= len
+      self
+    else
+      self[0..(len-4)] + '...'
+    end
+  end
+
+  # gives an abbreviated form of the string, showing as much of the end as
+  # possible
+  #
+  #  "the quick brown dog".rabbrev 12  # => "...brown dog"
+  def rabbrev(len)
+    if length <= len
+      self
+    else
+      '...' + self[(length - (len-3)) .. length]
+    end
+  end
+
+  # removes leading whitespace from a set of lines, preserving indentation
+  # relative to the first non-empty line
+  def align
+    return self if empty?
+
+    # split by lines
+    lines = split("\n")
+
+    # get rid of the first line if it is null
+    if lines.first == ''
+      lines = lines[1..-1]
+    end
+
+    # take the first line and extract the leading whitespace
+    leading = lines.first[/^[ \t]*/]
+
+    # iterate over each line dumping the leading whitespace
+    lines = lines.map do |l|
+      l.gsub!(Regexp.new('^'+leading), '')
+    end
+
+    lines.join("\n")
+  end
+
+
+  alias :format :%
+
+end

data/lib/sitefuel/extensions/SymbolComparison.rb

@@ -0,0 +1,13 @@
+#
+# File::      SymbolComparison.rb
+# Author::    wkm
+# Copyright:: 2009
+#
+# Defines a spaceship for symbols based off of to_s
+#
+
+class Symbol
+  def <=>(other)
+    self.to_s <=> other.to_s
+  end
+end