agri-controller 0.0.0 → 0.0.8

data/lib/agri-controller/gruff/base.rb

@@ -0,0 +1,88 @@
+#fixed by Takayasu_Hayashi for cristal background
+
+#require 'rubygems'
+#require 'RMagick'
+
+#require File.dirname(__FILE__) + '/deprecated'
+
+##
+# = Gruff. Graphs.
+#
+# Author:: Geoffrey Grosenbach boss@topfunky.com
+#
+# Originally Created:: October 23, 2005
+#
+# Extra thanks to Tim Hunter for writing RMagick, and also contributions by
+# Jarkko Laine, Mike Perham, Andreas Schwarz, Alun Eyre, Guillaume Theoret,
+# David Stokar, Paul Rogers, Dave Woodward, Frank Oxener, Kevin Clark, Cies
+# Breijs, Richard Cowin, and a cast of thousands.
+#
+# See Gruff::Base#theme= for setting themes.
+
+module Gruff
+
+
+  class Base
+
+    # You can set a theme manually. Assign a hash to this method before you
+    # send your data.
+    #
+    #  graph.theme = {
+    #    :colors => %w(orange purple green white red),
+    #    :marker_color => 'blue',
+    #    :background_colors => %w(black grey)
+    #  }
+    #
+    # :background_image => 'squirrel.png' is also possible.
+    #
+    # (Or hopefully something better looking than that.)
+    #
+
+    # A color scheme plucked from the colors on the popular usability blog.
+    def theme_37signals
+      # Colors
+      @green = '#339933'
+      @purple = '#cc99cc'
+      @blue = '#336699'
+      @yellow = '#FFF804'
+      @red = '#ff0000'
+      @orange = '#cf5910'
+      @black = 'black'
+      @colors = [@black, @blue, @green, @red, @purple, @orange, '#202020']
+
+      self.theme = {
+        :colors => @colors,
+        :marker_color => 'black',
+        :font_color => 'black',
+        :background_colors => ['white', 'white']
+      }
+=begin
+      # Colors
+      @dark_pink = '#FF3333'
+      @dark_blue = '#3a5b87'
+      @some_blue= '#3333ee'
+      @peach = '#daaea9'
+      '#a9a9da' # dk purple
+      @green = '#009933'
+      @purple = '#cc99cc'
+      @light_purple = '#a9a9da'
+      @light_blue='#333399'
+      @blue = '#0000ff'
+      @yellow = '#FFF804'
+      @red = '#ff0000'
+      @orange = '#cf5910'
+      @black = 'black'
+      
+      @colors = [@black, @some_blue,@green, @red,@dark_pink ,@blue, @orange,@dark_blue ]
+
+      self.theme = {
+        :colors => @colors,
+        :marker_color => 'black',
+        :font_color => 'black',
+        :background_colors => ['white', 'white']
+      }
+=end
+    end
+  end # Gruff::Base
+end # Gruff
+

data/lib/agri-controller/gruff/chdata.rb

@@ -0,0 +1,64 @@
+require "date"
+#require "pp"
+
+module AgriController
+module_function
+#配列をcsvにする
+#ary2dat([["2012-12-03 07:02:00", 9.0, 27.9, 436.0, "9.0", 0.0, 0.0]]) # =>
+#          "2012-12-03 07:02:00,9.0,27.9,436.0,9.0,0.0,0.0\n"
+def ary2dat(res)
+  str=""
+  res.each do |ary|
+    ary.each do |dat|
+      str=str+dat.to_s+","
+    end
+    str=str.chop+"\n"
+  end
+  str
+end
+
+#csv文字列を第２リストによって整える
+#  ("time"であれば、時間としてパースし、Rなどで使いやすい時間文字列に変換)
+#  (同時表示しやすいように､変換｡ falseなどは0になる)
+#chdat("2012/12/03 07:02:00,9.0,83.7,436,9.0,83.7,436\n",["time",1.0,1.0/3,1.0,false])
+#[["2012-12-03 07:02:00", 9.0, 27.9, 436.0, "9.0", 0.0, 0.0]]
+def chdat(str,list)
+  str
+
+  res=[]
+  str.each_line do |line|
+    dat=line.chomp.split(",")
+    i=0
+    kekka=[]
+    dat.each do |datum|
+      list[i]
+      datum
+      if (list[i]!=false) and (list[i]!="time")
+        list[i].to_f
+        datum.to_f
+        kekka << list[i].to_f*datum.to_f
+      elsif (list[i]=="time")
+        kekka << DateTime.parse(datum).strftime("%Y-%m-%d %H:%M:%S")
+      else
+        kekka << datum
+      end
+      i+=1
+      
+    end
+    res << kekka
+  end
+  res
+end  
+  
+end
+
+if $0==__FILE__
+include AgriController
+  list=["time",1.0,1.0/3,1.0,false]
+  file= ARGV[0] || "2012/12/03 07:02:00,9.0,83.7,436,9.0,83.7,436\n"
+  ls=eval(ARGV[1].to_s) || list
+  
+  p str=chdat(file,list)
+  print ary2dat(str)
+  
+end

