cbt 0.0.1

data/lib/cbt/diagram.rb

@@ -0,0 +1,50 @@
+require 'rviz'
+
+module Cbt
+  class Diagram < App
+
+    def process!
+      g = Rviz::Graph.new
+      g.set('dpi', '300')
+      g.set('rankdir', 'LR')
+      
+      # for each components, create a node of graphviz
+      @components.each do |cname, c|
+        if @options[:tag] and @options[:tag].size > 0
+          next unless @options[:tag].include? c.tag
+        end
+
+        # parse source file, add relationship
+        c.modules.each do |mname, m|
+          rec_name = m.name
+          attrs = self.tags(c.tag)
+          g.add_record(rec_name, attrs)
+          g.node(rec_name).add_row(cname + '/' + m.name, true)
+          g.add_edge(rec_name, 'f1', m.super_class, nil, {label: 'inherit', arrowhead: "odiamond"}) if m.super_class 
+
+          # parse the file
+          comp_dir = c.dir(@options[:components_dir])
+          lua_file = m.path([comp_dir], 'debug')
+          File.open(lua_file).each do |line|
+            next if line =~ /no_erd/
+            line.chomp!
+            if /function\s#{m.name}\:/ =~ line
+              func = line.gsub(/^.*function\s#{m.name}\:/, '')
+              func.gsub!(/#.*$/, '')
+              g.node(rec_name).add_row('+' + func, false) 
+            end
+
+            if /diagram\s*\-\>\s*/ =~ line
+              link_to = line.gsub(/^.*diagram\s*\-\>\s*/, '')
+              tgt, label = link_to.split(/\s+/, 2)
+              g.add_edge(rec_name, 'f1', tgt, nil, {label: label})
+            end
+          end
+        end
+      end
+
+      g.output
+    end
+
+  end
+end

data/lib/cbt/digester.rb

@@ -0,0 +1,59 @@
+require 'yaml'
+require 'yaml/store'
+require 'digest/md5'
+
+module Cbt
+  class Digester
+
+    # initialize from the configuration
+    def initialize store_file
+      @store_file = store_file
+      @store = YAML::Store.new @store_file
+    end
+
+    def file_digest file
+      return "" unless File.exists? file
+      d = Digest::MD5.hexdigest(File.read(file))
+    end
+
+    # add file copy history
+    def add_history file, digest = nil
+      digest = file_digest file unless digest
+      @store.transaction do
+        @store[file] = Array.new unless @store[file]
+        @store[file] << {
+          'datetime' => DateTime.now.strftime("%F %T"),
+          'digest' => digest
+        }
+      end
+    end
+
+    # return 'datetime' => '', 'digest' => '' or nil for no store
+    def last_change file
+      @store.transaction do      
+        @store[file][-1] if @store[file]
+      end
+    end
+
+    # if the digest is different from last time
+    def changed? file, digest = nil
+      digest = file_digest file unless digest
+      @store.transaction do
+        not (@store[file] and @store[file][-1] and @store[file][-1]['digest'] == digest)
+      end
+    end
+
+    # if the current digest exists in file store
+    def known? file, digest = nil
+      digest = file_digest file unless digest
+      @store.transaction do      
+        return false unless @store[file]
+        @store[file].each do |h|
+          return true if h['digest'] == digest
+        end
+      end
+      false
+    end
+
+  end
+end

data/lib/cbt/girc.rb

@@ -0,0 +1,169 @@
+module Cbt
+  class Girc
+    attr_accessor :git
+
+    def initialize cmd = 'git', v = true
+      @git = cmd
+      @v = v
+    end
+
+    def info msg
+      return unless @v
+      puts "[GITC] #{msg}" if msg.size > 0
+    end
+
+    # general informations
+    # -----------------------
+    # return modified files (without additions/deletions)
+    def modified_files
+      files = Array.new
+      `#{@git} status`.split("\n").each do |line|
+        if /modified\:\s+(?<file_>.+)/ =~ line
+          files << File.expand_path(file_)
+        end
+      end
+      files
+    end
+
+    # return config list as a hash
+    def config
+      h = Hash.new
+      `#{@git} config --list`.split("\n").each do |line|
+        key, value = line.split("=")
+        h[key] = value
+      end
+      h
+    end
+    
+    # return the value of user.name in configuration
+    def me
+      config["user.name"] || "?"
+    end
+
+    # all branches include remote branches
+    def branches
+      branch_list = Array.new
+      `#{@git} branch -a`.split("\n").each do |line|
+        line.gsub!('* ', '')
+        line.gsub!(/\s/, '')
+        branch_list << line unless branch_list.include? line
+      end
+      branch_list
+    end
+
+    # the branch currently working on
+    def current_branch
+      `#{@git} branch`.split("\n").each do |line|
+        if /\*/.match line
+          return line.gsub('* ', '')
+        end
+      end
+      nil
+    end
+
+    def remote_list
+      lst = Array.new
+      `#{@git} remote -v`.split("\n").each do |line|
+        rn = line.split(/\s+/)[0]
+        lst << rn unless lst.include? rn
+      end
+      lst
+    end
+
+    # is the working directory has modified file
+    def wd_clean?
+      clean = true
+      `#{@git} status`.split("\n").each do |line|
+        clean = false if /Changes/.match line
+      end
+      clean
+    end
+
+    # whether the current directory is a git working directory
+    def in_git_dir?
+      `#{@git} status` =~ /fatal/ ? false : true
+    end
+
+    # modifications
+    # --------------------
+    
+    # pull from the remote use fetch/merge
+    def pull! remote = 'origin'
+      cb = self.current_branch
+      info "Fetch from #{remote}"
+      rslt = `#{@git} fetch #{remote}`
+      raise "fetch failed with message: #{rslt}" unless $?.success?
+      info rslt
+      info `#{@git} merge #{remote}/#{cb}`
+    end
+
+    # create a new branch, if remote set, push it to remote too
+    # then switch to that branch
+    def new_branch! branch, remote=nil
+      raise "You need clean up you working directory" unless wd_clean?
+      raise "Branch #{branch} already exists" if self.branches.include? branch
+      `#{@git} checkout -b #{branch}`
+      `#{@git} push #{remote} #{branch}` if remote
+    end
+
+    # delete a branch
+    def del_branch! branch, remote=nil
+      rslt = `#{@git} branch -d #{branch}`
+      raise "Cat not delete branch #{branch}: #{rslt}" unless $?.success?
+      `#{@git} push #{remote} :#{branch}` if remote
+    end
+
+    def stash!
+      unless wd_clean?
+        info "Stash your local changes"
+        `#{@git} add .`
+        `#{@git} stash`
+      end
+    end
+
+    def stash_pop!
+      raise "You may clean up you work directroy first before pop out from the stash" unless wd_clean?
+      info "Pop out from you last stash"
+      `#{@git} stash pop`
+    end
+
+    # remote from a specified remote ref
+    def rebase! remote = 'origin', branch = 'develop'
+      cb = self.current_branch
+      stashed = false
+
+      unless self.wd_clean?
+        self.stash!
+        stashed = true
+      end
+
+      if branch == self.current_branch
+        info "Pull from remote"
+        # `#{@git} pull --rebase #{remote} #{branch}`
+        `#{@git} pull #{remote} #{branch}`
+      else
+        info "Switch to branch #{branch}"
+        `#{@git} fetch #{remote}`
+        rslt = `#{@git} checkout #{branch}`
+        raise "Checkout failed: #{rslt}" unless $?.success?
+        
+        info "Update branch from remote"
+        # rslt = `#{@git} pull --rebase #{remote} #{branch}`
+        rslt = `#{@git} pull #{remote} #{branch}`
+        raise "Pull for #{branch} failed: #{rslt}" unless $?.success?
+        
+        info "Switch back to branch #{cb}"
+        `#{@git} checkout #{cb}`
+        info "Merge from #{branch}"
+        rslt = `#{@git} merge #{branch}`
+        raise "Merge with #{branch} failed: #{rslt}" unless $?.success?
+
+        info "pull branch #{self.current_branch} from remote"
+        `#{@git} pull #{remote} #{self.current_branch}`
+      end
+
+      self.stash_pop! if stashed
+    end
+
+  end
+end

data/lib/cbt/version.rb

@@ -0,0 +1,3 @@
+module Cbt
+  VERSION = '0.0.1'
+end

data/lib/luobo/cbt.rb

@@ -0,0 +1,25 @@
+require 'luobo'
+
+class CbtLuobo < Luobo
+  attr_accessor :platform
+
+  def self.cp! s, t, p
+    k = self.new s, t
+    k.platform = p
+    k.process! 
+  end
+  
+  def do__platform token
+    str = ''
+    token.blocks.each do |line|
+      line.gsub!(/^\s\s?/, '')
+      str += token.indent + line + "\n"
+    end
+    str
+  end
+
+  def do_ios token
+    do__platform token if @platform == 'ios'
+  end
+
+end

data/lib/luobo/lua.rb

@@ -0,0 +1,3 @@
+class LuaLuobo < CbtLuobo
+  
+end

data/lib/luobo/settings.rb

@@ -0,0 +1,4 @@
+class SettingsLuobo < LuaLuobo
+  
+end
+

data/lib/luobo/spec.rb

@@ -0,0 +1,4 @@
+class SpecLuobo < LuaLuobo
+  
+end
+

data/spec/app_spec.rb

@@ -0,0 +1,49 @@
+require "spec_helper"
+
+class GircMock
+  attr_accessor :current_branch
+  def in_git_dir?; true end
+end
+
+describe Cbt::App do
+
+  describe "#initialize" do
+    subject(:app) do
+      Cbt::App.new(config_file: "examples/config/components.yml")
+    end
+
+    it "parses two components in the list" do
+      app.components.keys.size.should eq(3)
+      app.components.each { |k,v| v.is_a?(Cbt::Component).should be_true }
+    end
+
+    it "parses module files for component utils" do
+      app.components["utils"].modules.size.should eq(2)
+      app.components["utils"].modules.each {|k,v| v.is_a?(Cbt::LuaModule).should be_true}
+    end
+  end
+
+  describe "#current_component_names" do
+    subject(:app) do
+      app = Cbt::App.new(config_file: "examples/config/components.yml")
+      app.git = GircMock.new
+      app
+    end
+
+    it "return component for full format current branch" do
+      app.git.current_branch = 'component/utils'
+      app.current_component_names[0].should eq('utils')
+    end
+
+    it "return component for shorter format current branch" do
+      app.git.current_branch = 'comp/utils'
+      app.current_component_names[0].should eq('utils')
+    end
+
+    it "return component for short format current branch" do
+      app.git.current_branch = 'ct/utils'
+      app.current_component_names[0].should eq('utils')
+    end
+  end
+
+end

data/spec/creator_spec.rb

@@ -0,0 +1,39 @@
+require "spec_helper"
+
+describe Cbt::Creator do
+  describe "#find_tpl" do
+    subject(:crt) { Cbt::Creator.new(config_file: "examples/config/components.yml") }
+
+    it "find tpl for simple module" do
+      crt.find_tpl(Cbt::LuaModule.new('utils', 'util')).should eq(File.expand_path("templates/part.lua.erb"))
+    end
+
+    it "find tpl for simple Class" do
+      crt.find_tpl(Cbt::LuaModule.new('utils', 'Util')).should eq(File.expand_path("templates/Class.lua.erb"))
+    end
+
+    it "find tpl for simple module with super class" do
+      crt.find_tpl(Cbt::LuaModule.new('utils', 'util<Sp')).should eq(File.expand_path("templates/part_with_super.lua.erb"))
+    end
+
+    it "find tpl for simple Class with super class" do
+      crt.find_tpl(Cbt::LuaModule.new('utils', 'Util<Sp')).should eq(File.expand_path("templates/Class_with_super.lua.erb"))
+    end
+    it "find tpl for mock module" do
+      crt.find_tpl(Cbt::LuaModule.new('utils', 'util'), true).should eq(File.expand_path("templates/part.mock.lua.erb"))
+    end
+
+    it "find tpl for mock Class" do
+      crt.find_tpl(Cbt::LuaModule.new('utils', 'Util'), true).should eq(File.expand_path("templates/Class.mock.lua.erb"))
+    end
+
+    it "find tpl for mock module" do
+      crt.find_tpl(Cbt::LuaModule.new('utils', 'util<Sp'), true).should eq(File.expand_path("templates/part_with_super.mock.lua.erb"))
+    end
+
+    it "find tpl for mock Class" do
+      crt.find_tpl(Cbt::LuaModule.new('utils', 'Util<Sp'), true).should eq(File.expand_path("templates/Class_with_super.mock.lua.erb"))
+    end
+
+  end
+end

data/spec/digester_spec.rb

@@ -0,0 +1,55 @@
+require "spec_helper"
+
+require 'fileutils'
+
+describe Cbt::Digester do
+  TEMP_FILE = 'history.yml'
+  subject(:dst) { Cbt::Digester.new(TEMP_FILE) }
+
+  describe '#add_history' do
+    it "can add history" do
+      dst.add_history('filename', 'digeststringverylong')
+      dst.last_change('filename').should_not be_nil
+    end
+
+    it "can get last history" do
+      dst.last_change('filename')['digest'].should eq('digeststringverylong')
+    end
+
+    it "can handle more than one file" do
+      dst.add_history('filename2', 'lfgjhowtqerpfdfflou4o8rywo')
+      dst.last_change('filename')['digest'].should eq('digeststringverylong')
+    end
+
+    it "can test file change" do
+      dst.changed?('filename', 'digeststringverylong').should be_false
+      dst.changed?('filename', 'digeststringverylongzz').should be_true
+    end
+
+    it "can test file version in history" do
+      dst.add_history('filename', '34dofy8yeroerhfdofsdf')
+      dst.known?('filename', 'digeststringverylong').should be_true
+      dst.known?('filename', 'digeststringverylozng').should be_false
+    end
+
+    it "compare file change only for the last version" do
+      dst.changed?('filename', '34dofy8yeroerhfdofsdf').should be_false
+      dst.changed?('filename', 'digeststringverylong').should be_true
+    end
+
+    it "compare file change without digest" do
+      FileUtils.cp 'examples/config/components.yml', 'history_test'
+      dst.add_history('history_test')
+      dst.changed?('history_test').should be_false
+      #wfh = File.open('history_test', 'w')
+      #wfh.puts "history file test"
+      #wfh.close
+      #dst.changed?('history_test').should be_true
+    end
+
+    after(:all) do
+      FileUtils.rm TEMP_FILE
+      FileUtils.rm 'history_test'
+    end
+  end
+end