betabrite 0.0.1 → 0.0.2

data/CHANGELOG

@@ -1,5 +1,9 @@
 = BetaBrite Changelog
 
+== 0.0.2
+
+* Added new syntax to BetaBrite::String and BetaBrite::TextFile
+
 == 0.0.1
 
 * First release

data/NOTES

@@ -1,5 +1,27 @@
 = BetaBrite Release Notes
 
+== 0.0.2
+
+This release comes with new syntax for setting attributes of
+BetaBrite::String and BetaBrite::TextFile.  Setting attributes like color
+and character set is now less cumbersome.  For example, here is the old
+way to set the color using constants:
+  s = BetaBrite::String.new("hello")
+  s.color = BetaBrite::String::Color::GREEN
+Instead you can do this:
+  s = BetaBrite::String.new("hello") { |a|
+    a.set_color "green"
+  }
+You can treat TextFile similarly:
+  s = BetaBrite::TextFile.new { |a|
+    a.set_mode "compressed_rotate"
+    a.set_position "middle"
+  }
+These special set functions figure out what constant you want and set it
+to the attribute you want.  "set_mode" looks up the name passed in in the
+constants stored in the Mode class, and sets it to the mode attribute.
+
+
 == 0.0.1
 
 This is the first release of the BetaBrite sign library.  Please see the RDoc,

data/lib/bb_version.rb

@@ -1,3 +1,3 @@
 class BetaBrite
-  Version = '0.0.1'
+  Version = '0.0.2'
 end

data/lib/files/textfile.rb

@@ -62,6 +62,9 @@ class BetaBrite
 
     attr_accessor :label, :display_position, :mode, :message
 
+    alias_method :position, :display_position
+    alias_method :position=, :display_position=
+
     def initialize
       @display_position = Position::MIDDLE
       @label = "A"
@@ -82,6 +85,24 @@ class BetaBrite
       sprintf("%04x", total).upcase
     end
 
+    def method_missing(sym, *args)
+      if args.length > 0 && sym.to_s =~ /^set_(mode|position)$/
+        class_name = $1
+
+        const_sym = class_name.capitalize.to_sym
+
+        klass = self.class.const_get const_sym
+        if klass.const_defined? args.first.upcase.to_sym
+          return send("#{class_name}=".to_sym,
+                      klass.const_get(args.first.upcase.to_sym))
+        else
+          raise ArgumentError, "no constant #{args.first.upcase}", caller
+        end
+      end
+
+      super
+    end
+
     alias :inspect :to_s
 
     private

data/lib/string.rb

@@ -61,12 +61,28 @@ class BetaBrite
       @string   = string
       @color    = args[:color]
       @charset  = args[:charset]
+      yield self if block_given?
     end
 
     def to_s
       "#{0x1a.chr}#{@charset}#{0x1c.chr}#{@color}#{@string}"
     end
 
-    #alias :to_s :format
+    def method_missing(sym, *args)
+      if args.length > 0 && sym.to_s =~ /^set_(color|charset)$/
+        class_name = $1
+
+        const_sym = class_name == 'color' ? :Color : :CharSet
+
+        klass = self.class.const_get const_sym
+        if klass.const_defined? args.first.upcase.to_sym
+          return send("#{class_name}=".to_sym,
+                      klass.const_get(args.first.upcase.to_sym))
+        else
+          raise ArgumentError, "no constant #{args.first.upcase}", caller
+        end
+      end
+      super
+    end
   end
 end

data/test/tc_string.rb

@@ -0,0 +1,20 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+$:.unshift File.join(File.dirname(__FILE__), "..", "test")
+
+require 'test/unit'
+require 'betabrite'
+require 'bb_override'
+
+class StringTest < Test::Unit::TestCase
+  def test_const_dsl
+    s = BetaBrite::String.new("hello") { |a|
+      a.set_color "green"
+      a.set_charset "five_high"
+    }
+
+    assert_equal(BetaBrite::String::Color::GREEN, s.color)
+    assert_equal(BetaBrite::String::CharSet::FIVE_HIGH, s.charset)
+    assert_equal("hello", s.string)
+  end
+end
+

data/test/tc_text_file.rb

@@ -0,0 +1,18 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+$:.unshift File.join(File.dirname(__FILE__), "..", "test")
+
+require 'test/unit'
+require 'betabrite'
+require 'bb_override'
+
+class TextFileTest < Test::Unit::TestCase
+  def test_const_dsl
+    tf = BetaBrite::TextFile.new { |a|
+      a.set_mode "roll_down"
+      a.set_position "middle"
+    }
+
+    assert_equal(BetaBrite::TextFile::Position::MIDDLE, tf.position)
+    assert_equal(BetaBrite::TextFile::Mode::ROLL_DOWN, tf.mode)
+  end
+end

data/test/ts_bb.rb

@@ -1,5 +1,7 @@
 require 'test/unit'
 
-require 'tc_many_mem.rb'
-require 'tc_memory.rb'
-require 'tc_set_string.rb'
+require 'tc_many_mem'
+require 'tc_memory'
+require 'tc_set_string'
+require 'tc_text_file'
+require 'tc_string'

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.9.0
 specification_version: 1
 name: betabrite
 version: !ruby/object:Gem::Version 
-  version: 0.0.1
-date: 2006-07-09 00:00:00 -07:00
+  version: 0.0.2
+date: 2006-09-28 00:00:00 -07:00
 summary: Provides a Ruby interface to BetaBrite LED signs
 require_paths: 
   - lib
@@ -34,6 +34,8 @@ files:
   - test/tc_many_mem.rb
   - test/tc_memory.rb
   - test/tc_set_string.rb
+  - test/tc_string.rb
+  - test/tc_text_file.rb
   - test/ts_bb.rb
   - lib/bb_version.rb
   - lib/betabrite.rb