insulin 0.1.2 → 0.1.3

data/.gitignore

@@ -15,3 +15,4 @@ test/tmp
 test/version_tmp
 tmp
 *swp
+*swo

data/Gemfile

@@ -2,3 +2,5 @@ source 'https://rubygems.org'
 
 # Specify your gem's dependencies in insulin.gemspec
 gemspec
+
+gem "prawn", :git => "git://github.com/prawnpdf/prawn.git"

data/Gemfile.lock

@@ -1,15 +1,26 @@
+GIT
+  remote: git://github.com/prawnpdf/prawn.git
+  revision: baa6e80b1a11efac91a0160dfab257744bbf9bde
+  specs:
+    prawn (1.0.0.rc1)
+      pdf-reader (>= 0.9.0)
+      ttfunk (~> 1.0.3)
+
 PATH
   remote: .
   specs:
-    insulin (0.1.1)
+    insulin (0.1.2)
       bson_ext
       ffi
       mongo
+      pony
+      prawn
       thor
 
 GEM
   remote: https://rubygems.org/
   specs:
+    Ascii85 (1.0.1)
     aruba (0.4.11)
       childprocess (>= 0.2.3)
       cucumber (>= 1.1.1)
@@ -31,9 +42,21 @@ GEM
     gem-release (0.3.1)
     gherkin (2.11.1)
       json (>= 1.4.6)
+    i18n (0.6.0)
     json (1.7.3)
+    mail (2.4.4)
+      i18n (>= 0.4.0)
+      mime-types (~> 1.16)
+      treetop (~> 1.4.8)
+    mime-types (1.19)
     mongo (1.6.4)
       bson (~> 1.6.4)
+    pdf-reader (1.1.1)
+      Ascii85 (~> 1.0.0)
+      ruby-rc4
+    polyglot (0.3.3)
+    pony (1.4)
+      mail (> 2.0)
     rspec (2.10.0)
       rspec-core (~> 2.10.0)
       rspec-expectations (~> 2.10.0)
@@ -42,7 +65,12 @@ GEM
     rspec-expectations (2.10.0)
       diff-lcs (~> 1.1.3)
     rspec-mocks (2.10.1)
-    thor (0.15.3)
+    ruby-rc4 (0.1.5)
+    thor (0.15.4)
+    treetop (1.4.10)
+      polyglot
+      polyglot (>= 0.3.1)
+    ttfunk (1.0.3)
 
 PLATFORMS
   ruby
@@ -52,4 +80,5 @@ DEPENDENCIES
   cucumber
   gem-release
   insulin!
+  prawn!
   rspec (~> 2.6)

data/README.md

@@ -51,6 +51,12 @@ Example:
 
         average glucose: 5.46 mmol/L
 
+A weekly PDF summary can be generated and mailed out
+
+    insulin pdf you@yourdmomain.com
+
+The PDF class is currently a bit hacky, I'm still learning the excellent (prawn gem)[https://github.com/prawnpdf/prawn]
+
 You can also run the tests, if you're into that sort of thing:
 
     bundle exec rspec

data/TODO.md

@@ -9,8 +9,8 @@
 * Fully detailed output showing latest HbA1c, BP, etc
 * Work out Google Drive API
 * Write some proper rubydocs
-* Should not include HbA1c or BP in normal output. Also, these things need units. And BP is not really a number
 * Number of tests &c per time period
 * Somehow include cholesterol
 * Test the insulin executable
 * "Latest weight, change since last, overall trend" &c
+* Colours for low/good/high BG

data/bin/insulin

@@ -1,5 +1,5 @@
 #!/usr/bin/env ruby
-# needs to handle passing config. ~/.insulin or somrthing
+
 require 'insulin'
 require 'thor'
 
@@ -7,13 +7,15 @@ module Insulin
   class I < Thor
     @@mongo = Insulin::MongoHandle.new ({"database" => "insulin"})
 
-    desc "ingest FILE", "ingest OnTrack CSV export FILE"
+    desc "ingest FILE",
+      "ingest OnTrack CSV export FILE"
     def ingest file
       csv = Insulin::OnTrack::CsvFile.new file
       csv.save_events @@mongo
     end
 
