meta-record 1.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 20cb8eea318a55b539b48eca34a554755cb624a6944180cd7dc611591f4db39d
+  data.tar.gz: 36933fe0fde7d856c30b6c6a50b1c0d1aa8bf2fa660989a54844398eeac3606f
+SHA512:
+  metadata.gz: e43594ecafa0f39f5a11f8450ec9c2a2fd5dddf2a3ffd9208dec9cd62402d3c436acdc9b260d1bd668da6a7a7a170f139bb5f76032d611fc56ffc894dbf83b57
+  data.tar.gz: 1668284a722f57efcecfc0ea220c3103e1dd1b52358881f96823347444165c7828755b0a175b6b31425db8be6ade028afc3ea55616f8d607abd0b3b1fd34c63d

data/bin/metarecord-make

@@ -0,0 +1,53 @@
+#!/usr/bin/env ruby
+require 'optparse'
+require 'metarecord/runner'
+
+include MetaRecordRunner
+
+Dir["config/metarecord.rb"].each do |file|
+  require "#{Dir.pwd}/#{file}"
+end
+
+@base_path  = ""
+@output     = ""
+@input      = []
+@generators = []
+@tmpdir     = ".tmp"
+
+OptionParser.new do |opts|
+  opts.on "-o PATH",       "--output-path=PATH" do |v| @output     = v end
+  opts.on "-b PATH",       "--base-path=PATH"   do |v| @base_path  = v end
+  opts.on "-i PATH",       "--source-path=PATH" do |v| @input      = v.split(",") end
+  opts.on "-g GENERATORS", "--use=GENERATORS"   do |v| @generators = v.split(",") end
+  opts.on "-z PATH",       "--tmp-dir=PATH"     do |v| @tmpdir     = v end
+  opts.on "-l",            "--list-generators" do
+    root = Gem::Specification.find_by_name("meta-record").gem_dir + "/lib/metarecord/generators/"
+    list = Dir[root + "**/*"]
+      .select {|file| file =~ /.*_generator\.rb$/}
+      .collect{|file| file.gsub(root, '')}
+      .collect{|file| file.gsub /(.*)_generator.rb$/, '\1'}
+    puts (list.join "\n")
+    exit
+  end
+  opts.on "-h"             "--help" do
+    puts opts
+    exit
+  end
+end.parse!
+
+def check_options
+  if @output.nil?
+    puts "/!\\ Output path not specified"
+  elsif @input.empty?
+    puts "/!\\ You must provide at least one source directory"
+  elsif @generators.empty?
+    puts "/!\\ You nust specify at least one generator to use"
+  else
+    return true
+  end
+  return false
+end
+
+exit -1 unless check_options
+
+run_all

data/lib/guard/metarecord.rb

@@ -0,0 +1,22 @@
+require 'metarecord/runner'
+
+Dir["config/metarecord.rb"].each do |file|
+  require "#{Dir.pwd}/#{file}"
+end
+
+module ::Guard
+  class MetaRecord < Plugin
+    include MetaRecordRunner
+
+    def initialize options = {}
+      super
+      @base_path      = options[:base_path]
+      @input          = options[:input]
+      @output         = options[:output]
+      @generators     = options[:generators]
+      @odb_connection = options[:odb_connection]
+      @input          = [@input] if @input.class != Array
+      @tmpdir         = ".tmp"
+    end
+  end
+end

data/lib/metarecord/generator_base.rb

