rabbit-qt 0.1.0

data/lib/rabbit/theme/syntax-highlighting/syntax-highlighting.rb

@@ -0,0 +1,177 @@
+# -*- coding: utf-8 -*-
+
+@syntax_highlighting_uninstall ||= false
+
+theme_exit if @syntax_highlighting_uninstall
+
+# http://tango.freedesktop.org/Tango_Icon_Theme_Guidelines
+#
+# Butter:     #fce94f     #edd400     #c4a000
+# Orange:     #fcaf3e     #f57900     #ce5c00
+# Chocolate:  #e9b96e     #c17d11     #8f5902
+# Chameleon:  #8ae234     #73d216     #4e9a06
+# Sky Blue:   #729fcf     #3465a4     #204a87
+# Plum:       #ad7fa8     #75507b     #5c35cc
+# Scarlet Red:#ef2929     #cc0000     #a40000
+# Aluminium:  #eeeeec     #d3d7cf     #babdb6
+#             #888a85     #555753     #2e3436
+
+@syntax_highlighting_scheme ||= {}
+@syntax_highlighting_scheme_default = {
+  :comment => {
+    :color => "#8f5902",
+    :style => "italic",
+  },
+  :comment_delimiter => {
+    :color => "#8f5902",
+    :style => "italic",
+  },
+  :reserved => {
+    :color => "#204a87",
+  },
+  :keyword => {
+    :color => "#204a87",
+  },
+  :method => {
+    :color => "#000000",
+  },
+  :constant => {
+    :color => "#4e9a06",
+  },
+  :string => {
+    :color => "#a40000",
+  },
+  :delimiter => {
+    :color => "#ef2929",
+  },
+  :content => {
+    :color => "#a40000",
+  },
+  :symbol => {
+    :color => "#4e9a06",
+  },
+  :integer => {
+    # :color => "#c4a000",
+  },
+  :float => {
+    # :color => "#c4a000",
+  },
+  :variable => {
+    :color => "#ce5c00",
+  },
+  :instance_variable => {
+    :color => "#ce5c00",
+  },
+  :global_variable => {
+    :color => "#8f5902",
+  },
+  :operator => {
+    :color => "#ce5c00",
+  },
+  :punctuation => {
+    :color => "#ce5c00",
+  },
+  :ident => {
+    # :color => "#f57900",
+  },
+  :include => {
+    :color => "#a40000",
+  },
+  :pre_constant => {
+    :color => "#5c35cc",
+  },
+  :preprocessor => {
+    :color => "#ad7fa8",
+  },
+  :pre_type => {
+    :color => "#5c35cc",
+  },
+  :predefined_type => {
+    :color => "#5c35cc",
+  },
+  :directive => {
+    :color => "#5c35cc",
+  },
+  :head => {
+    :color => "#204a87",
+  },
+  :change => {
+    :color => "#8f5902",
+  },
+  :delete => {
+    :color => "#a40000",
+  },
+  :insert => {
+    :color => "#4e9a06",
+  },
+}
+
+@syntax_highlighting_foreground ||= "#000000"
+@syntax_highlighting_frame_color ||= "#000000"
+@syntax_highlighting_frame_width ||= 2
+@syntax_highlighting_fill_color ||= "#f8f8f8"
+@syntax_highlighting_shadow_color ||= nil
+
+@syntax_highlighting_padding_left ||= screen_x(5)
+@syntax_highlighting_padding_right ||= screen_x(5)
+@syntax_highlighting_padding_top ||= screen_y(2)
+@syntax_highlighting_padding_bottom ||= screen_y(2)
+
+match("**", SyntaxHighlightingBlock) do |blocks|
+  name = "syntax-highlighting-block"
+
+  blocks.prop_set("size", @normal_font_size)
+  set_font_family(blocks, @monospace_font_family)
+
+  blocks.horizontal_centering = true
+
+  params = {
+    :proc_name => name,
+    :frame_color => @syntax_highlighting_frame_color,
+    :frame_width =>  @syntax_highlighting_frame_width,
+    :fill_color => @syntax_highlighting_fill_color,
+    :shadow_color => @syntax_highlighting_shadow_color,
+  }
+
+  padding_set(:left => @syntax_highlighting_padding_left,
+              :right => @syntax_highlighting_padding_right,
+              :top => @syntax_highlighting_padding_top,
+              :bottom => @syntax_highlighting_padding_bottom)
+
+  blocks.wrap_mode = false
+
+  blocks.margin_top = @space
+  blocks.margin_bottom = @space
+
+  draw_frame(blocks, params)
+  blocks.prop_set("foreground", @syntax_highlighting_foreground)
+end
+
+match("**", SyntaxHighlightingBlock, "**", CustomTag) do |tags|
+  find_block_element = lambda do |tag|
+    element = tag
+    while element.inline_element?
+      element = element.parent
+    end
+    element
+  end
+
+  find_markup_target = lambda do |tag|
+    if tag.elements.empty?
+      tag.parent
+    else
+      tag
+    end
+  end
+
+  scheme = @syntax_highlighting_scheme_default.merge(@syntax_highlighting_scheme)
+  tags.each do |tag|
+    case tag.name
+    when /\Asyntax-(.+)\z/
+      style = (scheme[$1.gsub(/-/, '_').to_sym] || {})
+      next if style.empty?
+      find_markup_target.call(tag).font(style)
+    end
+  end
+end
+