-    desc "day DATE", "show stats for day DATE (default is today)"
+    desc "day DATE",
+      "show stats for day DATE (default is today)"
     def day date = nil
       if not date
         require 'time'
@@ -27,17 +29,19 @@ module Insulin
       end
     end
 
-    desc "week DATE", "show stats for week commencing DATE (defaults to previous 7 days)"
+    desc "week DATE",
+      "show stats for week commencing DATE (defaults to previous 7 days)"
     def week date = nil
       if not date
         require 'time'
-        date = (Time.new - (6 * 86400)).strftime "%F"
+        date = (Time.new - (7 * 86400)).strftime "%F"
       end
       w = Insulin::Week.new date, @@mongo
       puts w.to_s
     end
 
-    desc "month DATE", "show stats for 30-day period commencing DATE (defaults to previous 30 days)"
+    desc "month DATE",
+      "show stats for 30-day period commencing DATE (defaults to previous 30 days)"
     def month date = nil
       if not date
         require 'time'
@@ -46,6 +50,27 @@ module Insulin
       m = Insulin::Month.new date, @@mongo
       puts m.to_s
     end
+
+    desc "pdf RECIPIENT",
+      "generate a PDF for the last week and mail to RECIPIENT"
+    def pdf recipient = nil
+      date = (Time.new - (7 * 86400)).strftime "%F"
+      outfile = "/vagrant_data/insulin.pdf"
+      p = Insulin::Pdf.new Insulin::Week.new(date, @@mongo), outfile
+      p.render
+
+#      require 'pony'
+#      Pony.mail(
+#        :to => recipient,
+#        :from => "insulin@cruft.co",
+#        :subject => "insulin report",
+#        :body => "Attached",
+#        :attachments => {
+#          "insulin.pdf" => File.read(outfile)
+#        },
+#        :charset => 'utf-8'
+#      )
+    end
   end
 end
 

data/conf/insulin_dev.yaml

@@ -2,7 +2,10 @@ mongo:
   host:      localhost
   database:  insulin_dev
 
-note_keys:
-  F:         food
-  B:         booze
-  N:         note
+#note_keys:
+#  F:         food
+#  B:         booze
+#  N:         note
+
+outputs:
+  pdf_file:  /vagrant_data/insulin.pdf

data/insulin.gemspec

@@ -21,6 +21,8 @@ Gem::Specification.new do |gem|
   gem.add_dependency "mongo"
   gem.add_dependency "bson_ext"
   gem.add_dependency "ffi"
+  gem.add_dependency "prawn"
+  gem.add_dependency "pony"
 
   gem.add_development_dependency "rspec", "~> 2.6"
   gem.add_development_dependency "cucumber"

data/lib/insulin.rb

@@ -6,6 +6,7 @@ require "insulin/day"
 require "insulin/n_day_period"
 require "insulin/week"
 require "insulin/month"
+require "insulin/pdf"
 require "insulin/on_track/date"
 require "insulin/on_track/note"
 require "insulin/on_track/note_set"

data/lib/insulin/day.rb

@@ -2,7 +2,7 @@ require 'insulin'
 
 module Insulin
   class Day < Hash
-    attr_reader :glucose_units
+    attr_reader :glucose_units, :date, :day
 
     def initialize date, mongo
       @date = date
@@ -27,6 +27,7 @@ module Insulin
         end
 
         self["all"] << ev
+        @day = self["all"][0]["day"]
       end
     end
 
@@ -80,8 +81,9 @@ module Insulin
       s << "\n"
 
       self["all"].each do |e|
-        if ["breakfast", "lunch", "dinner", "bedtime"].include? e["tag"] and
-          ["medication", "glucose"].include? e["type"]
+#        if ["breakfast", "lunch", "dinner", "bedtime"].include? e["tag"] and
+#          ["medication", "glucose"].include? e["type"]
+        if e.simple?
             s << "    "
             s << e.simple
             s << "\n"

data/lib/insulin/event.rb

