latex2hiki 0.1.1

data/lib/latex2hiki/version.rb

@@ -0,0 +1,3 @@
+module Latex2hiki
+  VERSION = "0.1.1"
+end

data/lib/maple/latex2hiki.rb

@@ -0,0 +1,222 @@
+#!/usr/local/bin/ruby
+# -*- coding: utf-8 -*-
+require "stringio"
+require 'kconv'
+require "strscan"
+require "uri"
+
+class Latex < String
+
+  def initialize(output)
+    @text = NKF.nkf("-w",output)
+    @text.gsub!(/\r\n?/,'\n')
+    @text.gsub!(/\\%/,'%')
+    @text.gsub!("。","．")
+    @text.gsub!("、","，")
+  end
+
+  def strip_hiki
+    ifHIKI = true
+    output = ''
+    @text.each_line {|line1|
+      case line1
+      when /\\ifHIKI/
+        ifHIKI = true
+      when /\\else/
+        ifHIKI = false
+      when /\\fi/
+        ifHIKI = true
+      else
+        if ifHIKI==true then
+          output << line1
+        end
+      end
+    }
+    @text = output
+  end
+
+  def strip_document
+    is_document = false
+    is_include_document = false
+    output = ''
+    @text.each_line{|line|
+      case line
+      when /\\begin\{document\}/
+        is_document = true
+        is_include_document = true
+      when /\\end\{document\}/
+        is_document = false
+      else
+        if is_document==true then
+          output << line
+        end
+      end
+    }
+    if is_include_document==true then
+      @text = output
+    end
+  end
+
+  def to_hiki
+    roman_num=["","i)","ii)","iii)","iv)","v)","vi)","vii)","viii)","ix)","x)"]
+    alpha_num=["","a)","b)","c)","d)","e)","f)","g)","h)","i)","j)"]
+    strip_document()
+    strip_hiki()
+    output=''
+    item_number=Array.new(3,1)
+    is_enumerate=0
+    is_quote_eq, is_quote, is_itemize, is_table = false, false, false, false
+    @text.each_line {|nline|
+      line=nline.gsub(/\\verb\|(.+?)\|/){|matched|
+        $&[6..-2]
+      }
+
+      line.gsub!(/\\fbox\{(.+?)\}/,"[ XXX ]")
+      line.gsub!(/\\displaystyle/,'')
+
+      case line
+      when /\\label\{(.*)\}/
+
+      when /\\section\{(.*)\}/
+        output << "\n!#{$1} \n"
+      when /\\section\*\{(.*)\}/
+        output << "\n!#{$1} \n"
+      when /\\subsection\{(.*)\}/
+        output << "\n!!#{$1} \n"
+      when /\\subsubsection\{(.*)\}/
+        output << "\n!!!#{$1} \n"
+      when /\\paragraph\{(.*)\}/
+        output <<  "\n!!!!#{$1} \n"
+      when /\\item\[(.*)\](.*)/
+        output << ":"+$1+":"+$2.chomp+"\n"
+      when /\\item(.*)/
+        if is_enumerate==1 then
+          output << "# "+$1.chomp+"\n"
+        elsif is_enumerate==2 then
+          output << "# "+$1.chomp+"\n"
+        elsif is_enumerate==3 then
+          output << "# "+$1.chomp+"\n"
+        elsif is_itemize then
+          output << "* "+$1+"\n"
+        end
+
+      when /\\begin\{MapleInput\}/
+        output << "<<<maple\n"
+      when /\\end\{MapleInput\}/
+        output << ">>>\n"
+      when /\\begin\{MapleError\}/
+        output << "<<<maple\n"
+      when /\\end\{MapleError\}/
+        output << ">>>\n"
+
+
+      when /\\begin\{quote\}/
+        is_quote = true
+      when /\\end\{quote\}/
+        is_quote = false
+
+      when /\\begin\{description\}/
+      when /\\end\{description\}/
+      when /\\begin\{verbatim\}/
+        output << "<<<\n"
+      when /\\end\{verbatim\}/
+        output << ">>>\n"
+      when /\\begin\{enumerate\}/
+        is_enumerate += 1
+      when /\\begin\{itemize\}/
+        is_itemize = true
+      when /\\end\{enumerate\}/
+        item_number[is_enumerate]=1
+        is_enumerate -= 1
+      when /\\end\{itemize\}/
+        is_itemize = false
+
+
+
+      when /\\begin\{MapleOutput\}/,/\\begin\{MapleOutputGather\}/,/\\begin\{gather\}/ then
+        output << "\$\$\n"
+        is_quote_eq = true
+      when /\\end\{MapleOutput\}/,/\\end\{MapleOutputGather\}/,/\\end\{gather\}/ then
+        output << "\$\$\n"
+        is_quote_eq = false
+#      when /\\notag/ then
+#        output << $`+"\n"
+#        output << 
+
+      when /\\MaplePlot\{(.*)\}\{(.*)\}/
+        target=File::basename($2,".eps")+".png"
+        output << "||{{attach_view(#{target},#{$target_dir})}}||\n"
+
+      when /\\begin\{tabular\}/
+        is_table = true
+      when /\\end\{tabular\}/
+        is_table = false
+      when /\\begin\{table\}/
+      when /\\end\{table\}/
+      when /\\begin\{center\}/
+      when /\\end\{center\}/
+      when /\\caption\{(.*)\}/
+#        output << "'''"+$1+"'''\n"
+        output << "!!!caption:"+$1+"\n"
+
+      when /\\begin\{equation\*\}/
+        is_quote_eq = true
+        if is_quote then
+          output << "\"\"\$\$\n"
+        else
+          output << "\n\$\$\n"
+        end
+      when /\\end\{equation\*\}/ 
+        is_quote_eq = false
+        output << "\$\$\n"
+      when /\\begin\{equation\}/
+        is_quote_eq = true
+        if is_quote then
+          output << "\"\"\$\$\n"
+        else
+          output << "\$\$\n"
+        end
+      when /\\end\{equation\}/
+        is_quote_eq = false
+        output << "\$\$\n"
+      when /\\pagebreak/
+      when /\\begin\{(.+)\}/
+        if is_quote_eq then
+          output << line.lstrip
+        end
+      when /\\end\{(.+)\}/
+        if is_quote_eq then
+          output << line.lstrip
+        end
+      else
+        if is_table then
+          next if ((line==nil) or (line=~/^\\hline/))
+          line.gsub!(/\&/,"||")
+          line.gsub!(/\\\\/,"")
+          line.gsub!(/\\hline/,"")
+          output << "||"+line
+
+        elsif is_quote then
+          if is_quote_eq then
+            output << line.lstrip
+          else
+            output << "\"\""+line
+          end
+        else
+          if is_quote_eq then
+            output << line.lstrip
+          else
+            output << line
+          end
+        end
+      end
+    }
+    return output
+  end
+end
+
+if __FILE__ == $0
+  $target_dir=File::dirname(ARGV[0])
+#  puts NKF.nkf("-e",Latex.new(File.read(ARGV[0])).to_hiki)
+  puts NKF.nkf("-w",Latex.new(File.read(ARGV[0])).to_hiki)
+end

