rabbit-qt 0.1.0

data/lib/rabbit/key-handler.rb

@@ -0,0 +1,227 @@
+# Copyright (C) 2004-2025  Sutou Kouhei <kou@cozmixng.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.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+require_relative "qt"
+require_relative "keys"
+
+module Rabbit
+  class KeyHandler
+    def initialize(canvas, window)
+      @canvas = canvas
+      @window = window
+      @key_map = {}
+      @user_blocks = {}
+      init
+    end
+
+    def connect_key(keyval, modifier, flags, &block)
+      @user_blocks[[keyval, normalize_modifier(modifier)]] = block
+    end
+
+    def disconnect_key(keyval, modifier)
+      @user_blocks.delete([keyval, normalize_modifier(modifier)])
+    end
+
+    def clear
+      @user_blocks.clear
+    end
+
+    def detach
+      @window.register_key_handler(nil) if @window.respond_to?(:register_key_handler)
+    end
+
+    def pre_terminal
+      # Terminal not supported in Qt version
+    end
+
+    def post_terminal
+      # Terminal not supported in Qt version
+    end
+
+    def handle_key_press(key, modifiers)
+      mod = normalize_qt_modifiers(modifiers)
+
+      # Check user-defined key bindings first
+      block = @user_blocks[[key, mod]]
+      if block
+        block.call
+        return true
+      end
+
+      # Check built-in key map
+      entry = @key_map[[key, mod]]
+      if entry
+        action_name, parameter = entry
+        @canvas.activate(action_name, parameter)
+        return true
+      end
+
+      false
+    end
+
+    private
+    def init
+      init_keys
+      @window.register_key_handler(self) if @window.respond_to?(:register_key_handler)
+    end
+
+    def normalize_modifier(mod)
+      return 0 if mod.nil?
+      mod.respond_to?(:to_i) ? mod.to_i : mod
+    end
+
+    def normalize_qt_modifiers(modifiers)
+      m = modifiers.to_i
+      result = 0
+      result |= ::Qt::ShiftModifier.to_i if (m & ::Qt::ShiftModifier.to_i) != 0
+      result |= ::Qt::ControlModifier.to_i if (m & ::Qt::ControlModifier.to_i) != 0
+      result |= ::Qt::AltModifier.to_i if (m & ::Qt::AltModifier.to_i) != 0
+      result
+    end
+
+    def set_keys(action_name, action_arguments, keys, mod)
+      keys.each do |key|
+        @key_map[[key, mod]] = [action_name, action_arguments]
+      end
+    end
+
+    def have_slide_number_related_mask?(mod)
+      (mod & ::Qt::ControlModifier) != 0 || (mod & ::Qt::AltModifier) != 0
+    end
+
+    def calc_slide_number(val, mod)
+      val += 10 if (mod & ::Qt::ControlModifier) != 0
+      val += 20 if (mod & ::Qt::AltModifier) != 0
+      val
+    end
+
+    def init_keys
+      init_move_slide_keys
+      init_no_prefix_keys
+      init_shift_keys
+      init_control_keys
+      init_alt_keys
+    end
+
+    def init_move_slide_keys
+      no_mod = ::Qt::NoModifier
+      mods = Utils.power_set([
+                               ::Qt::ControlModifier,
+                               ::Qt::AltModifier,
+                             ])
+      mods.each do |mod|
+        mod = mod.inject(no_mod) do |result, item|
+          result | item
+        end
+        number_keys = [
+          ::Qt::Key_0, ::Qt::Key_1, ::Qt::Key_2, ::Qt::Key_3, ::Qt::Key_4,
+          ::Qt::Key_5, ::Qt::Key_6, ::Qt::Key_7, ::Qt::Key_8, ::Qt::Key_9,
+        ]
+        (0..9).each do |i|
+          key = number_keys[i]
+          index = calc_slide_number(i, mod)
+          set_keys("JumpToSlide", index, [key], mod)
+        end
+        if mod == no_mod
+          set_keys("NextSlide",
+                   nil,
+                   Keys::MOVE_TO_NEXT_SLIDE_KEYS,
+                   mod)
+          set_keys("PreviousSlide",
+                   nil,
+                   Keys::MOVE_TO_PREVIOUS_SLIDE_KEYS,
+                   mod)
+        else
+          set_keys("JumpToRelativeSlide",
+                   calc_slide_number(0, mod),
+                   Keys::MOVE_TO_NEXT_SLIDE_KEYS,
+                   mod)
+          set_keys("JumpToRelativeSlide",
+                   -calc_slide_number(0, mod),
+                   Keys::MOVE_TO_PREVIOUS_SLIDE_KEYS,
+                   mod)
+        end
+      end
+    end
+
+    def init_no_prefix_keys
+      mod = ::Qt::NoModifier
+      [
+        ["Quit", Keys::QUIT_KEYS],
+        ["Next", Keys::MOVE_TO_NEXT_KEYS],
+        ["Previous", Keys::MOVE_TO_PREVIOUS_KEYS],
+        ["FirstSlide", Keys::MOVE_TO_FIRST_KEYS],
+        ["LastSlide", Keys::MOVE_TO_LAST_KEYS],
+        ["ToggleFullscreen", Keys::TOGGLE_FULLSCREEN_KEYS],
+        ["ReloadTheme", Keys::RELOAD_THEME_KEYS],
+        ["SaveAsImage", Keys::SAVE_AS_IMAGE_KEYS],
+        ["Iconify", Keys::ICONIFY_KEYS],
+        ["ToggleIndexMode", Keys::TOGGLE_INDEX_MODE_KEYS],
+        ["CacheAllSlides", Keys::CACHE_ALL_SLIDES_KEYS],
+        ["SearchSlideForward", Keys::SEARCH_SLIDE_FORWARD_KEYS],
+        ["SearchSlideBackward", Keys::SEARCH_SLIDE_BACKWARD_KEYS],
+        ["SearchSlideForwardNext", Keys::SEARCH_SLIDE_FORWARD_NEXT_KEYS],
+      ].each do |action_name, keys|
+        set_keys(action_name, nil, keys, mod)
+      end
+    end
+
+    def init_shift_keys
+      mod = ::Qt::ShiftModifier
+      [
+        ["ToggleWhiteout", Keys::Shift::WHITE_OUT_KEYS],
+        ["ToggleBlackout", Keys::Shift::BLACK_OUT_KEYS],
+        ["ExpandHole", Keys::Shift::EXPAND_HOLE_KEYS],
+        ["NarrowHole", Keys::Shift::NARROW_HOLE_KEYS],
+        ["ToggleGraffitiMode", Keys::Shift::TOGGLE_GRAFFITI_MODE_KEYS],
+        ["SearchSlideBackwardNext",
+         Keys::Shift::SEARCH_SLIDE_BACKWARD_NEXT_KEYS],
+        ["ToggleInfoWindow", Keys::Shift::TOGGLE_INFO_WINDOW_KEYS],
+      ].each do |action_name, keys|
+        set_keys(action_name, nil, keys, mod)
+      end
+    end
+
+    def init_control_keys
+      mod = ::Qt::ControlModifier
+      [
+        ["ClearGraffiti", Keys::Control::CLEAR_GRAFFITI_KEYS],
+        ["UndoGraffiti", Keys::Control::UNDO_GRAFFITI_KEYS],
+        ["ClearSlide", Keys::Control::CLEAR_SLIDE_KEYS],
+        ["Print", Keys::Control::PRINT_KEYS],
+        ["SearchSlideForward", Keys::Control::SEARCH_SLIDE_FORWARD_KEYS],
+        ["SearchSlideBackward", Keys::Control::SEARCH_SLIDE_BACKWARD_KEYS],
+        ["SearchSlideForwardNext",
+         Keys::Control::SEARCH_SLIDE_FORWARD_NEXT_KEYS],
+        ["SearchSlideBackwardNext",
+         Keys::Control::SEARCH_SLIDE_BACKWARD_NEXT_KEYS],
+        ["StopSlideSearch", Keys::Control::STOP_SLIDE_SEARCH_KEYS],
+      ].each do |action_name, keys|
+        set_keys(action_name, nil, keys, mod)
+      end
+    end
+
+    def init_alt_keys
+      mod = ::Qt::AltModifier
+      [
+        ["ResetAdjustment", Keys::Alt::RESET_ADJUSTMENT_KEYS],
+        ["ResetTimer", Keys::Alt::RESET_TIMER_KEYS],
+      ].each do |action_name, keys|
+        set_keys(action_name, nil, keys, mod)
+      end
+    end
+  end
+end

