tripper 0.0.3d

data/lib/generators/tripper/detect_changes/model.rb

@@ -0,0 +1,226 @@
+require 'generators/tripper'
+
+require 'tripper/GOSPLDB/gospl_db_classes'
+require 'tripper/ORMDB/orm_db_classes'
+require 'tripper/model_parsers/attribute_parser/AttributeParserParser'
+require 'tripper/model_parsers/belongs_to/BelongsToParserParser'
+require 'tripper/model_parsers/validates/ValidatesParserParser'
+require 'tripper/model_parsers/has_one/HasOneParserParser'
+require 'tripper/model_parsers/database_fields_parser/DatabaseFieldsParserParser'
+require 'tripper/model_parsers/has_and_belongs_to_many/HasAndBelongsToManyParserParser'
+require 'tripper/model_parsers/has_many/HasManyParserParser'
+
+require "highline/import"
+
+module Tripper
+	module Generators
+		class Model
+			include Comparable
+			attr_accessor :path, :class_name, :attributes, :belongs_tos, :has_ones, :has_manies, :has_and_belongs_to_manies, :validations
+
+			def initialize(path)
+				@path = path
+				@class_name = File.basename(path, ".rb").camelize
+				@attributes = []
+				@belongs_tos = []
+				@has_ones = []
+				@has_manies = []
+				@has_and_belongs_to_manies = []
+				@validations = Validations.new
+				# puts "parsing file"+path
+				unless path.include? "app/tripper/models"
+					@attributes = Kernel.const_get(@class_name).column_names - ["id", "created_at", "updated_at"]
+				end
+				File.foreach(path) do |line|
+					if line.include?("# database_fields:") && path.include?("app/tripper/models")
+						parser = DatabaseFieldsParser::Parser.new(line)
+						res = parser.database_fields
+						@attributes = res
+					elsif line.include? "has_one"
+						# puts "parsing has_one"
+						parser = HasOneParser::Parser.new(line)
+						res = parser.has_one
+						@has_ones << HasOne.new(res[:attribute], res[:class_name]) if res
+					elsif line.include? "has_many"
+						# puts "parsing has_many"
+						parser = HasManyParser::Parser.new(line)
+						res = parser.has_many
+						@has_manies << HasMany.new(res[:attribute], res[:class_name]) if res
+					elsif line.include? "has_and_belongs_to_many"
+						#puts "parsing has_and_belongs_to_many"
+						parser = HasAndBelongsToManyParser::Parser.new(line)
+						res = parser.has_and_belongs_to_many
+						@has_and_belongs_to_manies << HasAndBelongsToMany.new(res[:attribute], res[:class_name]) if res
+					elsif line.include? "belongs_to"
+						# puts "parsing belongs_to"
+						parser = BelongsToParser::Parser.new(line)
+						res = parser.belongs_to
+						@belongs_tos << BelongsTo.new(res[:attribute], res[:class_name]) if res
+					elsif line.include?("validates") && (line.include?("uniqueness") || line.include?("presence"))
+						# puts "parsing validates"
+						parser = ValidatesParser::Parser.new(line)
+						res = parser.validates
+						@validations << Validation.new(res[:type], res[:attribute], res[:on]) if res
+					end
+				end
+			end
+
+			# we need to uniqueify and sort the validations list, to allow symetric constraints
+			# e.g validates :my_time_id, :uniqueness => {:scope => :my_date_id}
+			# and validates :my_date_id, :uniqueness => {:scope => :my_time_id}
+			def <=> other
+				[self.class_name, self.attributes.sort, self.belongs_tos.sort, self.has_ones.sort, self.has_manies.sort, self.has_and_belongs_to_manies.sort, self.validations.uniq{|v| v.comparable_object}.sort] <=> [other.class_name, other.attributes.sort, other.belongs_tos.sort, other.has_ones.sort, other.has_manies.sort, other.has_and_belongs_to_manies.sort, other.validations.uniq{|v| v.comparable_object}.sort]
+			end
+
+			def to_s
+				self.class_name + " " + self.attributes.to_s + " " + self.belongs_tos.to_s + " " + self.validations.to_s
+			end
+
+			def differences other
+				ModelDiff.new(self, other)
+			end
+
+		end
+
+		# compaires model1 with model2. The result is in the point of view of model1.
+		# e.g. if it has: :lacking=>[time], it means that model1 did not have time, while model2 did.
+		class ModelDiff
+			attr_accessor :model1, :model2, :attributes_diff, :belongs_tos_diff, :has_ones_diff, :has_manies_diff, :has_and_belongs_to_manies_diff, :validations_diff
+
+			def initialize model1, model2
+				@model1 = model1
+				@model2 = model2
+				@attributes_diff = difference_in_field :attributes
+				@belongs_tos_diff = difference_in_field :belongs_tos
+				@has_ones_diff = difference_in_field :has_ones
+				@has_manies_diff = difference_in_field :has_manies
+				@has_and_belongs_to_manies_diff = difference_in_field :has_and_belongs_to_manies
+				@validations_diff = difference_in_field :validations
+			end
+
+			def inspect
+				res = {model1: @model1.class_name, model2: @model2.class_name}
+				res[:attributes_diff] = @attributes_diff unless @attributes_diff.empty?
+				res[:belongs_tos_diff] = @belongs_tos_diff unless @belongs_tos_diff.empty?
+				res[:has_ones_diff] = @has_ones_diff unless @has_ones_diff.empty?
+				res[:has_manies_diff] = @has_manies_diff unless @has_manies_diff.empty?
+				res[:has_and_belongs_to_manies_diff] = @has_and_belongs_to_manies_diff unless @has_and_belongs_to_manies_diff.empty?
+				res[:validations_diff] = @validations_diff unless @validations_diff.empty?
+				res
+			end
+
+			private
+
+			def difference_in_field field
+				extra = @model1.send(field).reject { |att| @model2.send(field).include? att  }
+				lacking = @model2.send(field).reject { |att| @model1.send(field).include? att  }
+				FieldDiff.new extra: extra, lacking: lacking
+			end
+
+			class FieldDiff
+				attr_accessor :extra, :lacking
+				def initialize params={}
+					@extra = (params[:extra] ? params[:extra] : [])
+					@lacking = (params[:lacking] ? params[:lacking] : [])
+				end
+
+				def inspect
+					{extra: @extra, lacking: @lacking}
+				end
+
+				def empty?
+					@extra.empty? && @lacking.empty?
+				end
+			end
+		end
+
+		class Relation
+			include Comparable
+			attr_accessor :name, :class_name, :type
+
+			def initialize (type, name, class_name=nil)
+				@type = @type
+				@name = name
+				@class_name = class_name
+			end
+
+			def to_s
+				self.name + " " + (self.class_name ? self.class_name : "")
+			end
+
+			def <=> other
+				[self.name, self.class_name, self.type] <=> [self.name, other.class_name, self.type]
+			end
+
+			def == other
+				self.name == other.name && self.class_name == other.class_name && self.type == other.type
+			end
+		end
+
+		class BelongsTo < Relation
+			def initialize (name, class_name=nil)
+				super("belongs_to", name, class_name)
+			end
+		end
+
+		class HasOne < Relation
+			def initialize (name, class_name=nil)
+				super("has_one", name, class_name)
+			end
+		end
+
+		class HasMany < Relation
+			def initialize (name, class_name=nil)
+				super("has_many", name, class_name)
+			end
+		end
+
+		class HasAndBelongsToMany < Relation
+			def initialize (name, class_name=nil)
+				super("has_and_belongs_to_many", name, class_name)
+			end
+		end
+
+		class Validations < Array
+			def presence
+				self.select do |obj|
+					obj.type == "presence"
+				end
+			end
+			def uniqueness
+				self.select do |obj|
+					obj.type == "uniqueness"
+				end
+			end
+		end
+
+		class Validation
+			include Comparable
+			attr_accessor :type, :attribute, :scope
+
+			def initialize (type, attribute, scope)
+				@type = type; @attribute = attribute; @scope = scope
+				@combined = [scope, attribute].flatten.uniq.sort
+			end
+
+			def to_s
+				self.type + " " + @combined.to_s#.sort.to_s
+			end
+			def <=> other
+				self.comparable_object <=> other.comparable_object
+			end
+
+			def == other
+				self.comparable_object == other.comparable_object
+			end
+
+			def comparable_object
+				[self.type, @combined]
+			end
+
+			private
+
+			attr_accessor :combined
+		end
+	end
+end

