fast 0.1.3 → 0.1.4

data/lib/fast/filesystemobject.rb

@@ -0,0 +1,69 @@
+module Fast
+  module FilesystemObject
+    # If a string is passed, returns the same string;
+    # if a symbol is passed, returns the string representation
+    # of the symbol; if an object of the same class as self
+    # is passed, return the #path of that object
+    def normalize path
+      if path.instance_of? String or path.instance_of? Symbol
+        "#{path}"
+      elsif path.instance_of? self.class
+        path.path
+      end
+    end
+    
+    # Returns the path to the current FilesystemObject
+    def path
+      @path
+    end
+    
+    # Expands the path if it's a relative path
+    def expand path = nil
+      @path = normalize path if path
+      raise Fast::PathNotSettedException, "The path was not setted in this instance" unless @path
+      ::File.expand_path @path
+    end
+    
+    alias :absolute :expand
+  
+    # Returns true if the item exists, false otherwise: 
+    # relays on the implementation of a private #do_check?
+    # method in the class that includes the module
+    def exist? path = nil
+      if path
+        path = normalize path
+        @path = path unless @path
+        do_exist? path
+      else
+        raise ArgumentError, "An argument should be provided if this instance has no path setted" unless @path
+        do_exist? @path
+      end
+    end
+    
+    alias :exists? :exist?
+    
+    def exist_all? *args
+      unless args.empty?
+      else
+        raise ArgumentError, "An argument should be provided if this instance has no path setted" unless @path
+        do_exist? @path
+      end
+    end
+    
+    def exist_any? *args
+      unless args.empty?
+      else
+        raise ArgumentError, "An argument should be provided if this instance has no path setted" unless @path
+        do_exist? @path
+      end
+    end
+    
+    private
+    
+    # Abstract implementation to be overriden in the 
+    # actual classes.
+    def do_exist? path
+      raise NotImplementedError, "The implementation of #do_exist? in the module FilesystemObject is abstract, please reimplement in any class including it."
+    end
+  end
+end

data/lib/fast/version.rb

@@ -1,3 +1,3 @@
 module Fast
-  VERSION = "0.1.3"
+  VERSION = "0.1.4"
 end

data/lib/patterns/adapter/fast/dir.rb

@@ -0,0 +1,19 @@
+module Patterns
+  module Adapter
+    module Fast
+      class Dir
+        def initialize source
+          @source = source
+        end
+        
+        def symbols
+          return_me = []
+          @source.each do |entry|
+            return_me.push entry.gsub(/\.(\w+?)$/, "").to_sym
+          end
+          return return_me
+        end
+      end
+    end
+  end
+end

data/lib/sub-setter/fast/dir.rb

@@ -15,6 +15,14 @@ module SubSetter
         return_me
       end
       
+      def ending the_ending
+        return_me = ::Fast::Dir.new
+        @set.each do |entry|
+          return_me << entry if entry.end_with? the_ending
+        end
+        return_me
+      end
+      
       def strip_extension
         return_me = ::Fast::Dir.new
         @set.each do |entry|

data/spec/fast/dir_spec.rb

@@ -2,14 +2,9 @@ require "fast"
 require "zucker/os"
 
 describe Fast::Dir do
-
-  context "a Fast::Dir is passed as argument where a path is accepted" do
-    it "should be accepted"
-    
-    it "should I really think of a common denominator of Fast::Dir and Fast::File?"
-  end
-  
   shared_examples_for "any dir list" do 
+    it "should return a list of Fast::Dir o Fast::File, not strings"
+
     context "a block is passed as an argument" do
       it "should pass each entry as argument to the block" do
         ::File.should_not be_directory "demo"
@@ -269,6 +264,58 @@ describe Fast::Dir do
       Fast::Dir.new.delete! :alt
       Fast::Dir.new.delete! :other
     end
