kwatable 0.0.1

data/test/assert-diff.rb

@@ -0,0 +1,44 @@
+###
+### copyright(c) 2005 kuwata-lab.com all rights reserved.
+### $Release: 0.0.1 $
+### $Rev: 10 $
+###
+
+require 'test/unit'
+require 'tempfile'
+
+module Test
+   module Unit
+      class TestCase
+         def assert_equal_with_diff(expected, actual, message=nil, diffopt='-u', flag_cut=true)
+            if expected == actual
+               assert(true)
+               return
+            end
+
+            if expected[-1] != ?\n || actual[-1] != ?\n
+               expected += "\n"
+               actual   += "\n"
+            end
+            begin
+               expfile = Tempfile.new(".expected.")
+               expfile.write(expected); expfile.flush()
+               actfile = Tempfile.new(".actual.")
+               actfile.write(actual);   actfile.flush()
+               diff = `diff #{diffopt} #{expfile.path} #{actfile.path}`
+            ensure
+               expfile.close(true) if expfile
+               actfile.close(true) if actfile
+            end
+
+            # cut 1st & 2nd lines
+            message = (flag_cut ? diff.gsub(/\A.*\n.*\n/, '') : diff) unless message
+            #raise Test::Unit::AssertionFailedError.new(message)
+            assert_block(message) { false }  # or assert(false, message)
+         end
+         #def assert_equal(expected, actual, message=nil)
+         #   return assert_equal_with_diff(expected, actual, message)
+         #end
+      end
+   end
+end

data/test/test.rb

