betabrite 0.0.2 → 1.0.0

data/lib/betabrite/usb.rb

@@ -0,0 +1,64 @@
+module BetaBrite
+  class USB < Base
+    # USB Device Codes
+    PRODUCT_ID     = 0x1234
+    VENDOR_ID      = 0x8765
+    INTERFACE      = 0x00
+    RECV_LENGTH    = 0x40 # Max Packet Size of 64
+    SEND_LENGTH    = 0x40 # Max Packet Size of 64
+    WRITE_ENDPOINT = 0x02 
+    READ_ENDPOINT  = 0x82
+    WRITE_TIMEOUT  = 5000
+    READ_TIMEOUT   = 5000
+
+    def reset!
+      write_memory!
+    end
+
+    def write_memory!
+      device = usb_device()
+      handle = usb_interface(device)
+      handle.usb_bulk_write(WRITE_ENDPOINT, memory_message, WRITE_TIMEOUT)
+      handle.usb_bulk_write(WRITE_ENDPOINT, memory_message, WRITE_TIMEOUT)
+      handle.usb_close
+    end
+
+    def write!
+      device = usb_device()
+      handle = usb_interface(device)
+      handle.usb_bulk_write(WRITE_ENDPOINT, message, WRITE_TIMEOUT)
+      handle.usb_bulk_write(WRITE_ENDPOINT, message, WRITE_TIMEOUT)
+      handle.usb_close
+    end
+
+    private
+    def usb_device
+      ::USB.devices.find { |d|
+        d.idProduct == PRODUCT_ID && d.idVendor == VENDOR_ID
+      } || raise("Unable to locate the BETABrite.")
+    end
+
+    def usb_interface(device)
+      handle = device.usb_open
+      raise "Unable to obtain a handle to the device." if handle.nil?
+
+      retries = 0
+      begin
+        error_code = handle.usb_claim_interface(INTERFACE)
+        raise unless error_code.nil?
+      rescue
+        handle.usb_detach_kernel_driver_np(INTERFACE);
+        if retries.zero? 
+          retries += 1
+          retry
+        else
+          raise "Unable to claim the device interface."
+        end
+      end
+
+      raise "Unable to set alternative interface." unless handle.set_altinterface(0).nil?
+
+      handle
+    end
+  end
+end

data/script/alloc.rb

@@ -0,0 +1,21 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+require 'betabrite'
+require 'serialport'
+
+sp = SerialPort.new(0, 9600, 8, 1, SerialPort::NONE)
+
+sign = BetaBrite.new
+
+string  = BetaBrite::Memory::String.new('0', 32)
+dots    = BetaBrite::Memory::Dots.new('1', 7, 7)
+text    = BetaBrite::Memory::Text.new('A', 256)
+
+sign.add text
+sign.add dots
+sign.add string
+
+sign.allocate { |text|
+  sp.write text
+}
+

data/script/clear_memory.rb

@@ -0,0 +1,16 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+# = Synopsis
+# This script shows an example of clearing the memory on the BetaBrite sign.
+require 'betabrite'
+require 'serialport'
+
+sp = SerialPort.new(0, 9600, 8, 1, SerialPort::NONE)
+
+sign = BetaBrite.new
+sign.add BetaBrite::Memory::Clear.new
+
+sign.allocate { |text|
+  sp.write text
+}
+

data/script/client.rb

@@ -0,0 +1,39 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+# = Synopsis
+# This script shows an example of setting a volitile StringFile, and
+# referencing the StringFile from the TextFile.
+
+require 'betabrite'
+require 'serialport'
+
+sp = SerialPort.new(0, 9600, 8, 1, SerialPort::NONE)
+
+sign = BetaBrite.new
+
+# Create a new TextFile with the COMPRESSED_ROTATE mode.
+tf = BetaBrite::TextFile.new { |a|
+  a.mode = BetaBrite::TextFile::Mode::COMPRESSED_ROTATE
+}
+
+# Set up a BetaBrite::String
+hello_string = BetaBrite::String.new('James',
+                                  :color => BetaBrite::String::Color::AMBER
+                                )
+# Create a StringFile which can be modified without making the sign blink.
+sf = BetaBrite::StringFile.new('0', hello_string)
+
+# Create a dots file
+dots = BetaBrite::DotsFile.new('1', 7, 7, [])
+
+# Set the TextFile message and reference the StringFile and DotsFile
+tf.message = BetaBrite::String.new("#{dots.id} Aaron #{sf.id} Patterson")
+
+
+sign.add tf
+sign.add sf 
+
+sign.write { |text|
+  sp.write text
+}
+