+    
+    context "no path is setted and a Hash is passed" do
+      it "build the entire structure in the current dir" do
+        Fast::Dir.new.should_not exist :demo
+        Fast::Dir.new.should_not exist :demo2
+        
+        Fast::Dir.new.send @method, { 
+          :demo => {
+            :Superfile => "With some content",
+            :subdir => {
+              "deep.txt" => "In the structure."
+            }
+          },
+          :demo2 => {}
+        }
+        
+        Fast::File.new.read("demo/Superfile").should == "With some content"
+        Fast::File.new.read("demo/subdir/deep.txt").should == "In the structure."
+        
+        Fast::Dir.new.should exist :demo2
+      end
+    
+      after do
+        Fast::Dir.new.delete! :demo
+        Fast::Dir.new.delete! :demo2
+      end
+    end
+
+    context "a path is setted in the Dir and a Hash is passed" do
+      it "build the entire structure in the right dir" do
+        Fast::Dir.new.should_not exist :demo
+        
+        Fast::Dir.new("demo").send @method, { 
+          :inner => {
+            :Superfile => "With some content",
+            :subdir => {
+              "deep.txt" => "In the structure."
+            }
+          },
+          :meta => {}
+        }
+        
+        Fast::File.new.read("demo/inner/Superfile").should == "With some content"
+        Fast::File.new.read("demo/inner/subdir/deep.txt").should == "In the structure."
+        
+        Fast::Dir.new.should exist "demo/meta"
+      end
+    
+      after do
+        Fast::Dir.new.delete! :demo
+      end
+    end
   end
   
   describe "#create" do
@@ -283,6 +330,8 @@ describe Fast::Dir do
       Fast::Dir.new.delete! :demo
     end
     
+    it "should fail is a Hash is passed an there are conflicts"
+    
     after do
       Fast::Dir.new.delete! :demo
     end
@@ -299,34 +348,10 @@ describe Fast::Dir do
       }.to_not raise_error ArgumentError, "Dir 'demo' already exists"
       Fast::Dir.new.delete! :demo
     end
+    
+    it "should override if a Hash is passed and there are conflicts"
   end
   
-  shared_examples_for "any dir subsetter" do
-    it "should forward self to a subsetter object" do
-      Fast::Dir.new.should_not exist "demo"
-      Fast::File.new.touch "demo/in/subdir.file"
-      
-      the_demo_dir = Fast::Dir.new :demo
-      
-      SubSetter::Fast::Dir.should_receive( :new ).with the_demo_dir
-      
-      the_demo_dir.by
-      
-      the_demo_dir.delete!
-    end   
-  end
-
-  describe "#by" do 
-    before :each do @method = :by end
-    it_behaves_like "any dir subsetter"
-  end
-  
-  describe "#filter" do
-    before :each do @method = :filter end
-    it_behaves_like "any dir subsetter"
-  end
-
-  
   shared_examples_for "any dir deletion" do    
     it "should delete the directory if it exists" do
       ::File.should_not be_directory "demo"
@@ -475,8 +500,37 @@ describe Fast::Dir do
     end
   end
   
+  # Private method
+  describe "#do_exist?" do
+    context "if the path is a directory" do
+      it "should return true if the passed path is a directory" do
+        ::File.should_not be_directory "demo"
+        dir = Fast::Dir.new "demo"
+        dir.create!
+        def dir.call_do_exist?
+          do_exist? "demo"
+        end
+        dir.call_do_exist?.should === true
+      end
+  
+      after do
+        Fast::Dir.new.destroy! "demo"
+      end
+    end
+
+    it "should return false if the passed path is not a directory" do
+      ::File.should_not be_directory "demo"
+      dir = Fast::Dir.new "demo"
+      def dir.call_do_exist?
+        do_exist? "demo"
+      end
+      dir.call_do_exist?.should === false
+    end
+  end
+
   shared_examples_for "any dir existencialism" do
     it "should return true if the dir exists" do
+      pending "move partially to FilesystemObject"
       ::File.should_not be_directory "demo"
       Fast::Dir.new.create! "demo"
       Fast::Dir.new.send( @method, "demo" ).should be_true
@@ -484,21 +538,12 @@ describe Fast::Dir do
     end
     
     it "should return false if the dir does not exist" do
+      pending "move partially to FilesystemObject"
       ::File.should_not be_directory "demo"
       Fast::Dir.new.send( @method, "demo" ).should be_false
     end
   end
