agri-controller 0.0.0 → 0.0.8

data/lib/agri-controller/device/kr.rb

@@ -0,0 +1,23 @@
+#!ruby
+#coding:utf-8
+#require "serial"
+#require "bcc"
+module AgriController
+  module KR
+    module_function
+    def sample
+      "%01#RCCX00000000**\r"
+    end
+    def send_sample 
+      "%01$RC0100**\r"#(**:BCC) 
+    end
+  end
+end
+
+if $0==__FILE__
+  if RUBY_PLATFORM.include?("mswin")
+  p AgriController::KR::export("%01#RCCX00000000**\r",5)# => "%01$RC020013\r"
+  else
+    AgriController::KR::export("%01#RCCX00000000**\r","/dev/ttyUSB1") # => "%01$RC020013\r"
+  end
+end

data/lib/agri-controller/device/ma.rb

@@ -0,0 +1,92 @@
+module AgriController
+module MA
+module_function
+  #"\u0002P02EB3D\r\u0002B120C60\r\u0002n4E530F\r\n"
+  def sample
+    samples[0]
+  end
+
+  #5 samples in Array
+  def samples
+    ["\u0002P02EB3D\r\u0002B120C60\r\u0002n4E530F\r\n",
+     "\u0002n4E5915\r\u0002P02E83A\r\u0002B120B5F\r\n",
+     "\u0002n4E4C08\r\u0002P02F042\r\u0002B12075B\r",
+     "nonono!\rbadchar!",
+     nil]
+    #ppms=[747,744,752]
+  end
+
+  #check_sum("\u0002P02EB3D") # =>"3D"
+  #check_sum("\u0002P02EB") # =>"3D"
+  def check_sum(str)
+      x=str.chomp
+      #sum=x[-2..-1]
+      #p str[1]
+      int1=str[1].ord
+      int2=str[2..3].to_i(16)
+      int3=str[4..5].to_i(16)
+      check_sum=(int1+int2+int3).to_s(16)
+      
+      if check_sum.size<=1
+        check_sum="0"+check_sum
+      elsif  check_sum.size>2
+        check_sum=check_sum.slice(-2,2)
+      end
+      #p check_sum.upcase
+      return check_sum.upcase
+  end
+  
+  #check_sum?("\u0002P02EB3D")    # =>true
+  #check_sum?("\u0002P02EB","3D") # =>true
+  #check_sum?("\u0002P02EB","0F") # =>false
+  #check_sum?("bad")              # =>nil
+  def check_sum?(str,sum=str[-2..-1])
+    begin
+      res        =check_sum(str)
+      return res== sum
+    rescue
+      return nil
+    end
+  end
+
+  #parce("\x02P02EB3D\r\x02B120C60\r\x02n4E530F\r\n") # =>{"ppm"=>747, "Celsius Degree"=>15.600000000000023}
+  def parse(str)
+
+    hash={}
+    
+    begin
+      list=str.chomp.split("\r")
+      list.each do |x|
+        if check_sum?(x)
+          if x[1]=="P"
+            a=x.slice(2,4).to_i(16)
+              hash["ppm"]=a
+              
+          elsif x[1]=="B"
+             a=x.slice(2,4).to_i(16)
+             hash["Celsius Degree"]=a/16.0-273.15
+              
+          elsif x[1]=="A"
+             a=x.slice(2,4).to_i(16)/100.0
+              hash["humidity"]=a
+          end
+        else
+          return nil
+        end
+      end
+    rescue
+      return nil
+    end
+    return hash
+  end
+end
+end
+if $0==__FILE__
+include AgriController::MA
+  p sample
+  samples.each do |str|
+    p  res=parse(str)
+  end
+  p a=File.read("ma.txt")
+  p parse(a)
+end

data/lib/agri-controller/device/mch383.rb