data/lib/agri-controller/gruff/join_csv.rb

@@ -0,0 +1,62 @@
+require "csv"
+require "time"
+
+module AgriController
+
+def delete_comment(ary,comment_count)
+  comment_count.times{ary.shift}
+  
+  ary
+end
+
+def to_h(ary,time_line=0)
+  hash={}
+  ary.each do |list|
+    t=list.delete_at(time_line=0)
+    t=Time.parse(t)
+    hash[t]=list
+  end
+  hash
+end
+
+module_function
+def join_csv(f1,f2,comment_f1=0,comment_f2=0)
+  a=CSV.read(f1)
+  a=delete_comment(a,comment_f1)
+  size=a[0].size
+  hash1=to_h(a,0)
+  #hash1
+  
+  b=CSV.read(f2)
+  b=delete_comment(b,comment_f1)
+  hash2=to_h(b,0)
+
+  new_hash={}
+  hash2.each do |i,j|
+    if hash1.has_key?(i)
+    else
+      hash1[i]=Array.new(size-1){"false"}
+    end
+    new_hash[i]=hash1[i].concat(j)
+  end
+  ary=new_hash.sort_by{|i,j| i}
+  ary.map{|i| i.flatten}
+end
+
+end
+if $0==__FILE__
+  f1=ARGV[0] || "../mch383/thermo_data.csv"
+  f2=ARGV[1] || "../mch383_2/thermo_data.csv"
+  to_file=ARGV[2]
+  comment_f1=1
+  comment_f2=1
+  list=join_csv(f1,f2,comment_f1,comment_f2)
+  if to_file
+    CSV.open(to_file,"w") do |csv|    
+      list.each do |i|
+       i[0]=i[0].strftime("%Y/%m/%d %H:%M:%S")
+        csv << i
+    end
+    end
+  end
+end

data/lib/agri-controller/gruff/rename_csv.rb

@@ -0,0 +1,50 @@
+require "fileutils"
+module AgriController
+module_function
+def rename_csv(dist,dist_dir,deli=".csv.")
+    if ARGV[0]=="-h"
+       raise 
+    end
+    unless File.exist?(dist_dir)
+      Dir.mkdir(dist_dir)
+    end
+
+    list=Dir.glob(dist+"/*#{deli}*")
+    #p list
+    list.each do |file|
+      basename=File.basename(file)
+      dir=File.dirname(file)
+      name=basename.split(".")
+      if name.last.to_i!=0
+        new_name=name[0]+"."+name[2]+"."+name[1]
+        #p file
+        new_full_name=dist_dir+"/"+new_name
+        FileUtils.cp(file,new_full_name)
+      end
+    end
+end
+end
+
+if $0==__FILE__
+include AgriController
+#FileUtils.cp("from","to")
+#FileUtils.cp(["list",],"dir")
+#Dir.mkdir("dir")
+dist=ARGV[0]
+dist_dir=ARGV[1]
+  begin
+    rename_csv(dist,dist_dir)
+  rescue
+    puts 'Usage::
+    
+    sample $> ruby rename_csv.rb "." "csv_dir"
+  
+    ruby rename_csv.rb "from_dir" "to_dir"
+  
+      Rename and copy
+        "from_dir/*.csv.{logger_day_number}" to
+          "to_dir/*.{logger_day_number}.csv" 
+  
+      Ruby Dir::mkdir("to_dir") if not exist.'
+  end
+end

data/lib/agri-controller/{thermo_data_each_day.rb → gruff/thermo_data_each_day.rb}

