X-Git-Url: http://git.sourceforge.jp/view?p=shogi-server%2Fshogi-server.git;a=blobdiff_plain;f=mk_html;h=956be0a2f33c028d8ced2f6a578ad8d1c9d64d1c;hp=dadcb1d5ebde4d2a601d61fe4d53bd666f2aff78;hb=f9c3575027bb39a0e24add66804e2771a52e71c5;hpb=4e0831a4fb7109df5072eb4e17698cc24cb9bfb7

diff --git a/mk_html b/mk_html
index dadcb1d..956be0a 100755
--- a/mk_html
+++ b/mk_html
@@ -1,55 +1,211 @@
 #!/usr/bin/ruby
-## $Id$
-
-## Copyright (C) 2006 Daigo Moriwaki <daigo at debian dot org>
-##
-## This program is free software; you can redistribute it and/or modify
-## it under the terms of the GNU General Public License as published by
-## the Free Software Foundation; either version 2 of the License, or
-## (at your option) any later version.
-##
-## This program 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 General Public License for more details.
-##
-## You should have received a copy of the GNU General Public License
-## along with this program; if not, write to the Free Software
-## Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
-
-#
-# This generates html pages from players.yaml.
-#
-# Sample:
-#   $ ./mk_html < players.yaml > rating.html
-#   
+# $Id$
+#
+# Author:: Daigo Moriwaki
+# Homepage:: http://sourceforge.jp/projects/shogi-server/
+#
+#--
+# Copyright (C) 2006-2008 Daigo Moriwaki <daigo at debian dot org>
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program 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 General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#++
+#
+# == Synopsis
+#
+# mk_html generates an html page from a players.yaml.
+#
+# == Usage
+#
+# ./mk_html [OPTION] < players.yaml > rating.html
+#
+# [<tt>-h, --help</tt>]
+#    show help
+#
+# [<tt>-w,--wdoor</tt>]
+#    adpot wdoor style
+#
+# [<tt>--footer</tt> <i>filename</i>]
+#    insert contents in the filename at the bottom of a genrated page.
+#
+# == Prerequire
+#
+# * Ruby 1.8.7
+#
+#   $ sudo aptitude install ruby ruby1.8
+#
+# == Example
+#
+#   $ ./mk_html --footer ./wdoor_1000.html < players.yaml > players.html
+#
+#   $ cat ./wdoor-1000.html
+#   <p>The average of the rates in a group is always 1000. 
+#   <p><a href="http://wdoor.c.u-tokyo.ac.jp/shogi/">BACK</a>
+#
 
+require 'optparse'
 require 'yaml'
 require 'erb'
 
 include ERB::Util
 
 def show_date(time)
-  time.strftime("%Y-%m-%d")
+  if (Time.now - time < 30*60)
+    return "on line"
+  elsif (Time.now - time < 24*60*60)
+    return time.strftime("%Y-%m-%d")
+    # return "%d hours ago" % [(Time.now - time)/3600]
+  else
+    return time.strftime("%Y-%m-%d")
+  end
 end
 
-def usage
-  $stderr.puts <<-EOF
-USAGE: #{$0} 
-  EOF
-  exit 1
+def remove_long_to_see_players(file)
+  return unless file["players"][999] # only for Not-Yet-Rated players
+
+  file["players"][999].delete_if do |key, value|
+    value['last_modified'] < Time.now - 24*3600*30 # 30 days
+  end
 end
 
 def main
+  $wdoor = false
+  $footer_content = nil
+  opts = OptionParser.new
+  opts.banner = "Usage: mk_html [OPTIONS]"
+  opts.on("--footer filename", String, "Insert contents of the filename at the bottom of a genrated page") do |filename|
+    unless File.exist?(filename)
+      $stderr.puts "File not found: %s" % [filename]
+      raise
+    end
+    $footer_content = File.open(filename).read
+  end
+  opts.on("-w","--wdoor", "adopt a wdoor style") { $wdoor=true }
+  opts.on_tail("-h", "--help", "show this message") do
+    puts opts
+    exit
+  end
+  begin
+    opts.parse(ARGV) 
+  rescue
+    puts opts
+    exit -1
+  end
+
   lines = ""
-  while l = gets do
+  while l = $stdin.gets do
     lines << l
   end
