# coding:utf-8
require 'date'

class AnkiData
  include Enumerable

  def initialize( &block )
    @anki_set_maker = block
    @data = Array.new
  end

  # i に応じたセットを追加
  def <<( i )
    @data << @anki_set_maker.call( i )
  end

  def []( i )
    @data[ i % @data.size ]
  end

  def last?( comp_data )
    @data[-1] == comp_data
  end

  def each
    @data.each {|d| yield d }
  end
end

class DWM
  def initialize
    @day = 1
    @week = 7
    @month = 30
  end

  attr_accessor :day, :week, :month

  def make_schedule( start_day, data )
    schedule = []
    d_pos = 0

    # :month の暗記予定が、暗記データの最後の要素と同じになるまでスケジュールを組む
    # :month が最後の要素となるまで、:date, :day, :week は繰り返す
    while ( d_pos == 0 ) || !( data.last?( schedule[-1][:month] ) )
      pos_day = start_day + d_pos
      day_schedule = Hash.new

      day_schedule[:date] = pos_day
      day_schedule[:data] = data[ d_pos ]

      if d_pos != 0
        day_schedule[:day] = schedule[-1*@day][:data]
        if d_pos > @week
          day_schedule[:week] = schedule[-1*@week][:data]
          if d_pos > @month
            day_schedule[:month] = schedule[-1*@month][:data]
          end
        end
      end

      schedule << day_schedule
      d_pos += 1
    end

    return schedule
  end
end


if __FILE__ == $0
  # Dialogue 1800 の暗記スケジュールを作る
  # １日に２個のセクションを新しく覚える
  # 開始日はスクリプト実行日から

  anki_data = AnkiData.new {|i| [(2*i-1), 2*i] }

  (1..55).each do |i|
    anki_data << i
  end

  schedule = DWM.new.make_schedule( Date.today, anki_data )

  now_month = nil
  schedule.each do |s|
    unless s[:date].month == now_month
      puts '--------------------------------'
      puts "\t*** #{Date::MONTHNAMES[s[:date].month]} ***"
      puts '--------------------------------'
      now_month = s[:date].month
    end

    today_schedule = "[ ] #{s[:data].join(',')}"

    [:day, :week, :month].each do |r|
      today_schedule += "\t#{s[ r ].join(',')}" if s[ r ]
    end

    puts "#{s[:date].day}日\t: " + today_schedule
  end
end