@@ -1,67 +1,67 @@
-require "time"
-module AgriController
-  def thermo_data_each_day(file)
-    if File.exist?(file)
-      dat=File.read(file)
-    else
-      dat=file
-    end
-    x=[]
-    y=[]
-    line=0
-    file_num=0
-    last_day_data=0
-    change=nil
-    date=Time.now
-    begin 
-      dat.each_line do |str|
-        line+=1
-        #split day data
-        #p str
-        if str!=""
-          data=str.chomp.split(",")
-          date=Time.parse(data[0])
-          last_day_data=date.day
-          change=date if change==nil
-        end
-        #not change
-        if change.day==last_day_data
-        #day change
-        elsif change.day!=last_day_data
-          y[file_num] = change
-          change=date
-          file_num+=1
-        else
-          p "??"
-        end
-          x[file_num]="" if x[file_num]==nil
-          x[file_num]+=str
-        
-        #normal end
-        
-      end
-      y[file_num]=date
-    end
-    #return split array
-    ret=[x,y]
-    return ret
-  end
-  def save_each_day(file="_thermo_data.csv")
-    p result=thermo_data_each_day(file)
-    x=0
-    result[1].each do |date|
-      i=date.year.to_s
-      j=date.month.to_s
-      k=date.day.to_s
-      #save_each_day
-      filename="./thermo_data/"+i+"-"+j+"-"+k+"_thermo.csv"
-      open(filename,"w"){|io| io.print result[0][x]}
-      
-      x+=1
-    end
-  end
-end
-
-if $0==__FILE__
-  save_each_day(file="_thermo_data.csv")
-end
+require "time"
+module AgriController
+  def thermo_data_each_day(file)
+    if File.exist?(file)
+      dat=File.read(file)
+    else
+      dat=file
+    end
+    x=[]
+    y=[]
+    line=0
+    file_num=0
+    last_day_data=0
+    change=nil
+    date=Time.now
+    begin 
+      dat.each_line do |str|
+        line+=1
+        #split day data
+        #p str
+        if str!=""
+          data=str.chomp.split(",")
+          date=Time.parse(data[0])
+          last_day_data=date.day
+          change=date if change==nil
+        end
+        #not change
+        if change.day==last_day_data
+        #day change
+        elsif change.day!=last_day_data
+          y[file_num] = change
+          change=date
+          file_num+=1
+        else
+          p "??"
+        end
+          x[file_num]="" if x[file_num]==nil
+          x[file_num]+=str
+        
+        #normal end
+        
+      end
+      y[file_num]=date
+    end
+    #return split array
+    ret=[x,y]
+    return ret
+  end
+  def save_each_day(file="_thermo_data.csv")
+    p result=thermo_data_each_day(file)
+    x=0
+    result[1].each do |date|
+      i=date.year.to_s
+      j=date.month.to_s
+      k=date.day.to_s
+      #save_each_day
+      filename="./thermo_data/"+i+"-"+j+"-"+k+"_thermo.csv"
+      open(filename,"w"){|io| io.print result[0][x]}
+      
+      x+=1
+    end
+  end
+end
+
+if $0==__FILE__
+  save_each_day(file="_thermo_data.csv")
+end

data/lib/agri-controller/{thermo_gruff.rb → gruff/thermo_gruff.rb}