data/lib/maple/new_rakefile

@@ -0,0 +1,50 @@
+task :default do
+  system 'rake -T'
+end
+
+desc "make hiki documents by mk_maple_hiki"
+task :hiki do
+  dirs=Dir.glob('./*')
+  dirs.each{|directory|
+    next unless FileTest.directory?(directory)
+    p directory
+    FileUtils.cp('./.latex2hiki_rc',directory)
+    system "mk_maple_hiki --hiki #{directory}"
+    system "mk_maple_hiki --figures #{directory}"
+  }
+
+end
+
+desc "strip multiple braces"
+task :strip do
+  lines = File.readlines(ARGV[1])
+  text = ""
+  lines.each{|line|
+    #  if md=line.match(/\{\{(.+?)\}\}/) then
+    if md=line.match(/\{\{.+?\}\}/) then
+      line.gsub!(/\{\{\{(.+?)\}\}\}/){|text|
+        "\{#{$1}\}"
+      }
+      line.gsub!(/\{\{(.+?)\}\}/){|text|
+        "\{#{$1}\}"
+      }
+    end
+    text << line
+  }
+  print text
+end
+
+desc "replace multiple word pairs at once commands"
+task :replace do
+  lines = File.readlines(ARGV[1])
+  text = ""
+  change_pair = [["ChartElementTwo","subsection"]]
+  lines.each{|line|
+      if md=line.match(/\A\\ChartElementTwo/)
+      line.gsub!(change_pair[0][0],change_pair[0][1])
+    end
+    text << line
+  }
+  print text
+end
+

data/lib/mk_maple_hiki.rb

