kwatable 0.2.0 → 0.3.0

data/lib/kwatable/error-msg.rb

@@ -1,38 +0,0 @@
-###
-### copyright(c) 2005 kuwata-lab.com all rights reserved.
-### $Release: 0.2.0 $
-### $Rev: 15 $
-###
-
-module Kwatable
-
-   @@messages = {}
-
-   def self.msg(key)
-      return @@messages[key]
-   end
-
-   #----- begin auto generate
-   @@messages[:tabledef_empty]       = "table definition file is empty."
-   @@messages[:tabledef_notmap]      = "table definition is not a mapping."
-   @@messages[:template_required]    = "template is not specified."
-   @@messages[:template_notfound]    = "`%s': template file not found."
-   @@messages[:file_generated]       = "generated: %s"
-   @@messages[:template_required]    = "-%s: template filename required."
-   @@messages[:outdir_required]      = "-%s: output directory required."
-   @@messages[:directory_required]   = "-%s: directory required."
-   @@messages[:option_invalid]       = "-%s: invalid option."
-   @@messages[:colname_required]     = "table '%s': column name required (index=%d)."
-   @@messages[:regexp_invalid]       = "table '%s': column '%s': pattern %s: %s"
-   @@messages[:coldef_duplicated]    = "table '%s': column '%s': column name is duplicated."
-   @@messages[:tablename_required]   = "table definition doesn't have a name (index=%d)."
-   @@messages[:tabledef_duplicated]  = "table '%s': table name is duplicated."
-   @@messages[:tablecolumn_required] = "table '%s': column name requried (index=%d)."
-   @@messages[:tablecolumn_duplicated] = "table '%s': column '%s': column name is duplicated."
-   @@messages[:tabletype_required]   = "table `%s': column `%s': type is not determined."
-   @@messages[:alias_conflict]       = "table '%s', column '%s': alias key '%1:' and '%2:' are not allowed to use in the same time."
-   @@messages[:reftable_notfound]    = "`table '%s': column '%s': 'ref: %s': reference table not found."
-   @@messages[:refcolumn_notfound]   = "`table '%s': column '%s': ref: %s': reference column not found in the table."
-   #----- end auto generate
-
-end

data/lib/kwatable/main-program.rb

