class Gotaku

# File lib/gotaku.rb, line 24
def initialize(&block)
  instance_eval(&block) if block_given?
end

# File lib/gotaku.rb, line 10
def self.parse(arg)
  new do
    if arg.is_a? File
      @path, @file = arg.path, arg
    elsif File.exists?(arg)
      @path, @file = arg, open(arg)
    else
      raise Errno::ENOENT
    end
  end
end

# File lib/gotaku.rb, line 28
def headers
  return @headers if @headers

  @headers = []
  MAX_ENTRY.times do |i|
    position = Header::LENGTH * i
    @file.seek(position, IO::SEEK_SET)
    buffer = @file.read(Header::LENGTH)
    @headers << Header.parse(buffer, index: i)
  end

  @headers
end

# File lib/gotaku.rb, line 42
def questions
  return @questions if @questions

  @questions = []
  headers.each do |h|
    h.size.times do |j|
      position = Header::LENGTH * h.skip + Question::LENGTH * j
      @file.seek(position, IO::SEEK_SET)
      buffer = @file.read(Question::LENGTH)
      @questions << Question.parse(buffer, genre: h.index, index: j)
    end
  end

  @questions
end

# File lib/gotaku.rb, line 62
def to_xml(options = {})
  options = {
    indent: 2,
    margin: 0
  }.update(options)

  xml = Builder::XmlMarkup.new(options)
  xml.instruct! :xml, encoding: 'UTF-8'
  xml.gotaku do
  xml.headers do
    headers.each_with_index do |h, i|
      xml.header id: h.index do
        xml.type h.type
        xml.file h.file
        xml.code h.code
      end
    end
  end
  xml.questions do
    questions.each do |q|
      xml.question id: q.genre, index: q.index do
        xml.message q.message
        xml.choices do
          q.choices.each_with_index do |c, i|
            xml.choice c, id: i
          end
        end
      end
    end
  end
  end
end

# File lib/gotaku.rb, line 58
def verify?
  headers.all?(&:verify?)
end