@@ -0,0 +1,202 @@
+###
+### copyright(c) 2005 kuwata-lab.com all rights reserved.
+### $Release: 0.0.1 $
+### $Rev: 11 $
+###
+
+dir = Dir.pwd
+dir = File.dirname(dir) if File.basename(dir) == 'test'
+
+BASE_DIR     = dir
+TEST_DIR     = "#{BASE_DIR}/test"
+LIB_DIR      = "#{BASE_DIR}/lib"
+EXAMPLES_DIR = "#{BASE_DIR}/examples"
+
+Dir.chdir(TEST_DIR)
+
+$: << LIB_DIR
+$: << TEST_DIR
+
+ENV['RUBYLIB'] = LIB_DIR
+
+require 'test/unit'
+require 'test/unit/ui/console/testrunner'
+
+require 'kwatable.rb'
+require 'assert-diff'
+
+
+class KwatableExampleTest < Test::Unit::TestCase
+
+   def _test(options={})
+      optstr = "#{@option}"
+      if options[:multiple]      # or if @classnames
+         outdir = prefix()
+         optstr << " -smd #{outdir}"
+      end
+      cmd = "kwatable -f #{@template} #{optstr} #{@datafile}"
+      #cmd = "kwatable -I #{BASE_DIR}/templates -f #{@template} #{optstr} #{@datafile}"
+      $logger.write("- command: #{cmd}\n  thread: #{Thread.current.__id__}\n  timestamp: #{Time.new.to_s}\n")
+      #$stderr.puts "*** debug: cmd=#{cmd.inspect}"
+      actual = `#{cmd}`
+      if @classnames
+         actuals = {}
+         @classnames.each do |classname|
+            actual = File.read(@output % classname)
+            File.unlink(@output % classname)
+            if options[:ignore_linenum]
+               actual = _ignore_line(actual, options[:ignore_linenum])
+            end
+            actuals[classname] = actual
+            File.open(@actual % classname, 'w') { |f| f.write(actual) }
+         end
+         @classnames.each do |classname|
+            actual = actuals[classname]
+            expected = File.read(@expected % classname)
+            assert_equal_with_diff(expected, actual)
+         end
+      else
+         if options[:ignore_linenum]
+            actual = _ignore_line(actual, options[:ignore_linenum])
+         end
+         File.open(@actual, 'w') { |f| f.write(actual) }
+         expected = File.open(@expected) { |f| f.read() }
+         assert_equal_with_diff(expected, actual)
+      end
+   end
+
+   def prefix
+      raise NotImplementedError.new("#{self.class.name}#prefix() is not implemented.")
+   end
+
+   def classnames
+      raise NotImplementedError.new("#{self.class.name}#classnames() is not implemented.")
+   end
+
+
+   def _ignore_line(str, linenum)
+      s = ''
+      i = 0
+      str.each_line do |line|
+         i += 1
+         s << line if i != linenum
+      end
+      return s
+   end
+
+   def _setup_ddl(basename)
+      dir = prefix()
+      @datafile   = "#{dir}/#{prefix()}.yaml"
+      @template   = "#{basename}.eruby"
+      @actual     = "#{dir}/#{prefix()}.#{basename}.actual"
+      @expected   = "#{dir}/#{prefix()}.#{basename}.expected"
+   end
+
+   def _setup_dto(basename, suffix)
+      dir = prefix()
+      @datafile   = "#{dir}/#{prefix()}.yaml"
+      @template   = "#{basename}.eruby"
+      @actual     = "#{dir}/#{prefix()}.#{basename}.%s.actual"
+      @expected   = "#{dir}/#{prefix()}.#{basename}.%s.expected"
+      @classnames = classnames()
+      @output     = "#{dir}/%s#{suffix}"
+   end
+
+end
+
+
+class KwatableExample1Test < KwatableExampleTest
+
+   def prefix
+      return 'test1'
+   end
+
+   def classnames
+      return %w[Group User]
+   end
+
+
+   def test1_ddl_mysql
+      #@datafile   = "test1.yaml"
+      #@template   = "ddl-mysql.eruby"
+      #@actual     = "test1.ddl-mysql.actual"
+      #@expected   = "test1.ddl-mysql.expected"
+      _setup_ddl('ddl-mysql')
+      _test(:ignore_linenum=>4)
+   end
+
+   def test1_ddl_postgresql
+      #@datafile   = "test1.yaml"
+      #@template   = "ddl-postgresql.eruby"
+      #@actual     = "test1.ddl-postgresql.actual"
+      #@expected   = "test1.ddl-postgresql.expected"
+      _setup_ddl('ddl-postgresql')
+      _test(:ignore_linenum=>4)
+   end
+
+   def test1_dto_java
+      #@datafile   = "test1.yaml"
+      #@template   = "dto-java.eruby"
+      #@actual     = "test1.dto-java.%s.actual"
+      #@expected   = "test1.dto-java.%s.expected"
+      #@classnames = dto_classes()
+      #@output     = "%s.java"
+      _setup_dto('dto-java', '.java')
+      _test(:ignore_linenum=>4, :multiple=>true)
+   end
+
+   def test1_dto_ruby
+      #@datafile   = "#test1.yaml"
+      #@template   = "dto-ruby.eruby"
+      #@actual     = "test1.dto-ruby.%s.actual"
+      #@expected   = "test1.dto-ruby.%s.expected"
+      #@classnames = dto_classes()
+      #@output     = "%s.rb"
+      _setup_dto('dto-ruby', '.rb')
+      _test(:ignore_linenum=>4, :multiple=>true)
+   end
+
+end
+
+
+class KwatableExample2Test < KwatableExampleTest
+
+   def prefix
+      return 'test2'
+   end
+
+   def classnames
+      return %w[Address Customer Item SalesOrder SalesOrderLine]
+   end
+
+
+   def test2_ddl_mysql
+      _setup_ddl('ddl-mysql')
+      _test(:ignore_linenum=>4)
+   end
+
+   def test2_ddl_postgresql
+      _setup_ddl('ddl-postgresql')
+      _test(:ignore_linenum=>4)
+   end
+
+   def test2_dto_java
+      _setup_dto('dto-java', '.java')
+      _test(:ignore_linenum=>4, :multiple=>true)
+   end
+
+   def test2_dto_ruby
+      _setup_dto('dto-ruby', '.rb')
+      _test(:ignore_linenum=>4, :multiple=>true)
+   end
+
+end
+
+
+File.open('test.log', 'a') do |f|
+   $logger = f
+   suite = Test::Unit::TestSuite.new()
+   suite << KwatableExample1Test.suite()
+   suite << KwatableExample2Test.suite()
+   Test::Unit::UI::Console::TestRunner.run(suite)
+end

data/test/test1/test1.ddl-mysql.expected

@@ -0,0 +1,22 @@
+----------------------------------------------------------------------
+-- DDL for MySQL
+--   generated by kwatable with template 'ddl-mysql.eruby'
+----------------------------------------------------------------------
+
+-- Group master table
+create table groups (
+   id                   integer              auto_increment primary key,
+   name                 varchar(63)          not null,
+   `desc`               varchar(255)         
+);
+
+-- User master table
+create table users (
+   id                   integer              auto_increment primary key,
+   name                 varchar(63)          not null,
+   `desc`               varchar(255)         ,
+   email                varchar(63)          ,
+   group_id             integer              ,  -- references groups.id
+   account              varchar(31)          not null,
+   password             varchar(31)          not null
+);

data/test/test1/test1.ddl-postgresql.expected

