rabbit 1.0.9 → 2.0.0

data/GPL

@@ -1,12 +1,12 @@
-		    GNU GENERAL PUBLIC LICENSE
-		       Version 2, June 1991
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 2, June 1991
 
- Copyright (C) 1989, 1991 Free Software Foundation, Inc.
-                       59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ Copyright (C) 1989, 1991 Free Software Foundation, Inc.,
+ 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  Everyone is permitted to copy and distribute verbatim copies
  of this license document, but changing it is not allowed.
 
-			    Preamble
+                            Preamble
 
   The licenses for most software are designed to take away your
 freedom to share and change it.  By contrast, the GNU General Public
@@ -15,7 +15,7 @@ software--to make sure the software is free for all its users.  This
 General Public License applies to most of the Free Software
 Foundation's software and to any other program whose authors commit to
 using it.  (Some other Free Software Foundation software is covered by
-the GNU Library General Public License instead.)  You can apply it to
+the GNU Lesser General Public License instead.)  You can apply it to
 your programs, too.
 
   When we speak of free software, we are referring to freedom, not
@@ -55,8 +55,8 @@ patent must be licensed for everyone's free use or not licensed at all.
 
   The precise terms and conditions for copying, distribution and
 modification follow.
-
-		    GNU GENERAL PUBLIC LICENSE
+
+                    GNU GENERAL PUBLIC LICENSE
    TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
 
   0. This License applies to any program or other work which contains
@@ -110,7 +110,7 @@ above, provided that you also meet all of these conditions:
     License.  (Exception: if the Program itself is interactive but
     does not normally print such an announcement, your work based on
     the Program is not required to print an announcement.)
-
+
 These requirements apply to the modified work as a whole.  If
 identifiable sections of that work are not derived from the Program,
 and can be reasonably considered independent and separate works in
@@ -168,7 +168,7 @@ access to copy from a designated place, then offering equivalent
 access to copy the source code from the same place counts as
 distribution of the source code, even though third parties are not
 compelled to copy the source along with the object code.
-
+
   4. You may not copy, modify, sublicense, or distribute the Program
 except as expressly provided under this License.  Any attempt
 otherwise to copy, modify, sublicense or distribute the Program is
@@ -225,7 +225,7 @@ impose that choice.
 
 This section is intended to make thoroughly clear what is believed to
 be a consequence of the rest of this License.
-
+
   8. If the distribution and/or use of the Program is restricted in
 certain countries either by patents or by copyrighted interfaces, the
 original copyright holder who places the Program under this License
@@ -255,7 +255,7 @@ make exceptions for this.  Our decision will be guided by the two goals
 of preserving the free status of all derivatives of our free software and
 of promoting the sharing and reuse of software generally.
 
-			    NO WARRANTY
+                            NO WARRANTY
 
   11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
 FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
@@ -277,9 +277,9 @@ YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
 PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
 POSSIBILITY OF SUCH DAMAGES.
 
-		     END OF TERMS AND CONDITIONS
-
-	    How to Apply These Terms to Your New Programs
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
 
   If you develop a new program, and you want it to be of the greatest
 possible use to the public, the best way to achieve this is to make it
@@ -303,10 +303,9 @@ the "copyright" line and a pointer to where the full notice is found.
     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
-
+    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.
 
 Also add information on how to contact you by electronic and paper mail.
 
@@ -336,5 +335,5 @@ necessary.  Here is a sample; alter the names:
 This General Public License does not permit incorporating your program into
 proprietary programs.  If your program is a subroutine library, you may
 consider it more useful to permit linking proprietary applications with the
-library.  If this is what you want to do, use the GNU Library General
+library.  If this is what you want to do, use the GNU Lesser General
 Public License instead of this License.

data/Rakefile

@@ -1,19 +1,36 @@
 # -*- ruby -*-
+#
+# Copyright (C) 2008-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 "find"
 require "rubygems"
 require "rubygems/package_task"
 require "bundler/gem_helper"
+require "gettext/task"
 
 base_dir = File.expand_path(File.dirname(__FILE__))
 $LOAD_PATH.unshift(File.join(base_dir, 'lib'))
