bioshogi 0.0.3

data/lib/bioshogi/container/serialize_methods.rb

@@ -0,0 +1,180 @@
+module Bioshogi
+  module Container
+    concern :SerializeMethods do
+      def judgment_message
+        "まで#{turn_info.display_turn}手で#{win_player.call_name}の勝ち"
+      end
+
+      def to_s(...)
+        to_bod(...)
+      end
+
+      def to_bod(options = {})
+        s = []
+        s << player_at(:white).piece_box_as_header + "\n"
+        s << board.to_s
+        s << player_at(:black).piece_box_as_header + "\n"
+
+        unless options[:display_turn_skip]
+          last = ""
+          if respond_to?(:hand_logs)
+            if e = hand_logs.last
+              last = e.to_kif(with_location: true)
+            end
+          end
+          s << "手数＝#{turn_info.display_turn} #{last} まで".squish + "\n"
+        end
+
+        s << "#{current_player.call_name}番\n"
+        s.join
+      end
+
+      def to_kif
+        s = []
+        s << board.to_s
+        s << players.collect { |player|
+          "#{player.call_name}の持駒:#{player.piece_box.to_s}"
+        }.join("\n") + "\n"
+        s.join
+      end
+
+      def to_csa(options = {})
+        s = []
+
+        preset_info = board.preset_info
+
+        if preset_info
+          unless options[:oneline]
+            s << "#{Parser::CsaParser::SYSTEM_COMMENT_CHAR} 手合割:#{preset_info.name}" + "\n"
+          end
+        end
+
+        if options[:board_expansion]
+          s << board.to_csa
+        else
+          if preset_info == PresetInfo.fetch("平手")
+            s << "PI" + "\n"
+          else
+            s << board.to_csa
+          end
+        end
+
+        players.each do |player|
+          if v = player.to_csa.presence
+            s << v + "\n"
+          end
+        end
+
+        s.join
+      end
+
+      def to_yomiage(options = {})
+        CheckmateYomiage.new(self, options).to_s
+      end
+
+      def to_yomiage_list(options = {})
+        CheckmateYomiage.new(self, options).to_a
+      end
+
+      ################################################################################
+
+      def screen_image_renderer(options = {})
+        ScreenImage.renderer(self, options)
+      end
+
+      def to_image(options = {})
+        screen_image_renderer(options).to_blob_binary
+      end
+
+      ################################################################################
+
+      def to_png(options = {})
+        ScreenImage.renderer(self, options.merge(image_format: "png")).to_blob_binary
+      end
+
+      def to_jpg(options = {})
+        ScreenImage.renderer(self, options.merge(image_format: "jpg")).to_blob_binary
+      end
+
+      def to_gif(options = {})
+        ScreenImage.renderer(self, options.merge(image_format: "gif")).to_blob_binary
+      end
+
+      def to_webp(options = {})
+        ScreenImage.renderer(self, options.merge(image_format: "webp")).to_blob_binary
+      end
+
+      concerning :SfenMethods do
+        attr_reader :initial_state_board_sfen
+        attr_reader :initial_state_turn_info
+
+        def initialize(*)
+          super
+          before_run_process            # FIXME
+        end
+
+        def before_run_process
+          # turn_info_auto_set
+          @initial_state_board_sfen = to_short_sfen # FIXME: これはイケてない
+          @initial_state_turn_info = turn_info.clone
+        end
+
+        # 平手で開始する直前の状態か？
+        def startpos?
+          if e = board.preset_info
+            e.key == :"平手" && players.all? { |e| e.piece_box.empty? }
+          end
+        end
+
+        # 現在の局面
+        # def to_short_sfen
+        #   if false
+        #     if startpos?
+        #       "position startpos"
+        #     else
+        #       to_short_sfen
+        #     end
+        #   else
+        #     to_short_sfen
+        #   end
+        # end
+
+        def to_short_sfen
+          "#{to_short_sfen_without_turn} #{turn_info.display_turn.next}"
+        end
+
+        def to_short_sfen_without_turn
+          s = []
+          s << "position"
+          s << "sfen"
+          s << board.to_sfen
+          s << turn_info.current_location.to_sfen
+          if players.all? { |e| e.piece_box.empty? }
+            s << "-"
+          else
+            s << players.collect(&:to_sfen).join
+          end
+          s.join(" ")
+        end
+
+        # 最初から現在までの局面
+        def to_history_sfen(options = {})
+          s = []
+          unless @initial_state_board_sfen
+            raise BioshogiError, "@initial_state_board_sfen が未定義"
+          end
+          s << @initial_state_board_sfen # 局面を文字列でとっておくのってなんか違う気がする
+          if hand_logs.present?
+            s << "moves"
+            s.concat(hand_logs.collect(&:to_sfen))
+          end
+          s = s.join(" ")
+          if options[:startpos_embed]
+            s = Sfen.startpos_embed(s)
+          end
+          s
+        end
+      end
+    end
+  end
+end

