Bacon_FS 0.1.0

data/.document

@@ -0,0 +1,5 @@
+lib/**/*.rb
+bin/*
+- 
+features/**/*.feature
+LICENSE.txt

data/.gitignore

@@ -0,0 +1,4 @@
+*.gem
+.bundle
+Gemfile.lock
+pkg/*

data/Bacon_FS.gemspec

@@ -0,0 +1,30 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "Bacon_FS/version"
+
+Gem::Specification.new do |s|
+  s.name        = "Bacon_FS"
+  s.version     = Bacon_FS::VERSION
+  s.authors     = ["da99"]
+  s.email       = ["i-hate-spam-45671204@mailinator.com"]
+  s.homepage    = ""
+  s.summary     = %q{Matches for Bacon related to the file system.}
+  s.description = %q{
+  Matches for Bacon related to the file system.
+  
+  "~/.bashrc".should.be file
+  }
+
+  s.rubyforge_project = "Bacon_FS"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+    s.add_development_dependency 'bacon'
+    s.add_development_dependency 'rake'
+  s.require_paths = ["lib"]
+
+  # specify any dependencies here; for example:
+  # s.add_development_dependency "rspec"
+  # s.add_runtime_dependency "rest-client"
+end

data/Gemfile

@@ -0,0 +1,4 @@
+source "http://rubygems.org"
+
+# Specify your gem's dependencies in Bacon_FS.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,20 @@
+Copyright (c) 2011 da99
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,43 @@
+= Bacon_FS
+
+Matchers for Bacon, https://github.com/chneukirchen/bacon/, when interacting with files.
+
+== Install
+
+In your Gemfile:
+
+= begin rdoc
+gem 'Bacon_FS'
+=end
+
+== Usage:
+
+= begin rdoc
+require 'Bacon_FS'
+
+describe 'My home files.' do
+
+  before {
+    include Bacon_FS::DSL
+  } 
+  
+  it 'should be a file' do
+    "~/.bashrc".should.be.a file
+  end
+
+  it 'should be a directory' do
+    "~/.ssh".should.be.a directory
+  end
+  
+end
+
+=end
+
+
+
+== Copyright
+
+Copyright (c) 2011 da99. See LICENSE.txt for
+further details.
+
+

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/lib/Bacon_FS.rb

@@ -0,0 +1,99 @@
+require "Bacon_FS/version"
+
+class Should
+  
+  class Exposed
+    def initalize shoulda
+      @negated = shoulda.instance_variable_get(:@negated)
+      @object  = shoulda.instance_variable_get(:@object)
+    end
+  end
+  
+  alias_method :be_not_array, :be
+  def be *raw_args, &blok
+    
+    args = raw_args.flatten
+    
+    if !block_given? && args.size == 2 && args.first.is_a?(Proc) && args.last.is_a?(Proc)
+      desc = args.first.call(Exposed.new self)
+      blok = args.last
+      return be_not_array( desc, &blok )
+    end
+
+    be_not_array(*raw_args, &blok)
+  end
+
+end # === class Should
+
+module Bacon_FS
+
+  module DSL
+
+    # Returns: Permissions_Array: %w! drwxr-xr-x user group !
+    def permissions raw_path
+      path      = File.expand_path(raw_path)
+      dir       = File.dirname(path.strip)
+      base_name = File.basename(path)
+      pattern   = %r!\d+:\d+\s#{base_name}(\s|$)!
+      raise "Invalid character in path: #{dir}" if dir[/\s/]
+      
+      results   = %x! ls -al #{dir} !.split("\n").grep(pattern)
+
+      raise "Too many ls listings for #{raw_path}: #{results.inspect}" if results.size > 1
+      raise "No ls listings for #{raw_path}: #{results.inspect}" if results.size != 1
+
+      pieces = results.first.split
+			[ pieces[0], pieces[2], pieces[3] ]
+    end
+    
+    def have_key key
+
+      matcher = lambda { |obj|
+        obj.has_key?(key)
+      }
+      
+    end
+
+    def file_containing msg, show_contents = false
+      lambda { |obj|
+        if not File.file?(obj)
+          should.flunk "Not a file: #{obj}"
+        end
+
+        contents = File.read(obj)
+        !!contents[msg]
+      }
+    end
+
+    def owned_and_in( user )
+      lambda { |obj|
+        actual = permissions(obj)[1,2]
+        desired = [ user, user ]
+        actual == desired
+      }
+    end
+
+    def have_permissions str
+      lambda { |obj|
+        actual  = permissions(obj).first
+        desired = str
+        actual == desired
+      }
+    end
+
+    def directory
+      lambda { |obj|
+        File.directory?(obj)
+      }
+    end
+
+    def file
+      lambda { |obj|
+        File.file?(obj)
+      }
+    end
+
+
+  end # === module
+
+end # === class 

data/lib/Bacon_FS/version.rb

@@ -0,0 +1,3 @@
+module Bacon_FS
+  VERSION = "0.1.0"
+end

data/spec/helper.rb

@@ -0,0 +1,15 @@
+require 'rubygems'
+require 'bundler'
+begin
+  Bundler.setup(:default, :development)
+rescue Bundler::BundlerError => e
+  $stderr.puts e.message
+  $stderr.puts "Run `bundle install` to install missing gems"
+  exit e.status_code
+end
+require 'bacon'
+
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+
+Bacon.summary_on_exit

data/spec/main.rb

@@ -0,0 +1,31 @@
+
+require File.expand_path('spec/helper')
+require 'Bacon_FS'
+
+FOLDER = "/tmp/BACON_FS"
+%x! mkdir -p #{FOLDER} !
+
+FILE = "#{FOLDER}/story.txt"
+
+%x! echo "I awoke to dawn." > #{FILE}!
+
+at_exit {
+  %x! rm -rf #{FOLDER} !
+}
+
+class Box
+  include Bacon_FS::DSL
+end # === class
+
+shared 'box' do
+
+  before do
+    @bx = Box.new
+  end
+
+end # === shared
+
+
+Dir.glob('spec/tests/*.rb').each { |file|
+  require File.expand_path(file.sub('.rb', '')) if File.file?(file)
+}

data/spec/tests/directory.rb

@@ -0,0 +1,16 @@
+
+describe ":directory" do
+  
+  behaves_like 'box'
+
+  it 'must return true if directory exists' do
+    @bx.directory.call(FOLDER)
+    .should.be == true
+  end
+
+  it 'must return false if directory is a file' do
+    @bx.directory.call(FILE)
+    .should.be == false
+  end
+
+end # === describe :a_directory

data/spec/tests/file.rb

@@ -0,0 +1,17 @@
+
+
+describe ":a_file" do
+  
+  behaves_like 'box'
+
+  it 'must return true if file exists' do
+    @bx.file.call(FILE)
+    .should.be == true
+  end
+
+  it 'must return false if file is a directory' do
+    @bx.file.call(FOLDER)
+    .should.be == false
+  end
+
+end # === describe :a_file

data/spec/tests/file_containing.rb

@@ -0,0 +1,16 @@
+
+describe ":a_file_containing" do
+  
+  behaves_like 'box'
+
+  it 'must return true if file contains the String.' do
+    @bx.file_containing('dawn').call(FILE)
+    .should.be == true
+  end
+
+  it 'must return false if file does not contains the String.' do
+    @bx.file_containing('Wallace Thornhill').call(FILE)
+    .should.be == false
+  end
+
+end # === describe :a_file_containing

data/spec/tests/have_key.rb

@@ -0,0 +1,16 @@
+
+describe "have_key" do
+  
+  behaves_like 'box'
+
+  it 'must return true if array has desired key' do
+    @bx.have_key('KEY').call('KEY'=>'master')
+    .should.be == true
+  end
+
+  it 'must return false if array has desired key' do
+    @bx.have_key('KEY').call('GOZER'=>'master')
+    .should.be == false
+  end
+
+end # === describe have_key

data/spec/tests/have_permissions.rb

@@ -0,0 +1,17 @@
+
+describe ":have_permissions" do
+  
+  behaves_like 'box'
+
+  it 'must return true if file has the desired mode bits' do
+    @bx.have_permissions('-rw-r--r--').call(FILE)
+    .should.be == true
+  end
+  
+  it 'must return false if file does not have the desired mode bits' do
+    target = 'drwxr--r--'
+    @bx.have_permissions(target).call(FILE)
+    .should.be == false
+  end
+
+end # === describe :have_permissions

data/spec/tests/owned_and_in.rb

@@ -0,0 +1,21 @@
+
+describe ":owned_and_in" do
+  
+  behaves_like 'box'
+
+  before do
+    @user = %x!whoami!.strip
+  end
+
+  it 'must return true if file is owned and in group of user' do
+    @bx.owned_and_in(@user).call(FILE)
+    .should.be == true
+  end
+  
+  it 'must return false if file is owned and in group of wrong user' do
+    target = ['root', 'root']
+    @bx.owned_and_in('root').call(FILE)
+    .should.be == false
+  end
+
+end # === describe :owned_and_in

metadata

@@ -0,0 +1,85 @@
+--- !ruby/object:Gem::Specification
+name: Bacon_FS
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+  prerelease: 
+platform: ruby
+authors:
+- da99
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2011-10-13 00:00:00.000000000Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bacon
+  requirement: &12075980 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *12075980
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: &12075340 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: *12075340
+description: ! "\n  Matches for Bacon related to the file system.\n  \n  \"~/.bashrc\".should.be
+  file\n  "
+email:
+- i-hate-spam-45671204@mailinator.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .document
+- .gitignore
+- Bacon_FS.gemspec
+- Gemfile
+- LICENSE.txt
+- README.rdoc
+- Rakefile
+- lib/Bacon_FS.rb
+- lib/Bacon_FS/version.rb
+- spec/helper.rb
+- spec/main.rb
+- spec/tests/directory.rb
+- spec/tests/file.rb
+- spec/tests/file_containing.rb
+- spec/tests/have_key.rb
+- spec/tests/have_permissions.rb
+- spec/tests/owned_and_in.rb
+homepage: ''
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: Bacon_FS
+rubygems_version: 1.8.11
+signing_key: 
+specification_version: 3
+summary: Matches for Bacon related to the file system.
+test_files: []