data/lib/rabbit/theme/table/property.rb

@@ -0,0 +1,3 @@
+@category = N_("Toolkit")
+@title = N_("Table")
+@description = N_("table rendering")

data/lib/rabbit/theme/table/table.rb

@@ -0,0 +1,173 @@
+all_table = ["**", Table]
+
+match(*all_table) do |tables|
+  name = "table"
+  frame_name = "table-frame"
+  
+  params = {
+    :proc_name => frame_name,
+    :frame_color => @table_frame_color,
+    :fill_color => @table_fill_color,
+  }
+  
+  tables.padding_left = @table_padding_left
+  tables.padding_right = @table_padding_right
+  tables.padding_top = @table_padding_top
+  tables.padding_bottom = @table_padding_bottom
+
+  tables.delete_pre_draw_proc_by_name(frame_name)
+  tables.delete_post_draw_proc_by_name(frame_name)
+  tables.delete_pre_draw_proc_by_name(name)
+  tables.delete_post_draw_proc_by_name(name)
+  
+  tables.each do |table|
+    layout = nil
+    th = 0
+    adjust_y = 0
+    
+    table.add_pre_draw_proc(name) do |canvas, x, y, w, h, simulation|
+      if table.caption and layout.nil?
+        caption = Text.new(table.caption)
+        caption.align = Pango::Alignment::CENTER
+        caption.prop_set("size", @normal_font_size)
+        set_font_family(caption)
+        caption.compile(canvas, x, y, w, h)
+        layout = caption.layout
+        th = caption.height
+        table.margin_top = th + @table_caption_space
+        adjust_y = th + @table_caption_space / 2.0
+      end
+      if !simulation and layout
+        layout.width = w * Pango::SCALE
+        canvas.draw_layout(layout, x, y - adjust_y, @table_caption_color)
+      end
+      [x, y, w, h]
+    end
+    
+    draw_frame(table, params) do |_, canvas, x, y, w, h|
+      new_x = x
+      new_y = y
+      new_w = w
+      new_h = nil
+      [new_x, new_y, new_w, new_h]
+    end
+  end
+end
+
+match(*(all_table + [TableHead, TableRow, TableHeader])) do |headers|
+  name = "table-header"
+  frame_name = "table-header-frame"
+  
+  params = {
+    :proc_name => frame_name,
+    :frame_color => @table_head_frame_color,
+    :fill_color => @table_head_fill_color,
+  }
+
+  headers.padding_left = @table_header_padding_left
+  headers.padding_right = @table_header_padding_right
+  headers.padding_top = @table_header_padding_top
+  headers.padding_bottom = @table_header_padding_bottom
+
+  headers.delete_pre_draw_proc_by_name(frame_name)
+  headers.delete_post_draw_proc_by_name(frame_name)
+  headers.delete_pre_draw_proc_by_name(name)
+  headers.delete_post_draw_proc_by_name(name)
+  
+  headers.prop_set("size", @normal_font_size)
+  headers.font(@table_header_font_props)
+  set_font_family(headers)
+  
+  draw_frame(headers, params) do |header, canvas, x, y, w, h|
+    new_x = nil
+    new_y = nil
+    new_w = nil
+    new_h = header.parent.height
+    [new_x, new_y, new_w, new_h]
+  end
+
+  headers.add_pre_draw_proc(name) do |header, canvas, x, y, w, h, simulation|
+    if simulation
+      row = header.parent
+      table = row.parent.parent
+      header_w = table.available_w / row.elements.size
+      header_w -= header.padding_left + header.padding_right
+      header.dirty!
+      header.text_compile(canvas, x, y, header_w, h)
+    end
+    [x, y, header.width, h]
+  end
+
+  headers.add_post_draw_proc(name) do |header, canvas, x, y, w, h, simulation|
+    moved_x = header.width + header.padding_left + header.padding_right
+    moved_y = header.height - header.padding_top - header.padding_bottom
+    [x + moved_x, y - moved_y, w - moved_x, h + moved_y]
+  end
+end
+
+match(*(all_table + [TableBody, TableRow, TableCell])) do |cells|
+  name = "table-cell"
+  frame_name = "table-cell-frame"
+  
+  params = {
+    :proc_name => frame_name,
+    :frame_color => @table_body_frame_color,
+    :fill_color => @table_body_fill_color,
+  }
+
+  cells.prop_set("size", @normal_font_size)
+  set_font_family(cells)
+  cells.font(@table_cell_font_props)
+
+  cells.padding_left = @table_cell_padding_left
+  cells.padding_right = @table_cell_padding_right
+  cells.padding_top = @table_cell_padding_top
+  cells.padding_bottom = @table_cell_padding_bottom
+
+  cells.delete_pre_draw_proc_by_name(frame_name)
+  cells.delete_post_draw_proc_by_name(frame_name)
+  cells.delete_pre_draw_proc_by_name(name)
+  cells.delete_post_draw_proc_by_name(name)
+
+  cells.each do |cell|
+    orig_x = nil
+    orig_y = nil
+    orig_w = nil
+    orig_h = nil
+    cell_w = nil
+    width_not_set = true
+
+    row = cell.parent
+    table = row.parent.parent
+    
+    cell.add_pre_draw_proc(name) do |canvas, x, y, w, h, simulation|
+      orig_x = x
+      orig_y = y
+      orig_w = w
+      orig_h = h
+      if simulation
+        cell_w = table.available_w / row.elements.size
+        base_y = y + cell.padding_top
+        text_width = cell_w - cell.padding_left - cell.padding_right
+
+        if cell.layout.nil? or cell.width > text_width
+          cell.dirty!
+          cell.text_compile(canvas, x, base_y, text_width, h)
+        end
+      end
+      [x, y, cell.width, h]
+    end
+
+    cell.add_post_draw_proc(name) do |canvas, x, y, w, h, simulation|
+      [orig_x + cell_w, orig_y, orig_w - cell_w, orig_h]
+    end
+
+    draw_frame(cell, params) do |_, canvas, x, y, w, h|
+      new_x = nil
+      new_y = nil
+      new_w = cell_w
+      new_h = cell.parent.height
+      [new_x, new_y, new_w, new_h]
+    end
+  end
+end