-  
-  describe "#exist?" do
-    before :each do @method = :exist? end
-    it_behaves_like "any dir existencialism"
-  end
-  
-  describe "#exists?" do
-    before :each do @method = :exists? end
-    it_behaves_like "any dir existencialism"
-  end
-  
+    
   describe "#exist_all?" do
     before :each do @method = :exist_all? end
     it_behaves_like "any dir existencialism"
@@ -586,50 +631,6 @@ describe Fast::Dir do
       Fast::Dir.new(:demo).to_s.should include "demo"
     end
   end
-
-  shared_examples_for "any dir absolutizer" do
-    context "dir path is a relative route" do
-      it "should expand the dir path with the pwd" do
-        Fast::Dir.new.send( @method, :demo ).should == "#{Dir.pwd}/demo"
-      end
-    end
-    
-    context "dir path is an absolute route" do
-      it "should return the same path as given" do
-        unless OS.windows?
-          Fast::Dir.new.send( @method, "/dev/null").should == "/dev/null"
-        else
-          pending "POSIX only!"
-        end
-      end
-    end
-  end
-
-  describe "#expand" do
-    before :each do @method = :expand end
-    it_behaves_like "any dir absolutizer"
-  end
-  
-  describe "#absolute" do
-    before :each do @method = :absolute end
-    it_behaves_like "any dir absolutizer"
-  end
-  
-  describe "#path" do
-    context "the path is setted" do
-      it "should return the path" do
-        the_dir = Fast::Dir.new "demo"
-        the_dir.path.should == "demo"
-      end
-    end
-    
-    context "the path is undefined" do
-      it "should return nil" do
-        the_dir = Fast::Dir.new 
-        the_dir.path.should be_nil
-      end
-    end
-  end
   
   shared_examples_for "any dir renaming" do
     it "should delete current dir and target dir should exist" do
@@ -857,13 +858,68 @@ describe Fast::Dir do
     it "should behave like #merge but never fail"
   end
 
-  describe "#conflicts?" do
-    context "both dirs exist and no file or dir in any has the same name in the other" do
-      it "should return true"
+  describe "#conflicts_with?" do
+    context "no directory tree" do
+      context "no file in target has the same name as other in source" do
+        it "should return false" do
+          Fast::Dir.new.should_not exist :target
+          Fast::Dir.new.should_not exist :demo
+          
+          Fast::File.new.touch "demo/non_conflict.txt"
+          Fast::File.new.touch "target/not_at_all.txt"
+          
+          Fast::Dir.new.conflicts_with?(:demo, :target).should === false
+        end
+      end
+      
+      context "at least one file in target has the same name as other in source" do
+        it "should return true" do
+          Fast::Dir.new.should_not exist :target
+          Fast::Dir.new.should_not exist :demo
+          
+          Fast::File.new.touch "demo/some_conflict.txt"
+          Fast::File.new.touch "target/some_conflict.txt"
+          Fast::File.new.touch "target/not_at_all.txt"
+          
+          Fast::Dir.new.conflicts_with?(:demo, :target).should === true
+        end
+      end
     end
-    
-    context "some files in target dir have the same name as other in source" do
-      it "should return false"
+
+    context "recursive" do
+      context "no file in any has the same path in the other" do
+        it "should return false" do
+          Fast::Dir.new.should_not exist :demo
+          Fast::Dir.new.should_not exist :target
+          
+          Fast::File.new.touch "demo/some/file.txt"
+          Fast::File.new.touch "demo/deep/in/the/tree.file"
+          
+          Fast::File.new.touch "target/no/conflict.what"
+          Fast::File.new.touch "target/so/ever.txt"
+          
+          Fast::Dir.new.conflicts_with?(:demo, :target).should === false
+        end      
+      end
+      
+      context "at least one file in target dir have the same path as other in source" do
+        it "should return true" do
+          Fast::Dir.new.should_not exist :demo
+          Fast::Dir.new.should_not exist :target
+          
+          Fast::File.new.touch "demo/some/file.txt"
+          Fast::File.new.touch "demo/deep/in/the/tree.file"
+          
+          Fast::File.new.touch "target/some/file.txt"
+          Fast::File.new.touch "target/so/ever.txt"
+          
+          Fast::Dir.new.conflicts_with?(:demo, :target).should === true
+        end
+      end
+    end
+
+    after do
+      Fast::Dir.new.remove! :demo, :target
     end
   end
   
