sugar-high 0.4.0 → 0.4.3

data/lib/sugar-high/file_mutate/append_content.rb

@@ -0,0 +1,17 @@
+module SugarHigh
+  module FileMutate
+    module AppendContent
+      def append content=nil, &block
+        File.append self.path, content, &block
+      end
+
+      module ClassMethods
+        def append path, content=nil, &block
+          File.open(path, 'a') do |f|
+            f.puts content ||= yield
+          end
+        end 
+      end
+    end
+  end
+end

data/lib/sugar-high/file_mutate/delete.rb

@@ -0,0 +1,29 @@
+require 'sugar-high/blank'
+require 'sugar-high/arguments'
+require 'sugar-high/path'
+require 'sugar-high/regexp'
+require 'sugar-high/string'
+require 'sugar-high/file'
+
+module SugarHigh
+  module FileMutate
+    module Delete
+      module ClassMethods
+        def delete! name
+          return nil if !File.exist?(name)
+          File.delete name
+        end
+        alias_method :delete_file!, :delete!
+      end
+      
+      def delete!
+        File.delete(self.path)
+      end
+      alias_method :delete_file!, :delete!
+
+      def mutate marker, place, &block
+        File.mutate_file self.path, marker, place, &block
+      end
+    end      
+  end
+end

data/lib/sugar-high/file_mutate/insert_content.rb

@@ -0,0 +1,62 @@
+module SugarHigh
+  module FileMutate
+    module InsertContent
+      def insert *args, &block
+        File.insert_into self.path, *args, &block
+      end
+
+      module ClassMethods
+        # insert_into 'my_file.txt', :after => 'Blip', :content => 'Hello
+        # insert_into 'my_file.txt', 'Hello', :after => 'Blip' 
+        # insert_into 'my_file.txt', :after => 'Blip' do 
+        #  'Hello'
+        # end  
+        def insert_into file_name, *args, &block
+          options = last_option args
+          content = insertion_content options, *args, &block
+
+          # no content to insert?
+          return nil if content.blank? 
+
+          file = begin
+            get_file(file_name)
+          rescue
+            return nil
+          end
+
+          # already inserted?
+          return nil if !options[:repeat] && file.has_content?(content)
+
+          # find where to insert
+          place, marker = if options[:before] 
+              [ :before, options[:before] ]
+            elsif options[:before_last]
+              [ :before_last, options[:before_last] ]
+            else
+              [ :after, options[:after] ]
+          end 
+
+          return nil if !file.has_content?(marker)
+
+          # do mutation
+          res = file.mutate marker, place do
+             content
+          end
+          res
+        end
+
+        def insertion_content options = {}, *args, &block
+          case args.first
+          when String
+            args.first
+          when Hash
+            options[:content] || (yield if block)      
+          else
+            return yield if block
+            raise ArgumentError, "You must supply content to insert, either as a String before the options hash, a :content option or a block" 
+          end     
+        end
+      end
+    end
+  end
+end

data/lib/sugar-high/file_mutate/mutate.rb