data/lib/bioshogi/container/simple.rb

@@ -0,0 +1,17 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Container
+    class Simple
+      include CoreMethods
+      include PlayersMethods
+      include ExecuteMethods
+      include SerializeMethods
+      include TestMethods
+
+      def executor_class
+        PlayerExecutor::WithoutMonitor
+      end
+    end
+  end
+end

data/lib/bioshogi/container/test_methods.rb

@@ -0,0 +1,65 @@
+module Bioshogi
+  module Container
+    concern :TestMethods do
+      class_methods do
+        def facade(params = {})
+          container = new
+
+          if params[:init]
+            container.board.placement_from_human(params[:init])
+          end
+
+          if params[:pieces_set]
+            container.pieces_set(params[:pieces_set])
+          end
+
+          container.execute(params[:execute])
+          container
+        end
+
+        def player_test(params = {})
+          params = {
+            player: :black,
+            initial_deal: true,
+          }.merge(params)
+
+          container = new
+          player = container.player_at(params[:player])
+
+          if params[:initial_deal]
+            player.pieces_add("歩9角飛香2桂2銀2金2玉")
+          end
+
+          if v = params[:pieces_add]
+            player.pieces_add(v)
+          end
+
+          if v = params[:init]
+            player.soldier_create(v, from_stand: true)
+          end
+
+          Array.wrap(params[:execute]).each { |v| player.execute(v) }
+
+          if v = params[:pieces_set]
+            player.pieces_set(v)
+          end
+
+          player
+        end
+
+        def player_test_soldier_names(...)
+          player_test(...).soldiers.collect(&:name).sort
+        end
+
+        def read_spec(params)
+          container = new
+          player = container.player_at(:black)
+          player.pieces_add("歩9角飛香2桂2銀2金2玉")
+          player.placement_from_human(Array(params[:init]).join.gsub(/_/, ""))
+          Array.wrap(params[:execute]).each { |v| player.execute(v) }
+          container.hand_logs.last.to_kif_ki2
+        end
+      end
+    end
+  end
+end

data/lib/bioshogi/container.rb

@@ -0,0 +1,9 @@
+module Bioshogi
+  module Container
+    class << self
+      def create(...)
+        Basic.new(...)
+      end
+    end
+  end
+end

data/lib/bioshogi/cover_image/bottom_text_methods.rb

@@ -0,0 +1,34 @@
+module Bioshogi
+  module CoverImage
+    concern :BottomTextMethods do
+      class_methods do
+        def default_params
+          super.merge({
+              :bottom_text           => nil,
+              :bottom_text_pointsize => 48,
+              :bottom_text_margin    => 12,
+              :bottom_text_gravity   => Magick::SouthGravity,
+            })
+        end
+      end
+
+      private
+
+      def bottom_text_render
+        if bottom_text
+          gc = Magick::Draw.new
+          gc.font      = params[:font_regular].to_s
+          gc.fill      = params[:font_color]
+          gc.pointsize = params[:bottom_text_pointsize]
+          gc.gravity   = params[:bottom_text_gravity]
+          margin       = params[:bottom_text_margin]
+          gc.annotate(@canvas_layer, 0, 0, margin, margin, bottom_text)
+        end
+      end
+
+      def bottom_text
+        @bottom_text ||= text_normalize(params[:bottom_text])
+      end
+    end
+  end
+end

