slideshow-models 2.4.0

data/lib/slideshow/filters/slide_filter.rb

@@ -0,0 +1,114 @@
+# encoding: utf-8
+
+module Slideshow
+  module SlideFilter
+
+
+  def takahashi_slide_breaks( content )
+    
+    inline_count = 0
+    line_count = 0
+
+    ###########################
+    ## allows   one // two // three
+    
+    content.gsub!( /\b[ ]+\/{2}[ ]+\b/) do |match|
+      inline_count += 1
+      ## todo: use slide('') directive helper?
+      "\n\n<!-- _S9SLIDE_  -->\n\n"
+    end
+    
+    ############################
+    ## allows
+    ##
+    ##  one
+    ##  //
+    ##  two
+    ##  //
+    ##  three
+    
+    content.gsub!( /^[ ]*\/{2}[ ]*$/ ) do |match|
+      line_count += 1
+      ## todo: use slide('') directive helper?
+      "\n\n<!-- _S9SLIDE_  -->\n\n"
+    end
+
+    puts "  Adding #{inline_count+line_count} takahashi slide breaks (#{inline_count} //-inline, #{line_count} //-line)..."
+        
+    content
+  end
+
+
+# add slide directive before h1 (tells slideshow gem where to break slides)
+#
+# e.g. changes:
+# <h1 id='optional' class='optional'>
+#  to
+#  html comment -> _S9SLIDE_ (note: rdoc can't handle html comments?) 
+# <h1 id='optional' class='optional'>
+
+def add_slide_directive_before_h1( content )
+
+  # mark h1 for getting wrapped into slide divs
+  # note: use just <h1 since some processors add ids e.g. <h1 id='x'>
+
+  slide_count = 0
+
+  content.gsub!( /<h1/ ) do |match|
+    slide_count += 1
+    "\n<!-- _S9SLIDE_ -->\n#{Regexp.last_match(0)}"
+  end
+  
+  puts "  Adding #{slide_count} slide breaks (using h1 rule)..."
+  
+  content
+end
+
+def add_slide_directive_before_h2( content )
+
+  slide_count = 0
+
+  content.gsub!( /<h2/ ) do |match|
+    slide_count += 1
+    "\n<!-- _S9SLIDE_ -->\n#{Regexp.last_match(0)}"
+  end
+  
+  puts "  Adding #{slide_count} slide breaks (using h2 rule)..."
+  
+  content
+end
+
+
+
+# add slide directive before div h1 (for pandoc-generated html)
+#
+# e.g. changes:
+# <div id='header'>
+# <h1 id='optional' class='optional'>
+#  to
+#  html comment -> _S9SLIDE_ 
+# <div id='header'>
+# <h1 id='optional' class='optional'>
+
+
+def add_slide_directive_before_div_h1( content )
+
+  slide_count = 0
+
+  content.gsub!( /<div[^>]*>\s*<h1/ ) do |match|
+    slide_count += 1
+    "\n<!-- _S9SLIDE_ -->\n#{Regexp.last_match(0)}" 
+  end
+
+  puts "  Adding #{slide_count} slide breaks (using div_h1 rule)..."
+
+  content
+end
+
+  
+end  # module SlideFilter
+end # module Slideshow
+
+class Slideshow::Gen
+  include Slideshow::SlideFilter
+end

data/lib/slideshow/filters/text_filter.rb