@@ -8,14 +8,23 @@ module Insulin
   class Event < Hash
 
     @@units = {
-      "glucose" => "mmol/L",
+      "glucose" => " mmol/L",
       "medication" => "x10^-5 L",
       "weight" => "kg",
-      "exercise" => "minutes",
-      "blood pressure" => "sp/df",
+      "exercise" => " minutes",
+      "blood pressure" => " sp/df",
       "hba1c" => "%"
     }
 
+    @@formats = {
+      "glucose" => "%0.1f",
+      "medication" => "%d",
+      "weight" => "%0.1f",
+      "exercise" => "%d",
+      "blood pressure" => "%s",
+      "hba1c" => "%0.1f",
+    }
+
 # An event before this time is considered part of the previous day. Because
 # sometimes, we stay up late
     @@cut_off_time = "04:00"
@@ -25,6 +34,15 @@ module Insulin
       self.update h
 
       self["units"] = @@units[self["type"]]
+      self["formatted_value_with_units"] = "#{@@formats[self['type']]}%s" % [
+        self["value"],
+        self["units"]
+      ]
+    end
+
+    def simple?
+      ["breakfast", "lunch", "dinner", "bedtime"].include? self["tag"] and
+          ["medication", "glucose"].include? self["type"]
     end
 
     # Save the event to Mongo via mongo_handle
@@ -61,17 +79,12 @@ module Insulin
     end
 
     def simple
