rabbit-qt 0.1.0

data/lib/rabbit/config.rb

@@ -0,0 +1,40 @@
+# Copyright (C) 2005-2012  Kouhei Sutou <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 'rbconfig'
+
+module Rabbit
+  module Config
+    IMAGE_PATH = [
+      File.join(File.dirname(__FILE__), "..", "..", "data"),
+      RbConfig::CONFIG["datadir"],
+    ]
+    append_path_from_gem = lambda do
+      return unless Object.const_defined?(:Gem)
+      rabbit_gem_spec = Gem.loaded_specs["rabbit"]
+      return if rabbit_gem_spec.nil?
+      unless rabbit_gem_spec.respond_to?(:activated?)
+        def rabbit_gem_spec.activated?
+          loaded?
+        end
+      end
+      if rabbit_gem_spec.activated?
+        IMAGE_PATH.unshift(File.join(rabbit_gem_spec.full_gem_path, "data"))
+      end
+    end
+    append_path_from_gem.call
+  end
+end

data/lib/rabbit/console/roff.rb

@@ -0,0 +1,84 @@
+require "optparse"
+
+class OptionParser
+  class Category
+    def initialize(str)
+      @name = str
+    end
+
+    def summarize(*args, &block)
+      yield('')
+      yield(@name)
+    end
+
+    def summarize_as_roff(&block)
+      yield(".SH #{::OptionParser.roff_escape(@name)}")
+    end
+  end
+
+  class Switch
+    def summarize_as_roff(&block)
+      var = nil
+      opt_str = [@short, @long].flatten.collect {|s|
+                  "\\fB#{::OptionParser.roff_escape(s)}\\fR"
+                }.join(', ')
+      opt_str << arg.sub(/\A([=\s\[]*)(.+?)([\s\]]*)\z/) {
+        var = $2
+        "#{$1}\\fI#{$2}\\fR#{$3}"
+      } if arg
+      yield('.TP')
+      yield(opt_str)
+      desc.each do |d|
+        d_str = ::OptionParser.roff_escape(d)
+        d_str.gsub!(var) { "\\fI#{var}\\fR" } if var
+        yield(d_str)
+      end
+    end
+  end
+
+  class List
+    def summarize_as_roff(&block)
+      list.each do |opt|
+        if opt.respond_to?(:summarize_as_roff)
+          opt.summarize_as_roff(&block)
+        end
+        # FIXME: and otherwise process separators and banners...
+      end
+    end
+  end
+
+  # TODO: decide whether we show this option in the option summary.
+  Officious['roff'] = proc do |parser|
+    Switch::NoArgument.new do
+      puts parser.roff
+      exit
+    end
+  end
+
+  # TODO: make this option user-visible after implementing all.
+  Officious['man'] = proc do |parser|
+    Switch::NoArgument.new do
+      IO.popen('man -l -', 'w') do |io|
+        io.puts parser.roff
+      end
+      exit
+    end
+  end
+
+  def roff
+    to = [%[.TH #{self.class.roff_escape(program_name.upcase)} "1"]]
+    visit(:summarize_as_roff) do |l|
+      to << l + $/
+    end
+    to
+  end
+
+  def category(str)
+    top.append(Category.new(str), nil, nil)
+  end
+
+  def self.roff_escape(str)
+    str.gsub(/[-\\]/, '\\\\\\&').gsub(/^[.']/, '\\&') # '
+    # TODO: taken over from rd2man-lib.rb, necessary to be confirmed
+  end
+end

data/lib/rabbit/console.rb

@@ -0,0 +1,218 @@
+# Copyright (C) 2005-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 'English'
+
+require "shellwords"
+require "optparse"
+require "optparse/date"
+require "optparse/time"
+require "ostruct"
+require "uri"
+require "pathname"
+
+require_relative "rabbit"
+
+require_relative "console/roff"
+
+Thread.abort_on_exception = true
+
+module Rabbit
+  class Console
+    include GetText
+
+    @@locale_dir_option_name = "--locale-dir"
+
+    class << self
+      def parse!(args, &block)
+        new.parse!(args, &block)
+      end
+
+      def get_last_name(klass)
+        klass.name.split("::").last
+      end
+    end
+
+    def initialize
+      @have_custom_logger = false
+    end
+
+    def parse!(args)
+      options = OpenStruct.new
+      options.druby_uri = "druby://127.0.0.1:10101"
+      options.version = VERSION
+      options.options_file = nil
+      options.rest = []
+      options.before_hooks = []
+      options.after_hooks = []
+
+      process_locale_options(args)
+
+      parser = OptionParser.new(banner) do |_parser|
+        yield(_parser, options)
+        setup_common_options(_parser, options)
+      end
+
+      begin
+        options_file = options.options_file
+        if options_file and File.file?(options_file)
+          read_options_file(parser, options, options_file)
+        end
+        options.before_hooks.each do |hook|
+          hook.call(self, parser, options)
+        end
+        options.rest.concat(parser.parse!(args))
+        options.after_hooks.each do |hook|
+          hook.call(self, parser, options)
+        end
+      rescue => error
+        Rabbit.logger.error("#{error.class}: #{error.message}")
+        error.backtrace.each do |line|
+          Rabbit.logger.error(line)
+        end
+        raise
+      end
+
+      options
+    end
+
+    def read_options_file(parser, options, options_file)
+      options_in_file = []
+      File.open(options_file) do |file|
+        file.each_line do |line|
+          options_in_file.concat(Shellwords.split(line))
+        end
+      end
+      source_info = parser.parse(options_in_file)
+
+      source_info = source_info.collect do |path|
+        if URI(path).scheme
+          path
+        else
+          if Pathname(path).absolute?
+            path
+          else
+            File.join(File.dirname(options_file), path)
+          end
+        end
+      end
+      options.rest.concat(source_info)
+    end
+
+    private
+    def banner
+      _("Usage: %s [options]") % File.basename($0, '.*')
+    end
+
+    def process_locale_options(args)
+      args.each_with_index do |arg, i|
+        if arg == @@locale_dir_option_name
+          self.class.bindtextdomain(GetText::DOMAIN, :path => args[i + 1])
+        elsif /#{@@locale_dir_option_name}=/ =~ arg
+          self.class.bindtextdomain(GetText::DOMAIN, :path => $POSTMATCH)
+        end
+      end
+    end
+
+    def setup_common_options(parser, options)
+      parser.separator ""
+      parser.separator _("Common options")
+
+      setup_options_options(parser, options)
+      setup_locale_options(parser, options)
+      setup_logger_options(parser, options)
+      setup_common_options_on_tail(parser, options)
+    end
+
+    def setup_options_options(parser, options)
+      parser.on("--options-file=FILE",
+                _("Load options from FILE."),
+                _("(none)")) do |file|
+        read_options_file(parser, options, file)
+      end
+
+      parser.separator ""
+    end
+
+    def setup_locale_options(parser, options)
+      parser.on("--locale-dir=DIR",
+                _("Specify locale dir as [DIR]."),
+                _("(auto)")) do |directory|
+        self.class.bindtextdomain(GetText::DOMAIN, :path => directory)
+      end
+
+      parser.separator ""
+    end
+
+    def setup_logger_options(parser, options)
+      logger_type_names = Rabbit::Logger.types.collect do |x|
+        get_last_name(x).downcase
+      end
+
+      default_logger_class = ::Rabbit.logger.class
+      parser.on("--logger-type=TYPE",
+                logger_type_names,
+                _("Specify logger type as [TYPE]."),
+                _("Select from [%s].") % logger_type_names.join(', '),
+                "(#{get_last_name(default_logger_class)})") do |logger_type|
+        logger_class = Rabbit::Logger.types.find do |t|
+          get_last_name(t).downcase == logger_type.downcase
+        end
+        if logger_class.nil?
+          ::Rabbit.logger.error("Unknown logger type: #{t}")
+        else
+          ::Rabbit.logger = logger_class.new
+          @have_custom_logger = true
+        end
+      end
+
+      level_names = Logger::Severity.names
+      default_logger_level = ::Rabbit.logger.level
+      parser.on("--log-level=LEVEL",
+                level_names,
+                _("Specify log level as [LEVEL]."),
+                _("Select from [%s].") % level_names.join(', '),
+                "(#{Logger::Severity.name(default_logger_level)})") do |name|
+        options.logger.level = Logger::Severity.level(name)
+      end
+
+      parser.separator ""
+    end
+
+    def setup_common_options_on_tail(parser, options)
+      parser.on_tail("--help", _("Show this message.")) do
+        output_info_and_exit(options, parser.to_s)
+      end
+
+      parser.on_tail("--version", _("Show version.")) do
+        output_info_and_exit(options, "#{options.version}\n")
+      end
+    end
+
+    def output_info_and_exit(options, message)
+      if !@have_custom_logger and ::Rabbit.logger.is_a?(Logger::STDERR)
+        ::Rabbit.logger.info(message)
+      else
+        puts(message)
+      end
+      exit
+    end
+
+    def get_last_name(klass)
+      self.class.get_last_name(klass)
+    end
+  end
+end

data/lib/rabbit/cursor-manager.rb

@@ -0,0 +1,66 @@
+# Copyright (C) 2006-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.
+
+module Rabbit
+  class CursorManager
+    CURSORS = {
+      none: ::Qt::BlankCursor,
+      graffiti: ::Qt::CrossCursor,
+      gesture: ::Qt::ClosedHandCursor,
+    }
+
+    attr_accessor :current
+    def initialize
+      @stocks = {}
+      @current = nil
+    end
+
+    def keep(name)
+      @stocks[name] ||= []
+      @stocks[name].push(@current)
+    end
+
+    def restore(widget, name)
+      if name.nil?
+        type = @current
+      else
+        type = @stocks[name].pop
+      end
+      if type.nil?
+        widget.unset_cursor
+      else
+        widget.set_cursor(QCursor.new(type_to_cursor(type)))
+      end
+    end
+
+    def update(widget, type)
+      if type.nil?
+        widget.unset_cursor
+      else
+        widget.set_cursor(QCursor.new(type_to_cursor(type)))
+      end
+    end
+
+    private
+    def type_to_cursor(type)
+      cursor = CURSORS[type]
+      if cursor.nil?
+        raise UnknownCursorTypeError.new(type)
+      end
+      cursor
+    end
+  end
+end

data/lib/rabbit/dependency-canvas.rb

@@ -0,0 +1,33 @@
+# Copyright (C) 2006-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 "canvas"
+
+module Rabbit
+  class DependencyCanvas < Canvas
+    extend Forwardable
+
+    def_delegators(:@parent,
+                   :theme_name, :allotted_time, :rest_time, :activate)
+
+    def initialize(parent, *rest, &block)
+      @parent = parent
+      super(*rest, &block)
+      self.base_width = @parent.base_width
+      self.base_height = @parent.base_height
+    end
+  end
+end

data/lib/rabbit/element/base/draw-hook.rb

@@ -0,0 +1,75 @@
+module Rabbit
+  module Element
+    module Base
+      module DrawHook
+        @@draw_hook_names = []
+
+        class << self
+          def def_draw_hook(klass, name)
+            @@draw_hook_names << name
+            base_name = "#{name}_draw_proc"
+            var_name = "@#{base_name}s"
+            klass.module_eval(<<-EOC, __FILE__, __LINE__ + 1)
+              def add_#{base_name}(name=nil, &block)
+                #{var_name} << [block, name]
+                block
+              end
+
+              def delete_#{base_name}(name=nil, &block)
+                #{var_name}.reject! do |blk,|
+                  blk == block
+                end
+              end
+
+              def delete_#{base_name}_by_name(name)
+                #{var_name}.reject! do |_, nm|
+                  name === nm
+                end
+              end
+
+              def clear_#{base_name}s
+                #{var_name} = []
+              end
+
+              def #{base_name}s(name)
+                #{var_name}.find_all do |_, nm|
+                  name === nm
+                end
+              end
+
+              def #{base_name}(name)
+                #{var_name}.find do |_, nm|
+                  name === nm
+                end
+              end
+EOC
+          end
+
+          def def_draw_hooks(klass, *names)
+            names.each do |name|
+              klass.def_draw_hook(name)
+            end
+          end
+
+          private
+          def append_features(klass)
+            super
+            methods(false).each do |name|
+              klass.module_eval(<<-EOC, __FILE__, __LINE__ + 1)
+                def self.#{name}(*args)
+                  #{self.name}.#{name}(self, *args)
+                end
+EOC
+            end
+          end
+        end
+
+        def clear_draw_procs
+          @@draw_hook_names.each do |name|
+            __send__("clear_#{name}_draw_procs")
+          end
+        end
+      end
+    end
+  end
+end