@@ -0,0 +1,140 @@
+# encoding: utf-8
+
+# builtin text filters
+# called before text_to_html
+#
+# use web filters for processing html/hypertext
+
+module Slideshow
+  module TextFilter
+
+  include TextUtils::Filter    # include comments_percent_style, skip_end_directive, etc. filters 
+
+  alias_method :old_comments_percent_style, :comments_percent_style
+
+  def comments_percent_style( content )
+
+    # skip filter for pandoc
+    # - pandoc uses % for its own markdown extension
+    return content  if @markup_type == :markdown && Markdown.lib == 'pandoc-ruby'
+    
+    old_comments_percent_style( content )
+  end
+
+def directives_bang_style_to_percent_style( content )
+
+  # for compatibility allow !SLIDE/!STYLE as an alternative to %slide/%style-directive
+  
+  bang_count = 0
+
+  # get unparsed helpers e.g. SLIDE|STYLE  
+  unparsed = config.helper_unparsed.map { |item| item.upcase }.join( '|' )                                                                   
+  
+  content.gsub!(/^!(#{unparsed})(.*)$/) do |match|
+    bang_count += 1
+    "<%= #{$1.downcase} '#{$2 ? $2 : ''}' %>"
+  end
+
+  puts "  Patching !-directives (#{bang_count} #{config.helper_unparsed.join('/')}-directives)..."
+
+  content
+end
+
+def directives_percent_style( content )
+
+  # skip filter for pandoc
+  # - pandoc uses % for its own markdown extension
+  # - don't process % pass it along/through to pandoc
+
+  return content  if @markup_type == :markdown && Markdown.lib == 'pandoc-ruby'
+    
+    
+  directive_unparsed  = 0
+  directive_expr      = 0
+  directive_block_beg = 0
+  directive_block_end = 0
+
+  # process directives (plus skip %begin/%end comment-blocks)
+
+  inside_block  = 0
+  inside_helper = false
+  
+  content2 = ""
+  
+  content.each_line do |line|
+    if line =~ /^%([a-zA-Z][a-zA-Z0-9_]*)(.*)/
+      directive = $1.downcase
+      params    = $2
+
+      logger.debug "processing %-directive: #{directive}"
+
+      # slide, style
+      if config.helper_unparsed.include?( directive )
+        directive_unparsed += 1
+        content2 << "<%= #{directive} '#{params ? params : ''}' %>"
+      elsif config.helper_exprs.include?( directive )
+        directive_expr += 1
+        content2 << "<%= #{directive} #{params ? erb_simple_params(directive,params) : ''} %>"        
+      elsif inside_helper && directive == 'end'
+        inside_helper = false
+        directive_block_end += 1
+        content2 << "%>"        
+      elsif inside_block > 0 && directive == 'end'
+        inside_block -= 1
+        directive_block_end += 1
+        content2 << "<% end %>"
+      elsif [ 'comment', 'comments', 'begin', 'end' ].include?( directive )  # skip begin/end comment blocks
+        content2 << line
+      elsif [ 'helper', 'helpers' ].include?( directive )
+        inside_helper = true
+        directive_block_beg += 1
+        content2 << "<%"
+      else
+        inside_block += 1
+        directive_block_beg += 1
+        content2 << "<% #{directive} #{params ? erb_simple_params(directive,params) : ''} do %>"
+      end
+    else
+      content2 << line
+    end
+  end  
+    
+  puts "  Preparing %-directives (" +
+      "#{directive_unparsed} #{config.helper_unparsed.join('/')} directives, " +
+      "#{directive_expr} #{config.helper_exprs.join('/')} expr-directives, " +
+      "#{directive_block_beg}/#{directive_block_end} block-directives)..."
+
+  content2
+end
+
+  ######################
+  # todo: fix move to textutils gem (including helpers and config)
+  # 
+
+
+  def erb_rename_helper_hack( content )
+    # note: include is a ruby keyword; rename to s9_include so we can use it 
+    
+    rename_counter = 0
+    
+    # turn renames into something like:
+    #   include|class   etc.
+    renames = config.helper_renames.join( '|' )
+    
+    content.gsub!( /<%=[ \t]*(#{renames})/ ) do |match|
+      rename_counter += 1
+      "<%= s9_#{$1}" 
+    end
+
+    puts "  Patching embedded Ruby (erb) code for aliases (#{rename_counter} #{config.helper_renames.join('/')}-aliases)..."
+
+    content
+  end
+  
+
+end   # module TextFilter
+end  # module Slideshow
+
+class Slideshow::Gen
+  include Slideshow::TextFilter
+end

data/lib/slideshow/headers.rb

@@ -0,0 +1,89 @@
+# encoding: utf-8
+
+module Slideshow
+
+class Headers
+
+  def initialize( config )
+    @hash   = {}
+    @config = config
+  end
+
+  ## todo: rename put to store like std hash method
+  def put( key, value )
+    key = normalize_key( key )
+    setter = "#{key}=".to_sym
+
+    if respond_to?( setter )
+      send( setter, value )
+    else
+      @hash[ key ] = value
+    end
+  end
+
+  def gradient=( line )
+    # split into theme (first value) and colors (everything else)
+    #  e.g.  diagonal red black
+    
+    # todo/check: translate value w/ v.tr( '-', '_' ) ??
+    
+    values = line.split( ' ' )
+      
+    put( 'gradient-theme', values.first )                 if values.size > 0
+    put( 'gradient-colors', values[ 1..-1].join( ' ' ) )  if values.size > 1
+  end
+  
+  def has_gradient?
+    # has user defined gradient (using headers)?  (default values do NOT count)
+    @hash.has_key?( :gradient_theme ) || @hash.has_key?( :gradient_colors )
+  end  
+    
+  def []( key )
+    value = get( key )
+     
+    if value.nil?
+      puts "** Warning: header '#{key}' undefined"
+      value = "- #{key} not found -"
+    end
+    value
+  end
+
+  def code_engine
+    get( 'code-engine' )
+  end
+  
+  def code_txmt
+    get( 'code-txmt' )
+  end
+
+
+## todo: rename get to fetch??
+  def get( key, default=nil )
+    key = normalize_key(key)
+    value = @hash.fetch( key, nil )
+    value = @config.header( key ) if value.nil?   # try lookup in config properties next
+    if value.nil?
+      default
+    else
+      value
+    end
+  end
+
+  def get_boolean( key, default )
+    value = get( key, default )
+    if value.nil?
+      default
+    else
+      (value == true || value =~ /t|true|yes|on/i) ? true : false
+    end
+  end
+
+private
+
+  def normalize_key( key )
+    key.to_s.downcase.tr('-', '_').to_sym
+  end
+      
+end  # class Headers
+
+end # module Slideshow

data/lib/slideshow/helpers/background_helper.rb

@@ -0,0 +1,151 @@
+# encoding: utf-8
+
+module Slideshow
+  module BackgroundHelper
+
+def gradient_from_headers( *args )
+
+  return "" unless headers.has_gradient?   # do nothing if use hasn't set gradient headers (ignore defaults)
+
+  # lets you use headers (gradient, gradient-theme, gradient-colors)
+  #  to define gradient (see http://slideshow.rubyforge.org/themes.html for predefined themes)
+  
+  theme  = headers[ :gradient_theme ]
+  colors = headers[ :gradient_colors ].split(' ')  # colors as space separated all-in-one string
+  
+  buf = ""
+  
+  if theme == 'diagonal'
+    buf << "linear-gradient( top left, #{colors.join(', ')} )"
+  elsif theme == 'top-bottom'
+    buf << "linear-gradient( top, #{colors.join(', ')} )"
+  elsif theme == 'left-right'
+    buf << "linear-gradient( left, #{colors.join(', ')} )"
+  elsif theme == 'repeat'
+    buf << "repeating-linear-gradient( -60deg, #{colors.join(', ')} 10% )"
+  elsif theme == 'radial'
+    buf << "radial-gradient( #{colors.join(', ')} )"
+  elsif theme == 'radial-off-center'
+    buf << "radial-gradient( 70% 70%, ellipse, #{colors.join(', ')} )"
+  elsif theme == 'radial-repeat'
+    buf << "repeating-radial-gradient( 60% 60%, ellipse, #{colors.join(', ')} 10% )"
+  else
+    buf << "linear-gradient( #{colors.join(', ')} )"
+    puts "warning: unknown gradient themes #{theme} - falling back to default"
+  end
+
+  puts "  Adding CSS for gradient background style rule using headers..."
+  puts "    gradient-theme: #{theme}"
+  puts "    gradient-colors: #{colors.join(' ')}"
+  
+  content_for( :css, <<-EOS )
+     /****
+       * generated by gradient_from_headers helper; using headers: 
+       *   gradient-theme: #{theme}
+       *   gradient-colors: #{colors.join(' ')}
+       */
+    .slide    { background-image: -webkit-#{buf};
+                background-image: -moz-#{buf};
+                background-image: -ms-#{buf};
+                background-image: -o-#{buf};
+                background-image: #{buf};
+              }
+  EOS
+end
+
+def gradient( *args )
+
+  # check for optional hash for options
+  opts = args.last.kind_of?(Hash) ? args.pop : {}
+
+  colors = args
+
+  clazz = opts[:class] || ( 's9_gradient_linear_'+colors.join('_').gsub( /[(), ]/, '_' ).gsub( /_{2,}/, '_').gsub( /[^-\w]/, '' ) )
+
+
+  ## generate code
+  
+  buf  = "linear-gradient(top, #{colors.join(', ')} )"
+ 
+
+  puts "  Adding CSS for background style rule..."  
+  content_for( :css, <<-EOS )
+    .#{clazz} { background-image: -webkit-#{buf};
+                background-image: -moz-#{buf};
+                background-image: -ms-#{buf};
+                background-image: -o-#{buf};
+                background-image: #{buf};
+              }
+  EOS
+
+  # add processing instruction to get style class added to slide 
+
+  puts "  Adding HTML PI for background style class '#{clazz}'..."    
+  "<!-- _S9STYLE_ #{clazz} -->\n"
+end
+
+def background( *args  )
+  
+ # make everyting optional; use it like: 
+ #   background( code, opts={} )
+  
+  # check for optional hash for options
+  opts = args.last.kind_of?(Hash) ? args.pop : {}
+
+  # check for optional style rule code
+  code = args.last.kind_of?(String) ? args.pop : '' 
+    
+  clazz = opts[:class] || ( 's9'+code.strip.gsub( /[(), ]/, '_' ).gsub( /_{2,}/, '_').gsub( /[^-\w]/, '' ) )
+  
+  # 1) add background rule to css 
+  # e.g. .simple { background: -moz-linear-gradient(top, blue, white); }
+  
+  unless code.empty?
+    puts "  Adding CSS for background style rule..."  
+    content_for( :css, <<-EOS )
+      .#{clazz} { background: #{code}; }
+    EOS
+  end
+  
+  # 2) add processing instruction to get style class added to slide 
+
+  puts "  Adding HTML PI for background style class '#{clazz}'..."    
+  "<!-- _S9STYLE_ #{clazz} -->\n"
+end 
+
+def color( *args  )
+  
+ # make everyting optional; use it like: 
+ #   color( code, opts={} )
+  
+  # check for optional hash for options
+  opts = args.last.kind_of?(Hash) ? args.pop : {}
+
+  # check for optional style rule code
+  code = args.last.kind_of?(String) ? args.pop : '' 
+    
+  clazz = opts[:class] || ( 's9'+code.strip.gsub( /[(), ]/, '_' ).gsub( /_{2,}/, '_').gsub( /[^-\w]/, '' ) )
+  
+  # 1) add color rule to css 
+  # e.g. .simple { color: #fff; }
+  
+  unless code.empty?
+    puts "  Adding CSS for color style rule..."  
+    content_for( :css, <<-EOS )
+      .#{clazz} { color: #{code}; }
+    EOS
+  end
+  
+  # 2) add processing instruction to get style class added to slide 
+
+  puts "  Adding HTML PI for color style class '#{clazz}'..."    
+  "<!-- _S9STYLE_ #{clazz} -->\n"
+end 
+    
+  
+end # module BackgroundHelper
+end # module Slideshow
+
+class Slideshow::Gen
+  include Slideshow::BackgroundHelper
+end