casegen 1.3.0

data/src/calc.sample.txt

@@ -0,0 +1,13 @@
+sets
+----
+first number: 0, 1
+operator: +, -, *, /
+second number: 0, 1
+
+rules(sets)
+-----------
+exclude operator = / AND second number = 0
+  Divide by zero error
+
+console(rules)
+--------------

data/src/cart.sample.txt

@@ -0,0 +1,33 @@
+sets
+------------
+payment: Credit, Check, Online Bank
+amount: 100, 1,000, 10,000
+shipping: Ground, Air
+ship to country: US, Outside US
+bill to country: US, Outside US
+
+
+rules(sets)
+---------------------------
+# Comments supported
+exclude shipping = Ground AND ship to country = Outside US
+  Our ground shipper will only ship things within the US.
+
+# Single or double equals sign supported - they're synonymous
+exclude payment = Check AND bill to country == Outside US
+  Our bank will not accept checks written from banks outside the US.
+
+#[Complex booleans not supported yet]
+#exclude payment = Online Bank AND (amount == 1,000 OR amount = 10,000)
+exclude payment = Online Bank AND amount == 1,000
+exclude payment = Online Bank AND amount == 10,000
+  While the online bank will process amounts > $1,000, we've experienced
+  occasional problems with their services and have had to write off some
+  transactions, so we no longer allow this payment option for amounts greater
+  than $1,000
+
+exclude ship to country = US AND bill to country = Outside US
+  If we're shipping to the US, billing party cannot be outside US
+
+console(rules)
+----------

data/src/casegen.rb