@@ -0,0 +1,178 @@
+# -*- coding: utf-8 -*-
+require 'optparse'
+require "latex2hiki/version"
+require "maple/latex2hiki"
+#require "latex2hiki/latex2hiki_new"
+require 'fileutils'
+require 'yaml'
+
+module MkMapleHiki
+
+  class Command
+    def self.run(argv=[])
+      new(argv).execute
+    end
+
+    def initialize(argv=[])
+      @argv = argv
+      @scale = 80
+    end
+
+    def execute
+      @argv << '--help' if @argv.size==0
+      banner = 'For making maple hiki'
+      command_parser = OptionParser.new(banner) do |opt|
+        opt.on('-v', '--version','show program Version.') { |v|
+          opt.version = Latex2hiki::VERSION
+          puts opt.ver
+        }
+        opt.on('--init [NAME]','initialize NAME directory.') { |name|
+          name = name || './'
+          init(name)
+          exit
+        }
+        opt.on('--figures [NAME]','gather and convert figures in NAME dir.') { |name|
+          name = name || './'
+          gather_figures(name)
+          convert_figures(name)
+          exit
+        }
+        opt.on('--scale [VAL]%','set scale for convert figures.') { |val|
+          @scale = val.to_i
+        }
+        opt.on('--level [VAL]','set level for head start level .') { |val|
+          @level = val.to_i
+        }
+        opt.on('--hiki [NAME]','make hiki contents from NAME directory.') { |name|
+          name = name || './'
+          @src=read_src(name)
+          make_hiki(name)
+          exit
+        }
+      end
+      command_parser.parse!(@argv)
+      puts NKF.nkf("-w",Latex.new(File.read(ARGV[0])).to_hiki)
+      exit
+    end
+
+    def read_src(name)
+      file=File.read(File.join(name,'.latex2hiki_rc'))
+      YAML.load(file)
+    end
+
+    def make_hiki(name)
+      if name=='./'
+        toc_file = './'+File.basename(Dir.pwd())+'.tex'
+        hiki_file = File.join(@src[:local_site],'text',File.basename(Dir.pwd))
+      else
+        toc_file = File.join(name,"#{File.basename(name)}.tex")
+        hiki_file = File.join(@src[:local_site],'text',File.basename(name))
+      end
+
+      if File.exists?(toc_file) then
+        toc=toc_file_base_proc(toc_file)
+      else
+#        dir_base_proc
+      end
+
+      File.write(hiki_file, toc)
+      FileUtils.chmod(0666,hiki_file,:verbose=>true)
+    end
+
+    def toc_file_base_proc(toc_file)
+      lines = File.readlines(toc_file)
+      parser=[]
+      str_started=false
+      lines.each{|line|
+        elements=line.match(/^\\(.+){(.+)}/u)
+        next unless elements
+        if !str_started
+          if elements[2]!='document'
+            next
+          else
+            str_started=!str_started
+          end
+        end
+        parser << [elements[1],elements[2]]
+      }
+      p parser
+      converts = @src[:convert_specific_def]
+      @level = @level || @src[:level] 
+      text="{{toc}}\n"
+      parser.each{|elements|
+        tt=""
+        case elements[0]
+        when 'chapter'
+          next if @level<0
+          @level.times{ tt << '!' }
+          p [tt,elements[1]]
+          text << "\n#{tt}#{elements[1]}\n"
+        when 'section'
+          next if (@level+1)<0
+          (@level+1).times{ tt << '!' }
+          p [tt,elements[1]]
+          text << "\n#{tt}#{elements[1]}\n"
+        when 'subsection'#,'ChartElement','ChartElementTwo'
+          (@level+2).times{ tt << '!' }
+          text << "\n#{tt}#{elements[1]}\n"
+        when 'input'
+          p elements[1]
+          latex_txt= File.read(File.join(File.dirname(toc_file),elements[1]))
+          hiki_txt = NKF.nkf("-w",Latex.new(latex_txt).to_hiki)
+          text << "\n#{hiki_txt}\n"
+        end
+      }
+      return text
+    end
+
+    def gather_figures(name)
+      @src=read_src(name)
+      extension = @src[:fig_extension] || '.eps'
+      p file_names =File.join(name,'**',"\*#{extension}")
+      files = Dir.glob(file_names)
+      target = File.join(name,'figures')
+      files.each{|file|
+        next if File.dirname(file)==target
+        FileUtils.cp(file,target,:verbose=>true)
+      }
+    end
+
+    def convert_figures(name)
+      @src=read_src(name)
+      extension = @src[:fig_extension] || '.eps'
+      p file_dir =File.join(name,'figures')
+      files = Dir.entries(file_dir)
+      p target_dir = File.join(@src[:local_site],'cache','attach',File.basename(name))
+      FileUtils.mkdir_p(target_dir,:verbose=>true)
+      files.each{|file|
+        next if File.extname(file) != extension
+        p source = File.join(file_dir,file)
+        p name = File.basename(file,extension)
+        p target = File.join(target_dir,name+'.png')
+        p command = "convert #{source} -resize #{@scale}\% #{target}"
+        system command
+      }
+    end
+
+    def init(name)
+      FileUtils.mkdir_p(name,:verbose=>true)
+      FileUtils.mkdir_p(File.join(name,'figures'),:verbose=>true)
+
+      @src = {:fig_extension => '.eps',:level => 0,
+        :local_site => '/Users/bob/Sites/new_ist_data/maple_hiki_data'}
+      unless File.exists?(File.join(name,'.latex2hiki_rc'))
+        file=File.open(File.join(name,'.latex2hiki_rc'),'w')
+        YAML.dump(@src,file)
+        file.close
+      end
+
+      if File.exists?(File.join(name,'Rakefile')) then
+        print "Remove Rakefile from targetdir."
+      else
+        @source_path = File.expand_path('..', __FILE__)
+        FileUtils.cp(File.join(@source_path,'maple','new_rakefile'),
+                     File.join(name,'Rakefile'),:verbose=>true)
+      end
+    end
+  end
+end