data/lib/generators/tripper/detect_changes/templates/migration.rb

@@ -0,0 +1,7 @@
+class <%= @migration_action.camelize %><%= @diff_string_list %>To<%= @migration_name %> < ActiveRecord::Migration
+  def change
+  	<%- @differences.attributes_diff.lacking.each do |att| -%>
+    <%= @migration_action.downcase %>_column :<%= @migration_name.underscore %>, :<%= att.underscore %>, :string
+    <%- end %>
+  end
+end

data/lib/generators/tripper/detect_changes/templates/model/belongs_to.rb

@@ -0,0 +1 @@
+belongs_to :<%= @belongs_to_obj.name %>

data/lib/generators/tripper/detect_changes/templates/model/has_one.rb

@@ -0,0 +1 @@
+has_one :<%= @has_one_obj.name %>

data/lib/generators/tripper/detect_changes/templates/model/validates.rb

@@ -0,0 +1,2 @@
+
+validates :<%= @validation.attribute %>, :<%= @validation.type %> => <%= create_validation_scope @validation.scope %>

data/lib/generators/tripper/from_community/from_community_generator.rb

@@ -0,0 +1,95 @@
+require 'generators/tripper'
+require 'generators/tripper/obj_constraint'
+require 'generators/tripper/predicate'
+require 'generators/tripper/commonalities/commonalities'
+
+
+require 'rails/generators'
+require 'rails/generators/migration'
+require 'rails/generators/generated_attribute'
+require 'tripper/GOSPLDB/gospl_db_classes'
+require 'tripper/ORMDB/orm_db_classes'
+require 'tripper/GOSPLDBToORMDB/gospl_db_to_orm_db'
+
+module Tripper
+	module Generators
+		class FromCommunityGenerator < Base
+			include Rails::Generators::Migration
+			include Tripper::Generators::Commonalities
+
+			attr_accessor :nolot, :name, :class_name, :no_lot_relations, :lot_relations, :timestamp, :model_attributes
+
+			desc "Create code that corresponds with a GOSPL Community"
+
+			argument :community_name, :type => :string
+
+			# Commandline options can be defined here using Thor-like options:
+			class_option :haml, :desc => 'Generate HAML views instead of ERB.', :type => :boolean
+
+			#class varialbe for timestamps
+			@@timestamp = Time.now.utc
+
+
+			def initialize (*args, &block)
+				super
+				#@model_attributes = []
+			end
+
+			def test
+				puts "hello world of generators! your community is #{community_name} #{Rails.root} #{destroying?}"
+			end
+
+			def check_nolots
+				community = Tripper::ORMDB::OrmSchema.find_by_title community_name
+				unless community
+					Tripper::GOSPLDBToORMDB.import community_name
+					community = Tripper::ORMDB::OrmSchema.find_by_title community_name
+				end
+				if community
+					community.no_lots.each do |nolot|
+						@nolot = nolot
+						@name = nolot.name
+						#also check for inheritance of ActiveRecord::Base, because some words are already ruby classes (e.g. Time)
+						if !(class_exists?(name) && (get_class < ActiveRecord::Base)) || destroying?
+							puts "still have to create this class"
+							create_new_class
+						end
+					end
+					puts community.inspect
+				end
+			end
+
+			private
+
+			def create_new_class
+				@class_name = get_class_name @nolot
+				@model_attributes = []
+				@nolot.identifying_constraint_objects.lots.each do |lot|
+					@model_attributes << Rails::Generators::GeneratedAttribute.new(lot_attribute_name(lot), "String")
+				end
+				create_migration
+				create_model
+				create_controller
+			end
+
+			def class_exists? name
+			  begin
+			    true if Kernel.const_get(name)
+			  rescue NameError
+			    false
+			  end
+			end
+
+
+
+			def self.next_migration_number(dirname) #:nodoc:
+				if ActiveRecord::Base.timestamped_migrations
+					@@timestamp = @@timestamp + 1.seconds
+					@@timestamp.strftime("%Y%m%d%H%M%S")
+				else
+					"%.3d" % (current_migration_number(dirname) + 1)
+				end
+			end
+		end
+	end
+end

