narf 0.5.1

data/lib/web/wiki/linker.rb

@@ -0,0 +1,72 @@
+module Web
+  class Wiki
+  class Linker #:nodoc:
+    def initialize
+    end
+
+    def html_regexp
+      /((<textarea)(.)*(\/textarea>))|(<a[ ]*href=[\"']*([^\"'>]*)[\"']*>([^(<\/)]*)<\/a>)|(<[^>]*>)/mi #"'
+    end
+    
+    def scan_linked_word( scanner , output )
+      if scanner.scan(/\[\[(.*?)\]\]/)
+        if Web::Wiki.page_list.include?(scanner[1])
+          output.print "<a href=\"?page.name=#{Web::escape(scanner[1])}\">#{scanner[1]}</a>"
+        else
+          output.print "#{scanner[1]}<a href=\"?page.name=#{Web::escape(scanner[1])}&action=edit\">?</a>"
+        end
+        true
+      else
+        false
+      end
+    end
+    
+    def make_link( pagename )
+      if (Web::Wiki::pref( :script_url ) && Web::Wiki::pref( :store_url ) )
+        "<a href=\"#{Web::Wiki::pref(:script_url)}/#{pagename}.html\">#{pagename}</a>"
+      else
+        "<a href=\"?page.name=#{Web::escape(pagename)}\">#{pagename}</a>"
+      end
+    end
+    
+    def scan_bumpy_word( scanner , output )
+      if scanner.scan(/([A-Z][\w\/]*[a-z][\w\/]*[A-Z]\w*)/)
+        if Web::Wiki.page_list.include?(scanner[1])
+          output.print make_link( scanner[1] )
+        else
+          output.print "#{scanner[1]}<a href=\"?page.name=#{Web::escape(scanner[1])}&action=edit\">?</a>"
+        end
+        true
+      else
+        false
+      end
+    end
+    
+    def scan_html( scanner , output )
+      if scanner.scan(html_regexp)
+        output.print scanner[0]
+        true
+      else
+        false
+      end
+    end
+    
+    def scan_other( scanner , output )
+      if scanner.scan(/(\w+|\s+|.)/)
+        output.print scanner[1]
+        true
+      else
+        false
+      end
+    end
+    
+    def replace_links(string )
+      out = StringIO.new
+      scanner = StringScanner.new(string)
+      while scan_linked_word( scanner , out ) || scan_bumpy_word( scanner , out ) || scan_html( scanner , out ) || scan_other( scanner , out )
+      end
+      out.string
+    end
+  end
+end
+end

data/lib/web/wiki/linker.rb~

@@ -0,0 +1,72 @@
+module Web
+  class Wiki
+  class Linker #:nodoc:
+    def initialize
+    end
+
+    def html_regexp
+      /((<textarea)(.)*(\/textarea>))|(<a[ ]*href=[\"']*([^\"'>]*)[\"']*>([^(<\/)]*)<\/a>)|(<[^>]*>)/mi #"'
+    end
+    
+    def scan_linked_word( scanner , output )
+      if scanner.scan(/\[\[(.*?)\]\]/)
+        if Web::Wiki.page_list.include?(scanner[1])
+          output.print "<a href=\"?page.name=#{Web::escape(scanner[1])}\">#{scanner[1]}</a>"
+        else
+          output.print "#{scanner[1]}<a href=\"?page.name=#{Web::escape(scanner[1])}&action=edit\">?</a>"
+        end
+        true
+      else
+        false
+      end
+    end
+    
+    def make_link( pagename )
+      if (Web::Wiki::pref( :script_url ) && Web::Wiki::pref( :store_url ) )
+        "<a href=\"#{Web::Wiki::pref(:script_url)}/#{pagename}.html\">#{pagename}</a>"
+      else
+        "<a href=\"?page.name=#{Web::escape(pagename)}\">#{pagename}</a>"
+      end
+    end
+    
+    def scan_bumpy_word( scanner , output )
+      if scanner.scan(/([A-Z][\w\/]*[a-z][\w\/]*[A-Z]\w*)/)
+        if Web::Wiki.page_list.include?(scanner[1])
+          output.print make_link( scanner[1] )
+        else
+          output.print "#{scanner[1]}<a href=\"?page.name=#{Web::escape(scanner[1])}&action=edit\">?</a>"
+        end
+        true
+      else
+        false
+      end
+    end
+    
+    def scan_html( scanner , output )
+      if scanner.scan(html_regexp)
+        output.print scanner[0]
+        true
+      else
+        false
+      end
+    end
+    
+    def scan_other( scanner , output )
+      if scanner.scan(/(\w+|\s+|.)/)
+        output.print scanner[1]
+        true
+      else
+        false
+      end
+    end
+    
+    def replace_links(string )
+      out = StringIO.new
+      scanner = StringScanner.new(string)
+      while scan_linked_word( scanner , out ) || scan_bumpy_word( scanner , out ) || scan_html( scanner , out ) || scan_other( scanner , out )
+      end
+      out.string
+    end
+  end
+end
+end

data/lib/web/wiki/mime.rb~

@@ -0,0 +1,68 @@
+class Web::Wiki
+  class Mime
+    DEFAULT_MIMETYPE  = "text/html"
+    @@readers = []
+    def Mime.readers
+      @@readers
+    end
+    
+    class ApacheUnixReader
+      MIME_FILENAME = "mime.types"
+      COMMENTED_PATTERN = /(^\s*#)|(^\s*$)/
+      VALUE_PATTERN     = /\.*(\S+)\s*=\s*(\S+)/
+      
+      def self.mime_file
+        File.join( File.dirname( __FILE__ ),
+                   "resources",
+                   MIME_FILENAME )
+      end
+      
+      def self.applies?
+        File.exists? mime_file
+      end
+      
+      def mime_types
+        mime_array = File.open( self.class.mime_file, "r" ) { |f|
+          f.read.to_a
+        }
+        mime_array.uniq!
+        mime_array.delete_if { |line|
+          line =~ COMMENTED_PATTERN
+        }
+        mime_hash = {}
+        mime_hash.default = DEFAULT_MIMETYPE
+        mime_array.each { |line|
+          pieces = line.split( /\s+/ )
+          mime_type = pieces.shift
+          pieces.each { |extension|
+            mime_hash[extension] = mime_type
+          }
+        }
+        mime_hash
+      end
+      
+    Mime.readers.push self
+    end
+    
+    @@mime_types = nil
+    def Mime.clear
+      @@mime_types = nil
+    end
+
+    def Mime.mime_types
+      unless(@@mime_types)
+        Mime.readers.each{ |klass|
+	  if klass.applies?
+            @@mime_types = klass.new.mime_types
+            break
+          end
+        }
+      end
+      @@mime_types
+    end
+    
+    def Mime.get_mime_type( filename )
+      mime_types[filename.split(".").last].to_s
+    end
+  end
+end 

data/lib/web/wiki/page.rb

@@ -0,0 +1,192 @@
+module Web
+  class Wiki
+
+    #begin experiment with SimpleDispatcher
+    class PageEditor #:nodoc: # < Web::SimpleDispatcher::Template
+                     include Web::SimpleDispatcher::TemplateMixin##
+      
+      class << self
+        include Web::SimpleDispatcher::TemplateClassMixin
+      end
+      
+      
+      attr_accessor :page, :wiki
+      
+      def page
+        unless @page
+          @page = wiki.load_page
+          unless (Web["revision"] == nil || Web["revision"].empty? || Web["revision"].to_s == "0")
+            history = @page.history
+            @page = history.find{ |p|
+              Web["revision"].to_i == p.revision
+            }
+            @page.history = history
+          end
+        end
+        @page
+      end
+      
+      
+      def initialize
+      end
+      
+      def on_submit r
+        page.set_automatic_fields
+        wiki.save( page )
+      end
+    end
+    # end experiment with SimpleDispatcher
+
+  class Page #:nodoc:
+    @@attributes = []
+    def Page.page_attr( *symbols )
+      symbols.each { |symbol|
+        attr_accessor symbol
+        @@attributes.push symbol
+      }
+    end
+  
+    @@max_revisions = 25
+    def Page.max_revisions
+      @@max_revisions
+    end
+    
+    def set_by_request
+      @@attributes.each { |symbol|
+        self.send( symbol.to_s + "=", Web["page." + symbol.to_s] )
+      }
+      set_automatic_fields
+    end
+
+    def set_automatic_fields
+      self.revision += 1
+      self.mtime = Time.now()
+      self.history.unshift self.clone
+      self.history.pop if ( self.history.size > Page.max_revisions )
+      self.remote_addr = ENV["REMOTE_ADDR"]
+    end
+    
+    attr_accessor :name, :revision, :history, :mtime, :remote_addr
+    page_attr :content, :align, :valign, :illustration, :bg_color, :text_color, :top_margin, :left_margin, :comment
+    def initialize( name )
+      self.name = name
+      self.revision = 0
+      self.history = [ ]
+      self.content = ""
+      self.comment = ""
+      self.illustration = ""
+      self.bg_color = "ffffff"
+      self.text_color = "000000"
+      self.align = "left"
+      self.valign = "top"
+      self.top_margin = "5"
+      self.left_margin = "5"
+      self.mtime = Time.now()
+      self.remote_addr = "auto-create"
+    end
+    
+    def mtime_pretty
+      if (mtime.hour > 12)
+        mtime.hour - 12
+    elsif (mtime.hour == 0)
+        12
+      else
+        mtime.hour
+      end.to_s + ":" +
+          mtime.min.to_s +
+                mtime.strftime("%p ").downcase +
+    mtime.strftime("%b ") +
+          mtime.mday.to_s +
+                mtime.strftime( ", %Y" )
+    end
+    
+    def template
+      if (self.name == Web::Wiki::pref(:home_page))
+        Web::Wiki::pref( :home_template )
+      elsif(self.illustration == nil)
+        "basic.html"
+      elsif (self.illustration.empty?)
+        "basic.html"
+      else
+        "illustration.html"
+      end
+    end
+
+    def escaped_name
+      name.gsub( /\//, "-slash-" )
+    end
+  
+    def download_link
+      File.join( Web::Wiki.store_url, escaped_name, "" )
+    end
+
+    def dir
+      File.join( Web::Wiki.store_dir, escaped_name )
+    end
+
+    class Asset < String #:nodoc:
+      attr_accessor :owner
+      def initialize(newowner, newpath)
+        self.owner = newowner
+        super( newpath )
+      end
+
+      def size
+        File.size( File.join( owner.dir, self ) )
+      end
+
+      def thumbnail
+        if (size > 102400)
+          "#{self} (<i>#{size} bytes</i>)"
+        else
+          "<img src='#{owner.download_link}#{self}' border=0 width=100><br>#{self}"
+        end
+      end
+
+    end
+
+    def assets
+      a = if (File.exists? dir)
+            (Dir.entries( dir ) - [".", ".."]).find_all { |e|
+              e =~ /^[^\#]/
+            }.collect{ |e|
+              Asset.new(self, e)
+            }
+          else
+            [ ]
+          end
+      a
+    end
+    
+    def historical_assets
+      historical = {}
+      assets.each { |e|
+        historical[e] = Dir[dir + "/*" + e].entries.sort { |a,b|
+          File.mtime( a ) <=> File.mtime( b )
+        }.collect { |e|
+          File.basename(e)
+        }
+      }
+      Dir[dir + "/\#*deleted.*"].entries.each{ |e|
+        base = File.basename(e).gsub( /\#(\d+\.){0,1}deleted\./, "" )
+        historical[base] = [ File.basename(e) ] unless historical.has_key?( base )
+      }
+      historical
+    end
+    
+    # this method must be after the page_attr :content call
+    def content=( newcontent )
+      {
+        %r{(<[^>]*)(http:\/\/[^"']*)(((#{Regexp.escape(download_link)})|(#{Regexp.escape(download_link.gsub(/&/, "&amp;"))}))[^"']*)(((\s|'|")[^>]*>)|>)} => '\1\3\7',
+    }.each{ |pattern, replacement|
+        newcontent.gsub!( pattern, replacement )
+      }
+      @content = newcontent
+    end
+    
+    def html
+      Web::Wiki::Linker.new.replace_links(self.content)
+    end
+  end
+  end
+end   

data/lib/web/wiki/page.rb~

@@ -0,0 +1,192 @@
+module Web
+  class Wiki
+
+    #begin experiment with SimpleDispatcher
+    class PageEditor #:nodoc: # < Web::SimpleDispatcher::Template
+                     include Web::SimpleDispatcher::TemplateMixin##
+      
+      class << self
+        include Web::SimpleDispatcher::TemplateClassMixin
+      end
+      
+      
+      attr_accessor :page, :wiki
+      
+      def page
+        unless @page
+          @page = wiki.load_page
+          unless (Web["revision"] == nil || Web["revision"].empty? || Web["revision"].to_s == "0")
+            history = @page.history
+            @page = history.find{ |p|
+              Web["revision"].to_i == p.revision
+            }
+            @page.history = history
+          end
+        end
+        @page
+      end
+      
+      
+      def initialize
+      end
+      
+      def on_submit r
+        page.set_automatic_fields
+        wiki.save( page )
+      end
+    end
+    # end experiment with SimpleDispatcher
+
+  class Page #:nodoc:
+    @@attributes = []
+    def Page.page_attr( *symbols )
+      symbols.each { |symbol|
+        attr_accessor symbol
+        @@attributes.push symbol
+      }
+    end
+  
+    @@max_revisions = 25
+    def Page.max_revisions
+      @@max_revisions
+    end
+    
+    def set_by_request
+      @@attributes.each { |symbol|
+        self.send( symbol.to_s + "=", Web["page." + symbol.to_s] )
+      }
+      set_automatic_fields
+    end
+
+    def set_automatic_fields
+      self.revision += 1
+      self.mtime = Time.now()
+      self.history.unshift self.clone
+      self.history.pop if ( self.history.size > Page.max_revisions )
+      self.remote_addr = ENV["REMOTE_ADDR"]
+    end
+    
+    attr_accessor :name, :revision, :history, :mtime, :remote_addr
+    page_attr :content, :align, :valign, :illustration, :bg_color, :text_color, :top_margin, :left_margin, :comment
+    def initialize( name )
+      self.name = name
+      self.revision = 0
+      self.history = [ ]
+      self.content = ""
+      self.comment = ""
+      self.illustration = ""
+      self.bg_color = "ffffff"
+      self.text_color = "000000"
+      self.align = "left"
+      self.valign = "top"
+      self.top_margin = "5"
+      self.left_margin = "5"
+      self.mtime = Time.now()
+      self.remote_addr = "auto-create"
+    end
+    
+    def mtime_pretty
+      if (mtime.hour > 12)
+        mtime.hour - 12
+    elsif (mtime.hour == 0)
+        12
+      else
+        mtime.hour
+      end.to_s + ":" +
+          mtime.min.to_s +
+                mtime.strftime("%p ").downcase +
+    mtime.strftime("%b ") +
+          mtime.mday.to_s +
+                mtime.strftime( ", %Y" )
+    end
+    
+    def template
+      if (self.name == Web::Wiki::pref(:home_page))
+        Web::Wiki::pref( :home_template )
+      elsif(self.illustration == nil)
+        "basic.html"
+      elsif (self.illustration.empty?)
+        "basic.html"
+      else
+        "illustration.html"
+      end
+    end
+
+    def escaped_name
+      name.gsub( /\//, "-slash-" )
+    end
+  
+    def download_link
+      File.join( Web::Wiki.store_url, escaped_name, "" )
+    end
+
+    def dir
+      File.join( Web::Wiki.store_dir, escaped_name )
+    end
+
+    class Asset < String #:nodoc:
+      attr_accessor :owner
+      def initialize(newowner, newpath)
+        self.owner = newowner
+        super( newpath )
+      end
+
+      def size
+        File.size( File.join( owner.dir, self ) )
+      end
+
+      def thumbnail
+        if (size > 102400)
+          "#{self} (<i>#{size} bytes</i>)"
+        else
+          "<img src='#{owner.download_link}#{self}' border=0 width=100><br>#{self}"
+        end
+      end
+
+    end
+
+    def assets
+      a = if (File.exists? dir)
+            (Dir.entries( dir ) - [".", ".."]).find_all { |e|
+              e =~ /^[^\#]/
+            }.collect{ |e|
+              Asset.new(self, e)
+            }
+          else
+            [ ]
+          end
+      a
+    end
+    
+    def historical_assets
+      historical = {}
+      assets.each { |e|
+        historical[e] = Dir[dir + "/*" + e].entries.sort { |a,b|
+          File.mtime( a ) <=> File.mtime( b )
+        }.collect { |e|
+          File.basename(e)
+        }
+      }
+      Dir[dir + "/\#*deleted.*"].entries.each{ |e|
+        base = File.basename(e).gsub( /\#(\d+\.){0,1}deleted\./, "" )
+        historical[base] = [ File.basename(e) ] unless historical.has_key? ( base )
+      }
+      historical
+    end
+    
+    # this method must be after the page_attr :content call
+    def content=( newcontent )
+      {
+        %r{(<[^>]*)(http:\/\/[^"']*)(((#{Regexp.escape(download_link)})|(#{Regexp.escape(download_link.gsub(/&/, "&amp;"))}))[^"']*)(((\s|'|")[^>]*>)|>)} => '\1\3\7',
+    }.each{ |pattern, replacement|
+        newcontent.gsub!( pattern, replacement )
+      }
+      @content = newcontent
+    end
+    
+    def html
+      Web::Wiki::Linker.new.replace_links(self.content)
+    end
+  end
+  end
+end