@@ -1,216 +0,0 @@
-###
-### copyright(c) 2005 kuwata-lab.com all rights reserved.
-### $Release: 0.2.0 $
-### $Rev: 17 $
-###
-
-require 'yaml'
-require 'erb'
-
-module Kwatable
-
-   class CommandOptionError < KwatableError
-   end
-
-   class MainProgram
-      def initialize(argv=ARGV)
-         @argv = argv
-      end
-
-      def execute()
-         options, properties = _parse_options(@argv)
-
-         ## help or version
-         if options[?h] || options[?v]
-            puts _version() if options[?v]
-            puts _usage()   if options[?h]
-            return
-         end
-
-         ## load data file
-         s = ''
-         filenames = @argv
-         filenames.each do |filename|
-            File.open(filename) do |f|
-               f.each_line do |line|
-                  s << line.gsub(/([^\t]{8})|([^\t]*)\t/n){[$+].pack("A8")}  ## expand tab
-               end
-            end
-         end
-         tabledef = YAML.load(s)
-         unless tabledef
-            #* key=:tabledef_empty  msg="table definition file is empty."
-            raise _option_error(:tabledef_empty)
-         end
-         unless tabledef.is_a?(Hash)
-            #* key=:tabledef_notmap  msg="table definition is not a mapping."
-            raise _option_error(:tabledef_notmap)
-         end
-
-         ## manipulation
-         manipulator = Manipulator.new()
-         manipulator.manipulate(tabledef)
-         $stderr.print tabledef.to_yaml if options[?D]
-
-         ## template filename
-         template = options[?f]
-         unless template
-            return nil if options[?D]
-            #* key=:template_required  msg="template is not specified."
-            raise _option_error(:template_required)
-         end
-
-         ## template filepath
-         template_filepath = nil
-         if test(?f, template)
-            template_filepath = template
-         elsif options[?I] && t = _find_template(template, options[?I])
-            template_filepath = t
-         else
-            template_filepath = _find_template(template, Kwatable.template_path)
-         end
-         unless template_filepath
-            #* key=:template_notfound  msg="`%s': template file not found."
-            raise _option_error(:template_notfound, template)
-         end
-
-         ## apply template
-         if !options[?m]
-            context = { 'tables' => tabledef['tables'], 'properties' => properties, }
-            output = _apply_template(template_filepath, context)
-         else
-            tabledef['tables'].each do |table|
-               context = { 'table' => table, 'properties' => properties, }
-               output = _apply_template(template_filepath, context)
-               output_filename = context[:output_filename]
-               output_filename = "#{options[?d]}/#{output_filename}" if options[?d]
-               File.open(output_filename, 'w') { |f| f.write(output) }
-               unless options[?q]
-                  #* key=:file_generated  msg="generated: %s"
-                  $stderr.puts(Kwatable.msg(:file_generated) % output_filename)
-               end
-            end
-            output = nil
-         end
-         return output
-      end
-
-      def self.main(argv=ARGV)
-         begin
-            main = MainProgram.new(ARGV)
-            output = main.execute()
-            print output if output
-         rescue KwatableError => ex
-            $stderr.puts "[ERROR] #{ex.message()}"
-         end
-      end
-
-      private
-
-
-      def _option_error(message_key, *args)
-         msg = Kwatable.msg(message_key) % args
-         return CommandOptionError.new(msg)
-      end
-
-      def _parse_options(argv)
-         options = {}
-         properties = {}
-         while argv[0] && argv[0][0] == ?-
-            optstr = argv.shift
-            if optstr =~ /\A--([-\w]+)(=.*)?/		## properties
-               key, value = $1, $2
-               key = key.gsub(/-/, '_')
-               if value
-                   value.sub!(/\A=/, '')
-               else
-                   value = true
-               end
-               case value
-               when "true", "yes"    ;  value = true
-               when "false", "no"    ;  value = false
-               when "null", "nil"    ;  value = nil
-               when /\A\d+\z/        ;  value = value.to_i
-               when /\A\d+\.\d+\z/   ;  value = value.to_f
-               when /\A'.*'\z/       ;  value = eval(value)
-               when /\A".*"\z/       ;  value = eval(value)
-               end
-               properties[key.intern] = value
-            else
-               optstr = optstr[1, optstr.length-1]
-               while optstr && !optstr.empty?
-                  optchar = optstr[0]
-                  optstr  = optstr[1, optstr.length-1]
-                  case optchar
-                  when ?h, ?v, ?m, ?q, ?D
-                     options[optchar] = true
-                  when ?f, ?t
-                     arg = optstr.empty? ? argv.shift : optstr
-                     optstr = nil
-                     #* key=:template_required  msg="-%s: template filename required."
-                     raise _option_error(:template_required, optchar.chr) unless arg
-                     options[?f] = arg
-                     #options[optchar] = arg
-                  when ?d
-                     arg = optstr.empty? ? argv.shift : optstr
-                     optstr = nil
-                     #* key=:outdir_required  msg="-%s: output directory required."
-                     raise _option_error(:outdir_required, optchar.chr) unless arg
-                     options[optchar] = arg
-                  when ?I
-                     arg = optstr.empty? ? argv.shift : optstr
-                     optstr = nil
-                     #* key=:directory_required  msg="-%s: directory required."
-                     raise _option_error(:directory_required, optchar.chr) unless arg
-                     (options[optchar] ||= []).concat(arg.split(/,/))
-                  else
-                     #* key=:option_invalid  msg="-%s: invalid option."
-                     raise _option_error(:option_invalid, optchar.chr)
-                  end
-               end   # end while
-            end   # end if
-         end   # end while
-         return options, properties
-      end
-
-      def _find_template(template, path_list)
-         path_list.each do |path|
-            t = "#{path}/#{template}"
-            return t if test(?f, t)
-         end
-         return nil
-      end
-
-      def _apply_template(filename, context)
-         str = File.open(filename) { |f| f.read() }
-         trim_mode = '>'  # or '%'
-         erb = ERB.new(str, $SAFE, trim_mode)
-         result = _eval_erb(erb, context)
-         return result
-      end
-
-      def _eval_erb(__erb, context)
-         return __erb.result(binding())
-      end
-
-      def _usage()
-         command = File::basename($0)
-         s = ""
-         s << "Usage: #{command} [-hvm] [-I path] [-d dir] -f template datafile [datafile2 ...]\n"
-         s << "  -h           : help\n"
-         s << "  -v           : version\n"
-         s << "  -I path      : template directory path\n"
-         s << "  -f template  : template filename\n"
-         s << "  -m           : multiple output file\n"
-         s << "  -d dir       : output file directory (with '-m')\n"
-         s << "  -q           : quiet mode\n"
-         return s
-      end
-
-      def _version()
-         return ("$Release: 0.2.0 $" =~ /[\.\d]+/ && $&)
-      end
-
-   end
-
-end