data/lib/generators/tripper/from_community/templates/actions/create.rb

@@ -0,0 +1,8 @@
+  def create
+    @<%= instance_name %> = <%= class_name %>.new(params[:<%= instance_name %>])
+    if @<%= instance_name %>.save
+      redirect_to <%= item_url %>, :notice => "Successfully created <%= class_name.underscore.humanize.downcase %>."
+    else
+      render :new
+    end
+  end

data/lib/generators/tripper/from_community/templates/actions/destroy.rb

@@ -0,0 +1,5 @@
+  def destroy
+    @<%= instance_name %> = <%= class_name %>.find(params[:id])
+    @<%= instance_name %>.destroy
+    redirect_to <%= items_url %>, :notice => "Successfully destroyed <%= class_name.underscore.humanize.downcase %>."
+  end

data/lib/generators/tripper/from_community/templates/actions/edit.rb

@@ -0,0 +1,3 @@
+  def edit
+    @<%= instance_name %> = <%= class_name %>.find(params[:id])
+  end

data/lib/generators/tripper/from_community/templates/actions/index.rb

@@ -0,0 +1,3 @@
+  def index
+    @<%= instances_name %> = <%= class_name %>.all
+  end

data/lib/generators/tripper/from_community/templates/actions/new.rb

@@ -0,0 +1,3 @@
+  def new
+    @<%= instance_name %> = <%= class_name %>.new
+  end