-  yaml = YAML::load(lines)
+  file = YAML::load(lines)
+  erb = ERB.new( DATA.read, nil, "%>" )
+  tables = []
+  group_names = []
+  file["players"].keys.sort.each do |index|
+    if index < 999
+      group_names << "#{index}"
+    else
+      group_names << "Not-Yet-Rated Players"
+    end
+  end
+  remove_long_to_see_players(file)
 
-  sorted_keys = yaml.keys.sort {|a,b| yaml[b]['rate'] <=> yaml[a]['rate']}
+  popup_id = 0
+
+  if $wdoor
+    yss_rate = 0
+    file["players"].keys.each do |group_index|
+      file["players"][group_index].each do |player, yaml|
+        if player == "YSS+707d4f98d9d2620cdaab58f19d02a2e4"
+          yss_rate = yaml['rate']
+        end
+      end
+    end
+  end
+        
+  file["players"].sort.each do |key, yaml| # sort groups in the order written in players.yaml
+  sorted_keys = yaml.keys.sort do |a,b| 
+    # sort players in a group by one's rate
+    if yaml[b]['rate'] == 0 && yaml[a]['rate'] == 0
+      # mainly for not-rated-yet players
+      yaml[b]['last_modified'] <=> yaml[a]['last_modified']
+    else
+      yaml[b]['rate'] <=> yaml[a]['rate']
+    end
+  end 
+  top_rate = nil  
+  table = ERB.new(<<ENDTABLE, nil, "%>")
+% sorted_keys.each do |key|
+  <%
+    win  = yaml[key]['win']
+    loss = yaml[key]['loss']
+    win_rate = win.to_f / (win + loss)
+    last_modified = yaml[key]['last_modified']
+    
+    player_decoration = "default"
+
+    case (Time.now - last_modified)/60 # minutes
+    when (0..30)        then player_decoration = "current"
+    when (0..(1*60*24)) then player_decoration = "today"
+    when (0..(7*60*24)) then player_decoration = "this_week"
+    end
+    
+    case key
+    when "yowai_gps+95908f6c18338f5340371f71523fc5e3" then player_decoration = "yowai_gps"
+    when "gps+11648e4e66e7ed6a86cb7f1d0cf604fe"       then player_decoration = "gps"
+    end
+
+    rate = yaml[key]['rate']
+    top_rate ||= rate
+    diff_rate = rate - top_rate
+    diff_possibility = 1.0/(1.0 + 10**(-diff_rate/400.0))
+  %>
+  <tr class="<%=player_decoration%>">
+    <td class="name">
+        <a id="popup<%=popup_id+=1%>" href="http://wdoor.c.u-tokyo.ac.jp/shogi/tools/view/show-player.cgi?event=LATEST&amp;filter=floodgate&amp;show_self_play=1&amp;user=<%=u key%>"><%= h yaml[key]['name'] %></a>
+        <script type="text/javascript">
+          var tooltip<%=popup_id%> = new YAHOO.widget.Tooltip("myTooltip", {
+            context:"popup<%=popup_id%>",
+            text:"<%= h key %>" } );
+        </script>
+    </td>
+    <td class="rate">
+        <span id="popup<%=popup_id+=1%>"><%= rate != 0 ? "%5d"  % [ rate ] : "N/A" %></span>
+        <script type="text/javascript">
+          var tooltip<%=popup_id%> = new YAHOO.widget.Tooltip("myTooltip", {
+            context:"popup<%=popup_id%>",
+            text:"Behind <%= "%5d" % [ diff_rate ] %> (<%= "%.3f" % [ diff_possibility ] %>)" } );
+        </script>
+    </td>
+    <td class="ngames">
+        <%= "%5d"  % [ win ] %>  </td>
+    <td class="ngames">
+        <%= "%5d"  % [ loss ] %> </td>
+    <td class="win_rate">
+        <%= "%.3f" % [win_rate] %> </td>
+    <td class="last_modified">
+        <%= show_date(last_modified) %> </td>
+% if $wdoor
+    <td class="rate">
+        <%= rate != 0 && yss_rate > 0 ? ("%5d"  % [2300 - yss_rate + rate]) : "N/A" %> </td>
+% end
+  </tr>
+% end
+ENDTABLE
+        
+    tables << table.result(binding)
+  end
 