data/lib/rabbit/theme/tag/property.rb

@@ -0,0 +1,4 @@
+@category = N_("Toolkit")
+@title = N_("Tag")
+@abstract = N_("Toolkit to apply custom tag")
+@description = N_("Applies custom tag style.")

data/lib/rabbit/theme/tag/tag.rb

@@ -0,0 +1,85 @@
+# -*- coding: utf-8 -*-
+
+@tag_uninstall ||= false
+@tag_handlers ||= {}
+
+theme_exit if @tag_uninstall
+
+match("**", CustomTag) do |tags|
+  find_outer_block = lambda do |tag|
+     element = tag
+    while element.inline_element?
+      element = element.parent
+    end
+    element
+  end
+
+  find_align_target = lambda do |tag|
+    element = tag
+    while element.inline_element? and not element.is_a?(TableCell)
+      element = element.parent
+    end
+    element
+  end
+
+  find_target = lambda do |tag|
+    if tag.elements.empty?
+      tag.parent
+    else
+      tag
+    end
+  end
+
+  find_handler = lambda do |tag|
+    handler = @tag_handlers[tag.name]
+    return handler if handler
+    @tag_handlers.each do |key, value|
+      return value if key === tag.name
+    end
+    nil
+  end
+
+  tags.each do |tag|
+    case tag.name
+    when "left"
+      find_align_target.call(tag).align = "left"
+    when "center"
+      find_align_target.call(tag).horizontal_centering = true
+    when "right"
+      find_align_target.call(tag).align = "right"
+    when "small"
+      find_target.call(tag).prop_set("size", @small_font_size)
+    when "x-small"
+      find_target.call(tag).prop_set("size", @x_small_font_size)
+    when "xx-small"
+      find_target.call(tag).prop_set("size", @xx_small_font_size)
+    when "large"
+      find_target.call(tag).prop_set("size", @large_font_size)
+    when "x-large"
+      find_target.call(tag).prop_set("size", @x_large_font_size)
+    when "xx-large"
+      find_target.call(tag).prop_set("size", @xx_large_font_size)
+    when /\A(normal|oblique|italic)\z/
+      find_target.call(tag).prop_set("style", $1)
+    when /\Amargin-(top|bottom|left|right)(?:\s*\*\s*([-\d.]+))?\z/
+      target = "margin_#{$1}"
+      scale = Float($2 || 1)
+      outer_block = find_outer_block.call(tag)
+      current_value = outer_block.send(target)
+      outer_block.send("#{target}=", current_value + (@space * scale))
+    when /\Awrap-(.+)\z/
+      wrap = $1
+      find_target.call(tag).wrap_mode = wrap
+    when /\Ajustify?\z/
+      find_target.call(tag).justify = true
+    when /\Ano-justify?\z/
+      find_target.call(tag).justify = false
+    else
+      handler = find_handler.call(tag)
+      if handler
+        handler.call(:target => find_target.call(tag),
+                     :outer_block => find_outer_block.call(tag))
+      end
+    end
+  end
+end