data/script/dots_file.rb

@@ -0,0 +1,35 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+require 'betabrite'
+require 'serialport'
+
+def rand_string(len = 7)
+  chars = ("1".."3").to_a
+  3.times { chars << "0" }
+  string = ""
+  1.upto(len) { |i| string << chars[rand(chars.size)] }
+  string
+end
+
+sp = SerialPort.new(0, 9600, 8, 1, SerialPort::NONE)
+
+sign = BetaBrite.new
+
+pic = [
+        rand_string,
+        rand_string,
+        rand_string,
+        rand_string,
+        rand_string,
+        rand_string,
+        rand_string,
+      ]
+
+dots = BetaBrite::DotsFile.new('1', 7, 7, pic)
+
+sign.add dots 
+
+sign.write_dots { |text|
+  sp.write text
+}
+

data/script/server.rb

@@ -0,0 +1,12 @@
+require 'drb'
+require 'serialport'
+
+class TestServer
+  def tty
+    sp = SerialPort.new(0, 9600, 8, 1, SerialPort::NONE)
+  end
+end
+
+server = TestServer.new
+DRb.start_service('druby://localhost.org:9000', server)
+DRb.thread.join

data/script/sign_test.rb

@@ -0,0 +1,17 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+require 'serialport'
+require 'betabrite'
+
+sp = SerialPort.new(0, 9600, 8, 1, SerialPort::NONE)
+
+sign = BetaBrite.new
+tf = BetaBrite::TextFile.new
+tf.message = ARGV[0]
+
+sign.add tf
+
+sign.write { |text|
+  sp.write text
+}
+

data/script/stock_alloc.rb

@@ -0,0 +1,81 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+require 'betabrite'
+require 'usb'
+
+class UsbBetabrite
+  # USB Device Codes
+  PRODUCT_ID     = 0x1234
+  VENDOR_ID      = 0x8765
+  INTERFACE      = 0x00
+  RECV_LENGTH    = 0x40 # Max Packet Size of 64
+  SEND_LENGTH    = 0x40 # Max Packet Size of 64
+  WRITE_ENDPOINT = 0x02 
+  READ_ENDPOINT  = 0x82
+  WRITE_TIMEOUT  = 5000
+  READ_TIMEOUT   = 5000
+
+  # Creates a new interface between ruby and the Betabrite
+  def initialize
+    @device = get_usb_device()
+    @handle = get_usb_interface(@device)
+  end
+
+  def write(bytes)
+    # write twice to force past the 'data toggle bit' check
+    #@handle.usb_bulk_write(WRITE_ENDPOINT, bytes.pack('C*'), WRITE_TIMEOUT)
+    @handle.usb_bulk_write(WRITE_ENDPOINT, bytes, WRITE_TIMEOUT)
+  end
+  
+  private
+  
+  def get_usb_device
+    device = USB.devices.find {|d| d.idProduct == PRODUCT_ID and d.idVendor == VENDOR_ID }
+    raise "Unable to locate the BETABrite." if device.nil?
+    return device
+  end
+  
+  def get_usb_interface(device)
+    handle = device.open
+    raise "Unable to obtain a handle to the device." if handle.nil?
+
+    retries = 0
+    begin
+      error_code = handle.usb_claim_interface(INTERFACE)
+      raise unless error_code.nil?
+    rescue
+      handle.usb_detach_kernel_driver_np(INTERFACE);
+      if retries.zero? 
+        retries += 1
+        retry
+      else
+        raise "Unable to claim the device interface."
+      end
+    end
+    
+    raise "Unable to set alternative interface." unless handle.set_altinterface(0).nil?
+
+    handle
+  end
+end
+
+betabrite = UsbBetabrite.new
+
+sign = BetaBrite.new
+sign.sleep_time = 0
+
+0.upto(9) { |i| 
+  string  = BetaBrite::Memory::String.new(i.to_s, 64)
+  sign.add string
+}
+
+text    = BetaBrite::Memory::Text.new('A', 4096)
+
+sign.add text
+
+write_text = ''
+sign.allocate { |text|
+  write_text << text
+}
+betabrite.write write_text
+

data/script/stock_client.rb

