rabbit 0.6.2

data/lib/rabbit/theme/slide-header-info/property.rb

@@ -0,0 +1,43 @@
+@category = N_("Toolkit")
+@title = N_("Slide Footer Info")
+@abstract = N_("Toolkit to display information at the header")
+@description = N_("Displays information with a line at the header of slides.")
+@parameters = {
+  "@slide_header_info_line_color" => {
+    :default => "#666",
+    :description => N_("Line color."),
+  },
+  "@slide_header_info_line_width" => {
+    :default => "screen_y(0.1)",
+    :description => N_("Line width."),
+  },
+  "@slide_header_info_line_pattern" => {
+    :default => N_("white <-> black gradation"),
+    :description => N_("Line fill pattern. @slide_header_info_line_color " \
+                       "is ignored if this parameter is specified."),
+  },
+  "@slide_header_info_text_size" => {
+    :default => "screen_size(1.5 * Pango::SCALE)",
+    :description => N_("Text size."),
+  },
+  "@slide_header_info_x_margin" => {
+    :default => "screen_x(1)",
+    :description => N_("x-axis margin."),
+  },
+  "@slide_header_info_text_color" => {
+    :default => "#666",
+    :description => N_("Text color."),
+  },
+  "@slide_header_info_text_over_line" => {
+    :default => "false",
+    :description => N_("Whether show a text over line or not."),
+  },
+  "@slide_header_info_base_y" => {
+    :default => "@margin_top",
+    :description => N_("Base y-axis position to stroke line."),
+  },
+  "@slide_header_info_uninstall" => {
+    :default => "false",
+    :description => N_("Whether uninstall this theme or not."),
+  }
+}

data/lib/rabbit/theme/slide-header-info/slide-header-info.rb

@@ -0,0 +1,42 @@
+name = "slide-header-info"
+
+@slide_header_info_line_color ||= "#666"
+@slide_header_info_line_width ||= screen_y(0.1)
+@slide_header_info_line_params ||= {
+  :pattern => {
+    :base => [0, 0, canvas.width, 0],
+    :type => :linear,
+    :color_stops => [
+                     [0.0, 1, 1, 1],
+                     [0.3, 0, 0, 0],
+                     [0.7, 0, 0, 0],
+                     [1.0, 1, 1, 1],
+                    ],
+  }
+}
+@slide_header_info_text_size ||= screen_size(1.5 * Pango::SCALE)
+@slide_header_info_x_margin ||= screen_x(1)
+@slide_header_info_text_color ||= "#666"
+@slide_header_info_text_over_line ||= false
+@slide_header_info_base_y ||= @margin_top
+
+include_theme("edge-info-toolkit")
+
+match(SlideElement) do
+  delete_pre_draw_proc_by_name(name)
+
+  break if @slide_header_info_uninstall
+
+  draw_edge_info(:name => name,
+                 :line_width => @slide_header_info_line_width,
+                 :line_color => @slide_header_info_line_color,
+                 :line_params => @slide_header_info_line_params,
+                 :left_text => @slide_header_info_left_text,
+                 :right_text => @slide_header_info_right_text,
+                 :text_position => :upper,
+                 :text_over_line => @slide_header_info_text_over_line,
+                 :text_size => @slide_header_info_text_size,
+                 :text_color => @slide_header_info_text_color,
+                 :x_margin => @slide_header_info_x_margin,
+                 :y => @slide_header_info_base_y)
+end

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

@@ -0,0 +1,26 @@
+@category = N_("Toolkit")
+@title = N_("Slide Logo")
+@abstract = N_("Toolkit to display an image as logo at the top")
+@description = N_("Displays an image as a logo at the top of all slides.")
+@parameters = {
+  "@slide_logo_image" => {
+    :default => N_("(Must be specified.)"),
+    :description => N_("Image file name."),
+  },
+  "@slide_logo_position" => {
+    :default => ":right",
+    :description => N_("Image position. :right or :left."),
+  },
+  "@slide_logo_width" => {
+    :default => "nil",
+    :description => N_("Image width."),
+  },
+  "@slide_logo_height" => {
+    :default => "canvas.height * 0.1",
+    :description => N_("Image height."),
+  },
+  "@slide_logo_uninstall" => {
+    :default => "false",
+    :description => N_("Whether uninstall this theme or not."),
+  },
+}

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