data/lib/bioshogi/cover_image/core_methods.rb

@@ -0,0 +1,60 @@
+module Bioshogi
+  module CoverImage
+    concern :CoreMethods do
+      class_methods do
+        def default_params
+          {
+            :text         => nil,
+            :width        => 1200,
+            :height       => 630,
+            :image_format => "png",
+            :font_regular => ASSETS_DIR.join("fonts/RictyDiminished-Regular.ttf"),  # 駒のフォント(普通)
+            :font_bold    => ASSETS_DIR.join("fonts/RictyDiminished-Bold.ttf"),     # 駒のフォント(太字)
+            :bg_color     => "hsl(0,0%,15%)",
+            :font_color   => "hsl(0,0%,100%)",
+          }
+        end
+      end
+
+      attr_accessor :params
+
+      def initialize(params = {})
+        require "rmagick"
+        @params = self.class.default_params.merge(params)
+      end
+
+      def render
+        @canvas_layer = canvas_layer_create
+        main_text_render
+        bottom_text_render
+        @canvas_layer
+      end
+
+      private
+
+      # Ricty フォントでは全角が "「」" になってしまうため透明にする
+      def text_normalize(str)
+        str.to_s.gsub(/\u3000/, "  ")
+      end
+
+      def canvas_layer_create
+        Magick::Image.new(*image_rect) do |e|
+          e.background_color = params[:bg_color]
+          if false
+            # 予想に反してこれを指定しても RGB で保存されない
+            # たまたま白黒だった画像をRGBで保存するには PNG24: としないといけない
+            e.colorspace = Magick::SRGBColorspace
+          end
+        end
+      end
+
+      def image_rect
+        Rect.new(params[:width], params[:height])
+      end
+
+      def ext_name
+        params[:image_format]
+      end
+    end
+  end
+end

data/lib/bioshogi/cover_image/main_text_methods.rb

@@ -0,0 +1,36 @@
+module Bioshogi
+  module CoverImage
+    concern :MainTextMethods do
+      class_methods do
+        def default_params
+          super.merge({
+              :font_size    => 80,
+              :density      => "72x84", # xおよびy方向のテキスト密度。少し縦長にしておく。デフォルトは「72x72」
+              :pull_to_top  => 0.02,    # 上にずらす割り合い。中央は下がって見えるため少し上に上げておく
+            })
+        end
+      end
+
+      private
+
+      def main_text_render
+        gc = Magick::Draw.new
+        gc.font      = params[:font_regular].to_s
+        gc.fill      = params[:font_color]
+        gc.pointsize = params[:font_size]
+        gc.density   = params[:density]
+        gc.gravity   = Magick::CenterGravity # 中央
+        # gc.interword_spacing = 0 # 半角スペースをさらに広げる場合に指定
+        # gc.kerning = 0           # 文字間隔
+        # gc.decorate = Magick::OverlineDecoration
+        x = 0
+        y = @canvas_layer.rows * -1 * params[:pull_to_top] # 高さ x pull_to_top のぶんだけ持ち上げる
+        gc.annotate(@canvas_layer, 0, 0, x, y, text)
+      end
+
+      def text
+        @text ||= text_normalize(params[:text])
+      end
+    end
+  end
+end

data/lib/bioshogi/cover_image/renderer.rb

@@ -0,0 +1,10 @@
+module Bioshogi
+  module CoverImage
+    class Renderer
+      include CoreMethods
+      include MainTextMethods
+      include BottomTextMethods
+      include ScreenImage::Helper
+    end
+  end
+end

data/lib/bioshogi/cover_image.rb