data/lib/rabbit/keys.rb

@@ -0,0 +1,209 @@
+# Copyright (C) 2004-2025  Sutou Kouhei <kou@cozmixng.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.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+require_relative "qt"
+
+module Rabbit
+  module Keys
+
+    QUIT_KEYS = [
+      ::Qt::Key_Escape,
+      ::Qt::Key_Q,
+    ]
+
+    MOVE_TO_NEXT_KEYS = [
+      ::Qt::Key_N,
+      ::Qt::Key_F,
+      ::Qt::Key_J,
+      ::Qt::Key_L,
+      ::Qt::Key_PageDown,
+      ::Qt::Key_Tab,
+      ::Qt::Key_Return,
+      ::Qt::Key_Right,
+      ::Qt::Key_Down,
+      ::Qt::Key_Space,
+      ::Qt::Key_Plus,
+      ::Qt::Key_PageDown,   # KP_Page_Down
+      ::Qt::Key_Enter,      # KP_Enter
+      ::Qt::Key_Tab,        # KP_Tab
+    ]
+
+    MOVE_TO_NEXT_SLIDE_KEYS = [
+      ::Qt::Key_Right,
+      ::Qt::Key_Down,
+    ]
+
+    MOVE_TO_PREVIOUS_KEYS = [
+      ::Qt::Key_P,
+      ::Qt::Key_B,
+      ::Qt::Key_H,
+      ::Qt::Key_K,
+      ::Qt::Key_PageUp,
+      ::Qt::Key_Left,
+      ::Qt::Key_Up,
+      ::Qt::Key_Backspace,
+      ::Qt::Key_Delete,
+      ::Qt::Key_Minus,
+      ::Qt::Key_PageUp,    # KP_Page_Up
+      ::Qt::Key_Delete,    # KP_Delete
+    ]
+
+    MOVE_TO_PREVIOUS_SLIDE_KEYS = [
+      ::Qt::Key_Left,
+      ::Qt::Key_Up,
+    ]
+
+    MOVE_TO_FIRST_KEYS = [
+      ::Qt::Key_A,
+      ::Qt::Key_Home,
+      ::Qt::Key_Less,
+    ]
+
+    MOVE_TO_LAST_KEYS = [
+      ::Qt::Key_E,
+      ::Qt::Key_End,
+      ::Qt::Key_Greater,
+      ::Qt::Key_Dollar,
+    ]
+
+    TOGGLE_FULLSCREEN_KEYS = [
+      ::Qt::Key_F5,
+      ::Qt::Key_F10,
+      ::Qt::Key_F11,
+    ]
+
+    RELOAD_THEME_KEYS = [
+      ::Qt::Key_T,
+      ::Qt::Key_R,
+    ]
+
+    SAVE_AS_IMAGE_KEYS = [
+      ::Qt::Key_S,
+    ]
+
+    ICONIFY_KEYS = [
+      ::Qt::Key_Z,
+    ]
+
+    TOGGLE_INDEX_MODE_KEYS = [
+      ::Qt::Key_I,
+    ]
+
+    CACHE_ALL_SLIDES_KEYS = [
+      ::Qt::Key_C,
+    ]
+
+    SEARCH_SLIDE_FORWARD_KEYS = [
+      ::Qt::Key_Slash,
+    ]
+
+    SEARCH_SLIDE_BACKWARD_KEYS = [
+      ::Qt::Key_Question,
+    ]
+
+    SEARCH_SLIDE_FORWARD_NEXT_KEYS = [
+      ::Qt::Key_N,
+    ]
+
+    STOP_SLIDE_SEARCH_KEYS = [
+      ::Qt::Key_Escape,
+    ]
+
+    module Shift
+      WHITE_OUT_KEYS = [
+        ::Qt::Key_W,
+      ]
+
+      BLACK_OUT_KEYS = [
+        ::Qt::Key_B,
+      ]
+
+      EXPAND_HOLE_KEYS = [
+        ::Qt::Key_E,
+      ]
+
+      NARROW_HOLE_KEYS = [
+        ::Qt::Key_N,
+      ]
+
+      TOGGLE_GRAFFITI_MODE_KEYS = [
+        ::Qt::Key_G,
+      ]
+
+      SEARCH_SLIDE_BACKWARD_NEXT_KEYS = [
+        ::Qt::Key_N,
+      ]
+
+      TOGGLE_INFO_WINDOW_KEYS = [
+        ::Qt::Key_I,
+      ]
+    end
+
+    module Control
+      CLEAR_SLIDE_KEYS = [
+        ::Qt::Key_L,
+      ]
+
+      PRINT_KEYS = [
+        ::Qt::Key_P,
+      ]
+
+      UNDO_GRAFFITI_KEYS = [
+        ::Qt::Key_Z,
+      ]
+
+      CLEAR_GRAFFITI_KEYS = [
+        ::Qt::Key_L,
+      ]
+
+      SEARCH_SLIDE_FORWARD_KEYS = [
+        ::Qt::Key_S,
+      ]
+
+      SEARCH_SLIDE_BACKWARD_KEYS = [
+        ::Qt::Key_R,
+      ]
+
+      SEARCH_SLIDE_FORWARD_NEXT_KEYS = [
+        ::Qt::Key_S,
+      ]
+
+      SEARCH_SLIDE_BACKWARD_NEXT_KEYS = [
+        ::Qt::Key_R,
+      ]
+
+      STOP_SLIDE_SEARCH_KEYS = [
+        ::Qt::Key_G,
+      ]
+    end
+
+    module Alt
+      RESET_ADJUSTMENT_KEYS = [
+        ::Qt::Key_A,
+      ]
+
+      RESET_TIMER_KEYS = [
+        ::Qt::Key_T,
+      ]
+    end
+
+    module ShiftControlAlt
+      TOGGLE_TERMINAL_KEYS = [
+        ::Qt::Key_T,
+      ]
+    end
+  end
+end

