milkode 0.1.0

data/lib/milkode/cdweb/public/css/gren.css

@@ -0,0 +1,75 @@
+body {
+}
+
+div.header {
+}
+
+div.footer {
+}
+
+div.header_home {
+    font-size: 170%;
+}
+
+div.footer_home {
+    font-size: 85%;
+    margin-top: 3em;
+}
+
+div.search-summary {
+    border-color:#F4CA3F;
+    background-color:#FEFFF0;
+    border-top-style:solid;
+    border-top-width:1px;
+    border-bottom-style:solid;
+    border-bottom-width:1px;
+    margin-bottom:1em;
+    margin-top:1em;
+    padding-bottom:5px;
+    padding-top:5px;
+    padding-left:5px;
+}
+
+dt.result-record {
+    font-size: 105%;
+}
+
+dt.result-file {
+    font-size: 95%;
+}
+
+div.pagination {
+    background-color:#FEFFF0;
+    text-align: center;
+    margin-bottom: 20px;
+}
+
+pre.lines {
+    border: 1px solid #dedede;
+    margin-bottom: 5px;
+    padding-left: 5px;
+    background-color: #fdfdfd;
+    font-weight: inherit;
+    margin-top: 5px;
+    padding-top: 5px;
+    padding-bottom: 5px;
+}
+
+span.keyword {
+    font-weight: bold;    
+}
+
+font.version {
+    font-size: 35%;
+}
+
+span.highlight-line {
+   background-color: #d0ff9c;
+/*     background-color: #FFFF55; */
+}
+
+a.headmenu {
+    font-size: 40%;
+    font-weight: normal;
+}
+

data/lib/milkode/cdweb/views/filelist.haml

@@ -0,0 +1,14 @@
+.header
+  %h1
+    <a href="/"><img src="/images/gren-icon-mini.png" alt="gren-icon" border="0"/></a>
+    Milkode
+    = create_headmenu(@path, params)
+
+.content
+  = create_form(@path, params[:query], params[:shead])
+
+  .search-summary
+    <span class="keyword">#{topic_path(@path, params)}</span> <span class="total-entries">#{@total_records}</span>件（#{@elapsed}秒）
+  ~ @record_content
+
+

data/lib/milkode/cdweb/views/help.haml

@@ -0,0 +1,16 @@
+- @title = 'help'
+
+.header
+  %h1
+    <a href="/"><img src="/images/gren-icon-mini.png" alt="gren-icon" border="0"/></a>
+    #{@title} - Milkode
+
+.content
+  .sample-code
+    %ol
+      %li キーワードで検索<br>#{link('def open')} 
+      %li１フレーズとして検索<br>#{link('"def open"')}
+      %li パッケージ名で絞り込み<br>#{link('def open p:gren')}
+      %li ファイル名や拡張子で絞り込み<br>#{link('def open f:test s:rb')}
+      %li 組み合わせ<br>#{link('p:gren p:tidtools s:rb f:test assert f:cli')}
+      

data/lib/milkode/cdweb/views/index.haml

@@ -0,0 +1,17 @@
+%div(align="center")
+  .header_home
+    %h1 <a href="/"><img src="/images/gren-icon.png" alt="gren-icon" border="0" height="100px"/></a> Milkode <font class="version">#{@version}</font>
+
+  .content
+    %form(method="post" action="home")
+      %p
+        %input(name="query" type="text" size="60")
+        %input(type="submit" value="検索")
+  
+  .footer_home
+    <a href="/home">#{@package_num}</a>のパッケージ<br>
+    <a href="/home?query=f:*">#{@file_num}</a>のファイル<br>
+    <a href="/help">ヘルプ</a> , 
+    <a href="http://milkode.ongaeshi.me">milkodeについて</a>
+
+

data/lib/milkode/cdweb/views/layout.haml

