hail.rb 2015.10.11.20.41

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 00e972e037991b6d9657fe533f509be688a0bfda
+  data.tar.gz: 852c08fa7becff0b4106fe65631228eef0c9e318
+SHA512:
+  metadata.gz: 0cacdfd50a685ac0d53566264b01cd03ba2d98da2c03320f2842510f239097352bd5a07fac1d1ced002a2d77341629cd004a4629f92ac360a9e1cc691dc4b46f
+  data.tar.gz: 6296f602edb6a4ac98c43ac1146cc34c8bef4e050b4e469c64742e7ca76c5282e7bb7b1a28e40e9560cdfdccd3f49c17efa79965c91336396bf908f70de3e681

data/bin/hail

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby
+require 'hail'
+require 'pry'
+Hail.new

data/lib/hail/account.rb

@@ -0,0 +1,35 @@
+require 'date'
+require 'base64'
+
+class Hail::Account
+  def initialize(config)
+    @config = config
+  end
+
+  def connect
+    @imap = Net::IMAP.new(@config[:address], @config[:port], @config[:tls])
+    @imap.authenticate('LOGIN', @config[:user], @config[:password])
+
+    @imap.select('INBOX')
+    list =[]
+
+
+    list = {name: [], subject: [], date: []}
+    @imap.sort(["REVERSE", "SUBJECT"], ["ALL"], "US-ASCII").each do |message_id|
+      envelope = @imap.fetch(message_id, "ENVELOPE")[0].attr["ENVELOPE"]
+      list[:name] << Hail::Mail.header_readable(envelope.from[0].name)
+      list[:subject] << Hail::Mail.header_readable(envelope.subject)
+
+      date = @imap.fetch(message_id, "INTERNALDATE")[0].attr["INTERNALDATE"]
+      date = DateTime.parse(date)
+      if Date.today === date
+        date = date.strftime("%H:%M")
+      else
+        date = date.strftime("%d/%m/%Y %H:%M")
+      end
+      list[:date] << date.to_s
+    end
+
+    Hail::GUI.instance.buffer! list
+  end
+end

data/lib/hail/accounts.rb

@@ -0,0 +1,14 @@
+class Hail::Accounts < Hash
+  def initialize()
+    super
+    file = YAML.load_file(Dir.home + "/.config/hail/account.yaml")
+    file.each do |account, account_config|
+      self[account] = Hail::Account.new(account_config)
+    end
+  end
+
+  def []=(key, value)
+    value.connect
+    super
+  end
+end

data/lib/hail/gui.rb

@@ -0,0 +1,97 @@
+require 'singleton'
+
+class Hail::GUI
+  include Singleton
+
+  def initialize()
+    @buffer = []
+    @render_buffer = 0
+    Curses.init_screen()
+  end
+
+  def win
+    @win
+  end
+
+  def render
+    @win = Curses::Window.new(0, 0, 0, 0)
+    area = {height: win.maxy, width: win.maxx, top: 0, left: 0}
+
+    win.clear
+    @buffer[@render_buffer].to_hg(area) if not @buffer[@render_buffer].nil?
+    win.refresh
+    win.getch
+  end
+
+  def buffer=(buffer)
+    @render_buffer = buffer
+  end
+
+  def buffer!(buffer)
+    @buffer.insert(-1, buffer)
+    @buffer[-1]
+  end
+end
+
+class Hash
+  def to_hg(area)
+    width = area[:width] / self.length
+    i = 0
+    self.each do |k,v|
+      header = [k.to_s, "-" * (width - 5)]
+      subarea = {height: area[:height], width: i+1*width, top: area[:top], left: area[:left]+(i*width)}
+      header.to_hg(subarea)
+
+      #List
+      subarea = {height: area[:height] - header.__hg_height, width: i+1*width, top: area[:top] + header.__hg_height, left: area[:left]+(i*width)}
+      v.to_hg(subarea)
+      i += 1
+    end
+  end
+end
+
+class Array
+  def __hg_height
+    height = 0
+    self.each do |v|
+      height += v.__hg_height
+    end
+    height
+  end
+
+  def to_hg(area)
+    top = area[:top]
+    self.each do |v|
+      subarea = {height: area[:top]-top, width: area[:width], top: top, left: area[:left]}
+      if not v.nil?
+        v.to_hg(subarea)
+        top = top + v.__hg_height
+      end
+    end
+  end
+end
+
+class String
+  def __hg_height
+    1
+  end
+
+  def __truncate(truncate_at, options = {})
+    return dup unless length > truncate_at
+
+    omission = options[:omission] || '...'
+    length_with_room_for_omission = truncate_at - omission.length
+    stop =        if options[:separator]
+        rindex(options[:separator], length_with_room_for_omission) || length_with_room_for_omission
+      else
+        length_with_room_for_omission
+      end
+
+    "#{self[0, stop]}#{omission}"
+  end
+
+  def to_hg(area)
+    Hail::GUI.instance.win.setpos(area[:top], area[:left])
+    Hail::GUI.instance.win.addstr(self.__truncate(area[:width]-3))
+  end
+end

data/lib/hail/mail.rb

@@ -0,0 +1,14 @@
+class Hail::Mail
+  def self.header_readable(str)
+    decode = ""
+    if not str.nil?
+      str.gsub(/=\?([^?]*)\?(\w)\?([^?]*)\?=/) do |match|
+        decode = ""
+        if $2 == "B"
+          decode = Base64.decode64($3)
+        end
+        decode
+      end
+    end
+  end
+end

data/lib/hail.rb

@@ -0,0 +1,18 @@
+require 'yaml'
+require 'net/imap'
+require 'curses'
+
+class Hail
+  def initialize()
+    @accounts = Accounts.new
+
+    while true
+      GUI.instance.render
+    end
+  end
+end
+
+require 'hail/accounts'
+require 'hail/account'
+require 'hail/gui'
+require 'hail/mail'

metadata

@@ -0,0 +1,50 @@
+--- !ruby/object:Gem::Specification
+name: hail.rb
+version: !ruby/object:Gem::Version
+  version: 2015.10.11.20.41
+platform: ruby
+authors:
+- Adrien Jeser
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-10-11 00:00:00.000000000 Z
+dependencies: []
+description: ''
+email: adrien@jeser.me
+executables:
+- hail
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/hail
+- lib/hail.rb
+- lib/hail/account.rb
+- lib/hail/accounts.rb
+- lib/hail/gui.rb
+- lib/hail/mail.rb
+homepage: http://rubygems.org/gems/hail-mua
+licenses:
+- GPL3
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.2.2
+signing_key: 
+specification_version: 4
+summary: hail!
+test_files: []