bitclust-core 0.5.0

data/theme/lillia/test.css

@@ -0,0 +1,254 @@
+@charset "UTF-8";
+
+/*
+    default.css
+*/
+
+body {
+    margin-top: 20px;
+    margin-left: 2%;
+    margin-right: 2%;
+    line-height: 1.3;
+    text-align: left;
+    color: black;
+    font-family: osaka,'MS PGothic',sans-serif;
+    background-color: white;
+}
+
+/*
+span.menuitem {
+    width: 3.9em;
+    text-align: center;
+    padding: 0px 2px;
+    margin: 0px;
+    color: white;
+    background-color: #ddd;
+    margin-right: 2px;
+}
+div.menu a:link,
+div.menu a:visited {
+    width: 3.9em;
+    padding: 0px 2px;
+    margin: 0px;
+    color: #33a;
+    background-color: #ddd;
+    text-decoration: none;
+}
+div.menu a:active,
+div.menu a:focus,
+div.menu a:hover {
+    width: 3.9em;
+    padding: 0px 2px;
+    margin: 0px;
+    color: #fff;
+    background-color: #33a;
+    text-decoration: none;
+}
+span.menuseparator {
+    width: 1em;
+    padding: 0px;
+    margin: 0px;
+}
+*/
+
+address {
+    text-align: right;
+    font-size: x-small;
+}
+
+h1 {
+    font-size: 200%;
+    text-align: left;
+    color: white;
+    background-color: #33a;
+    padding: 0.4em;
+    margin: 0.2em 0em 0.5em 0em;
+}
+
+img.sitelogo {
+    vertical-align: middle;
+}
+
+h2 {
+    font-size: 150%;
+    text-align: left;
+    border-left: 10px solid #33a;
+    padding-left: 0.5em;
+    margin-top: 1.5em;
+    margin-bottom: 0.5em;
+}
+
+h3 {
+    font-size: 150%;
+    text-align: left;
+    margin-top: 0.5em;
+    margin-bottom: 0.5em;
+}
+
+/* tmp */
+h4 {
+    font-size: 150%;
+    text-align: left;
+    margin-top: 0.5em;
+    margin-bottom: 0.5em;
+}
+
+/* never use */
+h5, h6 {
+    background-color: red;
+}
+
+p {
+    line-height: 1.4;
+    margin-top: 0.5em;
+    margin-bottom: 0.5em;
+    margin-left: 0px;
+}
+
+span.kindinfo {
+    text-align: right;
+    margin-left: 8em;
+}
+
+span.compileerror {
+    color: red;
+    font-weight: bold;
+}
+
+pre {
+    line-height: 1.1;
+    background-color: #eee;
+    padding: 10px;
+    font-weight: normal;
+}
+
+blockquote {
+    background-color: transparent;
+    padding: 4px;
+    margin-left: 3em;
+    font-weight: normal;
+}
+
+ul {
+    margin-left: 0px;
+    padding-left: 2em;
+}
+
+li {
+    margin-left: 0px;
+    padding-left: 0px;
+}
+
+dl {
+    margin-left: 0em;
+}
+
+dt {
+    font-weight: bold;
+}
+
+dl.methodlist dt {
+    font-family: sans-serif;
+}
+
+dd {
+    margin: 0.3em 0em 1em 4em;
+}
+
+table {
+    border-collapse: collapse;
+}
+
+th {
+    align: left;
+    valign: top;
+    text-align: left;
+    vertical-align: top;
+}
+
+td {
+    align: left;
+    valign: top;
+    text-align: left;
+    vertical-align: top;
+}
+
+table.entries tr {
+    /* border: 1px solid gray; */
+    align: left;
+    valign: top;
+    text-align: left;
+    vertical-align: top;
+}
+
+td.signature {
+    padding: 0.5em;
+    background-color: #DDD;
+    border: 3px solid white;
+    width: 20em;
+}
+
+td.description {
+    padding: 0.5em;
+    background-color: #EEE;
+    border: 3px solid white;
+}
+
+td.library {
+    width: 6em;
+    padding: 0.5em;
+    background-color: #DDD;
+    border: 3px solid white;
+}
+
+
+a {
+    font-weight: bold;
+    text-decoration: none;
+}
+a:link {
+    color: #33a;
+    background-color: transparent;
+}
+a:visited {
+    /* color: #666666; */
+    color: #33a;
+    background-color: transparent;
+}
+a:hover, a:focus, a:active {
+    color: #fff;
+    background-color: #33a;
+}
+
+form {
+    padding: 0px;
+    margin: 0px;
+}
+
+hr {
+    color: #33a;
+    height: 1px;
+}
+
+@media print {
+    body {
+        font-family: osaka,'MS Mincho',serif;
+        line-height: 1.5;
+    }
+    div.menu {
+        display: none;
+    }
+    div.footer {
+        display: none;
+    }
+    h1 {
+        color: black;
+        background-color: white;
+        border-bottom: 2px solid #33a;
+        padding-bottom: 0em;
+    }
+    a, a:link, a:visited {
+        color: #33a;
+        font-weight: normal;
+    }
+}