data/lib/generators/tripper/from_community/templates/actions/show.rb

@@ -0,0 +1,3 @@
+  def show
+    @<%= instance_name %> = <%= class_name %>.find(params[:id])
+  end

data/lib/generators/tripper/from_community/templates/actions/update.rb

@@ -0,0 +1,8 @@
+  def update
+    @<%= instance_name %> = <%= class_name %>.find(params[:id])
+    if @<%= instance_name %>.update_attributes(params[:<%= instance_name %>])
+      redirect_to <%= item_url %>, :notice  => "Successfully updated <%= class_name.underscore.humanize.downcase %>."
+    else
+      render :edit
+    end
+  end

data/lib/generators/tripper/from_community/templates/controller.rb

@@ -0,0 +1,3 @@
+class <%= plural_class_name %>Controller < ApplicationController
+  <%= controller_methods :actions %>
+end

data/lib/generators/tripper/from_community/templates/fixtures.yml

@@ -0,0 +1,9 @@
+one:
+<%- for attribute in model_attributes -%>
+  <%= attribute.name %>: <%= attribute.default %>
+<%- end -%>
+
+two:
+<%- for attribute in model_attributes -%>
+  <%= attribute.name %>: <%= attribute.default %>
+<%- end -%>

data/lib/generators/tripper/from_community/templates/helper.rb

@@ -0,0 +1,2 @@
+module <%= plural_class_name %>Helper
+end

data/lib/generators/tripper/from_community/templates/migration.rb

@@ -0,0 +1,30 @@
+class Create<%= class_name.pluralize.delete('::') %> < ActiveRecord::Migration
+  def self.up
+    create_table :<%= plural_name.split('/').last %> do |t|
+		<%- for attribute in model_attributes -%>
+			t.<%= attribute.type.downcase %> :<%= attribute.name %>
+		<%- end -%>
+		<%- for nolot in @nolot.identifying_constraint_objects.no_lots -%>
+			t.references :<%= attribute_nameify get_class_name(nolot) %>
+		<%- end -%>
+      t.timestamps
+    end
+    <%- for nolot in @nolot.has_many_many -%>
+      <%- if @nolot.name < nolot.name -%>
+    create_table :<%= plural_name.split('/').last %>_<%= get_class_name(nolot).underscore.pluralize %> do |t|
+      t.belongs_to :<%=attribute_nameify get_class_name(@nolot)%>
+      t.belongs_to :<%=attribute_nameify get_class_name(nolot)%>
+    end
+      <%- end -%>
+    <%- end -%>
+  end
+
+  def self.down
+    drop_table :<%= plural_name.split('/').last %>
+    <%- for nolot in @nolot.has_many_many -%>
+      <%- if @nolot.name < nolot.name -%>
+    drop_table :<%= plural_name.split('/').last %>_<%= get_class_name(nolot).underscore.pluralize %>
+      <%- end -%>
+    <%- end -%>
+  end
+end

data/lib/generators/tripper/from_community/templates/model.rb