@@ -0,0 +1,33 @@
+!!!
+
+%html(lang='ja')
+  %head
+    %meta(charset='utf-8')
+    %title= [@title, 'Milkode'].compact.join(' - ')
+    %link(rel="stylesheet" href="/css/gren.css"  type="text/css" media="all")
+    %link(rel="stylesheet" href="/css/coderay.css"  type="text/css" media="all")
+
+  %body
+    -# %header
+    -# %h1 <a href=".">Milkode</a>
+
+    != yield
+
+    %script{:type=>"text/javascript"}
+      var _gaq = _gaq || [];
+      _gaq.push(['_setAccount', 'UA-13136329-8']);
+      _gaq.push(['_trackPageview']);
+
+      (function() {
+      var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true;
+      ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '.google-analytics.com/ga.js';
+      var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
+      })();
+
+-#     %hr
+
+-#     %footer
+-#       %p
+-#         ! Develop by <a href="./contact.html">ongaeshi</a>
+-#         ! Powered by <a href="http://www.ruby-lang.org/">Ruby</a> #{::RUBY_VERSION},
+-#         ! <a href="http://www.sinatrarb.com/">Sinatra</a> #{Sinatra::VERSION}

data/lib/milkode/cdweb/views/search.haml

@@ -0,0 +1,12 @@
+.header
+  %h1
+    <a href="/"><img src="/images/gren-icon-mini.png" alt="gren-icon" border="0"/></a>
+    Milkode
+    = create_headmenu(@path, params)
+
+.content
+  = create_form(@path, params[:query], params[:shead])
+  
+  .search-summary
+    <span class="keyword">#{topic_path(@path, params)}</span> <span class="total-entries">#{@total_records}</span>件中 <span class="display-range">#{@range.first} - #{@range.last}</span>件（#{@elapsed}秒）
+  ~ @record_content

data/lib/milkode/cdweb/views/view.haml

@@ -0,0 +1,16 @@
+.header
+  %h1
+    <a href="/"><img src="/images/gren-icon-mini.png" alt="gren-icon" border="0"/></a>
+    Milkode
+    = create_headmenu(@path, params)
+
+.content
+  = create_form(@path, params[:query], params[:shead])
+
+  .search-summary
+    <span class="keyword">#{topic_path(@path, params)}</span>（#{@elapsed}秒）
+  ~ @record_content
+
+
+
+

data/lib/milkode/common/dbdir.rb

@@ -0,0 +1,39 @@
+# -*- coding: utf-8 -*-
+#
+# @file 
+# @brief
+# @author ongaeshi
+# @date   2011/03/08
+
+require 'fileutils'
+
+module Milkode
+  module Dbdir
+    module_function
+
+    def default_dir
+      if (ENV['MILKODE_DEFAULT_DIR'])
+        File.expand_path ENV['MILKODE_DEFAULT_DIR']
+      else
+        File.expand_path '~/.milkode'
+      end
+    end
+
+    def groonga_path(path = '.')
+      (Pathname.new(path) + 'db/milkode.db').to_s
+    end
+
+    def expand_groonga_path(path = '.')
+      File.expand_path groonga_path(path)
+    end
+    
+    def yaml_path(path = '.')
+      (Pathname.new(path) + 'milkode.yaml').to_s
+    end
+
+    def dbdir?(path = '.')
+      FileTest.exist? yaml_path(path)
+    end
+  end
+end
+

data/lib/milkode/common/display_util.rb

@@ -0,0 +1,62 @@
+# -*- coding: utf-8 -*-
+
+module Gren
+  module DisplayUtil
+    def time_s(time)
+      t = time.truncate
+      h = t / 3600
+      t = t % 3600
+      m = t / 60
+      t = t % 60
+      t += round(time - time.prec_i, 2)
+      
+      if (h > 0 && m > 0)
+        "#{h}h #{m}m #{t}s"
+      elsif (m > 0)
+        "#{m}m #{t}s"
+      else
+        "#{t}sec"
+      end
+    end
+    module_function :time_s
+
+    def round(n, d)
+      (n * 10 ** d).round / 10.0 ** d
+    end
+    module_function :round
+
+    def size_s(size)
+      tb = 1024 ** 4
+      gb = 1024 ** 3
+      mb = 1024 ** 2
+      kb = 1024
+
+      if (size >= tb)
+        round(size / tb.prec_f, 2).to_s + "TB"
+      elsif (size >= gb)
+        round(size / gb.prec_f, 2).to_s + "GB"
+      elsif (size >= mb)
+        round(size / mb.prec_f, 2).to_s + "MB"
+      elsif (size >= kb)
+        round(size / kb.prec_f, 2).to_s + "KB"
+      else
+        size.to_s + "Byte"
+      end
+    end
+    module_function :size_s
+
+    def dump_methods(c)
+      unless c.is_a?(Class)
+        c = c.class
+      end
+      
+      while (true)
+        p c
+        break if (c == Object)
+        puts "↓  " + c.public_instance_methods(false).inspect
+        c = c.superclass
+      end
+    end
+    module_function :dump_methods
+  end
+end

