=begin
今日はなんの日？みたいなプラグイン by IPPO
WoinaryさんのToDoプラグインを参考に変更。
#よく考えるとschedule.rbいじった方がはやかったような……
動作確認：nDiary 0.9.3b18 + mswin版 Ruby 1.6.8
書式：file=input_file なんの日ファイル
      pre=N Ｎ日前まで含む
      suf=M Ｍ日後まで含む
      span=O Ｏ日前後まで含む(default:0=0)
      deco  飾り付け（というか、私専用）
      simp  シンプルに
例：<!--plug=today?file=today.txt-->
Today書式：MMDD<TAB>date<TAB>text...　が一行。ｘＮ行。
#Today書式：日付(YYYY/MM/DD)<TAB>テキスト　が一行。ｘＮ行。
　　　　　　上の形式に従ってない部分、行頭が#の部分は無視します。

1.1: 2001.11.7・初版。カスタム、イレギュラー対応。
1.2: 2003.5.19 CSSっぽく
=end
 
def plug(opt)
  # 引数は必ず付けて
  if opt['file'].nil? then
    return '<!--plug=today:error:fileが指定されていません-->'
  end
  pre_span = 3
  suf_span = 3
  if !opt['pre'].nil? then
    pre_span = opt['pre'].to_i
  end
  if !opt['suf'].nil? then
    suf_span = opt['suf'].to_i
  end
  if !opt['span'].nil? then
    pre_span = opt['span'].to_i
    suf_span = opt['span'].to_i
  end
  mode_decorate = false
  mode_decorate = true if !opt['deco'].nil?
  mode_simple   = false
  mode_simple   = true if !opt['simp'].nil?
  
  # 入力ファイル名の生成
  today_src = @logDirectory.chomp('/') + '/' + opt['file']
  $stderr.print "CHK; today #{today_src}\n"
  
  # ToDoの読込み
  today_list = []
  time_now = Time.now
  year_now = time_now.strftime("%Y").to_i
  time_pre = pre_span * 60 * 60 * 24
  time_suf = suf_span * 60 * 60 * 24
  month_old = ''
  day_old   = ''
  open(today_src, 'r').each { |line|
    data = line.chomp.split("\t")
    # フォーマットのチェック
    if (data[0] !~ /^#/) && (data[0] =~ /(\d\d)(\d\d)/) then
      year  = year_now
      month = $1
      day   = $2
#      $stderr.puts "CHK; #{year} #{month} #{day}"
      # イレギュラー対策
      if month.to_i == 0 then
        month = month_old
      end
      if month.to_i > 12 then
        month = "12"
      end
      if day.to_i == 0 then
        day = day_old
      end
      if day.to_i > 31 then
        day = "31"
      end
      time = Time.mktime(year_now, month.to_i, day.to_i)
#      $stderr.puts "CHK; #{time}"
#      $stderr.puts "CHK; #{year} #{month} #{day}"
      flag = false
      flag = true if (time - time_now) == 0
      flag = true if ((time - time_now) > 0) && ((time - time_now) < time_suf)
      flag = true if ((time - time_now) < 0) && ((time_now - time) < time_pre)
      if flag then
        $stderr.puts "CHK; find #{data[1]}"
        data.shift
        date = data.shift
        str  = data.join("\t")
        today_list << [date, str]
      end
      month_old = ''
      month_old << month
      day_old = ''
      day_old << day
    end
  }
  
#  $stderr.puts "CHK;---"
  if today_list.size > 0 then
    if mode_simple then
      today_list.each { |date, str|
        today << date << " " << str << "<br>\n"
      }
    elsif mode_decorate then
      mo = time_now.strftime("%b").downcase
      md = time_now.strftime("%m%d")
      today =  '<table class="today">' << "\n"
      today << '<tr><th colspan="2">'
      today << '<a href="http://homepage2.nifty.com/URU/'
      today << mo << '.htm#' << md
      today << '">今日</a>はなんの日？'
      today << '　<a href="http://homepage2.nifty.com/URU/">SF版</a>'
      today << '</th></tr>' << "\n"
      today_list.each { |date, str|
        data = str.split("\t")
        str1 = data.shift
        str2 = data.join
        today << '<tr>'
        today << '<td>' << date << '</font></td>'
        today << '<td>' << str1 << '</font><br>'
        today <<     '<div class="today_note">' << str2 << '</div></td>'
        today << '</tr>' << "\n"
      }
      today << '</table>' << "\n"
    else
      today =  "<table class=\"today\">\n"
      today_list.each { |date, str|
        today << '<tr>'
        today << '<td>' << date << '</td>'
        today << '<td>' << str  << '</td>'
        today << '</tr>' << "\n"
      }
      today << "</table>\n"
    end
  end
  
  return today
end