@@ -1,109 +1,112 @@
-require 'rubygems'
-require 'gruff'
-require "date"
-
-module AgriController
-#thrmo datas to jpg graph
-def thermo_gruff(output_filename="thermo_data.jpg",input_csv_data="thermo_data.csv",thermo_num=3,view="500x420")
-    #data ini
-    data=File.read(input_csv_data)
-    thermo_data_hash={}
-
-    result=[]
-    #arrays generate
-    (2*thermo_num).times do
-      result << []
-    end
-    result
-    title_day=""
-    line=0
-    label={}
-    hour=0
-    day=0
-    data.each_line do |str|
-      line+=1#line+=
-      dat=str.chomp.split(",")
-      #p dat[0]
-      begin
-        time=DateTime.parse(dat[0])
-      rescue
-        line=line-1
-        next
-      end
-      #title_day
-      if line==1
-        title_day=time.year.to_s+"/"+time.month.to_s+"/"+time.day.to_s
-      end
-      #line if day change
-      if time.day!=day #(day change)
-        day=time.day
-        label[line]=":"#time.month.to_s+"/"+day.to_s
-      elsif time.hour!=hour
-        hour=time.hour
-        label[line]="|"+hour.to_s
-        if time.hour==12
-          label[line]="|12"
-        end
-      else
-      end
-      
-      #set thermo datas
-      thermo_num.times do |n|
-        begin
-          x=dat[n*2+1].to_f
-          if x>-100
-          result[n*2] << x
-          else
-            result[n*2] << nil
-          end
-        rescue
-          result[n*2] << nil
-        end
-        #Judge nil data
-        if dat[n*2+2]!="false"
-          result[n*2+1] << dat[n*2+2].to_f/3
-        else
-          result[n*2+1] << nil
-        end
-      end
-    end
-    #p result
-    #p label
-        #gruff main
-        g = Gruff::Line.new(view)
-        g.title="Thermo data since "+title_day
-        #g.title_font_size =24
-        g.theme_37signals
-        g.maximum_value = 35
-        g.minimum_value = 5
-        g.y_axis_increment = 1
-        #g.baseline_value=9
-        #g.increment=5
-        #dataset
-        datasets=[]
-        thermo_num.times do |i|
-          x=i+1
-          datasets[i*2  ]=[("'C:"+x.to_s).intern,result[i*2]]
-          datasets[i*2+1]=[("%/3:"+x.to_s).intern,result[i*2+1]]
-        end
-        #% humidity data delete
-        [7,5,3].each{|i| datasets.delete_at(i)}
-        
-        #dataset
-        datasets.each do |data|
-          g.data(*data)
-        end
-        g.labels =label
-        # Default theme
-        g.write(output_filename)
-  end
-end
-
-if $0==__FILE__
-  p Dir.pwd
-    input_csv_data="./thermo_data/2009-11-21_thermo.csv"
-      if File.readable?(input_csv_data)
-        thermo_gruff(output_filename="../htdocs/thermo/2009-11-21.jpg",input_csv_data,thermo_num=2,"480x420")
-        p Time.now
-      end
-end
+require 'rubygems'
+require 'gruff'
+require "date"
+require "time"
+module AgriController
+#thrmo datas to jpg graph
+def thermo_gruff(output_filename="thermo_data.jpg",input_csv_data="thermo_data.csv",thermo_num=3,view="500x420")
+    #data ini
+    data=File.read(input_csv_data)
+    thermo_data_hash={}
+
+    result=[]
+    #arrays generate
+    (2*thermo_num).times do
+      result << []
+    end
+    result
+    title_day=""
+    line=0
+    label={}
+    hour=0
+    day=0
+    data.each_line do |str|
+      line+=1#line+=
+      dat=str.chomp.split(",")
+      #p dat[0]
+      begin
+        time=Time.iso8601(dat[0]).localtime#DateTime
+        #dat[0].inspect+","+time.to_s
+      rescue
+        line=line-1
+        next
+      end
+      #title_day
+      if line==1
+        title_day=time.year.to_s+"/"+time.month.to_s+"/"+time.day.to_s
+      end
+      #line if day change
+      time.hour
+      if time.day!=day #(day change)
+        day=time.day
+        label[line]=":"#time.month.to_s+"/"+day.to_s
+      elsif time.hour!=hour
+           hour=time.hour
+           label[line]="|"+hour.to_s
+        if time.hour==12
+          label[line]="|12"
+        end
+      else
+      end
+      
+      #set thermo datas
+      thermo_num.times do |n|
+        begin
+          x=dat[n*2+1].to_f
+          if x>-100
+          result[n*2] << x
+          else
+            result[n*2] << nil
+          end
+        rescue
+          result[n*2] << nil
+        end
+        #Judge nil data
+        if dat[n*2+2]!="false"
+          result[n*2+1] << dat[n*2+2].to_f/3
+        else
+          result[n*2+1] << nil
+        end
+      end
+    end
+    #p result
+    #p label
+        #gruff main
+        g = Gruff::Line.new(view)
+        g.title="Thermo data since "+title_day
+        #g.title_font_size =24
+        g.theme_37signals
+        g.maximum_value = 35
+        g.minimum_value = 5
+        g.y_axis_increment = 1
+        #g.baseline_value=9
+        #g.increment=5
+        #dataset
+        datasets=[]
+        thermo_num.times do |i|
+          x=i+1
+          datasets[i*2  ]=[("'C:"+x.to_s).intern,result[i*2]]
+          datasets[i*2+1]=[("%/3:"+x.to_s).intern,result[i*2+1]]
+        end
+        #% humidity data delete
+        [9,7,5,3].each{|i| datasets.delete_at(i)}
+        
+        #dataset
+        datasets.each do |data|
+          g.data(*data)
+        end
+        g.labels =label
+        # Default theme
+        #p g
+        g.write(output_filename)
+  end
+end
+
+if $0==__FILE__
+  p Dir.pwd
+    input_csv_data="./thermo_data/2009-11-21_thermo.csv"
+      if File.readable?(input_csv_data)
+        thermo_gruff(output_filename="../htdocs/thermo/2009-11-21.jpg",input_csv_data,thermo_num=2,"480x420")
+        p Time.now
+      end
+end