@@ -0,0 +1,30 @@
+name = "slide-logo"
+
+if @slide_logo_image.nil?
+  theme_exit(_("must specify %s!!!") % "@slide_logo_image")
+end
+
+@slide_logo_position ||= :right
+@slide_logo_width ||= nil
+@slide_logo_height ||= canvas.height * 0.1
+
+match(SlideElement) do
+  delete_pre_draw_proc_by_name(name)
+
+  break if @slide_logo_image_uninstall
+
+  loader = ImageLoader.new(find_file(@slide_logo_image))
+  loader.resize(@slide_logo_width, @slide_logo_height)
+
+  add_pre_draw_proc(name) do |slide, canvas, x, y, w, h, simulation|
+    unless simulation
+      if @slide_logo_position == :right
+        logo_x = canvas.width - loader.width
+      else
+        logo_x = 0
+      end
+      loader.draw(canvas, logo_x, 0)
+    end
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/slide-number/property.rb

@@ -0,0 +1,21 @@
+@category = N_("Toolkit")
+@title = N_("TextSlideNumber")
+@abstract = N_("Toolkit to display slide numbers, a text version")
+@description = N_("Displays slide numbers with text at the bottom of the " \
+                  "slides.")
+@parameters = {
+  "@slide_number_props" => {
+    :default => "{ " \
+                "  'size' => @xx_small_font_size, " \
+                "  'font_family' => @font_family, " \
+                "}",
+    :description => N_("Properties of the slide numbers, such as font " \
+                       "family."),
+  },
+  "@slide_number_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/slide-number/slide-number.rb

@@ -0,0 +1,28 @@
+proc_name = "slide-number"
+
+@slide_number_props ||= {
+  "size" => @xx_small_font_size,
+  "font_family" => @font_family,
+}
+
+@slide_number_color || nil
+
+match(Slide) do |slides|
+  slides.delete_post_draw_proc_by_name(proc_name)
+
+  break if @slide_number_uninstall
+  
+  slides.add_post_draw_proc(proc_name) do |slide, canvas, x, y, w, h, simulation|
+    unless simulation
+      text = Text.new("#{slide.index}/#{canvas.slide_size - 1}")
+      text.font @slide_number_props
+      text.align = Pango::Layout::ALIGN_RIGHT
+      text.compile(canvas, x, y, w, h)
+      layout = text.layout
+      layout.set_width(w * Pango::SCALE)
+      num_y = canvas.height - @margin_bottom - text.height
+      canvas.draw_layout(text.layout, x, num_y, @slide_number_color)
+    end
+    [x, y, w, h]
+  end
+end

data/lib/rabbit/theme/slide-show/property.rb

@@ -0,0 +1,4 @@
+@category = N_("Time")
+@title = N_("Slide Show")
+@abstract = N_("Toolkit to do slide show")
+@description = N_("Move to the next slide automatically.")

data/lib/rabbit/theme/slide-show/slide-show.rb

@@ -0,0 +1,31 @@
+theme_exit unless display?
+
+if canvas.allotted_time
+  default_slide_show_span = (canvas.allotted_time / canvas.slide_size.to_f).round
+else
+  default_slide_show_span = 60
+end
+default_slide_show_span *= 1000 # milliseconds -> seconds
+@slide_show_span ||= default_slide_show_span
+@slide_show_loop ||= false
+
+@@slide_show_timeout_id ||= nil
+
+unless @@slide_show_timeout_id.nil?
+  Gtk.timeout_remove(@@slide_show_timeout_id)
+end
+
+@@slide_show_timeout_id = Gtk.timeout_add(@slide_show_span) do
+  if canvas.last_slide?
+    if @slide_show_loop
+      canvas.reset_timer
+      canvas.activate("FirstSlide")
+      true
+    else
+      false
+    end
+  else
+    canvas.activate("NextSlide")
+    true
+  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,169 @@
+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::Layout::ALIGN_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)
+  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, w, h]
+  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.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_w = 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_w = w
+      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
+        
+        need_recompile = false
+        if cell.layout.nil? or cell.layout.pixel_size[0] > text_width
+          need_recompile = true
+        elsif width_not_set
+          need_recompile = true
+          width_not_set = false
+        end
+        
+        if need_recompile
+          cell.dirty!
+          cell.text_compile(canvas, x, base_y, text_width, h)
+        end
+      end
+      [x, y, w, h]
+    end
+
+    cell.add_post_draw_proc(name) do |canvas, x, y, w, h, simulation|
+      [orig_x + cell_w, y, orig_w - cell_w, 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/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