data/lib/milkode/common/grenfiletest.rb

@@ -0,0 +1,19 @@
+# -*- coding: utf-8 -*-
+
+module GrenFileTest
+  IGNORE_FILE = /(\A#.*#\Z)|(~\Z)|(\A\.#)|(\.d\Z)|(\.map\Z)|(\.MAP\Z)/
+  IGNORE_DIR = /(\A\.svn\Z)|(\A\.git\Z)|(\ACVS\Z)/
+
+  def self.ignoreDir?(fpath)
+    IGNORE_DIR.match(File.basename(fpath))
+  end
+
+  def self.ignoreFile?(fpath)
+    IGNORE_FILE.match(File.basename(fpath))
+  end
+
+  def self.binary?(fpath)
+      s = File.read(fpath, 1024) or return false
+      return s.index("\x00")
+  end
+end

data/lib/milkode/common/grensnip.rb

@@ -0,0 +1,37 @@
+# -*- coding: utf-8 -*-
+
+require 'milkode/common/string_snip'
+
+class GrenSnip
+  MAX_LINE_SIZE = 256
+  HEADER_SIZE = 32
+  MARGIN_SIZE = 32
+  DELIMITER = '<<snip>>'
+
+  def self.snip(str, match_datas)
+    return str if (str.size <= MAX_LINE_SIZE)
+
+    ranges = []
+    ranges << (0..HEADER_SIZE-1)
+    ranges << (-HEADER_SIZE..-1)
+
+    match_datas.each do |m|
+      ranges << (m.begin(0)-MARGIN_SIZE..m.end(0)+MARGIN_SIZE)
+    end
+
+    snipper = StringSnip.new(MAX_LINE_SIZE, DELIMITER)
+    return snipper.snip(str, ranges)
+  end
+
+  def self.coloring(line, match_datas)
+    match_datas.each do |m|
+      line = line.split(m[0]).join(HighLine::ON_GREEN + m[0] + HighLine::CLEAR)
+    end
+    
+    line = line.split(DELIMITER).join(HighLine::ON_CYAN + DELIMITER + HighLine::CLEAR)
+
+    line
+  end
+end
+
+

data/lib/milkode/common/platform.rb

@@ -0,0 +1,17 @@
+# -*- coding: utf-8 -*-
+require 'kconv'
+
+# LinuxやBSD等にも対応予定(その場合のエンコードって何が適切なんだろ？EUC?UTF8?)
+class Platform
+  def self.windows_os?
+    RUBY_PLATFORM =~ /mswin(?!ce)|mingw|cygwin|bccwin/
+  end
+
+  def self.get_shell_kcode
+    if windows_os?
+      Kconv::SJIS
+    else
+      Kconv::UTF8
+    end
+  end
+end

data/lib/milkode/common/string_snip.rb

@@ -0,0 +1,61 @@
+# -*- coding: utf-8 -*-
+
+class StringSnip
+  def initialize(size = 256, delimiter = '<<snip>>', pri = nil)
+    @size = size
+    @delimiter = delimiter
+    @pri = pri
+  end
+
+  def snip(str, ranges)
+    @str = str
+    @ranges = ranges
+
+    # no snip
+    return @str if (@str.size <= @size)
+
+    # snip
+    @ranges = StringSnip::ranges_conv(@ranges, @str)
+    @ranges = StringSnip::ranges_sort(@ranges)
+    @ranges = StringSnip::ranges_compound(@ranges)
+
+    # result
+    results = []
+    @ranges.each {|r| results << @str[r] }
+    return results.join(@delimiter)
+  end
+
+  def self.ranges_conv(ranges, str)
+    ranges.map {|i| index_conv(str, i.begin)..index_conv(str, i.end)}
+  end
+
+  def self.index_conv(str, value)
+    if (value < 0)
+      str.size + value
+    else
+      value
+    end
+  end
+
+  def self.ranges_sort(ranges)
+    ranges.sort_by{|i| i.begin}
+  end
+
+  def self.ranges_compound(ranges)
+    result = []
+    
+    index = 0
+    while (ranges.size > 0)
+      if (ranges.size > 1 && ranges[0].end + 1 >= ranges[1].begin)
+        v1, v2 = ranges.shift(2)
+        ranges.unshift v1.begin..((v1.end > v2.end) ? v1.end : v2.end)
+      else
+        result << ranges.shift
+      end
+    end
+
+    result
+  end
+end
+
+

data/lib/milkode/common/util.rb

@@ -0,0 +1,144 @@
+# -*- coding: utf-8 -*-
+
+require 'rubygems'
+require 'archive/zip'
+require 'fileutils'
+
+module Milkode
+  module Util
+    module_function
+
+    class ZipfileNotFound < RuntimeError ; end
+    
+    # zipファイルを展開し、展開フォルダ名を返す
+    # ファイルが見つからなかった時はnilを返す
+    def zip_extract(filename, dst_dir)
+      raise ZipfileNotFound unless File.exist?(filename)
+      
+      root_list = root_entrylist(filename)
+      
+      if (root_list.size == 1)
+        # そのまま展開
+        Archive::Zip.extract filename, dst_dir
+        return root_list[0].gsub("/", "")
+      else
+        # ディレクトリを作ってその先で展開
+        dir = File.basename(filename).sub(/#{File.extname(filename)}$/, "")
+        FileUtils.mkdir_p File.join(dst_dir, dir)
+        Archive::Zip.extract filename, File.join(dst_dir, dir)
+        return dir
+      end
+    end
+
+    def root_entrylist(filename)
+      list = []
+      
+      Archive::Zip.open(filename) do |archive|
+        archive.each do |entry|
+          list << entry.zip_path if entry.zip_path.split('/').size == 1
+        end
+      end
+
+      list
+    end
+  end
+end
+
+# -- 将来的には Milkode に統一 ---
+
+module Gren
+  module Util
+    # アルファベットと演算子で表示する数を変える
+    ALPHABET_DISP_NUM = 5
+    OPERATOR_DISP_NUM = 10
+
+    def time_s(time)
+      t = time.truncate
+      h = t / 3600
+      t = t % 3600
+      m = t / 60
+      t = t % 60
+      t += round(time - time.prec_i, 2)
+      
+      if (h > 0 && m > 0)
+        "#{h}h #{m}m #{t}s"
+      elsif (m > 0)
+        "#{m}m #{t}s"
+      else
+        "#{t}sec"
+      end
+    end
+    module_function :time_s
+
+    def round(n, d)
+      (n * 10 ** d).round / 10.0 ** d
+    end
+    module_function :round
+
+    def size_s(size)
+      tb = 1024 ** 4
+      gb = 1024 ** 3
+      mb = 1024 ** 2
+      kb = 1024
+
+      if (size >= tb)
+        round(size / tb.prec_f, 2).to_s + "TB"
+      elsif (size >= gb)
+        round(size / gb.prec_f, 2).to_s + "GB"
+      elsif (size >= mb)
+        round(size / mb.prec_f, 2).to_s + "MB"
+      elsif (size >= kb)
+        round(size / kb.prec_f, 2).to_s + "KB"
+      else
+        size.to_s + "Byte"
+      end
+    end
+    module_function :size_s
+
+    def p_classtree(c)
+      unless c.is_a?(Class)
+        c = c.class
+      end
+      
+      while (true)
+        puts c.name
+        break if (c == Object)
+        p_classtree_sub(c)
+        c = c.superclass
+      end
+    end
+    module_function :p_classtree
+
+    def p_classtree_sub(c)
+      # メソッドの一覧を得る
+      group = c.public_instance_methods(false).sort.partition { |m| m =~ /\w/ }
+      array = group.flatten
+      operator_start_index = group[0].size
+      limit = ALPHABET_DISP_NUM
+
+      print((array.size > limit) ? "｜  " :  "↓  ")
+      
+      counter = 0
+      array.each_with_index do |v, index|
+        if (index == operator_start_index)
+          limit = OPERATOR_DISP_NUM
+          counter = 0
+          puts
+          print((array.size - index > limit) ? "｜  " : "↓  ")
+        end
+
+        if (counter >= limit)
+          counter = 0
+          puts
+          print((array.size - index > limit) ? "｜  " : "↓  ")
+        end
+
+        print v + ", "
+        counter += 1
+      end
+      puts
+    end
+    module_function :p_classtree_sub
+
+  end
+end