@@ -0,0 +1,54 @@
+class <%= class_name %> < ActiveRecord::Base
+	<%- db_model_attr = model_attributes.map { |attribute| attribute.name }.join(", ") -%>
+	<%- db_foreign_keys = @nolot.identifying_constraint_objects.no_lots.map {|nolot| "#{attribute_nameify get_class_name(nolot)}_id" if @nolot.contains_identifying_constraint?}.join(", ") -%>
+	<%- db_attributes = db_model_attr + ((db_model_attr == "" || db_foreign_keys == "") ? db_foreign_keys : (", " + db_foreign_keys)) -%>
+	<%- model_attr = model_attributes.map { |attribute| ":#{attribute.name}" }.join(", ") -%>
+	<%- foreign_keys = @nolot.identifying_constraint_objects.no_lots.map {|nolot| ":#{attribute_nameify get_class_name(nolot)}_id" if @nolot.contains_identifying_constraint?}.join(", ") -%>
+	<%- attributes = model_attr + ((model_attr == "" || foreign_keys == "") ? foreign_keys : (", " + foreign_keys)) -%>
+	# database_fields: <%= db_attributes %>
+  attr_accessible <%= attributes %>
+
+	<%- for nolot in @nolot.identifying_constraint_objects.no_lots -%>
+	belongs_to :<%= attribute_nameify get_class_name(nolot) %>
+	<%- end -%>
+	<%- for nolot in @nolot.object_types_identified_by_me.no_lots -%>
+	has_one :<%= attribute_nameify get_class_name(nolot) %>
+	<%- end -%>
+	<%- for nolot in @nolot.has_many -%>
+	has_many :<%= (attribute_nameify get_class_name(nolot)).pluralize %>
+	<%- end -%>
+	<%- for nolot in @nolot.has_many_many -%>
+	has_and_belongs_to_many :<%= (attribute_nameify get_class_name(nolot)).pluralize %>
+	<%- end -%>
+
+	<%- # Set external uniqueness uniqueness constraints -%>
+	<%- for orm_array in @nolot.exernal_uniqueness_constraint_object_types -%>
+		<%- if orm_array.no_lots.empty? -%>
+			<%- head, *tail = orm_array.lots -%>
+	validates :<%= lot_attribute_name(head) %>, :uniqueness => {:scope => <%= tail.size == 1 ? ":#{lot_attribute_name(tail.first)}" : "[" + tail.map {|lot| ":#{lot_attribute_name(lot)}"}.join(", ") + "]" %>}
+		<%- elsif orm_array.lots.empty? -%>
+			<%- head, *tail = orm_array.no_lots -%>
+	validates :<%= "#{attribute_nameify get_class_name(head)}_id" %>, :uniqueness => {:scope => <%= tail.size == 1 ? ":#{attribute_nameify get_class_name(tail.first)}_id" : "[" + tail.map {|nolot| ":#{attribute_nameify get_class_name(nolot)}_id"}.join(", ") + "]" %>}
+		<%- elsif !orm_array.lots.empty? && !orm_array.no_lots.empty? -%>
+			<%- head, *tail = orm_array.no_lots -%>
+			<%- lots = orm_array.lots -%>
+	validates :<%= "#{attribute_nameify get_class_name(head)}_id" %>, :uniqueness => {:scope => <%= (tail.size + lots.size) == 1 ? ":#{lot_attribute_name(lots.first)}" : "[" + tail.map {|nolot| ":#{attribute_nameify get_class_name(nolot)}_id"}.join(", ") + lots.map {|lot| ":#{lot_attribute_name(lot)}"}.join(", ") + "]" %>}
+		<%- end -%>
+	<%- end -%>
+
+	<%- # Set mandatory constraints -%>
+	<%- for nolot in @nolot.mandatory_constraint_objects.no_lots -%>
+	validates :<%= "#{attribute_nameify get_class_name(nolot)}_id" %>, :presence => true
+	<%- end -%>
+	<%- for lot in @nolot.mandatory_constraint_objects.lots -%>
+	validates :<%= lot_attribute_name(lot) %>, :presence => true
+	<%- end -%>
+
+	def textualize
+		text = ""
+		attributes.each do |attr_name, attr_val|
+			text += "#{attr_name}: #{attr_val}, " unless attr_val=="" || %w[created_at updated_at].include?(attr_name)
+		end
+		text.chomp(", ")
+	end
+end