data/tools/bc-ancestors.rb

@@ -0,0 +1,153 @@
+#!/usr/bin/env ruby
+
+require 'pathname'
+
+bindir = Pathname.new(__FILE__).realpath.dirname
+$LOAD_PATH.unshift((bindir + '../lib').realpath)
+
+require 'bitclust'
+require 'bitclust/crossrubyutils'
+require 'optparse'
+require 'set'
+
+include BitClust::CrossRubyUtils
+
+def main
+  prefix = nil
+  requires = []
+  ver = RUBY_VERSION
+  @verbose = false
+  all = false
+  parser = OptionParser.new
+  parser.banner =<<BANNER
+  Usage: #{File.basename($0, '.*')} [-r<lib>] [--ruby=<VER>] --db=PATH <classname>
+         #{File.basename($0, '.*')} [-r<lib>] [--ruby=<VER>] --db=PATH --all
+  NG Sample:
+    $ #{File.basename($0, '.*')} -rfoo --ruby=1.9.1 --db=./db Foo
+    NG : Foo
+    + FooModule (The Ruby have this class/module in ancestors of the class)
+    - BarModule (The Database have this class/module in ancestors of the class)
+  Options:
+BANNER
+  parser.on('-d', '--database=PATH', 'Database prefix.') {|path|
+    prefix = path
+  }
+  parser.on('-r LIB', 'Requires library LIB') {|lib|
+    requires.push lib
+  }
+  parser.on('--ruby=[VER]', "The version of Ruby interpreter"){|ver|
+    ver = ver
+  }
+  parser.on('-v', '--verbose', 'Show differences'){
+    @verbose = true
+  }
+  parser.on('--all', 'Check anccestors for all classes'){
+    all = true
+  }
+  parser.on('--help', 'Prints this message and quit.') {
+    puts parser.help
+    exit 0
+  }
+  begin
+    parser.parse!
+  rescue OptionParser::ParseError => err
+    $stderr.puts err.message
+    $stderr.puts parser.help
+    exit 1
+  end
+  unless ARGV.size == 1 || all
+    $stderr.puts "wrong number of arguments"
+    $stderr.puts parser.help
+    exit 1
+  end
+  classname = ARGV[0]
+  db = BitClust::MethodDatabase.new(prefix)
+  ruby = get_ruby(ver)
+  if classname && !all
+    check_ancestors(db, ruby, requires, classname)
+  else
+    $stderr.puts 'check all...'
+    check_all_ancestors(db, ruby, requires)
+  end
+end
+
+def ancestors(ruby, requires, classname)
+  req = requires.map{|lib|
+    unless '_builtin' == lib
+      "-r#{lib}"
+    else
+      ''
+    end
+  }.join(" ")
+  script =<<-SRC
+  c = #{classname}
+  puts c.ancestors.join("\n")
+  SRC
+  `#{ruby} #{req} -e '#{script}'`.split
+end
+
+def check_ancestors(db, ruby, requires, classname)
+  a = ancestors(ruby, requires, classname)
+  begin
+    b = db.fetch_class(classname).ancestors.map(&:name)
+  rescue BitClust::ClassNotFound => ex
+    $stderr.puts "class not found in database : #{classname}"
+    b = []
+  end
+  unless a.to_set == b.to_set
+    puts "NG : #{classname}"
+    puts (a-b).map{|c| "+ #{c}" }.join("\n")
+    puts (b-a).map{|c| "- #{c}" }.join("\n")
+  else
+    puts "OK : #{classname}" if @verbose
+  end
+end
+
+def check_all_ancestors(db, ruby, requires)
+  classnames = []
+  requires.each do |lib|
+    classnames.push(*defined_classes(ruby, lib, []))
+  end
+  classnames.each do |classname|
+    check_ancestors(db, ruby, requires, classname)
+  end
+end
+
+def defined_classes(ruby, lib, rejects)
+  output = `#{ruby} -e '
+    def class_extent
+      result = []
+      ObjectSpace.each_object(Module) do |c|
+        result.push c
+      end
+      result
+    end
+
+    %w(#{rejects.join(" ")}).each do |lib|
+      begin
+        require lib
+      rescue LoadError
+      end
+    end
+    if "#{lib}" == "_builtin"
+      class_extent().each do |c|
+        puts c
+      end
+    else
+      before = class_extent()
+      begin
+        require "#{lib}"
+      rescue LoadError
+        $stderr.puts "\#{RUBY_VERSION} (\#{RUBY_RELEASE_DATE}): library not exist: #{lib}"
+        exit
+      end
+      after = class_extent()
+      (after - before).each do |c|
+        puts c
+      end
+    end
+  '`
+  output.split
+end
+
+main