data/lib/rabbit/theme/timer/property.rb

@@ -0,0 +1,3 @@
+@category = N_("Time")
+@title = N_("TextTimer")
+@description = N_("text version timer")

data/lib/rabbit/theme/timer/timer.rb

@@ -0,0 +1,63 @@
+theme_exit unless display?
+
+proc_name = "timer"
+init_proc_name_prefix = "timer_init"
+
+@timer_limit ||= canvas.allotted_time
+if @timer_limit.nil?
+  theme_exit("must specify @timer_limit!! (sec)")
+end
+
+if @timer_auto_update.nil?
+  @timer_auto_update = true
+end
+
+@timer_props ||= {
+  "size" => @xx_small_font_size,
+  "font_family" => @font_family,
+}
+@timer_props.delete("font_family") unless @timer_props["font_family"]
+
+@timer_color ||= "#0006"
+@timer_over_color ||= "#f006"
+@timer_interval ||= 1
+
+match(Slide) do |slides|
+  slides.delete_post_draw_proc_by_name(proc_name)
+
+  stop_auto_redraw_timer
+
+  break if @timer_uninstall
+  
+  if @timer_auto_update
+    start_auto_redraw_timer(@timer_interval)
+  end
+  
+  init_proc_name = "#{init_proc_name_prefix}.#{canvas.__id__}"
+  slides.add_pre_draw_proc(init_proc_name) do |slide, canvas, x, y, w, h, simulation|
+    canvas.start_timer(@timer_limit) if canvas.rest_time
+    slide.delete_pre_draw_proc_by_name(init_proc_name)
+    [x, y, w, h]
+  end
+
+  slides.add_post_draw_proc(proc_name) do |slide, canvas, x, y, w, h, simulation|
+    unless simulation
+      rest_time = canvas.rest_time
+      text = "%s%02d:%02d" % Utils.split_number_to_minute_and_second(rest_time)
+      text = Text.new(text)
+      text.font @timer_props
+      set_font_family(text)
+      text.compile(canvas, x, y, w, h)
+      text.layout.set_width(w * Pango::SCALE)
+      num_y = canvas.height - @margin_bottom - text.height
+      args = [text.layout, x, num_y]
+      if rest_time < 0
+        args << @timer_over_color
+      else
+        args << @timer_color
+      end
+      canvas.draw_layout(*args)
+    end
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/title-background-color/property.rb

@@ -0,0 +1,10 @@
+@category = N_("Toolkit")
+@title = N_("TitleBackgroundColor")
+@abstract = N_("Toolkit to color a background of the title slide")
+@description = N_("Color a background of the title slide.")
+@parameters = {
+  "@title_background_color" => {
+    :default => N_("(Must be specified.)"),
+    :description => N_("Background color.")
+  },
+}

data/lib/rabbit/theme/title-background-color/title-background-color.rb