-  erb = ERB.new( DATA.read, nil, "%<>" )
   body = erb.result(binding)
   puts body
 end
@@ -64,33 +220,91 @@ __END__
 <html>
 <head>
   <title>Shogi Server Rating</title>
+  <link rel="StyleSheet" type="text/css" href="http://wdoor.c.u-tokyo.ac.jp/shogi/shogi.css">
+  <!-- CSS --> 
+  <!-- License: http://developer.yahoo.com/yui/license.html -->
+  <link rel="stylesheet" type="text/css" href="http://yui.yahooapis.com/2.4.1/build/reset-fonts-grids/reset-fonts-grids.css"> 
+  <link rel="stylesheet" type="text/css" href="http://yui.yahooapis.com/2.4.1/build/base/base-min.css"> 
+  <link rel="stylesheet" type="text/css" href="http://yui.yahooapis.com/2.4.1/build/container/assets/container.css"> 
+  <!-- Dependencies --> 
+  <script type="text/javascript" src="http://yui.yahooapis.com/2.4.1/build/yahoo-dom-event/yahoo-dom-event.js"></script> 
+  <!-- OPTIONAL: Animation (only required if enabling Animation) --> 
+  <script type="text/javascript" src="http://yui.yahooapis.com/2.4.1/build/animation/animation-min.js"></script> 
+  <!-- Source file --> 
+  <script type="text/javascript" src="http://yui.yahooapis.com/2.4.1/build/container/container-min.js"></script>
+  <style type="text/css"><!--
+    TABLE {margin-left: auto;
+           margin-right: auto;}
+    CAPTION { caption-side: left;}
+    .name {text-align: center;
+           width: 180px;}
+    .rate, .ngames, .win_rate {text-align: right;}
+    .last_modified {text-align: center;}
+    .gps, .yowai_gps {background-color: lightgreen;}
+    .current   {background-color: #FFD700;}
+    .today     {background-color: #FFFF00;}
+    .this_week {background-color: #FFFFAA;}
+
+    #bd {text-align: center;}
+    #ft {text-align: right;}
+  --></style>
 </head>
-<body>
+<body><div id="doc">
+
+<div id="hd"></div>
 
+<div id="bd">
 <h1>Shogi Server Rating</h1>
 
+% tables.each_with_index do |t, index|
 <table>
+<caption>Group: <%=group_names[index]%></caption>
+<colgroup>
+  <col class="name">
+  <col class="rate">
+  <col class="ngames">
+  <col class="ngames">
+  <col class="win_rate">
+  <col class="last_modified">
+% if $wdoor
+  <col class="rate)">
+% end
+</colgroup>
+<thead>
 <tr>
-  <th>name</th> <th>rate</th> <th>win</th> <th>loss</th> <th>win_rate</th> <th>last_modified</th>
+  <th>name</th>
+  <th>rate</th> 
+  <th>win</th> 
+  <th>loss</th> 
+  <th>&#37;</th> 
+  <th>last_modified</th>
+% if $wdoor
+  <th>(rate24)</th> 
+% end
 </tr>
-<% sorted_keys.each do |key| %>
-  <%
-    win  = yaml[key]['win']
-    loss = yaml[key]['loss']
-    win_rate = win.to_f / (win + loss)
-    last_modified = yaml[key]['last_modified']
-  %>
-  <tr>
-    <td><%=h yaml[key]['name']%></td>
-    <td><%=yaml[key]['rate']%></td>
-    <td><%=win%></td>
-    <td><%=loss%></td>
-    <td><%="%.3f" % [win_rate]%></td>
-    <td><%=show_date(last_modified)%></td>
-  </tr>
-<% end %>
+</thead>
+<tbody>
+  <%= t %>
+</tbody>
 </table>
 
-</body>
+<hr style="width:50%; margin:1em auto;">
+
+% end
+
+<p>Groups are independently rated. You can not compare rates across them.
+
+<%= $footer_content %>
+
+<hr/>
+</div>
+
+
+<div id="ft">
+  <p>Last modified at <%=Time.now%>
+  <p>$Revision$
+</div>
+
+</div></body>
 </html>