data/tools/bc-checkparams.rb

@@ -0,0 +1,246 @@
+#! /usr/bin/ruby
+
+require 'optparse'
+require 'pathname'
+
+bindir = Pathname.new(__FILE__).realpath.dirname
+$LOAD_PATH.unshift((bindir + '../lib').realpath)
+
+require 'bitclust/preprocessor'
+require 'bitclust/lineinput'
+require 'bitclust/parseutils'
+require 'bitclust/methodsignature'
+
+def main
+  option = OptionParser.new
+  version = '1.9.1'
+  option.banner = "Usage: #{File.basename($0, '.*')} <filename>"
+  option.on('--ruby=[VER]', "The version of Ruby interpreter"){|ver|
+    version = ver
+  }
+  option.on('--help', 'Prints this message and quit.') {
+    puts option.help
+    exit 0
+  }
+  begin
+    option.parse!(ARGV)
+  rescue OptionParser::ParseError => ex
+    $stderr.puts err.message
+    exit 1
+  end
+  unless ARGV.size == 1
+    $stderr.puts "wrong number of arguments"
+    $stderr.puts option.help
+    exit 1
+  end
+  filename = ARGV[0]
+  path = Pathname.new(filename)
+
+  params = { "version" => version }
+  parser = BitClust::RDParser.new(BitClust::Preprocessor.read(path, params))
+  parser.parse
+end
+
+module BitClust
+  class RDParser
+    def initialize(src)
+      @f = LineInput.new(StringIO.new(src))
+      @option = { :force => true }
+    end
+
+    def parse
+      while @f.next?
+        case @f.peek
+        when /\A---/
+          method_entry_chunk
+        else
+          @f.gets
+        end
+      end
+    end
+
+    def method_entry_chunk
+      @f.while_match(/\A---/) do |line|
+        method_signature line
+      end
+      props = {}
+      @f.while_match(/\A:/) do |line|
+        k, v = line.sub(/\A:/, '').split(':', 2)
+        props[k.strip] = v.strip
+      end
+      while @f.next?
+        case @f.peek
+        when /\A===+/
+          @f.gets
+        when /\A==?/
+          if @option[:force]
+            break
+          else
+            raise "method entry includes headline: #{@f.peek.inspect}"
+          end
+        when /\A---/
+          break
+        when /\A\s+\*\s/
+          ulist
+        when /\A\s+\(\d+\)\s/
+          olist
+        when /\A:\s/
+          dlist
+        when %r<\A//emlist\{>
+          emlist
+        when /\A\s+\S/
+          list
+        when /@see/
+          see
+        when /\A@[a-z]/
+          method_info
+        else
+          if @f.peek.strip.empty?
+            @f.gets
+          else
+            method_entry_paragraph
+          end
+        end
+      end
+    end
+
+    def headline(line)
+      # nop
+    end
+
+    def ulist
+      @f.while_match(/\A\s+\*\s/) do |line|
+        @f.while_match(/\A\s+[^\*\s]/) do |cont|
+          # nop
+        end
+      end
+    end
+
+    def olist
+      @f.while_match(/\A\s+\(\d+\)/) do |line|
+        @f.while_match(/\A\s+(?!\(\d+\))\S/) do |cont|
+          # nop
+        end
+      end
+    end
+
+    def dlist
+      while @f.next? and /\A:/ =~ @f.peek
+        @f.while_match(/\A:/) do |line|
+          # nop
+        end
+        dd_with_p
+      end
+    end
+
+    # empty lines separate paragraphs.
+    def dd_with_p
+      while /\A(?:\s|\z)/ =~ @f.peek or %r!\A//emlist\{! =~ @f.peek
+        case @f.peek
+        when /\A$/
+          @f.gets
+        when  /\A[ \t\z]/
+          @f.while_match(/\A[ \t\z]/) do |line|
+            # nop
+          end
+        when %r!\A//emlist\{!
+            emlist
+        else
+          raise 'must not happen'
+        end
+      end
+    end
+
+    # empty lines do not separate paragraphs.
+    def dd_without_p
+      while /\A[ \t]/ =~ @f.peek or %r!\A//emlist\{! =~ @f.peek
+        case @f.peek
+        when  /\A[ \t\z]/
+          @f.while_match(/\A[ \t\z]/) do |line|
+            # nop
+          end
+        when %r!\A//emlist\{!
+          emlist
+        end
+      end
+    end
+
+    def emlist
+      @f.gets   # discard "//emlist{"
+      @f.until_terminator(%r<\A//\}>) do |line|
+        # nop
+      end
+    end
+
+    def list
+      @f.break(/\A\S/)
+    end
+
+    def see
+      @f.gets
+      @f.span(/\A\s+\S/)
+    end
+
+    def paragraph
+      read_paragraph(@f).each do |line|
+        # nop
+      end
+    end
+
+    def read_paragraph(f)
+      f.span(%r<\A(?!---|=|//emlist\{)\S>)
+    end
+
+    def method_info
+      params = []
+      while @f.next? and /\A\@(?!see)\w+|\A$/ =~ @f.peek
+        header = @f.gets
+        next if /\A$/ =~ header
+        cmd = header.slice!(/\A\@\w+/)
+        @f.ungets(header)
+        case cmd
+        when '@param', '@arg'
+          name = header.slice!(/\A\s*\w+/n) || '?'
+          params << name
+        when '@raise'
+          # nop
+        when '@return'
+          # nop
+        else
+          $stderr.puts "[UNKNOWN_META_INFO] #{cmd}"
+        end
+        dd_without_p
+      end
+      # check parameters
+      params.map(&:strip).each{|param|
+        unless @sig.params.split(',').map(&:strip).any?{|v|
+            param == v.tr('*', '').gsub(/\s*=\s*.+/, '')
+          }
+          $stderr.puts "#{@f.lineno}: #{@sig.friendly_string}"
+          $stderr.puts params.inspect
+          $stderr.puts @sig.params.inspect
+        end
+      }
+    rescue
+      $stderr.puts "#{@f.lineno}: #{@sig.friendly_string}"
+      $stderr.puts params.inspect
+      $stderr.puts @sig.params.inspect
+    end
+
+    def method_entry_paragraph
+      read_method_entry_paragraph(@f).each do |line|
+        # nop
+      end
+    end
+
+    def read_method_entry_paragraph(f)
+      f.span(%r<\A(?!---|=|//emlist\{|@[a-z])\S>)
+    end
+
+    def method_signature(sig_line)
+      @sig = MethodSignature.parse(sig_line)
+    end
+  end
+end
+
+main