-      value_format = "%6.1f"
-      if self["value"].is_a? String
-        value_format = "%6s"
-      end
-      s = "%s | %-15s | %-14s | %-13s | #{value_format} %s" % [
+      s = "%s | %-15s | %-14s | %-13s | %s" % [
         self["short_time"],
         self["tag"],
         self["type"],
         self["subtype"],
-        self["value"],
-        self["units"]
+        self["formatted_value_with_units"]
       ]
 
       s

data/lib/insulin/n_day_period.rb

@@ -3,6 +3,8 @@ require 'time'
 
 module Insulin
   class NDayPeriod < Array
+    attr_reader :descriptor, :start_date, :hba1c
+
     def initialize hash
       @start_date = hash["start_date"]
       @days = hash["days"]

data/lib/insulin/pdf.rb

@@ -0,0 +1,141 @@
+require 'insulin'
+require 'prawn'
+
+module Insulin
+  class Pdf
+    def initialize period, outfile
+      @period = period
+      @outfile = outfile
+
+      @pdf = Prawn::Document.new
+      @pdf.font "Courier"
+      @pdf.font_size 12
+
+      @pdf.formatted_text [{
+        :text => "insulin",
+        :styles => [
+          :bold
+        ],
+        :color => "AA0000",
+        :size => 16
+      },
+      {
+        :text => " report for %s beginning %s" % [
+          @period.descriptor,
+          @period.start_date
+        ]
+      }]
+
+      s = " report for %s beginning %s" % [
+        @period.descriptor,
+        @period.start_date
+      ]
+      @pdf.text "\n"
+      @pdf.text "\n"
+ 
+      @pdf.font_size 8
+
+      @pdf.table [
+        [
+          "latest hba1c (from %s)" % [ 
+            @period.hba1c["date"],
+          ],
+          "%0.1f%s" % [
+            @period.hba1c["value"],
+            @period.hba1c["units"]
+          ]
+        ],
+        [
+          "average blood glucose for %s commencing %s" % [
+            @period.descriptor,
+            @period.start_date
+          ],
+          "%0.2f%s" % [
+            @period.average_glucose,
+            @period[0].glucose_units
+          ]
+        ]
+      ],
+      :position => :center,
+      :column_widths => [
+        300,
+        200
+      ],
+      :row_colors =>
+      [
+        "F0F0F0",
+        "D0D0D0"
+      ],
+      :cell_style => {
+        :border_color => "333333",
+        :border_width => 1
+      }
+      @pdf.text "\n"
+      @pdf.text "\n"
+      @pdf.text "\n"
+
+      @period.each do |d|
+        @grid = []
+        @grid << [{
+          :content => "%s (%s)" % [
+            d.date,
+            d.day
+          ],
+          :colspan => 5
+        }]
+
+        d["all"].each do |e|
+          if e.simple?
+            @grid << [
+              e["short_time"],
+              e["tag"],
+              e["type"],
+              e["subtype"],
+              e["formatted_value_with_units"]
+            ]
+          end
+        end
+        @pdf.table @grid,
+          :position => :center,
+          :column_widths => [
+            100,
+            100,
+            100,
+            100,
+            100
+          ],
+          :row_colors =>
+          [
+            "F0F0F0",
+            "D0D0D0"
+          ],
+          :cell_style => {
+            :border_color => "333333",
+            :border_width => 1
+          },
+          :header => :true
+        @pdf.text "\n"
+        @pdf.text "\n"
+        @pdf.text "\n"
+      end
+
+      @pdf.stroke_horizontal_rule
+      @pdf.text "\n"
+      @pdf.text "\n"
+      @pdf.text "\n"
+      @pdf.formatted_text [{
+        :text => "insulin",
+        :color => "007700",
+        :link => "http://pikesley.github.com/insulin/"
+      
+      },
+      {
+        :text => " written and maintained by Sam Pikesley"
+      }]
+    end
+
+    def render
+      @pdf.render_file @outfile
+    end
+  end
+end

data/lib/insulin/version.rb

@@ -1,5 +1,5 @@
 module Insulin
 
   # Current version
-  VERSION = "0.1.2"
+  VERSION = "0.1.3"
 end

data/spec/day_spec.rb

@@ -29,9 +29,9 @@ describe Insulin::Day do
   end
 
   it "should display correctly" do
-    d.to_s.should include "19:07 | dinner          | medication     | humalog       |    6.0 x10^-5 L"
+    d.to_s.should include "19:07 | dinner          | medication     | humalog       | 6x10^-5 L"
     d.to_s.should include "15:46 | after lunch     | blood pressure |               | 118/75 sp/df"
-    d.to_s.should include "15:46 |                 | hba1c          |               |    8.8 %"
+    d.to_s.should include "15:46 |                 | hba1c          |               | 8.8%"
   end
 
   it "minimal display should be correct" do

data/spec/pdf_spec.rb

@@ -0,0 +1,18 @@
+require 'insulin'
+require 'spec_helper.rb'
+
+describe Insulin::Pdf do
+  config = Insulin::Config.new "conf/insulin_dev.yaml"
+  o = config.get_section "outputs"
+
+  load_test_db
+
+  p = Insulin::Pdf.new Insulin::Week.new("2012-06-29", @mongo), o["pdf_file"]
+
+  it "should generate a pdf" do
+    p.render
+    File.should exist o["pdf_file"]
+  end
+
+  drop_test_db
+end

data/spec/spec_helper.rb

@@ -14,3 +14,4 @@ end
 def drop_test_db
   @mongo.drop_db
 end
+

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: insulin
 version: !ruby/object:Gem::Version
-  version: 0.1.2
+  version: 0.1.3
   prerelease: 
 platform: ruby
 authors:
@@ -75,6 +75,38 @@ dependencies:
     - - ! '>='
       - !ruby/object:Gem::Version
         version: '0'
+- !ruby/object:Gem::Dependency
+  name: prawn
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: pony
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
 - !ruby/object:Gem::Dependency
   name: rspec
   requirement: !ruby/object:Gem::Requirement
@@ -175,6 +207,7 @@ files:
 - lib/insulin/on_track/date.rb
 - lib/insulin/on_track/note.rb
 - lib/insulin/on_track/note_set.rb
+- lib/insulin/pdf.rb
 - lib/insulin/version.rb
 - lib/insulin/week.rb
 - scripts/build.sh
@@ -189,6 +222,7 @@ files:
 - spec/on_track/date_spec.rb
 - spec/on_track/note_set_spec.rb
 - spec/on_track/note_spec.rb
+- spec/pdf_spec.rb
 - spec/spec_helper.rb
 - spec/week_spec.rb
 homepage: http://pikesley.github.com/insulin/
@@ -227,5 +261,6 @@ test_files:
 - spec/on_track/date_spec.rb
 - spec/on_track/note_set_spec.rb
 - spec/on_track/note_spec.rb
+- spec/pdf_spec.rb
 - spec/spec_helper.rb
 - spec/week_spec.rb