require 'active_support/core_ext/module/delegation'
require 'flavour_saver'
require 'hashie/mash'

FS.register_helper :adjust_iframe_height_script do
  <<-HTML.strip_heredoc.html_safe
    <script>$(function() {
      height = this.body.offsetHeight + 43;
      parent.postMessage(JSON.stringify({height: height, id: name}), "*");
    });</script>
  HTML
end

FS.register_helper :download_csv do
  <<-HTML.strip_heredoc.html_safe
    <script>$(function() {
      #{init_download_script}
      $("div#stanza_buttons").append("<a id='download_csv' href='#'><i class='fa fa-file-o'></i> CSV</a>");

      var csv = '';
      var tables = $('body > table');
      if (tables.length > 0) {
        for (var tableNum = 0; tableNum < tables.length; tableNum++) {
          var table = tables[tableNum];
          var rowLength = table.rows.length;
          var colLength = table.rows[0].cells.length;
          for (var i = 0; i < rowLength; i++) {
            for (var j = 0; j < colLength; j++) {
              var cell        = table.rows[i].cells[j];
              var textContent = null;

              if ($(cell).find("li")[0]) {
                textContent = $(cell).find('li').map(function(){
                  return this.textContent.replace(/^\\s+/mg, "").replace(/\\n/g, "");
                }).get().join(" | ");
              } else if ($(cell).find("table")[0]) {
                textContent = $(cell).find('table').find('th, td').map(function(){
                  return this.textContent.replace(/^\\s+/mg, "").replace(/\\n/g, "");
                }).get().join(" | ");
              } else {
                textContent = cell.textContent.replace(/^\\s+/mg, "").replace(/\\n/g, "");
              }
              if (j === colLength - 1) {
                csv +=  textContent;
              } else {
                csv +=  textContent + ', ';
              }
            }
            csv += "\\r\\n";
          }
        }
      }

      $("#download_csv").on("click",function(){
        window.open('data:text/plain;' + (window.btoa?'base64,'+btoa(csv):csv));
      });

    });
    </script>
  HTML
end

FS.register_helper :download_json do
  json = except(:css_uri).to_json

  <<-HTML.strip_heredoc.html_safe
    <script>$(function() {
      #{init_download_script}
      $("div#stanza_buttons").append("<a id='download_json' href='#'><i class='fa fa-file-o'></i> JSON</a>");
      var json_str = JSON.stringify(#{json}, "", "\t");

      $("#download_json").on("click",function(){
        window.open('data:application/json;' + (window.btoa?'base64,'+btoa(json_str):json_str));
      });
    });
    </script>
  HTML
end

FS.register_helper :download_svg do
  <<-HTML.strip_heredoc.html_safe
    <script>$(function() {
      #{init_download_script}
      $("div#stanza_buttons").append("<a id='download_svg' href='#'><i class='fa fa-file-o'></i> SVG</a>");

      $("#download_svg").on("click",function(){
        var svg = $("svg");
        if (svg[0]) {
          if (!svg.attr("xmlns")) {
            svg.attr("xmlns","http://www.w3.org/2000/svg");
          }
          if (!svg.attr("xmlns:xlink")) {
            svg.attr("xmlns:xlink","http://www.w3.org/1999/xlink");
          }

          var svgText = svg.wrap('<div>').parent().html();
          window.open('data:image/svg+xml;' + (window.btoa?'base64,'+btoa(svgText):svgText));
        } else {
          // TODO...
          console.log("Can't open svg file");
        }
      });

    });
    </script>
  HTML
end

FS.register_helper :download_image do
  <<-HTML.strip_heredoc.html_safe
    <script type="application/javascript" src="/stanza/assets/canvas-toBlob.js"></script>

    <script type="application/javascript" src="http://canvg.googlecode.com/svn/trunk/rgbcolor.js"></script>
    <script type="application/javascript" src="http://canvg.googlecode.com/svn/trunk/StackBlur.js"></script>
    <script type="application/javascript" src="http://canvg.googlecode.com/svn/trunk/canvg.js"></script>

    <script>$(function() {
      #{init_download_script}
      $("div#stanza_buttons").append("<a id='download_image' href='#'><i class='fa fa-file-o'></i> IMAGE</a>");

      $("body").append("<div style='display: none;'><canvas id='drawarea'></canvas></div>");

      $("#download_image").on("click",function(){
        var svg = $("svg");
        if (svg[0]) {
          var svgText = svg.wrap('<div>').parent().html();
          canvg('drawarea', svgText, {renderCallback: function(){
              var canvas = $("#drawarea")[0];

              canvas.toBlob(function(blob) {
                var blob_url = window.URL.createObjectURL(blob);
                window.open(blob_url);
              }, "image/png");
            }
          });

        } else {
          // TODO...
          console.log("Can't open image file");
        }
      });

    });
    </script>
  HTML
end

def init_download_script
  <<-HTML.strip_heredoc.html_safe
    if (!$("div#stanza_buttons")[0]) {
      $('body').append("<div id='tool_bar'><div id='stanza_buttons' class='pull-left'></div></div>");
    }
  HTML
end

module TogoStanza::Stanza
  autoload :ExpressionMap, 'togostanza/stanza/expression_map'
  autoload :Grouping,      'togostanza/stanza/grouping'
  autoload :Markdown,      'togostanza/stanza/markdown'
  autoload :Querying,      'togostanza/stanza/querying'

  class Context < Hashie::Mash
    def respond_to_missing?(*)
      # XXX It looks ugly, but we need use not pre-defined properties
      true
    end
  end

  class Base
    extend ExpressionMap::Macro
    include Querying
    include Grouping

    define_expression_map :properties
    define_expression_map :resources

    property :css_uri do |css_uri|
      if css_uri
        css_uri.split(',')
      else
        %w(
          //cdnjs.cloudflare.com/ajax/libs/twitter-bootstrap/2.2.2/css/bootstrap.min.css
          //cdnjs.cloudflare.com/ajax/libs/font-awesome/4.2.0/css/font-awesome.min.css
          /stanza/assets/stanza.css
        )
      end
    end

    class_attribute :root

    def self.id
      to_s.underscore.sub(/_stanza$/, '')
    end

    delegate :id, to: 'self.class'

    def initialize(params = {})
      @params = params
    end

    attr_reader :params

    def context
      Context.new(properties.resolve_all_in_parallel(self, params))
    end

    def resource(name)
      resources.resolve(self, name, params)
    end

    def render
      path = File.join(root, 'template.hbs')

      Tilt.new(path).render(context)
    end

    def help
      path = File.join(root, 'help.md')

      TogoStanza::Markdown.render(File.read(path))
    end

    def metadata
      path = File.join(root, 'metadata.json')

      if File.exist?(path)
        JSON.load(open(path))
      else
        nil
      end
    end
  end
end