@@ -0,0 +1,7 @@
+module Bioshogi
+  module CoverImage
+    def self.renderer(...)
+      Renderer.new(...)
+    end
+  end
+end

data/lib/bioshogi/csa_header_info.rb

@@ -0,0 +1,90 @@
+# frozen-string-literal: true
+module Bioshogi
+  # CSA標準棋譜ファイル形式
+  # http://www.computer-shogi.org/protocol/record_v22.html
+  #
+  #   V2.2
+  #   N+久保利明 王将
+  #   N-都成竜馬 四段
+  #   $EVENT:王位戦
+  #   $SITE:関西将棋会館
+  #   $START_TIME:2017/11/16 10:00:00
+  #   $END_TIME:2017/11/16 19:04:00
+  #   $OPENING:相振飛車
+  #
+  class CsaHeaderInfo
+    include ApplicationMemoryRecord
+    memory_record [
+      # CSA側               KIF/KI2 形式
+      { key: "N+",           kif_side_key: "先手",     },
+      { key: "N-",           kif_side_key: "後手",     },
+      { key: "$EVENT:",      kif_side_key: "棋戦",     },
+      { key: "$SITE:",       kif_side_key: "場所",     },
+      { key: "$START_TIME:", kif_side_key: "開始日時", },
+      { key: "$END_TIME:",   kif_side_key: "終了日時", },
+      { key: "$OPENING:",    kif_side_key: "戦型",     },
+      {
+        key: "$TIME_LIMIT:",
+        kif_side_key: "持ち時間",
+        as_csa: -> v {
+          v = human_or_csa_time_format_to_hash(v)
+          "%02d:%02d+%02d" % [*v[:min].to_i.divmod(60), v[:countdown].to_i]
+        },
+        as_kif: -> v {
+          v = human_or_csa_time_format_to_hash(v)
+
+          min = v[:min].to_i
+          h, m = min.to_i.divmod(60)
+          countdown = v[:countdown].to_i
+
+          s = []
+          if h.nonzero?
+            s << "#{h}時間"
+          end
+
+          if m.nonzero? || countdown.nonzero?
+            s << "#{m}分"
+          end
+
+          if countdown.nonzero?
+            s << " (1手#{countdown}秒)"
+          end
+
+          s.join.squish
+        },
+      },
+    ]
+
+    alias csa_key key
+
+    class << self
+      def lookup(v)
+        super || invert_table[v]
+      end
+
+      private
+
+      def invert_table
+        @invert_table ||= inject({}) {|a, e| a.merge(e.kif_side_key => e) }
+      end
+    end
+
+    def human_or_csa_time_format_to_hash(str)
+      # チェックする順番重要
+      str = str.tr("０-９", "0-9")
+      case
+      when md = str.match(/(?<hour>\d+):(?<min>\d+)(\+(?<countdown>\d+))?/) # 01:03+00 → {min: 63, countdown: 0}
+        {
+          :min       => md[:hour].to_i * 60 + md[:min].to_i,
+          :countdown => md[:countdown].to_i,
+        }
+      when md = str.match(/((?<hour>\d+)時間)?((?<min>\d+)分)?/)            # 1時間3分 or 1時間 or 3分
+        {
+          :min => md[:hour].to_i * 60 + md[:min].to_i,
+        }
+      else
+        str
+      end
+    end
+  end
+end

data/lib/bioshogi/dimension/base.rb

