From fcbf63e62c627deae76c1b8cb8c0876c536ed811 Mon Sep 17 00:00:00 2001
From: Jari Vetoniemi <jari.vetoniemi@indooratlas.com>
Date: Mon, 16 Mar 2020 18:49:26 +0900
Subject: Fresh start

---
 jni/ruby/sample/from.rb | 113 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 113 insertions(+)
 create mode 100644 jni/ruby/sample/from.rb

(limited to 'jni/ruby/sample/from.rb')

diff --git a/jni/ruby/sample/from.rb b/jni/ruby/sample/from.rb
new file mode 100644
index 0000000..db1299c
--- /dev/null
+++ b/jni/ruby/sample/from.rb
@@ -0,0 +1,113 @@
+#! /usr/local/bin/ruby
+
+require "time"
+require "kconv"
+
+class String
+  def kjust(len)
+    res = ''
+    rlen = 0
+    self.each_char do |char|
+      delta = char.bytesize > 1 ? 2 : 1
+      break if rlen + delta > len
+      rlen += delta
+      res += char
+    end
+    res += ' ' * (len - rlen) if rlen < len
+    res
+  end
+end
+
+def fromout(date, from, subj)
+  return 0 if !date
+  y, m, d = Time.parse(date).to_a.reverse[4, 3] if date
+  y ||= 0; m ||= 0; d ||= 0
+  from ||= "sombody@somewhere"
+  from.delete!("\r\n")
+  from = from.kconv(Encoding.default_external).kjust(28)
+  subj ||= "(nil)"
+  subj.delete!("\r\n")
+  subj = subj.kconv(Encoding.default_external).kjust(40)
+  printf "%02d/%02d/%02d [%s] %s\n", y%100, m, d, from, subj
+  return 1
+end
+
+def get_mailfile(user)
+  file = user
+  unless user
+    file = ENV['MAIL']
+    user = ENV['USER'] || ENV['USERNAME'] || ENV['LOGNAME']
+  end
+
+  if file == nil or !File.exist?(file)
+    [ENV['SPOOLDIR'], '/usr/spool', '/var/spool', '/usr', '/var'].each do |m|
+      path = "#{m}/mail/#{user}"
+      if File.exist?(path)
+        file = path
+        break
+      end
+    end
+  end
+  file
+end
+
+def from_main
+  if ARGV[0] == '-w'
+    wait = true
+    ARGV.shift
+  end
+  file = get_mailfile(ARGV[0])
+
+  outcount = 0
+  if File.exist?(file)
+    atime = File.atime(file)
+    mtime = File.mtime(file)
+    open(file, "r") do |f|
+      until f.eof?
+        header = {}
+        f.each_line do |line|
+          next if /^From / =~ line # skip From-line
+          break if /^$/ =~ line	 # end of header
+
+          if /^(?<attr>\S+?):\s*(?<value>.*)/ =~ line
+            attr.capitalize!
+            header[attr] = value
+          elsif attr
+            header[attr] += "\n" + line.lstrip
+          end
+        end
+
+        f.each_line do |line|
+          break if /^From / =~ line
+        end
+        outcount += fromout(header['Date'], header['From'], header['Subject'])
+      end
+    end
+    File.utime(atime, mtime, file)
+  end
+
+  if outcount == 0
+    print "You have no mail.\n"
+    sleep 2 if wait
+  elsif wait
+    system "stty cbreak -echo"
+    $stdin.getc
+    system "stty cooked echo"
+  end
+end
+
+if __FILE__ == $0
+  from_main
+end
+
+__END__
+
+=begin
+
+= from.rb
+
+== USAGE
+
+ruby from.rb [-w] [username_or_filename]
+
+=end
-- 
cgit v1.2.3