@@ -0,0 +1,178 @@
+#require "rubygems"
+#require "serialport"
+
+module AgriController
+
+##
+# MCH383(MCH-383,MCH-383SD) is Tenperature,Humidity,CO2-ppm recorder
+#===Usage
+# include AgriController::MCH383
+# * res=read("COM2")        # =>"\00241040100000643\r\00242010100000310\r\00243190000000612\r"
+# * res=read("/dev/ttyUSB0")# =>"\00241040100000643\r\00242010100000310\r\00243190000000612\r"
+# 
+# * parse(res)              # =>[{"1"=>[64.3, "%"]}, {"2"=>[31.0, "C"]}, {"3"=>[612, "ppm"]}]
+#
+module MCH383
+module_function
+  ##
+  #This require "serialport" #RUBYGEMS
+  def read(port)
+    require "rubygems" if RUBY_VERSION < "1.9.0"
+    require "serialport"
+
+    #t=Time.now
+    res=nil
+    begin
+
+     # SerialPort.open(port,9600,8,1,SerialPort::NONE){|sp| sp.read_timeout=100
+     # while res=sp.read(1)
+     #   if res=="\r"
+     #     break
+     #   end
+     # end
+      #}
+      #
+     #read data
+     #SerialPort.open(port,9600,8,1,SerialPort::NONE){|sp| sp.read_timeout=500; res=sp.read(48)}
+
+    sp=SerialPort.new(port,9600,8,1,SerialPort::NONE)
+    sp.read_timeout=500
+    while res=sp.read(1)
+      if res=="\002"
+        res=res+sp.read(47)
+        break
+      end
+    end
+    sp.close
+      #p Time.now-t
+      return res # =>"\00241040100000643\r\00242010100000310\r\00243190000000612\r"
+    rescue
+      return nil
+    end
+    
+  end
+  
+  def sample
+    "\00241040100000643\r\00242010100000310\r\00243190000000612\r"
+  end
+  
+  def data_hash(num)
+    case num
+    when "01"
+      #"Celsius"
+      "C"
+    when "02"
+      #"Fahrenheit"
+      "F"
+    when "04"
+      #"Humidity"
+      "%"
+    when "19"
+      #"CO2 of ppm"
+      "ppm"
+    else
+      nil
+    end
+  end
+  
+  def of_10(of_ten)
+    case of_ten
+    when "0"
+      1
+    when "1"
+      0.1
+    when "2"
+      0.01
+    when "3"
+      0.001
+    else
+      nil
+    end
+  end
+
+  def value(num,of_ten,positive)
+    result=num.to_i * of_10(of_ten)
+    if positive=="0"#plus +
+      return result
+    else#minus -
+      return result*(-1)
+    end
+  end
+  
+  def to_f(x)
+    #x="\00243190000000612\r"
+    result={}
+    
+    if x.chomp.size==15
+      begin 
+        #first_num=x.slice(1,1)#always "4"
+        data_number=x.slice(2,1)
+        unit_sign  =x.slice(3,2)
+        positive   =x.slice(5,1)
+        of_ten     =x.slice(6,1)
+        num        =x.slice(7,8)
+        
+        val=value(num,of_ten,positive)
+        
+        result[data_number]=[val,data_hash(unit_sign)]
+        result
+      rescue
+        return nil
+      end
+    else
+      nil
+    end
+  end
+  
+  def parse(code)
+    result={}
+    #begin
+    data=code.split("\r")
+    data.each{|str| x=to_f(str);result[x.keys.first]=x[x.keys.first]}
+      #if data[0].size>1
+      #  x=to_f(data.last+data[0])
+      #  result << x if x
+      #end
+    #rescue
+    #  return nil
+    #end
+    return result
+  end
+  
+  def list(code) 
+    parse(code)
+  end
+  
+  def samples
+    ["\00241040100000643\r\00242010100000310\r\00243190000000612\r",
+    "\00242010100000311\r\00243190000000612\r\00241040100000643\r",
+    "\00243190000000612\r\00241040100000643\r\00242010100000312\r",
+    "\r\00243190000000590\r\00241040100000639\r\00242010100000309",
+    
+    "\00243190000000612\r",
+    "not_data",
+    nil]
+  end
+end
+end
+
+if $0==__FILE__
+require "rubygems"
+require "serialport"
+#require "agri-controller"
+require "yaml"
+include AgriController
+  if RUBY_PLATFORM =~ (/mswin(?!ce)|mingw|cygwin|bccwin/)
+    port="COM2"
+  else
+    port="/dev/ttyUSB0"
+  end
+  AgriController::dt{
+    1.times do
+      res=MCH383::read(port)
+      MCH383::parse(res)
+      print MCH383::parse(res).to_yaml
+    end
+  }
+end
+

