wjpp

<% # ======================================================================= # 日本語文型パターンパーサ Webインタフェース # 1st.version : 2003.8/9 by Keichiro Katayama # current Version : 2007/04/25 # ======================================================================= # wjpp.rhtml # Version 3.0 # 2007/04/25 # ===================== # Kanji Code # ===================== $KCODE = 'EUC' ERuby.charset = 'euc-jp' # ===================== # Load Library # ===================== # Main Class require 'lib/wjpp.rb' # CGI Support Library require 'cgi' # DNS Lookup require 'lib/dnslookup.rb' # Initialize cgi = CGI.new wjpp = Wjpp.new( cgi ) wjpp_log_name = '/www/world/toribank/wjpp/wjpp_query_log/wjpp.log' # ===================== # Query Check # ===================== # Default Value has_query = false error_msg = nil rs = nil # Japanese Sentence if cgi.has_key?('sentence') then wjpp.sentence = cgi.params['sentence'].first.strip.untaint has_query = true end # Pattern Level if cgi.has_key?('pattern') then case cgi.params['pattern'].first[0,1].upcase when 'W' wjpp.pattern_level = :word when 'P' wjpp.pattern_level = :phrase when 'C' wjpp.pattern_level = :clause when 'A' wjpp.pattern_level = :all else wjpp.pattern_level = :word end end if has_query then # Execute Pattern Matching begin rs = wjpp.do_matching rescue Wjpp::SentenceTooLong error_msg = "Too Long Sentence!(max=#{wjpp.config.sentence_limit})" rescue JppServer::MorphAnalyzeError rs = nil error_msg = "Can't analyze sentence!" rescue DRb::DRbUnknownError rs = nil error_msg = "Internal Error!(2)" rescue rs = nil error_msg = "Internal Error!(1)" end # Log log_time = Time.now.strftime( "%Y/%m/%d %H:%M:%S" ) log_addr = cgi.remote_addr.dup log_host = lookup_with_gethostbyaddr( log_addr ) if log_addr == log_host then log_host = '' end log_data = [ log_time, log_addr, log_host, wjpp.sentence, wjpp.pattern_level_name ] if rs.nil? then log_data.push 'Error', error_msg.dup else if wjpp.exceed_limit? then log_data.push 'Success', 'Result: %d(%d)' % [ rs.solutions.length, wjpp.real_solution_num ] else log_data.push 'Success', 'Result: %d' % rs.solutions.length end end File.open( wjpp_log_name, 'a' ){ |log| begin log.flock( File::LOCK_EX ) log.puts log_data.join( "\t" ) ensure log.flock( File::LOCK_UN ) end } end # end of setup # ======================================================================= %> wjpp

日本語入力文

Japanese Sentence	value="<%= wjpp.sentence %>"<% end %>> 注意事項：重文・複文を入力してください。また、句読点（。、）を用いてください。ピリオド・カンマ（．，）は受け付けません。
Pattern Level

<% if ! error_msg.nil? then %>

Error

<%= error_msg %>

<% elsif has_query then if rs.solutions.nil? || rs.solutions.empty? then %>

Error

No Match

重文・複文を入力してください。単文は対象外です。
Pattern Levelを変えてみてください。(Word→Phrase, Phrase→Clauseなど)
読点（、）を追加または削除を行ってみてください。
形態素解析ミスの可能性があります。表現を変えてみてください。

<% else %>

Result

Pattern Level: <%= wjpp.pattern_level_name %>, Number of Pattern: <%= num2comstr( wjpp.pattern_num ) %>

Number of Matched Pattern: <%= rs.solutions.length %>, Best Coverage: <%= sprintf( "%5.2f%", rs.solutions.first.coverage * 100 ) %>

<% if wjpp.exceed_limit? then %>

Exceed Max Pattern Limit!(Real Number of Matched Pattern: <%= num2comstr(wjpp.real_solution_num) %>)

<% end %> <%# Loop each Solution... %> <% last_coverage = nil sol_rank = 1 same_rank = 0 rs.solutions.each{ |sol| if sol.coverage == last_coverage then same_rank += 1 else last_coverage = sol.coverage sol_rank += same_rank same_rank = 1 end html_mrp, html_var, html_pj, html_pe = sol.make_html_with_morph( rs.morph_data ) %> <% } # end of each sol %>

<%= sol_rank %>
<%= sprintf( "%5.2f%", sol.coverage * 100 ) %>
<%= CGI.escapeHTML(sol.pattern_id) %>

">

Matched Characters:

<%= html_mrp %><%= html_var %>

Matched Japanese Pattern:	<%= html_pj %>
Corresponding English Pattern:	<%= html_pe %>

<% end # rs.nil? %> <% end # has_query %>

WJPP(Web interface for JPP) version <%= Wjpp::VERSION %> by K.Katayama
jpp2: <%= wjpp.config.jpp_version %>
Pattern Dic: 15.a.1-Imi6.1.0(Limit)