fn_document 0.9.2

data/lib/fn/resource.rb

@@ -0,0 +1,53 @@
+require File.dirname(__FILE__) + "/util"
+
+class String
+  def starts_with?(other)
+    head = self[0, other.length]
+    head == other
+  end
+end
+
+module FN
+  class Resource
+    include Util
+    attr_reader :node
+    
+    def initialize(node)
+      raise_unless_xml_node node
+      @node = node
+    end
+    
+    def complete?
+      !@node.children.empty?
+    end
+    
+    def manual?
+      !!@node["manual"]
+    end
+    
+    def path=(p)
+      @node.children.each{|c| c.remove! }
+      @node << p.to_s
+    end
+    
+    def path
+      @node.first? && @node.first.to_s
+    end
+    
+    def path_from(root)
+      File.expand_path("#{root}#{path}")
+    end
+     
+    def key
+      @node["id"]
+    end
+    
+    def type
+      @node["type"]
+    end
+    
+    def delete
+      @node.remove!
+    end
+  end
+end

data/lib/fn/swf/node/break.rb

@@ -0,0 +1,19 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      def Break
+        FN::Node::Base("break").extend(Break)
+      end
+      
+      module Break 
+        include FN::Node::Base
+        
+        def visit(struct)
+          has_no_children
+          struct.break
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/node/flash.rb