@@ -972,6 +1028,8 @@ describe Fast::Dir do
         Fast::File.new.read("demo/subdir/subsub/other.txt").should include "More than this"
         Fast::File.new.read("demo/subdir/demo.txt").should include "Some file content"
       end
+      
+      it "should handle conflicts somehow"
     end
     
     after :each do 

data/spec/fast/file_spec.rb

@@ -5,11 +5,6 @@ require "zucker/os"
 ::File.unlink "demo.txt" if ::File.exist? "demo.txt"
 
 describe Fast::File do
-
-  context "a Fast::File is passed as argument where a path is accepted" do
-    it "should be accepted"
-  end
-
   shared_examples_for "any file content appending" do
     it "should create the file if it does not exist" do
       ::File.should_not exist "demo.txt"
@@ -384,7 +379,17 @@ describe Fast::File do
       end
       
       context "a block is passed" do
-        it "should have direct access to file's methods"
+        it "should have direct access to file's methods" do
+          Fast::File.new.should_not exist :demo_txt
+          Fast::File.new.append :demo_txt, "New content!"
+          entered_the_block = false
+          Fast::File.new.read :demo_txt do |the_file|
+            the_file.should be_a ::File
+            entered_the_block = true
+          end
+          entered_the_block.should be_true
+          Fast::File.new.destroy! :demo_txt
+        end
       end
     end
     
@@ -397,8 +402,39 @@ describe Fast::File do
     end
   end
   
+  # Private method
+  describe "#do_exist?" do
+    context "it the file exist" do
+      it "should return true" do
+        ::File.should_not exist "demo.txt"
+        Fast::File.new.create "demo.txt"
+        file = Fast::File.new "demo.txt"
+        def file.call_do_exist?
+          do_exist? "demo.txt"
+        end
+        file.call_do_exist?.should === true
+      end   
+
+      after do
+        Fast::File.new.destroy! "demo.txt"
+      end
+    end
+
+    context "if the file does not exist" do
+      it "should return false" do
+        ::File.should_not exist "demo.txt"
+        file = Fast::File.new "demo.txt"
+        def file.call_do_exist?
+          do_exist? "demo.txt"
+        end
+        file.call_do_exist?.should === false        
+      end
+    end
+  end
+
   shared_examples_for "any file existencialism" do
     it "should return true if file exists" do
+      pending "move partially to FilesystemObject"
       ::File.should_not exist "demo.file"
       Fast::File.new.create! "demo.file"
       Fast::File.new.send( @method, "demo.file" ).should be_true
@@ -406,33 +442,26 @@ describe Fast::File do
     end
     
     it "should return false if file does not exist" do
+      pending "move partially to FilesystemObject"
       ::File.should_not exist "demo.file"
       Fast::File.new.send( @method, "demo.file" ).should be_false
     end
     
     it "should return false if path represents a directory!" do
+      pending "move partially to FilesystemObject"
       Fast::Dir.new.should_not exist "demo"
       Fast::Dir.new.create "demo"
       Fast::File.new.send( @method, "demo" ).should be_false
       Fast::Dir.new.delete "demo"
     end
-  end
-  
-  describe "#exist?" do
-    before :each do @method = :exist? end
-    it_behaves_like "any file existencialism"
-  end
-  
-  describe "#exists?" do
-    before :each do @method = :exists? end
-    it_behaves_like "any file existencialism"
-  end
+  end  
   
   describe "#exist_all?" do
     before :each do @method = :exist_all? end
     it_behaves_like "any file existencialism"
     
     it "should return true if all exist" do
+      pending "Method being moved to Fast::FilesystemObject"
       # Create the demo files
       Fast::File.new.touch "demo1.txt", "demo2.txt", "demo3.txt"
       
