Changeset 11579

Timestamp:

05/14/08 15:09:21 (5 years ago)

Author:

hajimehoshi

Message:

Modified document.rb

Location:

websites/starruby/trunk

Files:

• doc/index (modified) (1 diff)
• lib/document.rb (modified) (6 diffs)

websites/starruby/trunk/doc/index

@@ -4 +4 @@
 @type h
 @lang ja
-Ruby で簡単ゲーム開発
+Ruby でお手軽ゲーム開発!
+
+@type h
+@lang en
+Agile game development with Ruby!
+

websites/starruby/trunk/lib/document.rb

@@ -1 +1 @@
 module ParagraphModule
 
+  attr_reader :lang
+  attr_reader :children
+  private :children
+
+  include Enumerable
+
+  def initialize(children)
+    @children = children.dup
+    @children.freeze
+  end
+
+  def [](index)
+    children[index]
+  end
+
+  def size
+    children.size
+  end
+
+  def each
+    children.each{|i| yield(i)}
+  end
+
+  def children_with_lang(lang = nil)
+    children.select{|c| c.lang.nil? or c.lang == lang}
+  end
+
+end
+
+class Paragraph
+
+  def self.level(str)
+    level = 0
+    while str =~ /\A\x20\x20/
+      level += 1
+      str = str[2..-1]
+    end    
+    level
+  end
+
+  include ParagraphModule
+
+  attr_reader :level
   attr_reader :type
   attr_reader :arg
   attr_reader :text
-  attr_reader :lang
-  attr_reader :level
-
-  include Enumerable
-
-  def initialize(str)
+
+  def initialize(str, children = [])
+    super(children)
+    @text = ""
+    @level = Paragraph.level(str)
     @type = :p
-    @text = ""
-    @level = 0
-    while str =~ /\A\x20\x20/
-      @level += 1
-      str = str[2..-1]
-    end
     str.strip.each do |line|
       case line.lstrip
@@ -33 +69 @@
       end
     end
-  end
-
-  def [](index)
-    children[index]
-  end
-
-  def <<(paragraph)
-    children << paragraph
-  end
-
-  def size
-    children.size
-  end
-
-  def each
-    children.each{|i| yield(i)}
   end
 
@@ -125 +145 @@
   private
 
-  def children
-    @children ||= []
-  end
-
-  def children_with_lang(lang = nil)
-    children.select{|c| c.lang.nil? or c.lang == lang}
-  end
-
   def content(text)
     content = h(text)
@@ -180 +192 @@
 end
 
-class Paragraph
+class RootParagraph
 
   include ParagraphModule
 
-end
-
-class RootParagraph
-
-  include ParagraphModule
-
-  def initialize
+  def initialize(children)
+    super(children)
   end
 
@@ -198 +205 @@
 
   def to_html(lang = nil)
-    html = children_with_lang(lang).map {|p| p.to_html(lang)}.join("\n")
-    html.gsub!("</dl>\n<dl>\n", "")
-    html
+    (@htmls ||= {})[lang] ||=
+      (html = children_with_lang(lang).map {|p| p.to_html(lang)}.join("\n")
+       html.gsub!("</dl>\n<dl>\n", "")
+       html)
   end
 
@@ -210 +218 @@
 
   def initialize(text)
-    @root = RootParagraph.new
-    paragraphs = text.split(/\n\s*\n/).map {|p| Paragraph.new(p)}.unshift(@root)
-    paragraphs.inject([]) do |done, para|
-      if para != @root
-        parent = done.find do |p|
-          raise "invalid indent level" if p.level + 2 <= para.level
-          p.level + 1 == para.level
+    stack = []
+    text.split(/\n\s*\n/).reverse_each do |p|
+      level = Paragraph.level(p)
+      if stack.empty?
+        stack.push(Paragraph.new(p))
+      else
+        if stack.last.level == level + 1
+          children = []
+          while not stack.empty? and stack.last.level == level + 1
+            children << stack.pop
+          end
+          stack.push(Paragraph.new(p, children))
+        elsif stack.last.level <= level
+          stack.push(Paragraph.new(p))
+        else
+          raise "invalid indent level" unless parent          
         end
-        raise "invalid indent level" unless parent
-        parent << para
       end
-      done.unshift(para)
-    end
+    end
+    raise "invalid indent level" unless stack.all?{|p| p.level == 0}
+    @root = RootParagraph.new(stack.reverse)
   end
 
   def to_html(lang = nil)
-    root.to_html(lang)
+    (@htmls ||= {})[lang] ||= root.to_html(lang)
   end
   
   def title(lang = nil)
-    para = root.find do |para|
-      para.type == :title and (para.lang.nil? or para.lang == lang)
-    end
-    if para
-      para.text
-    else
-      nil
-    end
+    (@titles ||= {})[lang] ||=
+      (para = root.find do |para|
+         para.type == :title and (para.lang.nil? or para.lang == lang)
+       end
+       if para
+         para.text
+       else
+         nil
+       end)
   end