@@ -0,0 +1,58 @@
+module SugarHigh
+  module FileMutate
+    module Mutate
+      module ClassMethods
+        def mutate_file file, marker, place, &block
+         raise ArgumentError, "You must define a replacement marker for a :before, :before_last or :after key" if !marker 
+
+         file = File.get_file(file)
+
+         if place == :before_last
+           content = file.read
+           content = content.insert_before_last yield, marker
+           file.overwrite content
+           return
+         end
+
+         marker_found = file.has_content? marker
+         return nil if !marker_found
+
+         replace_in_file file, /(#{marker})/mi do |match|
+           place == :after ? "#{match}\n  #{yield}" : "#{yield}\n  #{match}"         
+         end
+         true
+        end  
+
+        def replace_in_file(file, regexp, *args, &block)
+         file = File.get_file(file)
+         content = file.read.gsub(regexp, *args, &block)
+         file.overwrite content
+        end    
+      end
+  
+      protected
+
+      def get_file file_name
+        case file_name
+        when PathString, String 
+          File.new file_name
+        when File
+          file_name
+        else
+          raise ArgumentError, "Could not be converted to a File object: #{file_name}"
+        end
+      end  
+
+      def get_filepath file
+        case file
+        when PathString, String 
+          file
+        when File
+          file.path
+        else
+          raise ArgumentError, "Could not be converted to a file path: #{file_name}"
+        end
+      end
+    end  
+  end
+end

data/lib/sugar-high/file_mutate/overwrite_content.rb

@@ -0,0 +1,17 @@
+module SugarHigh
+  module FileMutate
+    module OverwriteContent      
+      def overwrite content=nil, &block           
+        File.overwrite self.path, content, &block
+      end
+
+      module ClassMethods
+        def overwrite file, content=nil, &block
+          File.open(get_filepath(file).path, 'w') do |f|
+            f.puts content ||= yield
+          end
+        end
+      end
+    end
+  end
+end

data/lib/sugar-high/file_mutate/remove_content.rb

@@ -0,0 +1,33 @@
+module SugarHigh
+  module FileMutate
+    module RemoveContent
+      def remove_content options=nil, &block
+        opt_str = case options
+        when String
+          options
+        when Hash
+          content = options[:content] || options[:where]
+          raise ArgumentError, "Bad :content value in Hash" if !content || content.strip.empty?
+          content.strip
+        else
+          raise ArgumentError, "non-block argument must be either String or Hash with a :content option" if !block
+        end    
+        content = block ? yield : opt_str
+    
+        File.remove_content_from self.path, :content => content, :with => '', &block
+      end
+      alias_method :remove, :remove_content
+
+      module ClassMethods
+        def remove_from file_name, content=nil, &block
+          content ||= yield
+          replace_content_from file_name, :content => content, :with => '', &block
+        end
+   
+        def remove_content_from file_name, options = {}, &block
+          replace_content_from file_name, options.merge(:with => ''), &block
+        end
+      end
+    end
+  end
+end

data/lib/sugar-high/file_mutate/replace_content.rb

@@ -0,0 +1,45 @@
+module SugarHigh
+  module FileMutate
+    module ReplaceContent
+      def replace_content options = {}, &block
+        File.replace_content_from self.path, options, &block
+      end
+
+      module ClassMethods
+        # replaces content found at replacement_expr with content resulting from yielding block
+        # File.replace_content_from 'myfile.txt', where => /HelloWorld/, with => 'GoodBye'
+        def replace_content_from file_name, options = {}, &block
+          replacement_expr = options[:where] || options[:content]
+          new_content = options[:with]
+
+          begin
+            replacement_expr = replacement_expr.to_regexp
+          rescue
+            raise ArgumentError, "Content to be replaced must be specified as either a String or Regexp in a :where or :content option"
+          end
+
+          file = get_file file_name
+
+          # get existing file content
+          content = file.read
+
+          # return nil if no mathing replacement found
+          return nil if !(content =~ replacement_expr)
+
+          new_content ||= yield if block
+
+          raise ArgumentError, "Content to be replaced with must be specified as a :with option or as a block" if !new_content
+
+          # remove content that matches expr, by replacing with empty
+          mutated_content = content.gsub replacement_expr, new_content
+
+          # write mutated content as new file
+          file.overwrite mutated_content
+
+          true # signal success!
+        end
+        alias_method :replace_content_in, :replace_content_from
+      end
+    end
+  end
+end

data/lib/sugar-high/kind_of.rb

@@ -12,6 +12,13 @@ class Object
     false
   end
 
+  def not_any_kind_of? *kinds
+    kinds.all_kinds.each do |kind| 
+      return false if self.kind_of? kind        
+    end
+    true
+  end
+
   def kind_of_label?
     self.any_kind_of? String, Symbol          
   end
@@ -20,49 +27,7 @@ class Object
     self.any_kind_of? Symbols, Symbol          
   end
 end
-
-module Enumerable
-  def only_kinds_of? *kinds    
-    all?{|a| a.any_kind_of? *kinds }    
-  end
-
-  def only_labels?
-    all?{|a| a.kind_of_label? }    
-  end
-  
-  def select_kinds_of *kinds
-    select{|a| a.any_kind_of? *kinds }
-  end
-
-  def select_labels
-    select{|a| a.kind_of_label? }
-  end
-
-  def select_symbols
-    select{|a| a.kind_of_symbol? }
-  end
-
-  def select_strings
-    select_only :string
-  end
-
-  def select_only type    
-    const = type.kind_of_label? ? "#{type.to_s.camelize}".constantize : type
-    select{|a| a.kind_of? const}
-  end
-  
-  def all_kinds
-    map do |a| 
-      case a
-      when Kinds
-        a.kinds
-      else
-        a if a.kind_of?(Module)
-      end
-    end.compact.uniq.flatten
-  end
-end     
-
+    
 class Kinds            
   attr_accessor :kinds
   

data/lib/sugar-high/string.rb

@@ -1,4 +1,9 @@
 class String
+  # remove prefixed '-' signs, then allow any letter, number, underscore '_' or dash '-'
+  def alpha_numeric
+    self.gsub(/^\-+/, '').gsub(/[^0-9a-zA-Z_\-]+/i, '')
+  end
+  
   def insert_before_last str, marker = 'end'
     res = []
     found = false

data/spec/fixtures/application_file.rb

@@ -3,3 +3,4 @@ require File.expand_path('../application', __FILE__)
 
 # Initialize the rails application
 Fixtures::Application.initialize!
+  hello

data/spec/fixtures/class_file.rb

@@ -1,4 +1,19 @@
 class Abc
   def begin
   end
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
 end

data/spec/fixtures/content_file.txt

@@ -0,0 +1 @@
+{:with=>"New content"}

data/spec/fixtures/file.txt

@@ -0,0 +1 @@
+Hello Me

data/spec/fixtures/routes_file.rb

@@ -1,6 +1,22 @@
 Fixtures::Application.routes.draw do
   
   
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
+  
   
   
   

data/spec/sugar-high/array_spec.rb

@@ -3,19 +3,27 @@ require 'sugar-high/array'
 
 describe "SugarHigh" do
   describe "Array ext" do
+
     describe '#to_symbols' do    
       it "should translate nested array of numbers and strings into symbols only array, excluding numbers" do
         [1, 'blip', [3, "hello"]].to_symbols.should == [:blip, :hello]
       end
 
       it "should translate nested array of numbers and strings into symbols only array, including numbers" do
-        [[1, 'blip', [3, "hello"]]].to_symbols(:num).should == [:_1, :blip, :_3, :hello]        
+        [[1, 'blip', [3, "hello"]]].to_symbols_num.should == [:_1, :blip, :_3, :hello]        
       end
 
-      it "should translate nested array of numbers and strings into strings only array" do
-        [['blip', [3, :hello]]].to_strings.should == ['blip', 'hello']        
+      it "should translate nested array of numbers and strings into symbols only array, including numbers" do
+        [[1, 'blip', [1, "hello"]]].to_symbols_uniq.should include :blip, :hello        
       end
     end        
+
+    describe '#to_symbols!' do    
+      it "should translate nested array of numbers and strings into symbols only array, excluding numbers" do
+        x = [1, 'hello', 'blip', [3, "hello"]].to_symbols!
+        x.should include :hello, :blip
+      end
+    end
     
     describe '#to_strings' do    
       it "should translate nested array of numbers and strings into symbols only array, excluding numbers" do
@@ -23,6 +31,13 @@ describe "SugarHigh" do
       end      
     end    
 
+    describe '#to_strings!' do    
+      it "should translate nested array of numbers and strings into symbols only array, excluding numbers" do
+        x = [1, 'blip', [3, "hello"]].to_strings!
+        x.should == ['blip', 'hello']
+      end      
+    end    
+
     describe '#flat_uniq' do    
       it "should flatten array, remove nils and make unique" do
         [1, 'blip', ['blip', nil, 'c'], nil].flat_uniq.should == [1, 'blip', 'c']
@@ -33,6 +48,32 @@ describe "SugarHigh" do
       end      
     end    
 
+    describe '#flat_uniq!' do    
+      it "should flatten array, remove nils and make unique" do
+        x = [1, 'blip', ['blip', nil, 'c'], nil]
+        x.flat_uniq!
+        x.should == [1, 'blip', 'c']
+      end
+    end    
+
+    describe '#sum' do    
+      it "should add elements in array" do
+        [1, 2, 3].sum.should == 6
+      end      
+    end
+
+    describe '#mean' do    
+      it "should find mean of elements in array" do
+        [1, 2, 3].mean.should == 2
+      end      
+    end
+
+    describe '#extract' do    
+      it "should call method on each element in array" do
+        ["a", "ab", "abc"].extract(:size).mean.should == 2
+      end      
+    end    
+
     describe '#none?' do    
       it "should be none if no real values in array" do
         [nil, nil].none?.should be_true