@@ -0,0 +1,24 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      def Flash(width, height)
+        FN::Node::Base("flash", :width => width, :height => height).extend(Flash)
+      end
+      
+      module Flash 
+        include FN::Node::Base
+      
+        def visit(struct)
+          w = self[:width]
+          h = self[:height]
+          size = "#{w}x#{h}"
+          struct.<< %[.flash bbox="#{size}" compress version=6] do
+            struct.<< %[.box bkg width=#{w} height=#{h} color=white fill]
+            visit_children struct
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/node/font.rb

@@ -0,0 +1,24 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      
+      def Font(name, file)
+        FN::Node::Base("font", :name => name, :file => file).extend(Font)
+      end
+      
+      module Font 
+        include FN::Node::Base
+        
+        def self.load_all_variants(key, path)
+          # no-op, since at present, we aren't using custom fonts?!
+        end
+      
+        def visit(struct)
+          has_no_children
+          struct << %[.font #{self[:name]} "#{self[:file]}"]
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/node/frame.rb

@@ -0,0 +1,19 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      def Frame(name, file)
+        FN::Node::Base("frame", :name => name, :file => file).extend(Frame)
+      end
+      
+      module Frame 
+        include FN::Node::Base
+        
+        def visit(struct)
+          has_no_children
+          struct << %[.font #{self[:name]} "#{self[:file]}"]
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/node/hot_spot.rb

@@ -0,0 +1,43 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      def HotSpot(page)
+        x, y, x2, y2 = page[:hotspot].gsub(/\s/, '').split(",").map{|s| s.to_i}
+        w = x2 - x
+        h = y2 - y
+        FN::Node::Base("hot_spot", :x => x, :y => y, :w => w, :h => h, :n => page[:number]).extend(HotSpot)
+      end
+      
+      module HotSpot 
+        include FN::Node::Base
+      
+        def visit(struct)
+          has_no_children
+          
+          x = self[:x]
+          y = self[:y]
+          w = self[:w]
+          h = self[:h]
+          n = self[:n]
+          
+      	  struct << ".box btni#{n} width=#{w} height=#{h} color=red fill=white"
+
+      	  struct.<< ".button btn#{n}" do
+        	  struct.<< ".show btni#{n} as=area", :no_end_tag do
+        	    struct.<< ".on_release:" do
+        	      struct << "gotoAndStop(#{n});"
+      	      end
+            end
+          end
+          
+          struct.<< ".action:" do
+            struct << "_root.attachMovie('btn#{n}', 'btni#{n}', #{$depth+=1}, {_x:#{x}, _y:#{y}});"
+          	struct << "_root['btni#{n}']._x = #{x};"
+          	struct << "_root['btni#{n}']._y = #{y};"
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/node/image.rb

@@ -0,0 +1,19 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      def Image(name, file)
+        FN::Node::Base("image", :name => name, :file => file).extend(Image)
+      end
+      
+      module Image 
+        include FN::Node::Base
+      
+        def visit(struct)
+          has_no_children
+          struct << %[.jpeg #{self[:name]} "#{self[:file]}"]
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/node/page.rb

@@ -0,0 +1,30 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      
+      def Page(number, bkg)
+        FN::Node::Base("page", :number => number, :bkg => bkg).extend(Page)
+      end
+      
+      module Page 
+        include FN::Node::Base
+        
+        def visit(struct)
+          n = self[:number] 
+          bkg = self[:bkg]
+          struct << ".frame #{n}"
+          struct.<< ".sprite page#{n}" do
+            struct << ".put bkg 0 0"
+            struct << ".put #{bkg} x=0 y=0"
+            visit_children(struct)
+          end
+          struct << ".put page#{n} 0 00"
+          struct.<< ".action:" do
+            struct << "stop();"
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/node/photo_block.rb

@@ -0,0 +1,53 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      
+      def PhotoBlock(node, image_dims = {})
+        dims = image_dims[node[:src]]
+        FN::Node::Base("photo_block", node.attributes.to_h.update(
+          :orig_width => dims[0],
+          :orig_height => dims[1]
+        )).extend(PhotoBlock)
+      end
+      
+      module PhotoBlock 
+        include FN::Node::Base
+      
+        # <block type="photo" src="logo" width="162" boxX="30" boxY="40" 
+        # boxWidth="185" boxHeight="99" align="middlecenter"/>
+        def visit(struct)
+          has_no_children
+          
+          src   = self[:src]
+          bx    = self[:boxX].to_i
+          by    = self[:boxY].to_i
+          bw    = self[:boxWidth].to_i
+          bh    = self[:boxHeight].to_i
+          w     = self[:width].to_i
+          ow    = self[:orig_width].to_i
+          oh    = self[:orig_height].to_i
+          align = self[:align]
+          
+          scale   = w.to_f / ow
+          percent = "#{scale * 100}%"
+          h       = ow * scale
+          
+          x = case align
+          when /center/: bx + (bw - w) / 2.0;
+          when /right/:  bx + (bw - w)
+          else;          bx
+          end
+          
+          y = case align
+          when /middle/: by + (bh - h) / 2.0;
+          when /bottom/: by + (bh - h)
+          else;          by
+          end
+            
+          struct << ".put #{src} x=#{x} y=#{y} scalex=#{percent} scaley=#{percent}"
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/node/text.rb

@@ -0,0 +1,51 @@
+require File.dirname(__FILE__) + "/../../node/base"
+module FN
+  module SWF
+    module Node
+      def Text(node, alt_text)
+        out = FN::Node::Base("text", node.attributes.to_h)
+        out.extend(Text)
+        out.text = node.children.to_s
+        out.text = alt_text                  if out.text.empty?
+        out
+      end
+      
+      module Text 
+        include FN::Node::Base
+        SPACE = /\s+/
+                
+        def text
+          (child && child.content).to_s
+        end
+        
+        def text=(s)
+          self.children.map{|c| c.remove! }
+          self << XML::Node.new_cdata(s)
+        end
+        
+        def escaped_text
+          text.gsub("\\", "\\\\").gsub("\"", "\\\"").gsub(SPACE, " ")
+        end
+              
+        def visit(struct)
+          has_no_children
+          name = "#{self[:text]}_#{self[:index]}"
+          x = self[:x]
+          y = self[:y]
+          w = self[:width]
+          h = self[:height].to_i + 20 # Fudge
+           
+          struct.<< ".action:" do
+    			  struct << "this.createTextField('#{name}', #{$depth+=1}, #{x}, #{y}, #{w}, #{h});"
+      			struct << "id = this['#{name}'];"
+      			struct << "id.html=true;"
+      			struct << "id.multiline=true;"
+      			struct << "id.wordWrap=true;"
+      			struct << "id.htmlText = \"#{escaped_text}\";"
+      			struct << "id.selectable = false;"
+    			end
+        end
+      end
+    end
+  end
+end

data/lib/fn/swf/struct.rb

@@ -0,0 +1,43 @@
+module FN
+  module SWF
+    class Struct < Hash
+      TAB = "  "
+      
+      attr_reader :buffer 
+      
+      def initialize
+        @buffer = ""
+        @indent_level = 0
+      end
+      
+      def break
+        self << ""
+      end
+      
+      def <<(s, omit_end_tag = false, &b)
+        @buffer << "#{tabs}#{s}\n"
+        if block_given?
+          indent(&b)
+          @buffer << "#{tabs}.end\n"      unless omit_end_tag
+        end
+      end
+      
+      def tabs
+        TAB * @indent_level
+      end
+      
+      def indent
+        @indent_level += 1
+        if block_given?
+          yield
+          @indent_level -= 1
+        end
+      end
+      
+      def undent
+        @indent_level -= 1
+        raise "can't indent < 0"          if @indent_level < 0
+      end
+    end
+  end
+end

data/lib/fn/swf/writer.rb

@@ -0,0 +1,89 @@
+Dir[File.dirname(__FILE__) + "/**/*.rb"].each do |f|
+  require_dependency f.sub(/\.rb$/, '')
+end
+
+module FN
+  module SWF
+    class Writer
+      include FN::SWF::Node
+      
+      def initialize
+      end
+      
+      def image_dimensions(image)
+        img = `identify "#{image}"`.scan(/ JPEG (\d+)x(\d+)/).flatten.map{|a|a.to_i}
+      end
+      
+      def write(doc, options = {})
+        write_xml translate(doc, options), options[:save_as]
+      end
+      
+      def write_xml(xml, file)
+        xml.root.extend(FN::Node::Root)
+        File.open("#{file}.txt", "w") {|f| f.puts xml.root.visit(FN::SWF::Struct.new).buffer }        
+        cmd = %[swfc -o #{file} #{file}.txt]
+        system(cmd) ? file : raise("couldn't write swf")
+      end
+            
+      def translate(doc, options = {})
+        raise "Not an FN Document" unless doc.is_a?(FN::Document)
+        
+        file          = options[:save_as] or raise "must provide :save_as"
+        root          = options[:resource_root]
+        
+        context = FN::Node::Context.new       
+        $depth = 500
+        
+        page = doc.pages.first
+        context << Flash(page[:width], page[:height])
+        
+        # sorta no-op-ish
+        # doc.fonts.each do |font|
+        #   context.add Font.load_all_variants(font.key, font.path_from(root))
+        # end
+        
+        global_texts = doc.textflows.inject({}) do |memo, node|
+          memo[node["id"]] = node.children.to_s
+          memo
+        end
+        
+        context.add Break()
+        
+        image_dims = {}
+        
+        doc.images.each do |img|
+          if img.complete?
+            path = img.path_from(root)
+            context.add Image(img.key, path)
+            image_dims[img.key] = image_dimensions(path)
+          end
+        end
+        
+        context.add Break()
+        
+        doc.pages.each do |page|
+          context.retain_after do
+            context.pre HotSpot(page)
+            context << Page(page[:number], page[:background])
+            
+            doc.text_blocks_by(page["number"]).each do |block|
+              context.add Text(block, global_texts[block["text"]])
+            end
+            
+            context.add Break()
+            
+            i = 0
+            doc.photo_blocks_by(page["number"]).each do |block|
+              i += 1
+              context.add PhotoBlock(block, image_dims)
+            end
+            
+            context.add Break()
+          end
+        end
+        
+        return context.doc
+      end
+    end
+  end
+end