data/lib/agri-controller/device/tr.rb

@@ -0,0 +1,230 @@
+#coding:ASCII-8BIT
+module AgriController
+module TR
+module_function
+  def parse(str)
+    list(str)
+  end
+  ##
+  # *check_sum("\0013\006\f\000\027\000\000\000\000\000\000\000\203\004\372\005")
+  #          # =>"\343\001"
+  def check_sum(str)
+    x=0
+    begin
+      str.each_byte{|i| x+=i}
+      #p x
+      to_byte(x)
+    rescue
+      nil
+    end
+  end
+  ##
+  # *check_sum?("\0013\006\f\000\027\000\000\000\000\000\000\000\203\004\372\005\343\001"
+  #            # =>true
+  # *check_sum?("\0013\006\f\000\027\000\000\000\000\000\000\000\203\004\372\005",
+  #             "\343\001") # =>true
+  def check_sum?(str1,sum=nil)
+    begin
+      if sum==nil
+        x1=str1.chop.chop
+        x2=str1.slice(str1.size-2,2)
+      else
+        x1=str1
+        x2=sum
+      end
+      #p check_sum(x1)
+      #p x2
+      return check_sum(x1)==x2
+    rescue
+      return nil
+    end
+  end
+  
+  def toi(num0,num1)
+    num1*256+num0
+  end
+  
+  def to_byte(i)
+  #  p i
+    x2=(i/256).chr
+    x1=(i%256).chr
+    x1+x2
+  end
+  
+  def to_n(num0,num1)
+    begin
+      x1=num0
+      x2=num1
+      unless x2==238#error
+        if x2 > 15 
+          power=x2.to_s(16).slice(0,1).to_i(16)
+          num=x2%16*256+x1
+        else
+          power=0
+          num=x2*256+x1
+        end
+        res=num*2**power
+      else
+        res=nil
+      end
+      res
+    rescue
+      return nil
+    end
+  end
+  
+  ##
+  #
+  #a=TR::list(TR::sample)
+  # =>{:lx=>91.28,
+  #    :uv=>0.0,
+  #    :lx_sigma=>36.03,
+  #    :uv_sigma=>0.0,
+  #    :temperature=>11.7,
+  #    :humidity=>49.0
+  #     }
+  def sample
+    "\x013\x06\f\x00\xEA(\x00\x00\x13\x0E\x00\x00]\x04\xD2\x05\xB1\x02"
+  end
+  
+  ##
+  #"\x1\x33\x0\x0\x0"+"\x34\x0"
+  # =>"\x013\x06\f\x00\xEA(\x00\x00\x13\x0E\x00\x00]\x04\xD2\x05\xB1\x02"
+  #
+  def send_sample
+    "\x1\x33\x0\x0"+"\x0\x34\x0"
+  end
+  ##
+  # ==example_data
+  #  *a="\0013\006\f\000\027\002\027\002\054\003\072\021\203\004\372\005x\002"
+  #  *list(a) # =>{:uv=>0.0, :lx_sigma=>0.0, :uv_sigma=>0.0,
+  #               :temperature=>15.5, :lx=>0.23, :humidity=>53.0}
+  #  *list("wrong_data")# =>nil
+  def list(str)
+    a=str
+    res={}
+    if check_sum?(a)
+      a.size==(a[3].ord+a[4].ord*256+7)
+      
+      #lx
+      x1=a[5].ord
+      x2=a[6].ord
+        #puts "lx"
+      lx_=to_n(x1,x2)/100.0
+      res[:lx]=lx_
+      
+      #uv
+      x1=a[7].ord
+      x2=a[8].ord
+        #puts "uv"
+      uv_=to_n(x1,x2)/1000.0
+      res[:uv]=uv_
+      
+      #lx_h
+      x1=a[9].ord
+      x2=a[10].ord
+        #puts "lx_accumulated"
+      res[:lx_sigma]=to_n(x1,x2)/100.0
+      
+      #uv_h
+      x1=a[11].ord
+      x2=a[12].ord
+        #puts "uv_accumulated"
+      res[:uv_sigma]=to_n(x1,x2)/1000.0
+      
+      #'C tempereture
+      x=a[13].ord+a[14].ord*256-1000
+      x1=x/10.0
+        #puts "'c"
+      res[:temperature]=x1
+      
+      #% humidity
+      x=a[15].ord+a[16].ord*256-1000
+      x1=x/10.0
+        #puts "humidity"
+      res[:humidity]=x1
+    else
+      res=nil
+    end
+    res
+  end
+  
+  ##This require "serialport"
+  # TR::serial(port) # =>String 
+  # Communicate with ESPEC THERMORECORDER(RS-13L:UV,lx,thermo,humidty LOGGER)or T&D TR
+  #   **CAUSION** check port permission on Linux.(ls -l <port device>)
+  # *USAGE
+  # require "rubygems"
+  #  require "serialport"
+  #  require "timeout"
+  #  require "agri-controller"
+  #  include AgriController
+  # x=TR::read("/dev/ttyUSB0") 
+  #     # =>"\0013\006\f\000\f\001\000\000\212(\000\000z\004\232\006#\002"
+  #
+  # TR::list(x)
+  #     # =>{:uv         =>0.0,
+  #          :lx_sigma   =>87.44,
+  #          :uv_sigma   =>0.0,
+  #          :temperature=>14.6,
+  #          :lx         =>2.68,
+  #          :humidity   =>69.0}
+  def read(port="/dev/ttyUSB0")
+    require "rubygems"
+    require "serialport"
+    require "timeout"
+    #open
+    s=SerialPort.new(port,19200)
+    
+    #boot up command
+    s.write("\x0")
+    
+    sleep 0.11
+    #commnicate command
+    s.write("\x1\x33\x0\x0"+"\x0\x34\x0")
+     
+    #receive
+    r=""
+    begin
+      timeout(2) do
+        while c=s.read(1)
+          r += c
+          break if r.length >= 19
+        end
+      end
+    rescue Timeout::Error
+      r=""
+    ensure
+      s.close #close
+    end
+    
+    return r
+  end
+end
+end
+if $0==__FILE__
+
+include AgriController
+#include TR
+  a=ARGV[0] || ""
+p a.force_encoding("ASCII-8BIT") if RUBY_VERSION > "1.9"
+#example_data
+#a="\0013\006\f\000\027\002\027\002\054\003\072\021\203\004\372\005x\002"
+#p check_sum(a.chop.chop)
+#p check_sum?(a)
+#p check_sum?(a.chop.chop,"\343\001")
+#puts
+p x=TR::list(a)
+if x
+  p x[:temperature]
+  p x[:humidity]
+  p x[:lx]
+  p x[:uv]
+end
+#p TR::sample.encoding if RUBY_VERSION > "1.9"
+#p TR::list(TR::sample)
+p y=TR::read("/dev/ttyUSB1")
+p TR::list(y)
+#p TR::list("foo"+a)
+#p TR::list("")
+end