masterview 0.0.2

data/lib/masterview/directive_helpers.rb

@@ -0,0 +1,176 @@
+module MasterView
+
+  module DirectiveHelpers
+    CRLF = "\r\n"
+    ERB_START = '<% '
+    ERB_EVAL = '<%= '
+    ERB_END = ' %>'
+
+    #convenience constants defined to allow priority to directives
+    #higher priority (lower value) will be executed first in chain
+    module DirectivePriorities
+      Highest = 0
+      High =   0x3FFFFFFF/4
+      MediumHigh = 0x3FFFFFFF/3
+      Medium = 0x3FFFFFFF/2
+      MediumLow = (0x3FFFFFFF/3)*2
+      Low =    (0x3FFFFFFF/4)*3
+      Lowest = 0x3FFFFFFF 
+    end
+
+    
+    # find the last string that fully matches exactly the 
+    # parent tags content string array
+    # It looks for something that has been output as a unit in 
+    # the array not a substring
+    # returns the ref to the string which you can operate on 
+    # using replace
+    def find_last_in_parent(tag, full_string)
+      ret = nil
+      parent = tag.parent
+      unless parent.nil?
+        parent.content.reverse.each do |str|
+          if str == full_string
+            ret = str
+            break
+          end
+        end
+      end
+      ret
+    end
+
+    # set the last occurence to empty string
+    # returns true if found and set to empty string
+    def delete_last_in_parent(tag, full_string)
+      str = find_last_in_parent(tag, full_string)
+      found = !str.nil?
+      str.replace('') if found
+      found
+    end
+
+    # find a hash value from inside a simple str containing a hash
+    # non-evaling, looks for a :key => 'foo/bar' returning foo/bar string
+    def find_string_val_in_string_hash(str, key_or_sym)
+      key = key_or_sym.to_s
+      m = str.match( Regexp.new( Regexp.escape(key)+"\s*=>\s*'([^']*)'" ) ) #try single quote
+      m = str.match( Regexp.new( Regexp.escape(key)+"\s*=>\s*\"([^\"]*)\"" ) ) if m.nil? #try double quote
+      return nil if m.nil?
+      m[1]
+    end
+
+    #returns an array of args by parsing and evaling the str value passed in
+    #uses evaling, so can't have any variables only simple strings, numbers, booleans
+    def parse_eval_into_array(value)
+      return [] if value.nil? || value.empty?
+      val = value.strip
+      args = []
+      until val.empty?
+        if val =~ /^[:'"%\[{&*]/ #starts with quote or ruby lang char
+          v = nil
+          val = '{'+val+'}' if val =~ /^:/ #starts with colon, assume hash so wrap with brackets
+          eval 'v = '+ val #rest is all evaled
+          if v.is_a? Array
+            args += v
+          else 
+            args << v
+          end
+          break
+        else
+          unquoted_string = val.slice!( /^[^,]+/ ) #pull off everything up to a comma
+          unquoted_string.strip!
+          args.push unquoted_string
+          val.slice!( /^,/ ) #strip off comma if exists
+          val.strip!
+        end
+      end
+      args
+    end
+
+    #returns a hash, for values that are not already part of hash it adds them using default_key
+    #uses evaling so it cannot have any variables or non-simple types
+    def parse_eval_into_hash(value, default_key)
+      h = {}
+      a = parse_eval_into_array(value)
+      a.each do |v|
+        if v.is_a?(Hash)
+          h.merge!(v)
+        else #it adds any additional non-hash args using default key, if key,val exists, it changes to array and appends
+          prev = h[default_key]
+          if prev.nil? #nil just add it
+            h[default_key] = v
+          elsif prev.is_a?(Array) #was array, concat
+            h[default_key] = prev+v
+          else #anything else, make it into array
+            h[default_key] = [prev, v]
+          end
+        end
+      end
+      h
+    end
+
+    #parse into array of strings, containing the various arguments without evaling
+    #looks for %q{}, %q[], hash, array, function call using (), values deliminated by commas,
+    #it does not handle embedded quotes yet
+    def parse(str)
+      return [] if str.nil? || str.strip.empty?
+      s = str.strip
+      args = []
+      s.scan( /(%q"[^"]*"|%q\{[^}]*\}|%q\[[^\]]*\]|\{?\s*\S+\s*=>[^{}]+\}?|\[[^\]]*\]|[\w\.@]+\s*\([^\)]*\)|'[^']*'|[^,]+)\s*,?\s*/  ).flatten
+    end
+
+    #remove any strings that were prepended to the hashes, typically these are overridden by other values, so 
+    # we need to strip them off leaving only the hashes, returns a string with only hashes
+    def remove_prepended_strings(full_string)
+      return full_string if full_string.nil? || full_string.strip.empty?
+      hashes = full_string.scan( /(\{?)\s*(\S+\s*=>.*)/ ).flatten
+      hashes.join.strip
+    end
+
+    #merge hash_to_merge values into the hash contained in the full_string, hash_arg is zero based index of which
+    #hash this needes to be merged to if there are multiple ones.
+    def merge_into_embedded_hash(full_string, hash_arg, hash_to_merge)
+      return full_string if hash_to_merge.empty? 
+      full_string ||= ""
+      sorted_hash_to_merge = hash_to_merge.sort { |a,b| a.to_s <=> b.to_s } #sort, remember the keys might be symbols so use to_s
+      str_to_merge = sorted_hash_to_merge.collect{ |h,v| "#{h.inspect} => #{v.inspect}" }.join(', ')
+
+      hashes = full_string.scan( /(\{?[^{}]+=>[^{}]+\}?)\s*,?\s*/ ).flatten
+      hash_str = hashes[hash_arg] #be careful to use methods to update string in place or else put back in hash
+
+      if hash_str.nil? 
+        hashes.each do |v| #make sure each prior hash has brackets, since we are adding a hash
+          unless v.index '}'
+            v.insert(0, '{')
+            v.insert(-1, '}')
+          end
+        end
+        hashes[hash_arg] = hash_str = ""
+      end
+
+      closing_brack = hash_str.index '}'
+      if closing_brack
+        hash_str.insert(closing_brack, ', '+str_to_merge)
+      else
+        hash_str << ', ' unless hash_str.empty?
+        hash_str << str_to_merge
+      end
+      
+      hashes.join(', ')
+    end
+
+    #return attributes with lowercase keys
+    def lowercase_attribute_keys(attributes)
+      lcattrs = {}
+      attributes.each { |k,v| lcattrs[k.downcase] = v }
+      lcattrs
+    end
+
+    #return attributes with lowercase keys and values
+    def lowercase_attribute_keys_and_values(attributes)
+      lcattrs = {}
+      attributes.each { |k,v| lcattrs[k.downcase] = v.downcase }
+      lcattrs
+    end
+  end
+
+end

data/lib/masterview/directives/block.rb

@@ -0,0 +1,30 @@
+module MasterView
+  module Directives
+
+    #outputs a block around the text tags, if left bracket count is higher than right
+    #assume that the end is a right bracket otherwise use end
+    class Block < MasterView::DirectiveBase
+      def priority
+        DirectivePriorities::MediumHigh
+      end
+
+      def stag(directive_call_stack)
+        count_left_brackets = attr_value.scan( /\{/ ).size
+        count_right_brackets = attr_value.scan( /\}/ ).size
+        @end_block = (count_left_brackets > count_right_brackets) ? '}' : 'end'
+
+        ret = []
+        ret << erb(attr_value)
+        ret << directive_call_stack.render
+      end
+
+      def etag(directive_call_stack)
+        ret = []
+        ret << directive_call_stack.render
+        ret << erb(@end_block)
+      end
+
+    end
+  end
+end
+

data/lib/masterview/directives/content.rb

@@ -0,0 +1,10 @@
+module MasterView
+  module Directives
+    class Content < MasterView::DirectiveBase
+      def etag(dcs)
+        self.content = erb_content(attr_value)
+        dcs.render
+      end
+    end
+  end
+end

data/lib/masterview/directives/else.rb

@@ -0,0 +1,25 @@
+module MasterView
+  module Directives
+    #outputs an else/end block around the text tags removing previous end tag (from if/elsif)
+    class Else < MasterView::DirectiveBase
+      def priority
+        DirectivePriorities::High
+      end
+
+      def stag(directive_call_stack)
+        tag = @directive_call_stack.context[:tag]
+        delete_last_in_parent(tag, erb('end') )
+        ret = []
+        ret << erb('else')
+        ret << directive_call_stack.render
+      end
+
+      def etag(directive_call_stack)
+        ret = []
+        ret << directive_call_stack.render
+        ret << erb('end')
+      end
+
+    end
+  end
+end

data/lib/masterview/directives/elsif.rb

@@ -0,0 +1,26 @@
+module MasterView
+  module Directives
+
+    #outputs an elsif/end block around the text tags and remove previous end (from if)
+    class Elsif < MasterView::DirectiveBase
+      def priority
+        DirectivePriorities::High
+      end
+
+      def stag(directive_call_stack)
+        tag = @directive_call_stack.context[:tag]
+        delete_last_in_parent(tag, erb('end') )
+        ret = []
+        ret << erb('elsif '+attr_value)
+        ret << directive_call_stack.render
+      end
+
+      def etag(directive_call_stack)
+        ret = []
+        ret << directive_call_stack.render
+        ret << erb('end')
+      end
+
+    end
+  end
+end

data/lib/masterview/directives/form.rb

@@ -0,0 +1,19 @@
+module MasterView
+  module Directives
+
+    # creates start_form_tag and end_form_tag from values in form
+    class Form < MasterView::DirectiveBase
+      def stag(directive_call_stack)
+        options = {}
+        options[:multipart] = true if attr_lckv_matches('enctype', 'multipart/form-data')
+        options[:method] = 'get' if attr_lckv_matches('method', 'get')
+        merge_hash_attr_value!(1, options)
+        erb_content('form_tag ' + attr_value)
+      end
+
+      def etag(directive_call_stack)
+        erb_content('end_form_tag')
+      end
+    end
+  end
+end

data/lib/masterview/directives/global_inline_erb.rb

@@ -0,0 +1,39 @@
+module MasterView
+  module Directives
+
+    #outputs a block around the text tags, if left bracket count is higher than right
+    #assume that the end is a right bracket otherwise use end
+    class Global_inline_erb < MasterView::DirectiveBase
+      def initialize(attribute_value = nil)
+        super(attribute_value)
+      end
+
+      def priority
+        DirectivePriorities::Low
+      end
+      
+      def global_directive?
+        true
+      end
+
+      def stag(dcs)
+        attrs.each do |key, value|
+          replace_with_erb!( value )
+        end
+        dcs.render
+      end
+
+      def characters(dcs)
+        replace_with_erb!( data )
+        dcs.render
+      end
+
+      private
+
+      def replace_with_erb!(value)
+        subs = value.gsub!( MasterView::InlineErbSubstitutionRegex, '<%\1%>' )
+      end
+
+    end
+  end
+end

data/lib/masterview/directives/hidden_field.rb

@@ -0,0 +1,31 @@
+module MasterView
+  module Directives
+
+    class Hidden_field < MasterView::DirectiveBase
+      def stag(dcs)
+        #eat
+      end
+
+      def etag(dcs)
+        args = parse_attr_value
+        obj = args[0]
+        method = args[1]
+
+        obj = quote(obj) unless obj =~ /^:|'|"/
+        method = quote(method) unless method =~ /^:|'|"/
+
+        options = {}
+        options.merge! common_html_options(attrs_lck)
+        remove_strings_from_attr_value!
+        merge_hash_attr_value!(0, options)
+
+        a = []
+        a << 'hidden_field '+ obj
+        a << method
+        a << attr_value unless attr_value.strip.empty?
+        erb_content(a.join(', '))
+      end
+
+    end
+  end
+end

data/lib/masterview/directives/if.rb

@@ -0,0 +1,24 @@
+module MasterView
+  module Directives
+
+    #outputs an if/end block around the text tags
+    class If < MasterView::DirectiveBase
+      def priority
+        DirectivePriorities::High
+      end
+
+      def stag(directive_call_stack)
+        ret = []
+        ret << erb('if '+attr_value)
+        ret << directive_call_stack.render
+      end
+
+      def etag(directive_call_stack)
+        ret = []
+        ret << directive_call_stack.render
+        ret << erb('end')
+      end
+
+    end
+  end
+end

data/lib/masterview/directives/insert_generated_comment.rb

@@ -0,0 +1,30 @@
+module MasterView
+  module Directives
+
+    # Inserts a comment into the file that indicates that this file was generated
+    # and should not be edited, else changes could be lost. It includes the path to
+    # the original file that should be edited instead
+    class Insert_generated_comment < MasterView::DirectiveBase
+      Generated_comment_text = <<-END
+#    WARNING - This file was generated by MasterView plugin. 
+#    Do not edit this file otherwise you may lose your changes
+#    when this file is re-generated.
+# 
+#    To make changes edit the MasterView file which is located at: 
+  END
+
+      def priority
+        DirectivePriorities::Lowest
+      end
+
+      def stag(directive_call_stack)
+        comment = "\n<% \n" + Generated_comment_text  + "#    "+ attr_value + "\n%>"
+
+        ret = []
+        ret << directive_call_stack.render
+        ret << comment
+      end
+
+    end
+  end
+end

data/lib/masterview/directives/javascript_include.rb

@@ -0,0 +1,15 @@
+module MasterView
+  module Directives
+
+    #creates a link_to
+    class Javascript_include < MasterView::DirectiveBase
+      def stag(dcs)
+      end
+
+      def etag(dcs)
+        val = attr_value.starts_with?(':') ? attr_value : quote(attr_value) 
+        erb_content('javascript_include_tag ' + val)
+      end
+    end
+  end
+end

data/lib/masterview/directives/link_to.rb

@@ -0,0 +1,17 @@
+module MasterView
+  module Directives
+
+    #creates a link_to
+    class Link_to < MasterView::DirectiveBase
+      def stag(dcs)
+      end
+
+      def etag(dcs)
+        remove_strings_from_attr_value!
+        prepend_to_attr_value! quote( content_str ) #prepend quoted link name
+        self.content=''
+        erb_content('link_to ' + attr_value)
+      end
+    end
+  end
+end

data/lib/masterview/directives/link_to_if.rb

@@ -0,0 +1,21 @@
+module MasterView
+  module Directives
+
+    class Link_to_if < MasterView::DirectiveBase
+      def stag(dcs)
+      end
+
+      def etag(dcs)
+        args = parse_attr_value
+        condition = args[0]
+        remove_strings_from_attr_value!
+        a = []
+        a << 'link_to_if '+condition
+        a << quote(content_str)
+        a << attr_value unless attr_value.strip.empty?
+        self.content=''
+        erb_content(a.join(', '))
+      end
+    end
+  end
+end

data/lib/masterview/directives/link_to_remote.rb

@@ -0,0 +1,17 @@
+module MasterView
+  module Directives
+
+    #creates a link_to_remote
+    class Link_to_remote < MasterView::DirectiveBase
+      def stag(dcs)
+      end
+
+      def etag(dcs)
+        remove_strings_from_attr_value!
+        prepend_to_attr_value! quote( content_str ) #prepend quoted link name
+        self.content=''
+        erb_content('link_to_remote ' + attr_value)
+      end
+    end
+  end
+end

data/lib/masterview/directives/password_field.rb

@@ -0,0 +1,33 @@
+module MasterView
+  module Directives
+
+    class Password_field < MasterView::DirectiveBase
+      def stag(dcs)
+        #eat
+      end
+
+      def etag(dcs)
+        args = parse_attr_value
+        obj = args[0]
+        method = args[1]
+
+        obj = quote(obj) unless obj =~ /^:|'|"/
+        method = quote(method) unless method =~ /^:|'|"/
+
+        options = {}
+        options[:size] = attrs_lck['size'].to_i if attrs_lck['size']
+        options[:maxlength] = attrs_lck['maxlength'].to_i if attrs_lck['maxlength']
+        options.merge! common_html_options(attrs_lck)
+        remove_strings_from_attr_value!
+        merge_hash_attr_value!(0, options)
+
+        a = []
+        a << 'password_field '+ obj
+        a << method
+        a << attr_value unless attr_value.strip.empty?
+        erb_content(a.join(', '))
+      end
+
+    end
+  end
+end

data/lib/masterview/directives/preview.rb

@@ -0,0 +1,10 @@
+module MasterView
+  module Directives
+
+    class Preview
+      def initialize(attribute_value)
+        @attribute_value = attribute_value
+      end
+    end
+  end
+end

data/lib/masterview/directives/replace.rb

@@ -0,0 +1,18 @@
+module MasterView
+  module Directives
+
+    class Replace < MasterView::DirectiveBase
+      def priority
+        DirectivePriorities::MediumLow
+      end
+
+      def stag(directive_call_stack)
+      end
+
+      def etag(directive_call_stack)
+        self.content=''
+        erb_content(attr_value) unless attr_value.blank?
+      end
+    end
+  end
+end

data/lib/masterview/directives/stylesheet_link.rb

@@ -0,0 +1,14 @@
+module MasterView
+  module Directives
+
+    #creates a link_to
+    class Stylesheet_link < MasterView::DirectiveBase
+      def stag(dcs)
+      end
+
+      def etag(dcs)
+        erb_content('stylesheet_link_tag ' + quote(attr_value))
+      end
+    end
+  end
+end

data/lib/masterview/directives/submit.rb

@@ -0,0 +1,14 @@
+module MasterView
+  module Directives
+
+    class Submit < MasterView::DirectiveBase
+      def stag(directive_call_stack); end
+
+      def etag(directive_call_stack)
+        remove_strings_from_attr_value!
+        prepend_to_attr_value! quote( attrs_lck['value'] ) #prepend quoted submit button name
+        erb_content('submit_tag ' + attr_value)
+      end
+    end
+  end
+end

data/lib/masterview/directives/testfilter.rb

@@ -0,0 +1,55 @@
+module MasterView
+  module Directives
+
+    class TestDirective < MasterView::DirectiveBase
+      def priority
+        DirectivePriorities::Low
+      end
+
+      def stag(dcs)
+        ret = []
+        ret << 'stag'
+        ret << dcs.render
+        ret << 'stagend'
+      end
+
+      def characters(dcs)
+        ret = []
+        ret << 'char' 
+        ret << dcs.render
+      end
+      
+      def comment(dcs)
+        ret = []
+        ret << 'com'
+        ret << dcs.render
+      end
+
+      def cdata(dcs)
+        ret = []
+        ret << 'cdata'
+        ret << dcs.render
+      end
+
+      def etag(dcs)
+        ret = []
+        ret << 'etag'
+        ret << dcs.render
+        ret << 'etagend'
+      end
+
+      def child_title_stag(dcs)
+        ret = []
+        ret << 'desctitle'
+        ret << dcs.render
+      end
+
+      def child_title_etag(dcs)
+        dcs.context[:tag].content = @attribute_value
+        ret = []
+        ret << dcs.render
+      end
+      
+    end
+  end
+end

data/lib/masterview/directives/text_area.rb

@@ -0,0 +1,34 @@
+module MasterView
+  module Directives
+
+    class Text_area < MasterView::DirectiveBase
+      def stag(dcs)
+        #eat
+      end
+
+      def etag(dcs)
+        args = parse_attr_value
+        obj = args[0]
+        method = args[1]
+
+        obj = quote(obj) unless obj =~ /^:|'|"/
+        method = quote(method) unless method =~ /^:|'|"/
+
+        options = {}
+        options[:rows] = attrs_lck['rows'].to_i if attrs_lck['rows']
+        options[:cols] = attrs_lck['cols'].to_i if attrs_lck['cols']
+        options.merge! common_html_options(attrs_lck)
+        remove_strings_from_attr_value!
+        merge_hash_attr_value!(0, options)
+
+        a = []
+        a << 'text_area '+ obj
+        a << method
+        a << attr_value unless attr_value.strip.empty?
+        self.content=''
+        erb_content(a.join(', '))
+      end
+
+    end
+  end
+end