-require 'rabbit/rabbit'
 
 rsync_base_path = "rabbit@rabbit-shockers.org:public_html/"
 
 helper = Bundler::GemHelper.new(base_dir)
 helper.install
 spec = helper.gemspec
+version = spec.version.to_s
 
 def force_array(enumerable)
   array = []
@@ -31,6 +48,11 @@ def spec.extra_rdoc_files
   @extra_rdoc_files = force_array(super)
 end
 
+GetText::Task.new(spec) do |task|
+  task.files -= Dir.glob("sample/**/*.*")
+  task.mo_base_directory = "data"
+end
+
 Gem::PackageTask.new(spec) do |package|
   package.need_tar_gz = true
 end
@@ -147,15 +169,8 @@ task :tag do
   sh("git tag -a #{version} -m 'release #{version}!!!'")
 end
 
-namespace :mo do
-  desc "Update .mo."
-  task :update do
-    ruby("update-mo.rb")
-  end
-end
-
-task :build => "mo:update"
-task :package => "mo:update"
+task :build => "gettext"
+task :package => "gettext"
 
 namespace :package do
   desc "Upload tar.gz."

data/bin/rabbit

@@ -1,846 +1,22 @@
 #!/usr/bin/env ruby
 # -*- ruby -*-
-
-GC.disable
-require "rbconfig"
-
-require "rabbit/console"
-require "rabbit/source"
-require "rabbit/renderer"
-require "rabbit/front"
-
-def parse_args(args=ARGV, logger=nil)
-  Rabbit::Console.parse!(args, logger) do |opts, options|
-    options.theme = "default"
-    options.theme_specified = false
-    options.comment_theme = nil
-    options.allotted_time = ENV["RABBIT_ALLOTTED_TIME"]
-    options.base = nil
-    options.source_type = :auto
-    options.full_screen = false
-    options.index_mode = false
-    options.geometry = nil
-    options.width = 800
-    options.height = 600
-    options.paper_width = nil
-    options.paper_height = nil
-    options.save_as_image = false
-    options.saved_image_base_name = nil
-    options.saved_image_type = "png"
-    options.output_html = false
-    options.output_index_html = false
-    options.rss_base_uri = nil
-    options.encoding = nil
-    options.print = false
-    options.print_out_filename = nil
-    options.slides_per_page = 1
-    options.draw_scaled_image = true
-    options.margin_left = nil
-    options.margin_right = nil
-    options.margin_top = nil
-    options.margin_bottom = nil
-    options.page_margin_left = nil
-    options.page_margin_right = nil
-    options.page_margin_top = nil
-    options.page_margin_bottom = nil
-    options.use_druby = true
-    options.druby_uri = "druby://127.0.0.1:10101"
-    options.output_druby_uri = false
-    options.use_soap = false
-    options.soap_host = "0.0.0.0"
-    options.soap_port = 10103
-    options.use_xmlrpc = false
-    options.xmlrpc_host = "0.0.0.0"
-    options.xmlrpc_port = 10104
-    options.server = false
-    options.default_public_level = "all"
-    options.public_level = nil
-    options.migemo_dictionary_search_path = [
-      File.join(RbConfig::CONFIG["prefix"], "share"),
-      File.join("", "usr", "local", "share"),
-      File.join("", "usr", "share"),
-    ].uniq
-    options.migemo_dictionary_name = "migemo-dict"
-    options.use_gl = false
-    options.show_native_window_id = false
-    options.keep_above = false
-    options.source_filename = nil
-
-
-    opts.banner = "#{opts.banner} [SOURCE_INFOS]"
-
-    opts.category _("Theme")
-
-    opts.on("-I", "--include=PATH",
-            _("Add [PATH] to load path.")) do |path|
-      $LOAD_PATH.unshift(File.expand_path(path))
-    end
-
-    opts.on("-t", "--theme=THEME",
-            _("Use [THEME] as theme."),
-            "(#{options.theme})") do |theme|
-      options.theme = theme
-      options.theme_specified = true
-    end
-
-    opts.on("--comment-theme=THEME",
-            _("Use [THEME] for comment."),
-            "(#{options.comment_theme})") do |theme|
-      options.comment_theme = theme
-    end
-
-    opts.on("--allotted-time=TIME",
-            _("Use [TIME] as allotted time."),
-            "(#{options.allotted_time})") do |time|
-      options.allotted_time = time
-    end
-
-
-    opts.category _("Source")
-
-    source_type_names = Rabbit::Source.types.collect do |x|
-      Rabbit::Console.get_last_name(x).downcase
-    end
-    source_type_names.unshift("auto")
-    source_type_descs = Rabbit::Source.types.collect do |x|
-      message = _("When select %s\nspecify %s\nas [SOURCE_INFOS].")
-      type = Rabbit::Console.get_last_name(x)
-      message = message % [type, _(x.initial_args_description)]
-      message.split(/\n/) + [" "]
-    end.flatten
-    opts.on("-T", "--type=TYPE",
-            source_type_names,
-            _("Specify source type as [TYPE]."),
-            _("Select from [%s].") % source_type_names.join(', '),
-            _("Note: case insensitive."),
-            "(auto)",
-            " ",
-            *source_type_descs) do |source_type|
-      if source_type == "auto"
-        options.source_type = :auto
-      else
-        options.source_type = Rabbit::Source.types.find do |t|
-          Rabbit::Console.get_last_name(t).downcase == source_type.downcase
-        end
-      end
-    end
-
-    opts.on("-e", "--encoding=ENCODING",
-            _("Specify source encoding as [ENCODING]."),
-            _("(auto)")) do |encoding|
-      options.encoding = encoding
-    end
-
-    opts.on("-B", "--base=BASE",
-            _("Specify base URI or path of source as [BASE]."),
-            _("(auto)")) do |base|
-      options.base = base
-    end
-
-
-    opts.category _("Initial state")
-
-    opts.on("-f", "--[no-]full-screen",
-            _("Toggle full screen mode."),
-            "(#{options.full_screen ? 'on' : 'off'})") do |bool|
-      options.full_screen = bool
-    end
-
-    opts.on("--[no-]index-mode",
-            _("Toggle index mode."),
-            "(#{options.index_mode ? 'on' : 'off'})") do |bool|
-      options.index_mode = bool
-    end
-
-
-    opts.category _("Size")
-
-    opts.on("-g", "--geometry=GEOMETRY",
-            _("Set window geometry [GEOMETRY]."),
-            _("Format: WIDTHxHEIGHT+X+Y"),
-            "(#{options.geometry.inspect})") do |geometry|
-      options.geometry = geometry
-    end
-
-    opts.on("-w", "--width=WIDTH",
-            Integer,
-            _("Set window width to [WIDTH]."),
-            "(#{options.width})") do |width|
-      options.width = width
-    end
-
-    opts.on("-h", "--height=HEIGHT",
-            Integer,
-            _("Set window height to [HEIGHT]."),
-            "(#{options.height})") do |height|
-      options.height = height
-    end
-
-    message = _("Set window width and height to\n" \
-                "[WIDTH] and [HEIGHT].")
-    message = message.split(/\n/) + ["(#{options.width},#{options.height})"]
-    opts.on("-S", "--size=WIDTH,HEIGHT",
-            Array,
-            *message) do |size|
-      width, height = size.collect{|x| Integer(x)}
-      options.width = width
-      options.height = height
-    end
-
-
-    opts.category _("Save")
-
-    opts.on("-s", "--save-as-image",
-            _("Save as image and exit.")) do
-      options.save_as_image = true
-    end
-
-    opts.on("-i", "--saved-image-type=TYPE",
-            _("Specify saved image type as [TYPE]."),
-            "(#{options.saved_image_type})") do |t|
-      options.saved_image_type = t
-    end
-
-    opts.on("-b", "--saved-image-base-name=BASE_NAME",
-            "--saved-image-basename=BASE_NAME",
-            _("Specify saved image base name as [BASE_NAME]."),
-            "(" + _("Title of slide") + ")") do |b|
-      options.saved_image_base_name = b
-    end
-
-    opts.on("--[no-]output-html",
-            _("Output HTML for viewing saved images."),
-            "(#{options.output_html})") do |bool|
-      options.output_html = bool
-    end
-
-    opts.on("--[no-]output-index-html",
-            _("Output index HTML for navigating slides."),
-            "(#{options.output_index_html})") do |bool|
-      options.output_index_html = bool
-    end
-
-    opts.on("--rss-base-uri=URI",
-            _("Specify base URI of RSS as [URI]."),
-            _("RSS is generated only when HTML is output."),
-            "(#{options.rss_base_uri})") do |uri|
-      options.rss_base_uri = uri
-    end
-
-    opts.on("--source-filename=FILENAME",
-            _("Specify source filenam as [FILENAME]."),
-            "(#{options.source_filename})") do |filename|
-      options.source_filename = filename
-    end
-
-    opts.category _("Print")
-
-    opts.on("-p", "--print",
-            _("Print and exit.")) do
-      options.print = true
-    end
-
-    opts.on("-o", "--output-filename=FILENAME",
-            _("Specify printed out filename as [FILENAME]."),
-            "(\#{%s}.pdf)" % _("Title of slide")) do |f|
-      options.print_out_filename = f
-    end
-
-    opts.on("--slides-per-page=SLIDES",
-            Integer,
-            _("Set slides per page."),
-            "(1)") do |slides|
-      options.slides_per_page = slides
-    end
-
-    opts.on("--[no-]draw-scaled-image",
-            _("Draw scaled image."),
-            _("Better look for displaying but lesser look for printing."),
-            "(#{options.draw_scaled_image})") do |boolean|
-      options.draw_scaled_image = boolean
-    end
-
-    opts.category _("Paper")
-
-    opts.on("--paper-width=WIDTH",
-            Integer,
-            _("Set paper width to [WIDTH] Pt."),
-            _("(landscape A4 width)")) do |width|
-      options.paper_width = width
-    end
-
-    opts.on("--paper-height=HEIGHT",
-            Integer,
-            _("Set paper height to [HEIGHT] Pt."),
-            _("(landscape A4 height)")) do |height|
-      options.paper_height = height
-    end
-
-    message = _("Set paper width and height to\n" \
-                "[WIDTH] Pt and [HEIGHT] Pt.")
-    message = message.split(/\n/) + [_("(landscape A4 size)")]
-    opts.on("--paper-size=WIDTH,HEIGHT",
-            Array,
-            *message) do |size|
-      width, height = size.collect{|x| Integer(x)}
-      options.paper_width = width
-      options.paper_height = height
-    end
-
-
-    opts.category _("Margin")
-
-    opts.on("--margin-left=MARGIN",
-            Integer,
-            _("Set left margin for slides per page mode print."),
-            _("(auto)")) do |margin|
-      options.margin_left = margin
-    end
-
-    opts.on("--margin-right=MARGIN",
-            Integer,
-            _("Set right margin for slides per page mode print."),
-            _("(auto)")) do |margin|
-      options.margin_right = margin
-    end
-
-    opts.on("--margin-top=MARGIN",
-            Integer,
-            _("Set top margin for slides per page mode print."),
-            _("(auto)")) do |margin|
-      options.margin_top = margin
-    end
-
-    opts.on("--margin-bottom=MARGIN",
-            Integer,
-            _("Set bottom margin for slides per page mode print."),
-            _("(auto)")) do |margin|
-      options.margin_bottom = margin
-    end
-
-    margin1 = _("[ALL]")
-    margin2 = _("[TOP_BOTTOM],[LEFT_RIGHT]")
-    margin3 = _("[TOP],[LEFT_RIGHT],[BOTTOM]")
-    margin4 = _("[TOP],[RIGHT],[BOTTOM],[LEFT]")
-    opts.on("--margin={#{margin1}|#{margin2}|#{margin3}|#{margin4}}",
-            Array,
-            _("Set margin for slides per page mode print.")) do |margins|
-      begin
-        top, right, bottom, left = Rabbit::Utils.parse_four_way(margins)
-        options.margin_top = top
-        options.margin_right = right
-        options.margin_bottom = bottom
-        options.margin_left = left
-      rescue ArgumentError
-        raise OptionParser::InvalidArgument.new(margins)
-      end
-    end
-
-    opts.on("--page-margin-left=MARGIN",
-            Integer,
-            _("Set left page margin."),
-            _("(auto)")) do |margin|
-      options.page_margin_left = margin
-    end
-
-    opts.on("--page-margin-right=MARGIN",
-            Integer,
-            _("Set right page margin."),
-            _("(auto)")) do |margin|
-      options.page_margin_right = margin
-    end
-
-    opts.on("--page-margin-top=MARGIN",
-            Integer,
-            _("Set top page margin."),
-            _("(auto)")) do |margin|
-      options.page_margin_top = margin
-    end
-
-    opts.on("--page-margin-bottom=MARGIN",
-            Integer,
-            _("Set bottom page margin."),
-            _("(auto)")) do |margin|
-      options.page_margin_bottom = margin
-    end
-
-    opts.on("--page-margin={#{margin1}|#{margin2}|#{margin3}|#{margin4}}",
-            Array,
-            _("Set page margin.")) do |margins|
-      begin
-        top, right, bottom, left = Utils.parse_four_dimensions(margins)
-        options.page_margin_top = top
-        options.page_margin_right = right
-        options.page_margin_bottom = bottom
-        options.page_margin_left = left
-      rescue ArgumentError
-        raise OptionParser::InvalidArgument.new(margins)
-      end
-    end
-
-    opts.category _("dRuby")
-    
-    opts.on("--[no-]use-druby",
-            _("Specify whether to use dRuby."),
-            "(#{options.use_druby})") do |bool|
-      options.use_druby = bool
-    end
-    
-    opts.on("--druby-uri=URI",
-            _("Specify dRuby URI."),
-            "(#{options.druby_uri})") do |uri|
-      options.druby_uri = uri if uri
-    end
-    
-    opts.on("--[no-]output-druby-uri",
-            _("Specify whether to output dRuby URI."),
-            "(#{options.output_druby_uri})") do |bool|
-      options.output_druby_uri = bool
-    end
-    
-    opts.category _("SOAP")
-    
-    opts.on("--[no-]use-soap",
-            _("Specify whether to use SOAP."),
-            "(#{options.use_soap})") do |bool|
-      options.use_soap = bool
-    end
-    
-    opts.on("--soap-host=HOST",
-            _("Specify SOAP host as [HOST]."),
-            "(#{options.soap_host})") do |port|
-      begin
-        options.soap_host = host
-      end
-    end
-    
-    opts.on("--soap-port=PORT",
-            _("Specify SOAP port as [PORT]."),
-            "(#{options.soap_port})") do |port|
-      begin
-        options.soap_port = Integer(port) if port
-      rescue ArgumentError
-        raise OptionParser::InvalidArgument.new(port)
-      end
-    end
-    
-    opts.category _("XML-RPC")
-    
-    opts.on("--[no-]use-xmlrpc",
-            _("Specify whether to use XML-RPC."),
-            "(#{options.use_xmlrpc})") do |bool|
-      options.use_xmlrpc = bool
-    end
-    
-    opts.on("--xmlrpc-host=HOST",
-            _("Specify XML-RPC host as [HOST]."),
-            "(#{options.xmlrpc_host})") do |port|
-      begin
-        options.xmlrpc_host = host
-      end
-    end
-    
-    opts.on("--xmlrpc-port=PORT",
-            _("Specify XML-RPC port as [PORT]."),
-            "(#{options.xmlrpc_port})") do |port|
-      begin
-        options.xmlrpc_port = Integer(port) if port
-      rescue ArgumentError
-        raise OptionParser::InvalidArgument.new(port)
-      end
-    end
-    
-    opts.category _("Server")
-    
-    opts.on("--[no-]server",
-            _("Specify whether to run as server."),
-            "(#{options.server})") do |bool|
-      options.server = bool
-    end
-
-    opts.category _("Public level")
-
-    levels = Rabbit::Front::PublicLevel.constants.sort_by do |const|
-      Rabbit::Front::PublicLevel.const_get(const)
-    end.collect do |const|
-      const.to_s.downcase.gsub(/_/, "-")
-    end
-    messages = [_("Specify public level.")]
-    messages << _("Select from the following:")
-    messages << "["
-    messages << "  "
-    levels[0..-2].each do |level|
-      messages.last << "#{level}, "
-      messages << "  " if messages.last.size > 30
-    end
-    messages.last << levels.last
-    messages << "]"
-    messages << _("(#{options.default_public_level})")
-    opts.on("--public-level=LEVEL", levels, *messages) do |level|
-      options.public_level = level
-    end
-
-    opts.category _("Comment")
-    
-    opts.on("--comment-source=FILE",
-            _("Deprecated. Just ignored."),
-            _("Specify initial comment source."),
-            _("(default source)")) do |name|
-    end
-    
-    opts.on("--comment-encoding=ENCODING",
-            _("Deprecated. Just ignored."),
-            _("Specify comment source encoding."),
-            _("(auto)")) do |encoding|
-    end
-
-    opts.category _("Migemo")
-
-    search_path = options.migemo_dictionary_search_path.join(', ')
-    opts.on("--migemo-dictionary-search-path=PATH1,PATH2,...",
-            Array,
-            _("Specify search paths for Migemo static dictionary."),
-            _("(#{search_path})")) do |path|
-      options.migemo_dictionary_search_path = path
-    end
-
-    opts.on("--migemo-dictionary-name=NAME",
-            Array,
-            _("Specify static dictionary name for Migemo."),
-            _("(#{options.migemo_dictionary_name})")) do |name|
-      options.migemo_dictionary_name = name
-    end
-
-    opts.category _("3D")
-
-    opts.on("--[no-]use-gl",
-            _("Specify whether to use OpenGL if available."),
-            "(#{options.use_gl})") do |bool|
-      options.use_gl = bool
-    end
-
-    opts.category _("Display")
-
-    opts.on("--[no-]keep-above",
-            _("Specify whether to keep above window."),
-            "(#{options.keep_above})") do |bool|
-      options.keep_above = bool
-    end
-
-    opts.category _("Others")
-
-    opts.on("--[no-]show-native-window-id",
-            _("Show a native window ID of the Rabbit window if available."),
-            _("e.g. The ID is the ID of X resource on X window system."),
-            "(#{options.show_native_window_id})") do |bool|
-      options.show_native_window_id = bool
-    end
-  end
-end
-
-def make_canvas(options, logger, renderer)
-  canvas = Rabbit::Canvas.new(logger, renderer)
-  canvas.comment_theme = options.comment_theme
-  canvas.allotted_time = options.allotted_time
-  canvas
-end
-
-def add_source_dialog_filter(dialog, name, pattern)
-  filter = Gtk::FileFilter.new
-  filter.name = "#{name} (#{pattern})"
-  filter.add_pattern(pattern)
-  dialog.add_filter(filter)
-end
-
-def choose_source_file_by_dialog(options)
-  dialog = Gtk::FileChooserDialog.new(_("Choose a Rabbit source file"),
-                                      nil,
-                                      Gtk::FileChooser::ACTION_OPEN,
-                                      nil,
-                                      [Gtk::Stock::CANCEL,
-                                       Gtk::Dialog::RESPONSE_CANCEL],
-                                      [Gtk::Stock::OPEN,
-                                       Gtk::Dialog::RESPONSE_ACCEPT])
-  dialog.current_folder = options.base if options.base
-  add_source_dialog_filter(dialog, "Rabbit files", "*.rab")
-  add_source_dialog_filter(dialog, "RD files", "*.rd")
-  add_source_dialog_filter(dialog, "Hiki files", "*.hiki")
-  add_source_dialog_filter(dialog, "PDF files", "*.pdf")
-  add_source_dialog_filter(dialog, "All files", "*")
-  file_name = nil
-  if dialog.run == Gtk::Dialog::RESPONSE_ACCEPT
-    file_name = dialog.filename
-    dialog.destroy
-  end
-  file_name
-end
-
-def make_source(options, argv, logger)
-  if options.source_type == :auto
-    if argv.empty?
-      file_name = choose_source_file_by_dialog(options)
-      exit if file_name.nil?
-      argv = [file_name]
-      options.source_type = Rabbit::Source::File
-    elsif argv.size == 1 and /\Ahttps?:\/\// =~ argv[0]
-      options.source_type = Rabbit::Source::URI
-    else
-      options.source_type = Rabbit::Source::File
-    end
-  end
-  if options.source_type == Rabbit::Source::ARGF
-    infos = [ARGF]
-  else
-    infos = argv
-  end
-  source = options.source_type.new(options.encoding, logger, *infos)
-  source.base = options.base if options.base
-  source
-end
-
-def make_front(canvas, options)
-  level = options.public_level
-  level ||= options.default_public_level
-  level = level.gsub(/-/, "_").upcase
-  canvas.front(Rabbit::Front::PublicLevel.const_get(level))
-end
-
-def apply_theme_if_need(target, options)
-  target.apply_theme(options.theme) if options.theme_specified
-end
-
-def parse(target, source, background=false)
-  if background
-    callback = Rabbit::Utils.process_pending_events_proc
-  else
-    callback = nil
-  end
-  target.parse(source, callback)
-end
-
-def setup_image_info(target, options)
-  target.saved_image_type = options.saved_image_type
-  target.saved_image_base_name = options.saved_image_base_name
-  target.output_html = options.output_html
-  target.output_index_html = options.output_index_html
-  target.rss_base_uri = options.rss_base_uri
-  target.source_filename = options.source_filename
-end
-
-def setup_print_info(target, options)
-  target.filename = options.print_out_filename
-  target.slides_per_page = options.slides_per_page
-  target.draw_scaled_image = options.draw_scaled_image
-end
-
-def setup_size(target, options)
-  target.width = options.width
-  target.height = options.height
-end
-
-def setup_paper_size(target, options)
-  target.paper_width = options.paper_width
-  target.paper_height = options.paper_height
-  target.page_margin_left = options.page_margin_left
-  target.page_margin_right = options.page_margin_right
-  target.page_margin_top = options.page_margin_top
-  target.page_margin_bottom = options.page_margin_bottom
-  target.margin_left = options.margin_left
-  target.margin_right = options.margin_right
-  target.margin_top = options.margin_top
-  target.margin_bottom = options.margin_bottom
-end
-
-def setup_migemo_info(target, options)
-  target.migemo_dictionary_search_path = options.migemo_dictionary_search_path
-  target.migemo_dictionary_name = options.migemo_dictionary_name
-end
-
-def setup_3d_info(target, options)
-  target.use_gl = options.use_gl
-end
-
-def setup_druby(front, options, logger)
-  require "drb/drb"
-  begin
-    DRb.start_service(options.druby_uri, front)
-    logger.info(DRb.uri) if options.output_druby_uri
-  rescue SocketError
-    logger.error($!)
-  rescue Errno::EADDRINUSE
-    logger.error(_("dRuby URI <%s> is in use.") % options.druby_uri)
-  end
-end
-
-def setup_soap(front, options, logger)
-  require "rabbit/soap/server"
-  thread = nil
-  
-  begin
-    config = {
-      :BindAddress => options.soap_host,
-      :Port => options.soap_port,
-      :AddressFamily => Socket::AF_INET,
-      :Logger => logger,
-    }
-    server = Rabbit::SOAP::Server.new(front, config)
-    prev = trap(:INT) {server.shutdown; trap(:INT, prev)}
-    thread = Thread.new {server.start}
-  rescue Errno::EADDRINUSE
-    logger.error(_("port <%s> for SOAP is in use.") % options.soap_port)
-  end
-
-  thread
-end
-
-def setup_xmlrpc(front, options, logger)
-  require "rabbit/xmlrpc/server"
-  thread = nil
-  
-  begin
-    config = {
-      :BindAddress => options.xmlrpc_host,
-      :Port => options.xmlrpc_port,
-      :AddressFamily => Socket::AF_INET,
-      :Logger => logger,
-    }
-    server = Rabbit::XMLRPC::Server.new(front, config)
-    prev = trap(:INT) {server.shutdown; trap(:INT, prev)}
-    thread = Thread.new {server.start}
-  rescue Errno::EADDRINUSE
-    logger.error(_("port <%s> for XML-RPC is in use.") % options.xmlrpc_port)
-  end
-
-  thread
-end
-
-def do_print(options, logger)
-  source = make_source(options, ARGV, logger)
-  renderer = Rabbit::Renderer.printable_renderer(options.slides_per_page)
-  canvas = make_canvas(options, logger, renderer)
-  setup_paper_size(canvas, options)
-  setup_print_info(canvas, options)
-  setup_3d_info(canvas, options)
-  apply_theme_if_need(canvas, options)
-  parse(canvas, source)
-  canvas.print
-  canvas.quit
-rescue Rabbit::NoPrintSupportError
-  logger.error($!.message)
-end
-
-def do_save_as_image(options, logger)
-  Rabbit::Renderer::Pixmap.init
-  Rabbit.gui_init
-
-  source = make_source(options, ARGV, logger)
-  canvas = make_canvas(options, logger, Rabbit::Renderer::Pixmap)
-  setup_size(canvas, options)
-  setup_image_info(canvas, options)
-  setup_print_info(canvas, options)
-  setup_paper_size(canvas, options)
-  setup_3d_info(canvas, options)
-  apply_theme_if_need(canvas, options)
-  parse(canvas, source)
-  canvas.activate("ToggleIndexMode") if options.index_mode
-  canvas.save_as_image
-  canvas.quit
-end
-
-def do_display(options, logger)
-  display_init_options = {}
-  if options.use_gl
-    display_init_options[:preferred_class_name] = "ClutterEmbed"
-  end
-  Rabbit::Renderer::Display.init(display_init_options)
-  Rabbit.gui_init
-
-  source = make_source(options, ARGV, logger)
-  canvas = make_canvas(options, logger, Rabbit::Renderer::Display)
-  frame = Rabbit::Frame.new(logger, canvas)
-  frame.geometry = options.geometry
-  frame.force_keep_above = options.keep_above
-  setup_paper_size(canvas, options)
-  setup_image_info(canvas, options)
-  setup_print_info(canvas, options)
-  setup_migemo_info(canvas, options)
-  setup_3d_info(canvas, options)
-  frame.init_gui(options.width, options.height, true)
-  frame.fullscreen if options.full_screen
-  native_window = frame.window.window
-  if options.show_native_window_id and native_window.respond_to?(:xid)
-    logger.info(_("Window ID: %d") % native_window.xid)
-  end
-  apply_theme_if_need(frame, options)
-  parse(frame, source, !Rabbit::Utils.windows?)
-  canvas.activate("ToggleIndexMode") if options.index_mode
-
-  front = make_front(canvas, options)
-  setup_druby(front, options, logger) if options.use_druby
-  setup_soap(front, options, logger) if options.use_soap
-  setup_xmlrpc(front, options, logger) if options.use_xmlrpc
-  
-  Gtk.main
-end
-
-def do_server(options, logger)
-  Rabbit.gui_init
-
-  # GLib::Log.cancel_handler
-  # GLib::Log.set_handler(nil, GLib::Log::LEVEL_ERROR)
-
-  source = make_source(options, ARGV, logger)
-  canvas = make_canvas(options, logger, Rabbit::Renderer::Pixmap)
-  setup_size(canvas, options)
-  setup_paper_size(canvas, options)
-  setup_image_info(canvas, options)
-  setup_print_info(canvas, options)
-  setup_3d_info(canvas, options)
-  apply_theme_if_need(canvas, options)
-  parse(canvas, source)
-
-  soap_server_thread = nil
-  xmlrpc_server_thread = nil
-
-  front = make_front(canvas, options)
-  setup_druby(front, options, logger) if options.use_druby
-  if options.use_soap
-    soap_server_thread = setup_soap(front, options, logger)
-  end
-  if options.use_xmlrpc
-    xmlrpc_server_thread = setup_xmlrpc(front, options, logger)
-  end
-
-  soap_server_thread.join if soap_server_thread
-  xmlrpc_server_thread.join if xmlrpc_server_thread
-  if options.use_druby
-    prev = trap(:INT) do
-      logger.info(_("going to shutdown..."))
-      DRb.thread.exit
-      logger.info(_("DRb.thread done."))
-      trap(:INT, prev)
-    end
-    DRb.thread.join
-  end
-end
-
-def main
-  options, logger = parse_args
-
-  require "rabbit/canvas"
-  GC.enable
-
-  if options.save_as_image
-    do_save_as_image(options, logger)
-  elsif options.print
-    do_print(options, logger)
-  elsif options.server
-    do_server(options, logger)
-  else
-    do_display(options, logger)
-  end
-
-  Rabbit.cleanup
-end
-
-main
+#
+# Copyright (C) 2004-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 "rabbit/command/rabbit"
+
+Rabbit::Command::Rabbit.run(*ARGV)