@@ -0,0 +1,40 @@
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+require 'betabrite'
+require 'stockdata'
+require 'serialport'
+
+sp = SerialPort.new(0, 9600, 8, 1, SerialPort::NONE)
+
+sd = StockData.new(%w{ ^DJI CSCO DIS GM GPS LU MAT PER PFE UNTD })
+
+sign = BetaBrite.new
+tf = BetaBrite::TextFile.new { |a|
+  a.mode = BetaBrite::TextFile::Mode::COMPRESSED_ROTATE
+}
+
+string = ''
+sd.each_with_index do |stock, i|
+  color = BetaBrite::String::Color::AMBER
+  if stock.change =~ /^[+]/
+    color = BetaBrite::String::Color::GREEN
+  elsif stock.change =~ /^[-]/
+    color = BetaBrite::String::Color::RED
+  end
+  s = BetaBrite::String.new(
+    "#{stock.symbol} #{stock.last_trade} #{stock.change}",
+    :color => color
+  )
+  t = BetaBrite::StringFile.new(i.to_s, s)
+  sign.add t
+  string << "#{t.id} "
+end
+
+tf.message = BetaBrite::String.new(string.strip)
+
+#sign.add tf
+
+sign.write { |text|
+  sp.write text
+}
+

data/script/stockdata.rb

@@ -0,0 +1,65 @@
+require 'open-uri'
+require 'ostruct'
+require 'csv'
+require 'uri'
+
+class StockData
+  include Enumerable
+  
+  SOURCE_URL = "http://finance.yahoo.com/d/quotes.csv"
+  
+  #These are the symbols I understand, which are limited
+  OPTIONS = {
+    :symbol=>"s",
+    :name=>"n",
+    :change=>"c1",
+    :last_trade=>"l1",
+    :last_trade_date=>"d1",
+    :last_trade_time=>"t1",
+    :open=>"o",
+    :high=>"h",
+    :low=>"g",
+    :high_52_week=>"k",
+    :low_52_week=>"j"
+  }
+  
+  def initialize(symbols, options = [ :symbol,
+                                      :name,
+                                      :last_trade,
+                                      :last_trade_date,
+                                      :last_trade_time,
+                                      :change])
+    @symbols = symbols
+    @options = options
+    @data = nil
+  end
+  
+  def each
+    data.each do |row|
+      struct = OpenStruct.new(Hash[*(@options.zip(row).flatten)])
+      yield struct
+    end
+  end
+  
+  def each_hash
+    data.each do |row|
+      hash = Hash[*(@options.zip(row).flatten)]
+      yield hash
+    end
+  end
+  
+  def refresh
+    symbol_fragment = @symbols.join "+"
+    option_fragment = @options.map{|s| OPTIONS[s] }.join ""
+    url = SOURCE_URL + "?s=#{URI.escape(symbol_fragment)}&f=#{option_fragment}"
+    @data = []
+    CSV.parse open(url).read do |row|
+      @data << row
+    end
+  end
+  
+  def data
+    refresh unless @data
+    @data
+  end
+end

data/test/helper.rb

@@ -0,0 +1,6 @@
+%w{ ../lib }.each do |path|
+  $LOAD_PATH.unshift(File.expand_path(File.join(File.dirname(__FILE__), path)))
+end
+
+require 'test/unit'
+require 'betabrite'

data/test/{tc_many_mem.rb → test_many_mem.rb}

@@ -3,11 +3,11 @@ $:.unshift File.join(File.dirname(__FILE__), "..", "test")
 
 require 'test/unit'
 require 'betabrite'
-require 'bb_override'
 
-class MemoryAllocTest < Test::Unit::TestCase
+class ManyMemoryAllocTest < Test::Unit::TestCase
   def setup
-    @sign = BetaBrite.new
+    @sign = BetaBrite::Base.new
+    @sign.sleep_time = 0
   end
 
   def test_text_and_string
@@ -24,18 +24,14 @@ class MemoryAllocTest < Test::Unit::TestCase
 0x30,0x30,0x30,0x30,0x30,0x04
 ]
     final_s = final.collect { |x| x.chr }.join
-    @sign.add BetaBrite::Memory::Text.new('A', 4096)
+    @sign.memory << BetaBrite::Memory::Text.new('A', 4096)
 
     0.upto(9) { |i| 
       string  = BetaBrite::Memory::String.new(i.to_s, 64)
-      @sign.add string
+      @sign.memory << string
     }
 
-    test_string = ''
-    @sign.allocate { |text|
-      #obj.tty.write text
-      test_string << text
-    }
+    test_string = @sign.memory_message
     assert_equal(final_s, test_string)
   end
 end