auser-aska 0.0.5 → 0.0.6

data/Rakefile

@@ -6,6 +6,7 @@ begin
     p.summary = "The basics of an expert system"
     p.url = "http://blog.citrusbyte.com"
     p.dependencies = []
+    p.version = "0.0.6"
     p.install_message =<<-EOM
 
       Aska - Expert system basics

data/aska.gemspec

@@ -1,15 +1,15 @@
 Gem::Specification.new do |s|
   s.name = %q{aska}
-  s.version = "0.0.5"
+  s.version = "0.0.6"
 
   s.required_rubygems_version = Gem::Requirement.new("= 1.2") if s.respond_to? :required_rubygems_version=
   s.authors = ["Ari Lerner"]
   s.cert_chain = nil
-  s.date = %q{2008-08-01}
+  s.date = %q{2008-10-31}
   s.description = %q{The basics of an expert system}
   s.email = %q{ari.lerner@citrusbyte.com}
-  s.extra_rdoc_files = ["CHANGELOG", "LICENSE", "README", "lib", "lib/aska.rb"]
-  s.files = ["CHANGELOG", "LICENSE", "README", "Rakefile", "lib", "lib/aska.rb", "spec", "spec/rules_spec.rb", "spec/spec_helper.rb", "aska.gemspec"]
+  s.extra_rdoc_files = ["CHANGELOG", "LICENSE", "README", "lib", "lib/aska.rb", "lib/object.rb"]
+  s.files = ["CHANGELOG", "LICENSE", "README", "Rakefile", "lib", "lib/aska.rb", "lib/object.rb", "spec", "spec/rules_spec.rb", "spec/spec_helper.rb", "aska.gemspec"]
   s.has_rdoc = true
   s.homepage = %q{http://blog.citrusbyte.com}
   s.post_install_message = %q{

data/lib/aska.rb

@@ -1,34 +1,37 @@
 =begin rdoc
   Aska
 =end
+require "#{File.dirname(__FILE__)}/object"
 module Aska
   module ClassMethods
-    def rules(name=:rules, str="")
-      r = look_up_rules(name)
-      str.each_line do |line|
-        k = line[/(.+)[=\\\<\>](.*)/, 1].gsub(/\s+/, '')
-        v = line[/(.+)[=\\<>](.*)/, 2].gsub(/\s+/, '')
-        m = line[/[=\\<>]/, 0].gsub(/\s+/, '')
-        
-        create_instance_variable(k)
-        r << {k => [m, v]}
+    def rules(name=:rules, arr=[])
+      returning look_up_rules(name) do |rs|
+        arr.each do |line|
+          k = line[/(.+)[=\\\<\>](.*)/, 1].gsub(/\s+/, '')
+          v = line[/(.+)[=\\<>](.*)/, 2].gsub(/\s+/, '')
+          m = line[/[=\\<>]/, 0].gsub(/\s+/, '')
+          
+          create_instance_variable(k)
+          rs << {k => [m, v]}
+        end
+        self.send(:define_method, name) do
+          look_up_rules(name)
+        end        
       end
     end
-    def create_instance_variable(name)
-      return unless name
-      unless attr_accessors.include?(":#{name}")
-        attr_accessors << name.to_sym
-        eval "attr_accessor :#{aska_named(name)}"
-      end
+    def create_instance_variable(k)
+      aska_attr_accessors << k.to_sym unless aska_attr_accessors.include?(k.to_sym)
+      attr_reader k.to_sym unless respond_to?("#{k}".to_sym)
+      attr_writer k.to_sym unless respond_to?("#{k}=".to_sym)
     end
     def look_up_rules(name)
-      defined_rules["#{name}"] ||= []
+      defined_rules[name.to_sym] ||= []
     end
     def are_rules?(name)
       !look_up_rules(name).empty?
     end
-    def attr_accessors
-      @attr_accessors ||= []
+    def aska_attr_accessors
+      @@aska_attr_accessors ||= []
     end
     def defined_rules
       @defined_rules ||= {}
@@ -43,24 +46,20 @@ module Aska
       @rules ||= self.class.defined_rules
     end
     def valid_rules?(name=:rules)
-      arr = self.class.look_up_rules(name).collect do |rule|
-        valid_rule?(rule)
-      end
-      arr.reject {|a| a == true }.empty?
+      self.class.look_up_rules(name).reject {|rule| valid_rule?(rule) }.empty?
     end
-    def aska(m)
+    def __aska_aska_stuff(m)
       if respond_to?(m.to_sym)
         self.send(m.to_sym)
       else
-        self.send(aska_named(m.to_sym))
+        m
       end
     end
     def valid_rule?(rule)
-      return false unless rule # Can't apply a rule that is nil, can we?
       rule.each do |key,value|
         begin
-          # puts "testing if #{key} (#{self.send(key)}) is #{value[0]} #{get_var(value[1])} [#{value[1]}]"
-          return aska(key).send(value[0].to_sym, get_var(value[1]))
+          # puts "#{aska(key)} #{value[0].to_sym} #{get_var(value[1])} (#{attr_accessor?(value[1])})"
+          return __aska_aska_stuff(key).send(value[0].to_sym, __aska_get_var(value[1]))
         rescue Exception => e
           return false
         end
@@ -69,14 +68,15 @@ module Aska
     # Get the variable from the class
     # If it's defined as an attr_accessor, we know it has been defined as a rule
     # Otherwise, if we are passing it as a 
-    def get_var(name)
-      attr_accessor?(name) ? aska(name) : (supported_method?(name) ? name.to_sym : name.to_f)
+    def __aska_get_var(name)
+      # attr_accessor?(name) ? aska(name) : 
+      (supported_method?(name) ? name.to_sym : name.to_f)
     end
-    def aska_named(name)
+    def __aska_aska(name)
       self.class.aska_named(name)
     end
     def attr_accessor?(name)
-      self.class.attr_accessors.include?(name.to_sym)
+      self.class.aska_attr_accessors.include?(name.to_sym)
     end
     def supported_method?(meth)
       %w(< > == => =<).include?("#{meth}")
@@ -85,21 +85,16 @@ module Aska
     def look_up_rules(r);self.class.look_up_rules(r);end
     def are_rules?(r);self.class.are_rules?(r);end
     
-    def method_missing(m, *args)      
-      if self.class.defined_rules.has_key?("#{m}")
-        self.class.send(:define_method, m) do
-          self.class.look_up_rules(m)
-        end
-        self.send m
-      elsif self.class.attr_accessors.include?(m.to_sym)
-        self.class.send :define_method, aska_named(m).to_sym do
-          # self.send(aska_named(m).to_sym)
-        end
-        self.send(aska_named(m).to_sym)
-      else
-        super
-      end
-    end
+    # def method_missing(m, *args, &block)
+    #   if self.class.defined_rules.has_key?(m.to_sym)
+    #     self.class.send(:define_method, m) do
+    #       self.class.look_up_rules(m)
+    #     end
+    #     self.send m
+    #   else
+    #     super
+    #   end
+    # end
   end
   
   def self.included(receiver)

data/lib/object.rb

@@ -0,0 +1,6 @@
+class Object
+  def returning(receiver)
+    yield receiver
+    receiver
+  end
+end

data/spec/rules_spec.rb

@@ -2,14 +2,11 @@ require File.dirname(__FILE__) + '/spec_helper'
 
 class Car
   include Aska
-  rules :names, <<-EOR
-      x > 0      
-      y > 0
-      x > y
-    EOR
-  def x=(v)
-    @x = v
-  end
+  rules :names, [
+      "x > 0",
+      "y > 0",
+      "x > y"
+    ]
 end
 describe "Rules" do
   before(:each) do
@@ -33,10 +30,6 @@ describe "Rules" do
   it "should be able to say that rules are rules" do
     @car.are_rules?(:names).should be_true
   end
-  it "should define the rule names as a method after calling it" do
-    @car.x_aska = 4
-    @car.methods.include?(@car.aska_named(:x)).should == true
-  end
   describe "parsing" do
     it "should be able to parse the x > 0 into an array" do
       @car.names.include?({"x"=>[">","0"]}).should == true
@@ -54,40 +47,48 @@ describe "Rules" do
       Car.look_up_rules(:names).should == [{"x"=>[">", "0"]}, {"y"=>[">", "0"]}, {"x"=>[">", "y"]}]
     end
   end
-  it "should use x if available instead of x_aska" do
-    @car.x = 6
-    @car.get_var(:x).class.should == @car.x_aska.class
-  end
-  it "should be able to get the variable associated with the instance and return it" do    
-    @car.x_aska = 4
-    @car.get_var(:x).class.should == @car.x_aska.class
-  end
+  # it "should use x if available instead of x_aska" do
+  #   @car.x = 6
+  #   @car.get_var(:x).class.should == @car.x_aska.class
+  # end
+  # it "should be able to get the variable associated with the instance and return it" do    
+  #   @car.x_aska = 4
+  #   @car.get_var(:x).class.should == @car.x_aska.class
+  # end
   it "should be able to get a number with the instance and return it as a float" do
-    @car.get_var(4).class.should == Float
+    @car.__aska_get_var(4).class.should == Float
   end
   it "should be able to get the method it's applying as a method symbol" do
-    @car.get_var(:<).class.should == Symbol
+    @car.__aska_get_var(:<).class.should == Symbol
+  end
+  it "should be able to get the method as a symbol" do
+    @car.__aska_get_var("<").class.should == Symbol
   end
   it "should be able to retrieve the value of the rule when checking if it's valid" do
-    @car.x_aska = 10
+    @car.x = 10
     @car.valid_rule?({:x => [:==, 10]}).should == true
   end
   it "should be able to apply the rules and say that they are not met when they aren't" do
     @car.valid_rules?(:names).should == false
   end
   it "should be able to apply the rules and say they aren't valid when they aren't all met" do
-    @car.x_aska = 5
-    @car.y_aska = 10
-    @car.valid_rules?(:names).should == false
+    @car.x = 5
+    @car.y = 10
+    @car.valid_rules?(:names).should == true
   end
   it "should be able to apply the rules and say they aren't valid when they aren't all met" do
-    @car.x_aska = 5
-    @car.y_aska = 0
+    @car.x = 5
+    @car.y = 0
     @car.valid_rules?(:names).should == false
   end
   it "should be able to apply the rules and say that they are in fact valid" do
-    @car.x_aska = 10
-    @car.y_aska = 5    
+    @car.x = 10
+    @car.y = 5    
     @car.valid_rules?(:names).should == true
   end
+  it "should have the rules in an array of hashes" do
+    @car.names.each do |n|
+      
+    end
+  end
 end

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification 
 name: auser-aska
 version: !ruby/object:Gem::Version 
-  version: 0.0.5
+  version: 0.0.6
 platform: ruby
 authors: 
 - Ari Lerner
 autorequire: 
 bindir: bin
 cert_chain: 
-date: 2008-08-01 00:00:00 -07:00
+date: 2008-10-31 00:00:00 -07:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -32,6 +32,7 @@ extra_rdoc_files:
 - README
 - lib
 - lib/aska.rb
+- lib/object.rb
 files: 
 - CHANGELOG
 - LICENSE
@@ -39,6 +40,7 @@ files:
 - Rakefile
 - lib
 - lib/aska.rb
+- lib/object.rb
 - spec
 - spec/rules_spec.rb
 - spec/spec_helper.rb