data/lib/kwatable/templates/ddl-mysql.eruby

@@ -1,172 +0,0 @@
-<%
-
-   ##
-   ## kwatable template file for MySQL
-   ##
-   ## copyright(c) 2005 kuwata-lab.com all rights reserved.
-   ## $Release: 0.2.0 $
-   ## $Rev: 15 $
-   ##
-   ## template properties:
-   ##   (none)
-   ##
-
-
-   #
-   # context variables
-   #
-   tables     = context['tables']
-   properties = context['properties']
-   raise "don't use '-m' option with 'ddl-mysql.eruby'." unless tables
-
-
-   #
-   # MySQL keywords
-   #
-   keywords = <<-END
-      add all alter analyze and as asc asensitive
-      before between bigint binary blob both by
-      call cascade case change char character check collate column
-      condition connection constraint continue convert create cross
-      current_date current_time current_timestamp current_user cursor
-      database databases day_hour day_microsecond day_minute day_second
-      dec decimal declare default delayed delete desc describe
-      deterministic distinct distinctrow div double drop dual
-      each else elseif enclosed escaped exists exit explain
-      false fetch float for force foreign from fulltext
-      goto grant group
-      having high_priority hour_microsecond hour_minute hour_second
-      if ignore in index infile inner inout insensitive insert
-      int integer interval into is iterate
-      join
-      key keys kill
-      leading leave left like limit lines load localtime
-      localtimestamp lock long longblob longtext loop low_priority
-      match mediumblob mediumint mediumtext middleint
-      minute_microsecond minute_second mod modifies
-      natural not no_write_to_binlog null numeric
-      on optimize option optionally or order out outer outfile
-      precision primary procedure purge
-      read reads real references regexp release rename repeat
-      replace require restrict return revoke right rlike
-      schema schemas second_microsecond select sensitive
-      separator set show smallint soname spatial specific sql
-      sqlexception sqlstate sqlwarning sql_big_result
-      sql_calc_found_rows sql_small_result ssl starting straight_join
-      table terminated then tinyblob tinyint tinytext to
-      trailing trigger true
-      undo union unique unlock unsigned update usage use using
-      utc_date utc_time utc_timestamp
-      values varbinary varchar varcharacter varying
-      when where while with write
-      xor
-      year_month
-      zerofill
-   END
-   @keywords = {}
-   keywords.split(/\s+/).each { |word| @keywords[word] = true }
-
-
-   #
-   # escape keyword
-   #
-   def self._(word)
-      return @keywords[word.downcase] ? "`#{word}`" : word
-   end
-
-
-   #
-   # start output
-   #
-%>
-----------------------------------------------------------------------
--- DDL for MySQL
---   generated by kwatable with template 'ddl-mysql.eruby'
---   at <%= Time.now.to_s %>
-
-----------------------------------------------------------------------
-<%
-   #
-   # create table statement
-   #
- %>
-<% for table in tables %>
-
--- <%= table['desc'] %>
-
-create table <%= _(table['name']) %> (
-<%
-      n = table['columns'].length
-      i = 0
-      for column in table['columns']
-         i += 1
-         flag_last_loop = (i == n)
-
-         name  = column['name']
-         type  = column['type']
-         width = column['width']
-
-         #
-         # column type
-         #
-         case type
-         when 'char'      ;  type = 'tinyint'
-         when 'short'     ;  type = 'mediumint'
-         when 'int'       ;  type = 'integer'
-         when 'inteter'   ;
-         when 'str'       ;  type = 'varchar' ; width ||= 255
-         when 'string'    ;  type = 'varchar' ; width ||= 255
-         when 'text'      ;
-         when 'float'     ;
-         when 'double'    ;
-         when 'bool'      ;  type = 'boolean'
-         when 'boolean'   ;
-         when 'date'      ;
-         when 'timestamp' ;
-         when 'money'     ;  type = 'decimal'
-         end
-         type += "(#{width})" if width
-
-         #
-         # set type with 'enum(...)' if column has enum
-         #
-         if column['enum']
-            type  = "enum(" + column['enum'].collect{|v| "'#{v}'"}.join(", ") + ")"
-            width = nil
-         end
-
-         #
-         # constraints
-         #
-         constraints = []
-         constraints << 'auto_increment' if column['serial']
-         constraints << 'not null'       if column['required'] && !column['serial'] && !column['ident']
-         constraints << 'primary key'    if column['ident']
-         constraints << 'unique'         if column['unique']
-
-         #
-         # column definition
-         #
-         name_part  = '%-20s' % _(name)
-         type_part  = '%-20s' % type
-         const_part = constraints.join(' ')
-         comma   = flag_last_loop ? '' : ','
-         #comment = column['ref'] ? "  -- references #{column['ref']}" : ""
-         ref = column['ref']
-         comment = ref ? "  -- references #{ref['table']['name']}(#{ref['name']})" : ""
- %>
-   <%= name_part %> <%= type_part %> <%= const_part %><%= comma %><%= comment %>
-
-<%
-      end
-
-      #
-      # composite primary key
-      #
- %>
-<%    if table['primary-keys'] %>
-<%       pkeystr = table['primary-keys'].collect { |pkey| _(pkey) }.join(', ') %>
-   , primary key (<%= pkeystr %>)
-<%    end %>
-);
-<% end %>

