module SFCRoom

# File lib/sfc-room/parse.rb, line 6
def parse(source_str)
  building = nil
  q = Utils.convert_for_search(source_str)
  SFCRoom::Buildings::List.each do |b|
    arr = [b.to_s]
    arr.push SFCRoom::Buildings::JapaneseName[b]
    arr.push SFCRoom::Buildings::RomanChar[b]
    arr.push SFCRoom::Buildings::GreekChar[b]
    arr += SFCRoom::Buildings::Aliases[b]
    arr.delete(nil)
    arr.each do |word|
      search_word = Utils.convert_for_search word
      if search_word.length == 1
        if q.match(/^#{search_word}[SN]?\d*$/i)
          building = b
          break
        end
      elsif q.match(/^#{search_word}/i)
        building = b
        break
      end
    end
    break if building
  end
  number = nil
  floor = nil
  if building == SFCRoom::Buildings::Delta
    if m = q.match(/([ns])(\d+)/)
      number = "#{m[1]}#{m[2]}".upcase
      floor = "#{m[1]}#{m[2][0,1]}"
    end
  elsif building == SFCRoom::Buildings::Tau && m = q.match(/([23][f階])?(ロフト|loft)/)
    if m[1]
      number = "#{m[1][0,1]}0"
      floor = m[1][0,1]
    else
      number = "20"
      floor = "2"
    end
  elsif building == SFCRoom::Buildings::Nu && m = q.match(/iij|docomo|ドコモ|舘内|森|dnp/i)
    if q.match(/iij/i)
      floor = SFCRoom::Floors::IIJHouse
    elsif q.match(/docomo|ドコモ/i)
      floor = SFCRoom::Floors::DocomoHouse
    elsif q.match(/dnp/i)
      floor = SFCRoom::Floors::DNPHouse
    elsif q.match(/舘内/i)
      floor = SFCRoom::Floors::TateuchiHouse
    elsif q.match(/森/i)
      floor = SFCRoom::Floors::MoriAtelier
    end
  elsif m = q.match(/(\d+)/)
    number = m[1]
    floor = m[1][0,1]
  end
  raise ParseError unless building

  return Room.new(:building => building, :room => number, :floor => floor, :source => source_str)
end

# File lib/sfc-room/parse.rb, line 6
def parse(source_str)
  building = nil
  q = Utils.convert_for_search(source_str)
  SFCRoom::Buildings::List.each do |b|
    arr = [b.to_s]
    arr.push SFCRoom::Buildings::JapaneseName[b]
    arr.push SFCRoom::Buildings::RomanChar[b]
    arr.push SFCRoom::Buildings::GreekChar[b]
    arr += SFCRoom::Buildings::Aliases[b]
    arr.delete(nil)
    arr.each do |word|
      search_word = Utils.convert_for_search word
      if search_word.length == 1
        if q.match(/^#{search_word}[SN]?\d*$/i)
          building = b
          break
        end
      elsif q.match(/^#{search_word}/i)
        building = b
        break
      end
    end
    break if building
  end
  number = nil
  floor = nil
  if building == SFCRoom::Buildings::Delta
    if m = q.match(/([ns])(\d+)/)
      number = "#{m[1]}#{m[2]}".upcase
      floor = "#{m[1]}#{m[2][0,1]}"
    end
  elsif building == SFCRoom::Buildings::Tau && m = q.match(/([23][f階])?(ロフト|loft)/)
    if m[1]
      number = "#{m[1][0,1]}0"
      floor = m[1][0,1]
    else
      number = "20"
      floor = "2"
    end
  elsif building == SFCRoom::Buildings::Nu && m = q.match(/iij|docomo|ドコモ|舘内|森|dnp/i)
    if q.match(/iij/i)
      floor = SFCRoom::Floors::IIJHouse
    elsif q.match(/docomo|ドコモ/i)
      floor = SFCRoom::Floors::DocomoHouse
    elsif q.match(/dnp/i)
      floor = SFCRoom::Floors::DNPHouse
    elsif q.match(/舘内/i)
      floor = SFCRoom::Floors::TateuchiHouse
    elsif q.match(/森/i)
      floor = SFCRoom::Floors::MoriAtelier
    end
  elsif m = q.match(/(\d+)/)
    number = m[1]
    floor = m[1][0,1]
  end
  raise ParseError unless building

  return Room.new(:building => building, :room => number, :floor => floor, :source => source_str)
end