@@ -441,6 +470,7 @@ describe Fast::File do
     end
     
     it "should return false if any does not exist" do
+      pending "Method being moved to Fast::FilesystemObject"
       Fast::File.new.touch "demo1.txt", "demo2.txt", "demo3.txt"
       Fast::File.new.should_not exist "demo4.txt"
       
@@ -460,6 +490,7 @@ describe Fast::File do
     it_behaves_like "any file existencialism"
     
     it "should return true if at least one exists" do
+      pending "Method being moved to Fast::FilesystemObject"
       Fast::File.new.touch "demo1.txt"
       Fast::File.new.should_not exist "demo2.txt"
       
@@ -467,6 +498,7 @@ describe Fast::File do
     end
     
     it "should return false if none exist" do
+      pending "Method being moved to Fast::FilesystemObject"
       Fast::File.new.should_not exist "demo2.txt"
       Fast::File.new.should_not exist "demo3.txt"
       
@@ -480,6 +512,7 @@ describe Fast::File do
   
   describe "#exist_which" do
     it "should return a list with the files that exist" do
+      pending "Method being moved to Fast::FilesystemObject"
       Fast::File.new.should_not exist "demo1.txt"
       Fast::File.new.should_not exist "demo2.txt"
       Fast::File.new.should_not exist "demo3.txt"
@@ -522,25 +555,6 @@ describe Fast::File do
       Fast::File.new.delete! "demo.txt"
     end
   end
-  
-  shared_examples_for "any file subsetter" do
-    # SubSetter as described in http://xaviervia.com.ar/patterns/sub-setter
-    it "should forward self to a filtering object" do      
-      the_demo_file = Fast::File.new :demo
-      SubSetter::Fast::File.should_receive( :new ).with the_demo_file
-      the_demo_file.by
-    end   
-  end
-  
-  describe "#by" do 
-    before :each do @method = :by end
-    it_behaves_like "any file subsetter"
-  end
-  
-  describe "#filter" do
-    before :each do @method = :filter end
-    it_behaves_like "any file subsetter"
-  end
 
   describe ".new" do
     it "should accept a string path as argument" do
@@ -552,50 +566,6 @@ describe Fast::File do
     end
   end  
 
-  shared_examples_for "any file absolutizer" do
-    context "file path is a relative route" do
-      it "should expand the file path with pwd" do
-        Fast::File.new.send( @method, "demo.file" ).should == "#{Dir.pwd}/demo.file"
-      end
-    end
-    
-    context "file path is an absolute route" do
-      it "should return the same as given path" do
-        unless OS.windows?
-          Fast::File.new.send( @method, "/dev/null" ).should == "/dev/null"
-        else
-          pending "POSIX only!"
-        end
-      end
-    end
-  end
-  
-  describe "#expand" do
-    before :each do @method = :expand end
-    it_behaves_like "any file absolutizer"
-  end
-  
-  describe "#absolute" do
-    before :each do @method = :absolute end
-    it_behaves_like "any file absolutizer"
-  end
- 
-  describe "#path" do 
-    context "the path is setted" do
-      it "returns the path" do
-        the_file = Fast::File.new "demo.file"
-        the_file.path.should == "demo.file"
-      end
-    end
-    
-    context "the path is undefined" do
-      it "returns nil" do
-        the_file = Fast::File.new
-        the_file.path.should be_nil
-      end
-    end
-  end
-
   shared_examples_for "any file renaming" do
     it "should change the file's name" do
       Fast::File.new.should_not exist "demo.file"
@@ -798,4 +768,26 @@ describe Fast::File do
       end
     end
   end
+
+  describe "#extension" do
+    context "a path is setted and it has extension" do
+      it "should return the extension"
+    end
+
+    context "a path is setted but has no extension" do
+      it "should return nil"
+    end
+    
+    context "a path is sent in the call and has extension" do
+      it "should return the extension"
+    end
+
+    context "a path is sent in the call but has no extension" do
+      it "should return nil" 
+    end
+
+    context "no path setted" do
+      it "should raise exception"
+    end
+  end
 end