@@ -0,0 +1,22 @@
+----------------------------------------------------------------------
+-- DDL for PostgreSQL
+--   generated by kwatable with template 'ddl-postgresql.eruby'
+----------------------------------------------------------------------
+
+-- Group master table
+create table groups (
+   id                   serial               primary key,
+   name                 varchar(63)          not null,
+   "desc"               varchar(255)         
+);
+
+-- User master table
+create table users (
+   id                   serial               primary key,
+   name                 varchar(63)          not null,
+   "desc"               varchar(255)         ,
+   email                varchar(63)          ,
+   group_id             integer              references groups(id),
+   account              varchar(31)          not null,
+   password             varchar(31)          not null
+);

data/test/test1/test1.dto-java.Group.expected

@@ -0,0 +1,32 @@
+/*
+ * DTO for Java
+ *   generated by kwatable with template 'dto-java.eruby'
+ */
+
+/**
+ * Group master table
+ */
+public class Group implements java.io.Serializable {
+
+    private  int          id;           /*  */
+    private  String       name;         /*  */
+    private  String       desc;         /*  */
+
+    public Group(int id, String name, String desc) {
+        this.id = id;
+        this.name = name;
+        this.desc = desc;
+    }
+
+    public int getId() { return id }
+    public void setId(int id) { this.id = id; }
+
+    public String getName() { return name }
+    public void setName(String name) { this.name = name; }
+
+    public String getDesc() { return desc }
+    public void setDesc(String desc) { this.desc = desc; }
+
+    // -----------
+
+}

data/test/test1/test1.dto-java.User.expected

@@ -0,0 +1,59 @@
+/*
+ * DTO for Java
+ *   generated by kwatable with template 'dto-java.eruby'
+ */
+
+/**
+ * User master table
+ */
+public class User implements java.io.Serializable {
+
+    private  int          id;           /*  */
+    private  String       name;         /*  */
+    private  String       desc;         /*  */
+    private  String       email;        /*  */
+    private  int          group_id;     /*  */
+    private  String       account;      /*  */
+    private  String       password;     /*  */
+
+    public User(int id, String name, String desc, String email, int group_id, String account, String password) {
+        this.id = id;
+        this.name = name;
+        this.desc = desc;
+        this.email = email;
+        this.group_id = group_id;
+        this.account = account;
+        this.password = password;
+    }
+
+    public int getId() { return id }
+    public void setId(int id) { this.id = id; }
+
+    public String getName() { return name }
+    public void setName(String name) { this.name = name; }
+
+    public String getDesc() { return desc }
+    public void setDesc(String desc) { this.desc = desc; }
+
+    public String getEmail() { return email }
+    public void setEmail(String email) { this.email = email; }
+
+    public int getGroupId() { return group_id }
+    public void setGroupId(int group_id) { this.group_id = group_id; }
+
+    public String getAccount() { return account }
+    public void setAccount(String account) { this.account = account; }
+
+    public String getPassword() { return password }
+    public void setPassword(String password) { this.password = password; }
+
+    // -----------
+
+    private Group group;
+    public Group getGroup() { return group; }
+    public void setGroup(Group group) {
+        this.group = group;
+        this.group_id = group.getId();
+    }
+
+}

data/test/test1/test1.dto-ruby.Group.expected

@@ -0,0 +1,21 @@
+##
+## DTO for Ruby
+##   generated by kwatable with template 'dto-ruby.eruby'
+##
+
+## Group master table
+class Group
+
+   def initialize(id, name, desc)
+      @id = id
+      @name = name
+      @desc = desc
+   end
+
+   attr_accessor :id             # 
+   attr_accessor :name           # 
+   attr_accessor :desc           # 
+
+    // -----------
+
+end

data/test/test1/test1.dto-ruby.User.expected

@@ -0,0 +1,36 @@
+##
+## DTO for Ruby
+##   generated by kwatable with template 'dto-ruby.eruby'
+##
+require 'Group'
+
+## User master table
+class User
+
+   def initialize(id, name, desc, email, group_id, account, password)
+      @id = id
+      @name = name
+      @desc = desc
+      @email = email
+      @group_id = group_id
+      @account = account
+      @password = password
+   end
+
+   attr_accessor :id             # 
+   attr_accessor :name           # 
+   attr_accessor :desc           # 
+   attr_accessor :email          # 
+   attr_accessor :group_id       # 
+   attr_accessor :account        # 
+   attr_accessor :password       # 
+
+    // -----------
+
+   attr_reader :group
+   def group=(group)
+      @group = group
+      @group_id = group.id
+   end
+
+end