@@ -0,0 +1,92 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Dimension
+    class Base
+      class_attribute :dimension
+      self.dimension = 9
+
+      attr_reader :value
+
+      class << self
+        def fetch(value)
+          lookup(value) or raise SyntaxDefact, "座標が読み取れません : #{value.inspect}"
+        end
+
+        def lookup(value)
+          table[value]
+        end
+
+        def dimension_set(v)
+          self.dimension = v
+          @char_infos  = nil
+          @table       = nil
+          @value_range = nil
+        end
+
+        def table
+          @table ||= char_infos.each.with_index.inject({}) { |a, (e, i)|
+            object = new(i).freeze
+            a.merge({
+                object           => object,
+                i                => object,
+                e.number_kanji   => object,
+                e.hankaku_number => object,
+                e.number_zenkaku => object,
+              })
+          }.freeze
+        end
+
+        # 幅
+        def value_range
+          @value_range ||= 0...char_infos.size
+        end
+      end
+
+      private_class_method :new
+
+      def initialize(value)
+        @value = value
+      end
+
+      delegate *[
+        :key,
+        :number_kanji,
+        :number_zenkaku,
+        :hankaku_number,
+      ], to: :char_info
+
+      def char_info
+        self.class.char_infos[@value]
+      end
+
+      def yomiage
+        Yomiage::NumberInfo.fetch(key).yomiage
+      end
+
+      def flip
+        self.class.fetch(self.class.char_infos.size - 1 - @value)
+      end
+
+      def ==(other)
+        self.class == other.class && value == other.value
+      end
+
+      def <=>(other)
+        @value <=> other.value
+      end
+
+      def eql?(other)
+        self.class == other.class && value == other.value
+      end
+
+      def hash
+        self.class.hash ^ value.hash
+      end
+
+      def inspect
+        "#<#{self.class.name}:#{object_id} #{name.inspect} #{@value}>"
+      end
+    end
+  end
+end

data/lib/bioshogi/dimension/char_info.rb

@@ -0,0 +1,24 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Dimension
+    class CharInfo
+      include ApplicationMemoryRecord
+      memory_record [
+        { key: "1",  number_kanji: "一", number_zenkaku: "１", },
+        { key: "2",  number_kanji: "二", number_zenkaku: "２", },
+        { key: "3",  number_kanji: "三", number_zenkaku: "３", },
+        { key: "4",  number_kanji: "四", number_zenkaku: "４", },
+        { key: "5",  number_kanji: "五", number_zenkaku: "５", },
+        { key: "6",  number_kanji: "六", number_zenkaku: "６", },
+        { key: "7",  number_kanji: "七", number_zenkaku: "７", },
+        { key: "8",  number_kanji: "八", number_zenkaku: "８", },
+        { key: "9",  number_kanji: "九", number_zenkaku: "９", },
+      ]
+
+      def hankaku_number
+        key.to_s
+      end
+    end
+  end
+end

data/lib/bioshogi/dimension/dimension_info.rb

@@ -0,0 +1,25 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Dimension
+    class DimensionInfo
+      include ApplicationMemoryRecord
+      memory_record [
+        { key: :d5x5, name: "5x5", wh: [5, 5], },
+        { key: :d9x9, name: "9x9", wh: [9, 9], },
+      ]
+
+      class << self
+        def lookup(v)
+          super || invert_table[v]
+        end
+
+        private
+
+        def invert_table
+          @invert_table ||= inject({}) {|a, e| a.merge(e.wh => e) }
+        end
+      end
+    end
+  end
+end

data/lib/bioshogi/dimension/module_methods.rb

@@ -0,0 +1,42 @@
+# frozen-string-literal: true
+
+module Bioshogi
+  module Dimension
+    module ModuleMethods
+      # 一時的に盤面のサイズを変更する(テスト用)
+      #
+      #   before do
+      #     @size_save = Dimension.wh_change([3, 5])
+      #   end
+      #   after do
+      #     Dimension.wh_change(@size_save)
+      #   end
+      #
+      def wh_change(wsize, &block)
+        save_value = dimension_wh
+        h, v = wsize
+        PlaceX.dimension_set(h)
+        PlaceY.dimension_set(v)
+        if block_given?
+          begin
+            yield
+          ensure
+            h, v = save_value
+            PlaceX.dimension_set(h)
+            PlaceY.dimension_set(v)
+          end
+        else
+          save_value
+        end
+      end
+
+      def dimension_info
+        DimensionInfo.fetch(dimension_wh)
+      end
+
+      def dimension_wh
+        [PlaceX.dimension, PlaceY.dimension]
+      end
+    end
+  end
+end