data/lib/rabbit/logger/base.rb

@@ -0,0 +1,147 @@
+# Copyright (C) 2004-2025  Sutou Kouhei <kou@cozmixng.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.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+require_relative "../gettext"
+
+module Rabbit
+  module Logger
+
+    module Severity
+      class << self
+        def names
+          MARK_TABLE.sort_by {|key, _| key}.collect {|_, value| value.downcase}
+        end
+
+        def name(level)
+          MARK_TABLE[level].downcase
+        end
+
+        def level(name)
+          MARK_TABLE.find do |key, value|
+            value.downcase == name.downcase
+          end[0]
+        end
+
+        def N_(message)
+          message
+        end
+      end
+
+      DEBUG = 0
+      INFO = 1
+      WARNING = 2
+      ERROR = 3
+      FATAL = 4
+      UNKNOWN = 5
+
+      MARK_TABLE = {
+        DEBUG => N_("DEBUG"),
+        INFO => N_("INFO"),
+        WARNING => N_("WARNING"),
+        ERROR => N_("ERROR"),
+        FATAL => N_("FATAL"),
+        UNKNOWN => N_("UNKNOWN"),
+      }
+    end
+
+    module Base
+      include GetText
+
+      attr_accessor :level, :webrick_mode
+      def initialize(level=Severity::INFO, prog_name=nil)
+        @level = level
+        @prog_name = prog_name
+        @webrick_mode = false
+      end
+
+      def debug?; @level <= Severity::DEBUG; end
+      def info?; @level <= Severity::INFO; end
+      def warning?; @level <= Severity::WARNING; end
+      def error?; @level <= Severity::ERROR; end
+      def fatal?; @level <= Severity::FATAL; end
+      def unknown?; @level <= Severity::UNKNOWN; end
+
+      def debug(message_or_error=nil, &block)
+        log(Severity::DEBUG, message_or_error, &block)
+      end
+
+      def info(message_or_error=nil, &block)
+        log(Severity::INFO, message_or_error, &block)
+      end
+
+      def warning(message_or_error=nil, &block)
+        log(Severity::WARNING, message_or_error, &block)
+      end
+      alias_method :warn, :warning # for backward compatibility
+
+      def error(message_or_error=nil, &block)
+        log(Severity::ERROR, message_or_error, &block)
+      end
+
+      def fatal(message_or_error=nil, &block)
+        log(Severity::FATAL, message_or_error, &block)
+      end
+
+      def unknown(message_or_error=nil, &block)
+        log(Severity::UNKNOWN, message_or_error, &block)
+      end
+
+      def <<(message_or_error)
+        info(message_or_error)
+      end
+
+      def log(severity, message_or_error, prog_name=nil, &block)
+        severity ||= Severity::UNKNOWN
+        prog_name ||= @prog_name
+        if need_log?(severity)
+          if message_or_error.nil? and block_given?
+            message_or_error = yield
+          end
+          if message_or_error
+            do_log(severity, prog_name, make_message(message_or_error))
+          end
+        end
+      end
+      alias add log
+
+      private
+      def format_severity(severity)
+        "[#{_(Severity::MARK_TABLE[severity])}]"
+      end
+
+      def format_datetime(datetime)
+        datetime.strftime("%Y-%m-%dT%H:%M:%S.") << "%06d " % datetime.usec
+      end
+
+      def make_message(message_or_error)
+        if message_or_error.is_a?(Exception)
+          "#{message_or_error.class}: #{message_or_error.message}\n" +
+            %Q[#{message_or_error.backtrace.join("\n")}]
+        else
+          message_or_error
+        end
+      end
+
+      def need_log?(severity)
+        if @webrick_mode
+          severity <= WEBrick::Log::DEBUG - @level
+        else
+          severity >= @level
+        end
+      end
+    end
+  end
+end

data/lib/rabbit/logger/gui.rb

@@ -0,0 +1,113 @@
+# Copyright (C) 2004-2025  Sutou Kouhei <kou@cozmixng.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.,
+# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
+
+require_relative "../qt"
+
+require_relative "../keys"
+require_relative "base"
+
+module Rabbit
+  module Logger
+
+    class GUI
+      include Base
+
+      SEVERITY_COLORS = {
+        "DEBUG"   => "blue",
+        "INFO"    => "blue",
+        "WARNING" => "red",
+        "ERROR"   => "red",
+        "FATAL"   => "yellow",
+        "UNKNOWN" => "yellow",
+        "ANY"     => "black",
+      }
+
+      attr_accessor :start_gui_main_loop_automatically
+      def initialize(level=nil, width=450, height=400)
+        super(*[level].compact)
+        @width = width
+        @height = height
+        @start_gui_main_loop_automatically = false
+        init_dialog
+      end
+
+      def clear_buffer
+        @text_edit.clear
+      end
+
+      def quit
+        @dialog.close
+      end
+
+      private
+      def do_log(severity, prog_name, message)
+        @current_severity = severity
+        init_dialog if @dialog.nil?
+        @dialog.show
+        log_severity(severity)
+        log_prog_name(prog_name)
+        log_message(message)
+      end
+
+      def log_severity(severity)
+        name = Severity::MARK_TABLE[severity]
+        color = SEVERITY_COLORS[name] || "black"
+        append_html("<b style='color:#{color}'>[#{_(name)}]</b><br>")
+      end
+
+      def log_prog_name(prog_name)
+        if prog_name
+          append_html("<b style='color:blue; margin-left:10px'>#{prog_name}: </b>")
+        end
+      end
+
+      def log_message(message)
+        escaped = message.to_s.gsub("&", "&amp;").gsub("<", "&lt;").gsub(">", "&gt;")
+        append_html("<span style='margin-left:10px'>#{escaped}</span><br>")
+      end
+
+      def append_html(html)
+        @text_edit.append(html)
+      end
+
+      def title
+        _("Rabbit Error Dialog")
+      end
+
+      def init_dialog(width=@width, height=@height)
+        @dialog = QDialog.new
+        @dialog.set_window_title(title)
+        @dialog.resize(width, height)
+
+        layout = QVBoxLayout.new(@dialog)
+
+        @text_edit = QTextEdit.new
+        @text_edit.set_read_only(true)
+        layout.add_widget(@text_edit)
+
+        button_layout = QHBoxLayout.new
+        clear_button = QPushButton.new(_("Clear"))
+        close_button = QPushButton.new(_("Close"))
+        button_layout.add_widget(clear_button)
+        button_layout.add_widget(close_button)
+        layout.add_layout(button_layout)
+
+        Rabbit::Qt.connect_signal(clear_button.clicked) { clear_buffer }
+        Rabbit::Qt.connect_signal(close_button.clicked) { quit }
+      end
+    end
+  end
+end