look.sv.rb

# encoding: UTF-8
#    Copyright 2008, 2009, 2010 Boris ARZUR
#
#    This file is part of Kemuri.
#
#    Kemuri is free software: you can redistribute it and/or modify
#    it under the terms of the GNU Affero General Public License as
#    published by the Free Software Foundation, either version 3 of
#    the License, or (at your option) any later version.
#
#    Kemuri is distributed in the hope that it will be useful,
#    but WITHOUT ANY WARRANTY; without even the implied warranty of
#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
#    GNU Affero General Public License for more details.
#
#    You should have received a copy of the GNU Affero General Public
#    License along with Kemuri. If not, see http://www.gnu.org/licenses.

class Look 
  @@mutex = Mutex.new
  @@store = {}

  def start data, request, path, query, response
    id = rand.to_id
    @@mutex.synchronize {@@store[id] = data}
    execute request, ["look", id], {}, response
  end

  def execute request, path, query, response
    id = path[1]
    data = @@store[id]
    url = "/look/#{id}?"

    #log "id: #{id.inspect}, data: #{data.inspect}, @@store: #{@@store.inspect}"
    #p query, id, data #TODO
    if ! query.include?(:force_post) and ! query.include?("kans") and request.request_method == "GET"
      rad_i = 0
      rad_j = 0
      add_single_rads = {}
      radicals_pickup = data.map {|ele| 
        rad_i += 1
        ele[:r].map {|kan| 
          rad_j += 1
          rads = Kanji.new(kan).get_radicals
          rads =
            if rads.size == 1
              add_single_rads["r#{rad_i}-#{rad_j}"] = rads[0][0] if add_single_rads
              ["<input type='hidden' name='r#{rad_i}-#{rad_j}' value='#{rads[0][0]}'/>#{rads[0][1]}"] 
            else
              add_single_rads = false
              rads.map {|i,e| "<input type='checkbox' name='r#{rad_i}-#{rad_j}' value='#{i}'/>#{e}"}
            end

          rads.unshift("&rarr;")
          rads.unshift(kan.style('color:green'))
        }
      }.flatten(1)
      #log radicals_pickup
     
      if add_single_rads
        #rewrote_request = Request.new("POST", request.path, request.options, add_single_rads, true) 
        p add_single_rads
        query[:force_post] = true
        
        return execute(request, path, query.merge(add_single_rads), response)
      end
      radicals_pickup << ["<input type='submit' value='ok'/>"]
      radicals_pickup = radicals_pickup.to_table(:td_opts => {:style=>'font-size:3em'})
      radicals_pickup.tag("form", :action => url, :method => "post") + Static::voyage
    elsif query.include?('kans')
      @@mutex.synchronize do @@store.delete(id) end

      kans = query['kans'].gsub(',', '')
      query[:force_unparsed_uri] = "/yad/#{kans}"
      Yad.new.execute(request, ["yad", kans], {}, response)
    elsif query.keys.any? {|k| k =~ /^r/}
      @@mutex.synchronize do
        rad_i = 0
        rad_j = 0
        data.each do |ele|
          rad_i += 1
          ele[:r].map! {|kan|
            rad_j += 1
            query["r#{rad_i}-#{rad_j}"] or (message("missing a rad ?") and 0)
          }
        end
      end

      data.map_i do |ele,i|
        rads = ele[:r].flatten
        skip = ele[:s]
        
        #log ele[:s]

        cond = []
        if skip.is_a?(String) && skip =~ /^\d+$/
          cond << "SELECT oid AS kid FROM kanjis WHERE strokes = #{skip}"
        elsif skip.is_a?(String) && skip =~ /^(\d|_)-(\d+|_)-(\d+|_)$/
          if skip.include?("_")
            cond << "SELECT oid AS kid FROM kanjis WHERE skip LIKE '#{skip.gsub('_','%')}'"
          else
            cond << "SELECT oid AS kid FROM kanjis WHERE skip = '#{skip}'"
          end
        elsif skip != [] # this is what we get as the default value, means there's no skip
          raise "invalid skip : #{skip}"
        end

        cond += rads.map {|rid| "SELECT kid FROM kan2rad WHERE rid = #{rid}"}
        r1 = "SELECT kanjis.oid,kanjis.kanji FROM (#{cond * " INTERSECT "}) AS kids LEFT JOIN kanjis ON kids.kid = kanjis.oid ORDER BY kids.kid"

        #log r1
        table_id = rand.to_id
        kanji_table(r1, "javascript:select(\"#{i}\",\"#kid#\",\"#{table_id}\")", table_id, '#kid#')
      end * "------<br/>" + Static::voyage + Static::look_select(data.size, url)
    else
      '...' + Static::voyage
    end
  end
end