storefront 0.3.2 → 0.5.0

data/lib/storefront/helpers/content_helper.rb

@@ -0,0 +1,211 @@
+module Storefront
+  module Helpers
+    module ContentHelper
+      SCOPES_WITH_NAMESPACE_AND_NESTED_MODEL = [
+        '%{namespace}.%{model}.%{nested_model}.%{action}.%{attribute}',
+        '%{model}.%{nested_model}.%{action}.%{attribute}',
+        '%{namespace}.%{model}.%{action}.%{attribute}',
+        '%{model}.%{action}.%{attribute}',
+        '%{namespace}.%{model}.%{nested_model}.%{attribute}',
+        '%{model}.%{nested_model}.%{attribute}',
+        '%{namespace}.%{model}.%{attribute}',
+        '%{model}.%{attribute}',
+        '%{namespace}.%{nested_model}.%{attribute}',
+        '%{nested_model}.%{attribute}',
+        '%{namespace}.%{attribute}',
+        '%{attribute}'
+      ]
+    
+      SCOPES_WITH_NESTED_MODEL = [
+        '%{model}.%{nested_model}.%{action}.%{attribute}',
+        '%{model}.%{action}.%{attribute}',
+        '%{model}.%{nested_model}.%{attribute}',
+        '%{model}.%{attribute}',
+        '%{nested_model}.%{attribute}',
+        '%{attribute}'
+      ]
+    
+      SCOPES_WITH_NAMESPACE = [
+        '%{namespace}.%{model}.%{action}.%{attribute}',
+        '%{namespace}.%{model}.%{attribute}',
+        '%{model}.%{action}.%{attribute}',
+        '%{model}.%{attribute}',
+        '%{namespace}.%{attribute}',
+        '%{attribute}'
+      ]
+    
+      SCOPES = [
+        '%{model}.%{action}.%{attribute}',
+        '%{model}.%{attribute}',
+        '%{attribute}'
+      ]
+    
+      # t?(:"what.summary", :scope => :"reports.titles", :model => deal)
+      def t?(key, options = {})
+        return key if key.is_a?(::String) || key.blank?
+      
+        models      = Storefront::Model.model_names(options[:model] || options[:models] || options[:model_names] || storefront_config.current_scope[:resource] || [])
+        models      << "" if models.blank?
+        namespaces  = Array(options[:namespaces] || options[:namespace] || storefront_config.current_scope[:namespace])
+        namespaces  << "" if namespaces.blank? && !!storefront_config.localize_with_namespace
+        action_name = options[:action] || storefront_config.current_scope[:action]
+        defaults    = []
+        allow_blank = options[:allow_blank] == true
+        count       = options[:count]
+        # none, one, many, other
+        count_key   = count != 1 ? :other : :one
+
+        keys        = [key.to_s]
+        
+        if options.has_key?(:present) || options.has_key?(:past) || options.has_key?(:future)
+          if options[:future] == true
+            tense_key = :future
+          else
+            tense_key = (options[:present] == true || options[:past] == false) ? :present : :past
+          end
+        else
+          tense_key = nil
+        end
+
+        if options.has_key?(:nested_model)
+          with_nested_model = !!options[:nested_model]
+        else
+          with_nested_model = !!storefront_config.localize_with_nested_model
+        end
+
+        if options.has_key?(:namespace)
+          with_namespace = !!options[:namespace]
+        else
+          with_namespace = !!storefront_config.localize_with_namespace
+        end
+
+        if with_nested_model && with_namespace
+          # TODO, need to performance test before we do this many operations
+          SCOPES_WITH_NAMESPACE_AND_NESTED_MODEL
+        elsif with_nested_model
+          # TODO
+          SCOPES_WITH_NESTED_MODEL
+        elsif with_namespace
+          namespaces.each do |namespace|
+            keys.each do |_key|
+              SCOPES_WITH_NAMESPACE.each do |_path|
+                models.each do |model|            
+                  path = _path.dup
+                  path.gsub!('%{namespace}', namespace)
+                  path.gsub!('%{model}', model)
+                  path.gsub!('%{action}', action_name)
+                  path.gsub!('%{attribute}', _key)
+                  path.gsub!('..', '.')
+                  defaults << path
+                end
+              end
+            end
+          end
+        else
+          keys.each do |_key|
+            SCOPES.each do |_path|
+              models.each do |model|
+                path = _path.dup
+                path.gsub!('%{model}', model)
+                path.gsub!('%{action}', action_name)
+                path.gsub!('%{attribute}', _key)
+                path.gsub!('..', '.')
+                defaults << path
+              end
+            end
+          end
+        end
+      
+        # RESERVED KEYS
+        [:past, :present, :future, :allow_blank, :model, :models, :model_names, :action, :nested_model, :namespace, :namespaces].each do |key|
+          options.delete(key)
+        end
+      
+        defaults.map!(&:to_sym)
+        defaults << ''
+
+        value       = I18n.t(defaults.shift, options.merge(:default => defaults))
+      
+        if value.is_a?(::Hash)
+          if value.has_key?(count_key)
+            value = value[count_key]
+          elsif value.has_key?(tense_key)
+            value = value[tense_key]
+            if value.is_a?(::Hash) && value.has_key?(count_key)
+              value = value[count_key]
+            end
+          elsif value.has_key?(count_key)
+            value = value[count_key]
+          end
+        end
+      
+        if value.is_a?(::Hash)
+          if value.has_key?(:one)
+            value = value[:one]
+          end
+        end
+      
+        if value.is_a?(::Hash)
+          if value.has_key?(:present)
+            value = value[:present]
+          elsif value.has_key?(:past)
+            value = value[:past]
+          elsif value.has_key?(:future)
+            value = value[:future]
+          end
+        end
+      
+        # MORE RESERVED KEYS
+        [:scope].each do |key|
+          options.delete(key)
+        end
+      
+        if value.blank? && !allow_blank
+          key.to_s.split(".").last.titleize
+        elsif options.present?
+          I18n.interpolate(value, options)
+        else
+          value
+        end
+      end
+  
+      def rendered_text(string)
+        string.to_s.
+          gsub(/<\/?[^>]*>/, '').
+          gsub(/\n/, " ").
+          gsub("\r", " ").
+          squeeze(" ").
+          gsub(/\"/, "&Prime;"). # convert quotes to inches
+          gsub(/\'/, "&prime;"). # single quote to feet
+          gsub(/\$0?0*\.(\d+)/, "\\1&cent;").html_safe
+      end
+      
+      def sanitize(text)
+        text.gsub(/<\/?[^>]*>/, '').gsub(/\n/, " ").gsub("\r", " ").squeeze(" ")
+      end
+      
+      def read_binary_file(path)
+        File.open(path, 'rb') {|f| f.read }
+      end
+
+      def encoded_contents(path)
+        Base64.encode64(read_binary_file(path)).gsub(/\n/, '')
+      end
+
+      def font_face_data_uri(path)
+        "url(\"data:font/truetype;base64,#{encoded_contents(path)}\")"
+      end
+      
+      # http://snippets.dzone.com/posts/show/805
+      def read_image_size(path)
+        width, height = IO.read("#{Rails.root}/public/images/#{path}")[0x10..0x18].unpack('NN')
+        {:width => width, :height => height}
+      end
+    
+      def html5_time(date_or_time)
+        return nil if date_or_time.blank?
+        date_or_time.acts_like?(:time) ? date_or_time.xmlschema : date_or_time.rfc3339
+      end
+    end
+  end
+end

data/lib/storefront/helpers/dom_helper.rb

@@ -0,0 +1,136 @@
+module Storefront
+  module Helpers
+    # HTML Element Attribute Helper
+    module DomHelper
+      def clone_attributes(hash)
+        result = {}
+        return result if hash.blank?
+        hash.each do |key, value|
+          result[key] = value.is_a?(::Hash) ? clone_attributes(value) : value
+        end
+        result
+      end
+      
+      def merge_class!(attributes, *values)
+        return {} if attributes.nil?
+        hash = merge_class(attributes, *values)
+        attributes[:class] = hash[:class] if hash
+        attributes
+      end
+      
+      def merge_class(attributes, *values)
+        if values.present?
+          if attributes[:class].present?
+            classes = attributes[:class].split(/\s+/)
+          else
+            classes = []
+          end
+          classes += values.compact.map(&:to_s)
+          classes.uniq!
+        else
+          classes = nil
+        end
+      
+        if classes.present?
+          attributes.merge(:class => classes.join(" "))
+        else
+          attributes
+        end
+      end
+      
+      def index_class(index, array_or_length)
+        length = array_or_length.is_a?(::Array) ? array_or_length.length : array_or_length
+        return nil if length.blank? || (length <= 1)
+        
+        if index == 0
+          "first"
+        elsif index == length - 1
+          "last"
+        else
+          nil
+        end
+      end
+      
+      # @example Aria role main.
+      # 
+      #   aria(:main) #=> {:role => :main}
+      def aria(key)
+        {:role => key}
+      end
+      
+      # @example Customize <tt><body></tt> tag attributes from inside a partial
+      # 
+      #   # app/views/posts/_post.haml
+      #   - dom :body => {:class => "admin", :id => "admin"}
+      # 
+      #   # app/views/layouts/application.haml
+      #   %body{dom[:body]}
+      def dom(attributes = {})
+        @dom ||= {}
+        @dom.deep_merge!(attributes)
+        @dom
+      end
+      
+      # calls <tt>model.to_title</tt>    
+      def page(*args)
+        options = args.extract_options!
+        title   = args.shift
+        options[:action] ||= storefront_config.current_scope[:action]
+      
+        title = case title
+        when ::String
+          title
+        when ::Symbol
+          t?(title, :scope => :"pages.titles")
+        else
+          if options[:title].present?
+            options[:title]
+          else
+            parent_name = !!options[:parent] ? resource_to_title(storefront_config.current_scope[:parent], options) : nil
+            resource_name = resource_to_title(storefront_config.current_scope[:resource], options)
+            [parent_name, resource_name].compact.join(storefront_config.breadcrumb)
+          end
+        end
+      
+        self.title(options[:browser] || title, options)
+      
+        options                                    = header_widget_options(options.merge(:title => title))
+      
+        options[:header_html].reverse_merge!(:id   => storefront_config.page_header_id) if storefront_config.page_header_id.present?
+        options[:title_html].reverse_merge!(:id    => storefront_config.page_title_id) if storefront_config.page_title_id.present?
+        options[:subtitle_html].reverse_merge!(:id => storefront_config.page_subtitle_id) if storefront_config.page_subtitle_id.present?
+        options[:level]                            = 1
+        options[:skip_format]                      = true
+      
+        header_widget options.merge(:title => title)
+      end
+      
+      def title_widget(*args, &block)
+        options = args.extract_options!
+        options[:header_html] ||= {}
+        merge_class! options[:header_html], *widget_classes("title-widget")
+        header_widget(options, &block)
+      end
+    
+      def title_widget_options
+        
+      end
+      
+      def resource_to_title(resource, options = {})
+        if resource.present?
+        
+          # handle subdomains as well
+          t?(options[:action].to_sym, 
+            :scope       => :"pages.titles",
+            :model       => Storefront::ModelProxy.model_names(resource), 
+            :namespaces  => storefront_config.current_scope[:namespace],
+            :allow_blank => true,
+            :action      => "",
+            :name        => resource.is_a?(::Class) ? resource.name.titleize.pluralize : resource.to_title,
+            :clazz       => resource.is_a?(::Class) ? resource.name.titleize : resource.class.name
+          )
+        end
+      end
+    end
+  end
+end

data/lib/storefront/helpers/head_helper.rb

@@ -1,229 +1,301 @@
 module Storefront
-  module HeadHelper
-    def meta_for(post)
-      result = ""
-      unless post.title.blank?
-        result << title(post.title)
-        result << "\n"
-      end
-      unless post.tags.blank?
-        result << keywords(post.tags.join(", "))
-        result << "\n"
-      end
-      unless post.description.blank?
-        result << description(post.description)
-        result << "\n"
-      end
-      result
-    end
-    
-    def meta(options = {})
-      title(options[:title]) if options.has_key?(:title)
-      description(options[:description]) if options.has_key?(:description)
-      keywords(options[:keywords]) if options.has_key?(:keywords)
-      copyright(options[:copyright]) if options.has_key?(:copyright)
-    end
-  
-    def meta_tags(*args)
-      options = args.extract_options!
-      site = options[:site] || args.first
-      result = title_tag(site, options[:title])
-      result << "\n"
-      result << content_type_tag
-      result << "\n"
-      result << description_tag(options[:description])
-      result << "\n"
-      result << keywords_tag(options[:keywords])
-      result << "\n"
-      result << copyright_tag(options[:copyright])
-      result
-    end
-    
-    # country
-    # classification
-    # author
-    # apple-mobile-web-app-capable
-    # apple-touch-fullscreen
-    # google-analytics
-    # Revisit-After
-    # category
-    def meta_tag(name, content = '')
-      tag(:meta, :name => name, :content => content)
-    end
-  
-    def title(string)
-      @content_for_title = string
-    end
-  
-    def title_tag(*args)
-      options = args.extract_options!
-    
-      site = options[:site] || args.first
-      # Prefix (leading space)
-      if options[:prefix]
-        prefix = options[:prefix]
-      elsif options[:prefix] === false
-        prefix = ''
-      else
-        prefix = ' '
+  module Helpers
+    module HeadHelper
+      def meta_tags(*args)
+        options = args.extract_options!
+        options[:site] ||= args.shift
+        result = []
+        storefront_config.meta_tags.each do |meta_tag_name|
+          if options[meta_tag_name].present?
+            result << meta_tag(meta_tag_name, options[meta_tag_name])
+          end
+        end
+        result.join("\n")
       end
-    
-      # Separator
-      unless options[:separator].blank?
-        separator = options[:separator]
-      else
-        separator = '|'
+      alias_method :meta, :meta_tags
+      
+      def meta_tag(name, content = '')
+        capture_haml { haml_tag :meta, :name => name, :content => content }
       end
-  
-      # Suffix (trailing space)
-      if options[:suffix]
-        suffix = options[:suffix]
-      elsif options[:suffix] === false
-        suffix = ''
-      else
-        suffix = ' '
+      
+      def title(*args)
+        @content_for_title = *args
       end
-
-      # Title
-      title = @content_for_title
-      if options[:lowercase] === true
-        title = title.downcase unless title.blank?
+      
+      def title_tag(*args)
+        options = args.extract_options!
+        # Title
+        title   = @content_for_title
+      
+        if title.present?
+          options.merge!(title.extract_options!)
+          title = @content_for_title.shift || options[:title]
+        end
+      
+        if options[:lowercase] === true
+          title = title.downcase unless title.blank?
+        end
+      
+        site    = options.has_key?(:site) ? options[:site] : args.first
+      
+        # Prefix (leading space)
+        if options[:prefix]
+          prefix = options[:prefix]
+        elsif options[:prefix] === false
+          prefix = ''
+        else
+          prefix = ' '
+        end
+      
+        # Separator
+        unless options[:separator].blank?
+          separator = options[:separator]
+        else
+          separator = '|'
+        end
+      
+        # Suffix (trailing space)
+        if options[:suffix]
+          suffix = options[:suffix]
+        elsif options[:suffix] === false
+          suffix = ''
+        else
+          suffix = ' '
+        end
+      
+        # title
+        if title.blank?
+          result = content_tag :title, site
+        else
+          title  = normalize_title(title)
+          title  = [site] + title if site
+          title.reverse! unless options[:reverse] === false
+          sep    = prefix + separator + suffix
+          result = content_tag(:title, title.join(sep))
+        end
+        result
+      end
+      
+      def description(string)
+        @content_for_description = string
+      end
+      
+      def description_tag(default='')
+        content = normalize_description(@content_for_description || default)
+        meta_tag(:description, content) unless content.blank?
       end
-    
-      # title
-      if title.blank?
-        result = content_tag :title, site
-      else
-        title = normalize_title(title)
-        title = [site] + title
-        title.reverse! unless options[:reverse] === false
-        sep = prefix + separator + suffix
-        result = content_tag(:title, title.join(sep))
-      end
-      result
-    end
-  
-    def description(string)
-      @content_for_description = string
-    end
-
-    def description_tag(default='')
-      content = normalize_description(@content_for_description || default)
-      tag(:meta, :name => :description, :content => content) unless content.blank?
-    end
 
-    def keywords(string)
-      @content_for_keywords = string
-    end
+      def keywords(string)
+        @content_for_keywords = string
+      end
 
-    def keywords_tag(default = '')
-      content = normalize_keywords(@content_for_keywords || default)
-      tag(:meta, :name => :keywords, :content => content) unless content.blank?
-    end
+      def keywords_tag(default = '')
+        content = normalize_keywords(@content_for_keywords || default)
+        meta_tag(:keywords, content) unless content.blank?
+      end
   
-    def copyright(string)
-      @content_for_copyright = string
-    end
+      def copyright(string)
+        @content_for_copyright = string
+      end
 
-    def copyright_tag(default='')
-      content = @content_for_copyright || default
-      tag(:meta, :name => :copyright, :content => content) unless content.blank?
-    end
+      def copyright_tag(default='')
+        content = @content_for_copyright || default
+        meta_tag(:copyright, content) unless content.blank?
+      end
   
-    def robots(*args)
-      content_for(:robots, args.join(", "))
-    end
+      def robots(*args)
+        content_for(:robots, args.join(", "))
+      end
   
-    def robots_tag(*args)
-      options = args.extract_options!
+      def robots_tag(*args)
+        options = args.extract_options!
     
-      noindex_name = tags[:noindex].is_a?(String) ? tags[:noindex] : 'robots'
-      nofollow_name = tags[:nofollow].is_a?(String) ? tags[:nofollow] : 'robots'
-
-      if noindex_name == nofollow_name
-        content = [(tags[:noindex] ? 'noindex' : nil), (tags[:nofollow] ? 'nofollow' : nil)].compact.join(', ')
-        unless content.blank?
-          result << "\n"
-          result << tag(:meta, :name => noindex_name, :content => content)
-        end
-      else
-        if tags[:noindex]
-          result << "\n"
-          result << tag(:meta, :name => noindex_name, :content => 'noindex')
-        end
-        if tags[:nofollow]
-          result << "\n"
-          result << tag(:meta, :name => nofollow_name, :content => 'nofollow')
+        noindex_name = tags[:noindex].is_a?(String) ? tags[:noindex] : 'robots'
+        nofollow_name = tags[:nofollow].is_a?(String) ? tags[:nofollow] : 'robots'
+      
+        if noindex_name == nofollow_name
+          content = [(tags[:noindex] ? 'noindex' : nil), (tags[:nofollow] ? 'nofollow' : nil)].compact.join(', ')
+          unless content.blank?
+            result << "\n"
+            result << meta_tag(noindex_name, content)
+          end
+        else
+          if tags[:noindex]
+            result << "\n"
+            result << meta_tag(noindex_name, "noindex")
+          end
+          if tags[:nofollow]
+            result << "\n"
+            result << meta_tag(nofollow_name, "nofollow")
+          end
         end
+
+        return result
       end
-      # canonical
-      unless tags[:canonical].blank?
-        result << "\n"
-        result << tag(:link, :rel => :canonical, :href => tags[:canonical]) 
+      
+      def canonical_link_tag(path)
+        link_tag(:rel => :canonical, :href => path)
       end
-
-      return result
-    end
-  
-    def copyright(from)
-      now = Time.now.year
-      now.eql?(from) ? now : "#{from} - #{now}"
-    end
-  
-    # Apple
-    # http://developer.apple.com/safari/library/documentation/AppleApplications/Reference/SafariHTMLRef/Articles/MetaTags.html
-  
-    # Facebook (and opengraph)
-    # http://developers.facebook.com/docs/opengraph#types
-  
-    # http://wiki.developers.facebook.com/index.php/Facebook_Share/Specifying_Meta_Tags
-    def snapshot_tag(href)
-      tag(:link, :rel => "image_src", :href => href)
-    end
-  
-    # http://wiki.developers.facebook.com/index.php/Facebook_Share/Specifying_Meta_Tags
-    def medium(type)
-      tag(:meta, :name => :medium, :content => type)
-    end
-  
-    def classification(type)
-      tag(:meta, :name => "og:type", :content => type)
-    end
-  
-    def content_type_tag(type = "text/html", charset = "UTF-8")
-      meta_tag("Content-Type", "#{type}; charset=#{charset}")
-    end
+      
+      def http_meta_tag(name, content)
+        capture_haml { haml_tag :meta, :"http-equiv" => name, :content => content }
+      end
+      
+      # @example Redirect to the site home page in 20 seconds.
+      # 
+      #   refresh_meta_tag root_url, :in => 20.seconds
+      def refresh_meta_tag(path, options = {})
+        http_meta_tag("refresh", "#{options[:in].to_i};url=#{path}")
+      end
+      
+      def copyright(from)
+        now = Time.now.year
+        now.eql?(from) ? now : "#{from} - #{now}"
+      end
+      
+      # Apple
+      # http://developer.apple.com/safari/library/documentation/AppleApplications/Reference/SafariHTMLRef/Articles/MetaTags.html
     
-    def search_link_tag(href, title)
-      link_tag({:rel => "search", :type => "application/opensearchdescription+xml", :href => href, :title => title})
-    end  
+      # Facebook (and opengraph)
+      # http://developers.facebook.com/docs/opengraph#types
   
-    def favicon_link_tag(favicon = "/favicon.ico")
-      link_tag({:rel => "shortcut icon", :href => favicon, :type => "image/x-icon"})
-    end
+      # http://wiki.developers.facebook.com/index.php/Facebook_Share/Specifying_Meta_Tags
+      def snapshot_link_tag(href)
+        link_tag(:rel => "image_src", :href => href)
+      end
     
-    def link_tag(options = {})
-      tag(:link, options)
-    end
-  
-    private
-
-      def normalize_title(title)
-        if title.is_a? String
-          title = [title]
+      def html4_content_type_tag(charset = "UTF-8", type = "text/html")
+        http_meta_tag("Content-Type", "#{type}; charset=#{charset}")
+      end
+      
+      def html5_content_type_tag(charset = "UTF-8")
+        capture_haml { haml_tag :meta, "charset" => charset }
+      end
+      alias_method :content_type_tag, :html5_content_type_tag
+    
+      def search_link_tag(href, title)
+        link_tag(:rel => "search", :type => "application/opensearchdescription+xml", :href => href, :title => title)
+      end
+      
+      def favicon_link_tag(favicon = "/favicon.ico")
+        link_tag(:rel => "shortcut icon", :href => favicon, :type => "image/x-icon")
+      end
+      
+      def link_tag(options = {})
+        capture_haml { haml_tag :link, options }
+      end
+      
+      def ie_application_meta_tags(title, options = {})
+        result = []
+        result << meta_tag("application-name", title)
+        result << meta_tag("msapplication-tooltip", options[:tooltip]) if options[:tooltip].present?
+        result << meta_tag("msapplication-starturl", options[:url]) if options[:url].present?
+        if options[:width].present? && options[:height].present?
+          result << meta_tag("msapplication-window", "width=#{options[:width]};height=#{options[:height]}")
         end
-        title.map { |t| h(strip_tags(t)) }
+        result << meta_tag("msapplication-navbutton-color", options[:color]) if options[:color].present?
+        result.join("\n")
       end
-  
-      def normalize_description(description)
-        return '' unless description
-        truncate(strip_tags(description).gsub(/\s+/, ' '), :length => 200)
+      
+      def ie_task_meta_tag(name, path, icon = nil)
+        content = []
+        content << "name=#{name}"
+        content << "uri=#{path}"
+        content << "icon-uri=#{icon}" if icon
+        meta_tag("msapplication-task", content.join(";"))
       end
-  
-      def normalize_keywords(keywords)
-        return '' unless keywords
-        keywords = keywords.flatten.join(', ') if keywords.is_a?(Array)
-        strip_tags(keywords).mb_chars.downcase
+      
+      def apple_meta_tags(options = {})
+        result = []
+        result << apple_viewport_meta_tag(options)
+        result << apple_full_screen_meta_tag(options[:full_screen]) if options.has_key?(:full_screen)
+        result << apple_mobile_compatible_meta_tag(options[:mobile]) if options.has_key?(:mobile)
+        result.join
+      end
+      
+      # http://www.html5rocks.com/en/mobile/mobifying.html
+      def apple_viewport_meta_tag(options = {})
+        viewport = []
+        viewport << "width=#{options[:width]}" if options[:width].present?
+        viewport << "height=#{options[:height]}" if options[:height].present?
+        viewport << "initial-scale=#{options[:scale] || 1.0}"
+        viewport << "minimum-scale=#{options[:min]}" if options[:min].present?
+        viewport << "maximum-scale=#{options[:max]}" if options[:max].present?
+        viewport << "user-scalable=#{options[:scalable] == true ? "yes" : "no"}" if options.has_key?(:scalable)
+        
+        meta_tag("viewport", viewport.join(", "))
+      end
+      
+      def apple_full_screen_meta_tag(value)
+        meta_tag("apple-touch-fullscreen", value == true ? "yes" : "no")
+      end
+      
+      def apple_mobile_compatible_meta_tag(value)
+        meta_tag("apple-mobile-web-app-capable", value == true ? "yes" : "no")
+      end
+      
+      def apple_touch_icon_link_tag(path, options = {})
+        rel = ["apple-touch-icon"]
+        rel << "#{options[:size]}x#{options[:size]}" if options[:size].present?
+        rel << "precomposed" if options[:precomposed]
+        link_tag(:rel => rel.join("-"), :href => path)
       end
+      
+      def apple_touch_icon_link_tags(path, *sizes)
+        options = sizes.extract_options!
+        sizes.map { |size| apple_touch_icon_link_tag(path, options.merge(:size => size)) }.join
+      end
+      
+      def open_graph_meta_tags(options = {})
+        result = []
+        
+        result << open_graph_meta_tag("og:title", options[:title]) if options[:title]
+        result << open_graph_meta_tag("og:type", options[:type]) if options[:type]
+        result << open_graph_meta_tag("og:image", options[:image]) if options[:image]
+        result << open_graph_meta_tag("og:site_name", options[:site]) if options[:site]
+        result << open_graph_meta_tag("og:description", options[:description]) if options[:description]
+        result << open_graph_meta_tag("og:email", options[:email]) if options[:email]
+        result << open_graph_meta_tag("og:phone_number", options[:phone]) if options[:phone]
+        result << open_graph_meta_tag("og:fax_number", options[:fax]) if options[:fax]
+        result << open_graph_meta_tag("og:latitude", options[:lat]) if options[:lat]
+        result << open_graph_meta_tag("og:longitude", options[:lng]) if options[:lng]
+        result << open_graph_meta_tag("og:street-address", options[:street]) if options[:street]
+        result << open_graph_meta_tag("og:locality", options[:city]) if options[:city]
+        result << open_graph_meta_tag("og:region", options[:state]) if options[:state]
+        result << open_graph_meta_tag("og:postal-code", options[:zip]) if options[:zip]
+        result << open_graph_meta_tag("og:country-name", options[:country]) if options[:country]
+        
+        result.join("\n")
+      end
+      
+      def open_graph_meta_tag(property, content)
+        capture_haml { haml_tag :meta, :property => property, :content => content }
+      end
+      
+      # first, last, next, prev
+      def pagination_meta_tags(options = {})
+        
+      end
+      
+      private
+
+        def normalize_title(title)
+          if title.is_a? String
+            title = [title]
+          end
+          title.map { |t| h(strip_tags(t)) }
+        end
+  
+        def normalize_description(description)
+          return '' unless description
+          truncate(strip_tags(description).gsub(/\s+/, ' '), :length => 200)
+        end
+        
+        def normalize_keywords(keywords)
+          return '' unless keywords
+          keywords = keywords.flatten.join(', ') if keywords.is_a?(Array)
+          strip_tags(keywords).mb_chars.downcase
+        end
+    end
   end
 end