@@ -0,0 +1,191 @@
+require 'singleton'
+
+class Fixnum
+  def even?
+    self.divmod(2)[1] == 0
+  end
+end
+
+class String
+  def outdent
+    a = $1 if match(/\A(\s*)(.*\n)(?:\1.*\n|\n)*\z/)
+    gsub(/^#{a}/, '')
+  end
+end
+
+module CLabs
+  module CaseGen
+    class AgentException < Exception
+    end
+
+    class Agent # base class
+      attr_reader :data, :reference_agents
+
+      def initialize(data, agents)
+        @data = data
+        @reference_agents = agents
+      end
+    end
+
+    class Agents
+      include Singleton
+
+      def initialize
+        clear
+      end
+
+      def register(agent)
+        if agent.class == Class && agent.ancestors.include?(Agent)
+          @agents << agent
+        else
+          raise AgentException.new("To register an agent, you must pass in a Class instance that's a subclass of Agent")
+        end
+      end
+
+      def method_missing(methid, *args, &block)
+        @agents.send(methid, *args, &block)
+      end
+
+      def get_agent_by_id(id)
+        @agents.each do |agent|
+          return agent if agent.agent_id =~ /#{id}/i
+        end
+        # rather than return nil and allow the client to get bumfuzzled if 
+        # they forget to check for nil, let's blow up and tell them how to
+        # not let it happen again
+        raise AgentException.new("Requested an agent that does not exist. You can query for existance with .id_registered?")
+      end
+
+      def id_registered?(id)
+        begin
+          get_agent_by_id(id)
+          return true
+        rescue AgentException
+          return false
+        end
+      end
+
+      # removes all registered agents
+      def clear
+        @agents = []
+      end
+    end
+
+    class ParserException < Exception
+    end
+
+    class Parser
+      attr_reader :agents
+
+      def initialize(data)
+        @data = data
+        @agents = []
+        parse
+      end
+
+      def parse
+        lines = @data.split(/\n/)
+        while !lines.empty?
+          line = lines.shift
+          next if line.strip.empty?
+
+          data = nil
+          agent_class, reference_agents = parse_agent(line)
+
+          next_line = lines.shift
+          if next_line =~ /^-+/
+            data = parse_data(lines).join("\n")
+          else
+            raise ParserException.new("Expected hyphen line after the agent declaration for <#{agent_class}>")
+          end
+
+          @agents << agent_class.new(data, reference_agents)
+        end
+      end
+
+      def parse_data(lines)
+        end_index = -1
+        lines.each_with_index do |line, index|
+          if line =~ /^-+/
+            end_index = index - 2
+            return lines.slice!(0, end_index)
+          end
+        end
+        return lines.slice!(0, lines.length)
+      end
+
+      def parse_agent(line)
+        agent_name, *reference_agent_names = line.split(/(?=\()/)
+        raise ParserException.new("Nested agents ( e.g. a(b(c)) ) not supported yet") if reference_agent_names.length > 1
+        if reference_agent_names.length > 0
+          reference_agent_names = reference_agent_names[0].gsub(/\(|\)/, '').split(/,/)
+          reference_agent_names.collect! do |name|
+            name.strip
+          end
+        else
+          reference_agent_names = []
+        end
+
+        [agent_name, reference_agent_names].flatten.each do |a_name|
+          raise ParserException.new("Unregistered agent <#{a_name}> in agent name data <#{line}>") if !Agents.instance.id_registered?(a_name)
+        end
+
+        reference_agents = []
+        reference_agent_names.each do |ref_name|
+          @agents.each do |agent|
+            reference_agents << agent if agent.class.agent_id =~ /#{ref_name}/i
+          end
+        end
+        agent_class = Agents.instance.get_agent_by_id(agent_name)
+        [agent_class, reference_agents]
+      end
+    end
+
+    class CaseGen
+      def CaseGen.version
+        '1.3.0'
+      end
+
+      def initialize(data)
+        load_agents
+        Parser.new(data)
+      end
+
+      def load_agents
+        agent_dir = "#{File.dirname(__FILE__)}/agents"
+        agent_fns = Dir[File.join(agent_dir, '*.rb')]
+        agent_fns.each do |fn|
+          require fn
+        end
+        ObjectSpace.each_object(Class) do |klass|
+          if klass.ancestors.include?(Agent) && (klass != Agent)
+            Agents.instance.register(klass)
+          end
+        end
+      end
+    end
+
+    class Console
+      def initialize
+        put_banner
+
+        if ARGV[0].nil? || !File.exists?(ARGV[0])
+          puts "Case file required: #{File.basename($0)} [case filename]. For example:"
+          puts "  #{File.basename($0)} cases.txt"
+          puts
+          exit
+        end
+
+        CaseGen.new(File.read(ARGV[0]))
+      end
+
+      def put_banner
+        $stderr.puts "cLabs Casegen #{CaseGen.version}"
+      end
+    end
+  end
+end
+
+if __FILE__ == $0
+  CLabs::CaseGen::Console.new
+end

data/src/ruby_array.sample.txt

@@ -0,0 +1,20 @@
+sets
+----
+role: admin, standard
+authorization code: none, invalid, valid
+submit enabled: true, false
+
+rules(sets)
+-----------
+exclude role = admin AND submit enabled = false
+  Admin role can always submit
+
+exclude role = standard AND authorization code = none AND submit enabled = true
+exclude role = standard AND authorization code = invalid AND submit enabled = true
+exclude role = standard AND authorization code = valid AND submit enabled = false
+  Standard role can only submit when authorization code is valid
+
+
+ruby_array(rules)
+-------------
+DataSubmitCase

metadata

@@ -0,0 +1,66 @@
+--- !ruby/object:Gem::Specification
+name: casegen
+version: !ruby/object:Gem::Version
+  version: 1.3.0
+  prerelease: 
+platform: ruby
+authors:
+- chrismo
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-05-28 00:00:00.000000000 Z
+dependencies: []
+description: 
+email: chrismo@clabs.org
+executables:
+- casegen
+extensions: []
+extra_rdoc_files: []
+files:
+- src/agents/sets/enum/by.rb
+- src/agents/sets/enum/cluster.rb
+- src/agents/sets/enum/inject.rb
+- src/agents/sets/enum/install.rb
+- src/agents/sets/enum/nest.rb
+- src/agents/sets/enum/op.rb
+- src/agents/sets/enum/pipe.rb
+- src/agents/sets/enum/tree.rb
+- src/agents/sets.rb
+- src/calc.sample.txt
+- src/cart.sample.txt
+- src/casegen.rb
+- src/ruby_array.sample.txt
+- bin/casegen
+homepage: https://github.com/chrismo/casegen
+licenses:
+- BSD
+post_install_message: 
+rdoc_options: []
+require_paths:
+- src
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+      segments:
+      - 0
+      hash: -3949454406001861969
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+      segments:
+      - 0
+      hash: -3949454406001861969
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.23
+signing_key: 
+specification_version: 3
+summary: Simple Ruby DSL to generate use cases restricted by sets of rules
+test_files: []