@@ -0,0 +1,17 @@
+proc_name = "title-background-color"
+
+if @title_background_color.nil?
+  theme_exit("must specify @title_background_color!!")
+end
+
+match(TitleSlide) do |slides|
+  slides.delete_pre_draw_proc_by_name(proc_name)
+
+  slides.add_pre_draw_proc(proc_name) do |slide, canvas, x, y, w, h, simulation|
+    unless simulation
+      args = [0, 0, canvas.width, canvas.height, @title_background_color]
+      canvas.draw_rectangle(true, *args)
+    end
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/title-background-image/property.rb

@@ -0,0 +1,11 @@
+@category = N_("Toolkit")
+@title = N_("TitleBackgroundImage")
+@abstract = N_("Toolkit to display an image as a background of the title " \
+               "slide")
+@description = N_("Displays an image as a background of the title slide.")
+@parameters = {
+  "@title_background_image" => {
+    :default => N_("(Must be specified.)"),
+    :description => N_("Image file name.")
+  },
+}

data/lib/rabbit/theme/title-background-image/title-background-image.rb

@@ -0,0 +1,28 @@
+@title_background_image_properties ||= {}
+default_title_background_image_properties = {
+  "as_large_as_possible" => true,
+  "align" => "center",
+  "assign_box" => false,
+  "keep_ratio" => true,
+}
+
+match(TitleSlide) do |slides|
+  slides.each do |slide|
+    image_properties = default_title_background_image_properties.dup
+    @title_background_image_properties.each do |key, value|
+      value = value.to_s if value.is_a?(Symbol)
+      image_properties[key.to_s.gsub(/-/, "_")] = value
+    end
+    background_image = slide["background-image"] || @title_background_image
+    if background_image.nil?
+      theme_exit("must specify 'background-image' slide property or " \
+                 "@title_background_image!!")
+    end
+    properties = {
+      :file_name => find_file(background_image),
+      :proc_name => "title-background-image",
+      :properties => image_properties,
+    }
+    apply_background_image_property(slide, properties)
+  end
+end

data/lib/rabbit/theme/title-logo/property.rb

@@ -0,0 +1,23 @@
+@category = N_("Toolkit")
+@title = N_("TitleLogo")
+@abstract = N_("Toolkit to display an image as a logo in the title slide")
+@description = N_("Displays an image as a logo in the title slide.")
+@parameters = {
+  "@title_logo_image" => {
+    :default => N_("(Must be specified.)"),
+    :description => N_("Image file name.")
+  },
+  "@title_logo_position" => {
+    :default => ":right",
+    :description => N_("Position of the logo. " \
+                       "The logo will be set at the upper-right corner when " \
+                       "'(({:right}))', and at the upper-left corner when " \
+                       "'(({:left}))'.")
+  },
+  "@title_logo_image_uninstall" => {
+    :default => "nil",
+    :description => N_("Whether uninstalling this toolkit or not. " \
+                       "This option is useful for cases you do not want to " \
+                       "make the toolkit work for certain slides."),
+  },
+}

data/lib/rabbit/theme/title-logo/title-logo.rb

@@ -0,0 +1,38 @@
+proc_name = "title-logo"
+
+if @title_logo_image.nil?
+  theme_exit(_("must specify %s!!!") % "@title_logo_image")
+end
+
+@title_logo_position ||= :right
+
+match(TitleSlide, Title) do |titles|
+
+  titles.delete_pre_draw_proc_by_name(proc_name)
+
+  break if @title_logo_image_uninstall
+  
+  loader = ImageLoader.new(find_file(@title_logo_image))
+
+  resized = false
+
+  titles.add_pre_draw_proc(proc_name) do |title, canvas, x, y, w, h, simulation|
+    unless simulation
+      title_slide = title.parent
+      unless resized
+        title_space = y - title_slide.margin_top
+        width = ((title_space / loader.height.to_f) * loader.width).ceil
+        loader.resize(width, title_space) if width > 0
+        resized = true
+      end
+      if @title_logo_position == :right
+        new_x = canvas.width - loader.width - title_slide.margin_right
+      else
+        new_x = title_slide.margin_left
+      end
+      new_y = title_slide.margin_top
+      loader.draw(canvas, new_x, new_y)
+    end
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/title-on-image-toolkit/property.rb

@@ -0,0 +1,3 @@
+@category = N_("Toolkit")
+@title = N_("Title on Image Toolkit")
+@description = N_("Displays title on image")