data/lib/kwatable/templates/dto-java.eruby

@@ -1,260 +0,0 @@
-<%
-
-   ##
-   ## kwatable template file for Java DTO class
-   ##
-   ## copyright(c) 2005 kuwata-lab.com all rights reserved.
-   ## $Release: 0.2.0 $
-   ## $Rev: 17 $
-   ##
-   ## template properties:
-   ##   --package=name   :  package name
-   ##   --parent=name    :  parent class
-   ##   --constructor    :  define constructor
-   ##   --populate       :  define populate method
-   ##
-
-
-   #
-   # context variables
-   #
-   table      = context['table']
-   properties = context['properties']
-   raise "option '-m' is required when using 'dto-java.eruby'." unless table
-
-
-   #
-   # java keywords
-   #
-   keywords = <<-END
-     abstract assert boolean break byte case catch char class const
-     continue default do double else enum extends final finally float
-     for goto if implements import instanceof int interface long
-     native new package private protected public return short
-     static strictfp super switch synchronized this throw throws
-     transient try void volatile while
-   END
-   @keywords = {}
-   keywords.split(/\s+/).each { |word| @keywords[word] = true }
-
-
-   #
-   # escape java keywords
-   #
-   def self._(word)
-      return @keywords[word] ? "_#{word}" : word
-   end
-
-
-   #
-   # convert 'aaa_bbb_ccc' into 'AaaBbbCcc'
-   #
-   def self.camel_case(name, flag_all=true)
-      s = ''
-      name.split('_').each_with_index do |word, i|
-         s << (!flag_all && i == 0 ? word.downcase : word.capitalize)
-      end
-      return s
-      #s = name.split('_').collect { |w| w.capitalize }.join()
-      #s[0] = s[0].to_s.upcase.chr unless flag_all
-   end
-
-
-   #
-   # class definition
-   #
-   klass = {
-      :name    => table['class']   || camel_case(table['name']),
-      :package => table['package'] || properties[:package],
-      :parent  => table['parent']  || properties[:parent],
-      :desc    => table['desc'],
-   }
-
-
-   #
-   # output file name
-   #
-   context[:output_filename] = klass[:name] + ".java"
-
-
-   #
-   # instance variables
-   #
-   variables = []
-   imports   = []
-   for column in table['columns']
-      type = column['class']
-      unless type
-         type  = column['type']
-         width = column['width']
-         case type
-         when 'char'            ;  type = (!width || width == 1) ? 'char' : 'String'
-         when 'short'           ;
-         when 'int', 'integer'  ;  type = 'int'
-         when 'str', 'string'   ;  type = width == 1 ? 'char' : 'String'
-         when 'text'            ;  type = width == 1 ? 'char' : 'String'
-         when 'float'           ;
-         when 'double'          ;
-         when 'bool', 'boolean' ;  type = 'boolean'
-         when 'date'            ;  type = 'Date' ; imports << 'java.util.Date'
-         when 'timestamp'       ;  type = 'Date' ; imports << 'java.util.Date'
-         when 'money'           ;  type = 'double'
-         end
-      end
-      var = {
-         :name => column['name'],
-         :type => type,
-         :desc => column['desc'],
-      }
-      variables << var
-   end
-   imports.uniq!
-
- %>
-/*
- * DTO for Java
- *   generated by kwatable with template 'dto-java.eruby'
- *   at <%= Time.now.to_s %>
-
- */
-<% if klass[:package] %>
-package <%= klass[:package] %>;
-<% end %>
-<% for class_name in imports %>
-import <%= class_name %>;
-<% end %>
-
-/**
- * <%= klass[:desc] %>
-
- */
-<% extends = klass[:parent] ? ' extends ' + klass[:parent] : '' %>
-public class <%= klass[:name] %><%= extends %> implements java.io.Serializable {
-
-<%
-   #
-   # instance variables
-   #
- %>
-<% for var in variables %>
-<%    varname = '%-12s' % ( _(var[:name]) + ';') %>
-    private  <%= '%-12s' % var[:type] %> <%= varname %>  /* <%= var[:desc] %> */
-<% end %>
-
-<%
-   #
-   # constructor
-   #
-   argstr = variables.collect { |var| "#{var[:type]} #{_(var[:name])}" }.join(', ')
- %>
-<% if properties[:constructor] %>
-    public <%= klass[:name] %>(<%= argstr %>) {
-<%    for var in variables %>
-        set<%= camel_case(var[:name]) %>(<%= _(var[:name]) %>);
-<%    end %>
-    }
-
-<% end %>
-<%
-   #
-   # set all values with java.sql.ResultSet
-   #
- %>
-<% if properties[:populate] %>
-    public void populate(java.sql.ResultSet resultset) throws java.sql.SQLException {
-<%    n = 0 %>
-<%    for var in variables %>
-<%       if var[:type] == 'char' %>
-<%          if (n += 1) == 1 %>
-        String val;
-<%          end %>
-        val = resultset.getString("<%= var[:name] %>");
-        set<%= camel_case(var[:name]) %>(val != null && val.length() > 0 ? val.charAt(0) : 0);
-<%       else %>
-        set<%= camel_case(var[:name]) %>(resultset.get<%= var[:type].capitalize %>("<%= var[:name] %>"));
-<%       end %>
-<%    end %>
-    }
-
-<% end %>
-<%
-   #
-   # set all properties
-   #
- %>
-<% if properties[:populate] %>
-    public void populate(java.util.Map _map) {
-        String val = null;
-<%    for var in variables %>
-        if (_map.containsKey("<%= var[:name] %>")) {
-            val = (String)_map.get("<%= var[:name] %>");
-<%       case var[:type] %>
-<%       when 'String' %>
-            this.<%= _(var[:name]) %> = val;
-<%       when 'int' %>
-            this.<%= _(var[:name]) %> = Integer.parseInt(val);
-<%       when 'long' %>
-            this.<%= _(var[:name]) %> = Long.parseLong(val);
-<%       when 'float' %>
-            this.<%= _(var[:name]) %> = Float.parseFloat(val);
-<%       when 'double' %>
-            this.<%= _(var[:name]) %> = Double.parseDouble(val);
-<%       when 'char' %>
-            this.<%= _(var[:name]) %> = val.length() > 0 ? val.charAt(0) : 0;
-<%       when 'boolean' %>
-            this.<%= _(var[:name]) %> = val.length() > 0;
-<%       when 'Date' %>
-            try {
-                this.<%= _(var[:name]) %> = java.text.DateFormat.getDateInstance().parse(val);
-            } catch (java.text.ParseException ignore) {
-            }
-<%       else %>
-<%          raise "*** internal error: template='dto-java.eruby', var[:type]=#{var[:type].inspect}" %>
-<%       end %>
-        }
-<%    end %>
-    }
-
-<% end %>
-<%
-   #
-   # getter/setter
-   #
-   for var in variables
-      vartype = var[:type]
-      varname = var[:name]
-      getter  = "#{vartype == 'boolean' ? 'is' : 'get'}#{camel_case(varname)}"
-      setter  = "set#{camel_case(varname)}"
- %>
-    public <%= vartype %> <%= getter %>() { return <%= _(varname) %>; }
-    public void <%= setter %>(<%= vartype %> <%= _(varname) %>) { this.<%= _(varname) %> = <%= _(varname) %>; }
-
-<% end %>
-<%
-   #
-   # foreign keys
-   #
-   for column in table['columns']
-      if column['ref']
-         reftype = column['ref']['table']['class']
-         refcolname = column['ref']['name']
-         refname = column['ref-name']
-         varname = column['name']
-         if refname == varname
-            raise "table #{table['name']}: column #{column['name']}: proper ref-name is required."
-         end
-         getter  = "get#{camel_case(column['ref-name'])}"
-         setter  = getter.sub(/^get/, 'set')
- %>
-    private <%= reftype %> <%= _(refname) %>;
-    public <%= reftype %> <%= getter %>() { return <%= _(refname) %>; }
-    public void <%= setter %>(<%= reftype %> <%= _(refname) %>) {
-        this.<%= _(refname) %> = <%= _(refname) %>;
-        this.<%= _(varname) %> = <%= _(refname) %>.get<%= camel_case(refcolname) %>();
-    }
-
-<%
-      end
-   end
-%>
-}