@@ -0,0 +1,197 @@
+class String
+  def underscore
+    self.gsub(/::/, '/').
+    gsub(/([A-Z]+)([A-Z][a-z])/,'\1_\2').
+    gsub(/([a-z\d])([A-Z])/,'\1_\2').
+    tr("-", "_").
+    downcase
+  end
+
+  def camelcase
+    return self if self !~ /_/ && self =~ /[A-Z]+.*/
+    split(/_|\//).map{|e| e.capitalize}.join
+  end
+end
+
+require 'pathname'
+require 'json'
+
+class GeneratorBase
+  def self.is_file_based? ; true ; end
+
+  class << self
+    attr_accessor :odb_connection
+
+    def prepare inputs_dir, output_dir, base_path
+      @base_path = base_path
+      @output_dir = output_dir
+      Includes.reset
+      Model.reset
+      inputs_dir.each do |input_dir|
+        load_all_models input_dir
+      end
+    end
+
+    def use generator_class
+      if generator_class.is_file_based?
+        _use_by_files generator_class
+      else
+        _use_by_models generator_class
+      end
+    end
+
+    def _use_by_models generator_class
+      Model.list.each do |model|
+        generator = generator_class.new
+        next unless generator.should_generate_for(model)
+        data = { bodies: [generator.generate_for(model)] }
+        data[:headers] = [generator.get_headers] if generator.methods.include? :get_headers
+        source = generator_class.make_file model[:filename], data
+        dirname = File.dirname model[:filename]
+        dirname.gsub! /^#{@base_path}/, '' unless @base_path.nil?
+        filepath = "#{@output_dir}/" + dirname
+        filename = model[:name].underscore + generator_class.extension
+        `mkdir -p #{filepath}`
+        File.open "#{filepath}/#{filename}", 'w' do |f|
+          f.write source
+        end
+      end
+    end
+
+    def _use_by_files generator_class
+      files = {}
+      Model.list.each do |model|
+        generator = generator_class.new
+        next unless generator.should_generate_for(model)
+        files[model[:filename]] ||= {}
+        filedata = files[model[:filename]]
+        filedata[:headers] ||= []
+        filedata[:bodies]  ||= []
+        filedata[:bodies]  << generator.generate_for(model)
+        if generator.methods.include? :get_headers
+          filedata[:headers] << generator.get_headers
+        end
+      end
+      files.each do |key,value|
+        source = generator_class.make_file key, value
+        path   = generator_class.sourcefile_to_destfile key
+        path.gsub! /^#{@base_path}/, '' unless @base_path.nil?
+        `mkdir -p #{@output_dir}/#{File.dirname path}`
+        File.open "#{@output_dir}/#{path}", 'w' do |f|
+          f.write source
+        end
+      end
+    end
+
+    def sourcefile_to_destfile sourcefile
+      sourcepath = Pathname.new(sourcefile)
+      extension  = sourcepath.extname
+      sourcefile[0...-extension.length] + self.extension
+    end
+  end
+
+  def should_generate_for object
+    true
+  end
+
+  def should_generate_from_manifest
+    false
+  end
+
+  def reset
+    @tab_size = 2
+    @indent = 0
+    @src = ""
+  end
+
+  def indent &block
+    @indent += 1
+    block.call
+    @indent -= 1
+  end
+
+  def unindent &block
+    @indent -= 1
+    block.call
+    @indent += 1
+  end
+
+  def make_block delimiters = '{}', &block
+    _append delimiters[0] if delimiters.size > 0
+    indent block
+    _append delimiters[1] if delimiters.size > 1
+  end
+
+  def _append str, opts = {}
+    @src += " " * (@indent * @tab_size)
+    @src += str
+    @src += "\n" unless opts[:no_line_return]
+  end
+
+  def ptr_type type
+    "std::shared_ptr<#{type}>"
+  end
+
+  def get_value value
+    if value.class == Symbol
+      value.to_s
+    else
+      value.inspect
+    end
+  end
+
+  def get_type type
+    type = "::#{type}" unless type.start_with? "::"
+    type += " " if type[type.size - 1] == ">"
+    type
+  end
+
+  def get_singular_name name
+    if not (name =~ /ies$/).nil?
+      name[0...name.size-3] + "y"
+    elsif (name =~ /(s|x)es$/).nil?
+      name[0...name.size-1]
+    else
+      name[0...name.size-2]
+    end
+  end
+
+  def get_pluralized_name name
+    if not (name =~ /holiday/i).nil?
+      name + "s"
+    elsif not (name =~ /y$/).nil?
+      name[0...name.size-1] + "ies"
+    elsif not (name =~ /(s|x)$/).nil?
+      name + "es"
+    else
+      name + "s"
+    end
+  end
+
+  def get_classname object
+    "#{METARECORD_NAMESPACE}::#{object[:name]}"
+  end
+
+  def id_type
+    if defined? METARECORD_ID_TYPE
+      METARECORD_ID_TYPE
+    else
+      "ODB::id_type"
+    end
+  end
+
+  def null_id
+    if defined? METARECORD_NULL_ID
+      METARECORD_NULL_ID
+    else
+      "ODB_NULL_ID"
+    end
+  end
+
+  def visibility name ;; end
+  def resource_name name ;; end
+  def order_by name, flow = nil ;; end
+  def property type, name, options = {} ;; end
+  def has_one type, name, options = {} ;; end
+  def has_many type, name, options = {} ;; end
+end

data/lib/metarecord/generators/aurelia_generator.rb

@@ -0,0 +1,150 @@
+require 'metarecord/model'
+require 'metarecord/generator_base'
+
+class AureliaGenerator < GeneratorBase
+  def reset
+    super
+    @state = nil
+    @relations = {}
+    @fields = []
+  end
+
+  def generate_for object
+    reset
+    @class_name = object[:name] + "Data"
+    generate_class        object
+    generate_global_scope object
+    generate_fields       object
+    @src
+  end
+
+  def generate_global_scope object
+    @state = :global_scope
+    self.instance_eval &object[:block]
+  end
+
+  def generate_class object
+    _append "export class #{@class_name} extends Model {"
+    @indent += 1
+    _append "constructor() {"
+    _append "  super();"
+    _append "}"
+
+    @state = :class_scope
+    self.instance_eval &object[:block]
+    @indent -= 1
+    _append "}\n"
+  end
+
+  def generate_fields object
+    @state = :field_scope
+    _append "#{@class_name}.fields = ["
+    @indent += 1
+    @fields = []
+    self.instance_eval &object[:block]
+    @indent -= 1
+    @src += "\n"
+    _append "];"
+    _append "Fields.inject(#{@class_name}.fields);"
+    _append "#{@class_name}.fields._mapFields();"
+  end
+
+  def order_by name
+    if @state == :global_scope
+      _append "#{@class_name}.defaultOrderBy = \"#{name}\""
+    end
+  end
+
+  def property type, name, options = {}
+    return if not options[:client].nil? and options[:client][:ignore] == true
+    if @state == :field_scope
+      type = cppToJsType type
+      unless options[:client].nil?
+        type = options[:client][:type] unless options[:client][:type].nil?
+      end
+      @src += ",\n" if @fields.count > 0
+      field = { name: name, type: type }
+      field[:default] = options[:default] if not options[:default].nil?
+      if not options[:validate].nil?
+        field[:min]      = options[:validate][:min] unless options[:validate][:min].nil?
+        field[:max]      = options[:validate][:max] unless options[:validate][:max].nil?
+        field[:required] = options[:validate][:required] unless options[:validate][:required].nil?
+      end
+      @fields << field
+      _append field.to_json, no_line_return: true
+    end
+  end
+
+  def has_one type, name, options = {}
+    return if options[:client] == false
+    type = type.split("::").last
+    if @state == :field_scope
+      @src += ",\n" if @fields.count > 0
+      
+      field = { name: "#{name}_id", type: type, label: name }
+      if not options[:validate].nil?
+         field[:required] = options[:validate][:required] unless options[:validate][:required].nil?
+      end
+      @fields << field
+      _append field.to_json, no_line_return: true
+    end
+  end
+
+  def has_many type, name, options = {}
+    return if options[:client] == false
+    type = type.split("::").last
+    if @state == :field_scope
+      @src += ",\n" if @fields.count > 0
+      @fields << ({
+        name: "#{get_singular_name name}_ids",
+        type: "array[#{type}]",
+        label: name
+      })
+      _append @fields.last.to_json, no_line_return: true
+    end
+  end
+
+  def resource_name name
+    if @state == :global_scope
+      _append "#{@class_name}.scope = \"#{name}\";"
+    end
+  end
+
+  def cppToJsType type
+    case type
+    when 'std::string'    then 'string'
+    when 'std::time_t'    then 'timestamp'
+    when 'unsigned long'  then 'integer'
+    when 'unsigned short' then 'integer'
+    when 'unsigned char'  then 'integer'
+    when 'unsigned int'   then 'integer'
+    when 'long'           then 'integer'
+    when 'short'          then 'integer'
+    when 'char'           then 'integer'
+    when 'int'            then 'integer'
+    when 'DataTree'       then 'object'
+    when 'LocaleString'   then 'locale-string'
+    else type
+    end
+  end
+
+  class << self
+    def extension ; ".js" ; end
+
+    def is_file_based? ; false ; end
+
+    def model_import_path
+      if defined? METARECORD_AURELIA_MODEL_IMPORT
+        METARECORD_AURELIA_MODEL_IMPORT
+      else
+        "aurelia-metarecord"
+      end
+    end
+
+    def make_file filename, data
+      src  = "import {Model} from '#{model_import_path}';\n"
+      src += "import {Fields} from 'aurelia-metarecord';\n\n"
+      src + (data[:bodies].join "\n")
+    end
+  end
+end

data/lib/metarecord/generators/comet/archive_generator.rb

@@ -0,0 +1,108 @@
+require 'metarecord/model'
+require 'metarecord/generator_base'
+
+class CometArchiveGenerator < GeneratorBase
+  def self.is_file_based? ; false ; end
+
+  def reset
+    @src = ""
+    @declarations = []
+    super
+  end
+
+  def should_generate_for_object
+    (not object[:header].nil?) && (not object[:classname].nil?)
+  end
+
+  def generate_for object
+    reset
+    _append "#ifndef #{self.class.client_define}"
+    _append "# include <crails/renderer.hpp>"
+    _append "#endif"
+    _append "#include <crails/archive.hpp>"
+    _append "#include \"#{object[:header]}\"\n"
+    _append "void #{object[:classname]}::serialize(IArchive& archive)"
+    _append "{"
+    @src += "  archive & id"
+    self.instance_eval &object[:block]
+    @src += ";\n"
+    _append "}\n"
+
+    _append "void #{object[:classname]}::serialize(OArchive& archive)"
+    _append "{"
+    @src += "  archive & id"
+    self.instance_eval &object[:block]
+    @src += ";\n"
+    _append "}"
+
+    generate_archive_views object
+  end
+
+  def generate_archive_views object
+    @src += "\n"
+    ptr_type = "#{object[:classname]}*"
+    funcname_prefix = "render_#{object[:classname].gsub(/^::/,'').underscore}"
+    funcname = "#{funcname_prefix}_show_archive"
+    _append "#ifndef #{self.class.client_define}"
+    _append "std::string #{funcname}(const Crails::Renderer* renderer, Crails::SharedVars& vars)"
+    _append "{"
+    @indent += 1
+    _append "auto* model = Crails::cast<#{ptr_type}>(vars, \"model\");"
+    _append "OArchive archive;\n"
+    _append "model->serialize(archive);"
+    _append "return archive.as_string();"
+    @indent -= 1
+    _append "}\n"
+
+    funcname = "#{funcname_prefix}_index_archive"
+    _append "std::string #{funcname}(const Crails::Renderer* renderer, Crails::SharedVars& vars)"
+    _append "{"
+    @indent += 1
+    _append "auto* models = Crails::cast<std::vector<#{object[:classname]}>*>(vars, \"models\");"
+    _append "OArchive archive;"
+    _append "unsigned long size = models->size();\n"
+    _append "archive & size;"
+    _append "for (auto& model : *models)"
+    _append "  model.serialize(archive);"
+    _append "return archive.as_string();"
+    @indent -= 1
+    _append "}"
+    _append "#endif"
+  end
+
+  def property type, name, options = {}
+    @src += " & #{name}"
+  end
+
+  def has_one type, name, options = {}
+    if options[:joined] != false
+      puts "WARNING: unsupported joined has_one in metarecord/generators/comet/archive_generator"
+    else
+      @src += " & #{name}_id"
+    end
+  end
+
+  def has_many type, name, options = {}
+    singular_name = get_singular_name name
+    if options[:joined] != false
+      puts "WARNING: unsupported joined has_many in metarecord/generators/comet/archive_generator"
+    else
+      @src += " & #{singular_name}_ids"
+    end
+  end
+
+  class << self
+    def client_define
+      "__COMET_CLIENT__"
+    end
+
+    def extension ; ".archive.cpp" ; end
+
+    def make_file filename, data
+      source = ""
+      source += (collect_includes_for filename).join("\n")
+      source += "\n" + (data[:bodies].join "\n")
+      source
+    end
+  end
+end

data/lib/metarecord/generators/comet/data_generator.rb

@@ -0,0 +1,77 @@
+require 'metarecord/generators/crails/data_generator'
+
+class CometDataGenerator < CrailsDataGenerator
+  def generate_class_head object
+    _append_macro "#ifndef #{self.class.client_define}"
+    super object
+    _append_macro "#else"
+    _append "struct #{object[:name]} : public #{self.class.client_super_class}"
+    _append_macro "#endif"
+  end
+
+  def prepare_order_by
+    _append_macro "#ifndef #{self.class.client_define}"
+    super
+    _append_macro "#endif"
+  end
+
+  def edit_resource_declaration
+    with_visibility :protected do
+      _append_macro "#ifdef #{self.class.client_define}"
+      _append "#{id_type} id = #{null_id};"
+      _append_macro "#endif"
+    end
+    _append_macro "#ifdef #{self.class.client_define}"
+    _append "#{id_type} get_id() const { return id; }"
+    _append "void         set_id(#{id_type} value) { id = value; }"
+    _append "void         from_json(Data data);"
+    _append "virtual std::vector<std::string> find_missing_parameters(Data) const;"
+    _append "virtual void                     edit(Data);"
+    _append "virtual std::string              to_json() const;"
+    _append "virtual bool                     is_valid();"
+    _append_macro "#else"
+    super
+    _append_macro "#endif"
+    _append ""
+  end
+
+  def resource_name name
+    super name
+    _append_macro "#ifdef #{self.class.client_define}"
+    _append "std::string get_resource_name() const { return scope; }"
+    _append_macro "#endif"
+  end
+
+  def has_many_fetch list_type, name, options
+    with_visibility :public do
+      _append_macro "#ifdef #{self.class.client_define}"
+      _append "Comet::Promise fetch_#{name}();"
+      _append_macro "#else"
+      _append "void fetch_#{name}();"
+      _append_macro "#endif"
+    end
+  end
+
+  class << self
+    def client_define
+      "__COMET_CLIENT__"
+    end
+
+    def client_super_class
+      "MODELS_CLIENT_SUPER_CLASS"
+    end
+
+    def generate_includes
+<<CPP
+#{super}
+#ifdef #{client_define}
+# include <crails/comet/mvc/model.hpp>
+# include <comet/promise.hpp>
+# ifndef #{client_super_class}
+#  define #{client_super_class} Comet::JsonModel
+# endif
+#endif
+CPP
+    end
+  end
+end